namespace Friendica\Model;
+use Friendica\Content\Text\BBCode;
use Friendica\Core\Logger;
+use Friendica\Core\System;
use Friendica\Database\DBA;
-use Friendica\Content\Text\BBCode;
+use Friendica\Util\Strings;
/**
* Class Tag
*
* @param integer $uriid
* @param integer $type
- * @param string $name
- * @param string $url
+ * @param string $name
+ * @param string $url
+ * @param boolean $probing
*/
- public static function store(int $uriid, int $type, string $name, string $url = '')
+ public static function store(int $uriid, int $type, string $name, string $url = '', $probing = true)
{
$name = trim($name, "\x00..\x20\xFF#!@");
if (empty($name)) {
return;
}
- $fields = ['name' => substr($name, 0, 96), 'type' => $type];
+ $cid = 0;
+ $tagid = 0;
+
+ if (in_array($type, [Tag::MENTION, Tag::EXCLUSIVE_MENTION, Tag::IMPLICIT_MENTION])) {
+ if (empty($url)) {
+ // No mention without a contact url
+ return;
+ }
- if (!empty($url) && ($url != $name)) {
- $fields['url'] = strtolower($url);
+ if (!$probing) {
+ $condition = ['nurl' => Strings::normaliseLink($url), 'uid' => 0, 'deleted' => false];
+ $contact = DBA::selectFirst('contact', ['id'], $condition, ['order' => ['id']]);
+ if (DBA::isResult($contact)) {
+ $cid = $contact['id'];
+ Logger::info('Got id for contact url', ['cid' => $cid, 'url' => $url]);
+ }
+
+ if (empty($cid)) {
+ $ssl_url = str_replace('http://', 'https://', $url);
+ $condition = ['`alias` IN (?, ?, ?) AND `uid` = ? AND NOT `deleted`', $url, Strings::normaliseLink($url), $ssl_url, 0];
+ $contact = DBA::selectFirst('contact', ['id'], $condition, ['order' => ['id']]);
+ if (DBA::isResult($contact)) {
+ $cid = $contact['id'];
+ Logger::info('Got id for contact alias', ['cid' => $cid, 'url' => $url]);
+ }
+ }
+ } else {
+ $cid = Contact::getIdForURL($url, 0, true);
+ Logger::info('Got id by probing', ['cid' => $cid, 'url' => $url]);
+ }
+
+ if (empty($cid)) {
+ // The contact wasn't found in the system (most likely some dead account)
+ // We ensure that we only store a single entry by overwriting the previous name
+ Logger::info('Contact not found, updating tag', ['url' => $url, 'name' => $name]);
+ DBA::update('tag', ['name' => substr($name, 0, 96)], ['url' => $url]);
+ }
}
- $tag = DBA::selectFirst('tag', ['id'], $fields);
- if (!DBA::isResult($tag)) {
- DBA::insert('tag', $fields, true);
- $tagid = DBA::lastInsertId();
- } else {
- $tagid = $tag['id'];
+ if (empty($cid)) {
+ $fields = ['name' => substr($name, 0, 96), 'url' => ''];
+
+ if (($type != Tag::HASHTAG) && !empty($url) && ($url != $name)) {
+ $fields['url'] = strtolower($url);
+ }
+
+ $tag = DBA::selectFirst('tag', ['id'], $fields);
+ if (!DBA::isResult($tag)) {
+ DBA::insert('tag', $fields, true);
+ $tagid = DBA::lastInsertId();
+ } else {
+ $tagid = $tag['id'];
+ }
+
+ if (empty($tagid)) {
+ Logger::error('No tag id created', $fields);
+ return;
+ }
}
- if (empty($tagid)) {
- Logger::error('No tag id created', $fields);
- return;
+ $fields = ['uri-id' => $uriid, 'type' => $type, 'tid' => $tagid, 'cid' => $cid];
+
+ if (in_array($type, [Tag::MENTION, Tag::EXCLUSIVE_MENTION, Tag::IMPLICIT_MENTION])) {
+ $condition = $fields;
+ $condition['type'] = [Tag::MENTION, Tag::EXCLUSIVE_MENTION, Tag::IMPLICIT_MENTION];
+ if (DBA::exists('post-tag', $condition)) {
+ Logger::info('Tag already exists', $fields);
+ return;
+ }
}
- DBA::insert('post-tag', ['uri-id' => $uriid, 'tid' => $tagid], true);
+ DBA::insert('post-tag', $fields, true);
- Logger::info('Stored tag/mention', ['uri-id' => $uriid, 'tag-id' => $tagid, 'tag' => $fields]);
+ Logger::info('Stored tag/mention', ['uri-id' => $uriid, 'tag-id' => $tagid, 'contact-id' => $cid, 'name' => $name, 'type' => $type, 'callstack' => System::callstack(8)]);
}
/**
* @param string $hash
* @param string $name
* @param string $url
+ * @param boolean $probing
*/
- public static function storeByHash(int $uriid, string $hash, string $name, string $url = '')
+ public static function storeByHash(int $uriid, string $hash, string $name, string $url = '', $probing = true)
{
- if ($hash == self::TAG_CHARACTER[self::MENTION]) {
- $type = self::MENTION;
- } elseif ($hash == self::TAG_CHARACTER[self::EXCLUSIVE_MENTION]) {
- $type = self::EXCLUSIVE_MENTION;
- } elseif ($hash == self::TAG_CHARACTER[self::IMPLICIT_MENTION]) {
- $type = self::IMPLICIT_MENTION;
- } elseif ($hash == self::TAG_CHARACTER[self::HASHTAG]) {
- $type = self::HASHTAG;
- } else {
+ $type = self::getTypeForHash($hash);
+ if ($type == self::UNKNOWN) {
return;
}
- self::store($uriid, $type, $name, $url);
+ self::store($uriid, $type, $name, $url, $probing);
}
/**
* Store tags and mentions from the body
*
+ * @param integer $uriid URI-Id
+ * @param string $body Body of the post
+ * @param string $tags Accepted tags
+ * @param boolean $probing Perform a probing for contacts, adding them if needed
+ */
+ public static function storeFromBody(int $uriid, string $body, string $tags = null, $probing = true)
+ {
+ if (is_null($tags)) {
+ $tags = self::TAG_CHARACTER[self::HASHTAG] . self::TAG_CHARACTER[self::MENTION] . self::TAG_CHARACTER[self::EXCLUSIVE_MENTION];
+ }
+
+ Logger::info('Check for tags', ['uri-id' => $uriid, 'hash' => $tags, 'callstack' => System::callstack()]);
+
+ if (!preg_match_all("/([" . $tags . "])\[url\=([^\[\]]*)\]([^\[\]]*)\[\/url\]/ism", $body, $result, PREG_SET_ORDER)) {
+ return;
+ }
+
+ Logger::info('Found tags', ['uri-id' => $uriid, 'hash' => $tags, 'result' => $result]);
+
+ foreach ($result as $tag) {
+ self::storeByHash($uriid, $tag[1], $tag[3], $tag[2], $probing);
+ }
+ }
+
+ /**
+ * Store raw tags (not encapsulated in links) from the body
+ * This function is needed in the intermediate phase.
+ * Later we can call item::setHashtags in advance to have all tags converted.
+ *
* @param integer $uriid URI-Id
* @param string $body Body of the post
- * @param string $tags Accepted tags
*/
- public static function storeFromBody(int $uriid, string $body, string $tags = '#@!')
+ public static function storeRawTagsFromBody(int $uriid, string $body)
{
- if (!preg_match_all("/([" . $tags . "])\[url\=(.*?)\](.*?)\[\/url\]/ism", $body, $result, PREG_SET_ORDER)) {
+ Logger::info('Check for tags', ['uri-id' => $uriid, 'callstack' => System::callstack()]);
+
+ $result = BBCode::getTags($body);
+ if (empty($result)) {
return;
}
+ Logger::info('Found tags', ['uri-id' => $uriid, 'result' => $result]);
+
foreach ($result as $tag) {
- self::storeByHash($uriid, $tag[1], $tag[3], $tag[2]);
+ if (substr($tag, 0, 1) != self::TAG_CHARACTER[self::HASHTAG]) {
+ continue;
+ }
+ self::storeByHash($uriid, substr($tag, 0, 1), substr($tag, 1));
}
}
+
+ /**
+ * Remove tag/mention
+ *
+ * @param integer $uriid
+ * @param integer $type
+ * @param string $name
+ * @param string $url
+ */
+ public static function remove(int $uriid, int $type, string $name, string $url = '')
+ {
+ $condition = ['uri-id' => $uriid, 'type' => $type, 'url' => $url];
+ if ($type == self::HASHTAG) {
+ $condition['name'] = $name;
+ }
+
+ $tag = DBA::selectFirst('tag-view', ['tid', 'cid'], $condition);
+ if (!DBA::isResult($tag)) {
+ return;
+ }
+
+ Logger::info('Removing tag/mention', ['uri-id' => $uriid, 'tid' => $tag['tid'], 'name' => $name, 'url' => $url, 'callstack' => System::callstack(8)]);
+ DBA::delete('post-tag', ['uri-id' => $uriid, 'type' => $type, 'tid' => $tag['tid'], 'cid' => $tag['cid']]);
+ }
+
+ /**
+ * Remove tag/mention
+ *
+ * @param integer $uriid
+ * @param string $hash
+ * @param string $name
+ * @param string $url
+ */
+ public static function removeByHash(int $uriid, string $hash, string $name, string $url = '')
+ {
+ $type = self::getTypeForHash($hash);
+ if ($type == self::UNKNOWN) {
+ return;
+ }
+
+ self::remove($uriid, $type, $name, $url);
+ }
+
+ /**
+ * Get the type for the given hash
+ *
+ * @param string $hash
+ * @return integer type
+ */
+ private static function getTypeForHash(string $hash)
+ {
+ if ($hash == self::TAG_CHARACTER[self::MENTION]) {
+ return self::MENTION;
+ } elseif ($hash == self::TAG_CHARACTER[self::EXCLUSIVE_MENTION]) {
+ return self::EXCLUSIVE_MENTION;
+ } elseif ($hash == self::TAG_CHARACTER[self::IMPLICIT_MENTION]) {
+ return self::IMPLICIT_MENTION;
+ } elseif ($hash == self::TAG_CHARACTER[self::HASHTAG]) {
+ return self::HASHTAG;
+ } else {
+ return self::UNKNOWN;
+ }
+
+ }
}