mail.php 21.6 KB
Newer Older
1
<?php
2
/**
3
 * StatusNet, the distributed open-source microblogging tool
4
 *
5 6 7 8 9
 * utilities for sending email
 *
 * PHP version 5
 *
 * LICENCE: This program is free software: you can redistribute it and/or modify
10 11 12 13 14 15 16 17 18 19 20
 * it under the terms of the GNU Affero General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU Affero General Public License for more details.
 *
 * You should have received a copy of the GNU Affero General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
21 22
 *
 * @category  Mail
23
 * @package   StatusNet
24 25 26 27
 * @author    Evan Prodromou <evan@status.net>
 * @author    Zach Copley <zach@status.net>
 * @author    Robin Millette <millette@status.net>
 * @author    Sarven Capadisli <csarven@status.net>
28
 * @copyright 2008 StatusNet, Inc.
29
 * @license   http://www.fsf.org/licensing/licenses/agpl-3.0.html GNU Affero General Public License version 3.0
30
 * @link      http://status.net/
31 32
 */

33
if (!defined('STATUSNET') && !defined('LACONICA')) {
34 35
    exit(1);
}
36

37
require_once 'Mail.php';
38

39 40 41 42 43 44 45 46
/**
 * return the configured mail backend
 *
 * Uses the $config array to make a mail backend. Cached so it is safe to call
 * more than once.
 *
 * @return Mail backend
 */
47

48 49 50 51 52
function mail_backend()
{
    static $backend = null;

    if (!$backend) {
53 54 55
        $backend = Mail::factory(common_config('mail', 'backend'),
                                 (common_config('mail', 'params')) ?
                                 common_config('mail', 'params') :
56 57 58 59 60 61
                                 array());
        if (PEAR::isError($backend)) {
            common_server_error($backend->getMessage(), 500);
        }
    }
    return $backend;
62 63
}

64 65 66 67 68 69 70 71 72
/**
 * send an email to one or more recipients
 *
 * @param array  $recipients array of strings with email addresses of recipients
 * @param array  $headers    array mapping strings to strings for email headers
 * @param string $body       body of the email
 *
 * @return boolean success flag
 */
73

74 75 76 77
function mail_send($recipients, $headers, $body)
{
    // XXX: use Mail_Queue... maybe
    $backend = mail_backend();
78 79 80
    if (!isset($headers['Content-Type'])) {
        $headers['Content-Type'] = 'text/plain; charset=UTF-8';
    }
81 82 83 84 85 86 87
    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());
        return false;
    }
    return true;
88 89
}

90 91 92 93 94 95 96
/**
 * returns the configured mail domain
 *
 * Defaults to the server name.
 *
 * @return string mail domain, suitable for making email addresses.
 */
97

98 99 100 101 102 103 104
function mail_domain()
{
    $maildomain = common_config('mail', 'domain');
    if (!$maildomain) {
        $maildomain = common_config('site', 'server');
    }
    return $maildomain;
105
}
Evan Prodromou's avatar
Evan Prodromou committed
106

107 108 109 110 111 112 113 114 115 116 117 118
/**
 * returns a good address for sending email from this server
 *
 * Uses either the configured value or a faked-up value made
 * from the mail domain.
 *
 * @return string notify from address
 */

function mail_notify_from()
{
    $notifyfrom = common_config('mail', 'notifyfrom');
119

120
    if (!$notifyfrom) {
121

122
        $domain = mail_domain();
123

124
        $notifyfrom = '"'.common_config('site', 'name') .'" <noreply@'.$domain.'>';
125 126 127
    }

    return $notifyfrom;
128 129
}

130 131 132 133 134 135
/**
 * sends email to a user
 *
 * @param User   &$user   user to send email to
 * @param string $subject subject of the email
 * @param string $body    body of the email
Dave Hall's avatar
Dave Hall committed
136
 * @param array  $headers optional list of email headers
137 138 139 140
 * @param string $address optional specification of email address
 *
 * @return boolean success flag
 */
Evan Prodromou's avatar
Evan Prodromou committed
141

Dave Hall's avatar
Dave Hall committed
142
function mail_to_user(&$user, $subject, $body, $headers=array(), $address=null)
143 144 145 146
{
    if (!$address) {
        $address = $user->email;
    }
147

148 149
    $recipients = $address;
    $profile    = $user->getProfile();
150

151 152 153 154 155
    $headers['From']    = mail_notify_from();
    $headers['To']      = $profile->getBestName() . ' <' . $address . '>';
    $headers['Subject'] = $subject;

    return mail_send($recipients, $headers, $body);
Evan Prodromou's avatar
Evan Prodromou committed
156
}
157

