Adding support for spamcop member service.
[squirrelmail.git] / plugins / spamcop / spamcop.php
index f43543b0ad4419b5eb14dea9ca481b1b94342c0c..02456ff5d637e40ed3300fb03cdee774cbc344eb 100644 (file)
 <?php
+   /** 
+    **  spamcop.php -- SpamCop plugin           
+    **
+    **  Copyright (c) 1999-2003 The SquirrelMail development team
+    **  Licensed under the GNU GPL. For full terms see the file COPYING.
+    **  
+    **  $Id$
+    * @package plugins
+    * @subpackage spamcop
+    **/
 
+/** @ignore */
 define('SM_PATH','../../');
 
  /* SquirrelMail required files. */
 require_once(SM_PATH . 'include/validate.php');
 require_once(SM_PATH . 'functions/imap.php');
-    
-    displayPageHeader($color, $mailbox);
+
+/**
+ * Stores message in attachment directory, when email based reports are used
+ */
+function getMessage_RFC822_Attachment($message, $composeMessage, $passed_id, 
+                                      $passed_ent_id='', $imapConnection) {
+    global $attachments, $attachment_dir, $username, $data_dir, $uid_support;
+
+    $hashed_attachment_dir = getHashedDir($username, $attachment_dir);
+    if (!$passed_ent_id) {
+        $body_a = sqimap_run_command($imapConnection, 
+                                    'FETCH '.$passed_id.' RFC822',
+                                    TRUE, $response, $readmessage, 
+                                    $uid_support);
+    } else {
+        $body_a = sqimap_run_command($imapConnection, 
+                                     'FETCH '.$passed_id.' BODY['.$passed_ent_id.']',
+                                     TRUE, $response, $readmessage, $uid_support);
+        $message = $message->parent;
+    }
+    if ($response == 'OK') {
+        $subject = encodeHeader($message->rfc822_header->subject);
+        array_shift($body_a);
+        $body = implode('', $body_a) . "\r\n";
+                
+        $localfilename = GenerateRandomString(32, 'FILE', 7);
+        $full_localfilename = "$hashed_attachment_dir/$localfilename";
+        $fp = fopen( $full_localfilename, 'w');
+        fwrite ($fp, $body);
+        fclose($fp);
+       
+        /* dirty relative dir fix */
+        if (substr($attachment_dir,0,3) == '../') {
+          $attachment_dir = substr($attachment_dir,3);
+          $hashed_attachment_dir = getHashedDir($username, $attachment_dir);
+        }
+       $full_localfilename = "$hashed_attachment_dir/$localfilename";
+
+       $composeMessage->initAttachment('message/rfc822','email.txt', 
+                        $full_localfilename);
+    }
+    return $composeMessage;
+}
+
+
+/* GLOBALS */
+
+sqgetGlobalVar('username', $username, SQ_SESSION);
+sqgetGlobalVar('key',      $key,      SQ_COOKIE);
+sqgetGlobalVar('onetimepad', $onetimepad, SQ_SESSION);
+
+sqgetGlobalVar('mailbox', $mailbox, SQ_GET);
+sqgetGlobalVar('passed_id', $passed_id, SQ_GET);
+sqgetGlobalVar('js_web', $js_web, SQ_GET);
+
+if (! sqgetGlobalVar('startMessage', $startMessage, SQ_GET) ) {
+    $startMessage = 1;
+}
+if (! sqgetGlobalVar('passed_ent_id', $passed_ent_id, SQ_GET) ) {
+    $passed_ent_id = 0;
+}
+if (! sqgetGlobalVar('js_web', $js_web, SQ_GET) ) {
+    $js_web = 0;
+}
+
+sqgetGlobalVar('compose_messages', $compose_messages, SQ_SESSION);
+
+if(! sqgetGlobalVar('composesession', $composesession, SQ_SESSION) ) {
+    $composesession = 0;
+    sqsession_register($composesession, 'composesession');
+}
+/* END GLOBALS */
+
+// js_web variable is 1 only when link opens web based report page in new window
+// and in new window menu line or extra javascript code is not needed.
+if ($js_web) {
+  displayHTMLHeader('SpamCop reporting');
+  echo "<body text=\"$color[8]\" bgcolor=\"$color[4]\" link=\"$color[7]\" vlink=\"$color[7]\" alink=\"$color[7]\">\n";
+} else {
+  displayPageHeader($color,$mailbox);
+}
 
     $imap_stream = sqimap_login($username, $key, $imapServerAddress, 
        $imapPort, 0);
     sqimap_mailbox_select($imap_stream, $mailbox);
