]> git.mxchange.org Git - friendica.git/blobdiff - include/text.php
Move to XML
[friendica.git] / include / text.php
index f145c03e5306d7f129cfd710d9e2f58e4b9aa2ee..fadd375921dd09bc7d0bb0228a83b6c89b6fef37 100644 (file)
@@ -12,48 +12,23 @@ use Friendica\Core\Addon;
 use Friendica\Core\Config;
 use Friendica\Core\L10n;
 use Friendica\Core\PConfig;
+use Friendica\Core\Protocol;
 use Friendica\Core\System;
-use Friendica\Database\DBM;
+use Friendica\Database\DBA;
 use Friendica\Model\Contact;
 use Friendica\Model\Event;
 use Friendica\Model\Item;
-use Friendica\Model\Profile;
 use Friendica\Render\FriendicaSmarty;
 use Friendica\Util\DateTimeFormat;
 use Friendica\Util\Map;
+use Friendica\Util\Proxy as ProxyUtils;
 
-require_once "mod/proxy.php";
-require_once "include/conversation.php";
-
-/**
- * This is our template processor
- *
- * @param string|FriendicaSmarty $s the string requiring macro substitution,
- *                             or an instance of FriendicaSmarty
- * @param array $r key value pairs (search => replace)
- * @return string substituted string
- */
-function replace_macros($s, $r) {
-
-       $stamp1 = microtime(true);
-
-       $a = get_app();
-
-       // pass $baseurl to all templates
-       $r['$baseurl'] = System::baseUrl();
-
-       $t = $a->template_engine();
-       try {
-               $output = $t->replaceMacros($s, $r);
-       } catch (Exception $e) {
-               echo "<pre><b>" . __FUNCTION__ . "</b>: " . $e->getMessage() . "</pre>";
-               killme();
-       }
-
-       $a->save_timestamp($stamp1, "rendering");
+use Friendica\Core\Logger;
+use Friendica\Core\Renderer;
+use Friendica\Model\FileTag;
+use Friendica\Util\XML;
 
-       return $output;
-}
+require_once "include/conversation.php";
 
 /**
  * @brief Generates a pseudo-random string of hexadecimal characters
@@ -188,213 +163,13 @@ function autoname($len) {
        return $word;
 }
 
-
-/**
- * escape text ($str) for XML transport
- * @param string $str
- * @return string Escaped text.
- */
-function xmlify($str) {
-       /// @TODO deprecated code found?
-/*     $buffer = '';
-
-       $len = mb_strlen($str);
-       for ($x = 0; $x < $len; $x ++) {
-               $char = mb_substr($str,$x,1);
-
-               switch($char) {
-
-                       case "\r" :
-                               break;
-                       case "&" :
-                               $buffer .= '&amp;';
-                               break;
-                       case "'" :
-                               $buffer .= '&apos;';
-                               break;
-                       case "\"" :
-                               $buffer .= '&quot;';
-                               break;
-                       case '<' :
-                               $buffer .= '&lt;';
-                               break;
-                       case '>' :
-                               $buffer .= '&gt;';
-                               break;
-                       case "\n" :
-                               $buffer .= "\n";
-                               break;
-                       default :
-                               $buffer .= $char;
-                               break;
-               }
-       }*/
-       /*
-       $buffer = mb_ereg_replace("&", "&amp;", $str);
-       $buffer = mb_ereg_replace("'", "&apos;", $buffer);
-       $buffer = mb_ereg_replace('"', "&quot;", $buffer);
-       $buffer = mb_ereg_replace("<", "&lt;", $buffer);
-       $buffer = mb_ereg_replace(">", "&gt;", $buffer);
-       */
-       $buffer = htmlspecialchars($str, ENT_QUOTES, "UTF-8");
-       $buffer = trim($buffer);
-
-       return $buffer;
-}
-
-
-/**
- * undo an xmlify
- * @param string $s xml escaped text
- * @return string unescaped text
- */
-function unxmlify($s) {
-       /// @TODO deprecated code found?
-//     $ret = str_replace('&amp;','&', $s);
-//     $ret = str_replace(array('&lt;','&gt;','&quot;','&apos;'),array('<','>','"',"'"),$ret);
-       /*$ret = mb_ereg_replace('&amp;', '&', $s);
-       $ret = mb_ereg_replace('&apos;', "'", $ret);
-       $ret = mb_ereg_replace('&quot;', '"', $ret);
-       $ret = mb_ereg_replace('&lt;', "<", $ret);
-       $ret = mb_ereg_replace('&gt;', ">", $ret);
-       */
-       $ret = htmlspecialchars_decode($s, ENT_QUOTES);
-       return $ret;
-}
-
-
-/**
- * @brief Paginator function. Pushes relevant links in a pager array structure.
- *
- * Links are generated depending on the current page and the total number of items.
- * Inactive links (like "first" and "prev" on page 1) are given the "disabled" class.
- * Current page link is given the "active" CSS class
- *
- * @param App $a App instance
- * @param int $count [optional] item count (used with minimal pager)
- * @return Array data for pagination template
- */
-function paginate_data(App $a, $count = null) {
-       $stripped = preg_replace('/([&?]page=[0-9]*)/', '', $a->query_string);
-
-       $stripped = str_replace('q=', '', $stripped);
-       $stripped = trim($stripped, '/');
-       $pagenum = $a->pager['page'];
-
-       if (($a->page_offset != '') && !preg_match('/[?&].offset=/', $stripped)) {
-               $stripped .= '&offset=' . urlencode($a->page_offset);
-       }
-
-       $url = $stripped;
-       $data = [];
-
-       function _l(&$d, $name, $url, $text, $class = '') {
-               if (strpos($url, '?') === false && ($pos = strpos($url, '&')) !== false) {
-                       $url = substr($url, 0, $pos) . '?' . substr($url, $pos + 1);
-               }
-
-               $d[$name] = ['url' => $url, 'text' => $text, 'class' => $class];
-       }
-
-       if (!is_null($count)) {
-               // minimal pager (newer / older)
-               $data['class'] = 'pager';
-               _l($data, 'prev', $url . '&page=' . ($a->pager['page'] - 1), L10n::t('newer'), 'previous' . ($a->pager['page'] == 1 ? ' disabled' : ''));
-               _l($data, 'next', $url . '&page=' . ($a->pager['page'] + 1), L10n::t('older'), 'next' . ($count <= 0 ? ' disabled' : ''));
-       } else {
-               // full pager (first / prev / 1 / 2 / ... / 14 / 15 / next / last)
-               $data['class'] = 'pagination';
-               if ($a->pager['total'] > $a->pager['itemspage']) {
-                       _l($data, 'first', $url . '&page=1', L10n::t('first'), $a->pager['page'] == 1 ? 'disabled' : '');
-                       _l($data, 'prev', $url . '&page=' . ($a->pager['page'] - 1), L10n::t('prev'), $a->pager['page'] == 1 ? 'disabled' : '');
-
-                       $numpages = $a->pager['total'] / $a->pager['itemspage'];
-
-                       $numstart = 1;
-                       $numstop = $numpages;
-
-                       // Limit the number of displayed page number buttons.
-                       if ($numpages > 8) {
-                               $numstart = (($pagenum > 4) ? ($pagenum - 4) : 1);
-                               $numstop = (($pagenum > ($numpages - 7)) ? $numpages : ($numstart + 8));
-                       }
-
-                       $pages = [];
-
-                       for ($i = $numstart; $i <= $numstop; $i++) {
-                               if ($i == $a->pager['page']) {
-                                       _l($pages, $i, '#',  $i, 'current active');
-                               } else {
-                                       _l($pages, $i, $url . '&page='. $i, $i, 'n');
-                               }
-                       }
-
-                       if (($a->pager['total'] % $a->pager['itemspage']) != 0) {
-                               if ($i == $a->pager['page']) {
-                                       _l($pages, $i, '#',  $i, 'current active');
-                               } else {
-                                       _l($pages, $i, $url . '&page=' . $i, $i, 'n');
-                               }
-                       }
-
-                       $data['pages'] = $pages;
-
-                       $lastpage = (($numpages > intval($numpages)) ? intval($numpages)+1 : $numpages);
-                       _l($data, 'next', $url . '&page=' . ($a->pager['page'] + 1), L10n::t('next'), $a->pager['page'] == $lastpage ? 'disabled' : '');
-                       _l($data, 'last', $url . '&page=' . $lastpage, L10n::t('last'), $a->pager['page'] == $lastpage ? 'disabled' : '');
-               }
-       }
-
-       return $data;
-}
-
-
-/**
- * Automatic pagination.
- *
- *  To use, get the count of total items.
- * Then call $a->set_pager_total($number_items);
- * Optionally call $a->set_pager_itemspage($n) to the number of items to display on each page
- * Then call paginate($a) after the end of the display loop to insert the pager block on the page
- * (assuming there are enough items to paginate).
- * When using with SQL, the setting LIMIT %d, %d => $a->pager['start'],$a->pager['itemspage']
- * will limit the results to the correct items for the current page.
- * The actual page handling is then accomplished at the application layer.
- *
- * @param App $a App instance
- * @return string html for pagination #FIXME remove html
- */
-function paginate(App $a) {
-
-       $data = paginate_data($a);
-       $tpl = get_markup_template("paginate.tpl");
-       return replace_macros($tpl, ["pager" => $data]);
-
-}
-
-
-/**
- * Alternative pager
- * @param App $a App instance
- * @param int $i
- * @return string html for pagination #FIXME remove html
- */
-function alt_pager(App $a, $i) {
-
-       $data = paginate_data($a, $i);
-       $tpl = get_markup_template("paginate.tpl");
-       return replace_macros($tpl, ['pager' => $data]);
-
-}
-
-
 /**
  * Loader for infinite scrolling
  * @return string html for loader
  */
 function scroll_loader() {
-       $tpl = get_markup_template("scroll_loader.tpl");
-       return replace_macros($tpl, [
+       $tpl = Renderer::getMarkupTemplate("scroll_loader.tpl");
+       return Renderer::replaceMacros($tpl, [
                'wait' => L10n::t('Loading more entries...'),
                'end' => L10n::t('The end')
        ]);
@@ -462,137 +237,6 @@ function perms2str($p) {
        return $ret;
 }
 
-
-/**
- * generate a guaranteed unique (for this domain) item ID for ATOM
- * safe from birthday paradox
- *
- * @param string $hostname
- * @param int $uid
- * @return string
- */
-function item_new_uri($hostname, $uid, $guid = "") {
-
-       do {
-               if ($guid == "") {
-                       $hash = get_guid(32);
-               } else {
-                       $hash = $guid;
-                       $guid = "";
-               }
-
-               $uri = "urn:X-dfrn:" . $hostname . ':' . $uid . ':' . $hash;
-
-               $dups = dba::exists('item', ['uri' => $uri]);
-       } while ($dups == true);
-
-       return $uri;
-}
-
-/**
- * @deprecated
- * wrapper to load a view template, checking for alternate
- * languages before falling back to the default
- *
- * @global string $lang
- * @global App $a
- * @param string $s view name
- * @return string
- */
-function load_view_file($s) {
-       global $lang, $a;
-       if (! isset($lang)) {
-               $lang = 'en';
-       }
-       $b = basename($s);
-       $d = dirname($s);
-       if (file_exists("$d/$lang/$b")) {
-               $stamp1 = microtime(true);
-               $content = file_get_contents("$d/$lang/$b");
-               $a->save_timestamp($stamp1, "file");
-               return $content;
-       }
-
-       $theme = $a->getCurrentTheme();
-
-       if (file_exists("$d/theme/$theme/$b")) {
-               $stamp1 = microtime(true);
-               $content = file_get_contents("$d/theme/$theme/$b");
-               $a->save_timestamp($stamp1, "file");
-               return $content;
-       }
-
-       $stamp1 = microtime(true);
-       $content = file_get_contents($s);
-       $a->save_timestamp($stamp1, "file");
-       return $content;
-}
-
-
-/**
- * load a view template, checking for alternate
- * languages before falling back to the default
- *
- * @global string $lang
- * @param string $s view path
- * @return string
- */
-function get_intltext_template($s) {
-       global $lang;
-
-       $a = get_app();
-       $engine = '';
-       if ($a->theme['template_engine'] === 'smarty3') {
-               $engine = "/smarty3";
-       }
-
-       if (! isset($lang)) {
-               $lang = 'en';
-       }
-
-       if (file_exists("view/lang/$lang$engine/$s")) {
-               $stamp1 = microtime(true);
-               $content = file_get_contents("view/lang/$lang$engine/$s");
-               $a->save_timestamp($stamp1, "file");
-               return $content;
-       } elseif (file_exists("view/lang/en$engine/$s")) {
-               $stamp1 = microtime(true);
-               $content = file_get_contents("view/lang/en$engine/$s");
-               $a->save_timestamp($stamp1, "file");
-               return $content;
-       } else {
-               $stamp1 = microtime(true);
-               $content = file_get_contents("view$engine/$s");
-               $a->save_timestamp($stamp1, "file");
-               return $content;
-       }
-}
-
-
-/**
- * load template $s
- *
- * @param string $s
- * @param string $root
- * @return string
- */
-function get_markup_template($s, $root = '') {
-       $stamp1 = microtime(true);
-
-       $a = get_app();
-       $t = $a->template_engine();
-       try {
-               $template = $t->getTemplateFile($s, $root);
-       } catch (Exception $e) {
-               echo "<pre><b>" . __FUNCTION__ . "</b>: " . $e->getMessage() . "</pre>";
-               killme();
-       }
-
-       $a->save_timestamp($stamp1, "file");
-
-       return $template;
-}
-
 /**
  *  for html,xml parsing - let's say you've got
  *  an attribute foobar="class1 class2 class3"
@@ -612,149 +256,6 @@ function attribute_contains($attr, $s) {
        return (count($a) && in_array($s,$a));
 }
 
-
-/* setup int->string log level map */
-$LOGGER_LEVELS = [];
-
-/**
- * @brief Logs the given message at the given log level
- *
- * log levels:
- * LOGGER_NORMAL (default)
- * LOGGER_TRACE
- * LOGGER_DEBUG
- * LOGGER_DATA
- * LOGGER_ALL
- *
- * @global App $a
- * @global array $LOGGER_LEVELS
- * @param string $msg
- * @param int $level
- */
-function logger($msg, $level = 0) {
-       $a = get_app();
-       global $LOGGER_LEVELS;
-
-       // turn off logger in install mode
-       if (
-               $a->mode == App::MODE_INSTALL
-               || !dba::$connected
-       ) {
-               return;
-       }
-
-       $debugging = Config::get('system','debugging');
-       $logfile   = Config::get('system','logfile');
-       $loglevel = intval(Config::get('system','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",
-                       DateTimeFormat::utcNow(DateTimeFormat::ATOM),
-                       $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");
-}
-
-/**
- * @brief An alternative logger for development.
- * Works largely as logger() but allows developers
- * to isolate particular elements they are targetting
- * personally without background noise
- *
- * log levels:
- * LOGGER_NORMAL (default)
- * LOGGER_TRACE
- * LOGGER_DEBUG
- * LOGGER_DATA
- * LOGGER_ALL
- *
- * @global App $a
- * @global array $LOGGER_LEVELS
- * @param string $msg
- * @param int $level
- */
-
-function dlogger($msg, $level = 0) {
-       $a = get_app();
-
-       // turn off logger in install mode
-       if (
-               $a->mode == App::MODE_INSTALL
-               || !dba::$connected
-       ) {
-               return;
-       }
-
-       $logfile = Config::get('system', 'dlogfile');
-       if (! $logfile) {
-               return;
-       }
-
-       $dlogip = Config::get('system', 'dlogip');
-       if (!is_null($dlogip) && $_SERVER['REMOTE_ADDR'] != $dlogip) {
-               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@\t%s:\t%s:\t%s\t%s\t%s\n",
-                       DateTimeFormat::utcNow(),
-                       $process_id,
-                       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");
-}
-
-
 /**
  * Compare activity uri. Knows about activity namespace.
  *
@@ -873,11 +374,11 @@ function contact_block() {
                                AND NOT `pending` AND NOT `hidden` AND NOT `archive`
                                AND `network` IN ('%s', '%s', '%s')",
                        intval($a->profile['uid']),
-                       dbesc(NETWORK_DFRN),
-                       dbesc(NETWORK_OSTATUS),
-                       dbesc(NETWORK_DIASPORA)
+                       DBA::escape(Protocol::DFRN),
+                       DBA::escape(Protocol::OSTATUS),
+                       DBA::escape(Protocol::DIASPORA)
        );
-       if (DBM::is_result($r)) {
+       if (DBA::isResult($r)) {
                $total = intval($r[0]['total']);
        }
        if (!$total) {
@@ -891,20 +392,20 @@ function contact_block() {
                                        AND `network` IN ('%s', '%s', '%s')
                                ORDER BY RAND() LIMIT %d",
                                intval($a->profile['uid']),
-                               dbesc(NETWORK_DFRN),
-                               dbesc(NETWORK_OSTATUS),
-                               dbesc(NETWORK_DIASPORA),
+                               DBA::escape(Protocol::DFRN),
+                               DBA::escape(Protocol::OSTATUS),
+                               DBA::escape(Protocol::DIASPORA),
                                intval($shown)
                );
-               if (DBM::is_result($r)) {
+               if (DBA::isResult($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)));
+                               DBA::escape(implode(",", $contacts)));
 
-                       if (DBM::is_result($r)) {
+                       if (DBA::isResult($r)) {
                                $contacts = L10n::tt('%d Contact', '%d Contacts', $total);
                                $micropro = [];
                                foreach ($r as $rr) {
@@ -914,8 +415,8 @@ function contact_block() {
                }
        }
 
-       $tpl = get_markup_template('contact_block.tpl');
-       $o = replace_macros($tpl, [
+       $tpl = Renderer::getMarkupTemplate('contact_block.tpl');
+       $o = Renderer::replaceMacros($tpl, [
                '$contacts' => $contacts,
                '$nickname' => $a->profile['nickname'],
                '$viewcontacts' => L10n::t('View Contacts'),
@@ -972,11 +473,11 @@ function micropro($contact, $redirect = false, $class = '', $textmode = false) {
                $url = '';
        }
 
-       return replace_macros(get_markup_template(($textmode)?'micropro_txt.tpl':'micropro_img.tpl'),[
+       return Renderer::replaceMacros(Renderer::getMarkupTemplate(($textmode)?'micropro_txt.tpl':'micropro_img.tpl'),[
                '$click' => defaults($contact, 'click', ''),
                '$class' => $class,
                '$url' => $url,
-               '$photo' => proxy_url($contact['thumb'], false, PROXY_SIZE_THUMB),
+               '$photo' => ProxyUtils::proxifyUrl($contact['thumb'], false, ProxyUtils::SIZE_THUMB),
                '$name' => $contact['name'],
                'title' => $contact['name'] . ' [' . $contact['addr'] . ']',
                '$parkle' => $sparkle,
@@ -1011,7 +512,7 @@ function search($s, $id = 'search-box', $url = 'search', $save = false, $aside =
                        '$action_url' => $url,
                        '$search_label' => L10n::t('Search'),
                        '$save_label' => $save_label,
-                       '$savedsearch' => Feature::isEnabled(local_user(),'savedsearch'),
+                       '$savedsearch' => local_user() && Feature::isEnabled(local_user(),'savedsearch'),
                        '$search_hint' => L10n::t('@name, !forum, #tags, content'),
                        '$mode' => $mode
                ];
@@ -1027,7 +528,7 @@ function search($s, $id = 'search-box', $url = 'search', $save = false, $aside =
                }
        }
 
-       return replace_macros(get_markup_template('searchbox.tpl'), $values);
+       return Renderer::replaceMacros(Renderer::getMarkupTemplate('searchbox.tpl'), $values);
 }
 
 /**
@@ -1157,7 +658,7 @@ function redir_private_images($a, &$item)
                                continue;
                        }
 
-                       if ((local_user() == $item['uid']) && ($item['private'] != 0) && ($item['contact-id'] != $a->contact['id']) && ($item['network'] == NETWORK_DFRN)) {
+                       if ((local_user() == $item['uid']) && ($item['private'] == 1) && ($item['contact-id'] != $a->contact['id']) && ($item['network'] == Protocol::DFRN)) {
                                $img_url = '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']);
                        }
@@ -1183,7 +684,7 @@ function put_item_in_cache(&$item, $update = false)
        $rendered_html = defaults($item, 'rendered-html', '');
 
        if ($rendered_hash == ''
-               || $item["rendered-html"] == ""
+               || $rendered_html == ""
                || $rendered_hash != hash("md5", $item["body"])
                || Config::get("system", "ignore_cache")
        ) {
@@ -1193,6 +694,12 @@ function put_item_in_cache(&$item, $update = false)
                $item["rendered-html"] = prepare_text($item["body"]);
                $item["rendered-hash"] = hash("md5", $item["body"]);
 
+               $hook_data = ['item' => $item, 'rendered-html' => $item['rendered-html'], 'rendered-hash' => $item['rendered-hash']];
+               Addon::callHooks('put_item_in_cache', $hook_data);
+               $item['rendered-html'] = $hook_data['rendered-html'];
+               $item['rendered-hash'] = $hook_data['rendered-hash'];
+               unset($hook_data);
+
                // Force an update if the generated values differ from the existing ones
                if ($rendered_hash != $item["rendered-hash"]) {
                        $update = true;
@@ -1203,9 +710,9 @@ function put_item_in_cache(&$item, $update = false)
                        $update = true;
                }
 
-               if ($update && ($item["id"] > 0)) {
-                       dba::update('item', ['rendered-html' => $item["rendered-html"], 'rendered-hash' => $item["rendered-hash"]],
-                                       ['id' => $item["id"]], false);
+               if ($update && !empty($item["id"])) {
+                       Item::update(['rendered-html' => $item["rendered-html"], 'rendered-hash' => $item["rendered-hash"]],
+                                       ['id' => $item["id"]]);
                }
        }
 
@@ -1280,9 +787,7 @@ function prepare_body(array &$item, $attach = false, $is_preview = false)
        $s = $hook_data['html'];
        unset($hook_data);
 
-       $s = apply_content_filter($s, $filter_reasons);
-
-       if (! $attach) {
+       if (!$attach) {
                // Replace the blockquotes with quotes that are used in mails.
                $mailquote = '<blockquote type="cite" class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">';
                $s = str_replace(['<blockquote>', '<blockquote class="spoiler">', '<blockquote class="author">'], [$mailquote, $mailquote, $mailquote], $s);
@@ -1301,16 +806,14 @@ function prepare_body(array &$item, $attach = false, $is_preview = false)
                if (strpos($mime, 'video') !== false) {
                        if (!$vhead) {
                                $vhead = true;
-                               $a->page['htmlhead'] .= replace_macros(get_markup_template('videos_head.tpl'), [
-                                       '$baseurl' => System::baseUrl(),
-                               ]);
-                               $a->page['end'] .= replace_macros(get_markup_template('videos_end.tpl'), [
+                               $a->page['htmlhead'] .= Renderer::replaceMacros(Renderer::getMarkupTemplate('videos_head.tpl'), [
                                        '$baseurl' => System::baseUrl(),
                                ]);
                        }
 
-                       $id = end(explode('/', $the_url));
-                       $as .= replace_macros(get_markup_template('video_top.tpl'), [
+                       $url_parts = explode('/', $the_url);
+                       $id = end($url_parts);
+                       $as .= Renderer::replaceMacros(Renderer::getMarkupTemplate('video_top.tpl'), [
                                '$video' => [
                                        'id'     => $id,
                                        'title'  => L10n::t('View Video'),
@@ -1385,6 +888,8 @@ function prepare_body(array &$item, $attach = false, $is_preview = false)
                $s = preg_replace('|(<img[^>]+src="[^"]+/photo/[0-9a-f]+)-[0-9]|', "$1-" . $ps, $s);
        }
 
+       $s = apply_content_filter($s, $filter_reasons);
+
        $hook_data = ['item' => $item, 'html' => $s];
        Addon::callHooks('prepare_body_final', $hook_data);
 
@@ -1403,8 +908,8 @@ function prepare_body(array &$item, $attach = false, $is_preview = false)
 function apply_content_filter($html, array $reasons)
 {
        if (count($reasons)) {
-               $tpl = get_markup_template('wall/content_filter.tpl');
-               $html = replace_macros($tpl, [
+               $tpl = Renderer::getMarkupTemplate('wall/content_filter.tpl');
+               $html = Renderer::replaceMacros($tpl, [
                        '$reasons'   => $reasons,
                        '$rnd'       => random_string(8),
                        '$openclose' => L10n::t('Click to open/close'),
@@ -1469,9 +974,9 @@ function get_cats_and_terms($item)
        if ($cnt) {
                foreach ($matches as $mtch) {
                        $categories[] = [
-                               'name' => xmlify(file_tag_decode($mtch[1])),
+                               'name' => XML::xmlify(FileTag::decode($mtch[1])),
                                'url' =>  "#",
-                               'removeurl' => ((local_user() == $item['uid'])?'filerm/' . $item['id'] . '?f=&cat=' . xmlify(file_tag_decode($mtch[1])):""),
+                               'removeurl' => ((local_user() == $item['uid'])?'filerm/' . $item['id'] . '?f=&cat=' . XML::xmlify(FileTag::decode($mtch[1])):""),
                                'first' => $first,
                                'last' => false
                        ];
@@ -1490,9 +995,9 @@ function get_cats_and_terms($item)
                if ($cnt) {
                        foreach ($matches as $mtch) {
                                $folders[] = [
-                                       'name' => xmlify(file_tag_decode($mtch[1])),
+                                       'name' => XML::xmlify(FileTag::decode($mtch[1])),
                                        'url' =>  "#",
-                                       'removeurl' => ((local_user() == $item['uid']) ? 'filerm/' . $item['id'] . '?f=&term=' . xmlify(file_tag_decode($mtch[1])) : ""),
+                                       'removeurl' => ((local_user() == $item['uid']) ? 'filerm/' . $item['id'] . '?f=&term=' . XML::xmlify(FileTag::decode($mtch[1])) : ""),
                                        'first' => $first,
                                        'last' => false
                                ];
@@ -1527,7 +1032,7 @@ function get_plink($item) {
                        ];
 
                if (x($item, 'plink')) {
-                       $ret["href"] = $a->remove_baseurl($item['plink']);
+                       $ret["href"] = $a->removeBaseURL($item['plink']);
                        $ret["title"] = L10n::t('link to source');
                }
 
@@ -1569,26 +1074,6 @@ function return_bytes($size_str) {
        }
 }
 
-
-/**
- * @return string
- */
-function generate_user_guid() {
-       $found = true;
-       do {
-               $guid = get_guid(32);
-               $x = q("SELECT `uid` FROM `user` WHERE `guid` = '%s' LIMIT 1",
-                       dbesc($guid)
-               );
-               if (! DBM::is_result($x)) {
-                       $found = false;
-               }
-       } while ($found == true);
-
-       return $guid;
-}
-
-
 /**
  * @param string $s
  * @param boolean $strip_padding
@@ -1612,7 +1097,7 @@ function base64url_encode($s, $strip_padding = false) {
 function base64url_decode($s) {
 
        if (is_array($s)) {
-               logger('base64url_decode: illegal input: ' . print_r(debug_backtrace(), true));
+               Logger::log('base64url_decode: illegal input: ' . print_r(debug_backtrace(), true));
                return $s;
        }
 
@@ -1622,7 +1107,7 @@ function base64url_decode($s) {
  *  // Uncomment if you find you need it.
  *
  *     $l = strlen($s);
- *     if (! strpos($s,'=')) {
+ *     if (!strpos($s,'=')) {
  *             $m = $l % 4;
  *             if ($m == 2)
  *                     $s .= '==';
@@ -1676,21 +1161,6 @@ function html2bb_video($s) {
        return $s;
 }
 
-/**
- * apply xmlify() to all values of array $val, recursively
- * @param array $val
- * @return array
- */
-function array_xmlify($val){
-       if (is_bool($val)) {
-               return $val?"true":"false";
-       } elseif (is_array($val)) {
-               return array_map('array_xmlify', $val);
-       }
-       return xmlify((string) $val);
-}
-
-
 /**
  * transform link href and img src from relative to absolute
  *
@@ -1737,11 +1207,11 @@ function reltoabs($text, $base) {
  * @return string
  */
 function item_post_type($item) {
-       if (intval($item['event-id'])) {
+       if (!empty($item['event-id'])) {
                return L10n::t('event');
-       } elseif (strlen($item['resource-id'])) {
+       } elseif (!empty($item['resource-id'])) {
                return L10n::t('photo');
-       } elseif (strlen($item['verb']) && $item['verb'] !== ACTIVITY_POST) {
+       } elseif (!empty($item['verb']) && $item['verb'] !== ACTIVITY_POST) {
                return L10n::t('activity');
        } elseif ($item['id'] != $item['parent']) {
                return L10n::t('comment');
@@ -1750,205 +1220,6 @@ function item_post_type($item) {
        return L10n::t('post');
 }
 
-// post categories and "save to file" use the same item.file table for storage.
-// We will differentiate the different uses by wrapping categories in angle brackets
-// and save to file categories in square brackets.
-// To do this we need to escape these characters if they appear in our tag.
-
-function file_tag_encode($s) {
-       return str_replace(['<','>','[',']'],['%3c','%3e','%5b','%5d'],$s);
-}
-
-function file_tag_decode($s) {
-       return str_replace(['%3c', '%3e', '%5b', '%5d'], ['<', '>', '[', ']'], $s);
-}
-
-function file_tag_file_query($table,$s,$type = 'file') {
-
-       if ($type == 'file') {
-               $str = preg_quote('[' . str_replace('%', '%%', file_tag_encode($s)) . ']');
-       } else {
-               $str = preg_quote('<' . str_replace('%', '%%', file_tag_encode($s)) . '>');
-       }
-       return " AND " . (($table) ? dbesc($table) . '.' : '') . "file regexp '" . dbesc($str) . "' ";
-}
-
-// ex. given music,video return <music><video> or [music][video]
-function file_tag_list_to_file($list, $type = 'file') {
-       $tag_list = '';
-       if (strlen($list)) {
-               $list_array = explode(",",$list);
-               if ($type == 'file') {
-                       $lbracket = '[';
-                       $rbracket = ']';
-               } else {
-                       $lbracket = '<';
-                       $rbracket = '>';
-               }
-
-               foreach ($list_array as $item) {
-                       if (strlen($item)) {
-                               $tag_list .= $lbracket . file_tag_encode(trim($item))  . $rbracket;
-                       }
-               }
-       }
-       return $tag_list;
-}
-
-// ex. given <music><video>[friends], return music,video or friends
-function file_tag_file_to_list($file, $type = 'file') {
-       $matches = false;
-       $list = '';
-       if ($type == 'file') {
-               $cnt = preg_match_all('/\[(.*?)\]/', $file, $matches, PREG_SET_ORDER);
-       } else {
-               $cnt = preg_match_all('/<(.*?)>/', $file, $matches, PREG_SET_ORDER);
-       }
-       if ($cnt) {
-               foreach ($matches as $mtch) {
-                       if (strlen($list)) {
-                               $list .= ',';
-                       }
-                       $list .= file_tag_decode($mtch[1]);
-               }
-       }
-
-       return $list;
-}
-
-function file_tag_update_pconfig($uid, $file_old, $file_new, $type = 'file') {
-       // $file_old - categories previously associated with an item
-       // $file_new - new list of categories for an item
-
-       if (!intval($uid)) {
-               return false;
-       } elseif ($file_old == $file_new) {
-               return true;
-       }
-
-       $saved = PConfig::get($uid, 'system', 'filetags');
-       if (strlen($saved)) {
-               if ($type == 'file') {
-                       $lbracket = '[';
-                       $rbracket = ']';
-                       $termtype = TERM_FILE;
-               } else {
-                       $lbracket = '<';
-                       $rbracket = '>';
-                       $termtype = TERM_CATEGORY;
-               }
-
-               $filetags_updated = $saved;
-
-               // check for new tags to be added as filetags in pconfig
-               $new_tags = [];
-               $check_new_tags = explode(",",file_tag_file_to_list($file_new,$type));
-
-               foreach ($check_new_tags as $tag) {
-                       if (! stristr($saved,$lbracket . file_tag_encode($tag) . $rbracket)) {
-                               $new_tags[] = $tag;
-                       }
-               }
-
-               $filetags_updated .= file_tag_list_to_file(implode(",",$new_tags),$type);
-
-               // check for deleted tags to be removed from filetags in pconfig
-               $deleted_tags = [];
-               $check_deleted_tags = explode(",",file_tag_file_to_list($file_old,$type));
-
-               foreach ($check_deleted_tags as $tag) {
-                       if (! stristr($file_new,$lbracket . file_tag_encode($tag) . $rbracket)) {
-                               $deleted_tags[] = $tag;
-                       }
-               }
-
-               foreach ($deleted_tags as $key => $tag) {
-                       $r = q("SELECT `oid` FROM `term` WHERE `term` = '%s' AND `otype` = %d AND `type` = %d AND `uid` = %d",
-                               dbesc($tag),
-                               intval(TERM_OBJ_POST),
-                               intval($termtype),
-                               intval($uid));
-
-                       if (DBM::is_result($r)) {
-                               unset($deleted_tags[$key]);
-                       } else {
-                               $filetags_updated = str_replace($lbracket . file_tag_encode($tag) . $rbracket,'',$filetags_updated);
-                       }
-               }
-
-               if ($saved != $filetags_updated) {
-                       PConfig::set($uid, 'system', 'filetags', $filetags_updated);
-               }
-               return true;
-       } elseif (strlen($file_new)) {
-               PConfig::set($uid, 'system', 'filetags', $file_new);
-       }
-       return true;
-}
-
-function file_tag_save_file($uid, $item, $file)
-{
-       if (! intval($uid)) {
-               return false;
-       }
-
-       $r = q("SELECT `file` FROM `item` WHERE `id` = %d AND `uid` = %d LIMIT 1",
-               intval($item),
-               intval($uid)
-       );
-       if (DBM::is_result($r)) {
-               if (!stristr($r[0]['file'],'[' . file_tag_encode($file) . ']')) {
-                       $fields = ['file' => $r[0]['file'] . '[' . file_tag_encode($file) . ']'];
-                       Item::update($fields, ['id' => $item]);
-               }
-               $saved = PConfig::get($uid, 'system', 'filetags');
-               if (!strlen($saved) || !stristr($saved, '[' . file_tag_encode($file) . ']')) {
-                       PConfig::set($uid, 'system', 'filetags', $saved . '[' . file_tag_encode($file) . ']');
-               }
-               info(L10n::t('Item filed'));
-       }
-       return true;
-}
-
-function file_tag_unsave_file($uid, $item, $file, $cat = false)
-{
-       if (! intval($uid)) {
-               return false;
-       }
-
-       if ($cat == true) {
-               $pattern = '<' . file_tag_encode($file) . '>' ;
-               $termtype = TERM_CATEGORY;
-       } else {
-               $pattern = '[' . file_tag_encode($file) . ']' ;
-               $termtype = TERM_FILE;
-       }
-
-       $r = q("SELECT `file` FROM `item` WHERE `id` = %d AND `uid` = %d LIMIT 1",
-               intval($item),
-               intval($uid)
-       );
-       if (! DBM::is_result($r)) {
-               return false;
-       }
-
-       $fields = ['file' => str_replace($pattern,'',$r[0]['file'])];
-       Item::update($fields, ['id' => $item]);
-
-       $r = q("SELECT `oid` FROM `term` WHERE `term` = '%s' AND `otype` = %d AND `type` = %d AND `uid` = %d",
-               dbesc($file),
-               intval(TERM_OBJ_POST),
-               intval($termtype),
-               intval($uid)
-       );
-       if (!DBM::is_result($r)) {
-               $saved = PConfig::get($uid, 'system', 'filetags');
-               PConfig::set($uid, 'system', 'filetags', str_replace($pattern, '', $saved));
-       }
-
-       return true;
-}
-
 function normalise_openid($s) {
        return trim(str_replace(['http://', 'https://'], ['', ''], $s), '/');
 }
@@ -1997,6 +1268,7 @@ function is_a_date_arg($s) {
  */
 function deindent($text, $chr = "[\t ]", $count = NULL) {
        $lines = explode("\n", $text);
+
        if (is_null($count)) {
                $m = [];
                $k = 0;
@@ -2046,58 +1318,3 @@ function format_network_name($network, $url = 0) {
                return $network_name;
        }
 }
-
-/**
- * @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 ($lang === 'bash') {
-               $lang = 'sh';
-       }
-
-       // @TODO: Replace Text_Highlighter_Renderer_Html by scrivo/highlight.php
-
-       // Autoload the library to make constants available
-       class_exists('Text_Highlighter_Renderer_Html');
-
-       $options = [
-               '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' && strpos($s, '<?php') !== 0) {
-               $s = '<?php' . "\n" . $s;
-               $tag_added = true;
-       }
-
-       $renderer = new Text_Highlighter_Renderer_Html($options);
-       $factory = new Text_Highlighter();
-       $hl = $factory->factory($lang);
-       $hl->setRenderer($renderer);
-       $o = $hl->highlight($s);
-       $o = str_replace("\n", '', $o);
-
-       if ($tag_added) {
-               $b = substr($o, 0, strpos($o, '<li>'));
-               $e = substr($o, strpos($o, '</li>'));
-               $o = $b . $e;
-       }
-
-       return '<code>' . $o . '</code>';
-}