set_baseurl("https://pirati.ca"); */ function create_tags_from_item($itemid) { global $a; $profile_base = $a->get_baseurl(); $profile_data = parse_url($profile_base); $profile_base_friendica = $profile_data['host'].$profile_data['path']."/profile/"; $profile_base_diaspora = $profile_data['host'].$profile_data['path']."/u/"; $searchpath = $a->get_baseurl()."/search?tag="; $messages = q("SELECT `guid`, `uid`, `id`, `edited`, `deleted`, `title`, `body`, `tag` FROM `item` WHERE `id` = %d LIMIT 1", intval($itemid)); if (!$messages) return; $message = $messages[0]; // Clean up all tags q("DELETE FROM `term` WHERE `otype` = %d AND `oid` = %d AND `type` IN (%d, %d)", intval(TERM_OBJ_POST), intval($itemid), intval(TERM_HASHTAG), intval(TERM_MENTION)); if ($message["deleted"]) return; $cachefile = get_cachefile($message["guid"]."-".hash("md5", $message['body'])); if (($cachefile != '') AND !file_exists($cachefile)) { $s = prepare_text($message['body']); $stamp1 = microtime(true); file_put_contents($cachefile, $s); $a->save_timestamp($stamp1, "file"); logger('create_tags_from_item: put item '.$message["id"].' into cachefile '.$cachefile); } $taglist = explode(",", $message["tag"]); $tags = ""; foreach ($taglist as $tag) if ((substr(trim($tag), 0, 1) == "#") OR (substr(trim($tag), 0, 1) == "@")) $tags .= " ".trim($tag); else $tags .= " #".trim($tag); $data = " ".$message["title"]." ".$message["body"]." ".$tags." "; $tags = array(); $pattern = "/\W\#([^\[].*?)[\s'\".,:;\?!\[\]\/]/ism"; if (preg_match_all($pattern, $data, $matches)) foreach ($matches[1] as $match) $tags["#".strtolower($match)] = ""; // $searchpath.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,1))) 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."-oh"; } $r = q("INSERT INTO `term` (`uid`, `oid`, `otype`, `type`, `term`, `url`) VALUES (%d, %d, %d, %d, '%s', '%s')", intval($message["uid"]), intval($itemid), intval(TERM_OBJ_POST), intval($type), dbesc($term), dbesc($link)); // Search for mentions if ((substr($tag, 0, 1) == '@') AND (strpos($link, $profile_base_friendica) OR 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"]) q("UPDATE `item` SET `mention` = 1 WHERE `id` = %d", intval($itemid)); } } } } function create_tags_from_itemuri($itemuri, $uid) { $messages = q("SELECT `id` FROM `item` WHERE uri ='%s' AND uid=%d", dbesc($itemuri), intval($uid)); if(count($messages)) { foreach ($messages as $message) create_tags_from_item($message["id"]); } } function update_items() { //$messages = q("SELECT `id` FROM `item` where tag !='' ORDER BY `created` DESC limit 10"); $messages = q("SELECT `id` FROM `item` where tag !=''"); foreach ($messages as $message) create_tags_from_item($message["id"]); } //print_r($tags); //print_r($hashtags); //print_r($mentions); //update_items(); //create_tags_from_item(265194); //create_tags_from_itemuri("infoagent@diasp.org:cce94abd104c06e8", 2); ?>