friendica/mod/invite.php

110 lines
2.7 KiB
PHP
Raw Normal View History

2010-07-28 23:28:39 +00:00
<?php
2010-12-10 12:04:35 +00:00
/**
* module: invite.php
*
* send email invitations to join social network
*
*/
2010-07-28 23:28:39 +00:00
function invite_post(&$a) {
2010-12-10 12:04:35 +00:00
2010-07-28 23:28:39 +00:00
if(! local_user()) {
notice( t('Permission denied.') . EOL);
return;
}
2010-12-10 12:04:35 +00:00
$recips = ((x($_POST,'recipients')) ? explode("\n",$_POST['recipients']) : array());
$message = ((x($_POST,'message')) ? notags(trim($_POST['message'])) : '');
2010-07-28 23:28:39 +00:00
$total = 0;
2011-07-18 04:12:31 +00:00
if(get_config('system','invitation_only')) {
2011-07-17 23:08:47 +00:00
$invonly = true;
$x = get_pconfig(local_user(),'system','invites_remaining');
if((! $x) && (! is_site_admin()))
return;
}
2010-07-28 23:28:39 +00:00
foreach($recips as $recip) {
$recip = trim($recip);
if(! valid_email($recip)) {
2011-03-10 23:22:21 +00:00
notice( sprintf( t('%s : Not a valid email address.'), $recip) . EOL);
2010-07-28 23:28:39 +00:00
continue;
}
2011-07-17 23:08:47 +00:00
if($invonly && ($x || is_site_admin())) {
$code = autoname(8) . srand(1000,9999);
$nmessage = str_replace('$invite_code',$code,$message);
2011-07-18 04:12:31 +00:00
$r = q("INSERT INTO `register` (`hash`,`created`) VALUES ('%s', '%s') ",
dbesc($code),
dbesc(datetime_convert())
);
2011-07-17 23:08:47 +00:00
if(! is_site_admin()) {
$x --;
if($x >= 0)
2011-07-18 04:12:31 +00:00
set_pconfig(local_user(),'system','invites_remaining',$x);
2011-07-17 23:08:47 +00:00
else
return;
}
}
else
$nmessage = $message;
2010-07-28 23:28:39 +00:00
2011-05-24 03:30:37 +00:00
$res = mail($recip, sprintf( t('Please join my network on %s'), $a->config['sitename']),
2011-07-17 23:08:47 +00:00
$nmessage,
2011-04-15 00:13:13 +00:00
"From: " . $a->user['email'] . "\n"
. 'Content-type: text/plain; charset=UTF-8' . "\n"
. 'Content-transfer-encoding: 8bit' );
2010-07-28 23:28:39 +00:00
if($res) {
$total ++;
}
else {
2011-03-10 23:22:21 +00:00
notice( sprintf( t('%s : Message delivery failed.'), $recip) . EOL);
2010-07-28 23:28:39 +00:00
}
}
2011-03-13 12:50:44 +00:00
notice( sprintf( tt("%d message sent.", "%d messages sent.", $total) , $total) . EOL);
2010-09-09 03:14:17 +00:00
return;
2010-07-28 23:28:39 +00:00
}
function invite_content(&$a) {
2010-12-10 12:04:35 +00:00
2010-07-28 23:28:39 +00:00
if(! local_user()) {
notice( t('Permission denied.') . EOL);
return;
}
2011-05-11 11:37:13 +00:00
$tpl = get_markup_template('invite.tpl');
2011-07-17 23:08:47 +00:00
$invonly = false;
2011-07-18 04:12:31 +00:00
if(get_config('system','invitation_only')) {
2011-07-17 23:08:47 +00:00
$invonly = true;
$x = get_pconfig(local_user(),'system','invites_remaining');
if((! $x) && (! is_site_admin())) {
notice( t('You have no more invitations available') . EOL);
return '';
}
}
2010-07-28 23:28:39 +00:00
$o = replace_macros($tpl, array(
'$invite' => t('Send invitations'),
'$addr_text' => t('Enter email addresses, one per line:'),
'$msg_text' => t('Your message:'),
2011-03-10 23:22:21 +00:00
'$default_message' => sprintf(t('Please join my social network on %s'), $a->config['sitename']) . "\r\n" . "\r\n"
2011-01-24 11:08:20 +00:00
. t('To accept this invitation, please visit:') . "\r\n" . "\r\n" . $a->get_baseurl()
2011-07-17 23:08:47 +00: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:')
2011-01-24 11:08:20 +00:00
. "\r\n" . "\r\n" . $a->get_baseurl() . '/profile/' . $a->user['nickname'] ,
2010-07-28 23:28:39 +00:00
'$submit' => t('Submit')
));
return $o;
}