xref: /plan9/sys/src/cmd/upas/misc/unix/mail.c (revision a8482e058adfb9039bb8aaa40ea4270fc64ff0a4) 
1 /*
2  * #!/bin/sh
3  * case $1 in
4  * -n)
5  * 	exit 0 ;;
6  * -m*|-f*|-r*|-p*|-e*|"")
7  * 	exec /usr/lib/upas/edmail $*
8  * 	exit $? ;;
9  * *)
10  * 	exec /usr/lib/upas/send $*
11  * 	exit $? ;;
12  * esac
13  */
14 
15 
16 extern *UPASROOT;
17 
18 #define	EDMAIL	"edmail"
19 #define	SEND	"send"
20 
main(argc,argv)21 main (argc, argv)
22 	int argc;
23 	char **argv;
24 {
25 	char *progname = SEND;
26 	char realprog[500];
27 
28 	if (argc > 1) {
29 		if (argv[1][0] == '-') {
30 			switch (argv[1][1]) {
31 			case 'n':
32 				exit (0);
33 
34 			case 'm':
35 			case 'f':
36 			case 'r':
37 			case 'p':
38 			case 'e':
39 			case '\0':
40 				progname = EDMAIL;
41 			}
42 		}
43 	} else
44 		progname = EDMAIL;
45 
46 	sprint(realprog, "%s/%s", UPASROOT, progname);
47 	execv (realprog, argv);
48 	perror (realprog);
49 	exit (1);
50 }
51 
52