xref: /minix/usr.bin/whereis/whereis.c (revision 7f5f010b)
1 /*	$NetBSD: whereis.c,v 1.21 2008/10/17 10:53:26 apb 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\
35  The Regents of the University of California.  All rights reserved.");
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.21 2008/10/17 10:53:26 apb 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) __dead;
57 
58 int
59 main(int argc, char *argv[])
60 {
61 	struct stat sb;
62 	size_t len;
63 #ifdef __minix
64 	int ch;
65 #else
66 	int ch, mib[2];
67 #endif /* def __minix */
68 	char *p, *std, path[MAXPATHLEN];
69 	const char *t;
70 	int which = strcmp(getprogname(), "which") == 0;
71 	int useenvpath = which, found = 0;
72 	gid_t egid = getegid();
73 	uid_t euid = geteuid();
74 
75 	/* To make access(2) do what we want */
76 	if (setgid(egid) == -1)
77 		err(1, "Can't set gid to %lu", (unsigned long)egid);
78 	if (setuid(euid) == -1)
79 		err(1, "Can't set uid to %lu", (unsigned long)euid);
80 
81 	while ((ch = getopt(argc, argv, "ap")) != -1)
82 		switch (ch) {
83 		case 'a':
84 			which = 0;
85 			break;
86 		case 'p':
87 			useenvpath = 1;	/* use environment for PATH */
88 			break;
89 
90 		case '?':
91 		default:
92 			usage();
93 		}
94 	argc -= optind;
95 	argv += optind;
96 
97 	if (argc == 0)
98 		usage();
99 
100  	if (useenvpath) {
101  		if ((std = getenv("PATH")) == NULL)
102  			errx(1, "PATH environment variable is not set");
103 	} else {
104 		/* Retrieve the standard path. */
105 #ifdef __minix
106 		/*
107 			Note: This path is currently defined here and should probably be defined
108 			here, in "ash" or in "sh".
109 			To minimize code changes, the path has been hard coded into this file.
110 			However, if this path needs to be used in other ported programs, please
111 			move this define to <minix/paths.h> and add the include to this file
112 			and all files that use _PATH_USER_CS_PATH.
113 		 */
114 		#define _PATH_USER_CS_PATH "/usr/X11R7/sbin:/usr/local/sbin:/usr/pkg/sbin:/usr/sbin:/sbin:/usr/X11R7/bin:/usr/local/bin:/usr/pkg/bin:/usr/bin:/bin:/usr/games"
115 		std = strdup(_PATH_USER_CS_PATH);
116 #else
117 		mib[0] = CTL_USER;
118 		mib[1] = USER_CS_PATH;
119 		if (sysctl(mib, 2, NULL, &len, NULL, 0) == -1)
120 			err(1, "sysctl: user.cs_path");
121 		if (len == 0)
122 			errx(1, "sysctl: user.cs_path (zero length)");
123 		if ((std = malloc(len)) == NULL)
124 			err(1, NULL);
125 		if (sysctl(mib, 2, std, &len, NULL, 0) == -1)
126 			err(1, "sysctl: user.cs_path");
127 #endif /* def __minix */
128 	}
129 
130 	/* For each path, for each program... */
131 	for (; *argv; ++argv) {
132 		if (**argv == '/') {
133 			if (stat(*argv, &sb) == -1)
134 				continue; /* next argv */
135 			if (!S_ISREG(sb.st_mode))
136 				continue; /* next argv */
137 			if (access(*argv, X_OK) == -1)
138 				continue; /* next argv */
139 			(void)printf("%s\n", *argv);
140 			found++;
141 			if (which)
142 				continue; /* next argv */
143 		} else for (p = std; p; ) {
144 			t = p;
145 			if ((p = strchr(p, ':')) != NULL) {
146 				*p = '\0';
147 				if (t == p)
148 					t = ".";
149 			} else
150 				if (strlen(t) == 0)
151 					t = ".";
152 			(void)snprintf(path, sizeof(path), "%s/%s", t, *argv);
153 			len = snprintf(path, sizeof(path), "%s/%s", t, *argv);
154 			if (p)
155 				*p++ = ':';
156 			if (len >= sizeof(path))
157 				continue; /* next p */
158 			if (stat(path, &sb) == -1)
159 				continue; /* next p */
160 			if (!S_ISREG(sb.st_mode))
161 				continue; /* next p */
162 			if (access(path, X_OK) == -1)
163 				continue; /* next p */
164 			(void)printf("%s\n", path);
165 			found++;
166 			if (which)
167 				break; /* next argv */
168 		}
169 	}
170 
171 	return ((found == 0) ? 3 : ((found >= argc) ? 0 : 2));
172 }
173 
174 static void
175 usage(void)
176 {
177 
178 	(void)fprintf(stderr, "Usage: %s [-ap] program [...]\n", getprogname());
179 	exit(1);
180 }
181