78cd27b3 |
1 | <?php |
2 | /******************************************************************************** |
3 | * include/posts.inc.php : class for posts |
4 | * ----------------------- |
5 | * |
6 | * This file is part of the banana distribution |
7 | * Copyright: See COPYING files that comes with this distribution |
8 | ********************************************************************************/ |
9 | |
10 | /** class for posts |
11 | */ |
12 | |
13 | class BananaPost |
14 | { |
15 | var $id; |
16 | /** headers */ |
17 | var $headers; |
18 | /** body */ |
19 | var $body; |
1f75b135 |
20 | /** formating */ |
21 | var $messages; |
7a0e2710 |
22 | /** attachment */ |
23 | var $pj; |
78cd27b3 |
24 | /** poster name */ |
25 | var $name; |
856dc84a |
26 | /** test validity */ |
27 | var $valid = true; |
78cd27b3 |
28 | |
29 | /** constructor |
30 | * @param $_id STRING MSGNUM or MSGID (a group should be selected in this case) |
31 | */ |
32 | function BananaPost($_id) |
33 | { |
34 | global $banana; |
1f75b135 |
35 | $this->id = $_id; |
36 | $this->pj = array(); |
37 | $this->messages = array(); |
50cd076e |
38 | if (!$this->_header()) { |
856dc84a |
39 | $this->valid = false; |
50cd076e |
40 | return null; |
41 | } |
42 | |
78cd27b3 |
43 | |
44 | if ($body = $banana->nntp->body($_id)) { |
45 | $this->body = join("\n", $body); |
46 | } else { |
856dc84a |
47 | $this->valid = false; |
50cd076e |
48 | return null; |
78cd27b3 |
49 | } |
50 | |
51 | if (isset($this->headers['content-transfer-encoding'])) { |
52 | if (preg_match("/base64/", $this->headers['content-transfer-encoding'])) { |
53 | $this->body = base64_decode($this->body); |
54 | } elseif (preg_match("/quoted-printable/", $this->headers['content-transfer-encoding'])) { |
55 | $this->body = quoted_printable_decode($this->body); |
56 | } |
57 | } |
58 | |
a7cb2f0d |
59 | if ($this->_split_multipart($this->headers, $this->body)) { |
60 | $this->set_body_to_part(0); |
78cd27b3 |
61 | } else { |
a7cb2f0d |
62 | $this->_split_multipart($mpart_type[1], $mpart_boundary[1]); |
c3f19b42 |
63 | $this->_find_uuencode(); |
05074d42 |
64 | $this->_fix_charset(); |
78cd27b3 |
65 | } |
66 | } |
67 | |
c3f19b42 |
68 | /** find and add uuencoded attachments |
69 | */ |
70 | function _find_uuencode() |
71 | { |
72 | if (preg_match_all('@\n(begin \d+ ([^\r\n]+)\r?(?:\n(?!end)[^\n]*)*\nend)@', $this->body, $matches, PREG_SET_ORDER)) { |
73 | foreach ($matches as $match) { |
74 | $mime = trim(exec('echo '.escapeshellarg($match[1]).' | uudecode -o /dev/stdout | file -bi -')); |
75 | if ($mime != 'application/x-empty') { |
f12fdb59 |
76 | $this->body = trim(str_replace($match[0], '', $this->body)); |
c3f19b42 |
77 | $body = $match[1]; |
78 | $header['content-type'] = $mime.'; name="'.$match[2].'"'; |
79 | $header['content-transfer-encoding'] = 'x-uuencode'; |
80 | $header['content-disposition'] = 'attachment; filename="'.$match[2].'"'; |
81 | $this->_add_attachment(Array('headers' => $header, 'body' => $body)); |
82 | } |
83 | } |
84 | } |
85 | } |
86 | |
7a0e2710 |
87 | /** split multipart messages |
88 | * @param $type STRING multipart type description |
89 | * @param $boundary STRING multipart boundary identification string |
90 | */ |
a7cb2f0d |
91 | function _split_multipart($headers, $body) |
7a0e2710 |
92 | { |
a7cb2f0d |
93 | if (!preg_match("@multipart/([^;]+);@", $headers['content-type'], $type)) { |
94 | return false; |
95 | } |
96 | |
97 | preg_match("/boundary=\"?([^ \"]+)\"?/", $headers['content-type'], $boundary); |
98 | $boundary = $boundary[1]; |
99 | $type = $type[1]; |
100 | $parts = preg_split("@\n--$boundary(--|\n)@", $body); |
7a0e2710 |
101 | foreach ($parts as $part) { |
a7cb2f0d |
102 | $part = $this->_get_part($part); |
7a0e2710 |
103 | $local_header = $part['headers']; |
a7cb2f0d |
104 | $local_body = $part['body']; |
105 | if (!$this->_split_multipart($local_header, $local_body)) { |
106 | $is_text = isset($local_header['content-type']) && preg_match("@text/([^;]+);@", $local_header['content-type']) |
107 | && (!isset($local_header['content-disposition']) || !preg_match('@attachment@', $local_header['content-disposition'])); |
108 | |
109 | // alternative ==> multiple formats for messages |
110 | if ($type == 'alternative' && $is_text) { |
111 | array_push($this->messages, $part); |
112 | |
113 | // !alternative ==> une body, others are attachments |
114 | } else if ($is_text) { |
115 | if (count($this->messages) == 0) { |
116 | $this->body = $local_body; |
117 | foreach (array_keys($local_header) as $key) { |
118 | $this->header[$key] = $local_header[$key]; |
119 | } |
120 | array_push($this->messages, $part); |
121 | } else { |
122 | $this->_add_attachment($part); |
123 | } |
124 | } else { |
125 | $this->_add_attachment($part); |
126 | } |
cc43419f |
127 | } |
a529ea7b |
128 | } |
a7cb2f0d |
129 | return true; |
7a0e2710 |
130 | } |
131 | |
132 | /** extract new headers from the part |
133 | * @param $part STRING part of a multipart message |
134 | */ |
a529ea7b |
135 | function _get_part($part) |
1f75b135 |
136 | { |
7a0e2710 |
137 | global $banana; |
138 | |
139 | $lines = split("\n", $part); |
140 | while (count($lines)) { |
141 | $line = array_shift($lines); |
142 | if ($line != "") { |
a7cb2f0d |
143 | if (preg_match('@^[\t\r ]+@', $line) && isset($hdr)) { |
144 | $local_headers[$hdr] .= ' '.trim($line); |
145 | } else { |
146 | list($hdr, $val) = split(":[ \t\r]*", $line, 2); |
147 | $hdr = strtolower($hdr); |
148 | if (in_array($hdr, $banana->parse_hdr)) { |
149 | $local_headers[$hdr] = $val; |
150 | } |
7a0e2710 |
151 | } |
152 | } else { |
153 | break; |
154 | } |
155 | } |
16b17ba5 |
156 | $local_body = join("\n", $lines); |
157 | if (preg_match("/quoted-printable/", $local_headers['content-transfer-encoding'])) { |
158 | $local_body = quoted_printable_decode($local_body); |
159 | } |
160 | return Array('headers' => $local_headers, 'body' => $local_body); |
7a0e2710 |
161 | } |
162 | |
1f75b135 |
163 | /** add an attachment |
164 | */ |
a529ea7b |
165 | function _add_attachment($part) |
1f75b135 |
166 | { |
7a0e2710 |
167 | $local_header = $part['headers']; |
168 | $local_body = $part['body']; |
169 | |
a7cb2f0d |
170 | if ((isset($local_header['content-disposition']) && preg_match("/filename=\"?([^\"]+)\"?/", $local_header['content-disposition'], $filename)) |
171 | || (isset($local_header['content-type']) && preg_match("/name=\"?([^\"]+)\"?/", $local_header['content-type'], $filename))) { |
172 | $filename = $filename[1]; |
173 | } |
7a0e2710 |
174 | if (!isset($filename)) { |
175 | $filename = "attachment".count($pj); |
176 | } |
177 | |
178 | if (isset($local_header['content-type'])) { |
179 | if (preg_match("/^\\s*([^ ;]+);/", $local_header['content-type'], $mimetype)) { |
180 | $mimetype = $mimetype[1]; |
181 | } |
182 | } |
183 | if (!isset($mimetype)) { |
1f75b135 |
184 | return false; |
7a0e2710 |
185 | } |
186 | |
187 | array_push($this->pj, Array('MIME' => $mimetype, |
188 | 'filename' => $filename, |
189 | 'encoding' => strtolower($local_header['content-transfer-encoding']), |
190 | 'data' => $local_body)); |
1f75b135 |
191 | return true; |
7a0e2710 |
192 | } |
193 | |
05074d42 |
194 | /** Fix body charset (convert body to utf8) |
195 | * @return false if failed |
196 | */ |
197 | function _fix_charset() |
198 | { |
bc599299 |
199 | if (preg_match('!charset="?([^;"]*)"?\s*(;|$)?!', $this->headers['content-type'], $matches)) { |
05074d42 |
200 | $body = iconv($matches[1], 'utf-8', $this->body); |
201 | if (strlen($body) == 0) { |
202 | return false; |
203 | } |
204 | $this->body = $body; |
205 | } else { |
206 | $this->body = utf8_encode($this->body); |
207 | } |
208 | return true; |
209 | } |
210 | |
a529ea7b |
211 | /** return body in plain text (useful for messages without a text/plain part) |
212 | */ |
213 | function get_body() |
214 | { |
215 | preg_match("@text/([^;]+);@", $this->headers['content-type'], $format); |
216 | if ($format[1] == 'plain') { |
217 | return $this->body; |
218 | } |
aef14768 |
219 | if ($format[1] == 'richtext') { |
220 | return htmlToPlainText(richtextToHtml($this->body)); |
221 | } else { |
222 | return htmlToPlainText($this->body); |
a529ea7b |
223 | } |
a529ea7b |
224 | } |
225 | |
7a0e2710 |
226 | /** decode an attachment |
227 | * @param pjid INT id of the attachment to decode |
228 | * @param action BOOL action to execute : true=view, false=download |
229 | */ |
1f75b135 |
230 | function get_attachment($pjid, $action = false) |
231 | { |
7a0e2710 |
232 | if ($pjid >= count($this->pj)) { |
233 | return false; |
234 | } else { |
235 | $file = $this->pj[$pjid]; |
a529ea7b |
236 | header('Content-Type: '.$file['MIME'].'; name="'.$file['filename'].'"'); |
7a0e2710 |
237 | if (!$action) { |
238 | header('Content-Disposition: attachment; filename="'.$file['filename'].'"'); |
a529ea7b |
239 | } else { |
240 | header('Content-Disposition: inline; filename="'.$file['filename'].'"'); |
241 | } |
7a0e2710 |
242 | if ($file['encoding'] == 'base64') { |
243 | echo base64_decode($file['data']); |
c3f19b42 |
244 | } else if ($file['encoding'] == 'x-uuencode') { |
245 | passthru('echo '.escapeshellarg($file['data']).' | uudecode -o /dev/stdout'); |
7a0e2710 |
246 | } else { |
247 | header('Content-Transfer-Encoding: '.$file['encoding']); |
248 | echo $file['data']; |
249 | } |
250 | return true; |
251 | } |
252 | } |
253 | |
1f75b135 |
254 | /** set body to represent the given part |
255 | * @param partid INT index of the part in messages |
256 | */ |
257 | function set_body_to_part($partid) |
258 | { |
259 | global $banana; |
260 | |
261 | if (count($this->messages) == 0) { |
262 | return false; |
263 | } |
264 | |
265 | $local_header = $this->messages[$partid]['headers']; |
266 | $this->body = $this->messages[$partid]['body']; |
267 | foreach ($banana->parse_hdr as $hdr) { |
268 | if (isset($local_header[$hdr])) { |
269 | $this->headers[$hdr] = $local_header[$hdr]; |
270 | } |
271 | } |
cc43419f |
272 | |
05074d42 |
273 | $this->_fix_charset(); |
1f75b135 |
274 | return true; |
275 | } |
276 | |
78cd27b3 |
277 | function _header() |
278 | { |
279 | global $banana; |
280 | $hdrs = $banana->nntp->head($this->id); |
281 | if (!$hdrs) { |
78cd27b3 |
282 | return false; |
283 | } |
284 | |
285 | // parse headers |
286 | foreach ($hdrs as $line) { |
287 | if (preg_match("/^[\t\r ]+/", $line)) { |
288 | $line = ($hdr=="X-Face"?"":" ").ltrim($line); |
289 | if (in_array($hdr, $banana->parse_hdr)) { |
290 | $this->headers[$hdr] .= $line; |
291 | } |
292 | } else { |
293 | list($hdr, $val) = split(":[ \t\r]*", $line, 2); |
294 | $hdr = strtolower($hdr); |
295 | if (in_array($hdr, $banana->parse_hdr)) { |
296 | $this->headers[$hdr] = $val; |
297 | } |
298 | } |
299 | } |
300 | // decode headers |
301 | foreach ($banana->hdecode as $hdr) { |
302 | if (isset($this->headers[$hdr])) { |
303 | $this->headers[$hdr] = headerDecode($this->headers[$hdr]); |
304 | } |
305 | } |
306 | |
307 | $this->name = $this->headers['from']; |
308 | $this->name = preg_replace('/<[^ ]*>/', '', $this->name); |
309 | $this->name = trim($this->name); |
50cd076e |
310 | return true; |
78cd27b3 |
311 | } |
312 | |
313 | function checkcancel() |
314 | { |
315 | if (function_exists('hook_checkcancel')) { |
316 | return hook_checkcancel($this->headers); |
317 | } |
318 | return ($this->headers['from'] == $_SESSION['name']." <".$_SESSION['mail'].">"); |
319 | } |
320 | |
1f75b135 |
321 | /** convert message to html |
322 | * @param partid INT id of the multipart message that must be displaid |
323 | */ |
cc43419f |
324 | function to_html($partid = -1) |
78cd27b3 |
325 | { |
326 | global $banana; |
327 | |
cc43419f |
328 | if (count($this->messages) > 1) { |
329 | if ($partid != -1) { |
330 | $this->set_body_to_part($partid); |
331 | } else { |
332 | // Select prefered text-format |
333 | foreach ($banana->body_mime as $mime) { |
334 | for ($id = 0 ; $id < count($this->messages) ; $id++) { |
335 | if (preg_match("@$mime@", $this->messages[$id]['headers']['content-type'])) { |
336 | $partid = $id; |
337 | $this->set_body_to_part($partid); |
338 | break; |
339 | } |
340 | } |
341 | if ($partid != -1) { |
342 | break; |
343 | } |
344 | } |
345 | if ($partid == -1) { |
346 | $partid = 0; |
347 | } |
348 | } |
349 | } else { |
350 | $partid = 0; |
1f75b135 |
351 | } |
352 | |
78cd27b3 |
353 | $res = '<table class="bicol banana_msg" cellpadding="0" cellspacing="0">'; |
354 | $res .= '<tr><th colspan="2">'._b_('En-têtes').'</th></tr>'; |
ca3b1040 |
355 | $res .= '<tr><td class="headers"><table cellpadding="0" cellspacing="0">'; |
78cd27b3 |
356 | |
357 | foreach ($banana->show_hdr as $hdr) { |
358 | if (isset($this->headers[$hdr])) { |
359 | $res2 = formatdisplayheader($hdr, $this->headers[$hdr]); |
ca3b1040 |
360 | if ($res2 && ($hdr != 'x-face' || !$banana->formatxface)) { |
78cd27b3 |
361 | $res .= '<tr><td class="hdr">'.header_translate($hdr)."</td><td class='val'>$res2</td></tr>\n"; |
ca3b1040 |
362 | } else if ($res2) { |
363 | $xface = $res2; |
78cd27b3 |
364 | } |
365 | } |
366 | } |
ca3b1040 |
367 | $res .= '</table></td><td class="xface">'; |
368 | |
369 | if ($xface) { |
370 | $res .= $xface; |
371 | } |
372 | $res .= '</td></tr>'; |
78cd27b3 |
373 | |
1f75b135 |
374 | $res .= '<tr><th colspan="2">'._b_('Corps'); |
375 | if (count($this->messages) > 1) { |
376 | for ($i = 0 ; $i < count($this->messages) ; $i++) { |
377 | if ($i == 0) { |
378 | $res .= ' : '; |
379 | } else { |
380 | $res .= ' . '; |
381 | } |
382 | preg_match("@text/([^;]+);@", $this->messages[$i]['headers']['content-type'], $format); |
383 | $format = textFormat_translate($format[1]); |
384 | if ($i != $partid) { |
8e519bd8 |
385 | $res .= makeHREF(Array('group' => $banana->state['group'], |
f6df9eb2 |
386 | 'artid' => $this->id, |
387 | 'part' => $i), |
388 | $format); |
1f75b135 |
389 | } else { |
390 | $res .= $format; |
391 | } |
392 | } |
393 | } |
394 | $res .= '</th></tr>'; |
395 | |
396 | preg_match("@text/([^;]+);@", $this->headers['content-type'], $format); |
397 | $format = $format[1]; |
4cc80c9a |
398 | $res .= '<tr><td colspan="2"'; |
1f75b135 |
399 | if ($format == 'html') { |
4cc80c9a |
400 | if (preg_match('@<body[^>]*bgcolor="?([#0-9a-f]+)"?[^>]*>@i', $this->body, $bgcolor)) { |
401 | $res .= ' bgcolor="'.$bgcolor[1].'"'; |
402 | } |
403 | $res .= '>'.formatbody($this->body, $format); |
1f75b135 |
404 | } else { |
4cc80c9a |
405 | $res .= '><pre>'.formatbody($this->body).'</pre>'; |
1f75b135 |
406 | } |
407 | $res .= '</td></tr>'; |
7a0e2710 |
408 | |
409 | if (count($this->pj) > 0) { |
410 | $res .= '<tr><th colspan="2">'._b_('Pièces jointes').'</th></tr>'; |
411 | $res .= '<tr><td colspan="2">'; |
412 | $i = 0; |
413 | foreach ($this->pj as $file) { |
414 | $res .= $file['filename'].' ('.$file['MIME'].') : '; |
8e519bd8 |
415 | $res .= makeHREF(Array('group' => $banana->state['group'], |
f6df9eb2 |
416 | 'artid' => $this->id, |
417 | 'pj' => $i), |
418 | _b_('télécharger')); |
419 | $res .= ' . '; |
8e519bd8 |
420 | $res .= makeHREF(Array('group' => $banana->state['group'], |
421 | 'artid' => $this->id, |
422 | 'pj' => $i, |
f6df9eb2 |
423 | 'action'=> 'view'), |
8e519bd8 |
424 | _b_('aperçu')); |
7a0e2710 |
425 | $res .= '<br/>'; |
426 | $i++; |
427 | } |
428 | $res .= '</td></tr>'; |
429 | } |
78cd27b3 |
430 | |
cc43419f |
431 | $res .= '<tr><th colspan="2">'._b_('Apercu').'</th></tr>'; |
78cd27b3 |
432 | $ndx = $banana->spool->getndx($this->id); |
433 | $res .= '<tr><td class="thrd" colspan="2">'.$banana->spool->to_html($ndx-$banana->tbefore, $ndx+$banana->tafter, $ndx).'</td></tr>'; |
434 | |
435 | return $res.'</table>'; |
436 | } |
437 | } |
438 | |
f6df9eb2 |
439 | // vim:set et sw=4 sts=4 ts=4 |
78cd27b3 |
440 | ?> |