1 1.11 christos /* $NetBSD: util.c,v 1.11 2006/12/15 22:45:34 christos 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.11 christos __RCSID("$NetBSD: util.c,v 1.11 2006/12/15 22:45:34 christos 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.11 christos (void)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.10 christos /*ARGSUSED*/ 178 1.10 christos lostconn(int signo __unused) 179 1.1 mycroft { 180 1.1 mycroft if (!iamremote) 181 1.1 mycroft warnx("lost connection"); 182 1.1 mycroft exit(1); 183 1.5 mycroft /* NOTREACHED */ 184 1.1 mycroft } 185