rename functions that clash with reserved math procedures to avoid gcc3.4
[dragonfly.git] / bin / mkdir / mkdir.c
1 /*
2  * Copyright (c) 1983, 1992, 1993
3  *      The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *      This product includes software developed by the University of
16  *      California, Berkeley and its contributors.
17  * 4. Neither the name of the University nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  *
33  * @(#) Copyright (c) 1983, 1992, 1993 The Regents of the University of California.  All rights reserved.
34  * @(#)mkdir.c  8.2 (Berkeley) 1/25/94
35  * $FreeBSD: src/bin/mkdir/mkdir.c,v 1.19.2.2 2001/08/01 04:42:37 obrien Exp $
36  * $DragonFly: src/bin/mkdir/mkdir.c,v 1.4 2003/09/28 14:39:14 hmp Exp $
37  */
38
39 #include <sys/types.h>
40 #include <sys/stat.h>
41
42 #include <err.h>
43 #include <errno.h>
44 #include <libgen.h>
45 #include <stdio.h>
46 #include <stdlib.h>
47 #include <string.h>
48 #include <sysexits.h>
49 #include <unistd.h>
50
51 int     build (char *, mode_t);
52 int     main (int, char *[]);
53 void    usage (void);
54
55 int vflag;
56
57 int
58 main(int argc, char **argv)
59 {
60         int ch, exitval, success, omode, pflag;
61         mode_t *set = (mode_t *)NULL;
62         char *mode;
63
64         omode = pflag = 0;
65         mode = NULL;
66         while ((ch = getopt(argc, argv, "m:pv")) != -1)
67                 switch(ch) {
68                 case 'm':
69                         mode = optarg;
70                         break;
71                 case 'p':
72                         pflag = 1;
73                         break;
74                 case 'v':
75                         vflag = 1;
76                         break;
77                 case '?':
78                 default:
79                         usage();
80                 }
81
82         argc -= optind;
83         argv += optind;
84         if (argv[0] == NULL)
85                 usage();
86
87         if (mode == NULL) {
88                 omode = S_IRWXU | S_IRWXG | S_IRWXO;
89         } else {
90                 if ((set = setmode(mode)) == NULL)
91                         errx(1, "invalid file mode: %s", mode);
92                 omode = getmode(set, S_IRWXU | S_IRWXG | S_IRWXO);
93                 free(set);
94         }
95
96         for (exitval = 0; *argv != NULL; ++argv) {
97                 success = 1;
98                 if (pflag) {
99                         if (build(*argv, omode))
100                                 success = 0;
101                 } else if (mkdir(*argv, omode) < 0) {
102                         if (errno == ENOTDIR || errno == ENOENT)
103                                 warn("%s", dirname(*argv));
104                         else
105                                 warn("%s", *argv);
106                         success = 0;
107                 } else if (vflag)
108                         (void)printf("%s\n", *argv);
109                 
110                 if (!success)
111                         exitval = 1;
112                 /*
113                  * The mkdir() and umask() calls both honor only the low
114                  * nine bits, so if you try to set a mode including the
115                  * sticky, setuid, setgid bits you lose them.  Don't do
116                  * this unless the user has specifically requested a mode,
117                  * as chmod will (obviously) ignore the umask.
118                  */
119                 if (success && mode != NULL && chmod(*argv, omode) == -1) {
120                         warn("%s", *argv);
121                         exitval = 1;
122                 }
123         }
124         exit(exitval);
125 }
126
127 int
128 build(char *path, mode_t omode)
129 {
130         struct stat sb;
131         mode_t numask, oumask;
132         int first, last, retval;
133         char *p;
134
135         p = path;
136         oumask = 0;
137         retval = 0;
138         if (p[0] == '/')                /* Skip leading '/'. */
139                 ++p;
140         for (first = 1, last = 0; !last ; ++p) {
141                 if (p[0] == '\0')
142                         last = 1;
143                 else if (p[0] != '/')
144                         continue;
145                 *p = '\0';
146                 if (p[1] == '\0')
147                         last = 1;
148                 if (first) {
149                         /*
150                          * POSIX 1003.2:
151                          * For each dir operand that does not name an existing
152                          * directory, effects equivalent to those cased by the
153                          * following command shall occcur:
154                          *
155                          * mkdir -p -m $(umask -S),u+wx $(dirname dir) &&
156                          *    mkdir [-m mode] dir
157                          *
158                          * We change the user's umask and then restore it,
159                          * instead of doing chmod's.
160                          */
161                         oumask = umask(0);
162                         numask = oumask & ~(S_IWUSR | S_IXUSR);
163                         (void)umask(numask);
164                         first = 0;
165                 }
166                 if (last)
167                         (void)umask(oumask);
168                 if (stat(path, &sb)) {
169                         if (errno != ENOENT ||
170                             mkdir(path, last ? omode : 
171                                   S_IRWXU | S_IRWXG | S_IRWXO) < 0) {
172                                 warn("%s", path);
173                                 retval = 1;
174                                 break;
175                         } else if (vflag)
176                                 printf("%s\n", path);
177                 }
178                 else if ((sb.st_mode & S_IFMT) != S_IFDIR) {
179                         if (last)
180                                 errno = EEXIST;
181                         else
182                                 errno = ENOTDIR;
183                         warn("%s", path);
184                         retval = 1;
185                         break;
186                 }
187                 if (!last)
188                     *p = '/';
189         }
190         if (!first && !last)
191                 (void)umask(oumask);
192         return (retval);
193 }
194
195 void
196 usage(void)
197 {
198
199         (void)fprintf(stderr, "usage: mkdir [-pv] [-m mode] directory ...\n");
200         exit (EX_USAGE);
201 }