whereis.c revision 1.14 1 /* $NetBSD: whereis.c,v 1.14 2004/04/01 20:50:32 christos Exp $ */
2
3 /*-
4 * Copyright (c) 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 */
31
32 #include <sys/cdefs.h>
33 #ifndef lint
34 __COPYRIGHT("@(#) Copyright (c) 1993\n\
35 The Regents of the University of California. All rights reserved.\n");
36 #endif /* not lint */
37
38 #ifndef lint
39 #if 0
40 static char sccsid[] = "@(#)whereis.c 8.3 (Berkeley) 5/4/95";
41 #endif
42 __RCSID("$NetBSD: whereis.c,v 1.14 2004/04/01 20:50:32 christos Exp $");
43 #endif /* not lint */
44
45 #include <sys/param.h>
46 #include <sys/stat.h>
47 #include <sys/sysctl.h>
48
49 #include <err.h>
50 #include <errno.h>
51 #include <stdio.h>
52 #include <stdlib.h>
53 #include <string.h>
54 #include <unistd.h>
55
56 static void usage(void) __attribute__((__noreturn__));
57
58 int
59 main(int argc, char *argv[])
60 {
61 struct stat sb;
62 size_t len;
63 int ch, mib[2];
64 char *p, *t, *std, path[MAXPATHLEN];
65 int which = strcmp(getprogname(), "which") == 0;
66 int useenvpath = which, found = 0;
67
68 while ((ch = getopt(argc, argv, "ap")) != -1)
69 switch (ch) {
70 case 'a':
71 which = 0;
72 break;
73 case 'p':
74 useenvpath = 1; /* use environment for PATH */
75 break;
76
77 case '?':
78 default:
79 usage();
80 }
81 argc -= optind;
82 argv += optind;
83
84 if (argc == 0)
85 usage();
86
87 if (useenvpath) {
88 if ((std = getenv("PATH")) == NULL)
89 errx(1, "PATH environment variable is not set");
90 } else {
91 /* Retrieve the standard path. */
92 mib[0] = CTL_USER;
93 mib[1] = USER_CS_PATH;
94 if (sysctl(mib, 2, NULL, &len, NULL, 0) == -1)
95 err(1, "sysctl: user.cs_path");
96 if (len == 0)
97 errx(1, "sysctl: user.cs_path (zero length)");
98 if ((std = malloc(len)) == NULL)
99 err(1, NULL);
100 if (sysctl(mib, 2, std, &len, NULL, 0) == -1)
101 err(1, "sysctl: user.cs_path");
102 }
103
104 /* For each path, for each program... */
105 for (; *argv; ++argv)
106 for (p = std; p; p && (*p++ = ':')) {
107 t = p;
108 if ((p = strchr(p, ':')) != NULL) {
109 *p = '\0';
110 if (t == p)
111 t = ".";
112 } else
113 if (strlen(t) == 0)
114 t = ".";
115 (void)snprintf(path, sizeof(path), "%s/%s", t, *argv);
116 if (stat(path, &sb) == -1)
117 continue;
118 if (!S_ISREG(sb.st_mode))
119 continue;
120 if (access(path, X_OK) == -1)
121 continue;
122 (void)printf("%s\n", path);
123 found++;
124 if (which)
125 break;
126 }
127
128 return ((found == 0) ? 3 : ((found >= argc) ? 0 : 2));
129 }
130
131 static void
132 usage(void)
133 {
134
135 (void)fprintf(stderr, "Usage: %s [-ap] program [...]\n", getprogname());
136 exit(1);
137 }
138