3 * @copyright Copyright (C) 2010-2021, the Friendica project
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/>.
22 namespace Friendica\Module;
24 use Friendica\BaseModule;
25 use Friendica\Core\Logger;
26 use Friendica\Core\System;
27 use Friendica\Database\DBA;
29 use Friendica\Model\Contact;
30 use Friendica\Model\User;
31 use Friendica\Util\HTTPSignature;
32 use Friendica\Util\Strings;
35 * Magic Auth (remote authentication) module.
37 * Ported from Hubzilla: https://framagit.org/hubzilla/core/blob/master/Zotlabs/Module/Magic.php
39 class Magic extends BaseModule
41 public static function init(array $parameters = [])
44 $ret = ['success' => false, 'url' => '', 'message' => ''];
45 Logger::info('magic mdule: invoked');
47 Logger::debug('args', ['request' => $_REQUEST]);
49 $addr = $_REQUEST['addr'] ?? '';
50 $dest = $_REQUEST['dest'] ?? '';
51 $test = (!empty($_REQUEST['test']) ? intval($_REQUEST['test']) : 0);
52 $owa = (!empty($_REQUEST['owa']) ? intval($_REQUEST['owa']) : 0);
56 $cid = Contact::getIdForURL($addr);
57 } elseif (!empty($dest)) {
58 $cid = Contact::getIdForURL($dest);
62 Logger::info('No contact record found', $_REQUEST);
63 // @TODO Finding a more elegant possibility to redirect to either internal or external URL
66 $contact = DBA::selectFirst('contact', ['id', 'nurl', 'url'], ['id' => $cid]);
68 // Redirect if the contact is already authenticated on this site.
69 if ($a->getContactId() && strpos($contact['nurl'], Strings::normaliseLink(DI::baseUrl()->get())) !== false) {
71 $ret['success'] = true;
72 $ret['message'] .= 'Local site - you are already authenticated.' . EOL;
76 Logger::info('Contact is already authenticated');
77 System::externalRedirect($dest);
81 if (local_user() && $owa) {
82 $user = User::getById(local_user());
84 // Extract the basepath
85 // NOTE: we need another solution because this does only work
86 // for friendica contacts :-/ . We should have the basepath
87 // of a contact also in the contact table.
88 $exp = explode('/profile/', $contact['url']);
92 $header['Accept'] = 'application/x-dfrn+json, application/x-zot+json';
93 $header['X-Open-Web-Auth'] = Strings::getRandomHex();
95 // Create a header that is signed with the local users private key.
96 $header = HTTPSignature::createSig(
99 'acct:' . $user['nickname'] . '@' . DI::baseUrl()->getHostname() . (DI::baseUrl()->getUrlPath() ? '/' . DI::baseUrl()->getUrlPath() : '')
102 // Try to get an authentication token from the other instance.
103 $curlResult = DI::httpRequest()->get($basepath . '/owa', ['header' => $header]);
105 if ($curlResult->isSuccess()) {
106 $j = json_decode($curlResult->getBody(), true);
110 if ($j['encrypted_token']) {
111 // The token is encrypted. If the local user is really the one the other instance
112 // thinks he/she is, the token can be decrypted with the local users public key.
113 openssl_private_decrypt(Strings::base64UrlDecode($j['encrypted_token']), $token, $user['prvkey']);
115 $token = $j['token'];
117 $args = (strpbrk($dest, '?&') ? '&' : '?') . 'owt=' . $token;
119 Logger::info('Redirecting', ['path' => $dest . $args]);
120 System::externalRedirect($dest . $args);
123 System::externalRedirect($dest);
127 $ret['message'] = 'Not authenticated or invalid arguments' . EOL;
131 // @TODO Finding a more elegant possibility to redirect to either internal or external URL