mpack_src/mpack-1.6-4/unixpk.c

/* (C) Copyright 1993,1994 by Carnegie Mellon University
 * All Rights Reserved.
 *
 * Permission to use, copy, modify, distribute, and sell this software
 * and its documentation for any purpose is hereby granted without
 * fee, provided that the above copyright notice appear in all copies
 * and that both that copyright notice and this permission notice
 * appear in supporting documentation, and that the name of Carnegie
 * Mellon University not be used in advertising or publicity
 * pertaining to distribution of the software without specific,
 * written prior permission.  Carnegie Mellon University makes no
 * representations about the suitability of this software for any
 * purpose.  It is provided "as is" without express or implied
 * warranty.
 *
 * CARNEGIE MELLON UNIVERSITY DISCLAIMS ALL WARRANTIES WITH REGARD TO
 * THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
 * AND FITNESS, IN NO EVENT SHALL CARNEGIE MELLON UNIVERSITY BE LIABLE
 * FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN
 * AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
 * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
 * SOFTWARE.
 */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <errno.h>
#include <getopt.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <unistd.h>
#include "common.h"
#include "version.h"
#include "xmalloc.h"

#define MAXADDRESS 100

extern int attachment;

void usage(void);
void sendmail(FILE *infile, char **addr, int start);
void inews(FILE *infile);
void os_perror(char *str);
int encode(FILE *infile, FILE *applefile, char *fname, FILE *descfile,
           char *subject, char *headers, long int maxsize,
           char *typeoverride, char *outfname);

int main(int argc, char **argv)
{
    int opt;
    char *fname = 0;
    char *subject = 0;
    char *descfname = 0;
    long maxsize = 0;
    char *outfname = 0;
    char *newsgroups = 0;
    char *ctype = 0;
    char *headers = 0;
    int i;
    char *p;
    char sbuf[1024];
    char fnamebuf[4096];
    int part;
    FILE *infile;
    FILE *descfile = 0;

    if ((p = getenv("SPLITSIZE")) && *p >= '0' && *p <= '9') {
        maxsize = atoi(p);
    }

    while ((opt = getopt(argc, argv, "as:d:m:c:o:n:")) != EOF) {
        switch (opt) {
        case 's':
            subject = optarg;
            break;

        case 'd':
            descfname = optarg;
            break;

        case 'm':
            maxsize = atoi(optarg);
            break;

        case 'c':
            ctype = optarg;
            break;

        case 'o':
            outfname = optarg;
            break;

        case 'n':
            newsgroups = optarg;
            break;

        case 'a':
            attachment = 1;
            break;

        default:
            usage();

        }
    }

    if (ctype) {
        if (!strncasecmp(ctype, "text/", 5)) {
            fprintf(stderr, "This program is not appropriate for encoding textual data\n");
            exit(1);
        }
        if (strncasecmp(ctype, "application/", 12) && strncasecmp(ctype, "audio/", 6) &&
            strncasecmp(ctype, "image/", 6) && strncasecmp(ctype, "video/", 6)) {
            fprintf(stderr, "Content type must be subtype of application, audio, image, or video\n");
            exit(1);
        }
    }

    if (optind == argc) {
        fprintf(stderr, "An input file must be specified\n");
        usage();
    }
    fname = argv[optind++];

    /* Must have exactly one of -o, -n, or destination addrs */
    if (optind == argc) {
        if (outfname && newsgroups) {
            fprintf(stderr, "The -o and -n switches are mutually exclusive.\n");
            usage();
        }
        if (!outfname && !newsgroups) {
            fprintf(stderr, "Either an address or one of the -o or -n switches is required\n");
            usage();
        }
        if (newsgroups) {
            headers = xmalloc(strlen(newsgroups) + 25);
            sprintf(headers, "Newsgroups: %s\n", newsgroups);
        }
    }
    else {
        if (outfname) {
            fprintf(stderr, "The -o switch and addresses are mutually exclusive.\n");
            usage();
        }
        if (newsgroups) {
            fprintf(stderr, "The -n switch and addresses are mutually exclusive.\n");
            usage();
        }
        headers = xmalloc(strlen(argv[optind]) + 25);
        sprintf(headers, "To: %s", argv[optind]);
        for (i = optind+1; i < argc; i++) {
            headers = xrealloc(headers, strlen(headers)+strlen(argv[i]) + 25);
            strcat(headers, ",\n\t");
            strcat(headers, argv[i]);
        }
        strcat(headers, "\n");
    }

    if (!subject) {
        fputs("Subject: ", stdout);
        fflush(stdout);
        if (!fgets(sbuf, sizeof(sbuf), stdin)) {
            fprintf(stderr, "A subject is required\n");
            usage();
        }
        if ((p = strchr(sbuf, '\n'))) *p = '\0';
        subject = sbuf;
    }   

    if (!outfname) {
        if (getenv("TMPDIR")) {
            strcpy(fnamebuf, getenv("TMPDIR"));
        }
        else {
            strcpy(fnamebuf, "/var/tmp");
        }
        strcat(fnamebuf, "/mpackXXXXXX");
        mktemp(fnamebuf);
        outfname = strsave(fnamebuf);
    }

    infile = fopen(fname, "r");
    if (!infile) {
        os_perror(fname);
        exit(1);
    }

    if (descfname) {
        descfile = fopen(descfname, "r");
        if (!descfile) {
            os_perror(descfname);
            exit(1);
        }
    }

    if (encode(infile, (FILE *)0, fname, descfile, subject, headers,
               maxsize, ctype, outfname)) exit(1);

    if (optind < argc || newsgroups) {
        for (part = 0;;part++) {
            sprintf(fnamebuf, "%s.%02d", outfname, part);
            infile = fopen(part ? fnamebuf : outfname, "r");
            if (!infile) {
                if (part) break;
                continue;
            }
            if (newsgroups) {
                inews(infile);
            }
            else {
                sendmail(infile, argv, optind);
            }
            fclose(infile);
            remove(part ? fnamebuf : outfname);
        }
    }

    exit(0);
}

