xref: /freebsd/libexec/mknetid/mknetid.c (revision 5861f9665471e98e544f6fa3ce73c4912229ff82)
1 /*
2  * Copyright (c) 1995, 1996
3  *	Bill Paul <wpaul@ctr.columbia.edu>.  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 Bill Paul.
16  * 4. Neither the name of the author nor the names of any co-contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY Bill Paul AND CONTRIBUTORS ``AS IS'' AND
21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL Bill Paul OR CONTRIBUTORS BE LIABLE
24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30  * SUCH DAMAGE.
31  *
32  * netid map generator program
33  *
34  * Written by Bill Paul <wpaul@ctr.columbia.edu>
35  * Center for Telecommunications Research
36  * Columbia University, New York City
37  */
38 
39 #include <sys/types.h>
40 
41 #include <rpc/rpc.h>
42 #include <rpcsvc/yp_prot.h>
43 #include <rpcsvc/ypclnt.h>
44 
45 #include <err.h>
46 #include <grp.h>
47 #include <netdb.h>
48 #include <pwd.h>
49 #include <stdio.h>
50 #include <stdlib.h>
51 #include <string.h>
52 #include <unistd.h>
53 
54 #include "hash.h"
55 
56 #ifndef lint
57 static const char rcsid[] =
58   "$FreeBSD$";
59 #endif /* not lint */
60 
61 #define LINSIZ 1024
62 #define OPSYS "unix"
63 
64 /* Default location of group file. */
65 char *groupfile = _PATH_GROUP;
66 /* Default location of master.passwd file. */
67 char *passfile = _PATH_PASSWD;
68 /* Default location of hosts file. */
69 char *hostsfile = _PATH_HOSTS;
70 /* Default location of netid file */
71 char *netidfile = "/etc/netid";
72 
73 /*
74  * Stored hash table of 'reverse' group member database
75  * which we will construct.
76  */
77 struct member_entry *mtable[TABLESIZE];
78 
79 /*
80  * Dupe table: used to keep track of entries so we don't
81  * print the same thing twice.
82  */
83 struct member_entry *dtable[TABLESIZE];
84 
85 extern struct group *_getgrent(void);
86 extern int _setgrent(void);
87 extern void _endgrent(void);
88 
89 static void
90 usage(void)
91 {
92 	fprintf (stderr, "%s\n%s\n",
93 	"usage: mknetid [-q] [-g group_file] [-p passwd_file] [-h hosts_file]",
94 	"               [-n netid_file] [-d domain]");
95 	exit(1);
96 }
97 
98 extern FILE *_gr_fp;
99 
100 int
101 main(int argc, char *argv[])
102 {
103 	FILE *gfp, *pfp, *hfp, *nfp;
104 	char readbuf[LINSIZ];
105 	char writebuf[LINSIZ];
106 	struct group *gr;
107 	struct grouplist *glist;
108 	char *domain;
109 	int ch;
110 	gid_t i;
111 	char *ptr, *pidptr, *gidptr, *hptr;
112 	int quiet = 0;
113 
114 	domain = NULL;
115 	while ((ch = getopt(argc, argv, "g:p:h:n:d:q")) != -1) {
116 		switch(ch) {
117 		case 'g':
118 			groupfile = optarg;
119 			break;
120 		case 'p':
121 			passfile = optarg;
122 			break;
123 		case 'h':
124 			hostsfile = optarg;
125 			break;
126 		case 'n':
127 			netidfile = optarg;
128 			break;
129 		case 'd':
130 			domain = optarg;
131 			break;
132 		case 'q':
133 			quiet++;
134 			break;
135 		default:
136 			usage();
137 			break;
138 		}
139 	}
140 
141 	if (domain == NULL) {
142 		if (yp_get_default_domain(&domain))
143 			errx(1, "no domain name specified and default \
144 domain not set");
145 	}
146 
147 	if ((gfp = fopen(groupfile, "r")) == NULL) {
148 		err(1, "%s", groupfile);
149 	}
150 
151 	if ((pfp = fopen(passfile, "r")) == NULL) {
152 		err(1, "%s", passfile);
153 	}
154 
155 	if ((hfp = fopen(hostsfile, "r")) == NULL) {
156 		err(1, "%s", hostsfile);
157 	}
158 
159 	if ((nfp = fopen(netidfile, "r")) == NULL) {
160 		/* netid is optional -- just continue */
161 		nfp = NULL;
162 	}
163 
164 	_gr_fp = gfp;
165 
166 	/* Load all the group membership info into a hash table. */
167 
168 	_setgrent();
169 	while((gr = _getgrent()) != NULL) {
170 		while(*gr->gr_mem) {
171 			mstore(mtable, *gr->gr_mem, gr->gr_gid, 0);
172 			gr->gr_mem++;
173 		}
174 	}
175 
176 	fclose(gfp);
177 	_endgrent();
178 
179 	/*
180 	 * Now parse the passwd database, spewing out the extra
181 	 * group information we just stored if necessary.
182 	 */
183 	while(fgets(readbuf, LINSIZ, pfp)) {
184 		/* Ignore comments: ^[ \t]*# */
185 		for (ptr = readbuf; *ptr != '\0'; ptr++)
186 			if (*ptr != ' ' && *ptr != '\t')
187 				break;
188 		if (*ptr == '#' || *ptr == '\0')
189 			continue;
190 		if ((ptr = strchr(readbuf, ':')) == NULL) {
191 			warnx("bad passwd file entry: %s", readbuf);
192 			continue;
193 		}
194 		*ptr = '\0';
195 		ptr++;
196 		if ((ptr = strchr(ptr, ':')) == NULL) {
197 			warnx("bad passwd file entry: %s", readbuf);
198 			continue;
199 		}
200 		*ptr = '\0';
201 		ptr++;
202 		pidptr = ptr;
203 		if ((ptr = strchr(ptr, ':')) == NULL) {
204 			warnx("bad passwd file entry: %s", readbuf);
205 			continue;
206 		}
207 		*ptr = '\0';
208 		ptr++;
209 		gidptr = ptr;
210 		if ((ptr = strchr(ptr, ':')) == NULL) {
211 			warnx("bad passwd file entry: %s", readbuf);
212 			continue;
213 		}
214 		*ptr = '\0';
215 		i = atol(gidptr);
216 
217 		snprintf(writebuf, sizeof(writebuf), "%s.%s@%s", OPSYS,
218 							pidptr, domain);
219 
220 		if (lookup(dtable, writebuf)) {
221 			if (!quiet)
222 				warnx("duplicate netid '%s.%s@%s' -- skipping",
223 						OPSYS, pidptr, domain);
224 			continue;
225 		} else {
226 			mstore(dtable, writebuf, 0, 1);
227 		}
228 		printf("%s.%s@%s %s:%s", OPSYS, pidptr, domain, pidptr, gidptr);
229 		if ((glist = lookup(mtable, (char *)&readbuf)) != NULL) {
230 			while(glist) {
231 				if (glist->groupid != i)
232 					printf(",%lu", (u_long)glist->groupid);
233 				glist = glist->next;
234 			}
235 		}
236 		printf ("\n");
237 	}
238 
239 	fclose(pfp);
240 
241 	/*
242 	 * Now parse the hosts database (this part sucks).
243 	 */
244 
245 	while ((ptr = fgets(readbuf, LINSIZ, hfp))) {
246 		if (*ptr == '#')
247 			continue;
248 		if (!(hptr = strpbrk(ptr, "#\n")))
249 			continue;
250 		*hptr = '\0';
251 		if (!(hptr = strpbrk(ptr, " \t")))
252 			continue;
253 		*hptr++ = '\0';
254 		ptr = hptr;
255 		while (*ptr == ' ' || *ptr == '\t')
256 			ptr++;
257 		if (!(hptr = strpbrk(ptr, " \t")))
258 			continue;
259 		*hptr++ = '\0';
260 		snprintf(writebuf, sizeof(writebuf), "%s.%s@%s", OPSYS,
261 								ptr, domain);
262 		if (lookup(dtable, (char *)&writebuf)) {
263 			if (!quiet)
264 				warnx("duplicate netid '%s' -- skipping",
265 								writebuf);
266 			continue;
267 		} else {
268 			mstore(dtable, (char *)&writebuf, 0, 1);
269 		}
270 		printf ("%s.%s@%s 0:%s\n", OPSYS, ptr, domain, ptr);
271 	}
272 
273 	fclose(hfp);
274 
275 	/*
276 	 * Lastly, copy out any extra information in the netid
277 	 * file. If it's not open, just ignore it: it's optional anyway.
278 	 */
279 
280 	if (nfp != NULL) {
281 		while(fgets(readbuf, LINSIZ, nfp)) {
282 			if (readbuf[0] == '#')
283 				continue;
284 			if ((ptr = strpbrk((char*)&readbuf, " \t")) == NULL) {
285 				warnx("bad netid entry: '%s'", readbuf);
286 				continue;
287 			}
288 
289 			writebuf[0] = *ptr;
290 			*ptr = '\0';
291 			if (lookup(dtable, (char *)&readbuf)) {
292 				if (!quiet)
293 					warnx("duplicate netid '%s' -- skipping",
294 								readbuf);
295 				continue;
296 			} else {
297 				mstore(dtable, (char *)&readbuf, 0, 1);
298 			}
299 			*ptr = writebuf[0];
300 			printf("%s",readbuf);
301 		}
302 		fclose(nfp);
303 	}
304 
305 	exit(0);
306 }
307