158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183
/**
 * Send an email to confirm a user's control of an email address
 *
 * @param User   $user     User claiming the email address
 * @param string $code     Confirmation code
 * @param string $nickname Nickname of user
 * @param string $address  email address to confirm
 *
 * @see common_confirmation_code()
 *
 * @return success flag
 */

function mail_confirm_address($user, $code, $nickname, $address)
{
    $subject = _('Email address confirmation');

    $body = sprintf(_("Hey, %s.\n\n".
                      "Someone just entered this email address on %s.\n\n" .
                      "If it was you, and you want to confirm your entry, ".
                      "use the URL below:\n\n\t%s\n\n" .
                      "If not, just ignore this message.\n\n".
                      "Thanks for your time, \n%s\n"),
                    $nickname, common_config('site', 'name'),
                    common_local_url('confirmaddress', array('code' => $code)),
                    common_config('site', 'name'));
Dave Hall's avatar
Dave Hall committed
184 185 186
    $headers = array();

    return mail_to_user($user, $subject, $body, $headers, $address);
187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205
}

/**
 * notify a user of subscription by another user
 *
 * This is just a wrapper around the profile-based version.
 *
 * @param User $listenee user who is being subscribed to
 * @param User $listener user who is subscribing
 *
 * @see mail_subscribe_notify_profile()
 *
 * @return void
 */

function mail_subscribe_notify($listenee, $listener)
{
    $other = $listener->getProfile();
    mail_subscribe_notify_profile($listenee, $other);
206 207
}

208 209 210 211 212 213 214 215 216 217 218 219 220 221
/**
 * notify a user of subscription by a profile (remote or local)
 *
 * This function checks to see if the listenee has an email
 * address and wants subscription notices.
 *
 * @param User    $listenee user who's being subscribed to
 * @param Profile $other    profile of person who's listening
 *
 * @return void
 */

function mail_subscribe_notify_profile($listenee, $other)
{
222 223
    if ($other->hasRight(Right::EMAILONSUBSCRIBE) &&
        $listenee->email && $listenee->emailnotifysub) {
224 225

        // use the recipient's localization
226
        common_init_locale($listenee->language);
227 228 229 230 231 232 233 234 235 236

        $profile = $listenee->getProfile();

        $name = $profile->getBestName();

        $long_name = ($other->fullname) ?
          ($other->fullname . ' (' . $other->nickname . ')') : $other->nickname;

        $recipients = $listenee->email;

Dave Hall's avatar
Dave Hall committed
237
        $headers = _mail_prepare_headers('subscribe', $listenee->nickname, $other->nickname);
238 239 240 241
        $headers['From']    = mail_notify_from();
        $headers['To']      = $name . ' <' . $listenee->email . '>';
        $headers['Subject'] = sprintf(_('%1$s is now listening to '.
                                        'your notices on %2$s.'),
242
                                      $other->getBestName(),
243 244 245 246 247 248 249 250 251 252
                                      common_config('site', 'name'));

        $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".'%7$s.'."\n\n".
                          "----\n".
                          "Change your email address or ".
253
                          "notification options at ".'%8$s' ."\n"),
254 255 256 257
                        $long_name,
                        common_config('site', 'name'),
                        $other->profileurl,
                        ($other->location) ?
258
                        sprintf(_("Location: %s"), $other->location) . "\n" : '',
259
                        ($other->homepage) ?
260
                        sprintf(_("Homepage: %s"), $other->homepage) . "\n" : '',
261
                        ($other->bio) ?
262
                        sprintf(_("Bio: %s"), $other->bio) . "\n\n" : '',
263 264 265
                        common_config('site', 'name'),
                        common_local_url('emailsettings'));

266 267
        // reset localization
        common_init_locale();
268 269
        mail_send($recipients, $headers, $body);
    }
270
}
271

272 273 274 275 276 277 278 279 280 281 282 283 284
/**
 * notify a user of their new incoming email address
 *
 * User's email and incoming fields should already be updated.
 *
 * @param User $user user with the new address
 *
 * @return void
 */

function mail_new_incoming_notify($user)
{
    $profile = $user->getProfile();
285

286
    $name = $profile->getBestName();
Evan Prodromou's avatar
Evan Prodromou committed
287

288 289 290 291
    $headers['From']    = $user->incomingemail;
    $headers['To']      = $name . ' <' . $user->email . '>';
    $headers['Subject'] = sprintf(_('New email address for posting to %s'),
                                  common_config('site', 'name'));
Evan Prodromou's avatar
Evan Prodromou committed
292

293 294 295 296 297 298 299 300
    $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%4\$s"),
                    common_config('site', 'name'),
                    $user->incomingemail,
                    common_local_url('doc', array('title' => 'email')),
                    common_config('site', 'name'));
