<?php
/**
- * @file mod/match.php
+ * @copyright Copyright (C) 2010-2021, the Friendica project
+ *
+ * @license GNU AGPL version 3 or any later version
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License as
+ * published by the Free Software Foundation, either version 3 of the
+ * License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program. If not, see <https://www.gnu.org/licenses/>.
+ *
*/
use Friendica\App;
-use Friendica\Content\Pager;
use Friendica\Content\Widget;
-use Friendica\Core\Config;
-use Friendica\Core\L10n;
use Friendica\Core\Renderer;
-use Friendica\Core\System;
+use Friendica\Core\Search;
use Friendica\Database\DBA;
+use Friendica\DI;
use Friendica\Model\Contact;
use Friendica\Model\Profile;
-use Friendica\Util\Network;
-use Friendica\Util\Proxy as ProxyUtils;
+use Friendica\Module\Contact as ModuleContact;
/**
- * @brief Controller for /match.
+ * Controller for /match.
*
* It takes keywords from your profile and queries the directory server for
* matching keywords from other profiles.
* @param App $a App
*
* @return string
+ * @throws ImagickException
+ * @throws \Friendica\Network\HTTPException\InternalServerErrorException
+ * @throws Exception
*/
function match_content(App $a)
{
return '';
}
- $a->page['aside'] .= Widget::findPeople();
- $a->page['aside'] .= Widget::follow();
+ DI::page()['aside'] .= Widget::findPeople();
+ DI::page()['aside'] .= Widget::follow();
- $_SESSION['return_path'] = $a->cmd;
+ $_SESSION['return_path'] = DI::args()->getCommand();
$profile = Profile::getByUID(local_user());
return '';
}
if (!$profile['pub_keywords'] && (!$profile['prv_keywords'])) {
- notice(L10n::t('No keywords to match. Please add keywords to your default profile.') . EOL);
+ notice(DI::l10n()->t('No keywords to match. Please add keywords to your profile.'));
return '';
}
$params = [];
$tags = trim($profile['pub_keywords'] . ' ' . $profile['prv_keywords']);
- $params['s'] = $tags;
- $params['n'] = 100;
-
- if (strlen(Config::get('system', 'directory'))) {
- $host = get_server();
+ if (DI::mode()->isMobile()) {
+ $limit = DI::pConfig()->get(local_user(), 'system', 'itemspage_mobile_network',
+ DI::config()->get('system', 'itemspage_network_mobile'));
} else {
- $host = System::baseUrl();
+ $limit = DI::pConfig()->get(local_user(), 'system', 'itemspage_network',
+ DI::config()->get('system', 'itemspage_network'));
}
- $msearch_json = Network::post($host . '/msearch', $params)->getBody();
-
- $msearch = json_decode($msearch_json);
+ $params['s'] = $tags;
+ $params['n'] = 100;
- $start = defaults($_GET, 'start', 0);
$entries = [];
- $paginate = '';
-
- if (!empty($msearch->results)) {
- for ($i = $start;count($entries) < 10 && $i < $msearch->total; $i++) {
- $profile = $msearch->results[$i];
-
- // Already known contact
- if (Contact::getIdForURL($profile->url, local_user(), true)) {
- continue;
- }
-
- // Workaround for wrong directory photo URL
- $profile->photo = str_replace('http:///photo/', get_server() . '/photo/', $profile->photo);
-
- $connlnk = System::baseUrl() . '/follow/?url=' . $profile->url;
- $photo_menu = [
- 'profile' => [L10n::t("View Profile"), Contact::magicLink($profile->url)],
- 'follow' => [L10n::t("Connect/Follow"), $connlnk]
- ];
-
- $contact_details = Contact::getDetailsByURL($profile->url, 0);
-
- $entry = [
- 'url' => Contact::magicLink($profile->url),
- 'itemurl' => defaults($contact_details, 'addr', $profile->url),
- 'name' => $profile->name,
- 'details' => defaults($contact_details, 'location', ''),
- 'tags' => defaults($contact_details, 'keywords', ''),
- 'about' => defaults($contact_details, 'about', ''),
- 'account_type' => Contact::getAccountType($contact_details),
- 'thumb' => ProxyUtils::proxifyUrl($profile->photo, false, ProxyUtils::SIZE_THUMB),
- 'conntxt' => L10n::t('Connect'),
- 'connlnk' => $connlnk,
- 'img_hover' => $profile->tags,
- 'photo_menu' => $photo_menu,
- 'id' => $i,
- ];
- $entries[] = $entry;
+ foreach ([Search::getGlobalDirectory(), DI::baseUrl()] as $server) {
+ if (empty($server)) {
+ continue;
}
- $data = [
- 'class' => 'pager',
- 'first' => [
- 'url' => 'match',
- 'text' => L10n::t('first'),
- 'class' => 'previous' . ($start == 0 ? 'disabled' : '')
- ],
- 'next' => [
- 'url' => 'match?start=' . $i,
- 'text' => L10n::t('next'),
- 'class' => 'next' . ($i >= $msearch->total ? ' disabled' : '')
- ]
- ];
-
- $tpl = Renderer::getMarkupTemplate('paginate.tpl');
- $paginate = Renderer::replaceMacros($tpl, ['pager' => $data]);
+ $msearch = json_decode(DI::httpClient()->post($server . '/msearch', $params)->getBody());
+ if (!empty($msearch)) {
+ $entries = match_get_contacts($msearch, $entries, $limit);
+ }
}
if (empty($entries)) {
- info(L10n::t('No matches') . EOL);
+ info(DI::l10n()->t('No matches'));
}
$tpl = Renderer::getMarkupTemplate('viewcontact_template.tpl');
$o = Renderer::replaceMacros($tpl, [
- '$title' => L10n::t('Profile Match'),
- '$contacts' => $entries,
- '$paginate' => $paginate
+ '$title' => DI::l10n()->t('Profile Match'),
+ '$contacts' => array_slice($entries, 0, $limit),
]);
return $o;
}
+
+function match_get_contacts($msearch, $entries, $limit)
+{
+ if (empty($msearch->results)) {
+ return $entries;
+ }
+
+ foreach ($msearch->results as $profile) {
+ if (!$profile) {
+ continue;
+ }
+
+ // Already known contact
+ $contact = Contact::getByURL($profile->url, null, ['rel'], local_user());
+ if (!empty($contact) && in_array($contact['rel'], [Contact::FRIEND, Contact::SHARING])) {
+ continue;
+ }
+
+ $contact = Contact::getByURLForUser($profile->url, local_user());
+ if (!empty($contact)) {
+ $entries[$contact['id']] = ModuleContact::getContactTemplateVars($contact);
+ }
+
+ if (count($entries) == $limit) {
+ break;
+ }
+ }
+ return $entries;
+}
\ No newline at end of file