3 namespace Friendica\Module;
6 use Friendica\BaseModule;
7 use Friendica\Content\ContactSelector;
8 use Friendica\Content\Nav;
9 use Friendica\Content\Pager;
10 use Friendica\Content\Text\BBCode;
11 use Friendica\Content\Widget;
12 use Friendica\Core\ACL;
13 use Friendica\Core\Hook;
14 use Friendica\Core\L10n;
15 use Friendica\Core\Protocol;
16 use Friendica\Core\Renderer;
17 use Friendica\Core\System;
18 use Friendica\Core\Worker;
19 use Friendica\Database\DBA;
21 use Friendica\Network\HTTPException\BadRequestException;
22 use Friendica\Network\HTTPException\NotFoundException;
23 use Friendica\Network\Probe;
24 use Friendica\Util\DateTimeFormat;
25 use Friendica\Util\Proxy as ProxyUtils;
26 use Friendica\Util\Strings;
29 * Manages and show Contacts and their content
31 * @brief manages contacts
33 class Contact extends BaseModule
35 private static function batchActions(App $a)
37 if (empty($_POST['contact_batch']) || !is_array($_POST['contact_batch'])) {
41 $contacts_id = $_POST['contact_batch'];
43 $stmt = DBA::select('contact', ['id', 'archive'], ['id' => $contacts_id, 'uid' => local_user(), 'self' => false, 'deleted' => false]);
44 $orig_records = DBA::toArray($stmt);
47 foreach ($orig_records as $orig_record) {
48 $contact_id = $orig_record['id'];
49 if (!empty($_POST['contacts_batch_update'])) {
50 self::updateContactFromPoll($contact_id);
53 if (!empty($_POST['contacts_batch_block'])) {
54 self::blockContact($contact_id);
57 if (!empty($_POST['contacts_batch_ignore'])) {
58 self::ignoreContact($contact_id);
61 if (!empty($_POST['contacts_batch_archive'])
62 && self::archiveContact($contact_id, $orig_record)
66 if (!empty($_POST['contacts_batch_drop'])) {
67 self::dropContact($orig_record);
71 if ($count_actions > 0) {
72 info(L10n::tt('%d contact edited.', '%d contacts edited.', $count_actions));
75 $a->internalRedirect('contact');
78 public static function post()
86 // @TODO: Replace with parameter from router
87 if ($a->argv[1] === 'batch') {
88 self::batchActions($a);
92 // @TODO: Replace with parameter from router
93 $contact_id = intval($a->argv[1]);
98 if (!DBA::exists('contact', ['id' => $contact_id, 'uid' => local_user(), 'deleted' => false])) {
99 notice(L10n::t('Could not access contact record.') . EOL);
100 $a->internalRedirect('contact');
101 return; // NOTREACHED
104 Hook::callAll('contact_edit_post', $_POST);
106 $profile_id = intval(defaults($_POST, 'profile-assign', 0));
108 if (!DBA::exists('profile', ['id' => $profile_id, 'uid' => local_user()])) {
109 notice(L10n::t('Could not locate selected profile.') . EOL);
114 $hidden = !empty($_POST['hidden']);
116 $notify = !empty($_POST['notify']);
118 $fetch_further_information = intval(defaults($_POST, 'fetch_further_information', 0));
120 $ffi_keyword_blacklist = Strings::escapeHtml(trim(defaults($_POST, 'ffi_keyword_blacklist', '')));
122 $priority = intval(defaults($_POST, 'poll', 0));
123 if ($priority > 5 || $priority < 0) {
127 $info = Strings::escapeHtml(trim(defaults($_POST, 'info', '')));
129 $r = DBA::update('contact', [
130 'profile-id' => $profile_id,
131 'priority' => $priority,
134 'notify_new_posts' => $notify,
135 'fetch_further_information' => $fetch_further_information,
136 'ffi_keyword_blacklist' => $ffi_keyword_blacklist],
137 ['id' => $contact_id, 'uid' => local_user()]
140 if (DBA::isResult($r)) {
141 info(L10n::t('Contact updated.') . EOL);
143 notice(L10n::t('Failed to update contact record.') . EOL);
146 $contact = DBA::selectFirst('contact', [], ['id' => $contact_id, 'uid' => local_user(), 'deleted' => false]);
147 if (DBA::isResult($contact)) {
148 $a->data['contact'] = $contact;
154 /* contact actions */
156 private static function updateContactFromPoll($contact_id)
158 $contact = DBA::selectFirst('contact', ['uid', 'url', 'network'], ['id' => $contact_id, 'uid' => local_user(), 'deleted' => false]);
159 if (!DBA::isResult($contact)) {
163 $uid = $contact['uid'];
165 if ($contact['network'] == Protocol::OSTATUS) {
166 $result = Model\Contact::createFromProbe($uid, $contact['url'], false, $contact['network']);
168 if ($result['success']) {
169 DBA::update('contact', ['subhub' => 1], ['id' => $contact_id]);
172 // pull feed and consume it, which should subscribe to the hub.
173 Worker::add(PRIORITY_HIGH, 'OnePoll', $contact_id, 'force');
177 private static function updateContactFromProbe($contact_id)
179 $contact = DBA::selectFirst('contact', ['uid', 'url', 'network'], ['id' => $contact_id, 'uid' => local_user(), 'deleted' => false]);
180 if (!DBA::isResult($contact)) {
184 $uid = $contact['uid'];
186 $data = Probe::uri($contact['url'], '', 0, false);
188 // 'Feed' or 'Unknown' is mostly a sign of communication problems
189 if ((in_array($data['network'], [Protocol::FEED, Protocol::PHANTOM])) && ($data['network'] != $contact['network'])) {
193 $updatefields = ['name', 'nick', 'url', 'addr', 'batch', 'notify', 'poll', 'request', 'confirm', 'poco', 'network', 'alias'];
196 if ($data['network'] == Protocol::OSTATUS) {
197 $result = Model\Contact::createFromProbe($uid, $data['url'], false);
199 if ($result['success']) {
200 $fields['subhub'] = true;
204 foreach ($updatefields AS $field) {
205 if (!empty($data[$field])) {
206 $fields[$field] = $data[$field];
210 $fields['nurl'] = Strings::normaliseLink($data['url']);
212 if (!empty($data['priority'])) {
213 $fields['priority'] = intval($data['priority']);
216 if (empty($fields)) {
220 DBA::update('contact', $fields, ['id' => $contact_id, 'uid' => local_user()]);
222 // Update the entry in the contact table
223 Model\Contact::updateAvatar($data['photo'], local_user(), $contact_id, true);
225 // Update the entry in the gcontact table
226 Model\GContact::updateFromProbe($data['url']);
229 private static function blockContact($contact_id)
231 $blocked = !Model\Contact::isBlockedByUser($contact_id, local_user());
232 Model\Contact::setBlockedForUser($contact_id, local_user(), $blocked);
235 private static function ignoreContact($contact_id)
237 $ignored = !Model\Contact::isIgnoredByUser($contact_id, local_user());
238 Model\Contact::setIgnoredForUser($contact_id, local_user(), $ignored);
241 private static function archiveContact($contact_id, $orig_record)
243 $archived = (defaults($orig_record, 'archive', '') ? 0 : 1);
244 $r = DBA::update('contact', ['archive' => $archived], ['id' => $contact_id, 'uid' => local_user()]);
246 return DBA::isResult($r);
249 private static function dropContact($orig_record)
251 $owner = Model\User::getOwnerDataById(local_user());
252 if (!DBA::isResult($owner)) {
256 Model\Contact::terminateFriendship($owner, $orig_record, true);
257 Model\Contact::remove($orig_record['id']);
260 public static function content($update = 0)
263 return Login::form($_SERVER['REQUEST_URI']);
268 $nets = defaults($_GET, 'nets', '');
269 $rel = defaults($_GET, 'rel' , '');
271 if (empty($a->page['aside'])) {
272 $a->page['aside'] = '';
277 // @TODO: Replace with parameter from router
278 if ($a->argc == 2 && intval($a->argv[1])
279 || $a->argc == 3 && intval($a->argv[1]) && in_array($a->argv[2], ['posts', 'conversations'])
281 $contact_id = intval($a->argv[1]);
282 $contact = DBA::selectFirst('contact', [], ['id' => $contact_id, 'uid' => local_user(), 'deleted' => false]);
284 if (!DBA::isResult($contact)) {
285 $contact = DBA::selectFirst('contact', [], ['id' => $contact_id, 'uid' => 0, 'deleted' => false]);
288 // Don't display contacts that are about to be deleted
289 if ($contact['network'] == Protocol::PHANTOM) {
294 if (DBA::isResult($contact)) {
295 if ($contact['self']) {
296 // @TODO: Replace with parameter from router
297 if (($a->argc == 3) && intval($a->argv[1]) && in_array($a->argv[2], ['posts', 'conversations'])) {
298 $a->internalRedirect('profile/' . $contact['nick']);
300 $a->internalRedirect('profile/' . $contact['nick'] . '?tab=profile');
304 $a->data['contact'] = $contact;
306 if (($contact['network'] != '') && ($contact['network'] != Protocol::DFRN)) {
307 $network_link = Strings::formatNetworkName($contact['network'], $contact['url']);
314 if (in_array($contact['network'], Protocol::NATIVE_SUPPORT)) {
315 if ($contact['uid'] && in_array($contact['rel'], [Model\Contact::SHARING, Model\Contact::FRIEND])) {
316 $unfollow_link = 'unfollow?url=' . urlencode($contact['url']);
317 } elseif(!$contact['pending']) {
318 $follow_link = 'follow?url=' . urlencode($contact['url']);
322 $wallmessage_link = '';
323 if ($contact['uid'] && Model\Contact::canReceivePrivateMessages($contact)) {
324 $wallmessage_link = 'message/new/' . $contact['id'];
327 $vcard_widget = Renderer::replaceMacros(Renderer::getMarkupTemplate('widget/vcard.tpl'), [
328 '$name' => $contact['name'],
329 '$photo' => $contact['photo'],
330 '$url' => Model\Contact::magicLinkByContact($contact, $contact['url']),
331 '$addr' => defaults($contact, 'addr', ''),
332 '$network_link' => $network_link,
333 '$network' => L10n::t('Network:'),
334 '$account_type' => Model\Contact::getAccountType($contact),
335 '$follow' => L10n::t('Follow'),
336 '$follow_link' => $follow_link,
337 '$unfollow' => L10n::t('Unfollow'),
338 '$unfollow_link' => $unfollow_link,
339 '$wallmessage' => L10n::t('Message'),
340 '$wallmessage_link' => $wallmessage_link,
343 $findpeople_widget = '';
345 $networks_widget = '';
349 $findpeople_widget = Widget::findPeople();
350 if (isset($_GET['add'])) {
351 $follow_widget = Widget::follow($_GET['add']);
353 $follow_widget = Widget::follow();
356 $networks_widget = Widget::networks($_SERVER['REQUEST_URI'], $nets);
357 $rel_widget = Widget::contactRels($_SERVER['REQUEST_URI'], $rel);
360 if ($contact['uid'] != 0) {
361 $groups_widget = Model\Group::sidebarWidget('contact', 'group', 'full', 'everyone', $contact_id);
363 $groups_widget = null;
366 $a->page['aside'] .= $vcard_widget . $findpeople_widget . $follow_widget . $groups_widget . $networks_widget . $rel_widget;
368 $tpl = Renderer::getMarkupTemplate('contacts-head.tpl');
369 $a->page['htmlhead'] .= Renderer::replaceMacros($tpl, [
370 '$baseurl' => $a->getBaseURL(true),
375 Nav::setSelected('contact');
378 notice(L10n::t('Permission denied.') . EOL);
379 return Login::form();
383 $contact_id = intval($a->argv[1]);
385 throw new BadRequestException();
388 // @TODO: Replace with parameter from router
391 $orig_record = DBA::selectFirst('contact', [], ['id' => $contact_id, 'uid' => [0, local_user()], 'self' => false, 'deleted' => false]);
392 if (!DBA::isResult($orig_record)) {
393 throw new NotFoundException(L10n::t('Contact not found'));
396 if ($cmd === 'update' && ($orig_record['uid'] != 0)) {
397 self::updateContactFromPoll($contact_id);
398 $a->internalRedirect('contact/' . $contact_id);
402 if ($cmd === 'updateprofile' && ($orig_record['uid'] != 0)) {
403 self::updateContactFromProbe($contact_id);
404 $a->internalRedirect('crepair/' . $contact_id);
408 if ($cmd === 'block') {
409 self::blockContact($contact_id);
411 $blocked = Model\Contact::isBlockedByUser($contact_id, local_user());
412 info(($blocked ? L10n::t('Contact has been blocked') : L10n::t('Contact has been unblocked')) . EOL);
414 $a->internalRedirect('contact/' . $contact_id);
418 if ($cmd === 'ignore') {
419 self::ignoreContact($contact_id);
421 $ignored = Model\Contact::isIgnoredByUser($contact_id, local_user());
422 info(($ignored ? L10n::t('Contact has been ignored') : L10n::t('Contact has been unignored')) . EOL);
424 $a->internalRedirect('contact/' . $contact_id);
428 if ($cmd === 'archive' && ($orig_record['uid'] != 0)) {
429 $r = self::archiveContact($contact_id, $orig_record);
431 $archived = (($orig_record['archive']) ? 0 : 1);
432 info((($archived) ? L10n::t('Contact has been archived') : L10n::t('Contact has been unarchived')) . EOL);
435 $a->internalRedirect('contact/' . $contact_id);
439 if ($cmd === 'drop' && ($orig_record['uid'] != 0)) {
440 // Check if we should do HTML-based delete confirmation
441 if (!empty($_REQUEST['confirm'])) {
442 // <form> can't take arguments in its 'action' parameter
443 // so add any arguments as hidden inputs
444 $query = explode_querystring($a->query_string);
446 foreach ($query['args'] as $arg) {
447 if (strpos($arg, 'confirm=') === false) {
448 $arg_parts = explode('=', $arg);
449 $inputs[] = ['name' => $arg_parts[0], 'value' => $arg_parts[1]];
453 $a->page['aside'] = '';
455 return Renderer::replaceMacros(Renderer::getMarkupTemplate('contact_drop_confirm.tpl'), [
456 '$header' => L10n::t('Drop contact'),
457 '$contact' => self::getContactTemplateVars($orig_record),
459 '$message' => L10n::t('Do you really want to delete this contact?'),
460 '$extra_inputs' => $inputs,
461 '$confirm' => L10n::t('Yes'),
462 '$confirm_url' => $query['base'],
463 '$confirm_name' => 'confirmed',
464 '$cancel' => L10n::t('Cancel'),
467 // Now check how the user responded to the confirmation query
468 if (!empty($_REQUEST['canceled'])) {
469 $a->internalRedirect('contact');
472 self::dropContact($orig_record);
473 info(L10n::t('Contact has been removed.') . EOL);
475 $a->internalRedirect('contact');
478 if ($cmd === 'posts') {
479 return self::getPostsHTML($a, $contact_id);
481 if ($cmd === 'conversations') {
482 return self::getConversationsHMTL($a, $contact_id, $update);
486 $_SESSION['return_path'] = $a->query_string;
488 if (!empty($a->data['contact']) && is_array($a->data['contact'])) {
489 $contact = $a->data['contact'];
491 $a->page['htmlhead'] .= Renderer::replaceMacros(Renderer::getMarkupTemplate('contact_head.tpl'), [
492 '$baseurl' => $a->getBaseURL(true),
495 $contact['blocked'] = Model\Contact::isBlockedByUser($contact['id'], local_user());
496 $contact['readonly'] = Model\Contact::isIgnoredByUser($contact['id'], local_user());
500 switch ($contact['rel']) {
501 case Model\Contact::FRIEND:
502 $dir_icon = 'images/lrarrow.gif';
503 $relation_text = L10n::t('You are mutual friends with %s');
506 case Model\Contact::FOLLOWER;
507 $dir_icon = 'images/larrow.gif';
508 $relation_text = L10n::t('You are sharing with %s');
511 case Model\Contact::SHARING;
512 $dir_icon = 'images/rarrow.gif';
513 $relation_text = L10n::t('%s is sharing with you');
520 if ($contact['uid'] == 0) {
524 if (!in_array($contact['network'], Protocol::FEDERATED)) {
528 $relation_text = sprintf($relation_text, $contact['name']);
530 $url = Model\Contact::magicLink($contact['url']);
531 if (strpos($url, 'redir/') === 0) {
532 $sparkle = ' class="sparkle" ';
537 $insecure = L10n::t('Private communications are not available for this contact.');
539 $last_update = (($contact['last-update'] <= DBA::NULL_DATETIME) ? L10n::t('Never') : DateTimeFormat::local($contact['last-update'], 'D, j M Y, g:i A'));
541 if ($contact['last-update'] > DBA::NULL_DATETIME) {
542 $last_update .= ' ' . (($contact['last-update'] <= $contact['success_update']) ? L10n::t('(Update was successful)') : L10n::t('(Update was not successful)'));
544 $lblsuggest = (($contact['network'] === Protocol::DFRN) ? L10n::t('Suggest friends') : '');
546 $poll_enabled = in_array($contact['network'], [Protocol::DFRN, Protocol::OSTATUS, Protocol::FEED, Protocol::MAIL]);
548 $nettype = L10n::t('Network type: %s', ContactSelector::networkToName($contact['network'], $contact['url']));
551 $tab_str = self::getTabsHTML($a, $contact, 3);
553 $lost_contact = (($contact['archive'] && $contact['term-date'] > DBA::NULL_DATETIME && $contact['term-date'] < DateTimeFormat::utcNow()) ? L10n::t('Communications lost with this contact!') : '');
555 $fetch_further_information = null;
556 if ($contact['network'] == Protocol::FEED) {
557 $fetch_further_information = [
558 'fetch_further_information',
559 L10n::t('Fetch further information for feeds'),
560 $contact['fetch_further_information'],
561 L10n::t('Fetch information like preview pictures, title and teaser from the feed item. You can activate this if the feed doesn\'t contain much text. Keywords are taken from the meta header in the feed item and are posted as hash tags.'),
563 '0' => L10n::t('Disabled'),
564 '1' => L10n::t('Fetch information'),
565 '3' => L10n::t('Fetch keywords'),
566 '2' => L10n::t('Fetch information and keywords')
571 $poll_interval = null;
572 if (in_array($contact['network'], [Protocol::FEED, Protocol::MAIL])) {
573 $poll_interval = ContactSelector::pollInterval($contact['priority'], !$poll_enabled);
576 $profile_select = null;
577 if ($contact['network'] == Protocol::DFRN) {
578 $profile_select = ContactSelector::profileAssign($contact['profile-id'], $contact['network'] !== Protocol::DFRN);
581 // Load contactact related actions like hide, suggest, delete and others
582 $contact_actions = self::getContactActions($contact);
584 if ($contact['uid'] != 0) {
585 $lbl_vis1 = L10n::t('Profile Visibility');
586 $lbl_info1 = L10n::t('Contact Information / Notes');
587 $contact_settings_label = L10n::t('Contact Settings');
591 $contact_settings_label = null;
594 $tpl = Renderer::getMarkupTemplate('contact_edit.tpl');
595 $o .= Renderer::replaceMacros($tpl, [
596 '$header' => L10n::t('Contact'),
597 '$tab_str' => $tab_str,
598 '$submit' => L10n::t('Submit'),
599 '$lbl_vis1' => $lbl_vis1,
600 '$lbl_vis2' => L10n::t('Please choose the profile you would like to display to %s when viewing your profile securely.', $contact['name']),
601 '$lbl_info1' => $lbl_info1,
602 '$lbl_info2' => L10n::t('Their personal note'),
603 '$reason' => trim(Strings::escapeTags($contact['reason'])),
604 '$infedit' => L10n::t('Edit contact notes'),
605 '$common_link' => 'common/loc/' . local_user() . '/' . $contact['id'],
606 '$relation_text' => $relation_text,
607 '$visit' => L10n::t('Visit %s\'s profile [%s]', $contact['name'], $contact['url']),
608 '$blockunblock' => L10n::t('Block/Unblock contact'),
609 '$ignorecont' => L10n::t('Ignore contact'),
610 '$lblcrepair' => L10n::t('Repair URL settings'),
611 '$lblrecent' => L10n::t('View conversations'),
612 '$lblsuggest' => $lblsuggest,
613 '$nettype' => $nettype,
614 '$poll_interval' => $poll_interval,
615 '$poll_enabled' => $poll_enabled,
616 '$lastupdtext' => L10n::t('Last update:'),
617 '$lost_contact' => $lost_contact,
618 '$updpub' => L10n::t('Update public posts'),
619 '$last_update' => $last_update,
620 '$udnow' => L10n::t('Update now'),
621 '$profile_select' => $profile_select,
622 '$contact_id' => $contact['id'],
623 '$block_text' => ($contact['blocked'] ? L10n::t('Unblock') : L10n::t('Block')),
624 '$ignore_text' => ($contact['readonly'] ? L10n::t('Unignore') : L10n::t('Ignore')),
625 '$insecure' => (in_array($contact['network'], [Protocol::ACTIVITYPUB, Protocol::DFRN, Protocol::MAIL, Protocol::DIASPORA]) ? '' : $insecure),
626 '$info' => $contact['info'],
627 '$cinfo' => ['info', '', $contact['info'], ''],
628 '$blocked' => ($contact['blocked'] ? L10n::t('Currently blocked') : ''),
629 '$ignored' => ($contact['readonly'] ? L10n::t('Currently ignored') : ''),
630 '$archived' => ($contact['archive'] ? L10n::t('Currently archived') : ''),
631 '$pending' => ($contact['pending'] ? L10n::t('Awaiting connection acknowledge') : ''),
632 '$hidden' => ['hidden', L10n::t('Hide this contact from others'), ($contact['hidden'] == 1), L10n::t('Replies/likes to your public posts <strong>may</strong> still be visible')],
633 '$notify' => ['notify', L10n::t('Notification for new posts'), ($contact['notify_new_posts'] == 1), L10n::t('Send a notification of every new post of this contact')],
634 '$fetch_further_information' => $fetch_further_information,
635 '$ffi_keyword_blacklist' => ['ffi_keyword_blacklist', L10n::t('Blacklisted keywords'), $contact['ffi_keyword_blacklist'], L10n::t('Comma separated list of keywords that should not be converted to hashtags, when "Fetch information and keywords" is selected')],
636 '$photo' => $contact['photo'],
637 '$name' => $contact['name'],
638 '$dir_icon' => $dir_icon,
639 '$sparkle' => $sparkle,
641 '$profileurllabel'=> L10n::t('Profile URL'),
642 '$profileurl' => $contact['url'],
643 '$account_type' => Model\Contact::getAccountType($contact),
644 '$location' => BBCode::convert($contact['location']),
645 '$location_label' => L10n::t('Location:'),
646 '$xmpp' => BBCode::convert($contact['xmpp']),
647 '$xmpp_label' => L10n::t('XMPP:'),
648 '$about' => BBCode::convert($contact['about'], false),
649 '$about_label' => L10n::t('About:'),
650 '$keywords' => $contact['keywords'],
651 '$keywords_label' => L10n::t('Tags:'),
652 '$contact_action_button' => L10n::t('Actions'),
653 '$contact_actions'=> $contact_actions,
654 '$contact_status' => L10n::t('Status'),
655 '$contact_settings_label' => $contact_settings_label,
656 '$contact_profile_label' => L10n::t('Profile'),
659 $arr = ['contact' => $contact, 'output' => $o];
661 Hook::callAll('contact_edit', $arr);
663 return $arr['output'];
666 // @TODO: Replace with parameter from router
667 $type = defaults($a->argv, 1, '');
671 $sql_extra = " AND `blocked`";
674 $sql_extra = " AND `hidden` AND NOT `blocked`";
677 $sql_extra = " AND `readonly` AND NOT `blocked`";
680 $sql_extra = " AND `archive` AND NOT `blocked`";
683 $sql_extra = " AND NOT `archive` AND NOT `blocked`";
686 $sql_extra .= sprintf(" AND `network` != '%s' ", Protocol::PHANTOM);
688 $search = Strings::escapeTags(trim(defaults($_GET, 'search', '')));
689 $nets = Strings::escapeTags(trim(defaults($_GET, 'nets' , '')));
690 $rel = Strings::escapeTags(trim(defaults($_GET, 'rel' , '')));
694 'label' => L10n::t('All Contacts'),
696 'sel' => !$type ? 'active' : '',
697 'title' => L10n::t('Show all contacts'),
698 'id' => 'showall-tab',
702 'label' => L10n::t('Blocked'),
703 'url' => 'contact/blocked',
704 'sel' => $type == 'blocked' ? 'active' : '',
705 'title' => L10n::t('Only show blocked contacts'),
706 'id' => 'showblocked-tab',
710 'label' => L10n::t('Ignored'),
711 'url' => 'contact/ignored',
712 'sel' => $type == 'ignored' ? 'active' : '',
713 'title' => L10n::t('Only show ignored contacts'),
714 'id' => 'showignored-tab',
718 'label' => L10n::t('Archived'),
719 'url' => 'contact/archived',
720 'sel' => $type == 'archived' ? 'active' : '',
721 'title' => L10n::t('Only show archived contacts'),
722 'id' => 'showarchived-tab',
726 'label' => L10n::t('Hidden'),
727 'url' => 'contact/hidden',
728 'sel' => $type == 'hidden' ? 'active' : '',
729 'title' => L10n::t('Only show hidden contacts'),
730 'id' => 'showhidden-tab',
734 'label' => L10n::t('Groups'),
737 'title' => L10n::t('Organize your contact groups'),
738 'id' => 'contactgroups-tab',
743 $tab_tpl = Renderer::getMarkupTemplate('common_tabs.tpl');
744 $t = Renderer::replaceMacros($tab_tpl, ['$tabs' => $tabs]);
751 $search_hdr = $search;
752 $search_txt = DBA::escape(Strings::protectSprintf(preg_quote($search)));
753 $sql_extra .= " AND (name REGEXP '$search_txt' OR url REGEXP '$search_txt' OR nick REGEXP '$search_txt') ";
757 $sql_extra .= sprintf(" AND network = '%s' ", DBA::escape($nets));
761 case 'followers': $sql_extra .= " AND `rel` IN (1, 3)"; break;
762 case 'following': $sql_extra .= " AND `rel` IN (2, 3)"; break;
763 case 'mutuals': $sql_extra .= " AND `rel` = 3"; break;
766 $sql_extra .= " AND NOT `deleted` ";
768 $sql_extra2 = ((($sort_type > 0) && ($sort_type <= Model\Contact::FRIEND)) ? sprintf(" AND `rel` = %d ", intval($sort_type)) : '');
770 $r = q("SELECT COUNT(*) AS `total` FROM `contact`
771 WHERE `uid` = %d AND `self` = 0 AND `pending` = 0 $sql_extra $sql_extra2 ",
772 intval($_SESSION['uid'])
774 if (DBA::isResult($r)) {
775 $total = $r[0]['total'];
777 $pager = new Pager($a->query_string);
779 $sql_extra3 = Widget::unavailableNetworks();
783 $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `self` = 0 AND `pending` = 0 $sql_extra $sql_extra2 $sql_extra3 ORDER BY `name` ASC LIMIT %d , %d ",
784 intval($_SESSION['uid']),
786 $pager->getItemsPerPage()
788 if (DBA::isResult($r)) {
789 foreach ($r as $rr) {
790 $rr['blocked'] = Model\Contact::isBlockedByUser($rr['id'], local_user());
791 $rr['readonly'] = Model\Contact::isIgnoredByUser($rr['id'], local_user());
792 $contacts[] = self::getContactTemplateVars($rr);
797 case 'followers': $header = L10n::t('Followers'); break;
798 case 'following': $header = L10n::t('Following'); break;
799 case 'mutuals': $header = L10n::t('Mutual friends'); break;
800 default: $header = L10n::t('Contacts');
804 case 'blocked': $header .= ' - ' . L10n::t('Blocked'); break;
805 case 'hidden': $header .= ' - ' . L10n::t('Hidden'); break;
806 case 'ignored': $header .= ' - ' . L10n::t('Ignored'); break;
807 case 'archived': $header .= ' - ' . L10n::t('Archived'); break;
810 $header .= $nets ? ' - ' . ContactSelector::networkToName($nets) : '';
812 $tpl = Renderer::getMarkupTemplate('contacts-template.tpl');
813 $o .= Renderer::replaceMacros($tpl, [
814 '$header' => $header,
817 '$search' => $search_hdr,
818 '$desc' => L10n::t('Search your contacts'),
819 '$finding' => $searching ? L10n::t('Results for: %s', $search) : '',
820 '$submit' => L10n::t('Find'),
822 '$contacts' => $contacts,
823 '$contact_drop_confirm' => L10n::t('Do you really want to delete this contact?'),
825 '$batch_actions' => [
826 'contacts_batch_update' => L10n::t('Update'),
827 'contacts_batch_block' => L10n::t('Block') . '/' . L10n::t('Unblock'),
828 'contacts_batch_ignore' => L10n::t('Ignore') . '/' . L10n::t('Unignore'),
829 'contacts_batch_archive' => L10n::t('Archive') . '/' . L10n::t('Unarchive'),
830 'contacts_batch_drop' => L10n::t('Delete'),
832 '$h_batch_actions' => L10n::t('Batch Actions'),
833 '$paginate' => $pager->renderFull($total),
840 * @brief List of pages for the Contact TabBar
842 * Available Pages are 'Status', 'Profile', 'Contacts' and 'Common Friends'
845 * @param array $contact The contact array
846 * @param int $active_tab 1 if tab should be marked as active
848 * @return string HTML string of the contact page tabs buttons.
849 * @throws \Friendica\Network\HTTPException\InternalServerErrorException
851 public static function getTabsHTML($a, $contact, $active_tab)
856 'label' => L10n::t('Status'),
857 'url' => "contact/" . $contact['id'] . "/conversations",
858 'sel' => (($active_tab == 1) ? 'active' : ''),
859 'title' => L10n::t('Conversations started by this contact'),
860 'id' => 'status-tab',
864 'label' => L10n::t('Posts and Comments'),
865 'url' => "contact/" . $contact['id'] . "/posts",
866 'sel' => (($active_tab == 2) ? 'active' : ''),
867 'title' => L10n::t('Status Messages and Posts'),
872 'label' => L10n::t('Profile'),
873 'url' => "contact/" . $contact['id'],
874 'sel' => (($active_tab == 3) ? 'active' : ''),
875 'title' => L10n::t('Profile Details'),
876 'id' => 'profile-tab',
881 // Show this tab only if there is visible friend list
882 $x = Model\GContact::countAllFriends(local_user(), $contact['id']);
884 $tabs[] = ['label' => L10n::t('Contacts'),
885 'url' => "allfriends/" . $contact['id'],
886 'sel' => (($active_tab == 4) ? 'active' : ''),
887 'title' => L10n::t('View all contacts'),
888 'id' => 'allfriends-tab',
892 // Show this tab only if there is visible common friend list
893 $common = Model\GContact::countCommonFriends(local_user(), $contact['id']);
895 $tabs[] = ['label' => L10n::t('Common Friends'),
896 'url' => "common/loc/" . local_user() . "/" . $contact['id'],
897 'sel' => (($active_tab == 5) ? 'active' : ''),
898 'title' => L10n::t('View all common friends'),
899 'id' => 'common-loc-tab',
904 if (!empty($contact['uid'])) {
905 $tabs[] = ['label' => L10n::t('Advanced'),
906 'url' => 'crepair/' . $contact['id'],
907 'sel' => (($active_tab == 6) ? 'active' : ''),
908 'title' => L10n::t('Advanced Contact Settings'),
909 'id' => 'advanced-tab',
914 $tab_tpl = Renderer::getMarkupTemplate('common_tabs.tpl');
915 $tab_str = Renderer::replaceMacros($tab_tpl, ['$tabs' => $tabs]);
920 private static function getConversationsHMTL($a, $contact_id, $update)
925 // We need the editor here to be able to reshare an item.
929 'allow_location' => $a->user['allow_location'],
930 'default_location' => $a->user['default-location'],
931 'nickname' => $a->user['nickname'],
932 'lockstate' => (is_array($a->user) && (strlen($a->user['allow_cid']) || strlen($a->user['allow_gid']) || strlen($a->user['deny_cid']) || strlen($a->user['deny_gid'])) ? 'lock' : 'unlock'),
933 'acl' => ACL::getFullSelectorHTML($a->user, true),
935 'visitor' => 'block',
936 'profile_uid' => local_user(),
938 $o = status_editor($a, $x, 0, true);
942 $contact = DBA::selectFirst('contact', ['uid', 'url', 'id'], ['id' => $contact_id, 'deleted' => false]);
945 $o .= self::getTabsHTML($a, $contact, 1);
948 if (DBA::isResult($contact)) {
949 $a->page['aside'] = '';
951 $profiledata = Model\Contact::getDetailsByURL($contact['url']);
953 Model\Profile::load($a, '', 0, $profiledata, true);
954 $o .= Model\Contact::getPostsFromUrl($contact['url'], true, $update);
960 private static function getPostsHTML($a, $contact_id)
962 $contact = DBA::selectFirst('contact', ['uid', 'url', 'id'], ['id' => $contact_id, 'deleted' => false]);
964 $o = self::getTabsHTML($a, $contact, 2);
966 if (DBA::isResult($contact)) {
967 $a->page['aside'] = '';
969 $profiledata = Model\Contact::getDetailsByURL($contact['url']);
971 if (local_user() && in_array($profiledata['network'], Protocol::FEDERATED)) {
972 $profiledata['remoteconnect'] = System::baseUrl() . '/follow?url=' . urlencode($profiledata['url']);
975 Model\Profile::load($a, '', 0, $profiledata, true);
976 $o .= Model\Contact::getPostsFromUrl($contact['url']);
982 public static function getContactTemplateVars(array $rr)
987 switch ($rr['rel']) {
988 case Model\Contact::FRIEND:
989 $dir_icon = 'images/lrarrow.gif';
990 $alt_text = L10n::t('Mutual Friendship');
993 case Model\Contact::FOLLOWER;
994 $dir_icon = 'images/larrow.gif';
995 $alt_text = L10n::t('is a fan of yours');
998 case Model\Contact::SHARING;
999 $dir_icon = 'images/rarrow.gif';
1000 $alt_text = L10n::t('you are a fan of');
1007 $url = Model\Contact::magicLink($rr['url']);
1009 if (strpos($url, 'redir/') === 0) {
1010 $sparkle = ' class="sparkle" ';
1016 $dir_icon = 'images/larrow.gif';
1017 $alt_text = L10n::t('This is you');
1023 'img_hover' => L10n::t('Visit %s\'s profile [%s]', $rr['name'], $rr['url']),
1024 'edit_hover'=> L10n::t('Edit contact'),
1025 'photo_menu'=> Model\Contact::photoMenu($rr),
1027 'alt_text' => $alt_text,
1028 'dir_icon' => $dir_icon,
1029 'thumb' => ProxyUtils::proxifyUrl($rr['thumb'], false, ProxyUtils::SIZE_THUMB),
1030 'name' => $rr['name'],
1031 'username' => $rr['name'],
1032 'account_type' => Model\Contact::getAccountType($rr),
1033 'sparkle' => $sparkle,
1034 'itemurl' => defaults($rr, 'addr', $rr['url']),
1036 'network' => ContactSelector::networkToName($rr['network'], $rr['url']),
1037 'nick' => $rr['nick'],
1042 * @brief Gives a array with actions which can performed to a given contact
1044 * This includes actions like e.g. 'block', 'hide', 'archive', 'delete' and others
1046 * @param array $contact Data about the Contact
1047 * @return array with contact related actions
1049 private static function getContactActions($contact)
1051 $poll_enabled = in_array($contact['network'], [Protocol::ACTIVITYPUB, Protocol::DFRN, Protocol::OSTATUS, Protocol::FEED, Protocol::MAIL]);
1052 $contact_actions = [];
1054 // Provide friend suggestion only for Friendica contacts
1055 if ($contact['network'] === Protocol::DFRN) {
1056 $contact_actions['suggest'] = [
1057 'label' => L10n::t('Suggest friends'),
1058 'url' => 'fsuggest/' . $contact['id'],
1065 if ($poll_enabled) {
1066 $contact_actions['update'] = [
1067 'label' => L10n::t('Update now'),
1068 'url' => 'contact/' . $contact['id'] . '/update',
1075 $contact_actions['block'] = [
1076 'label' => (intval($contact['blocked']) ? L10n::t('Unblock') : L10n::t('Block')),
1077 'url' => 'contact/' . $contact['id'] . '/block',
1078 'title' => L10n::t('Toggle Blocked status'),
1079 'sel' => (intval($contact['blocked']) ? 'active' : ''),
1080 'id' => 'toggle-block',
1083 $contact_actions['ignore'] = [
1084 'label' => (intval($contact['readonly']) ? L10n::t('Unignore') : L10n::t('Ignore')),
1085 'url' => 'contact/' . $contact['id'] . '/ignore',
1086 'title' => L10n::t('Toggle Ignored status'),
1087 'sel' => (intval($contact['readonly']) ? 'active' : ''),
1088 'id' => 'toggle-ignore',
1091 if ($contact['uid'] != 0) {
1092 $contact_actions['archive'] = [
1093 'label' => (intval($contact['archive']) ? L10n::t('Unarchive') : L10n::t('Archive')),
1094 'url' => 'contact/' . $contact['id'] . '/archive',
1095 'title' => L10n::t('Toggle Archive status'),
1096 'sel' => (intval($contact['archive']) ? 'active' : ''),
1097 'id' => 'toggle-archive',
1100 $contact_actions['delete'] = [
1101 'label' => L10n::t('Delete'),
1102 'url' => 'contact/' . $contact['id'] . '/drop',
1103 'title' => L10n::t('Delete contact'),
1109 return $contact_actions;