-    $sid = sqimap_session_id($uid_support)
-    fputs($imap_stream, '$sid FETCH ' . $passed_id . ' RFC822' . "\r\n");
-    
-    $read = sqimap_read_data($imap_stream, $sid, true, $response, $message);
-    array_shift($read);
 
     if ($spamcop_method == 'quick_email' || 
         $spamcop_method == 'thorough_email') {
        // Use email-based reporting -- save as an attachment
-       if(!isset($composesession)) {
-        $composesession = 0;
-        session_register('composesession');
+       $session = "$composesession"+1;
+       $composesession = $session;
+       sqsession_register($composesession,'composesession');
+       if (!isset($compose_messages)) {
+          $compose_messages = array();
        }
-       if (!isset($session)) {
-         $session = "$composesession" +1;
-           $composesession = $session;
+       if (!isset($compose_messages[$session]) || ($compose_messages[$session] == NULL)) {
+          $composeMessage = new Message();
+          $rfc822_header = new Rfc822Header();
+          $composeMessage->rfc822_header = $rfc822_header;
+          $composeMessage->reply_rfc822_header = '';
+          $compose_messages[$session] = $composeMessage;
+          sqsession_register($compose_messages,'compose_messages');  
+       } else {
+          $composeMessage=$compose_messages[$session];
        }
 
-       if (!isset($attachments)) {
-          $attachments = array();
-          session_register('attachments');
-       }
-    
-       foreach ($attachments as $info) {
-          if (file_exists($attachment_dir . $info['localfilename']))
-             unlink($attachment_dir . $info['localfilename']);
-       }
-       $attachments = array();
-
-       $file = GenerateRandomString(32, '', 7);
-       while (file_exists($attachment_dir . $file))
-           $file = GenerateRandomString(32, '', 7);
-       $newAttachment['localfilename'] = $file;
-       $newAttachment['remotefilename'] = 'email.txt';
-       $newAttachment['type'] = 'message/rfc822';
-       $newAttachment['session'] = $session;
-       $fp = fopen($attachment_dir . $file, 'w');
-       foreach ($read as $line) {
-          fputs($fp, $line);
-       }
-       $attachments[] = $newAttachment;
-    
-       $fn = getPref($data_dir, $username, 'full_name');
-       $em = getPref($data_dir, $username, 'email_address');
-    
-       $HowItLooks = $fn . ' ';
-       if ($em != '')
+
+        $message = sqimap_get_message($imap_stream, $passed_id, $mailbox);
+        $composeMessage = getMessage_RFC822_Attachment($message, $composeMessage, $passed_id, 
+                                      $passed_ent_id, $imap_stream);
+
+       $compose_messages[$session] = $composeMessage;
+       sqsession_register($compose_messages, 'compose_messages');
+
+        $fn = getPref($data_dir, $username, 'full_name');
+        $em = getPref($data_dir, $username, 'email_address');
+
+        $HowItLooks = $fn . ' ';
+        if ($em != '')
           $HowItLooks .= '<' . $em . '>';
-    }
+     }
 
-?>
 
-<p>Sending this spam report will give you back a reply with URLs that you
-can click on to properly report this spam message to the proper authorities.
-This is a free service.  By pressing the "Send Spam Report" button, you
-agree to follow SpamCop's rules/terms of service/etc.</p>
+echo "<p>";
+echo _("Sending this spam report will give you back a reply with URLs that you can click on to properly report this spam message to the proper authorities. This is a free service.  By pressing the \"Send Spam Report\" button, you agree to follow SpamCop's rules/terms of service/etc.");
+echo "</p>";
+
+?>
 
-<table align=center width="75%" border=0 cellpadding=0 cellspacing=0>
+<table align="center" width="75%" border="0" cellpadding="0" cellspacing="0">
 <tr>
-<td align=left valign=top>
+<td align="left" valign="top">
 <?PHP if (isset($js_web) && $js_web) {
-   ?><form method=post action="javascript:return false">
-  <input type=button value="Close Window" 
+   ?><form method="post" action="javascript:return false">
+  <input type="button" value="Close Window" 
   onClick="window.close(); return true;">
    <?PHP
 } else {
-   ?><form method=post action="../../src/right_main.php">
-  <input type=hidden name="mailbox" value="<?PHP echo
-     htmlspecialchars($mailbox) ?>">
-  <input type=hidden name="startMessage" value="<?PHP echo
-     htmlspecialchars($startMessage) ?>">
-  <input type=submit value="Cancel / Done">
+   ?><form method="post" action="../../src/right_main.php">
+  <input type="hidden" name="mailbox" value="<?PHP echo htmlspecialchars($mailbox) ?>">
+  <input type="hidden" name="startMessage" value="<?PHP echo htmlspecialchars($startMessage) ?>">
+  <input type="submit" value="Cancel / Done">
    <?PHP
 }
   ?></form>
 </td>
-<td align=right valign=top>
+<td align="right" valign="top">
 <?PHP if ($spamcop_method == 'thorough_email' ||
           $spamcop_method == 'quick_email') {
    if ($spamcop_method == 'thorough_email')
       $report_email = 'submit.' . $spamcop_id . '@spam.spamcop.net';
    else
       $report_email = 'quick.' . $spamcop_id . '@spam.spamcop.net';
-?>  <form method=post action="../../src/compose.php">
-  <input type=hidden name="mailbox" value="<?PHP echo
-     htmlspecialchars($mailbox) ?>">
-  <input type=hidden name="spamcop_is_composing" value="<?PHP echo
-     htmlspecialchars($passed_id) ?>">
-  <input type=hidden name="send_to" value="<?PHP echo $report_email ?>">
-  <input type=hidden name="send_to_cc" value="">
-  <input type=hidden name="send_to_bcc" value="">
-  <input type=hidden name="subject" value="reply anyway">
-  <input type=hidden name="identity" value="default">
-  <input type=hidden name="session" value="<?PHP echo $session?>">
-  <input type=submit name="send" value="Send Spam Report">
+   $form_action = SM_PATH . 'src/compose.php';
+?>  <form method="post" action="<?PHP echo $form_action?>">
+  <input type="hidden" name="mailbox" value="<?PHP echo htmlspecialchars($mailbox) ?>">
+  <input type="hidden" name="spamcop_is_composing" value="<?PHP echo htmlspecialchars($passed_id) ?>">
+  <input type="hidden" name="send_to" value="<?PHP echo $report_email?>">
+  <input type="hidden" name="subject" value="reply anyway">
+  <input type="hidden" name="identity" value="0">
+  <input type="hidden" name="session" value="<?PHP echo $session?>">
+  <input type="submit" name="send" value="Send Spam Report">
 <?PHP } else {
-   $Message = implode('', $read);
-   if (strlen($Message) > 50000) {
+   $spam_message = mime_fetch_body ($imap_stream, $passed_id, $passed_ent_id, 50000);
+
+   if (strlen($spam_message) == 50000) {
       $Warning = "\n[truncated by SpamCop]\n";
-      $Message = substr($Message, 0, 50000 - strlen($Warning)) . $Warning;
+      $spam_message = substr($spam_message, 0, 50000 - strlen($Warning)) . $Warning;
+   }
+   if ($spamcop_type=='member') {
+     $action_url="http://members.spamcop.net/sc";
+   } else {
+     $action_url="http://www.spamcop.net/sc";
    }
    if (isset($js_web) && $js_web) {
-?>  <form method=post action="http://spamcop.net/sc" name="submitspam"
-    enctype="multipart/form-data"><?PHP
+     echo "<form method=\"post\" action=\"$action_url\" name=\"submitspam\"".
+       " enctype=\"multipart/form-data\">\n";
    } else {
-?>  <form method=post action="http://spamcop.net/sc" name="submitspam"
-    enctype="multipart/form-data" target="_blank"><?PHP
+     echo "<form method=\"post\" action=\"$action_url\" name=\"submitspam\"".
+       " enctype=\"multipart/form-data\" target=\"_blank\">\n";
    } ?>
-  <input type=hidden name=action value=submit>
-  <input type=hidden name=oldverbose value=1>
-  <input type=hidden name=code value="<?PHP echo $spamcop_id ?>">
-  <input type=hidden name=spam value="<?PHP
-          echo htmlspecialchars($Message);
-  ?>">
-  <input type=submit name="x1" value="Send Spam Report">
+  <input type="hidden" name="action" value="submit">
+  <input type="hidden" name="oldverbose" value="1">
+  <input type="hidden" name="code" value="<?PHP echo $spamcop_id ?>">
+  <input type="hidden" name="spam" value="<?PHP echo htmlspecialchars($spam_message); ?>">
+  <input type="submit" name="x1" value="Send Spam Report">
 <?PHP }
 ?>  </form>
 </td>