1/*
2 * Copyright (c) 1989, 1993
3 *	The Regents of the University of California.  All rights reserved.
4 *
5 * This code is derived from software contributed to Berkeley by
6 * Kevin Fall.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 *    notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 *    notice, this list of conditions and the following disclaimer in the
15 *    documentation and/or other materials provided with the distribution.
16 * 4. Neither the name of the University nor the names of its 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 THE REGENTS 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 THE REGENTS 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
33#ifndef lint
34static const char copyright[] =
35"@(#) Copyright (c) 1989, 1993\n\
36	The Regents of the University of California.  All rights reserved.\n";
37#endif /* not lint */
38
39#ifndef lint
40#if 0
41static char sccsid[] = "@(#)mknod.c	8.1 (Berkeley) 6/5/93";
42#endif
43static const char rcsid[] =
44  "$FreeBSD$";
45#endif /* not lint */
46
47#include <sys/types.h>
48#include <sys/stat.h>
49
50#include <err.h>
51#include <errno.h>
52#include <stdio.h>
53#include <stdlib.h>
54#include <unistd.h>
55#include <grp.h>
56#include <pwd.h>
57#include <string.h>
58
59static void
60usage(void)
61{
62
63	(void)fprintf(stderr,
64	    "usage: mknod name\n"
65	    "       mknod name [b | c] major minor [owner:group]\n");
66	exit(1);
67}
68
69static u_long
70id(const char *name, const char *type)
71{
72	u_long val;
73	char *ep;
74
75	/*
76	 * XXX
77	 * We know that uid_t's and gid_t's are unsigned longs.
78	 */
79	errno = 0;
80	val = strtoul(name, &ep, 10);
81	if (errno)
82		err(1, "%s", name);
83	if (*ep != '\0')
84		errx(1, "%s: illegal %s name", name, type);
85	return (val);
86}
87
88static gid_t
89a_gid(const char *s)
90{
91	struct group *gr;
92
93	if (*s == '\0')			/* Argument was "uid[:.]". */
94		errx(1, "group must be specified when the owner is");
95	return ((gr = getgrnam(s)) == NULL) ? id(s, "group") : gr->gr_gid;
96}
97
98static uid_t
99a_uid(const char *s)
100{
101	struct passwd *pw;
102
103	if (*s == '\0')			/* Argument was "[:.]gid". */
104		errx(1, "owner must be specified when the group is");
105	return ((pw = getpwnam(s)) == NULL) ? id(s, "user") : pw->pw_uid;
106}
107
108int
109main(int argc, char **argv)
110{
111	int range_error;
112	uid_t uid;
113	gid_t gid;
114	mode_t mode;
115	dev_t dev;
116	char *cp, *endp;
117	long mymajor, myminor;
118
119	if (argc != 2 && argc != 5 && argc != 6)
120		usage();
121
122	if (argc >= 5) {
123		mode = 0666;
124		if (argv[2][0] == 'c')
125			mode |= S_IFCHR;
126		else if (argv[2][0] == 'b')
127			mode |= S_IFBLK;
128		else
129			errx(1, "node must be type 'b' or 'c'");
130
131		errno = 0;
132		mymajor = (long)strtoul(argv[3], &endp, 0);
133		if (endp == argv[3] || *endp != '\0')
134			errx(1, "%s: non-numeric major number", argv[3]);
135		range_error = errno;
136		errno = 0;
137		myminor = (long)strtoul(argv[4], &endp, 0);
138		if (endp == argv[4] || *endp != '\0')
139			errx(1, "%s: non-numeric minor number", argv[4]);
140		range_error |= errno;
141		dev = makedev(mymajor, myminor);
142		if (range_error || major(dev) != mymajor ||
143		    (long)(u_int)minor(dev) != myminor)
144			errx(1, "major or minor number too large");
145	} else {
146		mode = 0666 | S_IFCHR;
147		dev = 0;
148	}
149
150	uid = gid = -1;
151	if (6 == argc) {
152	    	/* have owner:group */
153		if ((cp = strchr(argv[5], ':')) != NULL) {
154			*cp++ = '\0';
155			gid = a_gid(cp);
156		} else
157		usage();
158		uid = a_uid(argv[5]);
159	}
160
161	if (mknod(argv[1], mode, dev) != 0)
162		err(1, "%s", argv[1]);
163	if (6 == argc)
164		if (chown(argv[1], uid, gid))
165			err(1, "setting ownership on %s", argv[1]);
166	exit(0);
167}
168