[unix-history] / .ref-BSD-2 / src / Mail / main.c

/* Copyright (c) 1979 Regents of the University of California */
#

#include "rcv.h"
#include <sys/stat.h>

/*
 * Mail -- a mail program
 *
 * Startup -- interface with user.
 */

/*
 * Find out who the user is, copy his mail file (if exists) into
 * /tmp/Rxxxxx and set up the message pointers.  Then, print out the
 * message headers and read user commands.
 */

main(argc, argv)
	char **argv;
{
	register char *ef;
	register int i;
	FILE *ibuf;
	extern char tempMesg[], _sobuf[];

	argv[argc] = (char *) -1;
	mypid = getpid();
	intty = isatty(0);
	outtty = isatty(1);
	setbuf(stdout, _sobuf);
	tinit();
	ef = NOSTR;
	for (i = 1; i < argc; i++) {
		if (equal(argv[i], "-f")) {
			ef = argv[i+1];
			break;
		}
		if (equal(argv[i], "-n")) {
			demail();
			exit(0);
		}
	}
	if (ef == NOSTR && argc > 1) {
		commands();
		i = 1;
		if (equal(argv[1], "-i")) {
			assign("ignore", "");
			i++;
		}
		mail(&argv[i]);

		/*
		 * why wait?
		 */

		exit(0);
	}
	rcvmode++;
	if (ef != NOSTR) {
		edit++;
		if (ef == (char *) -1)
			ef = mbox;
		editfile = mailname = ef;
		if ((ibuf = fopen(mailname, "r")) == NULL) {
			perror(mailname);
			exit(1);
		}
		if ((i = open(mailname, 1)) < 0)
			printf("Warning: \"%s\" not writable.\n", mailname);
		else
			close(i);
	}
	else {
		if ((ibuf = fopen(mailname, "r")) == NULL) {
			printf("No mail.\n");
			exit(0);
		}
	}

	/*
	 * Copy the mudder into /tmp
	 * and set pointers.
	 * Announce the presence of this funny file.
	 */

	mailsize = fsize(ibuf);
	if ((otf = fopen(tempMesg, "w")) == NULL) {
		perror(tempMesg);
		exit(1);
	}
	if ((itf = fopen(tempMesg, "r")) == NULL) {
		perror(tempMesg);
		exit(1);
	}
	unlink(tempMesg);
	setptr(ibuf);
	fclose(ibuf);

	/*
	 * print headings and accept user commands. */

	if (msgCount == 0) {
		printf("No messages.\n");
		exit(1);
	}
	commands();
	if (!edit)
		quit();
	exit(0);
}
Commit	Line	Data
0f5e4452 KS	1	/* Copyright (c) 1979 Regents of the University of California */
	2	#
	3
	4	#include "rcv.h"
	5	#include <sys/stat.h>
	6
	7	/*
	8	* Mail -- a mail program
	9	*
	10	* Startup -- interface with user.
	11	*/
	12
	13	/*
	14	* Find out who the user is, copy his mail file (if exists) into
	15	* /tmp/Rxxxxx and set up the message pointers. Then, print out the
	16	* message headers and read user commands.
	17	*/
	18
	19	main(argc, argv)
	20	char **argv;
	21	{
	22	register char *ef;
	23	register int i;
	24	FILE *ibuf;
	25	extern char tempMesg[], _sobuf[];
	26
	27	argv[argc] = (char *) -1;
	28	mypid = getpid();
	29	intty = isatty(0);
	30	outtty = isatty(1);
	31	setbuf(stdout, _sobuf);
	32	tinit();
	33	ef = NOSTR;
	34	for (i = 1; i < argc; i++) {
	35	if (equal(argv[i], "-f")) {
	36	ef = argv[i+1];
	37	break;
	38	}
	39	if (equal(argv[i], "-n")) {
	40	demail();
	41	exit(0);
	42	}
	43	}
	44	if (ef == NOSTR && argc > 1) {
	45	commands();
	46	i = 1;
	47	if (equal(argv[1], "-i")) {
	48	assign("ignore", "");
	49	i++;
	50	}
	51	mail(&argv[i]);
	52
	53	/*
	54	* why wait?
	55	*/
	56
	57	exit(0);
	58	}
	59	rcvmode++;
	60	if (ef != NOSTR) {
	61	edit++;
	62	if (ef == (char *) -1)
	63	ef = mbox;
	64	editfile = mailname = ef;
65	if ((ibuf = fopen(mailname, "r")) == NULL) {
66	perror(mailname);
67	exit(1);
68	}
69	if ((i = open(mailname, 1)) < 0)
70	printf("Warning: \"%s\" not writable.\n", mailname);
71	else
72	close(i);
73	}
74	else {
75	if ((ibuf = fopen(mailname, "r")) == NULL) {
76	printf("No mail.\n");
77	exit(0);
78	}
79	}
80
81	/*
82	* Copy the mudder into /tmp
83	* and set pointers.
84	* Announce the presence of this funny file.
85	*/
86
87	mailsize = fsize(ibuf);
88	if ((otf = fopen(tempMesg, "w")) == NULL) {
89	perror(tempMesg);
90	exit(1);
91	}
92	if ((itf = fopen(tempMesg, "r")) == NULL) {
93	perror(tempMesg);
94	exit(1);
95	}
96	unlink(tempMesg);
97	setptr(ibuf);
98	fclose(ibuf);
99
100	/*
101	* print headings and accept user commands. */
102
103	if (msgCount == 0) {
104	printf("No messages.\n");
105	exit(1);
106	}
107	commands();
108	if (!edit)
109	quit();
110	exit(0);
111	}