Evan Prodromou's avatar
Evan Prodromou committed
301

302
    mail_send($user->email, $headers, $body);
303 304
}

305 306 307 308 309 310 311 312 313 314 315 316 317
/**
 * generate a new address for incoming messages
 *
 * @todo check the database for uniqueness
 *
 * @return string new email address for incoming messages
 */

function mail_new_incoming_address()
{
    $prefix = common_confirmation_code(64);
    $suffix = mail_domain();
    return $prefix . '@' . $suffix;
318
}
319

320 321 322 323 324 325 326 327 328 329 330
/**
 * broadcast a notice to all subscribers with SMS notification on
 *
 * This function sends SMS messages to all users who have sms addresses;
 * have sms notification on; and have sms enabled for this particular
 * subscription.
 *
 * @param Notice $notice The notice to broadcast
 *
 * @return success flag
 */
Evan Prodromou's avatar
Evan Prodromou committed
331

332 333 334
function mail_broadcast_notice_sms($notice)
{
    // Now, get users subscribed to this profile
335

336
    $user = new User();
337

338
    $UT = common_config('db','type')=='pgsql'?'"user"':'user';
339
    $user->query('SELECT nickname, smsemail, incomingemail ' .
340 341
                 "FROM $UT JOIN subscription " .
                 "ON $UT.id = subscription.subscriber " .
342
                 'WHERE subscription.subscribed = ' . $notice->profile_id . ' ' .
Evan Prodromou's avatar
Evan Prodromou committed
343
                 'AND subscription.subscribed != subscription.subscriber ' .
344 345
                 "AND $UT.smsemail IS NOT null " .
                 "AND $UT.smsnotify = 1 " .
346
                 'AND subscription.sms = 1 ');
347

348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368
    while ($user->fetch()) {
        common_log(LOG_INFO,
                   'Sending notice ' . $notice->id . ' to ' . $user->smsemail,
                   __FILE__);
        $success = mail_send_sms_notice_address($notice,
                                                $user->smsemail,
                                                $user->incomingemail);
        if (!$success) {
            // XXX: Not sure, but I think that's the right thing to do
            common_log(LOG_WARNING,
                       'Sending notice ' . $notice->id . ' to ' .
                       $user->smsemail . ' FAILED, cancelling.',
                       __FILE__);
            return false;
        }
    }

    $user->free();
    unset($user);

    return true;
369 370
}

371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388
/**
 * send a notice to a user via SMS
 *
 * A convenience wrapper around mail_send_sms_notice_address()
 *
 * @param Notice $notice notice to send
 * @param User   $user   user to receive notice
 *
 * @see mail_send_sms_notice_address()
 *
 * @return boolean success flag
 */

function mail_send_sms_notice($notice, $user)
{
    return mail_send_sms_notice_address($notice,
                                        $user->smsemail,
                                        $user->incomingemail);
389 390
}

391 392 393 394 395 396 397 398 399 400 401 402
/**
 * send a notice to an SMS email address from a given address
 *
 * We use the user's incoming email address as the "From" address to make
 * replying to notices easier.
 *
 * @param Notice $notice        notice to send
 * @param string $smsemail      email address to send to
 * @param string $incomingemail email address to set as 'from'
 *
 * @return boolean success flag
 */
403

404 405 406
function mail_send_sms_notice_address($notice, $smsemail, $incomingemail)
{
    $to = $nickname . ' <' . $smsemail . '>';
407

408
    $other = $notice->getProfile();
409

410 411
    common_log(LOG_INFO, 'Sending notice ' . $notice->id .
               ' to ' . $smsemail, __FILE__);
412

413 414 415 416 417 418 419 420 421 422
    $headers = array();

    $headers['From']    = ($incomingemail) ? $incomingemail : mail_notify_from();
    $headers['To']      = $to;
    $headers['Subject'] = sprintf(_('%s status'),
                                  $other->getBestName());

    $body = $notice->content;

    return mail_send($smsemail, $headers, $body);
423
}
424

425 426 427 428 429 430 431 432 433 434 435
/**
 * send a message to confirm a claim for an SMS number
 *
 * @param string $code     confirmation code
 * @param string $nickname nickname of user claiming number
 * @param string $address  email address to send the confirmation to
 *
 * @see common_confirmation_code()
 *
 * @return void
 */
