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
57static 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. */
65char *groupfile = _PATH_GROUP;
66/* Default location of master.passwd file. */
67char *passfile = _PATH_PASSWD;
68/* Default location of hosts file. */
69char *hostsfile = _PATH_HOSTS;
70/* Default location of netid file */
71char *netidfile = "/etc/netid";
72
73/*
74 * Stored hash table of 'reverse' group member database
75 * which we will construct.
76 */
77struct 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 */
83struct member_entry *dtable[TABLESIZE];
84
85extern struct group *_getgrent(void);
86extern int _setgrent(void);
87extern void _endgrent(void);
88
89static void
90usage(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
98extern FILE *_gr_fp;
99
100int
101main(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 \
144domain 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