print.c
2.78 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
/* GNU Mailutils -- a suite of utilities for electronic mail
Copyright (C) 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
GNU Mailutils is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.
GNU Mailutils is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with GNU Mailutils; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
#include "mail.h"
/*
* p[rint] [msglist]
* t[ype] [msglist]
* P[rint] [msglist]
* T[ype] [msglist]
*/
int
mail_print (int argc, char **argv)
{
if (argc > 1)
return util_msglist_command (mail_print, argc, argv, 1);
else
{
message_t mesg;
header_t hdr;
body_t body;
stream_t stream;
char buffer[512];
off_t off = 0;
size_t n = 0, lines = 0;
FILE *out = ofile;
attribute_t attr;
int pagelines = util_get_crt ();
if (util_get_message (mbox, cursor, &mesg, MSG_NODELETED))
return 1;
message_lines (mesg, &lines);
/* If it is POP or IMAP the lines number is not known, so try
to be smart about it. */
if (lines == 0)
{
if (pagelines)
{
size_t col = (size_t)util_getcols ();
if (col)
{
size_t size = 0;
message_size (mesg, &size);
lines = size / col;
}
}
}
if (pagelines && lines > pagelines)
out = popen (getenv ("PAGER"), "w");
if (islower (argv[0][0]))
{
size_t i, num = 0;
char buf[512];
message_get_header (mesg, &hdr);
header_get_field_count (hdr, &num);
for (i = 1; i <= num; i++)
{
header_get_field_name (hdr, i, buf, sizeof buf, NULL);
if (mail_header_is_visible (buf))
{
fprintf (out, "%s: ", buf);
header_get_field_value (hdr, i, buf, sizeof buf, NULL);
fprintf (out, "%s\n", buf);
}
}
fprintf (out, "\n");
message_get_body (mesg, &body);
body_get_stream (body, &stream);
}
else
message_get_stream (mesg, &stream);
while (stream_read (stream, buffer, sizeof buffer - 1, off, &n) == 0
&& n != 0)
{
if (ml_got_interrupt())
{
util_error (_("\nInterrupt"));
break;
}
buffer[n] = '\0';
fprintf (out, "%s", buffer);
off += n;
}
if (out != ofile)
pclose (out);
message_get_attribute (mesg, &attr);
attribute_set_read (attr);
return 0;
}
return 1;
}