banana/post.inc.php

   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;
  20     /** formating */
  21     var $messages;
  22     /** attachment */
  23     var $pj;
  24     /** poster name */
  25     var $name;
  26     /** test validity */
  27     var $valid = true;
  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;
  35         $this->id       = $_id;
  36         $this->pj       = array();
  37         $this->messages = array();
  38         if (!$this->_header()) {
  39             $this->valid = false;
  40             return null;
  41         }
  42
  43
  44         if ($body = $banana->nntp->body($_id)) {
  45             $this->body = join("\n", $body);
  46         } else {
  47             $this->valid = false;
  48             return null;
  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
  59         if ($this->_split_multipart($this->headers, $this->body)) {
  60             $this->set_body_to_part(0);
  61         } else {
  62             if(isset($mpart_type)) {
  63                 $this->_split_multipart($mpart_type[1], $mpart_boundary[1]);
  64             }
  65             $this->_find_uuencode();
  66             $this->_fix_charset();
  67         }
  68     }
  69
  70     /** find and add uuencoded attachments
  71      */
  72     function _find_uuencode()
  73     {
  74         if (preg_match_all('@\n(begin \d+ ([^\r\n]+)\r?(?:\n(?!end)[^\n]*)*\nend)@', $this->body, $matches, PREG_SET_ORDER)) {
  75             foreach ($matches as $match) {
  76                 $mime = trim(exec('echo '.escapeshellarg($match[1]).' | uudecode -o /dev/stdout | file -bi -'));
  77                 if ($mime != 'application/x-empty') {
  78                     $this->body = trim(str_replace($match[0], '', $this->body));
  79                     $body = $match[1];
  80                     $header['content-type'] = $mime.'; name="'.$match[2].'"';
  81                     $header['content-transfer-encoding'] = 'x-uuencode';
  82                     $header['content-disposition'] = 'attachment; filename="'.$match[2].'"';
  83                     $this->_add_attachment(Array('headers' => $header, 'body' => $body));
  84                 }
  85             }
  86         }
  87     }
  88
  89     /** split multipart messages
  90      * @param $type STRING multipart type description
  91      * @param $boundary STRING multipart boundary identification string
  92      */
  93     function _split_multipart($headers, $body)
  94     {
  95         if (!isset($headers['content-type'])
  96                 || !preg_match("@multipart/([^;]+);@", $headers['content-type'], $type)) {
  97             return false;
  98         }
  99
 100         preg_match("/boundary=\"?([^ \"]+)\"?/", $headers['content-type'], $boundary);
 101         $boundary = $boundary[1];
 102         $type     = $type[1];
 103         $parts    = preg_split("@\n--$boundary(--|\n)@", $body);
 104         foreach ($parts as $part) {
 105             $part         = $this->_get_part($part);
 106             $local_header = $part['headers'];
 107             $local_body   = $part['body'];
 108             if (!$this->_split_multipart($local_header, $local_body)) {
 109                 $is_text = isset($local_header['content-type'])
 110                          && preg_match("@text/([^;]+);@", $local_header['content-type'])
 111                          && (!isset($local_header['content-disposition'])
 112                              || !preg_match('@attachment@', $local_header['content-disposition']));
 113
 114                 // alternative ==> multiple formats for messages
 115                 if ($type == 'alternative' && $is_text) {
 116                     array_push($this->messages, $part);
 117
 118                 // !alternative ==> une body, others are attachments
 119                 } else if ($is_text) {
 120                     if (count($this->messages) == 0) {
 121                         $this->body = $local_body;
 122                         foreach (array_keys($local_header) as $key) {
 123                             $this->header[$key] = $local_header[$key];
 124                         }
 125                         array_push($this->messages, $part);
 126                     } else {
 127                         $this->_add_attachment($part);
 128                     }
 129                 } else {
 130                     $this->_add_attachment($part);
 131                 }
 132             }
 133         }
 134         return true;
 135     }
 136
 137     /** extract new headers from the part
 138      * @param $part STRING part of a multipart message
 139      */
 140     function _get_part($part)
 141     {
 142         global $banana;
 143
 144         $local_headers = Array();
 145         $lines = split("\n", $part);
 146         while (count($lines)) {
 147             $line = array_shift($lines);
 148             if ($line != "") {
 149                 if (preg_match('@^[\t\r ]+@', $line) && isset($hdr)) {
 150                     $local_headers[$hdr] .= ' '.trim($line);
 151                 } else {
 152                     list($hdr, $val) = split(":[ \t\r]*", $line, 2);
 153                     $hdr = strtolower($hdr);
 154                     if (in_array($hdr, $banana->parse_hdr)) {
 155                         $local_headers[$hdr] = $val;
 156                     }
 157                 }
 158             } else {
 159                 break;
 160             }
 161         }
 162         $local_body = join("\n", $lines);
 163         if (isset($local_headers['content-transfer-encoding'])
 164                 && preg_match("/quoted-printable/", $local_headers['content-transfer-encoding'])) {
 165             $local_body = quoted_printable_decode($local_body);
 166         }
 167         return Array('headers' => $local_headers, 'body' => $local_body);
 168     }
 169
 170     /** add an attachment
 171      */
 172     function _add_attachment($part)
 173     {
 174         $local_header = $part['headers'];
 175         $local_body = $part['body'];
 176
 177         if ((isset($local_header['content-disposition']) && preg_match('/filename="?([^"]+)"?/', $local_header['content-disposition'], $filename))
 178             || (isset($local_header['content-type']) && preg_match('/name="?([^"]+)"?/', $local_header['content-type'], $filename))) {
 179             $filename = $filename[1];
 180         }
 181         if (!isset($filename)) {
 182             $filename = "attachment" . count($this->pj);
 183         }
 184
 185         if (isset($local_header['content-type'])
 186                 && preg_match('/^\s*([^ ;]+);/', $local_header['content-type'], $mimetype)) {
 187             $mimetype = $mimetype[1];
 188         } else {
 189             return false;
 190         }
 191
 192         if (isset($local_header['content-id'])
 193                 && preg_match('/^\s*<([^> ]+)>/', $local_header['content-id'], $cid)) {
 194             $cid = $cid[1];
 195         } else {
 196             $cid = null;
 197         }
 198
 199         array_push($this->pj, Array('MIME' => $mimetype,
 200                                     'filename' => $filename,
 201                                     'encoding' => strtolower($local_header['content-transfer-encoding']),
 202                                     'data' => $local_body,
 203                                     'cid' => $cid));
 204         return true;
 205     }
 206
 207     /** Fix body charset (convert body to utf8)
 208      * @return false if failed
 209      */
 210     function _fix_charset()
 211     {
 212         if (isset($this->headers['content-type'])
 213                 && preg_match('!charset="?([^;"]*)"?\s*(;|$)?!', $this->headers['content-type'], $matches)) {
 214             $body = iconv($matches[1], 'utf-8//IGNORE', $this->body);
 215             if (strlen($body) == 0) {
 216                 return false;
 217             }
 218             $this->body = $body;
 219         } else {
 220             $this->body = utf8_encode($this->body);
 221         }
 222         return true;
 223     }
 224
 225     /** return body in plain text (useful for messages without a text/plain part)
 226      */
 227     function get_body()
 228     {
 229         preg_match("@text/([^;]+);@", $this->headers['content-type'], $format);
 230         if ($format[1] == 'plain') {
 231             return $this->body;
 232         }
 233         if ($format[1] == 'richtext') {
 234             return htmlToPlainText(richtextToHtml($this->body));
 235         } else {
 236             return htmlToPlainText($this->body);
 237         }
 238     }
 239
 240     /** return local url for the given cid
 241      * @param cid STRING
 242      */
 243     function find_attachment($cid)
 244     {
 245         global $banana;
 246         $i = 0;
 247         foreach ($this->pj as $pj) {
 248             if ($pj['cid'] == $cid) {
 249                 return htmlentities(makeLink(Array('group'  => $banana->state['group'],
 250                                                    'artid'  => $this->id,
 251                                                    'pj'     => $i,
 252                                                    'action' => 'view')));
 253             }
 254             $i++;
 255         }
 256         return 'cid:' . $cid;;
 257     }
 258
 259     /** decode an attachment
 260      * @param pjid INT id of the attachment to decode
 261      * @param action BOOL action to execute : true=view, false=download
 262      */
 263     function get_attachment($pjid, $action = false)
 264     {
 265         if ($pjid >= count($this->pj)) {
 266             return false;
 267         } else {
 268             $file = $this->pj[$pjid];
 269             header('Content-Type: '.$file['MIME'].'; name="'.$file['filename'].'"');
 270             if (!$action) {
 271                 header('Content-Disposition: attachment; filename="'.$file['filename'].'"');
 272             } else {
 273                 header('Content-Disposition: inline; filename="'.$file['filename'].'"');
 274             }
 275             if ($file['encoding'] == 'base64') {
 276                 echo base64_decode($file['data']);
 277             } else if ($file['encoding'] == 'x-uuencode') {
 278                 passthru('echo '.escapeshellarg($file['data']).' | uudecode -o /dev/stdout');
 279             } else {
 280                 header('Content-Transfer-Encoding: '.$file['encoding']);
 281                 echo $file['data'];
 282             }
 283             return true;
 284         }
 285     }
 286
 287     /** set body to represent the given part
 288      * @param partid INT index of the part in messages
 289      */
 290     function set_body_to_part($partid)
 291     {
 292         global $banana;
 293
 294         if (count($this->messages) == 0) {
 295             return false;
 296         }
 297
 298         $local_header = $this->messages[$partid]['headers'];
 299         $this->body   = $this->messages[$partid]['body'];
 300         foreach ($banana->parse_hdr as $hdr) {
 301             if (isset($local_header[$hdr])) {
 302                 $this->headers[$hdr] = $local_header[$hdr];
 303             }
 304         }
 305
 306         $this->_fix_charset();
 307         return true;
 308     }
 309
 310     function _header()
 311     {
 312         global $banana;
 313         $hdrs = $banana->nntp->head($this->id);
 314         if (!$hdrs) {
 315             return false;
 316         }
 317
 318         // parse headers
 319         foreach ($hdrs as $line) {
 320             if (preg_match("/^[\t\r ]+/", $line)) {
 321                 $line = ($hdr=="X-Face"?"":" ").ltrim($line);
 322                 if (in_array($hdr, $banana->parse_hdr))  {
 323                     $this->headers[$hdr] .= $line;
 324                 }
 325             } else {
 326                 list($hdr, $val) = split(":[ \t\r]*", $line, 2);
 327                 $hdr = strtolower($hdr);
 328                 if (in_array($hdr, $banana->parse_hdr)) {
 329                     $this->headers[$hdr] = $val;
 330                 }
 331             }
 332         }
 333         // decode headers
 334         foreach ($banana->hdecode as $hdr) {
 335             if (isset($this->headers[$hdr])) {
 336                 $this->headers[$hdr] = headerDecode($this->headers[$hdr]);
 337             }
 338         }
 339
 340         $this->name = $this->headers['from'];
 341         $this->name = preg_replace('/<[^ ]*>/', '', $this->name);
 342         $this->name = trim($this->name);
 343         return true;
 344     }
 345
 346     function checkcancel()
 347     {
 348         if (function_exists('hook_checkcancel')) {
 349             return hook_checkcancel($this->headers);
 350         }
 351         if (!isset($_SESSION)) {
 352             return false;
 353         }
 354         return ($this->headers['from'] == $_SESSION['name'] . ' <' . $_SESSION['mail']. '>');
 355     }
 356
 357     /** Make some links to browse the current newsgroup
 358      */
 359     function _browser()
 360     {
 361         global $banana;
 362         $ret = '<div class="banana_menu">';
 363         $actions = Array('nextUnread' => Array('next_unread', _b_('Message non-lu suivant'), 'u'),
 364                          'prevPost'   => Array('prev',        _b_('Article précédent'), 'a'),
 365                          'nextPost'   => Array('next',        _b_('Article suivant'), 'z'),
 366                          'prevThread' => Array('prev_thread', _b_('Discussion précédente'), 'q'),
 367                          'nextThread' => Array('next_thread', _b_('Discussion suivante'), 's'));
 368         foreach ($actions as $method=>$params) {
 369             $id = $banana->spool->$method($this->id);
 370             if (!is_null($id)) {
 371                 $ret .= makeImgLink(Array('group' => $banana->state['group'],
 372                                           'artid' => $id),
 373                                     $params[0] . '.gif',
 374                                     $params[1],
 375                                     null, null, null,
 376                                     $params[2]);
 377             }
 378         }
 379         return $ret . '</div>';
 380     }
 381
 382     /** convert message to html
 383      * @param partid INT id of the multipart message that must be displaid
 384      */
 385     function to_html($partid = -1)
 386     {
 387         global $banana;
 388
 389         if (count($this->messages) > 1) {
 390             if ($partid != -1) {
 391                 $this->set_body_to_part($partid);
 392             } else {
 393                 // Select prefered text-format
 394                 foreach ($banana->body_mime as $mime) {
 395                     for ($id = 0 ; $id < count($this->messages) ; $id++) {
 396                         if (preg_match("@$mime@", $this->messages[$id]['headers']['content-type'])) {
 397                             $partid = $id;
 398                             $this->set_body_to_part($partid);
 399                             break;
 400                         }
 401                     }
 402                     if ($partid != -1) {
 403                         break;
 404                     }
 405                 }
 406                 if ($partid == -1) {
 407                     $partid = 0;
 408                 }
 409             }
 410         } else {
 411             $partid = 0;
 412         }
 413
 414         $res  = '<table class="bicol banana_msg" cellpadding="0" cellspacing="0">';
 415         $res .= '<tr><th colspan="2" class="subject">'
 416              . $this->_browser()
 417              . '<div class="banana_action">'
 418              . makeImgLink(Array('group'  => $banana->state['group'],
 419                                  'action' => 'new'),
 420                            'post.gif',
 421                            _b_('Nouveau message'), null, null, null, 'p') . '&nbsp;'
 422              . makeImgLink(Array('group'  => $banana->state['group'],
 423                                  'artid'  => $this->id,
 424                                  'action' => 'new'),
 425                            'reply.gif',
 426                            _b_('Répondre'), null, null, null, 'r');
 427         if ($this->checkCancel()) {
 428             $res .= '&nbsp;'
 429                   . makeImgLink(Array('group'  => $banana->state['group'],
 430                                       'artid'  => $this->id,
 431                                       'action' => 'cancel'),
 432                                 'cancel.gif',
 433                                 _b_('Annuler'), null, null, null, 'c');
 434         }
 435         $res .= '</div>'
 436              . formatDisplayHeader('subject', $this->headers['subject'])
 437              . '</th></tr>'
 438              . '<tr class="pair"><td class="headers"><table cellpadding="0" cellspacing="0">';
 439
 440         $xface = null;
 441         foreach ($banana->show_hdr as $hdr) {
 442             if (isset($this->headers[$hdr])) {
 443                 $res2 = formatdisplayheader($hdr, $this->headers[$hdr]);
 444                 if ($res2 && ($hdr != 'x-face' || !$banana->formatxface)) {
 445                     $res .= '<tr><td class="hdr">'.header_translate($hdr)."</td><td class='val'>$res2</td></tr>\n";
 446                 } else if ($res2) {
 447                     $xface = $res2;
 448                 }
 449             }
 450         }
 451         $res .= '</table></td><td class="xface">';
 452
 453         if ($xface) {
 454             $res .= $xface;
 455         }
 456         $res .= '</td></tr>';
 457
 458         if (count($this->messages) > 1) {
 459             $res .= '<tr><th colspan="2">';
 460             for ($i = 0 ; $i < count($this->messages) ; $i++) {
 461                 if ($i != 0) {
 462                     $res .= ' . ';
 463                 }
 464                 preg_match("@text/([^;]+);@", $this->messages[$i]['headers']['content-type'], $format);
 465                 $format = textFormat_translate($format[1]);
 466                 if ($i != $partid) {
 467                     $res .= makeHREF(Array('group' => $banana->state['group'],
 468                                            'artid' => $this->id,
 469                                            'part'  => $i),
 470                                      $format);
 471                 } else {
 472                     $res .= $format;
 473                 }
 474             }
 475             $res .= '</th></tr>';
 476         }
 477
 478         if (isset($this->headers['content-type'])
 479                 && preg_match("@text/([^;]+);@", $this->headers['content-type'], $format)) {
 480             $format = $format[1];
 481         } else {
 482             $format = 'plain';
 483         }
 484         $res .= '<tr class="impair"><td colspan="2" class="body"';
 485         if ($format == 'html') {
 486             if (preg_match('@<body[^>]*bgcolor="?([#0-9a-f]+)"?[^>]*>@i', $this->body, $bgcolor)) {
 487                 $res .= ' bgcolor="'.$bgcolor[1].'"';
 488             }
 489             $this->body = preg_replace('/cid:([^\'" ]+)/e', "find_attachment('\\1')", $this->body);
 490             $res .= '>'.formatbody($this->body, $format);
 491         } else {
 492             $res .= '><pre>'.formatbody($this->body).'</pre>';
 493         }
 494         $res .= '</td></tr>';
 495
 496         if (count($this->pj) > 0) {
 497             $res .= '<tr><th colspan="2">'._b_('Pièces jointes').'</th></tr>';
 498             $res .= '<tr><td colspan="2">';
 499             $i = 0;
 500             foreach ($this->pj as $file) {
 501                 $res .= makeImgLink(Array('group' => $banana->state['group'],
 502                                           'artid' => $this->id,
 503                                           'pj'    => $i),
 504                                     'save.gif',
 505                                     _b_('Télécharger')) . ' ';
 506                 $res .= makeImgLink(Array('group' => $banana->state['group'],
 507                                           'artid' => $this->id,
 508                                           'pj'    => $i,
 509                                           'action'=> 'view'),
 510                                     'preview.gif',
 511                                     _b_('Aperçu'));
 512                 $res .= ' ' . $file['filename'].' ('.$file['MIME'].')';
 513                 $res .=  '<br/>';
 514                 $i++;
 515             }
 516             $res .= '</td></tr>';
 517         }
 518
 519         $ndx  = $banana->spool->getndx($this->id);
 520         $res .= '<tr><td class="thrd" colspan="2">'
 521              . $banana->spool->to_html($ndx-$banana->tbefore, $ndx+$banana->tafter, $ndx)
 522              . '</td></tr>';
 523         return $res.'</table>';
 524     }
 525 }
 526
 527 /** Wrapper for Post::find_attachment
 528  */
 529 function find_attachment($cid)
 530 {
 531     global $banana;
 532     return $banana->post->find_attachment($cid);
 533 }
 534
 535 // vim:set et sw=4 sts=4 ts=4
 536 ?>