436

437 438 439
function mail_confirm_sms($code, $nickname, $address)
{
    $recipients = $address;
Evan Prodromou's avatar
Evan Prodromou committed
440

441 442 443
    $headers['From']    = mail_notify_from();
    $headers['To']      = $nickname . ' <' . $address . '>';
    $headers['Subject'] = _('SMS confirmation');
444

445
    // FIXME: I18N
446

447 448 449 450 451 452
    $body  = "$nickname: confirm you own this phone number with this code:";
    $body .= "\n\n";
    $body .= $code;
    $body .= "\n\n";

    mail_send($recipients, $headers, $body);
453
}
Evan Prodromou's avatar
Evan Prodromou committed
454

455 456 457 458 459 460 461 462 463 464 465
/**
 * send a mail message to notify a user of a 'nudge'
 *
 * @param User $from user nudging
 * @param User $to   user being nudged
 *
 * @return boolean success flag
 */

function mail_notify_nudge($from, $to)
{
466
    common_init_locale($to->language);
467 468 469 470 471 472 473 474
    $subject = sprintf(_('You\'ve been nudged by %s'), $from->nickname);

    $from_profile = $from->getProfile();

    $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".
475
                      "Don't reply to this email; it won't get to them.\n\n".
476 477 478 479 480 481
                      "With kind regards,\n".
                      "%4\$s\n"),
                    $from_profile->getBestName(),
                    $from->nickname,
                    common_local_url('all', array('nickname' => $to->nickname)),
                    common_config('site', 'name'));
482
    common_init_locale();
Dave Hall's avatar
Dave Hall committed
483 484 485 486

    $headers = _mail_prepare_headers('nudge', $to->nickname, $from->nickname);

    return mail_to_user($to, $subject, $body, $headers);
csarven's avatar
csarven committed
487 488
}

489 490 491 492 493 494 495 496 497 498 499 500
/**
 * send a message to notify a user of a direct message (DM)
 *
 * This function checks to see if the recipient wants notification
 * of DMs and has a configured email address.
 *
 * @param Message $message message to notify about
 * @param User    $from    user sending message; default to sender
 * @param User    $to      user receiving message; default to recipient
 *
 * @return boolean success code
 */
Evan Prodromou's avatar
Evan Prodromou committed
501

502 503 504 505 506
function mail_notify_message($message, $from=null, $to=null)
{
    if (is_null($from)) {
        $from = User::staticGet('id', $message->from_profile);
    }
507

508 509 510
    if (is_null($to)) {
        $to = User::staticGet('id', $message->to_profile);
    }
Evan Prodromou's avatar
Evan Prodromou committed
511

512 513 514
    if (is_null($to->email) || !$to->emailnotifymsg) {
        return true;
    }
515

516
    common_init_locale($to->language);
517 518 519 520 521 522 523 524 525 526
    $subject = sprintf(_('New private message from %s'), $from->nickname);

    $from_profile = $from->getProfile();

    $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".
527
                      "Don't reply to this email; it won't get to them.\n\n".
528 529 530 531 532 533 534
                      "With kind regards,\n".
                      "%5\$s\n"),
                    $from_profile->getBestName(),
                    $from->nickname,
                    $message->content,
                    common_local_url('newmessage', array('to' => $from->id)),
                    common_config('site', 'name'));
535

Dave Hall's avatar
Dave Hall committed
536 537
    $headers = _mail_prepare_headers('message', $to->nickname, $from->nickname);

538
    common_init_locale();
Dave Hall's avatar
Dave Hall committed
539
    return mail_to_user($to, $subject, $body, $headers);
Evan Prodromou's avatar
Evan Prodromou committed
540
}
541

