2010-07-29 01:28:39 +02:00
< ? php
2010-12-10 13:04:35 +01:00
/**
* module : invite . php
*
* send email invitations to join social network
*
*/
2010-07-29 01:28:39 +02:00
2017-04-30 06:07:00 +02:00
use Friendica\App ;
2013-01-05 00:47:29 +01:00
require_once ( 'include/email.php' );
2017-01-09 13:14:25 +01:00
function invite_post ( App $a ) {
2010-12-10 13:04:35 +01:00
2016-12-20 11:56:34 +01:00
if ( ! local_user ()) {
2010-07-29 01:28:39 +02:00
notice ( t ( 'Permission denied.' ) . EOL );
return ;
}
2013-01-25 22:48:57 +01:00
check_form_security_token_redirectOnErr ( '/' , 'send_invite' );
$max_invites = intval ( get_config ( 'system' , 'max_invites' ));
2016-12-21 23:04:09 +01:00
if ( ! $max_invites ) {
2013-01-25 22:48:57 +01:00
$max_invites = 50 ;
2016-12-21 23:04:09 +01:00
}
2013-01-25 22:48:57 +01:00
$current_invites = intval ( get_pconfig ( local_user (), 'system' , 'sent_invites' ));
2016-12-21 23:04:09 +01:00
if ( $current_invites > $max_invites ) {
2013-01-25 22:48:57 +01:00
notice ( t ( 'Total invitation limit exceeded.' ) . EOL );
return ;
2016-12-21 23:04:09 +01:00
}
2013-01-25 22:48:57 +01:00
2010-07-29 01:28:39 +02:00
2010-12-10 13:04:35 +01:00
$recips = (( x ( $_POST , 'recipients' )) ? explode ( " \n " , $_POST [ 'recipients' ]) : array ());
$message = (( x ( $_POST , 'message' )) ? notags ( trim ( $_POST [ 'message' ])) : '' );
2010-07-29 01:28:39 +02:00
$total = 0 ;
2016-12-21 23:04:09 +01:00
if ( get_config ( 'system' , 'invitation_only' )) {
2011-07-18 01:08:47 +02:00
$invonly = true ;
$x = get_pconfig ( local_user (), 'system' , 'invites_remaining' );
2016-12-21 23:04:09 +01:00
if (( ! $x ) && ( ! is_site_admin ())) {
2011-07-18 01:08:47 +02:00
return ;
2016-12-21 23:04:09 +01:00
}
2011-07-18 01:08:47 +02:00
}
2016-12-21 23:04:09 +01:00
foreach ( $recips as $recip ) {
2010-07-29 01:28:39 +02:00
$recip = trim ( $recip );
2016-12-21 23:04:09 +01:00
if ( ! valid_email ( $recip )) {
2011-03-11 00:22:21 +01:00
notice ( sprintf ( t ( '%s : Not a valid email address.' ), $recip ) . EOL );
2010-07-29 01:28:39 +02:00
continue ;
}
2016-12-21 23:04:09 +01:00
if ( $invonly && ( $x || is_site_admin ())) {
2011-07-18 01:08:47 +02:00
$code = autoname ( 8 ) . srand ( 1000 , 9999 );
$nmessage = str_replace ( '$invite_code' , $code , $message );
2011-07-18 06:12:31 +02:00
$r = q ( " INSERT INTO `register` (`hash`,`created`) VALUES ('%s', '%s') " ,
dbesc ( $code ),
dbesc ( datetime_convert ())
);
2011-07-18 01:08:47 +02:00
2016-12-21 23:04:09 +01:00
if ( ! is_site_admin ()) {
2011-07-18 01:08:47 +02:00
$x -- ;
2016-12-21 23:04:09 +01:00
if ( $x >= 0 ) {
2011-07-18 06:12:31 +02:00
set_pconfig ( local_user (), 'system' , 'invites_remaining' , $x );
2016-12-21 23:04:09 +01:00
} else {
2011-07-18 01:08:47 +02:00
return ;
2016-12-21 23:04:09 +01:00
}
2011-07-18 01:08:47 +02:00
}
2016-12-21 23:04:09 +01:00
} else {
2011-07-18 01:08:47 +02:00
$nmessage = $message ;
2016-12-21 23:04:09 +01:00
}
2010-07-29 01:28:39 +02:00
2017-01-09 13:14:25 +01:00
$res = mail ( $recip , email_header_encode ( t ( 'Please join us on Friendica' ), 'UTF-8' ),
$nmessage ,
2011-04-15 02:13:13 +02:00
" From: " . $a -> user [ 'email' ] . " \n "
. 'Content-type: text/plain; charset=UTF-8' . " \n "
. 'Content-transfer-encoding: 8bit' );
2016-12-21 23:04:09 +01:00
if ( $res ) {
2010-07-29 01:28:39 +02:00
$total ++ ;
2013-01-25 22:48:57 +01:00
$current_invites ++ ;
set_pconfig ( local_user (), 'system' , 'sent_invites' , $current_invites );
2017-03-21 17:02:59 +01:00
if ( $current_invites > $max_invites ) {
2013-01-25 22:48:57 +01:00
notice ( t ( 'Invitation limit exceeded. Please contact your site administrator.' ) . EOL );
return ;
}
2016-12-21 23:04:09 +01:00
} else {
2011-03-11 00:22:21 +01:00
notice ( sprintf ( t ( '%s : Message delivery failed.' ), $recip ) . EOL );
2010-07-29 01:28:39 +02:00
}
}
2011-03-13 13:50:44 +01:00
notice ( sprintf ( tt ( " %d message sent. " , " %d messages sent. " , $total ) , $total ) . EOL );
2010-09-09 05:14:17 +02:00
return ;
2010-07-29 01:28:39 +02:00
}
2016-02-07 15:11:34 +01:00
2017-01-09 13:14:25 +01:00
function invite_content ( App $a ) {
2010-12-10 13:04:35 +01:00
2016-12-20 11:56:34 +01:00
if ( ! local_user ()) {
2010-07-29 01:28:39 +02:00
notice ( t ( 'Permission denied.' ) . EOL );
return ;
}
2011-05-11 13:37:13 +02:00
$tpl = get_markup_template ( 'invite.tpl' );
2011-07-18 01:08:47 +02:00
$invonly = false ;
2016-12-21 23:04:09 +01:00
if ( get_config ( 'system' , 'invitation_only' )) {
2011-07-18 01:08:47 +02:00
$invonly = true ;
$x = get_pconfig ( local_user (), 'system' , 'invites_remaining' );
2016-12-21 23:04:09 +01:00
if (( ! $x ) && ( ! is_site_admin ())) {
2011-07-18 01:08:47 +02:00
notice ( t ( 'You have no more invitations available' ) . EOL );
return '' ;
}
2015-09-15 22:29:02 +02:00
}
2011-07-18 01:08:47 +02:00
2015-09-15 22:29:02 +02:00
$dirloc = get_config ( 'system' , 'directory' );
2016-12-21 23:04:09 +01:00
if ( strlen ( $dirloc )) {
2016-12-20 21:15:53 +01:00
if ( $a -> config [ 'register_policy' ] == REGISTER_CLOSED ) {
2017-08-02 08:47:09 +02:00
$linktxt = sprintf ( 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.' ), $dirloc . '/servers' );
2016-12-19 14:26:13 +01:00
} elseif ( $a -> config [ 'register_policy' ] != REGISTER_CLOSED ) {
2016-12-19 14:26:13 +01:00
$linktxt = sprintf ( t ( 'To accept this invitation, please visit and register at %s or any other public Friendica website.' ), App :: get_baseurl ())
2015-09-15 22:29:02 +02:00
. " \r \n " . " \r \n " . sprintf ( 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.' ), $dirloc . '/siteinfo' );
2016-12-20 21:15:53 +01:00
}
2016-12-21 23:04:09 +01:00
} else {
2012-03-25 08:04:18 +02:00
$o = t ( 'Our apologies. This system is not currently configured to connect with other public sites or invite members.' );
return $o ;
}
2011-07-18 01:08:47 +02:00
2010-07-29 01:28:39 +02:00
$o = replace_macros ( $tpl , array (
2013-01-25 22:48:57 +01:00
'$form_security_token' => get_form_security_token ( " send_invite " ),
2016-12-20 21:15:53 +01:00
'$invite' => t ( 'Send invitations' ),
'$addr_text' => t ( 'Enter email addresses, one per line:' ),
'$msg_text' => t ( 'Your message:' ),
'$default_message' => 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 "
2012-03-25 08:04:18 +02:00
. $linktxt
2017-01-09 13:14:25 +01:00
. " \r \n " . " \r \n " . (( $invonly ) ? t ( 'You will need to supply this invitation code: $invite_code' ) . " \r \n " . " \r \n " : '' ) . t ( 'Once you have registered, please connect with me via my profile page at:' )
2016-12-19 14:26:13 +01:00
. " \r \n " . " \r \n " . App :: get_baseurl () . '/profile/' . $a -> user [ 'nickname' ]
2012-03-25 08:04:18 +02:00
. " \r \n " . " \r \n " . t ( 'For more information about the Friendica project and why we feel it is important, please visit http://friendica.com' ) . " \r \n " . " \r \n " ,
2016-12-20 21:15:53 +01:00
'$submit' => t ( 'Submit' )
2010-07-29 01:28:39 +02:00
));
return $o ;
2015-09-15 22:29:02 +02:00
}