2010-07-28 23:28:39 +00:00
|
|
|
<?php
|
|
|
|
|
|
|
|
|
|
|
|
function invite_post(&$a) {
|
|
|
|
if(! local_user()) {
|
|
|
|
notice( t('Permission denied.') . EOL);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
$recips = explode("\n",$_POST['recipients']);
|
|
|
|
$message = $_POST['message'];
|
|
|
|
|
|
|
|
$total = 0;
|
|
|
|
|
|
|
|
foreach($recips as $recip) {
|
|
|
|
|
|
|
|
$recip = trim($recip);
|
|
|
|
|
2010-11-14 08:32:31 +00:00
|
|
|
if(! valid_email($recip)) {
|
|
|
|
notice( $recip . t(' : ') . t('Not a valid email address.') . EOL);
|
2010-07-28 23:28:39 +00:00
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
2010-11-14 08:32:31 +00:00
|
|
|
$res = mail($recip, t('Please join my network on ') . $a->config['sitename'],
|
|
|
|
$message, "From: " . $a->user['email']);
|
2010-07-28 23:28:39 +00:00
|
|
|
if($res) {
|
|
|
|
$total ++;
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
notice( $recip . t(' : ') . t('Message delivery failed.') . EOL);
|
|
|
|
}
|
|
|
|
|
|
|
|
}
|
|
|
|
notice( $total . t(' messages sent.') . EOL);
|
2010-09-09 03:14:17 +00:00
|
|
|
return;
|
2010-07-28 23:28:39 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
function invite_content(&$a) {
|
|
|
|
if(! local_user()) {
|
|
|
|
notice( t('Permission denied.') . EOL);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
2010-09-23 01:00:19 +00:00
|
|
|
$tpl = load_view_file('view/invite.tpl');
|
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:'),
|
|
|
|
'$default_message' => t('Please join my social network on ') . $a->config['sitename'] . t("\r\n") . t("\r\n")
|
|
|
|
. t('To accept this invitation, please visit:') . t("\r\n") . t("\r\n") . $a->get_baseurl()
|
|
|
|
. t("\r\n") . t("\r\n") . t('Once you have registered, please make an introduction via my profile page at:')
|
|
|
|
. t("\r\n") . t("\r\n") . $a->get_baseurl() . '/profile/' . $a->user['nickname'] ,
|
|
|
|
'$submit' => t('Submit')
|
|
|
|
));
|
|
|
|
|
|
|
|
return $o;
|
|
|
|
}
|