2 /********************************************************************************
3 * install.d/config.inc.php : configuration file
4 * --------------------------
6 * This file is part of the banana distribution
7 * Copyright: See COPYING files that comes with this distribution
8 ********************************************************************************/
14 var $hdecode = array('from','name','organization','subject');
15 var $parse_hdr = array('content-disposition', 'content-transfer-encoding',
16 'content-type', 'content-id', 'date', 'followup-to',
17 'from', 'message-id', 'newsgroups', 'organization',
18 'references', 'subject', 'x-face');
19 var $show_hdr = array('from', 'newsgroups', 'followup', 'date',
20 'organization', 'references', 'x-face');
22 /** Favorites MIMEtypes to use, by order for reading multipart messages
24 var $body_mime = array('text/plain', 'text/html', 'text/richtext');
25 /** Indicate wether posting attachment is allowed
27 var $can_attach = true
;
28 /** Maximum allowed file size for attachment
30 var $maxfilesize = 100000;
31 /** Indicate wether x-face should be skinned as specials data or not
33 var $formatxface = true
;
35 /** Regexp for selecting newsgroups to show (if empty, match all newsgroups)
36 * ex : '^xorg\..*' for xorg.*
46 * Should be included in a regexp delimited using ! (eg: "!$url_regexp!i")
47 * If it matches, return 3 main parts :
48 * \\1 and \\3 are delimiters
51 * eg : preg_match("!$url_regexp!i", "[http://www.polytechnique.org]", $matches);
53 * $matches[2] = "http://www.polytechnique.org"
56 var $url_regexp = '(["\[])?((?:https?|ftp|news)://(?:&|,?[a-z@0-9.~%$£µ&i#\-+=_/\?])*)(["\]])?';
59 /** Boundary for multipart messages
61 var $boundary = 'bananaBoundary42';
62 /** Global headers to use for messages
64 var $custom = "Mime-Version: 1.0\nUser-Agent: Banana @VERSION@\n";
65 /** Global headers to use from multipart messages
67 var $custom_mp = "Content-Type: multipart/mixed; boundary=\"bananaBoundary42\"\nContent-Transfer-Encoding: 7bit\n";
68 /** Body type when using plain text
70 var $custom_plain= "Content-Type: text/plain; charset=utf-8\nContent-Transfert-Encoding: 8bit\n";
72 /** News serveur to use
74 var $host = 'news://localhost:119/';
78 var $profile = Array( 'name' => 'Anonymous <anonymouse@example.com>', 'sig' => '', 'org' => '',
79 'customhdr' =>'', 'display' => 0, 'lastnews' => 0, 'locale' => 'fr_FR', 'subscribe' => array());
81 var $state = Array('group' => null
, 'artid' => null
, 'action' => null
);
92 $this->_require('NetNNTP');
93 setlocale(LC_ALL
, $this->profile
['locale']);
94 $this->nntp
= new nntp($this->host
);
95 if (!$this->nntp ||
!$this->nntp
->valid
) {
101 * @param STRING class Name of the class to use
102 * @param ARRAY myget If defined is used instead of get
104 function run($class = 'Banana', $myget = null
)
108 Banana
::_require('misc');
109 $banana = new $class();
111 if (is_null($myget)) {
112 $banana->get
= $_GET;
114 $banana->get
= $myget;
117 if (!$banana->nntp
) {
118 $banana->state
['page'] = 'error';
119 return makeTable('<p class="error">'._b_('Impossible de contacter le serveur').'</p>');
122 $group = empty($banana->get
['group']) ? null
: $banana->get
['group'];
124 && isset($banana->grp_pattern
) && !preg_match('/' . $banana->grp_pattern
. '/', $group)) {
125 $banana->state
['page'] = 'error';
126 return makeTable('<p class="error">'
127 . $group . _b_(' : ce newsgroup n\'existe pas ou vous n\'avez pas l\'autorisation d\'y accéder')
130 $artid = empty($banana->get
['artid']) ? null
: strtolower($banana->get
['artid']);
131 $partid = !isset($banana->get
['part']) ?
-1 : $banana->get
['part'];
132 $action = !isset($banana->get
['action']) ? null
: $banana->get
['action'];
133 $banana->state
= Array ('group' => $group, 'artid' => $artid, 'action' => $action);
135 if (is_null($group)) {
136 if (isset($banana->get
['subscribe'])) {
137 $banana->state
['page'] = 'subscribe';
138 return makeTable($banana->action_listSubs());
139 } elseif (isset($_POST['validsubs'])) {
140 $banana->action_saveSubs();
142 $banana->state
['page'] = 'forums';
143 return makeTable($banana->action_listGroups());
145 } elseif (is_null($artid)) {
146 if (isset($_POST['action']) && $_POST['action'] == 'new') {
147 return makeTable($banana->action_doFup($group, isset($_POST['artid']) ?
intval($_POST['artid']) : -1));
148 } elseif ($action == 'new') {
149 $banana->state
['page'] = 'action';
150 return makeTable($banana->action_newFup($group));
152 $banana->state
['page'] = 'group';
153 return makeTable($banana->action_showThread($group, isset($banana->get
['first']) ?
intval($banana->get
['first']) : 1));
157 if (isset($_POST['action']) && $_POST['action']=='cancel') {
158 $res = $banana->action_cancelArticle($group, $artid);
163 if (!is_null($action)) {
164 $banana->state
['page'] = 'action';
167 $res .= $banana->action_showArticle($group, $artid, $partid);
168 if ($banana->post
->checkcancel()) {
169 $form = '<p class="error">'._b_('Voulez-vous vraiment annuler ce message ?').'</p>'
171 . htmlentities(makeLink(Array('group' => $group,
173 . '" method="post"><p>'
174 . '<input type="hidden" name="action" value="cancel" />'
175 . '<input type="submit" value="Annuler !" />'
177 return makeTable($form . $res);
179 return makeTable("" . $res);
182 return makeTable($banana->action_newFup($group, $artid));
186 if (isset($banana->get
['pj'])) {
188 if ($action == 'view') {
191 $att = $banana->action_getAttachment($group, $artid, $banana->get
['pj'], $view);
192 return makeTable($res . $att);
195 $banana->state
['page'] = 'message';
196 return makeTable($banana->action_showArticle($group, $artid, $partid));
200 /**************************************************************************/
202 /**************************************************************************/
204 function action_saveSubs()
209 function action_listGroups()
213 $res = $this->groups
->to_html();
214 if (count($this->newgroups
->overview
)) {
215 $res .= '<p>'._b_('Les forums suivants ont été créés depuis ton dernier passage :').'</p>';
216 $res .= $this->newgroups
->to_html();
223 function action_listSubs()
225 $this->_require('groups');
226 $this->groups
= new BananaGroups(BANANA_GROUP_ALL
);
228 $res = $this->groups
->to_html(true
);
234 function action_showThread($group, $first)
236 if (!$this->_newSpool($group, $this->profile
['display'], $this->profile
['lastnews'])) {
237 return '<p class="error">'._b_('Impossible charger la liste des messages de ') . $group . '</p>';
240 if ($first > count($this->spool
->overview
)) {
241 $first = count($this->spool
->overview
);
244 $first = $first - ($first %
$this->tmax
) +
1;
246 $pages = displayPages($first);
247 $res = $pages . $this->spool
->to_html($first, $first+
$this->tmax
) . $pages;
254 function action_showArticle($group, $id, $part)
256 if (!$this->_newSpool($group, $this->profile
['display'], $this->profile
['lastnews'])) {
257 return '<p class="error">'._b_('Impossible charger la liste des messages de ') . $group . '</p>';
260 if (!$this->_newPost($id)) {
261 if ($this->nntp
->lasterrorcode
== "423") {
262 $this->spool
->delid($id);
265 return '<p class="error">'._b_('Impossible d\'accéder au message. Le message a peut-être été annulé').'</p>';
268 $res = $this->post
->to_html($part);
275 function action_getAttachment($group, $id, $pjid, $action)
277 if (!$this->_newSpool($group, $this->profile
['display'], $this->profile
['lastnews'])) {
278 return '<p class="error">'._b_('Impossible charger la liste des messages').'</p>';
281 if (!$this->_newPost($id)) {
282 if ($this->nntp
->lasterrorcode
== "423") {
283 $this->spool
->delid($id);
286 return '<p class="error">'._b_('Impossible d\'accéder au message. Le message a peut-être été annulé').'</p>';
290 if ($this->post
->get_attachment($pjid, $action)) {
293 return '<p calss="error">'._b_('Impossible d\'accéder à la pièce jointe.').'</p>';
297 function action_cancelArticle($group, $id)
299 if (!$this->_newSpool($group, $this->profile
['display'], $this->profile
['lastnews'])) {
300 return '<p class="error">'._b_('Impossible charger la liste des messages').'</p>';
303 if (!$this->_newPost($id)) {
304 return '<p class="error">'._b_('Impossible de trouver le message à annuler').'</p>';
306 $mid = array_search($id, $this->spool
->ids
);
308 if (!$this->post
->checkcancel()) {
309 return '<p class="error">'._b_('Vous n\'avez pas les permissions pour annuler ce message').'</p>';
311 $msg = 'From: '.$this->profile
['name']."\n"
312 . "Newsgroups: $group\n"
313 . "Subject: cmsg $mid\n"
315 . "Control: cancel $mid\n"
317 . "Message canceled with Banana";
318 if ($this->nntp
->post($msg)) {
319 $this->spool
->delid($id);
321 redirectInBanana(Array('group' => $group,
324 return '<p class="error">'._b_('Impossible d\'annuler le message').'</p>';
328 function action_newFup($group, $id = -1)
330 $subject = $body = '';
333 if (@$_POST['action'] == 'new') {
334 $subject = $_POST['subject'];
335 $body = $_POST['body'];
336 $target = $_POST['newsgroups'];
337 $followup = $_POST['followup'];
338 $this->state
['page'] = 'action';
339 $this->state
['group'] = $group;
340 $this->state
['action'] = 'new';
342 $this->state
['artid'] = $id;
345 $this->nntp
->group($group);
346 if ($this->_newPost($id)) {
347 $subject = 'Re: ' . preg_replace("/^re\s*:\s*/i", '', $this->post
->headers
['subject']);
348 $body = utf8_encode($this->post
->name
." "._b_("a écrit"))." :\n"
349 . wrap($this->post
->get_body(), "> ")
350 . $this->profile
['sig'] ?
"\n\n-- \n". $this->profile
['sig'] : '';
351 $target = isset($this->post
->headers
['followup-to']) ?
352 $this->post
->headers
['followup-to'] : $this->post
->headers
['newsgroups'];
356 $subject = $target = $followup = null
;
357 $body = $this->profile
['sig'] ?
"\n\n-- \n". $this->profile
['sig'] : '';
362 $html = '<form enctype="multipart/form-data" action="'
363 . htmlentities(makeLink(Array('group' => $group)))
364 . '" method="post" accept-charset="utf-8">'
365 . '<table class="bicol" cellpadding="0" cellspacing="0">'
366 . '<tr><th colspan="2">' . _b_('En-têtes') . '</th></tr>'
367 . '<tr><td>' . _b_('Nom') . '</td>'
368 . '<td>' . htmlentities($this->profile
['name']) . '</td></tr>'
369 . '<tr><td>' . _b_('Sujet') . '</td>'
370 . '<td><input type="text" name="subject" value="' . htmlentities($subject) . '" size="60" /></td></tr>'
371 . '<tr><td>' . _b_('Forums') . '</td>'
372 . '<td><input type="text" name="newsgroups" value="' . htmlentities($target) . '" size="60" /></td></tr>'
373 . '<tr><td>' . _b_('Suivi à') . '</td>'
374 . '<td><input type="text" name="followup" value="' . htmlentities($followup). '" size="60" /></td></tr>'
375 . '<tr><td>' . _b_('Organisation') . '</td>'
376 . '<td>' . $this->profile
['org'] . '</td></tr>'
377 . '<tr><th colspan="2">' . _b_('Corps') . '</th></tr>'
378 . '<tr><td colspan="2"><textarea name="body" cols="74" rows="16">'
379 . $body . '</textarea></td></tr>';
380 if ($this->can_attach
) {
381 $html .= '<tr><th colspan="2">' . _b_('Pièce jointe') . '</th></tr>'
382 . '<tr><td colspan="2">'
383 . '<input type="hidden" name="MAX_FILE_SIZE" value="' . $this->maxfilesize
. '" />'
384 . '<input type="file" name="newpj" size="40"/></td></tr>';
386 $html .= '<tr><th colspan="2">';
388 $html .= '<input type="hidden" name="artid" value="' . $id . '" />';
390 $html .= '<input type="hidden" name="action" value="new" />'
391 . '<input type="submit" value="' . _b_('Envoyer le message') . '" /></th></tr>'
397 function action_doFup($group, $artid = -1)
399 if ( ! (is_utf8($_POST['subject']) && is_utf8($_POST['body']))) {
400 foreach(Array('subject', 'body') as $key) {
401 $_POST[$key] = utf8_encode($_POST[$key]);
405 $forums = preg_split('/\s*(,|;)\s*/', $_POST['newsgroups']);
406 $fup = $_POST['followup'];
407 if (sizeof($forums) > 1) {
412 $to = implode(',', $forums);
414 if (!$this->_newSpool($group, $this->profile
['display'], $this->profile
['lastnews'])) {
415 return '<p class="error">'._b_('Impossible charger la liste des messages').'</p>';
418 $body = preg_replace("/\n\.[ \t\r]*\n/m", "\n..\n", $_POST['body']);
419 $msg = 'From: ' . $this->profile
['name'] . "\n"
420 . "Newsgroups: ". $to . "\n"
421 . "Subject: " . headerEncode($_POST['subject'], 128) . "\n"
422 . (empty($this->profile
['org']) ?
'' : "Organization: {$this->profile['org']}\n")
423 . (empty($fup) ?
'' : 'Followup-To: ' . $fup . "\n");
426 $this->_require('post');
427 $post = new BananaPost($artid);
428 if (!$post ||
!$post->valid
) {
429 return '<p class="error">'._b_('Impossible charger le message d\'origine').'</p>';
431 $refs = ( isset($post->headers
['references']) ?
$post->headers
['references']." " : "" );
432 $msg .= "References: $refs{$post->headers['message-id']}\n";
435 $body_headers = $this->custom_plain
;
436 $body = wrap($body, "");
438 // include attachment in the body
439 $uploaded = $this->_upload('newpj');
440 switch ($uploaded['error']) {
442 $this->custom
= $this->custom_mp
.$this->custom
;
443 $body = $this->_make_part($body_headers, $body);
444 $file_head = 'Content-Type: '.$uploaded['type'].'; name="'.$uploaded['name']."\"\n"
445 . 'Content-Transfer-Encoding: '.$uploaded['encoding']."\n"
446 . 'Content-Disposition: attachment; filename="'.$uploaded['name']."\"\n";
447 $body .= $this->_make_part($file_head, $uploaded['data']);
448 $body .= "\n--".$this->boundary
.'--';
451 case UPLOAD_ERR_INI_SIZE
: case UPLOAD_ERR_FORM_SIZE
:
452 return '<p class="error">'._b_('Fichier trop gros pour être envoyé : ')
453 .$uploaded['name'].'</p>'.$this->action_showThread($group, $artid);
455 case UPLOAD_ERR_PARTIAL
:
456 return '<p class="error">'._b_('Erreur lors de l\'upload de ')
457 .$uploaded['name'].'</p>'.$this->action_showThread($group, $artid);
459 case UPLOAD_ERR_NO_FILE
:
460 return '<p class="error">'._b_('Le fichier spécifié n\'existe pas : ')
461 .$uploaded['name'].'</p>'.$this->action_showThread($group, $artid);
463 case UPLOAD_ERR_NO_TMP_DIR
:
464 return '<p class="error">'._b_('Une erreur est survenue sur le serveur lors de l\'upload de ')
465 .$uploaded['name'].'</p>'.$this->action_showThread($group, $artid);
468 $this->custom
= $body_headers.$this->custom
;
471 // finalise and post the message
472 $msg .= $this->custom
.$this->profile
['customhdr']."\n".$body;
474 if ($this->nntp
->post($msg)) {
475 $dir = Array('group' => $group);
477 $dir['first'] = $artid;
479 redirectInBanana($dir);
481 return '<p class="error">' . _b_('Impossible de poster le message. Le serveur a retourné l\'erreur :') . '</p>'
482 . '<pre class="error">' . utf8_encode($this->nntp
->lasterrortext
) .'</pre>'
483 . $this->action_newFup($group, $artid);
487 /**************************************************************************/
488 /* Private functions */
489 /**************************************************************************/
491 function _newSpool($group, $disp=0, $since='') {
492 $this->_require('spool');
493 if (!$this->spool ||
$this->spool
->group
!= $group) {
494 $this->spool
= new BananaSpool($group, $disp, $since);
495 if (!$this->spool ||
!$this->spool
->valid
) {
500 if (count($this->profile
['subscribe']) > 0) {
501 $this->_newGroup(false
);
506 function _newPost($id)
508 $this->_require('post');
509 $this->post
= new BananaPost($id);
510 if (!$this->post ||
!$this->post
->valid
) {
517 function _newGroup($showNew = true
)
519 $this->_require('groups');
520 $this->groups
= new BananaGroups(BANANA_GROUP_SUB
);
521 if ($showNew && $this->groups
->type
== BANANA_GROUP_SUB
) {
522 $this->newgroups
= new BananaGroups(BANANA_GROUP_NEW
);
526 function _require($file)
528 require_once (dirname(__FILE__
).'/'.$file.'.inc.php');
531 function _upload($file)
533 if ($_FILES[$file]['name'] == "") {
534 return Array( 'error' => -1 );
538 $_FILES[$file]['tmp_name'];
540 // test if upload is ok
541 $file = $_FILES[$file];
542 if ($file['size'] == 0 ||
$file['error'] != 0) {
543 if ($file['error'] == 0) {
549 // adding custum data
550 $mime = rtrim(shell_exec('file -bi '.$file['tmp_name'])); //Because mime_content_type don't work :(
552 if (preg_match("@([^ ]+/[^ ]+); (.*)@", $mime, $format)) {
556 $data = fread(fopen($file['tmp_name'], 'r'), $file['size']);
557 if ($encod == 'base64') {
558 $data = chunk_split(base64_encode($data));
560 $file['name'] = basename($file['name']);
561 $file['type'] = $mime;
562 $file['encoding'] = $encod;
563 $file['data'] = $data;
568 function _make_part($headers, $body)
570 return "\n--".$this->boundary
."\n".$headers."\n".$body;
574 // vim:set et sw=4 sts=4 ts=4