includes/UserMailer.php

   1 <?php
   2 /**
   3  * UserMailer.php
   4  *  Copyright (C) 2004 Thomas Gries <mail@tgries.de>
   5  * http://www.mediawiki.org/
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation; either version 2 of the License, or
  10  * (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License along
  18  * with this program; if not, write to the Free Software Foundation, Inc.,
  19  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
  20  * http://www.gnu.org/copyleft/gpl.html
  21  *
  22  * @author <brion@pobox.com>
  23  * @author <mail@tgries.de>
  24  *
  25  */
  26
  27 /**
  28  * Converts a string into a valid RFC 822 "phrase", such as is used for the sender name
  29  */
  30 function wfRFC822Phrase( $phrase ) {
  31         $phrase = strtr( $phrase, array( "\r" => '', "\n" => '', '"' => '' ) );
  32         return '"' . $phrase . '"';
  33 }
  34
  35 /**
  36  * Stores a single person's name and email address.
  37  * These are passed in via the constructor, and will be returned in SMTP
  38  * header format when requested.
  39  */
  40 class MailAddress {
  41         /**
  42          * @param mixed $address String with an email address, or a User object
  43          * @param string $name Human-readable name if a string address is given
  44          */
  45         function __construct( $address, $name=null ) {
  46                 if( is_object( $address ) && $address instanceof User ) {
  47                         $this->address = $address->getEmail();
  48                         $this->name = $address->getName();
  49                 } else {
  50                         $this->address = strval( $address );
  51                         $this->name = strval( $name );
  52                 }
  53         }
  54
  55         /**
  56          * Return formatted and quoted address to insert into SMTP headers
  57          * @return string
  58          */
  59         function toString() {
  60                 # PHP's mail() implementation under Windows is somewhat shite, and
  61                 # can't handle "Joe Bloggs <joe@bloggs.com>" format email addresses,
  62                 # so don't bother generating them
  63                 if( $this->name != '' && !wfIsWindows() ) {
  64                         $quoted = wfQuotedPrintable( $this->name );
  65                         if( strpos( $quoted, '.' ) !== false ) {
  66                                 $quoted = '"' . $quoted . '"';
  67                         }
  68                         return "$quoted <{$this->address}>";
  69                 } else {
  70                         return $this->address;
  71                 }
  72         }
  73 }
  74
  75 function send_mail($mailer, $dest, $headers, $body)
  76 {
  77         $mailResult =& $mailer->send($dest, $headers, $body);
  78
  79         # Based on the result return an error string,
  80         if ($mailResult === true) {
  81                 return '';
  82         } elseif (is_object($mailResult)) {
  83                 wfDebug( "PEAR::Mail failed: " . $mailResult->getMessage() . "\n" );
  84                 return $mailResult->getMessage();
  85         } else {
  86                 wfDebug( "PEAR::Mail failed, unknown error result\n" );
  87                 return 'Mail object return unknown error.';
  88         }
  89 }
  90
  91 /**
  92  * This function will perform a direct (authenticated) login to
  93  * a SMTP Server to use for mail relaying if 'wgSMTP' specifies an
  94  * array of parameters. It requires PEAR:Mail to do that.
  95  * Otherwise it just uses the standard PHP 'mail' function.
  96  *
  97  * @param $to MailAddress: recipient's email
  98  * @param $from MailAddress: sender's email
  99  * @param $subject String: email's subject.
 100  * @param $body String: email's text.
 101  * @param $replyto String: optional reply-to email (default: null).
 102  */
 103 function userMailer( $to, $from, $subject, $body, $replyto=null ) {
 104         global $wgSMTP, $wgOutputEncoding, $wgErrorString, $wgEnotifImpersonal;
 105         global $wgEnotifMaxRecips;
 106
 107         if (is_array( $wgSMTP )) {
 108                 require_once( 'Mail.php' );
 109
 110                 $msgid = str_replace(" ", "_", microtime());
 111                 if (function_exists('posix_getpid'))
 112                         $msgid .= '.' . posix_getpid();
 113
 114                 if (is_array($to)) {
 115                         $dest = array();
 116                         foreach ($to as $u)
 117                                 $dest[] = $u->address;
 118                 } else
 119                         $dest = $to->address;
 120
 121                 $headers['From'] = $from->toString();
 122
 123                 if ($wgEnotifImpersonal)
 124                         $headers['To'] = 'undisclosed-recipients:;';
 125                 else
 126                         $headers['To'] = $to->toString();
 127
 128                 if ( $replyto ) {
 129                         $headers['Reply-To'] = $replyto->toString();
 130                 }
 131                 $headers['Subject'] = wfQuotedPrintable( $subject );
 132                 $headers['Date'] = date( 'r' );
 133                 $headers['MIME-Version'] = '1.0';
 134                 $headers['Content-type'] = 'text/plain; charset='.$wgOutputEncoding;
 135                 $headers['Content-transfer-encoding'] = '8bit';
 136                 $headers['Message-ID'] = "<$msgid@" . $wgSMTP['IDHost'] . '>'; // FIXME
 137                 $headers['X-Mailer'] = 'MediaWiki mailer';
 138
 139                 // Create the mail object using the Mail::factory method
 140                 $mail_object =& Mail::factory('smtp', $wgSMTP);
 141                 if( PEAR::isError( $mail_object ) ) {
 142                         wfDebug( "PEAR::Mail factory failed: " . $mail_object->getMessage() . "\n" );
 143                         return $mail_object->getMessage();
 144                 }
 145
 146                 wfDebug( "Sending mail via PEAR::Mail to $dest\n" );
 147                 if (is_array($dest)) {
 148                         $chunks = array_chunk($dest, $wgEnotifMaxRecips);
 149                         foreach ($chunks as $chunk) {
 150                                 $e = send_mail($mail_object, $chunk, $headers, $body);
 151                                 if ($e != '')
 152                                         return $e;
 153                         }
 154                 } else
 155                         return $mail_object->send($dest, $headers, $body);
 156
 157         } else  {
 158                 # In the following $headers = expression we removed "Reply-To: {$from}\r\n" , because it is treated differently
 159                 # (fifth parameter of the PHP mail function, see some lines below)
 160
 161                 # Line endings need to be different on Unix and Windows due to
 162                 # the bug described at http://trac.wordpress.org/ticket/2603
 163                 if ( wfIsWindows() ) {
 164                         $body = str_replace( "\n", "\r\n", $body );
 165                         $endl = "\r\n";
 166                 } else {
 167                         $endl = "\n";
 168                 }
 169                 $headers =
 170                         "MIME-Version: 1.0$endl" .
 171                         "Content-type: text/plain; charset={$wgOutputEncoding}$endl" .
 172                         "Content-Transfer-Encoding: 8bit$endl" .
 173                         "X-Mailer: MediaWiki mailer$endl".
 174                         'From: ' . $from->toString();
 175                 if ($replyto) {
 176                         $headers .= "{$endl}Reply-To: " . $replyto->toString();
 177                 }
 178
 179                 $wgErrorString = '';
 180                 set_error_handler( 'mailErrorHandler' );
 181                 wfDebug( "Sending mail via internal mail() function\n" );
 182
 183                 if (is_array($to))
 184                         foreach ($to as $recip)
 185                                 mail( $recip->toString(), wfQuotedPrintable( $subject ), $body, $headers );
 186                 else
 187                         mail( $to->toString(), wfQuotedPrintable( $subject ), $body, $headers );
 188
 189                 restore_error_handler();
 190
 191                 if ( $wgErrorString ) {
 192                         wfDebug( "Error sending mail: $wgErrorString\n" );
 193                 }
 194                 return $wgErrorString;
 195         }
 196 }
 197
 198 /**
 199  * Get the mail error message in global $wgErrorString
 200  *
 201  * @param $code Integer: error number
 202  * @param $string String: error message
 203  */
 204 function mailErrorHandler( $code, $string ) {
 205         global $wgErrorString;
 206         $wgErrorString = preg_replace( '/^mail\(\)(\s*\[.*?\])?: /', '', $string );
 207 }
 208
 209
 210 /**
 211  * This module processes the email notifications when the current page is
 212  * changed. It looks up the table watchlist to find out which users are watching
 213  * that page.
 214  *
 215  * The current implementation sends independent emails to each watching user for
 216  * the following reason:
 217  *
 218  * - Each watching user will be notified about the page edit time expressed in
 219  * his/her local time (UTC is shown additionally). To achieve this, we need to
 220  * find the individual timeoffset of each watching user from the preferences..
 221  *
 222  * Suggested improvement to slack down the number of sent emails: We could think
 223  * of sending out bulk mails (bcc:user1,user2...) for all these users having the
 224  * same timeoffset in their preferences.
 225  *
 226  * Visit the documentation pages under http://meta.wikipedia.com/Enotif
 227  *
 228  *
 229  */
 230 class EmailNotification {
 231         /**@{{
 232          * @private
 233          */
 234         var $to, $subject, $body, $replyto, $from;
 235         var $user, $title, $timestamp, $summary, $minorEdit, $oldid;
 236
 237         /**@}}*/
 238
 239         function notifyOnPageChange($editor, &$title, $timestamp, $summary, $minorEdit, $oldid = false) {
 240                 global $wgEnotifUseJobQ;
 241                 global $wgEnotifWatchlist, $wgShowUpdatedMarker;
 242
 243                 if( $title->getNamespace() < 0 )
 244                         return;
 245
 246                 if ($wgEnotifUseJobQ) {
 247                         $params = array(
 248                                 "editor" => $editor->getName(),
 249                                 "timestamp" => $timestamp,
 250                                 "summary" => $summary,
 251                                 "minorEdit" => $minorEdit,
 252                                 "oldid" => $oldid);
 253                         $job = new EnotifNotifyJob( $title, $params );
 254                         $job->insert();
 255                 } else {
 256                         $this->actuallyNotifyOnPageChange($editor, $title, $timestamp, $summary, $minorEdit, $oldid);
 257                 }
 258
 259         }
 260
 261         /**
 262          * @todo document
 263          * @param $title Title object
 264          * @param $timestamp
 265          * @param $summary
 266          * @param $minorEdit
 267          * @param $oldid (default: false)
 268          */
 269         function actuallyNotifyOnPageChange($editor, &$title, $timestamp, $summary, $minorEdit, $oldid=false) {
 270
 271                 # we use $wgEmergencyContact as sender's address
 272                 global $wgEnotifWatchlist;
 273                 global $wgEnotifMinorEdits, $wgEnotifUserTalk, $wgShowUpdatedMarker;
 274                 global $wgEnotifImpersonal;
 275
 276                 $fname = 'UserMailer::notifyOnPageChange';
 277                 wfProfileIn( $fname );
 278
 279                 # The following code is only run, if several conditions are met:
 280                 # 1. EmailNotification for pages (other than user_talk pages) must be enabled
 281                 # 2. minor edits (changes) are only regarded if the global flag indicates so
 282
 283                 $isUserTalkPage = ($title->getNamespace() == NS_USER_TALK);
 284                 $enotifusertalkpage = ($isUserTalkPage && $wgEnotifUserTalk);
 285                 $enotifwatchlistpage = $wgEnotifWatchlist;
 286
 287                 $this->title =& $title;
 288                 $this->timestamp = $timestamp;
 289                 $this->summary = $summary;
 290                 $this->minorEdit = $minorEdit;
 291                 $this->oldid = $oldid;
 292                 $this->composeCommonMailtext($editor);
 293
 294                 $impersonals = array();
 295
 296                 if ( (!$minorEdit || $wgEnotifMinorEdits) ) {
 297                         if( $wgEnotifWatchlist ) {
 298                                 // Send updates to watchers other than the current editor
 299                                 $userCondition = 'wl_user <> ' . intval( $editor->getId() );
 300                         } elseif( $wgEnotifUserTalk && $title->getNamespace() == NS_USER_TALK ) {
 301                                 $targetUser = User::newFromName( $title->getText() );
 302                                 if( is_null( $targetUser ) ) {
 303                                         wfDebug( "$fname: user-talk-only mode; no such user\n" );
 304                                         $userCondition = false;
 305                                 } elseif( $targetUser->getId() == $editor->getId() ) {
 306                                         wfDebug( "$fname: user-talk-only mode; editor is target user\n" );
 307                                         $userCondition = false;
 308                                 } else {
 309                                         // Don't notify anyone other than the owner of the talk page
 310                                         $userCondition = 'wl_user = ' . intval( $targetUser->getId() );
 311                                 }
 312                         } else {
 313                                 // Notifications disabled
 314                                 $userCondition = false;
 315                         }
 316                         if( $userCondition ) {
 317                                 $dbr = wfGetDB( DB_MASTER );
 318
 319                                 $res = $dbr->select( 'watchlist', array( 'wl_user' ),
 320                                         array(
 321                                                 'wl_title' => $title->getDBkey(),
 322                                                 'wl_namespace' => $title->getNamespace(),
 323                                                 $userCondition,
 324                                                 'wl_notificationtimestamp IS NULL',
 325                                         ), $fname );
 326
 327                                 # if anyone is watching ... set up the email message text which is
 328                                 # common for all receipients ...
 329                                 if ( $dbr->numRows( $res ) > 0 ) {
 330
 331                                         $watchingUser = new User();
 332
 333                                         # ... now do for all watching users ... if the options fit
 334                                         for ($i = 1; $i <= $dbr->numRows( $res ); $i++) {
 335
 336                                                 $wuser = $dbr->fetchObject( $res );
 337                                                 $watchingUser->setID($wuser->wl_user);
 338
 339                                                 if ( ( $enotifwatchlistpage && $watchingUser->getOption('enotifwatchlistpages') ) ||
 340                                                         ( $enotifusertalkpage
 341                                                                 && $watchingUser->getOption('enotifusertalkpages')
 342                                                                 && $title->equals( $watchingUser->getTalkPage() ) )
 343                                                 && (!$minorEdit || ($wgEnotifMinorEdits && $watchingUser->getOption('enotifminoredits') ) )
 344                                                 && ($watchingUser->isEmailConfirmed() ) ) {
 345                                                         # ... adjust remaining text and page edit time placeholders
 346                                                         # which needs to be personalized for each user
 347                                                         if ($wgEnotifImpersonal)
 348                                                                 $impersonals[] = $watchingUser;
 349                                                         else
 350                                                                 $this->composeAndSendPersonalisedMail( $watchingUser );
 351
 352                                                 } # if the watching user has an email address in the preferences
 353                                         }
 354                                 }
 355                         } # if anyone is watching
 356                 } # if $wgEnotifWatchlist = true
 357
 358                 global $wgUsersNotifedOnAllChanges;
 359                 foreach ( $wgUsersNotifedOnAllChanges as $name ) {
 360                         $user = User::newFromName( $name );
 361                         if ($wgEnotifImpersonal)
 362                                 $impersonals[] = $user;
 363                         else
 364                                 $this->composeAndSendPersonalisedMail( $user );
 365                 }
 366
 367                 $this->composeAndSendImpersonalMail($impersonals);
 368
 369                 if ( $wgShowUpdatedMarker || $wgEnotifWatchlist ) {
 370                         # mark the changed watch-listed page with a timestamp, so that the page is
 371                         # listed with an "updated since your last visit" icon in the watch list, ...
 372                         $dbw = wfGetDB( DB_MASTER );
 373                         $success = $dbw->update( 'watchlist',
 374                                 array( /* SET */
 375                                         'wl_notificationtimestamp' => $dbw->timestamp($timestamp)
 376                                 ), array( /* WHERE */
 377                                         'wl_title' => $title->getDBkey(),
 378                                         'wl_namespace' => $title->getNamespace(),
 379                                         'wl_notificationtimestamp' => NULL
 380                                 ), 'UserMailer::NotifyOnChange'
 381                         );
 382                         # FIXME what do we do on failure ?
 383                 }
 384
 385                 wfProfileOut( $fname );
 386         } # function NotifyOnChange
 387
 388         /**
 389          * @private
 390          */
 391         function composeCommonMailtext($editor) {
 392                 global $wgEmergencyContact, $wgNoReplyAddress;
 393                 global $wgEnotifFromEditor, $wgEnotifRevealEditorAddress;
 394                 global $wgEnotifImpersonal;
 395
 396                 $summary = ($this->summary == '') ? ' - ' : $this->summary;
 397                 $medit   = ($this->minorEdit) ? wfMsg( 'minoredit' ) : '';
 398
 399                 # You as the WikiAdmin and Sysops can make use of plenty of
 400                 # named variables when composing your notification emails while
 401                 # simply editing the Meta pages
 402
 403                 $subject = wfMsgForContent( 'enotif_subject' );
 404                 $body    = wfMsgForContent( 'enotif_body' );
 405                 $from    = ''; /* fail safe */
 406                 $replyto = ''; /* fail safe */
 407                 $keys    = array();
 408
 409                 # regarding the use of oldid as an indicator for the last visited version, see also
 410                 # http://bugzilla.wikipeda.org/show_bug.cgi?id=603 "Delete + undelete cycle doesn't preserve old_id"
 411                 # However, in the case of a new page which is already watched, we have no previous version to compare
 412                 if( $this->oldid ) {
 413                         $difflink = $this->title->getFullUrl( 'diff=0&oldid=' . $this->oldid );
 414                         $keys['$NEWPAGE'] = wfMsgForContent( 'enotif_lastvisited', $difflink );
 415                         $keys['$OLDID']   = $this->oldid;
 416                         $keys['$CHANGEDORCREATED'] = wfMsgForContent( 'changed' );
 417                 } else {
 418                         $keys['$NEWPAGE'] = wfMsgForContent( 'enotif_newpagetext' );
 419                         # clear $OLDID placeholder in the message template
 420                         $keys['$OLDID']   = '';
 421                         $keys['$CHANGEDORCREATED'] = wfMsgForContent( 'created' );
 422                 }
 423
 424                 if ($wgEnotifImpersonal && $this->oldid)
 425                         /*
 426                          * For impersonal mail, show a diff link to the last
 427                          * revision.
 428                          */
 429                         $keys['$NEWPAGE'] = wfMsgForContent('enotif_lastdiff',
 430                                         $this->title->getFullURL("oldid={$this->oldid}&diff=prev"));
 431
 432                 $body = strtr( $body, $keys );
 433                 $pagetitle = $this->title->getPrefixedText();
 434                 $keys['$PAGETITLE']          = $pagetitle;
 435                 $keys['$PAGETITLE_URL']      = $this->title->getFullUrl();
 436
 437                 $keys['$PAGEMINOREDIT']      = $medit;
 438                 $keys['$PAGESUMMARY']        = $summary;
 439
 440                 $subject = strtr( $subject, $keys );
 441
 442                 # Reveal the page editor's address as REPLY-TO address only if
 443                 # the user has not opted-out and the option is enabled at the
 444                 # global configuration level.
 445                 $name    = $editor->getName();
 446                 $adminAddress = new MailAddress( $wgEmergencyContact, 'WikiAdmin' );
 447                 $editorAddress = new MailAddress( $editor );
 448                 if( $wgEnotifRevealEditorAddress
 449                     && ( $editor->getEmail() != '' )
 450                     && $editor->getOption( 'enotifrevealaddr' ) ) {
 451                         if( $wgEnotifFromEditor ) {
 452                                 $from    = $editorAddress;
 453                         } else {
 454                                 $from    = $adminAddress;
 455                                 $replyto = $editorAddress;
 456                         }
 457                 } else {
 458                         $from    = $adminAddress;
 459                         $replyto = new MailAddress( $wgNoReplyAddress );
 460                 }
 461
 462                 if( $editor->isIP( $name ) ) {
 463                         #real anon (user:xxx.xxx.xxx.xxx)
 464                         $utext = wfMsgForContent('enotif_anon_editor', $name);
 465                         $subject = str_replace('$PAGEEDITOR', $utext, $subject);
 466                         $keys['$PAGEEDITOR']       = $utext;
 467                         $keys['$PAGEEDITOR_EMAIL'] = wfMsgForContent( 'noemailtitle' );
 468                 } else {
 469                         $subject = str_replace('$PAGEEDITOR', $name, $subject);
 470                         $keys['$PAGEEDITOR']          = $name;
 471                         $emailPage = SpecialPage::getSafeTitleFor( 'Emailuser', $name );
 472                         $keys['$PAGEEDITOR_EMAIL'] = $emailPage->getFullUrl();
 473                 }
 474                 $userPage = $editor->getUserPage();
 475                 $keys['$PAGEEDITOR_WIKI'] = $userPage->getFullUrl();
 476                 $body = strtr( $body, $keys );
 477                 $body = wordwrap( $body, 72 );
 478
 479                 # now save this as the constant user-independent part of the message
 480                 $this->from    = $from;
 481                 $this->replyto = $replyto;
 482                 $this->subject = $subject;
 483                 $this->body    = $body;
 484         }
 485
 486         /**
 487          * Does the per-user customizations to a notification e-mail (name,
 488          * timestamp in proper timezone, etc) and sends it out.
 489          * Returns true if the mail was sent successfully.
 490          *
 491          * @param User $watchingUser
 492          * @param object $mail
 493          * @return bool
 494          * @private
 495          */
 496         function composeAndSendPersonalisedMail( $watchingUser ) {
 497                 global $wgLang;
 498                 // From the PHP manual:
 499                 //     Note:  The to parameter cannot be an address in the form of "Something <someone@example.com>".
 500                 //     The mail command will not parse this properly while talking with the MTA.
 501                 $to = new MailAddress( $watchingUser );
 502                 $body = str_replace( '$WATCHINGUSERNAME', $watchingUser->getName() , $this->body );
 503
 504                 $timecorrection = $watchingUser->getOption( 'timecorrection' );
 505
 506                 # $PAGEEDITDATE is the time and date of the page change
 507                 # expressed in terms of individual local time of the notification
 508                 # recipient, i.e. watching user
 509                 $body = str_replace('$PAGEEDITDATE',
 510                         $wgLang->timeanddate( $this->timestamp, true, false, $timecorrection ),
 511                         $body);
 512
 513                 return userMailer($to, $this->from, $this->subject, $body, $this->replyto);
 514         }
 515
 516         /**
 517          * Same as composeAndSendPersonalisedMail but does impersonal mail
 518          * suitable for bulk mailing.  Takes an array of users.
 519          */
 520         function composeAndSendImpersonalMail($users) {
 521                 global $wgLang;
 522
 523                 if (empty($users))
 524                         return;
 525
 526                 $to = array();
 527                 foreach ($users as $user)
 528                         $to[] = new MailAddress($user);
 529
 530                 $body = str_replace(
 531                                 array(  '$WATCHINGUSERNAME',
 532                                         '$PAGEEDITDATE'),
 533                                 array(  wfMsgForContent('enotif_impersonal_salutation'),
 534                                         $wgLang->timeanddate($this->timestamp, true, false, false)),
 535                                 $this->body);
 536
 537                 return userMailer($to, $this->from, $this->subject, $body, $this->replyto);
 538         }
 539
 540 } # end of class EmailNotification
 541