* Moving img_exif to img_metadata, makes more sense if we're going to drop
[lhc/web/wiklou.git] / includes / UserMailer.php
index 90ce059..f5f27f6 100644 (file)
@@ -1,8 +1,62 @@
 <?php
+/**
+ * UserMailer.php
+ *  Copyright (C) 2004 Thomas Gries <mail@tgries.de>
+ * http://www.mediawiki.org/
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 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 General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ * http://www.gnu.org/copyleft/gpl.html
+ * 
+ * @author <brion@pobox.com>
+ * @author <mail@tgries.de>
+ * 
+ * @package MediaWiki
+ */
+
 /**
  * Provide mail capabilities
+ * @param string $string ????
+ * 
+ * The function takes formats like "name <emailaddr>" into account, for which
+ * the partial string "name" will be quoted-printable converted but not
+ * "<emailaddr>".
  *
+ * The php mail() function does not accept the email address partial string to
+ * be quotedprintable, it does not accept inputs as
+ *  quotedprintable("name <emailaddr>") .
+ * 
+ * case 1:
+ * input:      "name <emailaddr> rest"
+ * output:     "quoted-printable(name) <emailaddr>"
+ * 
+ * case 2: (should not happen)
+ * input:      "<emailaddr> rest"
+ * output:     "<emailaddr>"
+ * 
+ * case 3:     (should not happen)
+ * input:      "name"
+ * output:     "quoted-printable(name)"
  */
+function wfQuotedPrintable_name_and_emailaddr( $string ) {
+
+       /* do not quote printable for email address string <emailaddr>, but only for the (leading) string, usually the name */
+       preg_match( '/^([^<]*)?(<([A-z0-9_.-]+([A-z0-9_.-]+)*\@[A-z0-9_-]+([A-z0-9_.-]+)*([A-z.]{2,})+)>)?$/', $string, $part );
+       if ( !isset($part[1]) ) return $part[2];
+       if ( !isset($part[2]) ) return wfQuotedprintable($part[1]);
+       return wfQuotedprintable($part[1]) . $part[2] ;
+}
 
 /**
  * This function will perform a direct (authenticated) login to
  * @param string $from sender's email
  * @param string $subject email's subject
  * @param string $body email's text
+ * @param string $replyto optional reply-to email (default : false)
  */
