10 #define ARRAY_SIZE(a) (sizeof(a) / sizeof((a)[0]))
11 #define MIN(a, b) ((a) < (b) ? (a) : (b))
12 #define MAXLINE (1 << 7)
13 #define BUFSIZE (1 << 12)
14 #define PAGER "pgmail"
15 #define NHEAD (1 << 4)
19 static char *hdr_filt
[] = {
20 "Subject:", "From:", "To:", "Cc:", "Date:", "User-Agent:",
21 "X-Mailer", "Organization"};
23 static struct mbox
*mbox
;
24 static struct sort
*sort
;
27 static int read_line(char *dst
, int size
)
29 static char buf
[BUFSIZE
];
34 int cur_len
= MIN(len
- cur
, size
- nw
- 1);
35 char *nl
= memchr(buf
+ cur
, '\n', cur_len
);
36 int nr
= nl
? nl
- buf
- cur
+ 1 : cur_len
;
38 memcpy(dst
+ nw
, buf
+ cur
, nr
);
43 if (nl
|| nw
== size
- 1)
46 if ((len
= read(STDIN_FILENO
, buf
, BUFSIZE
)) <= 0)
52 static char *till_eol(char *r
, int len
, char *s
)
55 while (r
< d
&& *s
&& *s
!= '\r' && *s
!= '\n')
60 static char *cut_word(char *dst
, char *s
)
70 static int msg_num(char *num
)
73 if (!*num
|| !strcmp(".", num
))
77 if (!strcmp("$", num
))
79 if (n
< 0 || n
>= mbox
->n
)
85 static void cmd_page(char *args
)
93 args
= cut_word(num
, args
);
94 if (msg_num(num
) == -1)
96 mail
= sort
->mails
[cur
];
97 mail
->stat
|= STAT_READ
;
99 if (!(pid
= fork())) {
100 char *args
[] = {PAGER
, NULL
};
102 dup2(fds
[0], STDIN_FILENO
);
107 hdr_len
= mail_head(mail
, head
, sizeof(head
),
108 hdr_filt
, ARRAY_SIZE(hdr_filt
));
109 write(fds
[1], head
, hdr_len
);
110 write(fds
[1], mail
->body
, mail
->body_len
);
112 waitpid(pid
, NULL
, 0);
115 static char *cut_cmd(char *dst
, char *s
)
117 while (isalpha(*s
)) {
124 static char *put_int(char *s
, int n
, int w
)
127 for (i
= 0; i
< w
; i
++) {
128 s
[w
- i
- 1] = n
|| !i
? '0' + n
% 10 : ' ';
134 static char *put_hdr(struct mail
*mail
, char *name
, int w
, char *s
)
136 char *hdr
= mail_hdr(mail
, name
);
137 return till_eol(s
, w
, hdr
? hdr
+ strlen(name
) + 1 : NULL
);
140 static void cmd_head(char *args
)
145 args
= cut_word(num
, args
);
146 if (msg_num(num
) == -1)
148 beg
= cur
/ NHEAD
* NHEAD
;
149 end
= MIN(beg
+ NHEAD
, mbox
->n
);
150 for (i
= beg
; i
< end
; i
++) {
151 struct mail
*mail
= sort
->mails
[i
];
154 *s
++ = i
== cur
? '>' : ' ';
155 if (mail
->stat
& STAT_READ
)
158 *s
++ = mail
->stat
& STAT_NEW
? 'N' : 'O';
159 s
= put_int(s
, i
, DIGITS
);
162 s
= put_hdr(mail
, "From:", 16, s
);
165 s
= sort_draw(sort
, i
, s
, WIDTH
- (s
- fmt
));
166 s
= put_hdr(mail
, "Subject:", WIDTH
- (s
- fmt
), s
);
168 write(STDOUT_FILENO
, fmt
, s
- fmt
);
172 static void cmd_z(char *args
)
178 page
= MIN(cur
+ NHEAD
, mbox
->n
) / NHEAD
;
179 if (*num
== '+' || *num
== '-') {
180 int d
= (*num
+ 1) ? (*num
== '-' ? -1 : 1) : atoi(num
);
181 page
= cur
/ NHEAD
+ d
;
184 page
= mbox
->n
/ NHEAD
;
187 if (page
>= 0 && page
* NHEAD
< mbox
->n
) {
193 static void print(char *s
)
195 write(STDOUT_FILENO
, s
, strlen(s
));
198 static void cmd_fold(char *args
)
201 char *s
= put_int(msg
, mbox
->n
, DIGITS
);
202 strcpy(s
, " messages\n");
206 static void cmd_inc(char *args
)
212 static void prompt(void)
214 write(STDOUT_FILENO
, "? ", 2);
217 static void loop(void)
222 while (read_line(line
, sizeof(line
)) > 0) {
223 char *args
= cut_cmd(cmd
, line
);
224 int len
= strlen(cmd
);
226 if (cur
+ 1 < mbox
->n
) {
235 if (!strncmp("page", cmd
, len
))
237 if (!strncmp("header", cmd
, len
))
239 if (!strncmp("folder", cmd
, len
))
241 if (!strncmp("inc", cmd
, len
))
243 if (!strncmp("z", cmd
, len
))
245 if (!strncmp("quit", cmd
, len
)) {
249 if (!strncmp("xit", cmd
, len
) || !strncmp("exit", cmd
, len
))
255 int main(int argc
, char *argv
[])
258 char *filename
= NULL
;
260 if (!strcmp("-f", argv
[i
]))
261 filename
= argv
[++i
];
263 mbox
= mbox_alloc(filename
);
264 sort
= sort_alloc(mbox
);