void usage(void)
{
    fprintf(stderr, "mpack version %s\n", MPACK_VERSION);
    fprintf(stderr, 
"usage: mpack [-s subj] [-d file] [-m maxsize] [-c content-type] file address...\n");
    fprintf(stderr, 
"       mpack [-s subj] [-d file] [-m maxsize] [-c content-type] -o file file\n");
    fprintf(stderr, 
"       mpack [-s subj] [-d file] [-m maxsize] [-c content-type] -n groups file\n");
    exit(1);
}

void sendmail(FILE *infile, char **addr, int start)
{
    int status;
    int pid;

    if (start < 2) abort();

#ifdef SCO
    addr[--start] = "execmail";
#else
    addr[--start] = "-oi";
    addr[--start] = "sendmail";
#endif

    do {
        pid = fork();
    } while (pid == -1 && errno == EAGAIN);
    
    if (pid == -1) {
        perror("fork");
        return;
    }
    if (pid != 0) {
        while (pid != wait(&status));
        return;
    }

    dup2(fileno(infile), 0);
    fclose(infile);
#ifdef SCO
    execv("/usr/lib/mail/execmail", addr+start);
#else
    execv("/usr/lib/sendmail", addr+start);
    execv("/usr/sbin/sendmail", addr+start);
#endif
    perror("execv");
    _exit(1);
}

void inews(FILE *infile)
{
    int status;
    int pid;

    do {
        pid = fork();
    } while (pid == -1 && errno == EAGAIN);
    
    if (pid == -1) {
        perror("fork");
        return;
    }
    if (pid != 0) {
        while (pid != wait(&status));
        return;
    }

    dup2(fileno(infile), 0);
    fclose(infile);
    execlp("inews", "inews", "-h", "-S", (char *)0);
    execl("/usr/local/news/inews", "inews", "-h", "-S", (char *)0);
    execl("/usr/local/lib/news/inews", "inews", "-h", "-S", (char *)0);
    execl("/etc/inews", "inews", "-h", "-S", (char *)0);
    execl("/usr/etc/inews", "inews", "-h", "-S", (char *)0);
    execl("/usr/news/inews", "inews", "-h", "-S", (char *)0);
    execl("/usr/news/bin/inews", "inews", "-h", "-S", (char *)0);
    perror("execl");
    _exit(1);
}