542 543 544
/**
 * notify a user that one of their notices has been chosen as a 'fave'
 *
545
 * Doesn't check that the user has an email address nor if they
546 547 548 549 550 551 552 553 554 555 556 557
 * 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)
{
558 559 560 561
    if (!$user->hasRight(Right::EMAILONFAVE)) {
        return;
    }

562 563 564
    $profile = $user->getProfile();

    $bestname = $profile->getBestName();
565

566
    common_init_locale($other->language);
567

568
    $subject = sprintf(_('%s (@%s) added your notice as a favorite'), $bestname, $user->nickname);
569

570
    $body = sprintf(_("%1\$s (@%7\$s) just added your notice from %2\$s".
571
                      " as one of their favorites.\n\n" .
572
                      "The URL of your notice is:\n\n" .
573
                      "%3\$s\n\n" .
574
                      "The text of your notice is:\n\n" .
575
                      "%4\$s\n\n" .
576 577
                      "You can see the list of %1\$s's favorites here:\n\n" .
                      "%5\$s\n\n" .
578
                      "Faithfully yours,\n" .
579
                      "%6\$s\n"),
580 581 582 583
                    $bestname,
                    common_exact_date($notice->created),
                    common_local_url('shownotice',
                                     array('notice' => $notice->id)),
584
                    $notice->content,
585 586
                    common_local_url('showfavorites',
                                     array('nickname' => $user->nickname)),
587 588
                    common_config('site', 'name'),
                    $user->nickname);
589

Dave Hall's avatar
Dave Hall committed
590 591
    $headers = _mail_prepare_headers('fave', $other->nickname, $user->nickname);

592
    common_init_locale();
Dave Hall's avatar
Dave Hall committed
593
    mail_to_user($other, $subject, $body, $headers);
594
}
595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612

/**
 * 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
 *
 * @return void
 */

function mail_notify_attn($user, $notice)
{
    if (!$user->email || !$user->emailnotifyattn) {
        return;
    }

    $sender = $notice->getProfile();

613 614 615 616
    if ($sender->id == $user->id) {
        return;
    }

617 618 619 620
    if (!$sender->hasRight(Right::EMAILONREPLY)) {
        return;
    }

621 622
    $bestname = $sender->getBestName();

623
    common_switch_locale($user->language);
624

Dave Hall's avatar
Dave Hall committed
625 626 627 628
        if ($notice->conversation != $notice->id) {
                $conversationEmailText = "The full conversation can be read here:\n\n".
                                                                 "\t%5\$s\n\n ";
                $conversationUrl            = common_local_url('conversation',
629
                                 array('id' => $notice->conversation)).'#notice-'.$notice->id;
Dave Hall's avatar
Dave Hall committed
630 631 632 633
        } else {
                $conversationEmailText = "%5\$s";
                $conversationUrl = null;
        }
634

635
    $subject = sprintf(_('%s (@%s) sent a notice to your attention'), $bestname, $sender->nickname);
636

Dave Hall's avatar
Dave Hall committed
637
        $body = sprintf(_("%1\$s (@%9\$s) just sent a notice to your attention (an '@-reply') on %2\$s.\n\n".
638 639 640 641
                      "The notice is here:\n\n".
                      "\t%3\$s\n\n" .
                      "It reads:\n\n".
                      "\t%4\$s\n\n" .
642
                      $conversationEmailText .
643
                      "You can reply back here:\n\n".
644
                      "\t%6\$s\n\n" .
645
                      "The list of all @-replies for you here:\n\n" .
646
                      "%7\$s\n\n" .
647 648
                      "Faithfully yours,\n" .
                      "%2\$s\n\n" .
649 650 651
                      "P.S. You can turn off these email notifications here: %8\$s\n"),
                    $bestname,//%1
                    common_config('site', 'name'),//%2
652
                    common_local_url('shownotice',
653 654
                                     array('notice' => $notice->id)),//%3
                    $notice->content,//%4
Dave Hall's avatar
Dave Hall committed
655
                                        $conversationUrl,//%5
656
                    common_local_url('newnotice',
657
                                     array('replyto' => $sender->nickname, 'inreplyto' => $notice->id)),//%6
658
                    common_local_url('replies',
659
                                     array('nickname' => $user->nickname)),//%7
660 661
                    common_local_url('emailsettings'), //%8
                    $sender->nickname); //%9
662

Dave Hall's avatar
Dave Hall committed
663 664
    $headers = _mail_prepare_headers('mention', $user->nickname, $sender->nickname);

665
    common_switch_locale();
Dave Hall's avatar
Dave Hall committed
666
    mail_to_user($user, $subject, $body, $headers);
667
}
Dave Hall's avatar
Dave Hall committed
668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689

/**
 * Prepare the common mail headers used in notification emails
 *
 * @param string $msg_type type of message being sent to the user
 * @param string $to       nickname of the receipient
 * @param string $from     nickname of the user triggering the notification
 *
 * @return array list of mail headers to include in the message
 */
function _mail_prepare_headers($msg_type, $to, $from)
{
    $headers = array(
        'X-StatusNet-MessageType' => $msg_type,
        'X-StatusNet-TargetUser'  => $to,
        'X-StatusNet-SourceUser'  => $from,
        'X-StatusNet-Domain'      => common_config('site', 'server')
    );

    return $headers;
}