use Friendica\Core\PConfig;
use Friendica\Core\System;
use Friendica\Database\DBM;
+use Friendica\Model\Contact;
use Friendica\Model\GContact;
use Friendica\Model\Profile;
-
use dba;
require_once 'boot.php';
+require_once 'include/dba.php';
class Widget
{
'$items' => $r)
);
}
+
+ /**
+ * Insert a tag cloud widget for the present profile.
+ *
+ * @brief Insert a tag cloud widget for the present profile.
+ * @param int $limit Max number of displayed tags.
+ * @return string HTML formatted output.
+ */
+ public static function tagCloud($limit = 50)
+ {
+ $a = get_app();
+
+ if (!$a->profile['profile_uid'] || !$a->profile['url']) {
+ return '';
+ }
+
+ if (Feature::isEnabled($a->profile['profile_uid'], 'tagadelic')) {
+ $owner_id = Contact::getIdForURL($a->profile['url']);
+
+ if (!$owner_id) {
+ return '';
+ }
+ return Widget\TagCloud::getHTML($a->profile['profile_uid'], $limit, $owner_id, 'wall');
+ }
+
+ return '';
+ }
}
--- /dev/null
+<?php\r
+\r
+/*\r
+ * @file src/Content/Widget/TagCloud.php\r
+ */\r
+\r
+namespace Friendica\Content\Widget;\r
+\r
+use dba;\r
+use Friendica\Core\L10n;\r
+use Friendica\Core\System;\r
+use Friendica\Database\DBM;\r
+\r
+require_once 'include/dba.php';\r
+require_once 'include/security.php';\r
+\r
+/**\r
+ * TagCloud widget\r
+ *\r
+ * @author Rabuzarus\r
+ */\r
+class TagCloud\r
+{\r
+ /**\r
+ * Construct a tag/term cloud block for an user.\r
+ *\r
+ * @brief Construct a tag/term cloud block for an user.\r
+ * @param int $uid The user ID.\r
+ * @param int $count Max number of displayed tags/terms.\r
+ * @param int $owner_id The contact ID of the owner of the tagged items.\r
+ * @param string $flags Special item flags.\r
+ * @param int $type The tag/term type.\r
+ *\r
+ * @return string HTML formatted output.\r
+ */\r
+ public static function getHTML($uid, $count = 0, $owner_id = 0, $flags = '', $type = TERM_HASHTAG)\r
+ {\r
+ $o = '';\r
+ $r = self::tagadelic($uid, $count, $owner_id, $flags, $type);\r
+ if (count($r)) {\r
+ $contact = dba::selectFirst('contact', ['url'], ['id' => $uid]);\r
+ $url = System::removedBaseUrl($contact['url']);\r
+\r
+ foreach ($r as $rr) {\r
+ $tag['level'] = $rr[2];\r
+ $tag['url'] = $url . '?tag=' . urlencode($rr[0]);\r
+ $tag['name'] = $rr[0];\r
+\r
+ $tags[] = $tag;\r
+ }\r
+\r
+ $tpl = get_markup_template('tagblock_widget.tpl');\r
+ $o = replace_macros($tpl, [\r
+ '$title' => L10n::t('Tags'),\r
+ '$tags' => $tags\r
+ ]);\r
+ }\r
+ return $o;\r
+ }\r
+\r
+ /**\r
+ * Get alphabetical sorted array of used tags/terms of an user including\r
+ * a weighting by frequency of use.\r
+ *\r
+ * @brief Get alphabetical sorted array of used tags/terms of an user including\r
+ * a weighting by frequency of use.\r
+ * @param int $uid The user ID.\r
+ * @param int $count Max number of displayed tags/terms.\r
+ * @param int $owner_id The contact id of the owner of the tagged items.\r
+ * @param string $flags Special item flags.\r
+ * @param int $type The tag/term type.\r
+ *\r
+ * @return arr Alphabetical sorted array of used tags of an user.\r
+ */\r
+ private static function tagadelic($uid, $count = 0, $owner_id = 0, $flags = '', $type = TERM_HASHTAG)\r
+ {\r
+ $item_condition = item_condition();\r
+ $sql_options = item_permissions_sql($uid);\r
+ $limit = $count ? sprintf('LIMIT %d', intval($count)) : '';\r
+\r
+ if ($flags) {\r
+ if ($flags === 'wall') {\r
+ $sql_options .= ' AND `item`.`wall` ';\r
+ }\r
+ }\r
+\r
+ if ($owner_id) {\r
+ $sql_options .= ' AND `item`.`owner-id` = ' . intval($owner_id) . ' ';\r
+ }\r
+\r
+ // Fetch tags\r
+ $r = dba::p("SELECT `term`, COUNT(`term`) AS `total` FROM `term`\r
+ LEFT JOIN `item` ON `term`.`oid` = `item`.`id`\r
+ WHERE `term`.`uid` = ? AND `term`.`type` = ?\r
+ AND `term`.`otype` = ?\r
+ AND $item_condition $sql_options\r
+ GROUP BY `term` ORDER BY `total` DESC $limit",\r
+ $uid,\r
+ $type,\r
+ TERM_OBJ_POST\r
+ );\r
+ if (!DBM::is_result($r)) {\r
+ return [];\r
+ }\r
+\r
+ return self::tagCalc($r);\r
+ }\r
+\r
+ /**\r
+ * Calculate weighting of tags according to the frequency of use.\r
+ *\r
+ * @brief Calculate weighting of tags according to the frequency of use.\r
+ * @param array $arr Array of tags/terms with tag/term name and total count of use.\r
+ * @return array Alphabetical sorted array of used tags/terms of an user.\r
+ */\r
+ private static function tagCalc($arr)\r
+ {\r
+ $tags = [];\r
+ $min = 1e9;\r
+ $max = -1e9;\r
+ $x = 0;\r
+\r
+ if (!$arr) {\r
+ return [];\r
+ }\r
+\r
+ foreach ($arr as $rr) {\r
+ $tags[$x][0] = $rr['term'];\r
+ $tags[$x][1] = log($rr['total']);\r
+ $tags[$x][2] = 0;\r
+ $min = min($min, $tags[$x][1]);\r
+ $max = max($max, $tags[$x][1]);\r
+ $x ++;\r
+ }\r
+\r
+ usort($tags, 'self::tagsSort');\r
+ $range = max(.01, $max - $min) * 1.0001;\r
+\r
+ for ($x = 0; $x < count($tags); $x ++) {\r
+ $tags[$x][2] = 1 + floor(9 * ($tags[$x][1] - $min) / $range);\r
+ }\r
+\r
+ return $tags;\r
+ }\r
+\r
+ /**\r
+ * Compare function to sort tags/terms alphabetically.\r
+ *\r
+ * @brief Compare function to sort tags/terms alphabetically.\r
+ * @param type $a\r
+ * @param type $b\r
+ *\r
+ * @return int\r
+ */\r
+ private static function tagsSort($a, $b)\r
+ {\r
+ if (strtolower($a[0]) == strtolower($b[0])) {\r
+ return 0;\r
+ }\r
+ return ((strtolower($a[0]) < strtolower($b[0])) ? -1 : 1);\r
+ }\r
+}\r
*/
namespace Friendica\Model;
+use Friendica\Core\System;
use Friendica\Database\DBM;
use dba;
-require_once "include/dba.php";
+require_once 'boot.php';
+require_once 'include/dba.php';
class Term
{
+ public static function insertFromItemId($itemid)
+ {
+ $profile_base = System::baseUrl();
+ $profile_data = parse_url($profile_base);
+ $profile_path = defaults($profile_data, 'path', '');
+ $profile_base_friendica = $profile_data['host'] . $profile_path . '/profile/';
+ $profile_base_diaspora = $profile_data['host'] . $profile_path . '/u/';
+
+ $fields = ['guid', 'uid', 'id', 'edited', 'deleted', 'created', 'received', 'title', 'body', 'tag', 'parent'];
+ $message = dba::selectFirst('item', $fields, ['id' => $itemid]);
+ if (!DBM::is_result($message)) {
+ return;
+ }
+
+ // Clean up all tags
+ dba::e("DELETE FROM `term` WHERE `otype` = ? AND `oid` = ? AND `type` IN (?, ?)",
+ TERM_OBJ_POST, $itemid, TERM_HASHTAG, TERM_MENTION);
+
+ if ($message['deleted']) {
+ return;
+ }
+
+ $taglist = explode(',', $message['tag']);
+
+ $tags_string = '';
+ foreach ($taglist as $tag) {
+ if ((substr(trim($tag), 0, 1) == '#') || (substr(trim($tag), 0, 1) == '@')) {
+ $tags_string .= ' ' . trim($tag);
+ } else {
+ $tags_string .= ' #' . trim($tag);
+ }
+ }
+
+ $data = ' ' . $message['title'] . ' ' . $message['body'] . ' ' . $tags_string . ' ';
+
+ // ignore anything in a code block
+ $data = preg_replace('/\[code\](.*?)\[\/code\]/sm', '', $data);
+
+ $tags = [];
+
+ $pattern = '/\W\#([^\[].*?)[\s\'".,:;\?!\[\]\/]/ism';
+ if (preg_match_all($pattern, $data, $matches)) {
+ foreach ($matches[1] as $match) {
+ $tags['#' . strtolower($match)] = '';
+ }
+ }
+
+ $pattern = '/\W([\#@])\[url\=(.*?)\](.*?)\[\/url\]/ism';
+ if (preg_match_all($pattern, $data, $matches, PREG_SET_ORDER)) {
+ foreach ($matches as $match) {
+ $tags[$match[1] . strtolower(trim($match[3], ',.:;[]/\"?!'))] = $match[2];
+ }
+ }
+
+ foreach ($tags as $tag => $link) {
+ if (substr(trim($tag), 0, 1) == '#') {
+ // try to ignore #039 or #1 or anything like that
+ if (ctype_digit(substr(trim($tag), 1))) {
+ continue;
+ }
+
+ // try to ignore html hex escapes, e.g. #x2317
+ if ((substr(trim($tag), 1, 1) == 'x' || substr(trim($tag), 1, 1) == 'X') && ctype_digit(substr(trim($tag), 2))) {
+ continue;
+ }
+
+ $type = TERM_HASHTAG;
+ $term = substr($tag, 1);
+ } elseif (substr(trim($tag), 0, 1) == '@') {
+ $type = TERM_MENTION;
+ $term = substr($tag, 1);
+ } else { // This shouldn't happen
+ $type = TERM_HASHTAG;
+ $term = $tag;
+ }
+
+ if ($message['uid'] == 0) {
+ $global = true;
+ dba::update('term', ['global' => true], ['otype' => TERM_OBJ_POST, 'guid' => $message['guid']]);
+ } else {
+ $global = dba::exists('term', ['uid' => 0, 'otype' => TERM_OBJ_POST, 'guid' => $message['guid']]);
+ }
+
+ dba::insert('term', [
+ 'uid' => $message['uid'],
+ 'oid' => $itemid,
+ 'otype' => TERM_OBJ_POST,
+ 'type' => $type,
+ 'term' => $term,
+ 'url' => $link,
+ 'guid' => $message['guid'],
+ 'created' => $message['created'],
+ 'received' => $message['received'],
+ 'global' => $global
+ ]);
+
+ // Search for mentions
+ if ((substr($tag, 0, 1) == '@') && (strpos($link, $profile_base_friendica) || strpos($link, $profile_base_diaspora))) {
+ $users = q("SELECT `uid` FROM `contact` WHERE self AND (`url` = '%s' OR `nurl` = '%s')", $link, $link);
+ foreach ($users AS $user) {
+ if ($user['uid'] == $message['uid']) {
+ dba::update('item', ['mention' => true], ['id' => $itemid]);
+ dba::update('thread', ['mention' => true], ['iid' => $message['parent']]);
+ }
+ }
+ }
+ }
+ }
+
+ public static function insertFromItemUri($itemuri, $uid)
+ {
+ $messages = dba::select('item', ['id'], ['uri' => $itemuri, 'uid' => $uid]);
+
+ if (DBM::is_result($messages)) {
+ while ($message = dba::fetch($messages)) {
+ self::insertFromItemId($message['id']);
+ }
+ dba::close($messages);
+ }
+ }
+
+
/**
* @param integer $itemid item id
* @return void
<?php
+
namespace Friendica\Worker;
require_once("include/tags.php");
-class TagUpdate {
- public static function execute() {
- update_items();
+class TagUpdate
+{
+ public static function execute()
+ {
+ $messages = dba::p("SELECT `oid`,`item`.`guid`, `item`.`created`, `item`.`received` FROM `term` INNER JOIN `item` ON `item`.`id`=`term`.`oid` WHERE `term`.`otype` = 1 AND `term`.`guid` = ''");
+
+ logger('fetched messages: ' . dba::num_rows($messages));
+ while ($message = dba::fetch($messages)) {
+ if ($message['uid'] == 0) {
+ $global = true;
+
+ q("UPDATE `term` SET `global` = 1 WHERE `otype` = %d AND `guid` = '%s'",
+ intval(TERM_OBJ_POST), dbesc($message['guid']));
+ } else {
+ $isglobal = q("SELECT `global` FROM `term` WHERE `uid` = 0 AND `otype` = %d AND `guid` = '%s'",
+ intval(TERM_OBJ_POST), dbesc($message['guid']));
+
+ $global = (count($isglobal) > 0);
+ }
+
+ q("UPDATE `term` SET `guid` = '%s', `created` = '%s', `received` = '%s', `global` = %d WHERE `otype` = %d AND `oid` = %d",
+ dbesc($message['guid']), dbesc($message['created']), dbesc($message['received']),
+ intval($global), intval(TERM_OBJ_POST), intval($message['oid']));
+ }
+
+ dba::close($messages);
+
+ $messages = dba::p("SELECT `guid` FROM `item` WHERE `uid` = 0");
+
+ logger('fetched messages: ' . dba::num_rows($messages));
+ while ($message = dba::fetch(messages)) {
+ q("UPDATE `item` SET `global` = 1 WHERE `guid` = '%s'", dbesc($message['guid']));
+ }
+
+ dba::close($messages);
}
}
projects / friendica.git / commitdiff