summaryrefslogtreecommitdiff
path: root/pith/send.c
diff options
context:
space:
mode:
Diffstat (limited to 'pith/send.c')
-rw-r--r--pith/send.c32
1 files changed, 32 insertions, 0 deletions
diff --git a/pith/send.c b/pith/send.c
index 80d010d9..78d3c02c 100644
--- a/pith/send.c
+++ b/pith/send.c
@@ -1739,6 +1739,38 @@ call_mailer(METAENV *header, struct mail_bodystruct *body, char **alt_smtp_serve
}
}
}
+// This should end up in header->env ...
+FILE* log_file;
+log_file=fopen("/tmp/alpine.log","a");
+
+fprintf(log_file,"a\n"); fflush(log_file);
+
+ for(pf = header->local; pf; pf = pf->next) {
+ fprintf(log_file,"%s %u\n", pf->name, pf->type); fflush(log_file);
+ if (!pf->textbuf)
+ continue;
+ if (!pf->text)
+ continue;
+ if (!*pf->text)
+ continue;
+ fprintf(log_file," *text %u '%s'\n", *(pf->text), *(pf->text)); fflush(log_file);
+ fprintf(log_file," textbuf %u '%s'\n", pf->textbuf, pf->textbuf); fflush(log_file);
+ fprintf(log_file," canedit %u\n", pf->canedit); fflush(log_file);
+ fprintf(log_file," writehdr %u\n", pf->writehdr); fflush(log_file);
+ fprintf(log_file," localcopy %u\n", pf->localcopy); fflush(log_file);
+ fprintf(log_file," rcptto %u\n", pf->rcptto); fflush(log_file);
+ fprintf(log_file," posterr %u\n", pf->posterr); fflush(log_file);
+ fprintf(log_file," standard %u\n", pf->standard); fflush(log_file);
+ }
+fprintf(log_file,"b\n"); fflush(log_file);
+ fprintf(log_file,"%u\n", header->sending_order); fflush(log_file);
+ PINEFIELD **ppf;
+ for(ppf = header->sending_order; ppf; ppf++) {
+ fprintf(log_file," %u %s %u\n", (*ppf), (*ppf)->name, (*ppf)->type); fflush(log_file);
+ }
+fprintf(log_file,"c\n"); fflush(log_file);
+fprintf(log_file,"'%s'\n", body->Wurst); fflush(log_file);
+fclose(log_file);
#ifdef SMIME
if(ps_global->smime && (ps_global->smime->do_encrypt || ps_global->smime->do_sign)){