-function userMailer( $to, $from, $subject, $body ) {
-       global $wgUser, $wgSMTP, $wgOutputEncoding, $wgErrorString;
+function userMailer( $to, $from, $subject, $body, $replyto=false ) {
+       global $wgUser, $wgSMTP, $wgOutputEncoding, $wgErrorString, $wgEmergencyContact;
        
-       $qto = wfQuotedPrintable( $to );
+       $qto = wfQuotedPrintable_name_and_emailaddr( $to );
        
-       if (is_array( $wgSMTP ))
-       {
+       if (is_array( $wgSMTP )) {
                require_once( 'Mail.php' );
                
                $timestamp = time();
@@ -29,13 +83,16 @@ function userMailer( $to, $from, $subject, $body ) {
                $headers['From'] = $from;
 /* removing to: field as it should be set by the send() function below
    UNTESTED - Hashar */
-//             $headers["To"] = $qto;
+//             $headers['To'] = $qto;
+/* Reply-To:
+   UNTESTED - Tom Gries */
+               $headers['Reply-To'] = $replyto;
                $headers['Subject'] = $subject;
                $headers['MIME-Version'] = '1.0';
                $headers['Content-type'] = 'text/plain; charset='.$wgOutputEncoding;
                $headers['Content-transfer-encoding'] = '8bit';
                $headers['Message-ID'] = "<{$timestamp}" . $wgUser->getName() . '@' . $wgSMTP['IDHost'] . '>';
-               $headers['X-Mailer'] = 'MediaWiki interuser e-mailer';
+               $headers['X-Mailer'] = 'MediaWiki mailer';
        
                // Create the mail object using the Mail::factory method
                $mail_object =& Mail::factory('smtp', $wgSMTP);
@@ -49,20 +106,23 @@ function userMailer( $to, $from, $subject, $body ) {
                        return $mailResult->getMessage();
                else
                        return 'Mail object return unknown error.';
-       }
-       
-       else
-       {
+       } else  {
+               # In the following $headers = expression we removed "Reply-To: {$from}\r\n" , because it is treated differently
+               # (fifth parameter of the PHP mail function, see some lines below)
                $headers =
                        "MIME-Version: 1.0\n" .
                        "Content-type: text/plain; charset={$wgOutputEncoding}\n" .
-                       "Content-transfer-encoding: 8bit\n" .
-                       "From: {$from}\n" .
-                       "X-Mailer: MediaWiki interuser e-mailer";
+                       "Content-Transfer-Encoding: 8bit\n" .
+                       "X-Mailer: MediaWiki mailer\n".
+                       'From:' . wfQuotedPrintable_name_and_emailaddr($from) . "\n";
+               if ($replyto) {
+                       $headers .= 'Reply-To: '.wfQuotedPrintable_name_and_emailaddr($replyto)."\n";
+               }
 
                $wgErrorString = '';
                set_error_handler( 'mailErrorHandler' );
-               mail( $to, $subject, $body, $headers );
+               # added -f parameter, see PHP manual for the fifth parameter when using the mail function
+               mail( wfQuotedPrintable_name_and_emailaddr($to), $subject, $body, $headers, "-f{$wgEmergencyContact}\n");
                restore_error_handler();
 
                return $wgErrorString;
@@ -70,10 +130,276 @@ function userMailer( $to, $from, $subject, $body ) {
 }
 
 /**
- *
+ * @todo document
  */
 function mailErrorHandler( $code, $string ) {
        global $wgErrorString;
        $wgErrorString = preg_replace( "/^mail\(\): /", "", $string );
 }
+
+
+/**
+ * This module processes the email notifications when the current page is
+ * changed. It looks up the table watchlist to find out which users are watching
+ * that page.
+ *
+ * The current implementation sends independent emails to each watching user for
+ * the following reason:
+ *
+ * - Each watching user will be notified about the page edit time expressed in
+ * his/her local time (UTC is shown additionally). To achieve this, we need to
+ * find the individual timeoffset of each watching user from the preferences..
+ *
+ * Suggested improvement to slack down the number of sent emails: We could think
+ * of sending out bulk mails (bcc:user1,user2...) for all these users having the
+ * same timeoffset in their preferences.
+ *
+ * Visit the documentation pages under http://meta.wikipedia.com/Enotif
+ * 
+ * @package MediaWiki
+ * 
+ */
+class EmailNotification {
+       /**#@+
+        * @access private
+        */
+       var $to, $subject, $body, $replyto, $from;
+       /**#@-*/
+       
+       /**
+        * @todo document
+        * @param $currentUser
+        * @param $currentPage
+        * @param $currentNs
+        * @param $timestamp
+        * @param $currentSummary
+        * @param $currentMinorEdit
+        * @param $oldid (default: false)
+        */
+       function NotifyOnPageChange($currentUser, $currentPage, $currentNs, $timestamp, $currentSummary, $currentMinorEdit, $oldid=false) {
+       
+               # we use $wgEmergencyContact as sender's address
+               global $wgUser, $wgLang, $wgEmergencyContact;
+               global $wgEmailNotificationForWatchlistPages, $wgEmailNotificationForMinorEdits;
+               global $wgEmailNotificationSystembeep, $wgEmailNotificationForUserTalkPages;
+               global $wgEmailNotificationRevealPageEditorAddress;
+               global $wgEmailNotificationMailsSentFromPageEditor;
+               global $wgEmailAuthentication;
+               global $beeped;
+       
+               # The following code is only run, if several conditions are met:
+               # 1. EmailNotification for pages (other than user_talk pages) must be enabled
+               # 2. minor edits (changes) are only regarded if the global flag indicates so
+       
+               $isUserTalkPage = ($currentNs == NS_USER_TALK);
+               $enotifusertalkpage = ($isUserTalkPage && $wgEmailNotificationForUserTalkPages);
+               $enotifwatchlistpage = (!$isUserTalkPage && $wgEmailNotificationForWatchlistPages);
+       
+               if ( ($enotifusertalkpage || $enotifwatchlistpage)
+                       && (!$currentMinorEdit || $wgEmailNotificationForMinorEdits) ) {
+       
+                       $dbr =& wfGetDB( DB_MASTER );
+                       extract( $dbr->tableNames( 'watchlist' ) );
+                       $sql = "SELECT wl_user FROM $watchlist
+                               WHERE wl_title='" . $dbr->strencode($currentPage)."'  AND wl_namespace = " . $currentNs .
+                               " AND wl_user <>" . $currentUser . " AND wl_notificationtimestamp <= 1";
+                       $res = $dbr->query( $sql,'UserMailer::NotifyOnChange');
+
+                       # if anyone is watching ... set up the email message text which is
+                       # common for all receipients ...
+                       if ( $dbr->numRows( $res ) > 0 ) { 
+       
+                               # This is a switch for one beep on the server when sending notification mails
+                               $beeped = false;
+
+                               $article->mTimestamp = $timestamp;
+                               $article->mSummary = $currentSummary;
+                               $article->mMinorEdit = $currentMinorEdit;
+                               $article->mNamespace = $currentNs;
+                               $article->mTitle = $currentPage;
+                               $article->mOldid = $oldid;
+       
+                               $mail = $this->composeCommonMailtext( $wgUser, $article );
+                               $watchingUser = new User();
+       
+                               # ... now do for all watching users ... if the options fit
+                               for ($i = 1; $i <= $dbr->numRows( $res ); $i++) { 
+
+                                       $wuser = $dbr->fetchObject( $res );
+                                       $watchingUser->setID($wuser->wl_user);
+                                       if ( ( $enotifwatchlistpage && $watchingUser->getOption('enotifwatchlistpages') ) ||
+                                               ( $enotifusertalkpage && $watchingUser->getOption('enotifusertalkpages') )
+                                       && (!$currentMinorEdit || ($wgEmailNotificationForMinorEdits && $watchingUser->getOption('enotifminoredits') ) )
+                                       && ($watchingUser->getEmail() != '')
+                                       && (!$wgEmailAuthentication || ($watchingUser->getEmailAuthenticationtimestamp() != 0 ) ) ) {
+                                               # ... adjust remaining text and page edit time placeholders
+                                               # which needs to be personalized for each user
+                                               $sent = $this->composeAndSendPersonalisedMail( $watchingUser, $mail, $article );
+                                               /* the beep here beeps once when a watched-listed page is changed */
+                                               if ($sent && !$beeped && ($wgEmailNotificationSystembeep != '') ) {
+                                                       $last_line = system($wgEmailNotificationSystembeep);
+                                                       $beeped=true;
+                                               }
+                                       } # if the watching user has an email address in the preferences
+                                       # mark the changed watch-listed page with a timestamp, so that the page is listed with an "updated since your last visit" icon in the watch list, ...
+                                       # ... no matter, if the watching user has or has not indicated an email address in his/her preferences.
+                                       # We memorise the event of sending out a notification and use this as a flag to suppress further mails for changes on the same page for that watching user
+                                       $dbw =& wfGetDB( DB_MASTER );
+                                       $succes = $dbw->update( 'watchlist',
+                                               array( /* SET */
+                                                       'wl_notificationtimestamp' => $article->mTimestamp
+                                               ), array( /* WHERE */
+                                                       'wl_title' => $currentPage,
+                                                       'wl_namespace' => $currentNs,
+                                                       'wl_user' => $wuser->wl_user
+                                               ), 'UserMailer::NotifyOnChange'
+                                       );
+                               } # for every watching user
+                       } # if anyone is watching
+               } # if $wgEmailNotificationForWatchlistPages = true
+       } # function NotifyOnChange
+       
+       /**
+        * @param User $pageeditorUser
+        * @param Article $article
+        * @access private
+        */
+       function composeCommonMailtext( $pageeditorUser, $article ) {
+               global $wgLang, $wgEmergencyContact;
+               global $wgEmailNotificationRevealPageEditorAddress;
+               global $wgEmailNotificationMailsSentFromPageEditor;
+               global $wgNoReplyAddress;
+               
+               $summary = ($article->mSummary == '') ? ' - ' : $article->mSummary;
+               $medit   = ($article->mMinorEdit) ? wfMsg( 'minoredit' ) : '';
+               
+               # You as the WikiAdmin and Sysops can make use of plenty of
+               # named variables when composing your notification emails while
+               # simply editing the Meta pages
+               
+               $to      = wfMsg( 'email_notification_to' );
+               $subject = wfMsg( 'email_notification_subject' );
+               $body    = wfMsg( 'email_notification_body' );
+               $from    = ''; /* fail safe */
+               $replyto = ''; /* fail safe */
+               $keys    = array();
+               
+               # regarding the use of oldid as an indicator for the last visited version, see also
+               # http://bugzilla.wikipeda.org/show_bug.cgi?id=603 "Delete + undelete cycle doesn't preserve old_id"
+               # However, in the case of a new page which is already watched, we have no previous version to compare
+               if( $article->mOldid ) {
+                       $keys['$NEWPAGE'] = wfMsg( 'email_notification_lastvisitedrevisiontext' );
+                       $keys['$OLDID']   = $article->mOldid;
+               } else {
+                       $keys['$NEWPAGE'] = wfMsg( 'email_notification_newpagetext' );
+                       # clear $OLDID placeholder in the message template
+                       $keys['$OLDID']   = '';
+               }
+               
+               $body = strtr( $body, $keys ); 
+       
+               $pagetitle = $article->mTitle;
+               if( $article->mNamespace != NS_MAIN ) {
+                       $pagetitle = $wgLang->getNsText( $article->mNamespace ) . ':' . $pagetitle;
+               }
+               $subject = str_replace( '$PAGETITLE', str_replace( '_', ' ', $pagetitle ) , $subject);
+               $keys['%24PAGETITLE_RAWURL'] = wfUrlencode( $pagetitle );
+               $keys['$PAGETITLE_RAWURL']   = wfUrlencode( $pagetitle );
+               $keys['%24PAGETITLE']        = $pagetitle; # needed for the {{localurl:$PAGETITLE}} in the messagetext, "$" appears here as "%24"
+               $keys['$PAGETITLE']          = $pagetitle;
+               $keys['$PAGETIMESTAMP']      = $article->mTimestamp;    # this is the raw internal timestamp - can be useful, too
+               $keys['$PAGEEDITDATEUTC']    = $wgLang->timeanddate( $article->mTimestamp, false, false, false );
+               $keys['$PAGEMINOREDIT']      = $medit;
+               $keys['$PAGESUMMARY']        = $summary;
+       
+
+               # Reveal the page editor's address as REPLY-TO address only if
+               # the user has not opted-out and the option is enabled at the
+               # global configuration level.
+               $name    = $pageeditorUser->getName();
+               $adminAddress = 'WikiAdmin <' . $wgEmergencyContact . '>';
+               $editorAddress = $name . ' <' . $pageeditorUser->getEmail() . '>';
+               if( $wgEmailNotificationRevealPageEditorAddress
+                   && ( $pageeditorUser->getEmail() != '' )
+                   && $pageeditorUser->getOption( 'enotifrevealaddr' ) ) {
+                       if( $wgEmailNotificationMailsSentFromPageEditor ) {
+                               $from    = $editorAddress;
+                       } else {
+                               $from    = $adminAddress;
+                               $replyto = $editorAddress;
+                       }
+                       $keys['$PAGEEDITORNAMEANDEMAILADDR'] = $editorAddress;
+               } else {
+                       $from    = $adminAddress;
+                       $replyto = $wgNoReplyAddress;
+                       $keys['$PAGEEDITORNAMEANDEMAILADDR'] = $replyto;
+               }
+       
+               if( $pageeditorUser->isIP( $name ) ) {
+                       #real anon (user:xxx.xxx.xxx.xxx)
+                       $anon    = $name . ' (anonymous user)';
+                       $anonUrl = wfUrlencode( $name ) . ' (anonymous user)';
+                       $subject = str_replace('$PAGEEDITOR', 'anonymous user '. $name, $subject);
+                       
+                       $keys['$PAGEEDITOR_RAWURL']   = $anonUrl;
+                       $keys['%24PAGEEDITOR_RAWURL'] = $anonUrl;
+                       $keys['%24PAGEEDITORE']       = $anon;
+                       $keys['$PAGEEDITORE']         = $anon;
+                       $keys['$PAGEEDITOR']          = 'anonymous user ' . $name;
+               } else {
+                       $subject = str_replace('$PAGEEDITOR', $name, $subject);
+                       $keys['$PAGEEDITOR_RAWURL']   = wfUrlencode( $name );
+                       $keys['%24PAGEEDITOR_RAWURL'] = wfUrlencode( $name );
+                       $keys['%24PAGEEDITORE']       = $pageeditorUser->getTitleKey();
+                       $keys['$PAGEEDITORE']         = $pageeditorUser->getTitleKey();
+                       $keys['$PAGEEDITOR']          = $name;
+               }
+               $body = strtr( $body, $keys );
+       
+               # now save this as the constant user-independent part of the message
+               $this->to      = $to;
+               $this->from    = $from;
+               $this->replyto = $replyto;
+               $this->subject = wfQuotedprintable($subject);
+               $this->body    = $body;
+               return $this;
+       }
+
+
+       
+       /**
+        * Does the per-user customizations to a notification e-mail (name,
+        * timestamp in proper timezone, etc) and sends it out.
+        * Returns true if the mail was sent successfully.
+        *
+        * @param User $watchingUser
+        * @param object $mail
+        * @param Article $article
+        * @return bool
+        * @access private
+        */
+       function composeAndSendPersonalisedMail( $watchingUser, $mail, $article ) {
+               global $wgLang;
+       
+               $to = $watchingUser->getName() . ' <' . $watchingUser->getEmail() . '>';
+               $body = str_replace( '$WATCHINGUSERNAME', $watchingUser->getName() , $mail->body );
+               $body = str_replace( '$WATCHINGUSEREMAILADDR', $watchingUser->getEmail(), $body );
+       
+               $timecorrection = $watchingUser->getOption( 'timecorrection' );
+               if( !$timecorrection ) {
+                       # fail safe - I prefer it. TomGries
+                       $timecorrection = '00:00';
+               }
+               # $PAGEEDITDATE is the time and date of the page change
+               # expressed in terms of individual local time of the notification
+               # recipient, i.e. watching user
+               $body = str_replace('$PAGEEDITDATE',
+                       $wgLang->timeanddate( $article->mTimestamp, true, false, $timecorrection ),
+                       $body);
+               
+               $error = userMailer( $to, $mail->from, $mail->subject, $body, $mail->replyto );
+               return ($error == '');
+       }
+
+} # end of class EmailNotification
 ?>