K_COPY,
K_MAIL,
K_PIPE,
- K_EMPTY
+ K_EMPTY,
+ K_FILTER
};
struct tree {
#define CC(a,b) ((a<<8)|b)
void* xmalloc(size_t size);
void* xrealloc(void* buf, size_t size);
-char* xstrdup(char* s);
+char* xstrdup(const char* s);
void __attribute__ ((noreturn)) die(char* msg, ...);
void read_conf(char* filename);
int line;
FILE* conf;
-/* int.c */
-struct hlist {
- struct node car;
- char* name;
- char* value;
-};
-
-struct email {
- struct list* headers;
- char* body;
- int body_len;
-};
-
-struct action {
- char* l;
- char* r;
- char* s;
- struct email e;
-};
-
-/* ham.c */
-char* default_mailbox;
-
-struct list* current_headers;
-struct email* current_body;
-struct list* make_hlist(void);
-void print_headers(struct list* l);
-void do_action(struct action* a);
-struct email* get_body(void);
-
-/* lock.c */
-void save_gids(void);
-void close_mailbox(int fd, char* path, int is_default_mailbox);
-int open_mailbox(char* path, int is_default_mailbox);
-char* cat(char* l, char* r);
-
/* code.c */
#define BUFSIZE 4096
+#define HASHSIZE 103
+#define MAGIC 19
+
struct code {
struct node car;
enum {
OPC_JUMP_IF,
OPC_JUMP_UNLESS,
OPC_DELIVER,
- OPC_CALL_EXT,
OPC_NOP,
OPC_CAT,
OPC_GT,
OPC_DIV,
OPC_PIPE,
OPC_MAIL,
- OPC_STORE,
+ OPC_FILTER,
OPC_DISCARD
} opcode;
struct variable {
struct node car;
char* name;
- int varcode;
+ int varcode;
+ int modified;
};
struct list input_code;
struct list* var_hash;
int current_varcode;
+int max_varcode;
int temp_varcode_start;
char** var_tab;
char** const_tab;
int cur_const_n;
int cur_const_s;
+char* empty;
void init(void);
void compile(struct tree* t, struct list* where);
int find_var(char* name, struct list* hash);
int store_const(char* c);
struct list* new_var_hash(void);
+int get_bucket_number(char* name);
void print_code(void);
+
+/* int.c */
+struct hlist {
+ struct node car;
+ char* name;
+ char* value;
+ int have_var;
+};
+
+struct email {
+ struct list* headers;
+ char* body;
+ char* tmpfile;
+ int fd;
+ int body_len;
+};
+
+void save_current_headers(struct list* hash);
+void print_vars(struct list* hash);
+void interp(struct list* ins, struct list* hash);
+void free_string(char* c);
+void __attribute__ ((noreturn)) bye(int code, char* msg, ...);
+
+/* ham.c */
+char* default_mailbox;
+int chars_written;
+
+struct list* current_headers;
+struct email* current_body;
+struct list* make_hlist(void);
+void print_headers(struct list* l);
+struct email* get_body(void);
+int deliver_local_email(char* folder, struct email* email);
+int write_email_to_fd(int fd, struct email* email);
+char* read_email(struct email* em);
+void open_email(void);
+
+/* lock.c */
+void save_gids(void);
+void close_mailbox(int fd, char* path, int is_default_mailbox);
+int open_mailbox(char* path, int is_default_mailbox);
+char* cat(char* l, char* r);
+
+