2019-05-04 20:32:31 +02:00
< ? php
namespace Friendica\Module ;
use Friendica\BaseModule ;
use Friendica\Core\L10n ;
use Friendica\Core\Renderer ;
2019-12-15 22:34:11 +01:00
use Friendica\DI ;
2019-05-04 20:32:31 +02:00
use Friendica\Model ;
use Friendica\Network\HTTPException ;
use Friendica\Protocol\Email ;
use Friendica\Util\Strings ;
/**
* Invite people to friendica
*/
class Invite extends BaseModule
{
2019-11-05 22:48:54 +01:00
public static function post ( array $parameters = [])
2019-05-04 20:32:31 +02:00
{
if ( ! local_user ()) {
2020-01-18 20:52:34 +01:00
throw new HTTPException\ForbiddenException ( DI :: l10n () -> t ( 'Permission denied.' ));
2019-05-04 20:32:31 +02:00
}
self :: checkFormSecurityTokenRedirectOnError ( '/' , 'send_invite' );
2019-12-15 22:34:11 +01:00
$app = DI :: app ();
2019-12-15 23:44:33 +01:00
$config = DI :: config ();
2019-05-04 20:32:31 +02:00
$max_invites = intval ( $config -> get ( 'system' , 'max_invites' ));
if ( ! $max_invites ) {
$max_invites = 50 ;
}
2020-01-18 16:50:57 +01:00
$current_invites = intval ( DI :: pConfig () -> get ( local_user (), 'system' , 'sent_invites' ));
2019-05-04 20:32:31 +02:00
if ( $current_invites > $max_invites ) {
2020-01-18 20:52:34 +01:00
throw new HTTPException\ForbiddenException ( DI :: l10n () -> t ( 'Total invitation limit exceeded.' ));
2019-05-04 20:32:31 +02:00
}
2019-05-04 21:25:16 +02:00
$recipients = ! empty ( $_POST [ 'recipients' ]) ? explode ( " \n " , $_POST [ 'recipients' ]) : [];
2019-05-04 20:32:31 +02:00
$message = ! empty ( $_POST [ 'message' ]) ? Strings :: escapeTags ( trim ( $_POST [ 'message' ])) : '' ;
$total = 0 ;
$invitation_only = false ;
$invites_remaining = null ;
if ( $config -> get ( 'system' , 'invitation_only' )) {
$invitation_only = true ;
2020-01-18 16:50:57 +01:00
$invites_remaining = DI :: pConfig () -> get ( local_user (), 'system' , 'invites_remaining' );
2019-05-04 20:32:31 +02:00
if (( ! $invites_remaining ) && ( ! is_site_admin ())) {
throw new HTTPException\ForbiddenException ();
}
}
foreach ( $recipients as $recipient ) {
$recipient = trim ( $recipient );
if ( ! filter_var ( $recipient , FILTER_VALIDATE_EMAIL )) {
2020-01-18 20:52:34 +01:00
notice ( DI :: l10n () -> t ( '%s : Not a valid email address.' , $recipient ) . EOL );
2019-05-04 20:32:31 +02:00
continue ;
}
if ( $invitation_only && ( $invites_remaining || is_site_admin ())) {
$code = Model\Register :: createForInvitation ();
$nmessage = str_replace ( '$invite_code' , $code , $message );
if ( ! is_site_admin ()) {
$invites_remaining -- ;
if ( $invites_remaining >= 0 ) {
2020-01-18 16:54:50 +01:00
DI :: pConfig () -> set ( local_user (), 'system' , 'invites_remaining' , $invites_remaining );
2019-05-04 20:32:31 +02:00
} else {
return ;
}
}
} else {
$nmessage = $message ;
}
$additional_headers = 'From: ' . $app -> user [ 'email' ] . " \n "
. 'Sender: ' . $app -> getSenderEmailAddress () . " \n "
. 'Content-type: text/plain; charset=UTF-8' . " \n "
. 'Content-transfer-encoding: 8bit' ;
$res = mail (
$recipient ,
2020-01-18 20:52:34 +01:00
Email :: encodeHeader ( DI :: l10n () -> t ( 'Please join us on Friendica' ), 'UTF-8' ),
2019-05-04 20:32:31 +02:00
$nmessage ,
$additional_headers );
if ( $res ) {
$total ++ ;
$current_invites ++ ;
2020-01-18 16:54:50 +01:00
DI :: pConfig () -> set ( local_user (), 'system' , 'sent_invites' , $current_invites );
2019-05-04 20:32:31 +02:00
if ( $current_invites > $max_invites ) {
2020-01-18 20:52:34 +01:00
notice ( DI :: l10n () -> t ( 'Invitation limit exceeded. Please contact your site administrator.' ) . EOL );
2019-05-04 20:32:31 +02:00
return ;
}
} else {
2020-01-18 20:52:34 +01:00
notice ( DI :: l10n () -> t ( '%s : Message delivery failed.' , $recipient ) . EOL );
2019-05-04 20:32:31 +02:00
}
}
2020-01-18 20:53:01 +01:00
notice ( DI :: l10n () -> tt ( '%d message sent.' , '%d messages sent.' , $total ) . EOL );
2019-05-04 20:32:31 +02:00
}
2019-11-05 22:48:54 +01:00
public static function content ( array $parameters = [])
2019-05-04 20:32:31 +02:00
{
if ( ! local_user ()) {
2020-01-18 20:52:34 +01:00
throw new HTTPException\ForbiddenException ( DI :: l10n () -> t ( 'Permission denied.' ));
2019-05-04 20:32:31 +02:00
}
2019-12-15 22:34:11 +01:00
$app = DI :: app ();
2019-12-15 23:44:33 +01:00
$config = DI :: config ();
2019-05-04 20:32:31 +02:00
$inviteOnly = false ;
if ( $config -> get ( 'system' , 'invitation_only' )) {
$inviteOnly = true ;
2020-01-18 16:50:57 +01:00
$x = DI :: pConfig () -> get ( local_user (), 'system' , 'invites_remaining' );
2019-05-04 20:32:31 +02:00
if (( ! $x ) && ( ! is_site_admin ())) {
2020-01-18 20:52:34 +01:00
throw new HTTPException\ForbiddenException ( DI :: l10n () -> t ( 'You have no more invitations available' ));
2019-05-04 20:32:31 +02:00
}
}
$dirLocation = $config -> get ( 'system' , 'directory' );
if ( strlen ( $dirLocation )) {
if ( $config -> get ( 'config' , 'register_policy' ) === Register :: CLOSED ) {
2020-01-18 20:52:34 +01:00
$linkTxt = DI :: l10n () -> t ( 'Visit %s for a list of public sites that you can join. Friendica members on other sites can all connect with each other, as well as with members of many other social networks.' , $dirLocation . '/servers' );
2019-05-04 20:32:31 +02:00
} else {
2020-01-18 20:52:34 +01:00
$linkTxt = DI :: l10n () -> t ( 'To accept this invitation, please visit and register at %s or any other public Friendica website.' , DI :: baseUrl () -> get ())
. " \r \n " . " \r \n " . DI :: l10n () -> t ( 'Friendica sites all inter-connect to create a huge privacy-enhanced social web that is owned and controlled by its members. They can also connect with many traditional social networks. See %s for a list of alternate Friendica sites you can join.' , $dirLocation . '/servers' );
2019-05-04 20:32:31 +02:00
}
} else { // there is no global directory URL defined
if ( $config -> get ( 'config' , 'register_policy' ) === Register :: CLOSED ) {
2020-01-18 20:52:34 +01:00
return DI :: l10n () -> t ( 'Our apologies. This system is not currently configured to connect with other public sites or invite members.' );
2019-05-04 20:32:31 +02:00
} else {
2020-01-18 20:52:34 +01:00
$linkTxt = DI :: l10n () -> t ( 'To accept this invitation, please visit and register at %s.' , DI :: baseUrl () -> get ()
. " \r \n " . " \r \n " . DI :: l10n () -> t ( 'Friendica sites all inter-connect to create a huge privacy-enhanced social web that is owned and controlled by its members. They can also connect with many traditional social networks.' ));
2019-05-04 20:32:31 +02:00
}
}
$tpl = Renderer :: getMarkupTemplate ( 'invite.tpl' );
return Renderer :: replaceMacros ( $tpl , [
2019-05-04 21:25:16 +02:00
'$form_security_token' => self :: getFormSecurityToken ( 'send_invite' ),
2020-01-18 20:52:34 +01:00
'$title' => DI :: l10n () -> t ( 'Send invitations' ),
'$recipients' => [ 'recipients' , DI :: l10n () -> t ( 'Enter email addresses, one per line:' )],
2019-05-04 20:32:31 +02:00
'$message' => [
'message' ,
2020-01-18 20:52:34 +01:00
DI :: l10n () -> t ( 'Your message:' ),
DI :: l10n () -> t ( 'You are cordially invited to join me and other close friends on Friendica - and help us to create a better social web.' ) . " \r \n " . " \r \n "
2019-05-04 20:32:31 +02:00
. $linkTxt
2020-01-18 20:52:34 +01:00
. " \r \n " . " \r \n " . (( $inviteOnly ) ? DI :: l10n () -> t ( 'You will need to supply this invitation code: $invite_code' ) . " \r \n " . " \r \n " : '' ) . DI :: l10n () -> t ( 'Once you have registered, please connect with me via my profile page at:' )
2019-12-16 01:05:15 +01:00
. " \r \n " . " \r \n " . DI :: baseUrl () -> get () . '/profile/' . $app -> user [ 'nickname' ]
2020-01-18 20:52:34 +01:00
. " \r \n " . " \r \n " . DI :: l10n () -> t ( 'For more information about the Friendica project and why we feel it is important, please visit http://friendi.ca' ) . " \r \n " . " \r \n " ,
2019-05-04 20:32:31 +02:00
],
2020-01-18 20:52:34 +01:00
'$submit' => DI :: l10n () -> t ( 'Submit' )
2019-05-04 20:32:31 +02:00
]);
}
}