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