10 list_init(&input_code);
11 var_hash = new_var_hash();
12 const_tab = xmalloc(BUFSIZE);
14 cur_const_s = BUFSIZE;
19 main(int argc, char** argv)
25 die("Usage: ./umpf conf_file [default_mailbox]");
28 p = getpwuid(getuid());
30 default_mailbox = cat("/var/mail/", p->pw_name);
32 default_mailbox = argv[2];
43 temp_varcode_start = current_varcode;
44 compile(input_tree, NULL);
46 var_tab = xmalloc((max_varcode + 1) * sizeof(char*));
47 for (i = 0; i <= max_varcode; i++) {
51 current_headers = make_hlist(0);
52 // print_headers(current_headers);
53 current_body = get_body(0);
54 save_current_headers(var_hash);
56 interp(&input_code, var_hash);