* Fixed unclosed <p> tag
[lhc/web/wiklou.git] / includes / SpecialEmailuser.php
index 5fac3c8..2e667d5 100644 (file)
 <?php
-
-function wfSpecialEmailuser()
-{
-       global $wgUser, $wgOut, $action, $target;
-
-       if ( 0 == $wgUser->getID() ||
-               ( false === strpos( $wgUser->getEmail(), "@" ) ) ) {
+/**
+ *
+ * @package MediaWiki
+ * @subpackage SpecialPage
+ */
+
+/**
+ *
+ */
+require_once('UserMailer.php');
+
+function wfSpecialEmailuser( $par ) {
+       global $wgUser, $wgOut, $wgRequest, $wgEnableEmail, $wgEnableUserEmail;
+
+       if( !( $wgEnableEmail && $wgEnableUserEmail ) ) {
+               $wgOut->errorpage( "nosuchspecialpage", "nospecialpagetext" );
+               return;
+       }
+       
+       if( !$wgUser->canSendEmail() ) {
+               wfDebug( "User can't send.\n" );
                $wgOut->errorpage( "mailnologin", "mailnologintext" );
                return;
        }
-       $target = wfCleanQueryVar( $target );
+       
+       $action = $wgRequest->getVal( 'action' );
+       $target = isset($par) ? $par : $wgRequest->getVal( 'target' );
        if ( "" == $target ) {
+               wfDebug( "Target is empty.\n" );
                $wgOut->errorpage( "notargettitle", "notargettext" );
                return;
        }
+       
        $nt = Title::newFromURL( $target );
-       $nu = User::newFromName( $nt->getText() );
-       $id = $nu->idForName();
-
-       if ( 0 == $id ) {
-               $wgOut->errorpage( "noemailtitle", "noemailtext" );
+       if ( is_null( $nt ) ) {
+               wfDebug( "Target is invalid title.\n" );
+               $wgOut->errorpage( "notargettitle", "notargettext" );
                return;
        }
-       $nu->setID( $id );
-       $address = $nu->getEmail();
-
-       if ( ( false === strpos( $address, "@" ) ) ||
-         ( 1 == $nu->getOption( "disablemail" ) ) ) {
+       
+       $nu = User::newFromName( $nt->getText() );
+       if( is_null( $nu ) || !$nu->canReceiveEmail() ) {
+               wfDebug( "Target is invalid user or can't receive.\n" );
                $wgOut->errorpage( "noemailtitle", "noemailtext" );
                return;
        }
-       $fields = array( "wpSubject", "wpText" );
-       wfCleanFormFields( $fields );
-
-       $f = new EmailUserForm( $nu->getName() . " <{$address}>" );
 
-       if ( "success" == $action ) { $f->showSuccess(); }
-       else if ( "submit" == $action ) { $f->doSubmit(); }
-       else { $f->showForm( "" ); }
+       $address = $nu->getEmail();
+       $f = new EmailUserForm( $nu->getName() . " <{$address}>", $target );
+
+       if ( "success" == $action ) {
+               $f->showSuccess();
+       } else if ( "submit" == $action && $wgRequest->wasPosted() &&
+               $wgUser->matchEditToken( $wgRequest->getVal( 'wpEditToken' ) ) ) {
+               $f->doSubmit();
+       } else {
+               $f->showForm();
+       }
 }
 
+/**
+ * @todo document
+ * @package MediaWiki
+ * @subpackage SpecialPage
+ */
 class EmailUserForm {
 
        var $mAddress;
+       var $target;
+       var $text, $subject;
 
-       function EmailUserForm( $addr )
-       {
+       function EmailUserForm( $addr, $target ) {
+               global $wgRequest;
                $this->mAddress = $addr;
+               $this->target = $target;
+               $this->text = $wgRequest->getText( 'wpText' );
+               $this->subject = $wgRequest->getText( 'wpSubject' );
        }
 
-       function showForm( $err )
-       {
+       function showForm() {
                global $wgOut, $wgUser, $wgLang;
-               global $wpSubject, $wpText, $target;
 
                $wgOut->setPagetitle( wfMsg( "emailpage" ) );
                $wgOut->addWikiText( wfMsg( "emailpagetext" ) );
 
-               if ( ! $wpSubject ) { $wpSubject = wfMsg( "defemailsubject" ); }
+               if ( $this->subject === "" ) { 
+                       $this->subject = wfMsg( "defemailsubject" ); 
+               }
 
                $emf = wfMsg( "emailfrom" );
                $sender = $wgUser->getName();
                $emt = wfMsg( "emailto" );
-               $rcpt = str_replace( "_", " ", urldecode( $target ) );
+               $rcpt = str_replace( "_", " ", $this->target );
                $emr = wfMsg( "emailsubject" );
                $emm = wfMsg( "emailmessage" );
                $ems = wfMsg( "emailsend" );
-
-               $action = wfLocalUrlE( $wgLang->specialPage( "Emailuser" ),
-                 "target={$target}&action=submit" );
-
-               if ( "" != $err ) {
-                       $wgOut->setSubtitle( wfMsg( "formerror" ) );
-                       $wgOut->addHTML( "<p><font color='red' size='+1'>{$err}</font>\n" );
-               }
-               $wgOut->addHTML( "<p>
+               $encSubject = htmlspecialchars( $this->subject );
+               
+               $titleObj = Title::makeTitle( NS_SPECIAL, "Emailuser" );
+               $action = $titleObj->escapeLocalURL( "target=" .
+                       urlencode( $this->target ) . "&action=submit" );
+               $token = $wgUser->editToken();
+
+               $wgOut->addHTML( "
 <form id=\"emailuser\" method=\"post\" action=\"{$action}\">
-<table border=0><tr>
-<td align=right>{$emf}:</td>
-<td align=left><strong>{$sender}</strong></td>
+<table border='0'><tr>
+<td align='right'>{$emf}:</td>
+<td align='left'><strong>" . htmlspecialchars( $sender ) . "</strong></td>
 </tr><tr>
-<td align=right>{$emt}:</td>
-<td align=left><strong>{$rcpt}</strong></td>
+<td align='right'>{$emt}:</td>
+<td align='left'><strong>" . htmlspecialchars( $rcpt ) . "</strong></td>
 </tr><tr>
-<td align=right>{$emr}:</td>
-<td align=left>
-<input type=text name=\"wpSubject\" value=\"{$wpSubject}\">
+<td align='right'>{$emr}:</td>
+<td align='left'>
+<input type='text' name=\"wpSubject\" value=\"{$encSubject}\" />
 </td>
 </tr><tr>
-<td align=right>{$emm}:</td>
-<td align=left>
-<textarea name=\"wpText\" rows=10 cols=60 wrap=virtual>
-{$wpText}
-</textarea>
+<td align='right'>{$emm}:</td>
+<td align='left'>
+<textarea name=\"wpText\" rows='10' cols='60' wrap='virtual'>" . htmlspecialchars( $this->text ) .
+"</textarea>
 </td></tr><tr>
-<td>&nbsp;</td><td align=left>
-<input type=submit name=\"wpSend\" value=\"{$ems}\">
+<td>&nbsp;</td><td align='left'>
+<input type='submit' name=\"wpSend\" value=\"{$ems}\" />
 </td></tr></table>
+<input type='hidden' name='wpEditToken' value=\"$token\" />
 </form>\n" );
 
        }
 
-       function doSubmit()
-       {
+       function doSubmit() {
                global $wgOut, $wgUser, $wgLang, $wgOutputEncoding;
-               global $wpSubject, $wpText, $target;
            
                $from = wfQuotedPrintable( $wgUser->getName() ) . " <" . $wgUser->getEmail() . ">";
-           $to = wfQuotedPrintable( $this->mAddress );
-
-               $headers =
-                       "MIME-Version: 1.0\r\n" .
-                       "Content-type: text/plain; charset={$wgOutputEncoding}\r\n" .
-                       "Content-transfer-encoding: 8bit\r\n" .
-                       "From: {$from}\r\n" .
-                       "Reply-To: {$from}\r\n" .
-                       "To: {$to}\r\n" .
-                       "X-Mailer: MediaWiki interuser e-mailer";
-               mail( $this->mAddress, wfQuotedPrintable( $wpSubject ), $wpText, $headers );
-
-
-               $success = wfLocalUrl( $wgLang->specialPage( "Emailuser" ),
-                 "target={$target}&action=success" );
-               $wgOut->redirect( $success );
+               $subject = wfQuotedPrintable( $this->subject );
+               
+               if (wfRunHooks('EmailUser', array(&$this->mAddress, &$from, &$subject, &$this->text))) {
+                       
+                       $mailResult = userMailer( $this->mAddress, $from, $subject, $this->text );
+                       
+                       if( WikiError::isError( $mailResult ) ) {
+                               $wgOut->addHTML( wfMsg( "usermailererror" ) . $mailResult);
+                       } else {
+                               $titleObj = Title::makeTitle( NS_SPECIAL, "Emailuser" );
+                               $encTarget = wfUrlencode( $this->target );
+                               $wgOut->redirect( $titleObj->getFullURL( "target={$encTarget}&action=success" ) );
+                               wfRunHooks('EmailUserComplete', array($this->mAddress, $from, $subject, $this->text));
+                       }
+               }
        }
 
-       function showSuccess()
-       {
+       function showSuccess() {
                global $wgOut, $wgUser;
 
                $wgOut->setPagetitle( wfMsg( "emailsent" ) );