2020-02-09 17:04:35 +00:00
< ? php
2020-02-09 22:12:00 +00:00
/**
* @ copyright Copyright ( C ) 2020 , Friendica
*
* @ 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 />.
*
*/
2020-02-09 17:04:35 +00:00
namespace Friendica\Module ;
use Friendica\BaseModule ;
use Friendica\DI ;
use Friendica\Core\Logger ;
use Friendica\Core\Protocol ;
use Friendica\Core\Renderer ;
use Friendica\Core\Search ;
use Friendica\Core\System ;
2020-07-16 10:22:14 +00:00
use Friendica\Model\Contact ;
2020-02-09 17:04:35 +00:00
use Friendica\Model\Profile ;
use Friendica\Network\Probe ;
/**
* Remotely follow the account on this system by the provided account
*/
class RemoteFollow extends BaseModule
{
public static function init ( array $parameters = [])
{
Profile :: load ( DI :: app (), $parameters [ 'profile' ]);
}
public static function post ( array $parameters = [])
{
$a = DI :: app ();
2020-02-09 22:08:59 +00:00
if ( ! empty ( $_POST [ 'cancel' ]) || empty ( $_POST [ 'dfrn_url' ])) {
2020-02-09 17:04:35 +00:00
DI :: baseUrl () -> redirect ();
}
if ( empty ( $a -> profile [ 'uid' ])) {
2020-02-09 22:08:59 +00:00
notice ( DI :: l10n () -> t ( 'Profile unavailable.' ));
2020-02-09 17:04:35 +00:00
return ;
}
2020-02-22 12:29:33 +00:00
$url = Probe :: cleanURI ( $_POST [ 'dfrn_url' ]);
2020-02-09 17:04:35 +00:00
if ( ! strlen ( $url )) {
2020-02-09 22:08:59 +00:00
notice ( DI :: l10n () -> t ( " Invalid locator " ));
2020-02-09 17:04:35 +00:00
return ;
}
// Detect the network, make sure the provided URL is valid
2020-07-16 10:22:14 +00:00
$data = Contact :: getByURL ( $url );
if ( ! $data ) {
2020-02-09 17:04:35 +00:00
notice ( DI :: l10n () -> t ( " The provided profile link doesn't seem to be valid " ));
return ;
}
2020-06-01 21:52:31 +00:00
if ( empty ( $data [ 'subscribe' ])) {
2020-02-09 17:04:35 +00:00
notice ( DI :: l10n () -> t ( " Remote subscription can't be done for your network. Please subscribe directly on your system. " ));
return ;
}
2020-06-01 21:52:31 +00:00
Logger :: notice ( 'Remote request' , [ 'url' => $url , 'follow' => $a -> profile [ 'url' ], 'remote' => $data [ 'subscribe' ]]);
2020-02-09 17:04:35 +00:00
2020-06-01 21:52:31 +00:00
// Substitute our user's feed URL into $data['subscribe']
2020-02-09 17:04:35 +00:00
// Send the subscriber home to subscribe
// Diaspora needs the uri in the format user@domain.tld
if ( $data [ 'network' ] == Protocol :: DIASPORA ) {
$uri = urlencode ( $a -> profile [ 'addr' ]);
} else {
$uri = urlencode ( $a -> profile [ 'url' ]);
}
2020-06-01 21:52:31 +00:00
$follow_link = str_replace ( '{uri}' , $uri , $data [ 'subscribe' ]);
2020-02-09 17:04:35 +00:00
System :: externalRedirect ( $follow_link );
}
public static function content ( array $parameters = [])
{
$a = DI :: app ();
2020-02-09 22:08:59 +00:00
if ( empty ( $a -> profile )) {
2020-02-09 17:04:35 +00:00
return '' ;
}
$target_addr = $a -> profile [ 'addr' ];
$target_url = $a -> profile [ 'url' ];
$tpl = Renderer :: getMarkupTemplate ( 'auto_request.tpl' );
$o = Renderer :: replaceMacros ( $tpl , [
'$header' => DI :: l10n () -> t ( 'Friend/Connection Request' ),
'$page_desc' => DI :: l10n () -> t ( 'Enter your Webfinger address (user@domain.tld) or profile URL here. If this isn\'t supported by your system, you have to subscribe to <strong>%s</strong> or <strong>%s</strong> directly on your system.' , $target_addr , $target_url ),
'$invite_desc' => DI :: l10n () -> t ( 'If you are not yet a member of the free social web, <a href="%s">follow this link to find a public Friendica node and join us today</a>.' , Search :: getGlobalDirectory () . '/servers' ),
'$your_address' => DI :: l10n () -> t ( 'Your Webfinger address or profile URL:' ),
'$pls_answer' => DI :: l10n () -> t ( 'Please answer the following:' ),
'$submit' => DI :: l10n () -> t ( 'Submit Request' ),
'$cancel' => DI :: l10n () -> t ( 'Cancel' ),
'$request' => 'remote_follow/' . $parameters [ 'profile' ],
'$name' => $a -> profile [ 'name' ],
2020-02-09 22:08:59 +00:00
'$myaddr' => Profile :: getMyURL (),
2020-02-09 17:04:35 +00:00
]);
return $o ;
}
2020-02-09 22:08:59 +00:00
}