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