1/*
2 * SPDX-License-Identifier: BSD-3-Clause
3 *
4 * Copyright (c) 1989, 1993
5 *	The Regents of the University of California.  All rights reserved.
6 *
7 * This code is derived from software contributed to Berkeley by
8 * Kevin Fall.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 *    notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 *    notice, this list of conditions and the following disclaimer in the
17 *    documentation and/or other materials provided with the distribution.
18 * 3. Neither the name of the University nor the names of its contributors
19 *    may be used to endorse or promote products derived from this software
20 *    without specific prior written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 * SUCH DAMAGE.
33 */
34
35#ifndef lint
36static const char copyright[] =
37"@(#) Copyright (c) 1989, 1993\n\
38	The Regents of the University of California.  All rights reserved.\n";
39#endif /* not lint */
40
41#ifndef lint
42#if 0
43static char sccsid[] = "@(#)mknod.c	8.1 (Berkeley) 6/5/93";
44#endif
45static const char rcsid[] =
46  "$FreeBSD$";
47#endif /* not lint */
48
49#include <sys/types.h>
50#include <sys/stat.h>
51
52#include <err.h>
53#include <errno.h>
54#include <stdio.h>
55#include <stdlib.h>
56#include <unistd.h>
57#include <grp.h>
58#include <pwd.h>
59#include <string.h>
60
61static void
62usage(void)
63{
64
65	(void)fprintf(stderr,
66	    "usage: mknod name\n"
67	    "       mknod name [b | c] major minor [owner:group]\n");
68	exit(1);
69}
70
71static u_long
72id(const char *name, const char *type)
73{
74	u_long val;
75	char *ep;
76
77	/*
78	 * XXX
79	 * We know that uid_t's and gid_t's are unsigned longs.
80	 */
81	errno = 0;
82	val = strtoul(name, &ep, 10);
83	if (errno)
84		err(1, "%s", name);
85	if (*ep != '\0')
86		errx(1, "%s: illegal %s name", name, type);
87	return (val);
88}
89
90static gid_t
91a_gid(const char *s)
92{
93	struct group *gr;
94
95	if (*s == '\0')			/* Argument was "uid[:.]". */
96		errx(1, "group must be specified when the owner is");
97	return ((gr = getgrnam(s)) == NULL) ? id(s, "group") : gr->gr_gid;
98}
99
100static uid_t
101a_uid(const char *s)
102{
103	struct passwd *pw;
104
105	if (*s == '\0')			/* Argument was "[:.]gid". */
106		errx(1, "owner must be specified when the group is");
107	return ((pw = getpwnam(s)) == NULL) ? id(s, "user") : pw->pw_uid;
108}
109
110int
111main(int argc, char **argv)
112{
113	int range_error;
114	uid_t uid;
115	gid_t gid;
116	mode_t mode;
117	dev_t dev;
118	char *cp, *endp;
119	long mymajor, myminor;
120
121	if (argc != 2 && argc != 5 && argc != 6)
122		usage();
123
124	if (argc >= 5) {
125		mode = 0666;
126		if (argv[2][0] == 'c')
127			mode |= S_IFCHR;
128		else if (argv[2][0] == 'b')
129			mode |= S_IFBLK;
130		else
131			errx(1, "node must be type 'b' or 'c'");
132
133		errno = 0;
134		mymajor = (long)strtoul(argv[3], &endp, 0);
135		if (endp == argv[3] || *endp != '\0')
136			errx(1, "%s: non-numeric major number", argv[3]);
137		range_error = errno;
138		errno = 0;
139		myminor = (long)strtoul(argv[4], &endp, 0);
140		if (endp == argv[4] || *endp != '\0')
141			errx(1, "%s: non-numeric minor number", argv[4]);
142		range_error |= errno;
143		dev = makedev(mymajor, myminor);
144		if (range_error || major(dev) != mymajor ||
145		    (long)(u_int)minor(dev) != myminor)
146			errx(1, "major or minor number too large");
147	} else {
148		mode = 0666 | S_IFCHR;
149		dev = 0;
150	}
151
152	uid = gid = -1;
153	if (6 == argc) {
154	    	/* have owner:group */
155		if ((cp = strchr(argv[5], ':')) != NULL) {
156			*cp++ = '\0';
157			gid = a_gid(cp);
158		} else
159		usage();
160		uid = a_uid(argv[5]);
161	}
162
163	if (mknod(argv[1], mode, dev) != 0)
164		err(1, "%s", argv[1]);
165	if (6 == argc)
166		if (chown(argv[1], uid, gid))
167			err(1, "setting ownership on %s", argv[1]);
168	exit(0);
169}
170