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