Copy functions from include/tags to src
- Create Content\Widget\TagCloud - Populate Worker\TagUpdate::execute - Add Content\Widget::tagCloud - Add Model\Term::insertFromItemId and Model\Term::insertFromItemUri
This commit is contained in:
Hypolite Petovan
parent
0abe4158d2
commit
507bea0e9f
|
|
@ -12,12 +12,13 @@ use Friendica\Core\L10n;
|
|||
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
|
||||
{
|
||||
|
|
@ -312,4 +313,31 @@ 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 '';
|
||||
}
|
||||
}
|
||||
|
|
|
|||
162
src/Content/Widget/TagCloud.php
Normal file
162
src/Content/Widget/TagCloud.php
Normal file
|
|
@ -0,0 +1,162 @@
|
|||
<?php
|
||||
|
||||
/*
|
||||
* @file src/Content/Widget/TagCloud.php
|
||||
*/
|
||||
|
||||
namespace Friendica\Content\Widget;
|
||||
|
||||
use dba;
|
||||
use Friendica\Core\L10n;
|
||||
use Friendica\Core\System;
|
||||
use Friendica\Database\DBM;
|
||||
|
||||
require_once 'include/dba.php';
|
||||
require_once 'include/security.php';
|
||||
|
||||
/**
|
||||
* TagCloud widget
|
||||
*
|
||||
* @author Rabuzarus
|
||||
*/
|
||||
class TagCloud
|
||||
{
|
||||
/**
|
||||
* Construct a tag/term cloud block for an user.
|
||||
*
|
||||
* @brief Construct a tag/term cloud block for an user.
|
||||
* @param int $uid The user ID.
|
||||
* @param int $count Max number of displayed tags/terms.
|
||||
* @param int $owner_id The contact ID of the owner of the tagged items.
|
||||
* @param string $flags Special item flags.
|
||||
* @param int $type The tag/term type.
|
||||
*
|
||||
* @return string HTML formatted output.
|
||||
*/
|
||||
public static function getHTML($uid, $count = 0, $owner_id = 0, $flags = '', $type = TERM_HASHTAG)
|
||||
{
|
||||
$o = '';
|
||||
$r = self::tagadelic($uid, $count, $owner_id, $flags, $type);
|
||||
if (count($r)) {
|
||||
$contact = dba::selectFirst('contact', ['url'], ['id' => $uid]);
|
||||
$url = System::removedBaseUrl($contact['url']);
|
||||
|
||||
foreach ($r as $rr) {
|
||||
$tag['level'] = $rr[2];
|
||||
$tag['url'] = $url . '?tag=' . urlencode($rr[0]);
|
||||
$tag['name'] = $rr[0];
|
||||
|
||||
$tags[] = $tag;
|
||||
}
|
||||
|
||||
$tpl = get_markup_template('tagblock_widget.tpl');
|
||||
$o = replace_macros($tpl, [
|
||||
'$title' => L10n::t('Tags'),
|
||||
'$tags' => $tags
|
||||
]);
|
||||
}
|
||||
return $o;
|
||||
}
|
||||
|
||||
/**
|
||||
* Get alphabetical sorted array of used tags/terms of an user including
|
||||
* a weighting by frequency of use.
|
||||
*
|
||||
* @brief Get alphabetical sorted array of used tags/terms of an user including
|
||||
* a weighting by frequency of use.
|
||||
* @param int $uid The user ID.
|
||||
* @param int $count Max number of displayed tags/terms.
|
||||
* @param int $owner_id The contact id of the owner of the tagged items.
|
||||
* @param string $flags Special item flags.
|
||||
* @param int $type The tag/term type.
|
||||
*
|
||||
* @return arr Alphabetical sorted array of used tags of an user.
|
||||
*/
|
||||
private static function tagadelic($uid, $count = 0, $owner_id = 0, $flags = '', $type = TERM_HASHTAG)
|
||||
{
|
||||
$item_condition = item_condition();
|
||||
$sql_options = item_permissions_sql($uid);
|
||||
$limit = $count ? sprintf('LIMIT %d', intval($count)) : '';
|
||||
|
||||
if ($flags) {
|
||||
if ($flags === 'wall') {
|
||||
$sql_options .= ' AND `item`.`wall` ';
|
||||
}
|
||||
}
|
||||
|
||||
if ($owner_id) {
|
||||
$sql_options .= ' AND `item`.`owner-id` = ' . intval($owner_id) . ' ';
|
||||
}
|
||||
|
||||
// Fetch tags
|
||||
$r = dba::p("SELECT `term`, COUNT(`term`) AS `total` FROM `term`
|
||||
LEFT JOIN `item` ON `term`.`oid` = `item`.`id`
|
||||
WHERE `term`.`uid` = ? AND `term`.`type` = ?
|
||||
AND `term`.`otype` = ?
|
||||
AND $item_condition $sql_options
|
||||
GROUP BY `term` ORDER BY `total` DESC $limit",
|
||||
$uid,
|
||||
$type,
|
||||
TERM_OBJ_POST
|
||||
);
|
||||
if (!DBM::is_result($r)) {
|
||||
return [];
|
||||
}
|
||||
|
||||
return self::tagCalc($r);
|
||||
}
|
||||
|
||||
/**
|
||||
* Calculate weighting of tags according to the frequency of use.
|
||||
*
|
||||
* @brief Calculate weighting of tags according to the frequency of use.
|
||||
* @param array $arr Array of tags/terms with tag/term name and total count of use.
|
||||
* @return array Alphabetical sorted array of used tags/terms of an user.
|
||||
*/
|
||||
private static function tagCalc($arr)
|
||||
{
|
||||
$tags = [];
|
||||
$min = 1e9;
|
||||
$max = -1e9;
|
||||
$x = 0;
|
||||
|
||||
if (!$arr) {
|
||||
return [];
|
||||
}
|
||||
|
||||
foreach ($arr as $rr) {
|
||||
$tags[$x][0] = $rr['term'];
|
||||
$tags[$x][1] = log($rr['total']);
|
||||
$tags[$x][2] = 0;
|
||||
$min = min($min, $tags[$x][1]);
|
||||
$max = max($max, $tags[$x][1]);
|
||||
$x ++;
|
||||
}
|
||||
|
||||
usort($tags, 'self::tagsSort');
|
||||
$range = max(.01, $max - $min) * 1.0001;
|
||||
|
||||
for ($x = 0; $x < count($tags); $x ++) {
|
||||
$tags[$x][2] = 1 + floor(9 * ($tags[$x][1] - $min) / $range);
|
||||
}
|
||||
|
||||
return $tags;
|
||||
}
|
||||
|
||||
/**
|
||||
* Compare function to sort tags/terms alphabetically.
|
||||
*
|
||||
* @brief Compare function to sort tags/terms alphabetically.
|
||||
* @param type $a
|
||||
* @param type $b
|
||||
*
|
||||
* @return int
|
||||
*/
|
||||
private static function tagsSort($a, $b)
|
||||
{
|
||||
if (strtolower($a[0]) == strtolower($b[0])) {
|
||||
return 0;
|
||||
}
|
||||
return ((strtolower($a[0]) < strtolower($b[0])) ? -1 : 1);
|
||||
}
|
||||
}
|
||||
|
|
@ -4,13 +4,137 @@
|
|||
*/
|
||||
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
|
||||
|
|
|
|||
|
|
@ -1,10 +1,43 @@
|
|||
<?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);
|
||||
}
|
||||
}
|
||||
|
|
|
|||
Loading…
Reference in a new issue