3 * @copyright Copyright (C) 2020, Friendica
5 * @license GNU AGPL version 3 or any later version
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.
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.
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/>.
23 use Friendica\Core\Protocol;
24 use Friendica\Core\Renderer;
26 use Friendica\Model\Contact;
27 use Friendica\Model\Profile;
28 use Friendica\Model\Item;
29 use Friendica\Network\Probe;
30 use Friendica\Database\DBA;
31 use Friendica\Model\User;
32 use Friendica\Util\Strings;
34 function follow_post(App $a)
37 throw new \Friendica\Network\HTTPException\ForbiddenException(DI::l10n()->t('Access denied.'));
40 if (isset($_REQUEST['cancel'])) {
41 DI::baseUrl()->redirect('contact');
44 $url = Probe::cleanURI($_REQUEST['url']);
45 $return_path = 'follow?url=' . urlencode($url);
47 // Makes the connection request for friendica contacts easier
48 // This is just a precaution if maybe this page is called somewhere directly via POST
49 $_SESSION['fastlane'] = $url;
51 $result = Contact::createFromProbe($a->user, $url, true);
53 if ($result['success'] == false) {
54 // Possibly it is a remote item and not an account
55 follow_remote_item($url);
57 if ($result['message']) {
58 notice($result['message']);
60 DI::baseUrl()->redirect($return_path);
61 } elseif ($result['cid']) {
62 DI::baseUrl()->redirect('contact/' . $result['cid']);
65 notice(DI::l10n()->t('The contact could not be added.'));
67 DI::baseUrl()->redirect($return_path);
71 function follow_content(App $a)
73 $return_path = 'contact';
76 notice(DI::l10n()->t('Permission denied.'));
77 DI::baseUrl()->redirect($return_path);
83 // Issue 4815: Silently removing a prefixing @
84 $url = ltrim(Strings::escapeTags(trim($_REQUEST['url'] ?? '')), '@!');
86 // Issue 6874: Allow remote following from Peertube
87 if (strpos($url, 'acct:') === 0) {
88 $url = str_replace('acct:', '', $url);
92 DI::baseUrl()->redirect($return_path);
95 $submit = DI::l10n()->t('Submit Request');
97 // Don't try to add a pending contact
98 $user_contact = DBA::selectFirst('contact', ['pending'], ["`uid` = ? AND ((`rel` != ?) OR (`network` = ?)) AND
99 (`nurl` = ? OR `alias` = ? OR `alias` = ?) AND `network` != ?",
100 $uid, Contact::FOLLOWER, Protocol::DFRN, Strings::normaliseLink($url),
101 Strings::normaliseLink($url), $url, Protocol::STATUSNET]);
103 if (DBA::isResult($user_contact)) {
104 if ($user_contact['pending']) {
105 notice(DI::l10n()->t('You already added this contact.'));
110 $contact = Contact::getByURL($url, true);
111 if (empty($contact)) {
112 // Possibly it is a remote item and not an account
113 follow_remote_item($url);
115 notice(DI::l10n()->t("The network type couldn't be detected. Contact can't be added."));
117 $contact = ['url' => $url, 'network' => Protocol::PHANTOM, 'name' => $url, 'keywords' => ''];
120 $protocol = Contact::getProtocol($contact['url'], $contact['network']);
122 if (($protocol == Protocol::DIASPORA) && !DI::config()->get('system', 'diaspora_enabled')) {
123 notice(DI::l10n()->t("Diaspora support isn't enabled. Contact can't be added."));
127 if (($protocol == Protocol::OSTATUS) && DI::config()->get('system', 'ostatus_disabled')) {
128 notice(DI::l10n()->t("OStatus support is disabled. Contact can't be added."));
132 if ($protocol == Protocol::MAIL) {
133 $contact['url'] = $contact['addr'];
136 if (($protocol === Protocol::DFRN) && !DBA::isResult($contact)) {
137 $request = $contact['request'];
138 $tpl = Renderer::getMarkupTemplate('dfrn_request.tpl');
140 $request = DI::baseUrl() . '/follow';
141 $tpl = Renderer::getMarkupTemplate('auto_request.tpl');
144 $owner = User::getOwnerDataById($uid);
146 notice(DI::l10n()->t('Permission denied.'));
147 DI::baseUrl()->redirect($return_path);
151 $myaddr = $owner['url'];
153 // Makes the connection request for friendica contacts easier
154 $_SESSION['fastlane'] = $contact['url'];
156 $o = Renderer::replaceMacros($tpl, [
157 '$header' => DI::l10n()->t('Connect/Follow'),
158 '$pls_answer' => DI::l10n()->t('Please answer the following:'),
159 '$your_address' => DI::l10n()->t('Your Identity Address:'),
160 '$url_label' => DI::l10n()->t('Profile URL'),
161 '$keywords_label'=> DI::l10n()->t('Tags:'),
162 '$submit' => $submit,
163 '$cancel' => DI::l10n()->t('Cancel'),
165 '$request' => $request,
166 '$name' => $contact['name'],
167 '$url' => $contact['url'],
168 '$zrl' => Profile::zrl($contact['url']),
169 '$myaddr' => $myaddr,
170 '$keywords' => $contact['keywords'],
172 '$does_know_you' => ['knowyou', DI::l10n()->t('%s knows you', $contact['name'])],
173 '$addnote_field' => ['dfrn-request-message', DI::l10n()->t('Add a personal note:')],
176 DI::page()['aside'] = '';
178 if ($protocol != Protocol::PHANTOM) {
179 Profile::load($a, '', $contact, false);
181 $o .= Renderer::replaceMacros(Renderer::getMarkupTemplate('section_title.tpl'),
182 ['$title' => DI::l10n()->t('Status Messages and Posts')]
185 // Show last public posts
186 $o .= Contact::getPostsFromUrl($contact['url']);
192 function follow_remote_item($url)
194 $item_id = Item::fetchByLink($url, local_user());
196 // If the user-specific search failed, we search and probe a public post
197 $item_id = Item::fetchByLink($url);
200 if (!empty($item_id)) {
201 $item = Item::selectFirst(['guid'], ['id' => $item_id]);
202 if (DBA::isResult($item)) {
203 DI::baseUrl()->redirect('display/' . $item['guid']);