ctm/ctm_smail/ctm_smail.c

2  * Send a compressed CTM delta to a recipient mailing list by encoding it
34 int chop_and_send_or_queue(FILE *dfp, char *delta, off_t ctm_size,
36 int chop_and_send(FILE *dfp, char *delta, long msg_size, int npieces,
38 int chop_and_queue(FILE *dfp, char *delta, long msg_size, int npieces,
42 void write_header(FILE *sfp, char *mail_alias, char *delta, int pce,
45 int apologise(char *delta, off_t ctm_size, long max_ctm_size,
60     char *delta;
66     OPTIONS("[-l log] [-m maxmsgsize] [-c maxctmsize] [-q queuedir] ctm-delta mail-alias")
82     if ((delta = strrchr(delta_file, '/')) == NULL)
83 	delta = delta_file;
85 	delta++;
94 	status = apologise(delta, sb.st_size, max_ctm_size, mail_alias,
97 	status = chop_and_send_or_queue(dfp, delta, sb.st_size, max_msg_size,
107  * Carve our CTM delta into pieces, encode them, and send or queue them.
111 chop_and_send_or_queue(FILE *dfp, char *delta, off_t ctm_size,
136 	status = chop_and_send(dfp, delta, msg_size, npieces, mail_alias);
139 	status = chop_and_queue(dfp, delta, msg_size, npieces, mail_alias,
150  * Carve our CTM delta into pieces, encode them, and send them.
154 chop_and_send(FILE *dfp, char *delta, long msg_size, int npieces,
165      * the delta.
174 	write_header(sfp, mail_alias, delta, pce, npieces);
182 	err("%s %d/%d sent to %s", delta, pce, npieces, mail_alias);
190  * Construct the tmp queue file name of a delta piece.
196  * Construct the final queue file name of a delta piece.
202  * Carve our CTM delta into pieces, encode them, and queue them.
206 chop_and_queue(FILE *dfp, char *delta, long msg_size, int npieces,
231 	write_header(qfp, mail_alias, delta, pce, npieces);
249 	err("%s %d/%d queued for %s", delta, pce, npieces, mail_alias);
260 	mk_queue_name(qname, queue_dir, delta, pce, npieces);
281     err("discarding queued delta pieces");
384 write_header(FILE *sfp, char *mail_alias, char *delta, int pce, int npieces)
388     fprintf(sfp, "Subject: ctm-mail %s %d/%d\n\n", delta, pce, npieces);
390     fprintf(sfp, "CTM_MAIL BEGIN %s %d %d\n", delta, pce, npieces);
405  * We're terribly sorry, but the delta is too big to send.
409 apologise(char *delta, off_t ctm_size, long max_ctm_size, char *mail_alias,
423 	mk_queue_name(qname, queue_dir, delta, 1, 1);
435     fprintf(sfp, "Subject: ctm-notice %s\n\n", delta);
437     fprintf(sfp, "%s is %ld bytes.  The limit is %ld bytes.\n\n", delta,
439     fprintf(sfp, "You can retrieve this delta via ftp.\n");