util.c revision 1.6 1 1.6 agc /* $NetBSD: util.c,v 1.6 2003/08/07 09:05:27 agc Exp $ */
2 1.2 cgd
3 1.1 mycroft /*-
4 1.1 mycroft * Copyright (c) 1992, 1993
5 1.1 mycroft * The Regents of the University of California. All rights reserved.
6 1.1 mycroft *
7 1.1 mycroft * Redistribution and use in source and binary forms, with or without
8 1.1 mycroft * modification, are permitted provided that the following conditions
9 1.1 mycroft * are met:
10 1.1 mycroft * 1. Redistributions of source code must retain the above copyright
11 1.1 mycroft * notice, this list of conditions and the following disclaimer.
12 1.1 mycroft * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 mycroft * notice, this list of conditions and the following disclaimer in the
14 1.1 mycroft * documentation and/or other materials provided with the distribution.
15 1.6 agc * 3. Neither the name of the University nor the names of its contributors
16 1.1 mycroft * may be used to endorse or promote products derived from this software
17 1.1 mycroft * without specific prior written permission.
18 1.1 mycroft *
19 1.1 mycroft * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 1.1 mycroft * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 1.1 mycroft * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 1.1 mycroft * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 1.1 mycroft * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 1.1 mycroft * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 1.1 mycroft * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 1.1 mycroft * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 1.1 mycroft * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 1.1 mycroft * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 1.1 mycroft * SUCH DAMAGE.
30 1.1 mycroft */
31 1.1 mycroft
32 1.4 christos #include <sys/cdefs.h>
33 1.1 mycroft #ifndef lint
34 1.2 cgd #if 0
35 1.1 mycroft static char sccsid[] = "@(#)util.c 8.2 (Berkeley) 4/2/94";
36 1.2 cgd #else
37 1.6 agc __RCSID("$NetBSD: util.c,v 1.6 2003/08/07 09:05:27 agc Exp $");
38 1.2 cgd #endif
39 1.1 mycroft #endif /* not lint */
40 1.1 mycroft
41 1.1 mycroft #include <sys/param.h>
42 1.1 mycroft #include <sys/stat.h>
43 1.1 mycroft #include <sys/wait.h>
44 1.1 mycroft
45 1.1 mycroft #include <ctype.h>
46 1.1 mycroft #include <err.h>
47 1.1 mycroft #include <errno.h>
48 1.1 mycroft #include <paths.h>
49 1.1 mycroft #include <signal.h>
50 1.1 mycroft #include <stdio.h>
51 1.1 mycroft #include <stdlib.h>
52 1.1 mycroft #include <string.h>
53 1.1 mycroft #include <unistd.h>
54 1.1 mycroft
55 1.1 mycroft #include "extern.h"
56 1.1 mycroft
57 1.1 mycroft char *
58 1.1 mycroft colon(cp)
59 1.1 mycroft char *cp;
60 1.1 mycroft {
61 1.1 mycroft if (*cp == ':') /* Leading colon is part of file name. */
62 1.1 mycroft return (0);
63 1.1 mycroft
64 1.1 mycroft for (; *cp; ++cp) {
65 1.1 mycroft if (*cp == ':')
66 1.1 mycroft return (cp);
67 1.1 mycroft if (*cp == '/')
68 1.1 mycroft return (0);
69 1.1 mycroft }
70 1.1 mycroft return (0);
71 1.1 mycroft }
72 1.1 mycroft
73 1.1 mycroft void
74 1.1 mycroft verifydir(cp)
75 1.1 mycroft char *cp;
76 1.1 mycroft {
77 1.1 mycroft struct stat stb;
78 1.1 mycroft
79 1.1 mycroft if (!stat(cp, &stb)) {
80 1.1 mycroft if (S_ISDIR(stb.st_mode))
81 1.1 mycroft return;
82 1.1 mycroft errno = ENOTDIR;
83 1.1 mycroft }
84 1.1 mycroft run_err("%s: %s", cp, strerror(errno));
85 1.1 mycroft exit(1);
86 1.5 mycroft /* NOTREACHED */
87 1.1 mycroft }
88 1.1 mycroft
89 1.1 mycroft int
90 1.1 mycroft okname(cp0)
91 1.1 mycroft char *cp0;
92 1.1 mycroft {
93 1.1 mycroft int c;
94 1.1 mycroft char *cp;
95 1.1 mycroft
96 1.1 mycroft cp = cp0;
97 1.1 mycroft do {
98 1.1 mycroft c = *cp;
99 1.1 mycroft if (c & 0200)
100 1.1 mycroft goto bad;
101 1.1 mycroft if (!isalpha(c) && !isdigit(c) && c != '_' && c != '-')
102 1.1 mycroft goto bad;
103 1.1 mycroft } while (*++cp);
104 1.1 mycroft return (1);
105 1.1 mycroft
106 1.1 mycroft bad: warnx("%s: invalid user name", cp0);
107 1.1 mycroft return (0);
108 1.1 mycroft }
109 1.1 mycroft
110 1.1 mycroft int
111 1.3 mrg susystem(s)
112 1.1 mycroft char *s;
113 1.1 mycroft {
114 1.1 mycroft sig_t istat, qstat;
115 1.4 christos int status;
116 1.1 mycroft pid_t pid;
117 1.1 mycroft
118 1.1 mycroft pid = vfork();
119 1.1 mycroft switch (pid) {
120 1.1 mycroft case -1:
121 1.1 mycroft return (127);
122 1.1 mycroft
123 1.1 mycroft case 0:
124 1.1 mycroft execl(_PATH_BSHELL, "sh", "-c", s, NULL);
125 1.1 mycroft _exit(127);
126 1.5 mycroft /* NOTREACHED */
127 1.1 mycroft }
128 1.1 mycroft istat = signal(SIGINT, SIG_IGN);
129 1.1 mycroft qstat = signal(SIGQUIT, SIG_IGN);
130 1.1 mycroft if (waitpid(pid, &status, 0) < 0)
131 1.1 mycroft status = -1;
132 1.1 mycroft (void)signal(SIGINT, istat);
133 1.1 mycroft (void)signal(SIGQUIT, qstat);
134 1.1 mycroft return (status);
135 1.1 mycroft }
136 1.1 mycroft
137 1.1 mycroft BUF *
138 1.1 mycroft allocbuf(bp, fd, blksize)
139 1.1 mycroft BUF *bp;
140 1.1 mycroft int fd, blksize;
141 1.1 mycroft {
142 1.1 mycroft struct stat stb;
143 1.1 mycroft size_t size;
144 1.1 mycroft
145 1.1 mycroft if (fstat(fd, &stb) < 0) {
146 1.1 mycroft run_err("fstat: %s", strerror(errno));
147 1.1 mycroft return (0);
148 1.1 mycroft }
149 1.1 mycroft size = roundup(stb.st_blksize, blksize);
150 1.1 mycroft if (size == 0)
151 1.1 mycroft size = blksize;
152 1.1 mycroft if (bp->cnt >= size)
153 1.1 mycroft return (bp);
154 1.1 mycroft if ((bp->buf = realloc(bp->buf, size)) == NULL) {
155 1.1 mycroft bp->cnt = 0;
156 1.1 mycroft run_err("%s", strerror(errno));
157 1.1 mycroft return (0);
158 1.1 mycroft }
159 1.1 mycroft bp->cnt = size;
160 1.1 mycroft return (bp);
161 1.1 mycroft }
162 1.1 mycroft
163 1.1 mycroft void
164 1.1 mycroft lostconn(signo)
165 1.1 mycroft int signo;
166 1.1 mycroft {
167 1.1 mycroft if (!iamremote)
168 1.1 mycroft warnx("lost connection");
169 1.1 mycroft exit(1);
170 1.5 mycroft /* NOTREACHED */
171 1.1 mycroft }
172