Add the DragonFly cvs id and perform general cleanups on cvs/rcs/sccs ids. Most
[dragonfly.git] / usr.bin / pathchk / pathchk.c
1 /*-
2  * Copyright (c) 2002 Tim J. Robbins.
3  * 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  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $FreeBSD: src/usr.bin/pathchk/pathchk.c,v 1.2.2.1 2002/11/08 04:20:33 tjr Exp $
27  * $DragonFly: src/usr.bin/pathchk/pathchk.c,v 1.2 2003/06/17 04:29:30 dillon Exp $
28  */
29
30 /*
31  * pathchk -- check pathnames
32  *
33  * Check whether files could be created with the names specified on the
34  * command line. If -p is specified, check whether the pathname is portable
35  * to all POSIX systems.
36  */
37
38 #include <sys/types.h>
39 #include <sys/stat.h>
40
41 #include <err.h>
42 #include <errno.h>
43 #include <limits.h>
44 #include <stdio.h>
45 #include <stdlib.h>
46 #include <string.h>
47 #include <unistd.h>
48
49 static int       check(const char *);
50 static int       portable(const char *);
51 static void      usage(void);
52
53 static int       pflag;                 /* Perform portability checks */
54
55 int
56 main(int argc, char *argv[])
57 {
58         int ch, rval;
59         const char *arg;
60
61         while ((ch = getopt(argc, argv, "p")) > 0) {
62                 switch (ch) {
63                 case 'p':
64                         pflag = 1;
65                         break;
66                 default:
67                         usage();
68                         /*NOTREACHED*/
69                 }
70         }
71         argc -= optind;
72         argv += optind;
73
74         if (argc == 0)
75                 usage();
76
77         rval = 0;
78         while ((arg = *argv++) != NULL)
79                 rval |= check(arg);
80
81         exit(rval);
82 }
83
84 static void
85 usage(void)
86 {
87
88         fprintf(stderr, "usage: pathchk [-p] pathname...\n");
89         exit(1);
90 }
91
92 static int
93 check(const char *path)
94 {
95         struct stat sb;
96         long complen, namemax, pathmax, svnamemax;
97         int badch, last;
98         char *end, *p, *pathd;
99
100         if ((pathd = strdup(path)) == NULL)
101                 err(1, "strdup");
102
103         p = pathd;
104
105         if (!pflag) {
106                 errno = 0;
107                 namemax = pathconf(*p == '/' ? "/" : ".", _PC_NAME_MAX);
108                 if (namemax == -1 && errno != 0)
109                         namemax = NAME_MAX;
110         } else
111                 namemax = _POSIX_NAME_MAX;
112
113         for (;;) {
114                 p += strspn(p, "/");
115                 complen = (long)strcspn(p, "/");
116                 end = p + complen;
117                 last = *end == '\0';
118                 *end = '\0';
119
120                 if (namemax != -1 && complen > namemax) {
121                         warnx("%s: %s: component too long (limit %ld)", path,
122                             p, namemax);
123                         goto bad;
124                 }
125
126                 if (!pflag && stat(pathd, &sb) == -1 && errno != ENOENT) {
127                         warn("%s: %.*s", path, (int)(strlen(pathd) -
128                             complen - 1), pathd);
129                         goto bad;
130                 }
131
132                 if (pflag && (badch = portable(p)) >= 0) {
133                         warnx("%s: %s: component contains non-portable "
134                             "character `%c'", path, p, badch);
135                         goto bad;
136                 }
137
138                 if (last)
139                         break;
140
141                 if (!pflag) {
142                         errno = 0;
143                         svnamemax = namemax;
144                         namemax = pathconf(pathd, _PC_NAME_MAX);
145                         if (namemax == -1 && errno != 0)
146                                 namemax = svnamemax;
147                 }
148
149                 *end = '/';
150                 p = end + 1;
151         }
152
153         if (!pflag) {
154                 errno = 0;
155                 pathmax = pathconf(path, _PC_PATH_MAX);
156                 if (pathmax == -1 && errno != 0)
157                         pathmax = PATH_MAX;
158         } else
159                 pathmax = _POSIX_PATH_MAX;
160         if (pathmax != -1 && strlen(path) > (size_t)pathmax) {
161                 warnx("%s: path too long (limit %ld)", path, pathmax);
162                 goto bad;
163         }
164
165         free(pathd);
166         return (0);
167
168 bad:    free(pathd);
169         return (1);
170 }
171
172 /*
173  * Check whether a path component contains only portable characters. Return
174  * the first non-portable character found.
175  */
176 static int
177 portable(const char *path)
178 {
179         static const char charset[] =
180             "abcdefghijklmnopqrstuvwxyz"
181             "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
182             "0123456789._-";
183         long s;
184
185         if (*path == '-')
186                 return (*path);
187
188         s = strspn(path, charset);
189         if (path[s] != '\0')
190                 return (path[s]);
191
192         return (-1);
193 }