: Searches for "search pattern" in the directory. "search pattern" is url encoded. - checkcontact: Updates gcontact entries - suggestions: Discover other servers for their contacts. - server : Searches for the poco server list. "poco url" is base64 encoded. - update_server: Frequently check the first 250 servers for vitality. - update_server_directory: Discover the given server id for their contacts - PortableContact::load: Load POCO data from a given POCO address - check_profile: Update remote profile data */ $search = ""; $mode = 0; if ($command == "dirsearch") { $search = urldecode($param1); $mode = 1; } elseif ($command == "checkcontact") { $mode = 2; } elseif ($command == "suggestions") { $mode = 3; } elseif ($command == "server") { $mode = 4; } elseif ($command == "update_server") { $mode = 5; } elseif ($command == "update_server_directory") { $mode = 6; } elseif ($command == "load") { $mode = 7; } elseif ($command == "check_profile") { $mode = 8; } elseif ($command !== "") { logger("Unknown or missing parameter ".$command."\n"); return; } logger('start '.$search); if ($mode == 8) { if ($param1 != "") { PortableContact::lastUpdated($param1, true); } } elseif ($mode == 7) { if (!empty($param4)) { $url = $param4; } else { $url = ''; } PortableContact::load(intval($param1), intval($param2), intval($param3), $url); } elseif ($mode == 6) { PortableContact::discoverSingleServer(intval($param1)); } elseif ($mode == 5) { self::updateServer(); } elseif ($mode == 4) { $server_url = $param1; if ($server_url == "") { return; } $server_url = filter_var($server_url, FILTER_SANITIZE_URL); if (substr(normalise_link($server_url), 0, 7) != "http://") { return; } $result = "Checking server ".$server_url." - "; $ret = PortableContact::checkServer($server_url); if ($ret) { $result .= "success"; } else { $result .= "failed"; } logger($result, LOGGER_DEBUG); } elseif ($mode == 3) { GContact::updateSuggestions(); } elseif (($mode == 2) && Config::get('system', 'poco_completion')) { self::discoverUsers(); } elseif (($mode == 1) && ($search != "") && Config::get('system', 'poco_local_search')) { self::discoverDirectory($search); self::gsSearchUser($search); } elseif (($mode == 0) && ($search == "") && (Config::get('system', 'poco_discovery') > 0)) { // Query Friendica and Hubzilla servers for their users PortableContact::discover(); // Query GNU Social servers for their users ("statistics" addon has to be enabled on the GS server) if (!Config::get('system', 'ostatus_disabled')) { GContact::discoverGsUsers(); } } logger('end '.$search); return; } /** * @brief Updates the first 250 servers * */ private static function updateServer() { $r = q("SELECT `url`, `created`, `last_failure`, `last_contact` FROM `gserver` ORDER BY rand()"); if (!DBM::is_result($r)) { return; } $updated = 0; foreach ($r AS $server) { if (!PortableContact::updateNeeded($server["created"], "", $server["last_failure"], $server["last_contact"])) { continue; } logger('Update server status for server '.$server["url"], LOGGER_DEBUG); Worker::add(PRIORITY_LOW, "DiscoverPoCo", "server", $server["url"]); if (++$updated > 250) { return; } } } private static function discoverUsers() { logger("Discover users", LOGGER_DEBUG); $starttime = time(); $users = q("SELECT `url`, `created`, `updated`, `last_failure`, `last_contact`, `server_url`, `network` FROM `gcontact` WHERE `last_contact` < UTC_TIMESTAMP - INTERVAL 1 MONTH AND `last_failure` < UTC_TIMESTAMP - INTERVAL 1 MONTH AND `network` IN ('%s', '%s', '%s', '%s', '') ORDER BY rand()", dbesc(NETWORK_DFRN), dbesc(NETWORK_DIASPORA), dbesc(NETWORK_OSTATUS), dbesc(NETWORK_FEED)); if (!$users) { return; } $checked = 0; foreach ($users AS $user) { $urlparts = parse_url($user["url"]); if (!isset($urlparts["scheme"])) { dba::update('gcontact', ['network' => NETWORK_PHANTOM], ['nurl' => normalise_link($user["url"])]); continue; } if (in_array($urlparts["host"], ["www.facebook.com", "facebook.com", "twitter.com", "identi.ca", "alpha.app.net"])) { $networks = ["www.facebook.com" => NETWORK_FACEBOOK, "facebook.com" => NETWORK_FACEBOOK, "twitter.com" => NETWORK_TWITTER, "identi.ca" => NETWORK_PUMPIO, "alpha.app.net" => NETWORK_APPNET]; dba::update('gcontact', ['network' => $networks[$urlparts["host"]]], ['nurl' => normalise_link($user["url"])]); continue; } $server_url = PortableContact::detectServer($user["url"]); $force_update = false; if ($user["server_url"] != "") { $force_update = (normalise_link($user["server_url"]) != normalise_link($server_url)); $server_url = $user["server_url"]; } if ((($server_url == "") && ($user["network"] == NETWORK_FEED)) || $force_update || PortableContact::checkServer($server_url, $user["network"])) { logger('Check profile '.$user["url"]); Worker::add(PRIORITY_LOW, "DiscoverPoCo", "check_profile", $user["url"]); if (++$checked > 100) { return; } } else { dba::update('gcontact', ['last_failure' => DateTimeFormat::utcNow()], ['nurl' => normalise_link($user["url"])]); } // Quit the loop after 3 minutes if (time() > ($starttime + 180)) { return; } } } private static function discoverDirectory($search) { $data = Cache::get("dirsearch:".$search); if (!is_null($data)) { // Only search for the same item every 24 hours if (time() < $data + (60 * 60 * 24)) { logger("Already searched for ".$search." in the last 24 hours", LOGGER_DEBUG); return; } } $x = Network::fetchUrl(get_server()."/lsearch?p=1&n=500&search=".urlencode($search)); $j = json_decode($x); if (count($j->results)) { foreach ($j->results as $jj) { // Check if the contact already exists $exists = q("SELECT `id`, `last_contact`, `last_failure`, `updated` FROM `gcontact` WHERE `nurl` = '%s'", normalise_link($jj->url)); if (DBM::is_result($exists)) { logger("Profile ".$jj->url." already exists (".$search.")", LOGGER_DEBUG); if (($exists[0]["last_contact"] < $exists[0]["last_failure"]) && ($exists[0]["updated"] < $exists[0]["last_failure"])) { continue; } // Update the contact PortableContact::lastUpdated($jj->url); continue; } $server_url = PortableContact::detectServer($jj->url); if ($server_url != '') { if (!PortableContact::checkServer($server_url)) { logger("Friendica server ".$server_url." doesn't answer.", LOGGER_DEBUG); continue; } logger("Friendica server ".$server_url." seems to be okay.", LOGGER_DEBUG); } $data = Probe::uri($jj->url); if ($data["network"] == NETWORK_DFRN) { logger("Profile ".$jj->url." is reachable (".$search.")", LOGGER_DEBUG); logger("Add profile ".$jj->url." to local directory (".$search.")", LOGGER_DEBUG); if ($jj->tags != "") { $data["keywords"] = $jj->tags; } $data["server_url"] = $data["baseurl"]; GContact::update($data); } else { logger("Profile ".$jj->url." is not responding or no Friendica contact - but network ".$data["network"], LOGGER_DEBUG); } } } Cache::set("dirsearch:".$search, time(), CACHE_DAY); } /** * @brief Search for GNU Social user with gstools.org * * @param string $search User name */ private static function gsSearchUser($search) { // Currently disabled, since the service isn't available anymore. // It is not removed since I hope that there will be a successor. return false; $url = "http://gstools.org/api/users_search/".urlencode($search); $result = Network::curl($url); if (!$result["success"]) { return false; } $contacts = json_decode($result["body"]); if ($contacts->status == 'ERROR') { return false; } /// @TODO AS is considered as a notation for constants (as they usually being written all upper-case) /// @TODO find all those and convert to all lower-case which is a keyword then foreach ($contacts->data AS $user) { $contact = Probe::uri($user->site_address."/".$user->name); if ($contact["network"] != NETWORK_PHANTOM) { $contact["about"] = $user->description; GContact::update($contact); } } } }