<?php /** * @file mod/dirfind.php */ use Friendica\App; use Friendica\Content\ContactSelector; use Friendica\Content\Widget; use Friendica\Core\Config; use Friendica\Core\L10n; use Friendica\Core\System; use Friendica\Core\Worker; use Friendica\Model\Contact; use Friendica\Model\GContact; use Friendica\Model\Profile; use Friendica\Network\Probe; use Friendica\Protocol\PortableContact; use Friendica\Util\Network; use Friendica\Database\DBM; require_once 'mod/contacts.php'; function dirfind_init(App $a) { if (! local_user()) { notice(L10n::t('Permission denied.') . EOL ); return; } if (! x($a->page,'aside')) { $a->page['aside'] = ''; } $a->page['aside'] .= Widget::findPeople(); $a->page['aside'] .= Widget::follow(); } function dirfind_content(App $a, $prefix = "") { $community = false; $discover_user = false; $local = Config::get('system','poco_local_search'); $search = $prefix.notags(trim($_REQUEST['search'])); if (strpos($search,'@') === 0) { $search = substr($search,1); $header = L10n::t('People Search - %s', $search); if ((valid_email($search) && Network::isEmailDomainValid($search)) || (substr(normalise_link($search), 0, 7) == "http://")) { $user_data = Probe::uri($search); $discover_user = (in_array($user_data["network"], [NETWORK_DFRN, NETWORK_OSTATUS, NETWORK_DIASPORA])); } } if (strpos($search,'!') === 0) { $search = substr($search,1); $community = true; $header = L10n::t('Forum Search - %s', $search); } $o = ''; if ($search) { if ($discover_user) { $j = new stdClass(); $j->total = 1; $j->items_page = 1; $j->page = $a->pager['page']; $objresult = new stdClass(); $objresult->cid = 0; $objresult->name = $user_data["name"]; $objresult->addr = $user_data["addr"]; $objresult->url = $user_data["url"]; $objresult->photo = $user_data["photo"]; $objresult->tags = ""; $objresult->network = $user_data["network"]; $contact = Contact::getDetailsByURL($user_data["url"], local_user()); $objresult->cid = $contact["cid"]; $j->results[] = $objresult; // Add the contact to the global contacts if it isn't already in our system if (($contact["cid"] == 0) && ($contact["zid"] == 0) && ($contact["gid"] == 0)) { GContact::update($user_data); } } elseif ($local) { if ($community) $extra_sql = " AND `community`"; else $extra_sql = ""; $perpage = 80; $startrec = (($a->pager['page']) * $perpage) - $perpage; if (Config::get('system','diaspora_enabled')) { $diaspora = NETWORK_DIASPORA; } else { $diaspora = NETWORK_DFRN; } if (!Config::get('system','ostatus_disabled')) { $ostatus = NETWORK_OSTATUS; } else { $ostatus = NETWORK_DFRN; } $search2 = "%".$search."%"; /// @TODO These 2 SELECTs are not checked on validity with DBM::is_result() $count = q("SELECT count(*) AS `total` FROM `gcontact` WHERE NOT `hide` AND `network` IN ('%s', '%s', '%s') AND ((`last_contact` >= `last_failure`) OR (`updated` >= `last_failure`)) AND (`url` LIKE '%s' OR `name` LIKE '%s' OR `location` LIKE '%s' OR `addr` LIKE '%s' OR `about` LIKE '%s' OR `keywords` LIKE '%s') $extra_sql", dbesc(NETWORK_DFRN), dbesc($ostatus), dbesc($diaspora), dbesc(escape_tags($search2)), dbesc(escape_tags($search2)), dbesc(escape_tags($search2)), dbesc(escape_tags($search2)), dbesc(escape_tags($search2)), dbesc(escape_tags($search2))); $results = q("SELECT `nurl` FROM `gcontact` WHERE NOT `hide` AND `network` IN ('%s', '%s', '%s') AND ((`last_contact` >= `last_failure`) OR (`updated` >= `last_failure`)) AND (`url` LIKE '%s' OR `name` LIKE '%s' OR `location` LIKE '%s' OR `addr` LIKE '%s' OR `about` LIKE '%s' OR `keywords` LIKE '%s') $extra_sql GROUP BY `nurl` ORDER BY `updated` DESC LIMIT %d, %d", dbesc(NETWORK_DFRN), dbesc($ostatus), dbesc($diaspora), dbesc(escape_tags($search2)), dbesc(escape_tags($search2)), dbesc(escape_tags($search2)), dbesc(escape_tags($search2)), dbesc(escape_tags($search2)), dbesc(escape_tags($search2)), intval($startrec), intval($perpage)); $j = new stdClass(); $j->total = $count[0]["total"]; $j->items_page = $perpage; $j->page = $a->pager['page']; foreach ($results AS $result) { if (PortableContact::alternateOStatusUrl($result["nurl"])) { continue; } $urlparts = parse_url($result["nurl"]); // Ignore results that look strange. // For historic reasons the gcontact table does contain some garbage. if (!empty($urlparts['query']) || !empty($urlparts['fragment'])) { continue; } $result = Contact::getDetailsByURL($result["nurl"], local_user()); if ($result["name"] == "") { $result["name"] = end(explode("/", $urlparts["path"])); } $objresult = new stdClass(); $objresult->cid = $result["cid"]; $objresult->name = $result["name"]; $objresult->addr = $result["addr"]; $objresult->url = $result["url"]; $objresult->photo = $result["photo"]; $objresult->tags = $result["keywords"]; $objresult->network = $result["network"]; $j->results[] = $objresult; } // Add found profiles from the global directory to the local directory Worker::add(PRIORITY_LOW, 'DiscoverPoCo', "dirsearch", urlencode($search)); } else { $p = (($a->pager['page'] != 1) ? '&p=' . $a->pager['page'] : ''); if(strlen(Config::get('system','directory'))) $x = Network::fetchUrl(get_server().'/lsearch?f=' . $p . '&search=' . urlencode($search)); $j = json_decode($x); } if ($j->total) { $a->set_pager_total($j->total); $a->set_pager_itemspage($j->items_page); } if (count($j->results)) { $id = 0; foreach ($j->results as $jj) { $alt_text = ""; $contact_details = Contact::getDetailsByURL($jj->url, local_user()); $itemurl = (($contact_details["addr"] != "") ? $contact_details["addr"] : $jj->url); // If We already know this contact then don't show the "connect" button if ($jj->cid > 0) { $connlnk = ""; $conntxt = ""; $contact = dba::selectFirst('contact', [], ['id' => $jj->cid]); if (DBM::is_result($contact)) { $photo_menu = Contact::photoMenu($contact); $details = _contact_detail_for_template($contact); $alt_text = $details['alt_text']; } else { $photo_menu = []; } } else { $connlnk = System::baseUrl().'/follow/?url='.(($jj->connect) ? $jj->connect : $jj->url); $conntxt = L10n::t('Connect'); $photo_menu = [ 'profile' => [L10n::t("View Profile"), Profile::zrl($jj->url)], 'follow' => [L10n::t("Connect/Follow"), $connlnk] ]; } $jj->photo = str_replace("http:///photo/", get_server()."/photo/", $jj->photo); $entry = [ 'alt_text' => $alt_text, 'url' => Profile::magicLink($jj->url), 'itemurl' => $itemurl, 'name' => htmlentities($jj->name), 'thumb' => proxy_url($jj->photo, false, PROXY_SIZE_THUMB), 'img_hover' => $jj->tags, 'conntxt' => $conntxt, 'connlnk' => $connlnk, 'photo_menu' => $photo_menu, 'details' => $contact_details['location'], 'tags' => $contact_details['keywords'], 'about' => $contact_details['about'], 'account_type' => Contact::getAccountType($contact_details), 'network' => ContactSelector::networkToName($jj->network, $jj->url), 'id' => ++$id, ]; $entries[] = $entry; } $tpl = get_markup_template('viewcontact_template.tpl'); $o .= replace_macros($tpl,[ 'title' => $header, '$contacts' => $entries, '$paginate' => paginate($a), ]); } else { info(L10n::t('No matches') . EOL); } } return $o; }