static void extract_section(struct rfc2045 *top_rfcp, const char *mimesection,
const char *extract_filename, int argc, char **argv,
void (*extract_func)(struct rfc2045 *, const char *,
int, char **))
{
if (mimesection)
{
top_rfcp=rfc2045_find(top_rfcp, mimesection);
if (!mimesection)
notfound(mimesection);
if (top_rfcp->firstpart)
{
fprintf(stderr, "reformime: MIME section %s is a compound section.\n", mimesection);
exit(1);
}
(*extract_func)(top_rfcp, extract_filename, argc, argv);
return;
}
/* Recursive */
if (top_rfcp->firstpart)
{
for (top_rfcp=top_rfcp->firstpart; top_rfcp;
top_rfcp=top_rfcp->next)
extract_section(top_rfcp, mimesection,
extract_filename, argc, argv, extract_func);
return;
}
if (!top_rfcp->isdummy)
(*extract_func)(top_rfcp, extract_filename, argc, argv);
}
void print_decode(struct rfc2045 *p, const char *mimesection)
{
struct rfc2045 *s;
if (!mimesection)
usage();
s=rfc2045_find(p, mimesection);
if (!s)
notfound(mimesection);
do_print_section(s, stdout);
}
void print_info(struct rfc2045 *p, const char *mimesection)
{
struct rfc2045 *s;
if (mimesection)
{
s=rfc2045_find(p, mimesection);
if (!s)
notfound(mimesection);
printf("section: %s\n", mimesection);
do_print_info(s);
return;
}
rfc2045_decode(p, &do_print_info_multiple, 0);
}
char *newmsg_newdraft(const char *folder, const char *pos,
const char *forwardsep, const char *replysalut)
{
char *filename=0;
char *replymode;
size_t pos_n;
FILE *fp;
const char *mimeidptr;
char *draftfilename;
struct rfc2045 *rfc2045p, *rfc2045partp;
int x;
if (*cgi(replymode="reply") ||
*cgi(replymode="replyall") ||
*cgi(replymode="replylist") ||
*cgi(replymode="forward") ||
*cgi(replymode="forwardatt"))
{
pos_n=atol(pos);
filename=get_msgfilename(folder, &pos_n);
}
if (!filename) return (0);
fp=0;
x=maildir_semisafeopen(filename, O_RDONLY, 0);
if (x >= 0)
if ((fp=fdopen(x, "r")) == 0)
close(x);
if (fp == 0)
{
free(filename);
return (0);
}
rfc2045p=rfc2045_fromfp(fp);
if (!rfc2045p)
{
fclose(fp);
enomem();
}
mimeidptr=cgi("mimeid");
rfc2045partp=0;
if (*mimeidptr)
{
rfc2045partp=rfc2045_find(rfc2045p, mimeidptr);
if (rfc2045partp)
{
const char *content_type, *dummy;
rfc2045_mimeinfo(rfc2045partp, &content_type,
&dummy, &dummy);
if (!content_type || strcmp(content_type, "message/rfc822"))
rfc2045partp=0;
else
rfc2045partp=rfc2045partp->firstpart;
}
}
if (!rfc2045partp)
rfc2045partp=rfc2045p;
draftfd=maildir_createmsg(DRAFTS, 0, &draftfilename);
if (draftfd < 0)
{
fclose(fp);
rfc2045_free(rfc2045p);
enomem();
}
maildir_writemsgstr(draftfd, "From: ");
{
const char *f=pref_from;
if (!f || !*f) f=login_fromhdr();
if (!f) f="";
maildir_writemsgstr(draftfd, f);
maildir_writemsgstr(draftfd, "\n");
}
{
char *ml=getmailinglists();
struct rfc2045_mkreplyinfo ri;
int rc;
memset(&ri, 0, sizeof(ri));
ri.fd=fileno(fp);
ri.rfc2045partp=rfc2045partp;
ri.replymode=replymode;
ri.replysalut=replysalut;
ri.forwardsep=forwardsep;
ri.myaddr_func=ismyaddr;
ri.write_func=writefunc;
ri.writesig_func=newmsg_writesig;
ri.mailinglists=ml;
ri.charset=sqwebmail_content_charset;
if (strcmp(replymode, "forward") == 0
|| strcmp(replymode, "forwardatt") == 0)
{
#if HAVE_SQWEBMAIL_UNICODE
rc=rfc2045_makereply_unicode(&ri);
#else
rc=rfc2045_makereply(&ri);
#endif
}
else
{
char *basename=maildir_basename(filename);
maildir_writemsgstr(draftfd, "X-Reply-To-Folder: ");
maildir_writemsgstr(draftfd, folder);
maildir_writemsgstr(draftfd, "\nX-Reply-To-Msg: ");
maildir_writemsgstr(draftfd, basename);
free(basename);
maildir_writemsgstr(draftfd, "\n");
#if HAVE_SQWEBMAIL_UNICODE
rc=rfc2045_makereply_unicode(&ri);
#else
rc=rfc2045_makereply(&ri);
#endif
}
free(ml);
if (rc)
{
fclose(fp);
close(draftfd);
rfc2045_free(rfc2045p);
enomem();
}
}
fclose(fp);
if (maildir_closemsg(draftfd, DRAFTS, draftfilename, 1, 0))
{
free(draftfilename);
draftfilename=0;
cgi_put("error", "quota");
}
free(filename);
rfc2045_free(rfc2045p);
return(draftfilename);
}
