]> git.mxchange.org Git - friendica.git/blobdiff - include/text.php
Merge branch 'develop' into issue/missing-private-image-src
[friendica.git] / include / text.php
index 956344d63d622f9f00b089b053bf49ecbcce3414..89ab7254b6c9ad10869512a85adf9b8b6b5491bf 100644 (file)
@@ -12,7 +12,7 @@ if(! function_exists('replace_macros')) {
  * This is our template processor
  *
  * @param string|FriendicaSmarty $s the string requiring macro substitution,
- *                                                                     or an instance of FriendicaSmarty
+ *                             or an instance of FriendicaSmarty
  * @param array $r key value pairs (search => replace)
  * @return string substituted string
  */
@@ -581,14 +581,14 @@ function get_intltext_template($s) {
        if(! isset($lang))
                $lang = 'en';
 
-       if(file_exists("view/$lang$engine/$s")) {
+       if(file_exists("view/lang/$lang$engine/$s")) {
                $stamp1 = microtime(true);
-               $content = file_get_contents("view/$lang$engine/$s");
+               $content = file_get_contents("view/lang/$lang$engine/$s");
                $a->save_timestamp($stamp1, "file");
                return $content;
-       } elseif(file_exists("view/en$engine/$s")) {
+       } elseif(file_exists("view/lang/en$engine/$s")) {
                $stamp1 = microtime(true);
-               $content = file_get_contents("view/en$engine/$s");
+               $content = file_get_contents("view/lang/en$engine/$s");
                $a->save_timestamp($stamp1, "file");
                return $content;
        } else {
@@ -678,11 +678,13 @@ function attribute_contains($attr,$s) {
        return false;
 }}
 
-if(! function_exists('logger')) {
+if (! function_exists('logger')) {
 /* setup int->string log level map */
 $LOGGER_LEVELS = array();
 
 /**
+ * @brief Logs the given message at the given log level
+ *
  * log levels:
  * LOGGER_NORMAL (default)
  * LOGGER_TRACE
@@ -692,46 +694,63 @@ $LOGGER_LEVELS = array();
  *
  * @global App $a
  * @global dba $db
+ * @global array $LOGGER_LEVELS
  * @param string $msg
  * @param int $level
  */
-function logger($msg,$level = 0) {
-       // turn off logger in install mode
+function logger($msg, $level = 0) {
        global $a;
        global $db;
        global $LOGGER_LEVELS;
 
-       if(($a->module == 'install') || (! ($db && $db->connected))) return;
-
-       if (count($LOGGER_LEVELS)==0){
-               foreach (get_defined_constants() as $k=>$v){
-                       if (substr($k,0,7)=="LOGGER_")
-                               $LOGGER_LEVELS[$v] = substr($k,7,7);
-               }
+       // turn off logger in install mode
+       if (
+               $a->module == 'install'
+               || ! ($db && $db->connected)
+       ) {
+               return;
        }
 
        $debugging = get_config('system','debugging');
-       $loglevel  = intval(get_config('system','loglevel'));
        $logfile   = get_config('system','logfile');
+       $loglevel = intval(get_config('system','loglevel'));
 
-       if((! $debugging) || (! $logfile) || ($level > $loglevel))
+       if (
+               ! $debugging
+               || ! $logfile
+               || $level > $loglevel
+       ) {
                return;
+       }
+
+       if (count($LOGGER_LEVELS) == 0) {
+               foreach (get_defined_constants() as $k => $v) {
+                       if (substr($k, 0, 7) == "LOGGER_") {
+                               $LOGGER_LEVELS[$v] = substr($k, 7, 7);
+                       }
+               }
+       }
+
+       $process_id = session_id();
+
+       if ($process_id == '') {
+               $process_id = get_app()->process_id;
+       }
 
        $callers = debug_backtrace();
-       $logline =  sprintf("%s@%s\t[%s]:%s:%s:%s\t%s\n",
-                                datetime_convert(),
-                                session_id(),
-                                $LOGGER_LEVELS[$level],
-                                basename($callers[0]['file']),
-                                $callers[0]['line'],
-                                $callers[1]['function'],
-                                $msg
-                               );
+       $logline = sprintf("%s@%s\t[%s]:%s:%s:%s\t%s\n",
+                       datetime_convert(),
+                       $process_id,
+                       $LOGGER_LEVELS[$level],
+                       basename($callers[0]['file']),
+                       $callers[0]['line'],
+                       $callers[1]['function'],
+                       $msg
+               );
 
        $stamp1 = microtime(true);
        @file_put_contents($logfile, $logline, FILE_APPEND);
        $a->save_timestamp($stamp1, "file");
-       return;
 }}
 
 
@@ -750,71 +769,75 @@ function activity_match($haystack,$needle) {
 }}
 
 
-if(! function_exists('get_tags')) {
 /**
- * Pull out all #hashtags and @person tags from $s;
+ * @brief Pull out all #hashtags and @person tags from $string.
+ *
  * We also get @person@domain.com - which would make
  * the regex quite complicated as tags can also
  * end a sentence. So we'll run through our results
  * and strip the period from any tags which end with one.
  * Returns array of tags found, or empty array.
  *
- * @param string $s
- * @return array
+ * @param string $string Post content
+ * @return array List of tag and person names
  */
-function get_tags($s) {
+function get_tags($string) {
        $ret = array();
 
        // Convert hashtag links to hashtags
-       $s = preg_replace("/#\[url\=([^\[\]]*)\](.*?)\[\/url\]/ism", "#$2", $s);
+       $string = preg_replace('/#\[url\=([^\[\]]*)\](.*?)\[\/url\]/ism', '#$2', $string);
 
        // ignore anything in a code block
-       $s = preg_replace('/\[code\](.*?)\[\/code\]/sm','',$s);
+       $string = preg_replace('/\[code\](.*?)\[\/code\]/sm', '', $string);
 
        // Force line feeds at bbtags
-       $s = str_replace(array("[", "]"), array("\n[", "]\n"), $s);
+       $string = str_replace(array('[', ']'), array("\n[", "]\n"), $string);
 
        // ignore anything in a bbtag
-       $s = preg_replace('/\[(.*?)\]/sm','',$s);
+       $string = preg_replace('/\[(.*?)\]/sm', '', $string);
 
        // Match full names against @tags including the space between first and last
        // We will look these up afterward to see if they are full names or not recognisable.
 
-       if(preg_match_all('/(@[^ \x0D\x0A,:?]+ [^ \x0D\x0A@,:?]+)([ \x0D\x0A@,:?]|$)/',$s,$match)) {
-               foreach($match[1] as $mtch) {
-                       if(strstr($mtch,"]")) {
+       if (preg_match_all('/(@[^ \x0D\x0A,:?]+ [^ \x0D\x0A@,:?]+)([ \x0D\x0A@,:?]|$)/', $string, $matches)) {
+               foreach ($matches[1] as $match) {
+                       if (strstr($match, ']')) {
                                // we might be inside a bbcode color tag - leave it alone
                                continue;
                        }
-                       if(substr($mtch,-1,1) === '.')
-                               $ret[] = substr($mtch,0,-1);
-                       else
-                               $ret[] = $mtch;
+                       if (substr($match, -1, 1) === '.') {
+                               $ret[] = substr($match, 0, -1);
+                       } else {
+                               $ret[] = $match;
+                       }
                }
        }
 
        // Otherwise pull out single word tags. These can be @nickname, @first_last
        // and #hash tags.
 
-       if(preg_match_all('/([!#@][^ \x0D\x0A,;:?]+)([ \x0D\x0A,;:?]|$)/',$s,$match)) {
-               foreach($match[1] as $mtch) {
-                       if(strstr($mtch,"]")) {
+       if (preg_match_all('/([!#@][^\^ \x0D\x0A,;:?]+)([ \x0D\x0A,;:?]|$)/', $string, $matches)) {
+               foreach($matches[1] as $match) {
+                       if (strstr($match, ']')) {
                                // we might be inside a bbcode color tag - leave it alone
                                continue;
                        }
-                       if(substr($mtch,-1,1) === '.')
-                               $mtch = substr($mtch,0,-1);
+                       if (substr($match, -1, 1) === '.') {
+                               $match = substr($match,0,-1);
+                       }
                        // ignore strictly numeric tags like #1
-                       if((strpos($mtch,'#') === 0) && ctype_digit(substr($mtch,1)))
+                       if ((strpos($match, '#') === 0) && ctype_digit(substr($match, 1))) {
                                continue;
+                       }
                        // try not to catch url fragments
-                       if(strpos($s,$mtch) && preg_match('/[a-zA-z0-9\/]/',substr($s,strpos($s,$mtch)-1,1)))
+                       if (strpos($string, $match) && preg_match('/[a-zA-z0-9\/]/', substr($string, strpos($string, $match) - 1, 1))) {
                                continue;
-                       $ret[] = $mtch;
+                       }
+                       $ret[] = $match;
                }
        }
        return $ret;
-}}
+}
 
 
 //
@@ -851,8 +874,8 @@ function contact_block() {
        if((! is_array($a->profile)) || ($a->profile['hide-friends']))
                return $o;
        $r = q("SELECT COUNT(*) AS `total` FROM `contact`
-                       WHERE `uid` = %d AND `self` = 0 AND `blocked` = 0 and `pending` = 0
-                               AND `hidden` = 0 AND `archive` = 0
+                       WHERE `uid` = %d AND NOT `self` AND NOT `blocked`
+                               AND NOT `hidden` AND NOT `archive`
                                AND `network` IN ('%s', '%s', '%s')",
                        intval($a->profile['uid']),
                        dbesc(NETWORK_DFRN),
@@ -867,8 +890,9 @@ function contact_block() {
                $micropro = Null;
 
        } else {
-               $r = q("SELECT `id`, `uid`, `addr`, `url`, `name`, `micro`, `network` FROM `contact`
-                               WHERE `uid` = %d AND NOT `self` AND NOT `blocked` AND NOT `pending`
+               // Splitting the query in two parts makes it much faster
+               $r = q("SELECT `id` FROM `contact`
+                               WHERE `uid` = %d AND NOT `self` AND NOT `blocked`
                                        AND NOT `hidden` AND NOT `archive`
                                AND `network` IN ('%s', '%s', '%s') ORDER BY RAND() LIMIT %d",
                                intval($a->profile['uid']),
@@ -877,11 +901,19 @@ function contact_block() {
                                dbesc(NETWORK_DIASPORA),
                                intval($shown)
                );
-               if(count($r)) {
-                       $contacts = sprintf( tt('%d Contact','%d Contacts', $total),$total);
-                       $micropro = Array();
-                       foreach($r as $rr) {
-                               $micropro[] = micropro($rr,true,'mpfriend');
+               if ($r) {
+                       $contacts = "";
+                       foreach ($r AS $contact)
+                               $contacts[] = $contact["id"];
+
+                       $r = q("SELECT `id`, `uid`, `addr`, `url`, `name`, `thumb`, `network` FROM `contact` WHERE `id` IN (%s)",
+                               dbesc(implode(",", $contacts)));
+                       if(count($r)) {
+                               $contacts = sprintf( tt('%d Contact','%d Contacts', $total),$total);
+                               $micropro = Array();
+                               foreach($r as $rr) {
+                                       $micropro[] = micropro($rr,true,'mpfriend');
+                               }
                        }
                }
        }
@@ -901,20 +933,28 @@ function contact_block() {
 
 }}
 
-if(! function_exists('micropro')) {
 /**
+ * @brief Format contacts as picture links or as texxt links
  *
- * @param array $contact
- * @param boolean $redirect
- * @param string $class
- * @param boolean $textmode
- * @return string #FIXME: remove html
+ * @param array $contact Array with contacts which contains an array with
+ *     int 'id' => The ID of the contact
+ *     int 'uid' => The user ID of the user who owns this data
+ *     string 'name' => The name of the contact
+ *     string 'url' => The url to the profile page of the contact
+ *     string 'addr' => The webbie of the contact (e.g.) username@friendica.com
+ *     string 'network' => The network to which the contact belongs to
+ *     string 'thumb' => The contact picture
+ *     string 'click' => js code which is performed when clicking on the contact
+ * @param boolean $redirect If true try to use the redir url if it's possible
+ * @param string $class CSS class for the
+ * @param boolean $textmode If true display the contacts as text links
+ *     if false display the contacts as picture links
+
+ * @return string Formatted html
  */
 function micropro($contact, $redirect = false, $class = '', $textmode = false) {
 
-       if($class)
-               $class = ' ' . $class;
-
+       // Use the contact URL if no address is available
        if ($contact["addr"] == "")
                $contact["addr"] = $contact["url"];
 
@@ -933,26 +973,23 @@ function micropro($contact, $redirect = false, $class = '', $textmode = false) {
                else
                        $url = zrl($url);
        }
-       $click = ((x($contact,'click')) ? ' onclick="' . $contact['click'] . '" ' : '');
-       if($click)
+
+       // If there is some js available we don't need the url
+       if(x($contact,'click'))
                $url = '';
-       if($textmode) {
-               return '<div class="contact-block-textdiv' . $class . '"><a class="contact-block-link' . $class . $sparkle
-                       . (($click) ? ' fakelink' : '') . '" '
-                       . (($redir) ? ' target="redir" ' : '')
-                       . (($url) ? ' href="' . $url . '"' : '') . $click
-                       . '" title="' . $contact['name'] . ' [' . $contact['addr'] . ']" alt="' . $contact['name']
-                       . '" >'. $contact['name'] . '</a></div>' . "\r\n";
-       }
-       else {
-               return '<div class="contact-block-div' . $class . '"><a class="contact-block-link' . $class . $sparkle
-                       . (($click) ? ' fakelink' : '') . '" '
-                       . (($redir) ? ' target="redir" ' : '')
-                       . (($url) ? ' href="' . $url . '"' : '') . $click . ' ><img class="contact-block-img' . $class . $sparkle . '" src="'
-                       . proxy_url($contact['micro'], false, PROXY_SIZE_THUMB) . '" title="' . $contact['name'] . ' [' . $contact['addr'] . ']" alt="' . $contact['name']
-                       . '" /></a></div>' . "\r\n";
-       }
-}}
+
+       return replace_macros(get_markup_template(($textmode)?'micropro_txt.tpl':'micropro_img.tpl'),array(
+               '$click' => (($contact['click']) ? $contact['click'] : ''),
+               '$class' => $class,
+               '$url' => $url,
+               '$photo' => proxy_url($contact['thumb'], false, PROXY_SIZE_THUMB),
+               '$name' => $contact['name'],
+               'title' => $contact['name'] . ' [' . $contact['addr'] . ']',
+               '$parkle' => $sparkle,
+               '$redir' => $redir,
+
+       ));
+}
 
 
 
@@ -969,12 +1006,13 @@ function search($s,$id='search-box',$url='search',$save = false, $aside = true)
        $a = get_app();
 
        $values = array(
-                       '$s' => $s,
+                       '$s' => htmlspecialchars($s),
                        '$id' => $id,
                        '$action_url' => $url,
                        '$search_label' => t('Search'),
                        '$save_label' => t('Save'),
                        '$savedsearch' => feature_enabled(local_user(),'savedsearch'),
+                       '$search_hint' => t('@name, !forum, #tags, content'),
                );
 
        if (!$aside) {
@@ -1132,33 +1170,29 @@ function link_compare($a,$b) {
        return false;
 }}
 
-
-if(! function_exists('redir_private_images')) {
 /**
- * Find any non-embedded images in private items and add redir links to them
+ * @brief Find any non-embedded images in private items and add redir links to them
  *
  * @param App $a
- * @param array $item
+ * @param array &$item The field array of an item row
  */
-function redir_private_images($a, &$item) {
-
+function redir_private_images($a, &$item)
+{
        $matches = false;
        $cnt = preg_match_all('|\[img\](http[^\[]*?/photo/[a-fA-F0-9]+?(-[0-9]\.[\w]+?)?)\[\/img\]|', $item['body'], $matches, PREG_SET_ORDER);
-       if($cnt) {
-               //logger("redir_private_images: matches = " . print_r($matches, true));
-               foreach($matches as $mtch) {
-                       if(strpos($mtch[1], '/redir') !== false)
+       if ($cnt) {
+               foreach ($matches as $mtch) {
+                       if(strpos($mtch[1], '/redir') !== false) {
                                continue;
+                       }
 
-                       if((local_user() == $item['uid']) && ($item['private'] != 0) && ($item['contact-id'] != $a->contact['id']) && ($item['network'] == NETWORK_DFRN)) {
-                               //logger("redir_private_images: redir");
-                               $img_url = 'redir?f=1&quiet=1&url=' . $mtch[1] . '&conurl=' . $item['author-link'];
-                               $item['body'] = str_replace($mtch[0], "[img]".$img_url."[/img]", $item['body']);
+                       if ((local_user() == $item['uid']) && ($item['private'] != 0) && ($item['contact-id'] != $a->contact['id']) && ($item['network'] == NETWORK_DFRN)) {
+                               $img_url = $a->get_baseurl() . '/redir?f=1&quiet=1&url=' . urlencode($mtch[1]) . '&conurl=' . urlencode($item['author-link']);
+                               $item['body'] = str_replace($mtch[0], '[img]' . $img_url . '[/img]', $item['body']);
                        }
                }
        }
-
-}}
+}
 
 function put_item_in_cache(&$item, $update = false) {
 
@@ -2067,7 +2101,7 @@ function formatBytes($bytes, $precision = 2) {
 
 /**
  * @brief translate and format the networkname of a contact
- * 
+ *
  * @param string $network
  *     Networkname of the contact (e.g. dfrn, rss and so on)
  * @param sting $url
@@ -2086,3 +2120,54 @@ function format_network_name($network, $url = 0) {
        }
 
 }
+
+/**
+ * @brief Syntax based code highlighting for popular languages.
+ * @param string $s Code block
+ * @param string $lang Programming language
+ * @return string Formated html
+ */
+function text_highlight($s,$lang) {
+       if($lang === 'js')
+               $lang = 'javascript';
+
+       if(! strpos('Text_Highlighter',get_include_path())) {
+               set_include_path(get_include_path() . PATH_SEPARATOR . 'library/Text_Highlighter');
+       }
+
+       require_once('library/Text_Highlighter/Text/Highlighter.php');
+       require_once('library/Text_Highlighter/Text/Highlighter/Renderer/Html.php');
+       $options = array(
+               'numbers' => HL_NUMBERS_LI,
+               'tabsize' => 4,
+               );
+
+       $tag_added = false;
+       $s = trim(html_entity_decode($s,ENT_COMPAT));
+       $s = str_replace("    ","\t",$s);
+
+       // The highlighter library insists on an opening php tag for php code blocks. If
+       // it isn't present, nothing is highlighted. So we're going to see if it's present.
+       // If not, we'll add it, and then quietly remove it after we get the processed output back.
+
+       if($lang === 'php') {
+               if(strpos('<?php',$s) !== 0) {
+                       $s = '<?php' . "\n" . $s;
+                       $tag_added = true;
+               }
+       }
+
+       $renderer = new Text_Highlighter_Renderer_HTML($options);
+       $hl = Text_Highlighter::factory($lang);
+       $hl->setRenderer($renderer);
+       $o = $hl->highlight($s);
+       $o = str_replace(["    ","\n"],["&nbsp;&nbsp;&nbsp;&nbsp;",''],$o);
+
+       if($tag_added) {
+               $b = substr($o,0,strpos($o,'<li>'));
+               $e = substr($o,strpos($o,'</li>'));
+               $o = $b . $e;
+       }
+
+       return('<code>' . $o . '</code>');
+}