1 static char sccsid[] = "@(#)net.c 4.2 (Berkeley) 09/12/82";
2
3 /* sccs id variable */
4 static char *net_sid = "@(#)net.c 1.8";
5
6 # include "defs.h"
7 /* must be setuid root */
8 /*
9 net - -b -c cmd -f -i file -l name -mmach -n -o file -p passwd
10 -r file -s file -u uid -w -x -y -z command
11
12 - take from standard input
13 -b never send anything back
14 -c cmd think of this as a "cmd" *
15 -f force prompting of user name and password
16 -i file remote stdin *
17 -l name remote login name
18 -m Mach remote machine
19 -n do not write back anything, always mail them back
20 -o file remote stdout & stderr *
21 -p pass remote password
22 -q quiet option, send back only if rcode !=0 or if there is stdout
23 -r file local response file
24 -s file local stdin file *
25
26 (super users only, always skip login/passwd check:)
27 -u uid net queue files should be owned by uid (16 bits)
28 -w this is a write/mail response cmd *
29 -x this is being forwarded through us to another machine *
30 -y skip login/password check *
31 -z this is a response file being returned *
32
33 * = not documented in net(NEW)
34
35 */
36 /*
37 code option reason
38 q normal request
39 w -w message to be written back
40 -x being forwarded through us
41 y -y simply skips login check (used by netlpr)
42 s -z normal response
43 */
44 /* global variables */
45 struct userinfo status;
46
47 /* local variables */
48 static char dfname[]= DFNAME;
49
main(argc,argv)50 main(argc, argv)
51 char **argv; {
52 register int i;
53 int outerror(),uid;
54 char localin[FNS], skey[30];
55 char buf[BUFSIZ], suid[10];
56 char sin =0, zopt = 0, wopt = 0, yopt = 0, xopt = 0;
57 char *s,**sargv;
58 long cnt = 0L, maxfile = MAXFILELARGE;
59 FILE *file, *temp, *rfile;
60 struct utmp *putmp;
61 struct stat statbuf;
62 struct header hd;
63
64 debugflg = DBV;
65 hd.hd_scmdact[0] = hd.hd_srespfile[0] = hd.hd_soutfile[0] = 0;
66 hd.hd_sinfile[0] = hd.hd_scmdvirt[0] = hd.hd_sttyname[0] = 0;
67 localin[0] = 0;
68 suid[0] = 0;
69 sargv = argv;
70
71 if(isatty(0)) strcat(hd.hd_sttyname,ttyname(0));
72 else if(isatty(2)) strcat(hd.hd_sttyname,ttyname(2));
73 remote = 0;
74 if (signal(SIGHUP, SIG_IGN) != SIG_IGN)
75 signal(SIGHUP, outerror);
76 if (signal(SIGQUIT, SIG_IGN) != SIG_IGN)
77 signal(SIGQUIT, outerror);
78 if (signal(SIGINT, SIG_IGN) != SIG_IGN)
79 signal(SIGINT, outerror);
80 if (signal(SIGTERM, SIG_IGN) != SIG_IGN)
81 signal(SIGTERM, outerror);
82
83 while(argc > 1 && argv[1][0] == '-'){
84 argc--; argv++;
85 switch(argv[0][1]){
86 case 0:
87 sin++;
88 break;
89 case 'b':
90 status.nonotify++;
91 break;
92 case 'c':
93 harg(hd.hd_scmdvirt);
94 break;
95 case 'f':
96 status.force++;
97 break;
98 case 'i':
99 harg(hd.hd_sinfile);
100 break;
101 case 'l':
102 harg(status.login);
103 break;
104 case 'm':
105 harg(buf);
106 remote = lookup(buf);
107 if(remote == 0){
108 fprintf(stderr,"Unknown machine %s\n",buf);
109 exit(EX_NOHOST);
110 }
111 break;
112 case 'n':
113 status.nowrite++;
114 break;
115 case 'o':
116 harg(hd.hd_soutfile);
117 break;
118 case 'p':
119 harg(status.mpasswd);
120 if(status.mpasswd[0] == 0)
121 strcpy(status.mpasswd,"\n\n");
122 break;
123 case 'q':
124 status.quiet++;
125 break;
126 case 'r':
127 harg(buf);
128 addir(hd.hd_srespfile,buf);
129 break;
130 case 's':
131 harg(localin);
132 break;
133 case 'u':
134 harg(suid);
135 break;
136 case 'w':
137 wopt++;
138 break;
139 case 'x':
140 xopt++;
141 break;
142 case 'y':
143 yopt++;
144 break;
145 case 'z':
146 zopt++;
147 break;
148 default:
149 fprintf(stderr,"Unknown option %s\n",argv[0]);
150 break;
151 }
152 }
153 while(argc > 1){
154 argc--; argv++;
155 strcat(hd.hd_scmdact,argv[0]);
156 strcat(hd.hd_scmdact," ");
157 }
158 sargv[1] = 0; /* so ps won't show passwd ??? */
159 hd.hd_uidfrom = uid = getuid();
160 hd.hd_gidfrom = getgid();
161 hd.hd_code = 'q';
162 if(zopt || wopt || yopt || xopt || suid[0] != 0){
163 /* check z or w or y or x option permission */
164 # ifndef TESTING
165 /* check effective user id ?? */
166 if (uid != SUPERUSER && uid != NUID) {
167 fprintf(stderr, "Error: Not super-user\n");
168 fprintf(stderr,"zopt %d wopt %d yopt %d xopt %d suid[0] %s\n", zopt, wopt, yopt, xopt, suid);
169 fprintf(stderr,"uid %d\n", uid);
170 debugflg = 1;
171 printhd(&hd);
172 outerror(EX_UNAVAILABLE);
173 }
174 # endif
175 hd.hd_code = zopt? 's': 'w';
176 hd.hd_code = yopt? 'y': hd.hd_code;
177 if (status.mpasswd[0] == 0) /* no passwd required */
178 strcpy(status.mpasswd, "\n");
179 debug("zopt %d wopt %d yopt %d xopt %d suid[0] %s\n", zopt, wopt, yopt, xopt, suid);
180 debug("uid %d\n", uid);
181 if(xopt)
182 setuid(SUPERUSER);
183 }
184 #ifdef CRN
185 strcpy( status.jobno, MAGICCRN ); /* default (invalid) crn */
186 #else
187 strcpy( status.jobno, "XYZZ"); /* default (invalid) crn */
188 #endif
189
190 if(hd.hd_code == 'q' && !xopt){
191 /* read passwd file, get status.localname & crn */
192 passwdent();
193 }
194
195 /* sets remote,status.login,status.force,status.mpasswd,
196 status.nonotify, status.nowrite */
197 /* may read passwd file if getenv(HOME) reads it */
198 commandfile();
199 if(status.force)status.login[0] = status.mpasswd[0] = 0;
200
201 /* look up login name and passwd in the environment */
202 envloginpasswd(remote,status.login,status.mpasswd);
203
204
205 if(remote == 0)remote = getremote(local);
206 # ifndef TESTING
207 if(remote == local){
208 fprintf(stderr,"Request sent to local machine - doesn't make sense\n");
209 /* outerror(); */
210 }
211 # endif
212 strcat(status.defcmd," ");
213 if(strlen(hd.hd_scmdact) == 0)strcpy(hd.hd_scmdact,status.defcmd);
214 hd.hd_scmdact[strlen(hd.hd_scmdact)-1] = 0;
215 do {
216 mktemp(dfname); /* make until unique!! */
217 } while(stat(dfname,&statbuf) >= 0);
218 /* determine through machine */
219 i = gothru(local,remote);
220 if(i == 0){
221 s = longname(remote);
222 if(s != 0)fprintf(stderr,"No path to %s machine.\n",s);
223 else fprintf(stderr,"Unknown machine\n");
224 outerror(EX_NOHOST);
225 }
226 dfname[strlen(dfname)-11] = i; /* set directory */
227 dfname[strlen(dfname)-7] = i; /* set file (unused) */
228 /* check to see if data files are directories */
229 if(isdirectory(hd.hd_srespfile) || isdirectory(hd.hd_sinfile) || isdirectory(hd.hd_soutfile)){
230 fprintf(stderr,"%s is a directory, must be a file\n",
231 isdirectory(hd.hd_srespfile) ? hd.hd_srespfile :
232 isdirectory(hd.hd_sinfile) ? hd.hd_sinfile :
233 hd.hd_soutfile);
234 outerror(EX_USAGE);
235 }
236 if(suid[0] != 0)uid = atoi(suid);
237 if(hd.hd_srespfile[0]){
238 if(strcmp(hd.hd_srespfile,"/dev/tty") == 0){
239 fprintf(stderr,"Can't have /dev/tty as response file.\n");
240 outerror(EX_USAGE);
241 }
242 if(stat(hd.hd_srespfile,&statbuf) == -1){
243 strcpy(buf,hd.hd_srespfile);
244 s = &buf[0];
245 s = s + strlen(buf) - 1;
246 while(*s != '/' && s > &(buf[0]))s--;
247 *s = 0;
248 debug("chkdir %s",buf);
249 if(strlen(buf) == 0)strcpy(buf,".");
250 if(access(buf,2) == -1){
251 perror(buf);
252 outerror(EX_USAGE);
253 }
254 if((rfile=fopen(hd.hd_srespfile,"w")) == NULL){
255 perror(hd.hd_srespfile);
256 outerror(EX_USAGE);
257 }
258 chmod(hd.hd_srespfile,0600);
259 fclose(rfile);
260 mchown(hd.hd_srespfile,uid,hd.hd_gidfrom);
261 }
262 else if(access(hd.hd_srespfile,2) == -1){
263 perror(hd.hd_srespfile);
264 outerror(EX_USAGE);
265 }
266 else if(getsize(&statbuf) != 0L){
267 fprintf(stderr,"%s must have 0-length or not exist\n",
268 hd.hd_srespfile);
269 outerror(EX_USAGE);
270 }
271 }
272 /* go ahead and prompt for login name and passwd, if neccessary,
273 as long as the X option has not been specified */
274 if(hd.hd_code == 'q' && !xopt)promptlogin(remote);
275
276 /* at this point, we create the dfa... file */
277 file = fopen(dfname,"w");
278 if(file == NULL){
279 perror(dfname);
280 outerror(EX_OSERR);
281 }
282 chmod(dfname,0600);
283 mchown(dfname,uid,getgid());
284 if(xopt)goto stickit;
285 if(status.mpasswd[0] == '\n')
286 status.mpasswd[0] = 0;
287 if(status.mpasswd[0] == 0 && hd.hd_code == 'q' &&
288 strcmp(status.login,"network") != 0){
289 fprintf(stderr,"Zero-length password not allowed\n");
290 outerror(EX_USAGE);
291 }
292 if(hd.hd_code == 'q' && (streql(status.login,"root") == 0 ||
293 streql(status.login,"ruut") == 0)){
294 fprintf(stderr,"Can't login as root through the network\n");
295 outerror(EX_USAGE);
296 }
297 makeuukey(skey,status.login,remote);
298 nbsencrypt(status.mpasswd,skey,hd.hd_sencpasswd);
299 enmask(status.mpasswd);
300 hd.hd_lttytime = 0;
301 if(hd.hd_sttyname[0] && status.nowrite == 0){
302 putmp = getutmp(hd.hd_sttyname);
303 if(putmp != NULL) hd.hd_lttytime = putmp->ut_time;
304 }
305 /*
306 debug("p:%s:\n",status.mpasswd);
307 */
308 /* write the header info onto 'file' */
309 hd.hd_mchto = remote;
310 hd.hd_mesgid.msg_mch = hd.hd_mchfrom = local;
311 hd.hd_vmajor = VMAJOR;
312 hd.hd_vminor = VMINOR;
313 strcpy(hd.hd_snto,status.login);
314 strcpy(hd.hd_snfrom,status.localname);
315 strcpy(hd.hd_spasswd,status.mpasswd);
316 strcpy(hd.hd_ijobno, status.jobno );
317 hd.hd_mesgid.msg_ltime = hd.hd_ltimesent = gettime();
318 hd.hd_fquiet = status.quiet;
319 hd.hd_fnonotify = status.nonotify;
320 hd.hd_mesgid.msg_pid = getpid();
321 hd.hd_fcompressed = 0;
322 /* handle account pairs, accounts which do not require
323 a passwd if you are logged in on the same one here */
324 hd.hd_facctpair = fisacctpair(&hd);
325
326 writehdfd(&hd,file);
327 printhd(&hd);
328 stickit:
329 if(sin)
330 while((i = fread(buf,1,BUFSIZ,stdin)) > 0){
331 if(fwrite(buf,1,i,file) != i){
332 perror("net queue file");
333 outerror(EX_OSFILE);
334 }
335 if((cnt += i) > maxfile)goto toobig;
336 if(feof(stdin))break;
337 }
338 else if(localin[0]){
339 if(access(localin,4) == -1){
340 perror(localin);
341 outerror(EX_OSFILE);
342 }
343 temp = fopen(localin,"r");
344 if(temp == NULL){
345 perror(localin);
346 outerror(EX_OSFILE);
347 }
348 while((i = fread(buf,1,BUFSIZ,temp)) > 0){
349 if((cnt += i) > maxfile)goto toobig;
350 if(fwrite(buf,1,i,file) != i){
351 perror("net queue file");
352 outerror(EX_OSFILE);
353 }
354 }
355 fclose(temp);
356 }
357 fclose(file);
358 chmod(dfname,0400);
359 dfname[strlen(dfname)-9] = 'c';
360 file = fopen(dfname,"w");
361 chmod(dfname,0400);
362 fclose(file);
363 mchown(dfname,uid,getgid());
364 exit(EX_OK);
365 toobig:
366 fprintf(stderr,"No more than %ld bytes can be sent\n",maxfile);
367 outerror(EX_USAGE); /* no return */
368 }
369 /*
370 called if there is an error, makes sure that the files created
371 are deleted and the terminal is reset to echo
372 */
outerror(ret)373 outerror(ret){
374 register int i;
375 struct sgttyb stt;
376 signal(SIGHUP,SIG_IGN); signal(SIGINT,SIG_IGN);
377 signal(SIGQUIT,SIG_IGN); signal(SIGTERM,SIG_IGN);
378 unlink(dfname);
379 i = strlen(dfname) - 9;
380 dfname[i] = (dfname[i] == 'c' ? 'd' : 'c');
381 unlink(dfname);
382 if(gtty(0,&stt) >= 0){
383 stt.sg_flags |= ECHO;
384 stty(0,&stt);
385 }
386 exit(ret);
387 }
enmask(s)388 enmask(s)
389 register char *s; {
390 while(*s){
391 *s &= 0177; /* strip quote bites */
392 *s++ ^= 040; /* invert upper-lower */
393 }
394 }
addir(s,t)395 addir(s,t)
396 register char *s, *t; {
397 if(t[0] == '/')strcpy(s,t);
398 else {
399 gwd(s);
400 strcat(s,t);
401 }
402 }
403
404 /* returns true if phd is an account pair, false otherwise */
fisacctpair(phd)405 fisacctpair(phd)
406 register struct header *phd;
407 {
408 return(0);
409 }
410
411
412
413 static struct stat x;
414 static struct direct y;
415 static int off = -1;
416
417
418 /* these three routines gwd, cat, ckroot and
419 data structures x, y, off, do a pwd to string name */
420 #ifdef V6
421 static FILE *file;
422
gwd(name)423 gwd(name)
424 register char *name; {
425 *name = 0;
426 for(;;){
427 stat(".",&x);
428 if((file = fopen("..","r")) == NULL)break;
429 do {
430 if(fread(&y,1,sizeof y,file) != sizeof y)break;
431 } while(y.d_ino != x.st_ino);
432 fclose(file);
433 if(y.d_ino == ROOTINO){
434 ckroot(name);
435 break;
436 }
437 if(cat(name))break;
438 chdir("..");
439 }
440 chdir(name);
441 }
ckroot(name)442 ckroot(name)
443 char *name; {
444 register int i;
445 if(stat(y.d_name,&x) < 0)return;
446 i = x.st_dev;
447 if(chdir("/") < 0)return;
448 if((file = fopen("/","r")) == NULL)return;
449 do {
450 if(fread(&y,1,sizeof y,file) != sizeof y)return;
451 if(y.d_ino == 0)continue;
452 if(stat(y.d_name,&x) < 0)return;
453 } while(x.st_dev!=i || (x.st_mode&S_IFMT)!=S_IFDIR);
454 if(strcmp(y.d_name,".") != 0 && strcmp(y.d_name,"..") != 0)
455 if(cat(name))return;
456 i = strlen(name);
457 name[i+1] = 0;
458 while(--i >= 0)name[i + 1] = name[i];
459 name[0] = '/';
460 return;
461 }
462 #else
463 static DIR *file;
464 static struct stat xx;
465
gwd(name)466 gwd(name)
467 register char *name; {
468 int rdev, rino;
469 register int i;
470 register struct direct *dp;
471
472 *name = 0;
473 stat("/", &x);
474 rdev = x.st_dev;
475 rino = x.st_ino;
476 for (;;) {
477 stat(".", &x);
478 if (x.st_ino == rino && x.st_dev == rdev)
479 break;
480 if ((file = opendir("..")) == NULL)
481 break;
482 fstat(file->dd_fd, &xx);
483 chdir("..");
484 if (x.st_dev == xx.st_dev) {
485 if (x.st_ino == xx.st_ino)
486 break;
487 do
488 if ((dp = readdir(file)) == NULL)
489 break;
490 while (dp->d_ino != x.st_ino);
491 }
492 else do {
493 if ((dp = readdir(file)) == NULL)
494 break;
495 stat(dp->d_name, &xx);
496 } while (xx.st_ino != x.st_ino || xx.st_dev != x.st_dev);
497 blkcpy(dp, &y, DIRSIZ(dp));
498 closedir(file);
499 if (cat(name))
500 break;
501 }
502 i = strlen(name);
503 name[i+1] = 0;
504 while (--i >= 0) name[i+1] = name[i];
505 name[0] = '/';
506 }
507 #endif
508
cat(name)509 cat(name)
510 register char *name; { /* return 1 to exit */
511 register int i,j;
512 i = -1;
513 while(y.d_name[++i] != 0);
514 if((off+i+2) > 511)return(1);
515 for(j = off +1; j >= 0; --j)name[j+i+1] = name[j];
516 off = i + off + 1;
517 name[i] = '/';
518 for(--i; i>= 0; --i)name[i] = y.d_name[i];
519 return(0);
520 }
521
522
523 /*
524 this function takes a file name and tells whether it is a
525 directory or on. Returns 1 if so, 0 otherwise.
526 null strings etc. return 0.
527 */
isdirectory(fn)528 isdirectory(fn)
529 char *fn;
530 {
531 int i,ret=0;
532 if(fn == NULL || *fn == 0)return(0);
533 i = strlen(fn);
534 if(i == 1){
535 if(strcmp(fn,".") == 0)ret = 1;
536 if(strcmp(fn,"/") == 0)ret = 1;
537 }
538 else if(i == 2){
539 if(strcmp(fn,"..") == 0)ret = 1;
540 if(strcmp(fn,"/.") == 0)ret = 1;
541 }
542 else {
543 if(strcmp(fn+i-2,"/.") == 0)ret = 1;
544 if(strcmp(fn+i-3,"/..") == 0)ret = 1;
545 }
546 return(ret);
547 }
548
blkcpy(from,to,size)549 blkcpy(from, to, size)
550 register *from, *to;
551 register int size;
552 {
553 while (size-- > 0)
554 *to++ = *from++;
555 }
556