Replace all '-- ' as signature delimiter and not only the last one.
[banana.git] / banana / misc.inc.php
index 269f2d0..c3215fc 100644 (file)
@@ -64,7 +64,7 @@ function makeLink($params)
 
     if (isset($params['xface'])) {
         $file = dirname($file) . '/xface.php';
-        $get  = 'face=' . urlencode($params['xface']);
+        $get  = 'face=' . urlencode(base64_encode($params['xface']));
     } else if (count($params) != 0) {
         $get = '?';
         foreach ($params as $key=>$value) {
@@ -83,7 +83,7 @@ function makeLink($params)
 /** Format a link to be use in a link
  * @ref makeLink
  */
-function makeHREF($params, $text = null, $popup = null)
+function makeHREF($params, $text = null, $popup = null, $class = null)
 {
     $link = makeLink($params);
     if (is_null($text)) {
@@ -92,11 +92,14 @@ function makeHREF($params, $text = null, $popup = null)
     if (!is_null($popup)) {
         $popup = ' title="' . $popup . '"';
     }
+    if (!is_null($class)) {
+        $class = ' class="' . $class . '"';
+    }
     $target = null;
     if (isset($params['action']) && $params['action'] == 'view') {
         $target = ' target="_blank"';
     }
-    return '<a href="' . htmlentities($link) . $target . '"' . $popup . '>' . $text . '</a>';
+    return '<a href="' . htmlentities($link) . $target . '"' . $popup . $class . '>' . $text . '</a>';
 }
 
 /** Format tree images links
@@ -122,12 +125,22 @@ function makeImg($img, $alt, $height = null, $width = null)
     
     $proto = empty($_SERVER['HTTPS']) ? 'http://' : 'https://';
     $host  = $_SERVER['HTTP_HOST'];
-    $file  = dirname($_SERVER['PHP_SELF']) . '/img/' . $img . '.gif';
+    $file  = dirname($_SERVER['PHP_SELF']) . '/img/' . $img;
     $url   = $proto . $host . $file; 
 
     return '<img src="' . $url . '"' . $height . $width . ' alt="' . $alt . '" />';
 }
 
+/** Make a link using an image
+ */
+function makeImgLink($params, $img, $alt, $height = null, $width = null, $class = null)
+{
+    return makeHREF($params,
+                    makeImg($img, ' [' . $alt . ']', $height, $width),
+                    $alt,
+                    $class);
+}
+
 /********************************************************************************
  * HTML STUFF
  * Taken from php.net
@@ -302,13 +315,15 @@ function formatDisplayHeader($_header,$_text) {
                 $p = $banana->spool->overview[$p]->parent;
             }
             foreach (array_reverse($par_ok) as $p) {
-                $rsl .= makeHREF(Array('group' => $banana->spool->group), $ndx) . ' ';
+                $rsl .= makeHREF(Array('group' => $banana->spool->group,
+                                       'artid' => $p),
+                                 $ndx) . ' ';
                 $ndx++;
             }
             return $rsl;
 
         case "x-face":
-            return '<img src="' . makeLink(Array('xface' => base64_encode(headerDecode($_text)))) .'"  alt="x-face" />';
+            return '<img src="' . makeLink(Array('xface' => headerDecode($_text))) .'"  alt="x-face" />';
     
         case "subject":
             $link = null;
@@ -365,53 +380,44 @@ function formatFrom($text) {
     return preg_replace("/\\\(\(|\))/","\\1",$result);
 }
 
-function displayshortcuts($first = -1) {
+function displayShortcuts($first = -1)
+{
     global $banana;
     extract($banana->state);
-
+    
     $res  = '<div class="banana_scuts">';
-    $res .= '[' . makeHREF(Array(), _b_('Liste des forums')) . '] ';
-    if (is_null($group)) {
-        return $res.'[' . makeHREF(Array('subscribe' => 1), _b_('Abonnements')) . ']</div>';
+    $res .= '<span class="title"> Profil :</span> ' . makeHREF(Array('subscribe' => 1), _b_('Abonnements'));
+    if (function_exists('hook_shortcuts') && $cstm = hook_shortcuts()) {
+        $res .= ' . ' . $cstm;
     }
-   
-    $res .= '[' . makeHREF(Array('group' => $group), $group) . '] ';
-
-    if (is_null($artid)) {
-        $res .= '[' . makeHREF(Array('group'  => $group,
-                                     'action' => 'new'),
-                               _b_('Nouveau message'))
-              . '] ';
-        if (sizeof($banana->spool->overview)>$banana->tmax) {
-            $res .= '<br />Page : ';
-            $n = intval(log(count($banana->spool->overview), 10))+1;
-            $i = 1;
-            for ($ndx = 1 ; $ndx <= sizeof($banana->spool->overview) ; $ndx += $banana->tmax) {
-                if ($first==$ndx) {
-                    $fmt = $i . ' ';
-                } else {
-                    $fmt = makeHREF(Array('group' => $group,
-                                          'first' => $ndx),
-                                    $i, 
-                                    '%0' . $n . 'u-%0' . $n . 'u')
-                         . ' ';
+    $res .= '<br />';
+    
+    $res .=  '<span class="title">Navigation :</span> '
+         . (is_null($group) ? 'Les forums' : makeHREF(Array(), _b_('Les forums')));
+
+    if (!is_null($group)) {
+        $res .= ' > ' . makeHREF(Array('group' => $group), $group);
+        if (is_null($artid)) {
+            if (sizeof($banana->spool->overview)>$banana->tmax) {
+                $res .= ' > Pages<br />';
+                $n = intval(log(count($banana->spool->overview), 10))+1;
+                $i = 1;
+                for ($ndx = 1 ; $ndx <= sizeof($banana->spool->overview) ; $ndx += $banana->tmax) {
+                    if ($first==$ndx) {
+                        $fmt = $i . ' ';
+                    } else {
+                        $fmt = makeHREF(Array('group' => $group,
+                                              'first' => $ndx),
+                                        $i, 
+                                        '%0' . $n . 'u-%0' . $n . 'u')
+                             . ' ';
+                    }
+                    $i++;
+                    $res .= sprintf($fmt, $ndx, min($ndx+$banana->tmax-1,sizeof($banana->spool->overview)));
                 }
-                $i++;
-                $res .= sprintf($fmt, $ndx, min($ndx+$banana->tmax-1,sizeof($banana->spool->overview)));
             }
-        }
-    } else {
-        $res .= '[' . makeHREF(Array('group'  => $group,
-                                     'artid'  => $artid,
-                                     'action' => 'new'),
-                               _b_('RĂ©pondre'))
-              . '] ';
-        if ($banana->post && $banana->post->checkcancel()) {
-            $res .= '[' . makeHREF(Array('group'  => $group,
-                                         'artid'  => $artid,
-                                         'action' => 'cancel'), 
-                                   _b_('Annuler ce message'))
-                  . '] ';
+        } else {
+            $res .= ' > Message';
         }
     }
     return $res.'</div>';
@@ -421,12 +427,16 @@ function displayshortcuts($first = -1) {
  *  FORMATTING STUFF : BODY
  */
 
-function autoformat($text)
+function autoformat($text, $part = false)
 {
     global $banana;
     $length = $banana->wrap;
-        
-    $cmd = "echo ".escapeshellarg($text)." | perl -MText::Autoformat -e 'autoformat {left=>1, right=>$length, all=>1 };'";
+    $all = null;
+    if (!$part) {
+        $all = ', all=1';
+    }
+    
+    $cmd = "echo ".escapeshellarg($text)." | perl -MText::Autoformat -e 'autoformat {left=>1, right=>$length$all };'";
     exec($cmd, $result, $ret);
     if ($ret != 0) {
         $result = split("\n", $text);
@@ -454,7 +464,8 @@ function wrap($text, $_prefix="", $_force=false)
     $format = false;
     foreach ($splits as $line) {
         if ($_force || strlen($line) > $max) {
-            if (preg_match("!^(.*)($url)(.*)!i", $line, $matches) && strlen($matches[2]) > $length && strlen($matches) < 900) {
+            if (preg_match("!^(.*)($url)(.*)!i", $line, $matches)
+                    && strlen($matches[2]) > $length && strlen($matches) < 900) {
                 if (strlen($matches[1]) != 0) {
                     array_push($next, rtrim($matches[1]));
                     if (strlen($matches[1]) > $max) {
@@ -478,8 +489,12 @@ function wrap($text, $_prefix="", $_force=false)
                     }
                 }
             } else {
-                $format = true;
-                array_push($next, $line);
+                if (strlen($line) > 2 * $max) {
+                    $next = array_merge($next, autoformat($line, true));
+                } else {
+                    $format = true;
+                    array_push($next, $line);
+                }
             }
         } else {
             array_push($next, $line);
@@ -517,7 +532,7 @@ function formatbody($_text, $format='plain', $flowed=false)
     } else if ($format == 'richtext') {
         $res = '<br/>'.html_entity_decode(to_entities(richtextToHtml($_text))).'<br/>';
     } else {
-        $res  = "\n\n" . to_entities(wrap($_text, "", $flowed))."\n\n";
+        $res  = "\n" . to_entities(wrap($_text, "", $flowed)) . "\n";
         $res  = formatPlainText($res);
     }
 
@@ -539,6 +554,8 @@ function formatbody($_text, $format='plain', $flowed=false)
         $res = preg_replace("@<br[^>]*>\n?-- ?\n?(<p[^>]*>)@", "<br/>-- <br/>\\2", $res);
         $res = preg_replace("@(<pre[^>]*>)\n?-- ?\n@", "<br/>-- <br/>\\1", $res);
         $parts = preg_split("@(:?<p[^>]*>\n?-- ?\n?</p>|<br[^>]*>\n?-- ?\n?<br[^>]*>)@", $res);
+        $sign  = '<hr style="width: 100%; margin: 1em 0em; " />';
+        $end   = '<br />';
     } else {
         while (preg_match("@(^|<pre>|\n)&gt;@i", $res)) {
             $res  = preg_replace("@(^|<pre>|\n)((&gt;[^\n]*\n)+)@ie",
@@ -549,21 +566,11 @@ function formatbody($_text, $format='plain', $flowed=false)
         }
         $res = preg_replace("@<pre>-- ?\n@", "<pre>\n-- \n", $res);
         $parts = preg_split("/\n-- ?\n/", $res);
+        $sign  = '</pre><hr style="width: 100%; margin: 1em 0em; " /><pre>';
+        $end   = null;
     }
 
-    if (count($parts) > 1) {
-        $sign  = array_pop($parts);
-        if ($format == 'html') {
-            $res  = join('<br/>-- <br/>', $parts);
-            $sign = '<hr style="width: 100%; margin: 1em 0em; " />'.$sign.'<br/>';
-        } else {
-            $res  = join('\n-- \n', $parts);
-            $sign = '</pre><hr style="width: 100%; margin: 1em 0em; " /><pre>'.$sign;
-        }
-        return $res.$sign;
-    } else {
-        return $res;
-    }
+    return join($sign, $parts) . $end;
 }
 
 // vim:set et sw=4 sts=4 ts=4