17 prstring(int indent, char *tag, String *s)
22 print("%s %s\n", tag, s_to_c(s));
26 info(int indent, int mno, Message *m)
32 print("%d%c %d ", mno, m->allocated?'*':' ', m->end - m->start);
33 if(m->unixfrom != nil)
34 print("uf %s ", s_to_c(m->unixfrom));
35 if(m->unixdate != nil)
36 print("ud %s ", s_to_c(m->unixdate));
38 prstring(indent, "from:", m->from822);
39 prstring(indent, "sender:", m->sender822);
40 prstring(indent, "to:", m->to822);
41 prstring(indent, "cc:", m->cc822);
42 prstring(indent, "reply-to:", m->replyto822);
43 prstring(indent, "subject:", m->subject822);
44 prstring(indent, "date:", m->date822);
45 prstring(indent, "filename:", m->filename);
46 prstring(indent, "type:", m->type);
47 prstring(indent, "charset:", m->charset);
50 for(nm = m->part; nm != nil; nm = nm->next){
51 info(indent+1, i++, nm);
57 main(int argc, char **argv)
70 root = newmessage(nil);
72 err = readmbox(mboxfile, &root->part);
74 fprint(2, "boom: %s\n", err);