mod/unfollow.php

   1 <?php
   2 /**
   3  * @copyright Copyright (C) 2010-2021, the Friendica project
   4  *
   5  * @license GNU AGPL version 3 or any later version
   6  *
   7  * This program is free software: you can redistribute it and/or modify
   8  * it under the terms of the GNU Affero General Public License as
   9  * published by the Free Software Foundation, either version 3 of the
  10  * License, or (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU Affero General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Affero General Public License
  18  * along with this program.  If not, see <https://www.gnu.org/licenses/>.
  19  *
  20  */
  21
  22 use Friendica\App;
  23 use Friendica\Content\Widget;
  24 use Friendica\Core\Protocol;
  25 use Friendica\Core\Renderer;
  26 use Friendica\Database\DBA;
  27 use Friendica\DI;
  28 use Friendica\Model\Contact;
  29 use Friendica\Model\User;
  30 use Friendica\Util\Strings;
  31
  32 function unfollow_post(App $a)
  33 {
  34         if (!local_user()) {
  35                 notice(DI::l10n()->t('Permission denied.'));
  36                 DI::baseUrl()->redirect('login');
  37                 // NOTREACHED
  38         }
  39
  40         $url = Strings::escapeTags(trim($_REQUEST['url'] ?? ''));
  41
  42         unfollow_process($url);
  43 }
  44
  45 function unfollow_content(App $a)
  46 {
  47         $base_return_path = 'contact';
  48
  49         if (!local_user()) {
  50                 notice(DI::l10n()->t('Permission denied.'));
  51                 DI::baseUrl()->redirect('login');
  52                 // NOTREACHED
  53         }
  54
  55         $uid = local_user();
  56         $url = Strings::escapeTags(trim($_REQUEST['url']));
  57
  58         $condition = ["`uid` = ? AND (`rel` = ? OR `rel` = ?) AND (`nurl` = ? OR `alias` = ? OR `alias` = ?)",
  59                 local_user(), Contact::SHARING, Contact::FRIEND, Strings::normaliseLink($url),
  60                 Strings::normaliseLink($url), $url];
  61
  62         $contact = DBA::selectFirst('contact', ['url', 'id', 'uid', 'network', 'addr', 'name'], $condition);
  63
  64         if (!DBA::isResult($contact)) {
  65                 notice(DI::l10n()->t("You aren't following this contact."));
  66                 DI::baseUrl()->redirect($base_return_path);
  67                 // NOTREACHED
  68         }
  69
  70         if (!in_array($contact['network'], Protocol::NATIVE_SUPPORT)) {
  71                 notice(DI::l10n()->t('Unfollowing is currently not supported by your network.'));
  72                 DI::baseUrl()->redirect($base_return_path . '/' . $contact['id']);
  73                 // NOTREACHED
  74         }
  75
  76         $request = DI::baseUrl() . '/unfollow';
  77         $tpl = Renderer::getMarkupTemplate('auto_request.tpl');
  78
  79         $self = DBA::selectFirst('contact', ['url'], ['uid' => $uid, 'self' => true]);
  80
  81         if (!DBA::isResult($self)) {
  82                 notice(DI::l10n()->t('Permission denied.'));
  83                 DI::baseUrl()->redirect($base_return_path);
  84                 // NOTREACHED
  85         }
  86
  87         if (!empty($_REQUEST['auto'])) {
  88                 unfollow_process($contact['url']);
  89         }
  90
  91         $o = Renderer::replaceMacros($tpl, [
  92                 '$header'        => DI::l10n()->t('Disconnect/Unfollow'),
  93                 '$page_desc'     => '',
  94                 '$your_address'  => DI::l10n()->t('Your Identity Address:'),
  95                 '$invite_desc'   => '',
  96                 '$submit'        => DI::l10n()->t('Submit Request'),
  97                 '$cancel'        => DI::l10n()->t('Cancel'),
  98                 '$url'           => $contact['url'],
  99                 '$zrl'           => Contact::magicLinkByContact($contact),
 100                 '$url_label'     => DI::l10n()->t('Profile URL'),
 101                 '$myaddr'        => $self['url'],
 102                 '$request'       => $request,
 103                 '$keywords'      => '',
 104                 '$keywords_label'=> ''
 105         ]);
 106
 107         DI::page()['aside'] = Widget\VCard::getHTML(Contact::getByURL($contact['url'], false));
 108
 109         $o .= Renderer::replaceMacros(Renderer::getMarkupTemplate('section_title.tpl'), ['$title' => DI::l10n()->t('Status Messages and Posts')]);
 110
 111         // Show last public posts
 112         $o .= Contact::getPostsFromUrl($contact['url']);
 113
 114         return $o;
 115 }
 116
 117 function unfollow_process(string $url)
 118 {
 119         $base_return_path = 'contact';
 120
 121         $uid = local_user();
 122
 123         $condition = ["`uid` = ? AND (`rel` = ? OR `rel` = ?) AND (`nurl` = ? OR `alias` = ? OR `alias` = ?)",
 124                 $uid, Contact::SHARING, Contact::FRIEND, Strings::normaliseLink($url),
 125                 Strings::normaliseLink($url), $url];
 126         $contact = DBA::selectFirst('contact', [], $condition);
 127
 128         if (!DBA::isResult($contact)) {
 129                 notice(DI::l10n()->t("You aren't following this contact."));
 130                 DI::baseUrl()->redirect($base_return_path);
 131                 // NOTREACHED
 132         }
 133
 134         if (!in_array($contact['network'], Protocol::NATIVE_SUPPORT)) {
 135                 notice(DI::l10n()->t('Unfollowing is currently not supported by your network.'));
 136                 DI::baseUrl()->redirect($base_return_path . '/' . $contact['id']);
 137                 // NOTREACHED
 138         }
 139
 140         $dissolve = ($contact['rel'] == Contact::SHARING);
 141
 142         $owner = User::getOwnerDataById($uid);
 143         if ($owner) {
 144                 Contact::terminateFriendship($owner, $contact, $dissolve);
 145         }
 146
 147         // Sharing-only contacts get deleted as there no relationship any more
 148         if ($dissolve) {
 149                 Contact::remove($contact['id']);
 150                 $return_path = $base_return_path;
 151         } else {
 152                 DBA::update('contact', ['rel' => Contact::FOLLOWER], ['id' => $contact['id']]);
 153                 $return_path = $base_return_path . '/' . $contact['id'];
 154         }
 155
 156         DI::baseUrl()->redirect($return_path);
 157 }