summaryrefslogtreecommitdiff
path: root/src/lib/libcmd/mkdir.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/lib/libcmd/mkdir.c')
-rw-r--r--src/lib/libcmd/mkdir.c189
1 files changed, 189 insertions, 0 deletions
diff --git a/src/lib/libcmd/mkdir.c b/src/lib/libcmd/mkdir.c
new file mode 100644
index 0000000..bdd6ecf
--- /dev/null
+++ b/src/lib/libcmd/mkdir.c
@@ -0,0 +1,189 @@
+/***********************************************************************
+* *
+* This software is part of the ast package *
+* Copyright (c) 1992-2012 AT&T Intellectual Property *
+* and is licensed under the *
+* Eclipse Public License, Version 1.0 *
+* by AT&T Intellectual Property *
+* *
+* A copy of the License is available at *
+* http://www.eclipse.org/org/documents/epl-v10.html *
+* (with md5 checksum b35adb5213ca9657e911e9befb180842) *
+* *
+* Information and Software Systems Research *
+* AT&T Research *
+* Florham Park NJ *
+* *
+* Glenn Fowler <gsf@research.att.com> *
+* David Korn <dgk@research.att.com> *
+* *
+***********************************************************************/
+#pragma prototyped
+/*
+ * David Korn
+ * AT&T Bell Laboratories
+ *
+ * mkdir
+ */
+
+static const char usage[] =
+"[-?\n@(#)$Id: mkdir (AT&T Research) 2010-04-08 $\n]"
+USAGE_LICENSE
+"[+NAME?mkdir - make directories]"
+"[+DESCRIPTION?\bmkdir\b creates one or more directories. By "
+ "default, the mode of created directories is \ba=rwx\b minus the "
+ "bits set in the \bumask\b(1).]"
+"[m:mode]:[mode?Set the mode of created directories to \amode\a. "
+ "\amode\a is symbolic or octal mode as in \bchmod\b(1). Relative "
+ "modes assume an initial mode of \ba=rwx\b.]"
+"[p:parents?Create any missing intermediate pathname components. For "
+ "each dir operand that does not name an existing directory, effects "
+ "equivalent to those caused by the following command shall occur: "
+ "\vmkdir -p -m $(umask -S),u+wx $(dirname dir) && mkdir [-m mode]] "
+ "dir\v where the \b-m\b mode option represents that option supplied to "
+ "the original invocation of \bmkdir\b, if any. Each dir operand that "
+ "names an existing directory shall be ignored without error.]"
+"[v:verbose?Print a message on the standard error for each created "
+ "directory.]"
+"\n"
+"\ndirectory ...\n"
+"\n"
+"[+EXIT STATUS?]{"
+ "[+0?All directories created successfully, or the \b-p\b option "
+ "was specified and all the specified directories now exist.]"
+ "[+>0?An error occurred.]"
+"}"
+"[+SEE ALSO?\bchmod\b(1), \brmdir\b(1), \bumask\b(1)]"
+;
+
+#include <cmd.h>
+#include <ls.h>
+
+#define DIRMODE (S_IRWXU|S_IRWXG|S_IRWXO)
+
+int
+b_mkdir(int argc, char** argv, Shbltin_t* context)
+{
+ register char* path;
+ register int n;
+ register mode_t mode = DIRMODE;
+ register mode_t mask = 0;
+ register int mflag = 0;
+ register int pflag = 0;
+ register int vflag = 0;
+ int made;
+ char* part;
+ mode_t dmode;
+ struct stat st;
+
+ cmdinit(argc, argv, context, ERROR_CATALOG, 0);
+ for (;;)
+ {
+ switch (optget(argv, usage))
+ {
+ case 'm':
+ mflag = 1;
+ mode = strperm(opt_info.arg, &part, mode);
+ if (*part)
+ error(ERROR_exit(0), "%s: invalid mode", opt_info.arg);
+ continue;
+ case 'p':
+ pflag = 1;
+ continue;
+ case 'v':
+ vflag = 1;
+ continue;
+ case ':':
+ error(2, "%s", opt_info.arg);
+ break;
+ case '?':
+ error(ERROR_usage(2), "%s", opt_info.arg);
+ break;
+ }
+ break;
+ }
+ argv += opt_info.index;
+ if (error_info.errors || !*argv)
+ error(ERROR_usage(2), "%s", optusage(NiL));
+ mask = umask(0);
+ if (mflag || pflag)
+ {
+ dmode = DIRMODE & ~mask;
+ if (!mflag)
+ mode = dmode;
+ dmode |= S_IWUSR | S_IXUSR;
+ }
+ else
+ {
+ mode &= ~mask;
+ umask(mask);
+ mask = 0;
+ }
+ while (path = *argv++)
+ {
+ if (!mkdir(path, mode))
+ {
+ if (vflag)
+ error(0, "%s: directory created", path);
+ made = 1;
+ }
+ else if (!pflag || !(errno == ENOENT || errno == EEXIST || errno == ENOTDIR))
+ {
+ error(ERROR_system(0), "%s:", path);
+ continue;
+ }
+ else if (errno == EEXIST)
+ continue;
+ else
+ {
+ /*
+ * -p option, preserve intermediates
+ * first eliminate trailing /'s
+ */
+
+ made = 0;
+ n = strlen(path);
+ while (n > 0 && path[--n] == '/');
+ path[n + 1] = 0;
+ for (part = path, n = *part; n;)
+ {
+ /* skip over slashes */
+ while (*part == '/')
+ part++;
+ /* skip to next component */
+ while ((n = *part) && n != '/')
+ part++;
+ *part = 0;
+ if (mkdir(path, n ? dmode : mode) < 0 && errno != EEXIST && access(path, F_OK) < 0)
+ {
+ error(ERROR_system(0), "%s: cannot create intermediate directory", path);
+ *part = n;
+ break;
+ }
+ if (vflag)
+ error(0, "%s: directory created", path);
+ if (!(*part = n))
+ {
+ made = 1;
+ break;
+ }
+ }
+ }
+ if (made && (mode & (S_ISVTX|S_ISUID|S_ISGID)))
+ {
+ if (stat(path, &st))
+ {
+ error(ERROR_system(0), "%s: cannot stat", path);
+ break;
+ }
+ if ((st.st_mode & (S_ISVTX|S_ISUID|S_ISGID)) != (mode & (S_ISVTX|S_ISUID|S_ISGID)) && chmod(path, mode))
+ {
+ error(ERROR_system(0), "%s: cannot change mode from %s to %s", path, fmtperm(st.st_mode & (S_ISVTX|S_ISUID|S_ISGID)), fmtperm(mode));
+ break;
+ }
+ }
+ }
+ if (mask)
+ umask(mask);
+ return error_info.errors != 0;
+}