1 76193d7c 2003-09-30 devnull #include <sys/types.h>
2 76193d7c 2003-09-30 devnull #include <sys/stat.h>
3 76193d7c 2003-09-30 devnull #include <sys/wait.h>
4 76193d7c 2003-09-30 devnull #include <pwd.h>
5 76193d7c 2003-09-30 devnull #include <signal.h>
6 76193d7c 2003-09-30 devnull #include <fcntl.h>
7 76193d7c 2003-09-30 devnull #include <errno.h>
9 76193d7c 2003-09-30 devnull #include "sam.h"
11 76193d7c 2003-09-30 devnull Rune samname[] = { '~', '~', 's', 'a', 'm', '~', '~', 0 };
13 76193d7c 2003-09-30 devnull static Rune l1[] = { '{', '[', '(', '<', 0253, 0};
14 76193d7c 2003-09-30 devnull static Rune l2[] = { '\n', 0};
15 76193d7c 2003-09-30 devnull static Rune l3[] = { '\'', '"', '`', 0};
16 76193d7c 2003-09-30 devnull Rune *left[]= { l1, l2, l3, 0};
18 76193d7c 2003-09-30 devnull static Rune r1[] = {'}', ']', ')', '>', 0273, 0};
19 76193d7c 2003-09-30 devnull static Rune r2[] = {'\n', 0};
20 76193d7c 2003-09-30 devnull static Rune r3[] = {'\'', '"', '`', 0};
21 76193d7c 2003-09-30 devnull Rune *right[]= { r1, r2, r3, 0};
23 76193d7c 2003-09-30 devnull #ifndef SAMTERMNAME
24 76193d7c 2003-09-30 devnull #define SAMTERMNAME "/usr/local/bin/samterm"
26 76193d7c 2003-09-30 devnull #ifndef TMPDIRNAME
27 76193d7c 2003-09-30 devnull #define TMPDIRNAME "/tmp"
29 76193d7c 2003-09-30 devnull #ifndef SHNAME
30 76193d7c 2003-09-30 devnull #define SHNAME "rc"
32 76193d7c 2003-09-30 devnull #ifndef SHPATHNAME
33 76193d7c 2003-09-30 devnull #define SHPATHNAME "/bin/rc"
35 76193d7c 2003-09-30 devnull #ifndef RXNAME
36 76193d7c 2003-09-30 devnull #define RXNAME "ssh"
38 76193d7c 2003-09-30 devnull #ifndef RXPATHNAME
39 76193d7c 2003-09-30 devnull #define RXPATHNAME "/usr/local/bin/ssh"
41 76193d7c 2003-09-30 devnull #ifndef SAMSAVECMDNAME
42 76193d7c 2003-09-30 devnull #define SAMSAVECMDNAME "/bin/rc\n/usr/local/bin/samsave"
45 76193d7c 2003-09-30 devnull char RSAM[] = "sam";
46 76193d7c 2003-09-30 devnull char SAMTERM[] = SAMTERMNAME;
47 76193d7c 2003-09-30 devnull char HOME[] = "HOME";
48 76193d7c 2003-09-30 devnull char TMPDIR[] = TMPDIRNAME;
49 76193d7c 2003-09-30 devnull char SH[] = SHNAME;
50 76193d7c 2003-09-30 devnull char SHPATH[] = SHPATHNAME;
51 76193d7c 2003-09-30 devnull char RX[] = RXNAME;
52 76193d7c 2003-09-30 devnull char RXPATH[] = RXPATHNAME;
53 76193d7c 2003-09-30 devnull char SAMSAVECMD[] = SAMSAVECMDNAME;
57 76193d7c 2003-09-30 devnull dprint(char *z, ...)
59 76193d7c 2003-09-30 devnull char buf[BLOCKSIZE];
60 76193d7c 2003-09-30 devnull va_list arg;
62 76193d7c 2003-09-30 devnull va_start(arg, z);
63 76193d7c 2003-09-30 devnull vseprint(buf, &buf[BLOCKSIZE], z, arg);
64 76193d7c 2003-09-30 devnull va_end(arg);
65 76193d7c 2003-09-30 devnull termwrite(buf);
69 76193d7c 2003-09-30 devnull print_ss(char *s, String *a, String *b)
71 76193d7c 2003-09-30 devnull dprint("?warning: %s: `%.*S' and `%.*S'\n", s, a->n, a->s, b->n, b->s);
75 76193d7c 2003-09-30 devnull print_s(char *s, String *a)
77 76193d7c 2003-09-30 devnull dprint("?warning: %s `%.*S'\n", s, a->n, a->s);
81 76193d7c 2003-09-30 devnull getuser(void)
83 76193d7c 2003-09-30 devnull static char user[64];
84 76193d7c 2003-09-30 devnull if(user[0] == 0){
85 76193d7c 2003-09-30 devnull struct passwd *pw = getpwuid(getuid());
86 76193d7c 2003-09-30 devnull strcpy(user, pw ? pw->pw_name : "nobody");
88 76193d7c 2003-09-30 devnull return user;
92 76193d7c 2003-09-30 devnull statfile(char *name, ulong *dev, uvlong *id, long *time, long *length, long *appendonly)
94 76193d7c 2003-09-30 devnull struct stat dirb;
96 76193d7c 2003-09-30 devnull if (stat(name, &dirb) == -1)
97 76193d7c 2003-09-30 devnull return -1;
99 76193d7c 2003-09-30 devnull *dev = dirb.st_dev;
101 76193d7c 2003-09-30 devnull *id = dirb.st_ino;
102 76193d7c 2003-09-30 devnull if (time)
103 76193d7c 2003-09-30 devnull *time = dirb.st_mtime;
104 76193d7c 2003-09-30 devnull if (length)
105 76193d7c 2003-09-30 devnull *length = dirb.st_size;
106 76193d7c 2003-09-30 devnull if(appendonly)
107 76193d7c 2003-09-30 devnull *appendonly = 0;
108 76193d7c 2003-09-30 devnull return 1;
112 76193d7c 2003-09-30 devnull statfd(int fd, ulong *dev, uvlong *id, long *time, long *length, long *appendonly)
114 76193d7c 2003-09-30 devnull struct stat dirb;
116 76193d7c 2003-09-30 devnull if (fstat(fd, &dirb) == -1)
117 76193d7c 2003-09-30 devnull return -1;
118 76193d7c 2003-09-30 devnull if (dev)
119 76193d7c 2003-09-30 devnull *dev = dirb.st_dev;
121 76193d7c 2003-09-30 devnull *id = dirb.st_ino;
122 76193d7c 2003-09-30 devnull if (time)
123 76193d7c 2003-09-30 devnull *time = dirb.st_mtime;
124 76193d7c 2003-09-30 devnull if (length)
125 76193d7c 2003-09-30 devnull *length = dirb.st_size;
126 76193d7c 2003-09-30 devnull if(appendonly)
127 76193d7c 2003-09-30 devnull *appendonly = 0;
128 76193d7c 2003-09-30 devnull return 1;
132 76193d7c 2003-09-30 devnull hup(int sig)
134 76193d7c 2003-09-30 devnull panicking = 1; // ???
135 76193d7c 2003-09-30 devnull rescue();
136 76193d7c 2003-09-30 devnull exit(1);
140 76193d7c 2003-09-30 devnull notify (void(*f)(void *, char *))
142 76193d7c 2003-09-30 devnull signal(SIGINT, SIG_IGN);
143 76193d7c 2003-09-30 devnull signal(SIGPIPE, SIG_IGN); // XXX - bpipeok?
144 76193d7c 2003-09-30 devnull signal(SIGHUP, hup);
145 76193d7c 2003-09-30 devnull return 1;
149 76193d7c 2003-09-30 devnull notifyf(void *a, char *b) /* never called; hup is instead */
153 76193d7c 2003-09-30 devnull static int
154 76193d7c 2003-09-30 devnull temp_file(char *buf, int bufsize)
156 76193d7c 2003-09-30 devnull char *tmp;
157 76193d7c 2003-09-30 devnull int n, fd;
159 76193d7c 2003-09-30 devnull tmp = getenv("TMPDIR");
160 76193d7c 2003-09-30 devnull if (!tmp)
161 76193d7c 2003-09-30 devnull tmp = TMPDIR;
163 76193d7c 2003-09-30 devnull n = snprint(buf, bufsize, "%s/sam.%d.XXXXXXX", tmp, getuid());
164 76193d7c 2003-09-30 devnull if (bufsize <= n)
165 76193d7c 2003-09-30 devnull return -1;
166 76193d7c 2003-09-30 devnull if ((fd = mkstemp(buf)) < 0) /* SES - linux sometimes uses mode 0666 */
167 76193d7c 2003-09-30 devnull return -1;
168 76193d7c 2003-09-30 devnull if (fcntl(fd, F_SETFD, fcntl(fd,F_GETFD,0) | FD_CLOEXEC) < 0)
169 76193d7c 2003-09-30 devnull return -1;
170 76193d7c 2003-09-30 devnull return fd;
174 76193d7c 2003-09-30 devnull tempdisk(void)
176 76193d7c 2003-09-30 devnull char buf[4096];
177 76193d7c 2003-09-30 devnull int fd = temp_file(buf, sizeof buf);
178 76193d7c 2003-09-30 devnull if (fd >= 0)
179 76193d7c 2003-09-30 devnull remove(buf);
180 76193d7c 2003-09-30 devnull return fd;
183 76193d7c 2003-09-30 devnull #undef wait
185 76193d7c 2003-09-30 devnull waitfor(int pid)
188 76193d7c 2003-09-30 devnull int rpid;
190 76193d7c 2003-09-30 devnull do; while((rpid = wait(&wm)) != pid && rpid != -1);
191 76193d7c 2003-09-30 devnull return (WEXITSTATUS(wm));
195 76193d7c 2003-09-30 devnull samerr(char *buf)
197 76193d7c 2003-09-30 devnull sprint(buf, "%s/sam.%s.err", TMPDIR, getuser());
201 76193d7c 2003-09-30 devnull emalloc(ulong n)
203 76193d7c 2003-09-30 devnull void *p;
205 76193d7c 2003-09-30 devnull p = malloc(n);
206 76193d7c 2003-09-30 devnull if(p == 0)
207 76193d7c 2003-09-30 devnull panic("malloc fails");
208 76193d7c 2003-09-30 devnull memset(p, 0, n);
209 76193d7c 2003-09-30 devnull return p;
213 76193d7c 2003-09-30 devnull erealloc(void *p, ulong n)
215 76193d7c 2003-09-30 devnull p = realloc(p, n);
216 76193d7c 2003-09-30 devnull if(p == 0)
217 76193d7c 2003-09-30 devnull panic("realloc fails");
218 76193d7c 2003-09-30 devnull return p;
223 76193d7c 2003-09-30 devnull strdup(const char *s)
225 76193d7c 2003-09-30 devnull return strcpy(emalloc(strlen(s)), s);
230 76193d7c 2003-09-30 devnull void exits(const char *s)
232 76193d7c 2003-09-30 devnull if (s) fprint(2, "exit: %s\n", s);
233 76193d7c 2003-09-30 devnull exit(s != 0);
237 76193d7c 2003-09-30 devnull _exits(const char *s)
239 76193d7c 2003-09-30 devnull if (s) fprint(2, "exit: %s\n", s);
240 76193d7c 2003-09-30 devnull _exit(s != 0);
243 76193d7c 2003-09-30 devnull int errstr(char *buf, int size)
245 76193d7c 2003-09-30 devnull extern int errno;
247 76193d7c 2003-09-30 devnull snprint(buf, size, "%s", strerror(errno));
248 76193d7c 2003-09-30 devnull return 1;
252 76193d7c 2003-09-30 devnull int create(char *name, int omode, int perm)
254 76193d7c 2003-09-30 devnull int mode;
257 76193d7c 2003-09-30 devnull if (omode & OWRITE) mode = O_WRONLY;
258 76193d7c 2003-09-30 devnull else if (omode & OREAD) mode = O_RDONLY;
259 76193d7c 2003-09-30 devnull else mode = O_RDWR;
261 76193d7c 2003-09-30 devnull if ((fd = open(name, mode|O_CREAT|O_TRUNC, perm)) < 0)
262 76193d7c 2003-09-30 devnull return fd;
264 76193d7c 2003-09-30 devnull if (omode & OCEXEC)
265 76193d7c 2003-09-30 devnull fcntl(fd, F_SETFD, fcntl(fd,F_GETFD,0) | FD_CLOEXEC);
267 76193d7c 2003-09-30 devnull /* SES - not exactly right, but hopefully good enough. */
268 76193d7c 2003-09-30 devnull if (omode & ORCLOSE)
269 76193d7c 2003-09-30 devnull remove(name);
271 76193d7c 2003-09-30 devnull return fd;