if (!$backend) {
$backend = Mail::factory(common_config('mail', 'backend'),
- (common_config('mail', 'params')) ?
- common_config('mail', 'params') :
- array());
+ common_config('mail', 'params') ?: array());
if (PEAR::isError($backend)) {
common_server_error($backend->getMessage(), 500);
}
*/
function mail_send($recipients, $headers, $body)
{
- // XXX: use Mail_Queue... maybe
- $backend = mail_backend();
- if (!isset($headers['Content-Type'])) {
- $headers['Content-Type'] = 'text/plain; charset=UTF-8';
- }
- assert($backend); // throws an error if it's bad
- $sent = $backend->send($recipients, $headers, $body);
- if (PEAR::isError($sent)) {
- common_log(LOG_ERR, 'Email error: ' . $sent->getMessage());
+ try {
+ // XXX: use Mail_Queue... maybe
+ $backend = mail_backend();
+
+ if (!isset($headers['Content-Type'])) {
+ $headers['Content-Type'] = 'text/plain; charset=UTF-8';
+ }
+
+ assert($backend); // throws an error if it's bad
+ $sent = $backend->send($recipients, $headers, $body);
+ return true;
+ } catch (PEAR_Exception $e) {
+ common_log(
+ LOG_ERR,
+ "Unable to send email - '{$e->getMessage()}'. "
+ . 'Is your mail subsystem set up correctly?'
+ );
return false;
}
- return true;
}
/**
$recipients = $address;
$profile = $user->getProfile();
+ $headers['Date'] = date("r", time());
$headers['From'] = mail_notify_from();
$headers['To'] = $profile->getBestName() . ' <' . $address . '>';
$headers['Subject'] = $subject;
$headers['To'] = $name . ' <' . $listenee->email . '>';
// TRANS: Subject of new-subscriber notification e-mail.
// TRANS: %1$s is the subscribing user's nickname, %2$s is the StatusNet sitename.
- $headers['Subject'] = sprintf(_('%1$s is now listening to '.
- 'your notices on %2$s.'),
+ $headers['Subject'] = sprintf(_('%1$s is now following you on %2$s.'),
$other->getBestName(),
common_config('site', 'name'));
- // TRANS: This is a paragraph in a new-subscriber e-mail.
- // TRANS: %s is a URL where the subscriber can be reported as abusive.
- $blocklink = sprintf(_("If you believe this account is being used abusively, " .
- "you can block them from your subscribers list and " .
- "report as spam to site administrators at %s"),
- common_local_url('block', array('profileid' => $other->id)));
-
// TRANS: Main body of new-subscriber notification e-mail.
- // TRANS: %1$s is the subscriber's long name, %2$s is the StatusNet sitename,
- // TRANS: %3$s is the subscriber's profile URL, %4$s is the subscriber's location (or empty)
- // TRANS: %5$s is the subscriber's homepage URL (or empty), %6%s is the subscriber's bio (or empty)
- // TRANS: %7$s is a link to the addressed user's e-mail settings.
- $body = sprintf(_('%1$s is now listening to your notices on %2$s.'."\n\n".
- "\t".'%3$s'."\n\n".
- '%4$s'.
- '%5$s'.
- '%6$s'.
- "\n".'Faithfully yours,'."\n".'%2$s.'."\n\n".
- "----\n".
- "Change your email address or ".
- "notification options at ".'%7$s' ."\n"),
+ // TRANS: %1$s is the subscriber's long name, %2$s is the StatusNet sitename.
+ $body = sprintf(_('%1$s is now following you on %2$s.'),
+ $long_name,
+ common_config('site', 'name')) .
+ mail_profile_block($other) .
+ mail_footer_block();
+
+ // reset localization
+ common_switch_locale();
+ mail_send($recipients, $headers, $body);
+ }
+}
+
+function mail_subscribe_pending_notify_profile($listenee, $other)
+{
+ if ($other->hasRight(Right::EMAILONSUBSCRIBE) &&
+ $listenee->email && $listenee->emailnotifysub) {
+
+ $profile = $listenee->getProfile();
+
+ $name = $profile->getBestName();
+
+ $long_name = ($other->fullname) ?
+ ($other->fullname . ' (' . $other->nickname . ')') : $other->nickname;
+
+ $recipients = $listenee->email;
+
+ // use the recipient's localization
+ common_switch_locale($listenee->language);
+
+ $headers = _mail_prepare_headers('subscribe', $listenee->nickname, $other->nickname);
+ $headers['From'] = mail_notify_from();
+ $headers['To'] = $name . ' <' . $listenee->email . '>';
+ // TRANS: Subject of pending new-subscriber notification e-mail.
+ // TRANS: %1$s is the subscribing user's nickname, %2$s is the StatusNet sitename.
+ $headers['Subject'] = sprintf(_('%1$s would like to listen to '.
+ 'your notices on %2$s.'),
+ $other->getBestName(),
+ common_config('site', 'name'));
+
+ // TRANS: Main body of pending new-subscriber notification e-mail.
+ // TRANS: %1$s is the subscriber's long name, %2$s is the StatusNet sitename.
+ $body = sprintf(_('%1$s would like to listen to your notices on %2$s. ' .
+ 'You may approve or reject their subscription at %3$s'),
$long_name,
common_config('site', 'name'),
- $other->profileurl,
- ($other->location) ?
- // TRANS: Profile info line in new-subscriber notification e-mail.
- // TRANS: %s is a location.
- sprintf(_("Location: %s"), $other->location) . "\n" : '',
- ($other->homepage) ?
- // TRANS: Profile info line in new-subscriber notification e-mail.
- // TRANS: %s is a homepage.
- sprintf(_("Homepage: %s"), $other->homepage) . "\n" : '',
- (($other->bio) ?
- // TRANS: Profile info line in new-subscriber notification e-mail.
- // TRANS: %s is biographical information.
- sprintf(_("Bio: %s"), $other->bio) . "\n" : '') .
- "\n\n" . $blocklink . "\n",
- common_local_url('emailsettings'));
+ common_local_url('subqueue', array('nickname' => $listenee->nickname))) .
+ mail_profile_block($other) .
+ mail_footer_block();
// reset localization
common_switch_locale();
}
}
+function mail_footer_block()
+{
+ // TRANS: Common footer block for StatusNet notification emails.
+ // TRANS: %1$s is the StatusNet sitename,
+ // TRANS: %2$s is a link to the addressed user's e-mail settings.
+ return "\n\n" . sprintf(_('Faithfully yours,'.
+ "\n".'%1$s.'."\n\n".
+ "----\n".
+ "Change your email address or ".
+ "notification options at ".'%2$s'),
+ common_config('site', 'name'),
+ common_local_url('emailsettings')) . "\n";
+}
+
+/**
+ * Format a block of profile info for a plaintext notification email.
+ *
+ * @param Profile $profile
+ * @return string
+ */
+function mail_profile_block($profile)
+{
+ // TRANS: Layout for
+ // TRANS: %1$s is the subscriber's profile URL, %2$s is the subscriber's location (or empty)
+ // TRANS: %3$s is the subscriber's homepage URL (or empty), %4%s is the subscriber's bio (or empty)
+ $out = array();
+ $out[] = "";
+ $out[] = "";
+ // TRANS: Profile info line in notification e-mail.
+ // TRANS: %s is a URL.
+ $out[] = sprintf(_("Profile: %s"), $profile->profileurl);
+ if ($profile->location) {
+ // TRANS: Profile info line in notification e-mail.
+ // TRANS: %s is a location.
+ $out[] = sprintf(_("Location: %s"), $profile->location);
+ }
+ if ($profile->homepage) {
+ // TRANS: Profile info line in notification e-mail.
+ // TRANS: %s is a homepage.
+ $out[] = sprintf(_("Homepage: %s"), $profile->homepage);
+ }
+ if ($profile->bio) {
+ // TRANS: Profile info line in notification e-mail.
+ // TRANS: %s is biographical information.
+ $out[] = sprintf(_("Bio: %s"), $profile->bio);
+ }
+
+ $blocklink = common_local_url('block', array('profileid' => $profile->id));
+ // This'll let ModPlus add the remote profile info so it's possible
+ // to block remote users directly...
+ Event::handle('MailProfileInfoBlockLink', array($profile, &$blocklink));
+
+ // TRANS: This is a paragraph in a new-subscriber e-mail.
+ // TRANS: %s is a URL where the subscriber can be reported as abusive.
+ $out[] = sprintf(_('If you believe this account is being used abusively, ' .
+ 'you can block them from your subscribers list and ' .
+ 'report as spam to site administrators at %s.'),
+ $blocklink);
+ $out[] = "";
+
+ return implode("\n", $out);
+}
+
/**
* notify a user of their new incoming email address
*
// TRANS: to to post by e-mail, %3$s is a URL to more instructions.
$body = sprintf(_("You have a new posting address on %1\$s.\n\n".
"Send email to %2\$s to post new messages.\n\n".
- "More email instructions at %3\$s.\n\n".
- "Faithfully yours,\n%1\$s"),
+ "More email instructions at %3\$s."),
common_config('site', 'name'),
$user->incomingemail,
- common_local_url('doc', array('title' => 'email')));
+ common_local_url('doc', array('title' => 'email'))) .
+ mail_footer_block();
mail_send($user->email, $headers, $body);
}
$user = new User();
$UT = common_config('db','type')=='pgsql'?'"user"':'user';
+ $replies = $notice->getReplies();
$user->query('SELECT nickname, smsemail, incomingemail ' .
- "FROM $UT JOIN subscription " .
+ "FROM $UT LEFT OUTER JOIN subscription " .
"ON $UT.id = subscription.subscriber " .
- 'WHERE subscription.subscribed = ' . $notice->profile_id . ' ' .
+ 'AND subscription.subscribed = ' . $notice->profile_id . ' ' .
'AND subscription.subscribed != subscription.subscriber ' .
+ // Users (other than the sender) who `want SMS notices':
+ "WHERE $UT.id != " . $notice->profile_id . ' ' .
"AND $UT.smsemail IS NOT null " .
"AND $UT.smsnotify = 1 " .
- 'AND subscription.sms = 1 ');
+ // ... where either the user _is_ subscribed to the sender
+ // (any of the "subscription" fields IS NOT null)
+ // and wants to get SMS for all of this scribe's notices...
+ 'AND (subscription.sms = 1 ' .
+ // ... or where the user was mentioned in
+ // or replied-to with the notice:
+ ($replies ? sprintf("OR $UT.id in (%s)",
+ implode(',', $replies))
+ : '') .
+ ')');
while ($user->fetch()) {
common_log(LOG_INFO,
__FILE__);
$success = mail_send_sms_notice_address($notice,
$user->smsemail,
- $user->incomingemail);
+ $user->incomingemail,
+ $user->nickname);
if (!$success) {
// XXX: Not sure, but I think that's the right thing to do
common_log(LOG_WARNING,
{
return mail_send_sms_notice_address($notice,
$user->smsemail,
- $user->incomingemail);
+ $user->incomingemail,
+ $user->nickname);
}
/**
* @param Notice $notice notice to send
* @param string $smsemail email address to send to
* @param string $incomingemail email address to set as 'from'
+ * @param string $nickname nickname to add to beginning
*
* @return boolean success flag
*/
-function mail_send_sms_notice_address($notice, $smsemail, $incomingemail)
+function mail_send_sms_notice_address($notice, $smsemail, $incomingemail, $nickname)
{
$to = $nickname . ' <' . $smsemail . '>';
// TRANS: Main body heading for SMS-by-email address confirmation message.
// TRANS: %s is the addressed user's nickname.
- $body = sprintf(_("%s: confirm you own this phone number with this code:"), $nickname);
+ $body = sprintf(_('%s: confirm you own this phone number with this code:'), $nickname);
$body .= "\n\n";
$body .= $code;
$body .= "\n\n";
// TRANS: Body for 'nudge' notification email.
// TRANS: %1$s is the nuding user's long name, $2$s is the nudging user's nickname,
- // TRANS: %3$s is a URL to post notices at, %4$s is the StatusNet sitename.
+ // TRANS: %3$s is a URL to post notices at.
$body = sprintf(_("%1\$s (%2\$s) is wondering what you are up to ".
"these days and is inviting you to post some news.\n\n".
"So let's hear from you :)\n\n".
"%3\$s\n\n".
- "Don't reply to this email; it won't get to them.\n\n".
- "With kind regards,\n".
- "%4\$s\n"),
+ "Don't reply to this email; it won't get to them."),
$from_profile->getBestName(),
$from->nickname,
- common_local_url('all', array('nickname' => $to->nickname)),
- common_config('site', 'name'));
+ common_local_url('all', array('nickname' => $to->nickname))) .
+ mail_footer_block();
common_switch_locale();
$headers = _mail_prepare_headers('nudge', $to->nickname, $from->nickname);
function mail_notify_message($message, $from=null, $to=null)
{
if (is_null($from)) {
- $from = User::staticGet('id', $message->from_profile);
+ $from = User::getKV('id', $message->from_profile);
}
if (is_null($to)) {
- $to = User::staticGet('id', $message->to_profile);
+ $to = User::getKV('id', $message->to_profile);
}
if (is_null($to->email) || !$to->emailnotifymsg) {
// TRANS: Body for direct-message notification email.
// TRANS: %1$s is the sending user's long name, %2$s is the sending user's nickname,
// TRANS: %3$s is the message content, %4$s a URL to the message,
- // TRANS: %5$s is the StatusNet sitename.
$body = sprintf(_("%1\$s (%2\$s) sent you a private message:\n\n".
"------------------------------------------------------\n".
"%3\$s\n".
"------------------------------------------------------\n\n".
"You can reply to their message here:\n\n".
"%4\$s\n\n".
- "Don't reply to this email; it won't get to them.\n\n".
- "With kind regards,\n".
- "%5\$s\n"),
+ "Don't reply to this email; it won't get to them."),
$from_profile->getBestName(),
$from->nickname,
$message->content,
- common_local_url('newmessage', array('to' => $from->id)),
- common_config('site', 'name'));
+ common_local_url('newmessage', array('to' => $from->id))) .
+ mail_footer_block();
$headers = _mail_prepare_headers('message', $to->nickname, $from->nickname);
}
/**
- * notify a user that one of their notices has been chosen as a 'fave'
- *
- * Doesn't check that the user has an email address nor if they
- * want to receive notification of faves. Maybe this happens higher
- * up the stack...?
- *
- * @param User $other The user whose notice was faved
- * @param User $user The user who faved the notice
- * @param Notice $notice The notice that was faved
- *
- * @return void
- */
-function mail_notify_fave($other, $user, $notice)
-{
- if (!$user->hasRight(Right::EMAILONFAVE)) {
- return;
- }
-
- $profile = $user->getProfile();
- if ($other->hasBlocked($profile)) {
- // If the author has blocked us, don't spam them with a notification.
- return;
- }
-
- $bestname = $profile->getBestName();
-
- common_switch_locale($other->language);
-
- // TRANS: Subject for favorite notification e-mail.
- // TRANS: %1$s is the adding user's long name, %2$s is the adding user's nickname.
- $subject = sprintf(_('%1$s (@%2$s) added your notice as a favorite'), $bestname, $user->nickname);
-
- // TRANS: Body for favorite notification e-mail.
- // TRANS: %1$s is the adding user's long name, $2$s is the date the notice was created,
- // TRANS: %3$s is a URL to the faved notice, %4$s is the faved notice text,
- // TRANS: %5$s is a URL to all faves of the adding user, %6$s is the StatusNet sitename,
- // TRANS: %7$s is the adding user's nickname.
- $body = sprintf(_("%1\$s (@%7\$s) just added your notice from %2\$s".
- " as one of their favorites.\n\n" .
- "The URL of your notice is:\n\n" .
- "%3\$s\n\n" .
- "The text of your notice is:\n\n" .
- "%4\$s\n\n" .
- "You can see the list of %1\$s's favorites here:\n\n" .
- "%5\$s\n\n" .
- "Faithfully yours,\n" .
- "%6\$s\n"),
- $bestname,
- common_exact_date($notice->created),
- common_local_url('shownotice',
- array('notice' => $notice->id)),
- $notice->content,
- common_local_url('showfavorites',
- array('nickname' => $user->nickname)),
- common_config('site', 'name'),
- $user->nickname);
-
- $headers = _mail_prepare_headers('fave', $other->nickname, $user->nickname);
-
- common_switch_locale();
- mail_to_user($other, $subject, $body, $headers);
-}
-
-/**
- * notify a user that they have received an "attn:" message AKA "@-reply"
+ * Notify a user that they have received an "attn:" message AKA "@-reply"
*
* @param User $user The user who recevied the notice
* @param Notice $notice The notice that was sent
*/
function mail_notify_attn($user, $notice)
{
- if (!$user->email || !$user->emailnotifyattn) {
+ if (!$user->receivesEmailNotifications()) {
return;
}
return;
}
+ // See if the notice's author who mentions this user is sandboxed
if (!$sender->hasRight(Right::EMAILONREPLY)) {
return;
}
+ // If the author has blocked the author, don't spam them with a notification.
+ if ($user->hasBlocked($sender)) {
+ return;
+ }
+
$bestname = $sender->getBestName();
common_switch_locale($user->language);
$subject = sprintf(_('%1$s (@%2$s) sent a notice to your attention'), $bestname, $sender->nickname);
// TRANS: Body of @-reply notification e-mail.
- // TRANS: %1$s is the sending user's long name, $2$s is the StatusNet sitename,
+ // TRANS: %1$s is the sending user's name, $2$s is the StatusNet sitename,
// TRANS: %3$s is a URL to the notice, %4$s is the notice text,
- // TRANS: %5$s is a URL to the full conversion if it exists (otherwise empty),
- // TRANS: %6$s is a URL to reply to the notice, %7$s is a URL to all @-replied for the addressed user,
- // TRANS: %8$s is a URL to the addressed user's e-mail settings, %9$s is the sender's nickname.
- $body = sprintf(_("%1\$s (@%9\$s) just sent a notice to your attention (an '@-reply') on %2\$s.\n\n".
+ // TRANS: %5$s is the text "The full conversation can be read here:" and a URL to the full conversion if it exists (otherwise empty),
+ // TRANS: %6$s is a URL to reply to the notice, %7$s is a URL to all @-replies for the addressed user,
+ $body = sprintf(_("%1\$s just sent a notice to your attention (an '@-reply') on %2\$s.\n\n".
"The notice is here:\n\n".
"\t%3\$s\n\n" .
"It reads:\n\n".
"You can reply back here:\n\n".
"\t%6\$s\n\n" .
"The list of all @-replies for you here:\n\n" .
- "%7\$s\n\n" .
- "Faithfully yours,\n" .
- "%2\$s\n\n" .
- "P.S. You can turn off these email notifications here: %8\$s\n"),
- $bestname,//%1
+ "%7\$s"),
+ $sender->getFancyName(),//%1
common_config('site', 'name'),//%2
common_local_url('shownotice',
array('notice' => $notice->id)),//%3
common_local_url('newnotice',
array('replyto' => $sender->nickname, 'inreplyto' => $notice->id)),//%6
common_local_url('replies',
- array('nickname' => $user->nickname)),//%7
- common_local_url('emailsettings'), //%8
- $sender->nickname); //%9
-
+ array('nickname' => $user->nickname))) . //%7
+ mail_footer_block();
$headers = _mail_prepare_headers('mention', $user->nickname, $sender->nickname);
common_switch_locale();
return $headers;
}
+
+/**
+ * Send notification emails to group administrator.
+ *
+ * @param User_group $group
+ * @param Profile $joiner
+ */
+function mail_notify_group_join($group, $joiner)
+{
+ // This returns a Profile query...
+ $admin = $group->getAdmins();
+ while ($admin->fetch()) {
+ // We need a local user for email notifications...
+ $adminUser = User::getKV('id', $admin->id);
+ // @fixme check for email preference?
+ if ($adminUser && $adminUser->email) {
+ // use the recipient's localization
+ common_switch_locale($adminUser->language);
+
+ $headers = _mail_prepare_headers('join', $admin->nickname, $joiner->nickname);
+ $headers['From'] = mail_notify_from();
+ $headers['To'] = $admin->getBestName() . ' <' . $adminUser->email . '>';
+ // TRANS: Subject of group join notification e-mail.
+ // TRANS: %1$s is the joining user's nickname, %2$s is the group name, and %3$s is the StatusNet sitename.
+ $headers['Subject'] = sprintf(_('%1$s has joined '.
+ 'your group %2$s on %3$s'),
+ $joiner->getBestName(),
+ $group->getBestName(),
+ common_config('site', 'name'));
+
+ // TRANS: Main body of group join notification e-mail.
+ // TRANS: %1$s is the subscriber's long name, %2$s is the group name, and %3$s is the StatusNet sitename,
+ // TRANS: %4$s is a block of profile info about the subscriber.
+ // TRANS: %5$s is a link to the addressed user's e-mail settings.
+ $body = sprintf(_('%1$s has joined your group %2$s on %3$s.'),
+ $joiner->getFancyName(),
+ $group->getFancyName(),
+ common_config('site', 'name')) .
+ mail_profile_block($joiner) .
+ mail_footer_block();
+
+ // reset localization
+ common_switch_locale();
+ mail_send($adminUser->email, $headers, $body);
+ }
+ }
+}
+
+
+/**
+ * Send notification emails to group administrator.
+ *
+ * @param User_group $group
+ * @param Profile $joiner
+ */
+function mail_notify_group_join_pending($group, $joiner)
+{
+ $admin = $group->getAdmins();
+ while ($admin->fetch()) {
+ // We need a local user for email notifications...
+ $adminUser = User::getKV('id', $admin->id);
+ // @fixme check for email preference?
+ if ($adminUser && $adminUser->email) {
+ // use the recipient's localization
+ common_switch_locale($adminUser->language);
+
+ $headers = _mail_prepare_headers('join', $admin->nickname, $joiner->nickname);
+ $headers['From'] = mail_notify_from();
+ $headers['To'] = $admin->getBestName() . ' <' . $adminUser->email . '>';
+ // TRANS: Subject of pending group join request notification e-mail.
+ // TRANS: %1$s is the joining user's nickname, %2$s is the group name, and %3$s is the StatusNet sitename.
+ $headers['Subject'] = sprintf(_('%1$s wants to join your group %2$s on %3$s.'),
+ $joiner->getBestName(),
+ $group->getBestName(),
+ common_config('site', 'name'));
+
+ // TRANS: Main body of pending group join request notification e-mail.
+ // TRANS: %1$s is the subscriber's long name, %2$s is the group name, and %3$s is the StatusNet sitename,
+ // TRANS: %4$s is the URL to the moderation queue page.
+ $body = sprintf(_('%1$s would like to join your group %2$s on %3$s. ' .
+ 'You may approve or reject their group membership at %4$s'),
+ $joiner->getFancyName(),
+ $group->getFancyName(),
+ common_config('site', 'name'),
+ common_local_url('groupqueue', array('nickname' => $group->nickname))) .
+ mail_profile_block($joiner) .
+ mail_footer_block();
+
+ // reset localization
+ common_switch_locale();
+ mail_send($adminUser->email, $headers, $body);
+ }
+ }
+}