void warn(void)
{
    abort();
}
1	/* (C) Copyright 1993,1994 by Carnegie Mellon University
2	* All Rights Reserved.
3	*
4	* Permission to use, copy, modify, distribute, and sell this software
5	* and its documentation for any purpose is hereby granted without
6	* fee, provided that the above copyright notice appear in all copies
7	* and that both that copyright notice and this permission notice
8	* appear in supporting documentation, and that the name of Carnegie
9	* Mellon University not be used in advertising or publicity
10	* pertaining to distribution of the software without specific,
11	* written prior permission. Carnegie Mellon University makes no
12	* representations about the suitability of this software for any
13	* purpose. It is provided "as is" without express or implied
14	* warranty.
15	*
16	* CARNEGIE MELLON UNIVERSITY DISCLAIMS ALL WARRANTIES WITH REGARD TO
17	* THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
18	* AND FITNESS, IN NO EVENT SHALL CARNEGIE MELLON UNIVERSITY BE LIABLE
19	* FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
20	* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN
21	* AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
22	* OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
23	* SOFTWARE.
24	*/
25	#include <stdio.h>
26	#include <stdlib.h>
27	#include <string.h>
28	#include <errno.h>
29	#include <getopt.h>
30	#include <sys/types.h>
31	#include <sys/wait.h>
32	#include <unistd.h>
33	#include "common.h"
34	#include "version.h"
35	#include "xmalloc.h"
36
37	#define MAXADDRESS 100
38
39	extern int attachment;
40
41	void usage(void);
42	void sendmail(FILE infile, char *addr, int start);
43	void inews(FILE *infile);
44	void os_perror(char *str);
45	int encode(FILE infile, FILE applefile, char fname, FILE descfile,
46	char subject, char headers, long int maxsize,
47	char typeoverride, char outfname);
48
49	int main(int argc, char **argv)
50	{
51	int opt;
52	char *fname = 0;
53	char *subject = 0;
54	char *descfname = 0;
55	long maxsize = 0;
56	char *outfname = 0;
57	char *newsgroups = 0;
58	char *ctype = 0;
59	char *headers = 0;
60	int i;
61	char *p;
62	char sbuf[1024];
63	char fnamebuf[4096];
64	int part;
65	FILE *infile;
66	FILE *descfile = 0;
67
68	if ((p = getenv("SPLITSIZE")) && p >= '0' && p <= '9') {
69	maxsize = atoi(p);
70	}
71
72	while ((opt = getopt(argc, argv, "as:d:m:c:o:n:")) != EOF) {
73	switch (opt) {
74	case 's':
75	subject = optarg;
76	break;
77
78	case 'd':
79	descfname = optarg;
80	break;
81
82	case 'm':
83	maxsize = atoi(optarg);
84	break;
85
86	case 'c':
87	ctype = optarg;
88	break;
89
90	case 'o':
91	outfname = optarg;
92	break;
93
94	case 'n':
95	newsgroups = optarg;
96	break;
97
98	case 'a':
99	attachment = 1;
100	break;
101
102	default:
103	usage();
104
105	}
106	}
107
108	if (ctype) {
109	if (!strncasecmp(ctype, "text/", 5)) {
110	fprintf(stderr, "This program is not appropriate for encoding textual data\n");
111	exit(1);
112	}
113	if (strncasecmp(ctype, "application/", 12) && strncasecmp(ctype, "audio/", 6) &&
114	strncasecmp(ctype, "image/", 6) && strncasecmp(ctype, "video/", 6)) {
115	fprintf(stderr, "Content type must be subtype of application, audio, image, or video\n");
116	exit(1);
117	}
118	}
119
120	if (optind == argc) {
121	fprintf(stderr, "An input file must be specified\n");
122	usage();
123	}
124	fname = argv[optind++];
125
126	/* Must have exactly one of -o, -n, or destination addrs */
127	if (optind == argc) {
128	if (outfname && newsgroups) {
129	fprintf(stderr, "The -o and -n switches are mutually exclusive.\n");
130	usage();
131	}
132	if (!outfname && !newsgroups) {
133	fprintf(stderr, "Either an address or one of the -o or -n switches is required\n");
134	usage();
135	}
136	if (newsgroups) {
137	headers = xmalloc(strlen(newsgroups) + 25);
138	sprintf(headers, "Newsgroups: %s\n", newsgroups);
139	}
140	}
141	else {
142	if (outfname) {
143	fprintf(stderr, "The -o switch and addresses are mutually exclusive.\n");
144	usage();
145	}
146	if (newsgroups) {
147	fprintf(stderr, "The -n switch and addresses are mutually exclusive.\n");
148	usage();
149	}
150	headers = xmalloc(strlen(argv[optind]) + 25);
151	sprintf(headers, "To: %s", argv[optind]);
152	for (i = optind+1; i < argc; i++) {
153	headers = xrealloc(headers, strlen(headers)+strlen(argv[i]) + 25);
154	strcat(headers, ",\n\t");
155	strcat(headers, argv[i]);
156	}
157	strcat(headers, "\n");
158	}
159
160	if (!subject) {
161	fputs("Subject: ", stdout);
162	fflush(stdout);
163	if (!fgets(sbuf, sizeof(sbuf), stdin)) {
164	fprintf(stderr, "A subject is required\n");
165	usage();
166	}
167	if ((p = strchr(sbuf, '\n'))) *p = '\0';
168	subject = sbuf;
169	}
170
171	if (!outfname) {
172	if (getenv("TMPDIR")) {
173	strcpy(fnamebuf, getenv("TMPDIR"));
174	}
175	else {
176	strcpy(fnamebuf, "/var/tmp");
177	}
178	strcat(fnamebuf, "/mpackXXXXXX");
179	mktemp(fnamebuf);
180	outfname = strsave(fnamebuf);
181	}
182
183	infile = fopen(fname, "r");
184	if (!infile) {
185	os_perror(fname);
186	exit(1);
187	}
188
189	if (descfname) {
190	descfile = fopen(descfname, "r");
191	if (!descfile) {
192	os_perror(descfname);
193	exit(1);
194	}
195	}
196
197	if (encode(infile, (FILE *)0, fname, descfile, subject, headers,
198	maxsize, ctype, outfname)) exit(1);
199
200	if (optind < argc \|\| newsgroups) {
201	for (part = 0;;part++) {
202	sprintf(fnamebuf, "%s.%02d", outfname, part);
203	infile = fopen(part ? fnamebuf : outfname, "r");
204	if (!infile) {
205	if (part) break;
206	continue;
207	}
208	if (newsgroups) {
209	inews(infile);
210	}
211	else {
212	sendmail(infile, argv, optind);
213	}
214	fclose(infile);
215	remove(part ? fnamebuf : outfname);
216	}
217	}
218
219	exit(0);
220	}
221
222	void usage(void)
223	{
224	fprintf(stderr, "mpack version %s\n", MPACK_VERSION);
225	fprintf(stderr,
226	"usage: mpack [-s subj] [-d file] [-m maxsize] [-c content-type] file address...\n");
227	fprintf(stderr,
228	" mpack [-s subj] [-d file] [-m maxsize] [-c content-type] -o file file\n");
229	fprintf(stderr,
230	" mpack [-s subj] [-d file] [-m maxsize] [-c content-type] -n groups file\n");
231	exit(1);
232	}
233
234	void sendmail(FILE infile, char *addr, int start)
235	{
236	int status;
237	int pid;
238
239	if (start < 2) abort();
240
241	#ifdef SCO
242	addr[--start] = "execmail";
243	#else
244	addr[--start] = "-oi";
245	addr[--start] = "sendmail";
246	#endif
247
248	do {
249	pid = fork();
250	} while (pid == -1 && errno == EAGAIN);
251
252	if (pid == -1) {
253	perror("fork");
254	return;
255	}
256	if (pid != 0) {
257	while (pid != wait(&status));
258	return;
259	}
260
261	dup2(fileno(infile), 0);
262	fclose(infile);
263	#ifdef SCO
264	execv("/usr/lib/mail/execmail", addr+start);
265	#else
266	execv("/usr/lib/sendmail", addr+start);
267	execv("/usr/sbin/sendmail", addr+start);
268	#endif
269	perror("execv");
270	_exit(1);
271	}
272
273	void inews(FILE *infile)
274	{
275	int status;
276	int pid;
277
278	do {
279	pid = fork();
280	} while (pid == -1 && errno == EAGAIN);
281
282	if (pid == -1) {
283	perror("fork");
284	return;
285	}
286	if (pid != 0) {
287	while (pid != wait(&status));
288	return;
289	}
290
291	dup2(fileno(infile), 0);
292	fclose(infile);
293	execlp("inews", "inews", "-h", "-S", (char *)0);
294	execl("/usr/local/news/inews", "inews", "-h", "-S", (char *)0);
295	execl("/usr/local/lib/news/inews", "inews", "-h", "-S", (char *)0);
296	execl("/etc/inews", "inews", "-h", "-S", (char *)0);
297	execl("/usr/etc/inews", "inews", "-h", "-S", (char *)0);
298	execl("/usr/news/inews", "inews", "-h", "-S", (char *)0);
299	execl("/usr/news/bin/inews", "inews", "-h", "-S", (char *)0);
300	perror("execl");
301	_exit(1);
302	}
303
304	void warn(void)
305	{
306	abort();
307	}