util.c revision 1.9 1 1.9 ginsbach /* $NetBSD: util.c,v 1.9 2005/03/11 02:55:23 ginsbach 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.9 ginsbach __RCSID("$NetBSD: util.c,v 1.9 2005/03/11 02:55:23 ginsbach 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.8 xtraeme colon(char *cp)
59 1.1 mycroft {
60 1.1 mycroft if (*cp == ':') /* Leading colon is part of file name. */
61 1.1 mycroft return (0);
62 1.1 mycroft
63 1.1 mycroft for (; *cp; ++cp) {
64 1.1 mycroft if (*cp == ':')
65 1.1 mycroft return (cp);
66 1.1 mycroft if (*cp == '/')
67 1.1 mycroft return (0);
68 1.1 mycroft }
69 1.1 mycroft return (0);
70 1.1 mycroft }
71 1.1 mycroft
72 1.9 ginsbach char *
73 1.9 ginsbach unbracket(char *cp)
74 1.9 ginsbach {
75 1.9 ginsbach char *ep;
76 1.9 ginsbach
77 1.9 ginsbach if (*cp == '[') {
78 1.9 ginsbach ep = cp + (strlen(cp) - 1);
79 1.9 ginsbach if (*ep == ']') {
80 1.9 ginsbach *ep = '\0';
81 1.9 ginsbach ++cp;
82 1.9 ginsbach }
83 1.9 ginsbach }
84 1.9 ginsbach return (cp);
85 1.9 ginsbach }
86 1.9 ginsbach
87 1.1 mycroft void
88 1.8 xtraeme verifydir(char *cp)
89 1.1 mycroft {
90 1.1 mycroft struct stat stb;
91 1.1 mycroft
92 1.1 mycroft if (!stat(cp, &stb)) {
93 1.1 mycroft if (S_ISDIR(stb.st_mode))
94 1.1 mycroft return;
95 1.1 mycroft errno = ENOTDIR;
96 1.1 mycroft }
97 1.1 mycroft run_err("%s: %s", cp, strerror(errno));
98 1.1 mycroft exit(1);
99 1.5 mycroft /* NOTREACHED */
100 1.1 mycroft }
101 1.1 mycroft
102 1.1 mycroft int
103 1.8 xtraeme okname(char *cp0)
104 1.1 mycroft {
105 1.1 mycroft int c;
106 1.1 mycroft char *cp;
107 1.1 mycroft
108 1.1 mycroft cp = cp0;
109 1.1 mycroft do {
110 1.1 mycroft c = *cp;
111 1.1 mycroft if (c & 0200)
112 1.1 mycroft goto bad;
113 1.1 mycroft if (!isalpha(c) && !isdigit(c) && c != '_' && c != '-')
114 1.1 mycroft goto bad;
115 1.1 mycroft } while (*++cp);
116 1.1 mycroft return (1);
117 1.1 mycroft
118 1.1 mycroft bad: warnx("%s: invalid user name", cp0);
119 1.1 mycroft return (0);
120 1.1 mycroft }
121 1.1 mycroft
122 1.1 mycroft int
123 1.8 xtraeme susystem(char *s)
124 1.1 mycroft {
125 1.1 mycroft sig_t istat, qstat;
126 1.4 christos int status;
127 1.1 mycroft pid_t pid;
128 1.1 mycroft
129 1.1 mycroft pid = vfork();
130 1.1 mycroft switch (pid) {
131 1.1 mycroft case -1:
132 1.1 mycroft return (127);
133 1.1 mycroft
134 1.1 mycroft case 0:
135 1.1 mycroft execl(_PATH_BSHELL, "sh", "-c", s, NULL);
136 1.1 mycroft _exit(127);
137 1.5 mycroft /* NOTREACHED */
138 1.1 mycroft }
139 1.1 mycroft istat = signal(SIGINT, SIG_IGN);
140 1.1 mycroft qstat = signal(SIGQUIT, SIG_IGN);
141 1.1 mycroft if (waitpid(pid, &status, 0) < 0)
142 1.1 mycroft status = -1;
143 1.1 mycroft (void)signal(SIGINT, istat);
144 1.1 mycroft (void)signal(SIGQUIT, qstat);
145 1.1 mycroft return (status);
146 1.1 mycroft }
147 1.1 mycroft
148 1.1 mycroft BUF *
149 1.8 xtraeme allocbuf(BUF *bp, int fd, int blksize)
150 1.1 mycroft {
151 1.1 mycroft struct stat stb;
152 1.1 mycroft size_t size;
153 1.7 itojun char *nbuf;
154 1.1 mycroft
155 1.1 mycroft if (fstat(fd, &stb) < 0) {
156 1.1 mycroft run_err("fstat: %s", strerror(errno));
157 1.1 mycroft return (0);
158 1.1 mycroft }
159 1.1 mycroft size = roundup(stb.st_blksize, blksize);
160 1.1 mycroft if (size == 0)
161 1.1 mycroft size = blksize;
162 1.1 mycroft if (bp->cnt >= size)
163 1.1 mycroft return (bp);
164 1.7 itojun if ((nbuf = realloc(bp->buf, size)) == NULL) {
165 1.7 itojun free(bp->buf);
166 1.7 itojun bp->buf = NULL;
167 1.1 mycroft bp->cnt = 0;
168 1.1 mycroft run_err("%s", strerror(errno));
169 1.1 mycroft return (0);
170 1.1 mycroft }
171 1.7 itojun bp->buf = nbuf;
172 1.1 mycroft bp->cnt = size;
173 1.1 mycroft return (bp);
174 1.1 mycroft }
175 1.1 mycroft
176 1.1 mycroft void
177 1.8 xtraeme lostconn(int signo)
178 1.1 mycroft {
179 1.1 mycroft if (!iamremote)
180 1.1 mycroft warnx("lost connection");
181 1.1 mycroft exit(1);
182 1.5 mycroft /* NOTREACHED */
183 1.1 mycroft }
184