utf-8 is already converted by ja_JP extra functions.
[squirrelmail.git] / plugins / spamcop / spamcop.php
1 <?php
2 /**
3 ** spamcop.php -- SpamCop plugin
4 **
5 ** Copyright (c) 1999-2003 The SquirrelMail development team
6 ** Licensed under the GNU GPL. For full terms see the file COPYING.
7 **
8 ** $Id$
9 **/
10
11 define('SM_PATH','../../');
12
13 /* SquirrelMail required files. */
14 require_once(SM_PATH . 'include/validate.php');
15 require_once(SM_PATH . 'functions/imap.php');
16
17 function getMessage_RFC822_Attachment($message, $composeMessage, $passed_id,
18 $passed_ent_id='', $imapConnection) {
19 global $attachments, $attachment_dir, $username, $data_dir, $uid_support;
20
21 $hashed_attachment_dir = getHashedDir($username, $attachment_dir);
22 if (!$passed_ent_id) {
23 $body_a = sqimap_run_command($imapConnection,
24 'FETCH '.$passed_id.' RFC822',
25 TRUE, $response, $readmessage,
26 $uid_support);
27 } else {
28 $body_a = sqimap_run_command($imapConnection,
29 'FETCH '.$passed_id.' BODY['.$passed_ent_id.']',
30 TRUE, $response, $readmessage, $uid_support);
31 $message = $message->parent;
32 }
33 if ($response == 'OK') {
34 $subject = encodeHeader($message->rfc822_header->subject);
35 array_shift($body_a);
36 $body = implode('', $body_a) . "\r\n";
37
38 $localfilename = GenerateRandomString(32, 'FILE', 7);
39 $full_localfilename = "$hashed_attachment_dir/$localfilename";
40 $fp = fopen( $full_localfilename, 'w');
41 fwrite ($fp, $body);
42 fclose($fp);
43
44 /* dirty relative dir fix */
45 if (substr($attachment_dir,0,3) == '../') {
46 $attachment_dir = substr($attachment_dir,3);
47 $hashed_attachment_dir = getHashedDir($username, $attachment_dir);
48 }
49 $full_localfilename = "$hashed_attachment_dir/$localfilename";
50
51 $composeMessage->initAttachment('message/rfc822','email.txt',
52 $full_localfilename);
53 }
54 return $composeMessage;
55 }
56
57
58 /* GLOBALS */
59
60 sqgetGlobalVar('username', $username, SQ_SESSION);
61 sqgetGlobalVar('key', $key, SQ_COOKIE);
62 sqgetGlobalVar('onetimepad', $onetimepad, SQ_SESSION);
63
64 sqgetGlobalVar('mailbox', $mailbox, SQ_GET);
65 sqgetGlobalVar('passed_id', $passed_id, SQ_GET);
66
67 if (! sqgetGlobalVar('startMessage', $startMessage, SQ_GET) ) {
68 $startMessage = 1;
69 }
70 if (! sqgetGlobalVar('passed_ent_id', $passed_ent_id, SQ_GET) ) {
71 $passed_ent_id = '';
72 }
73
74 sqgetGlobalVar('compose_messages', $compose_messages, SQ_SESSION);
75
76 if(! sqgetGlobalVar('composesession', $composesession, SQ_SESSION) ) {
77 $composesession = 0;
78 sqsession_register($composesession, 'composesession');
79 }
80 /* END GLOBALS */
81
82
83 displayPageHeader($color, $mailbox);
84
85 $imap_stream = sqimap_login($username, $key, $imapServerAddress,
86 $imapPort, 0);
87 sqimap_mailbox_select($imap_stream, $mailbox);
88
89 if ($spamcop_method == 'quick_email' ||
90 $spamcop_method == 'thorough_email') {
91 // Use email-based reporting -- save as an attachment
92 $session = "$composesession"+1;
93 $composesession = $session;
94 sqsession_register($composesession,'composesession');
95 if (!isset($compose_messages)) {
96 $compose_messages = array();
97 }
98 if (!isset($compose_messages[$session]) || ($compose_messages[$session] == NULL)) {
99 $composeMessage = new Message();
100 $rfc822_header = new Rfc822Header();
101 $composeMessage->rfc822_header = $rfc822_header;
102 $composeMessage->reply_rfc822_header = '';
103 $compose_messages[$session] = $composeMessage;
104 sqsession_register($compose_messages,'compose_messages');
105 } else {
106 $composeMessage=$compose_messages[$session];
107 }
108
109
110 $message = sqimap_get_message($imap_stream, $passed_id, $mailbox);
111 $composeMessage = getMessage_RFC822_Attachment($message, $composeMessage, $passed_id,
112 $passed_ent_id='', $imap_stream);
113
114 $compose_messages[$session] = $composeMessage;
115 sqsession_register($compose_messages, 'compose_messages');
116
117 $fn = getPref($data_dir, $username, 'full_name');
118 $em = getPref($data_dir, $username, 'email_address');
119
120 $HowItLooks = $fn . ' ';
121 if ($em != '')
122 $HowItLooks .= '<' . $em . '>';
123 }
124
125
126 echo "<p>";
127 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.");
128 echo "</p>";
129
130 ?>
131
132 <table align="center" width="75%" border="0" cellpadding="0" cellspacing="0">
133 <tr>
134 <td align="left" valign="top">
135 <?PHP if (isset($js_web) && $js_web) {
136 ?><form method="post" action="javascript:return false">
137 <input type="button" value="Close Window"
138 onClick="window.close(); return true;">
139 <?PHP
140 } else {
141 ?><form method="post" action="../../src/right_main.php">
142 <input type="hidden" name="mailbox" value="<?PHP echo htmlspecialchars($mailbox) ?>">
143 <input type="hidden" name="startMessage" value="<?PHP echo htmlspecialchars($startMessage) ?>">
144 <input type="submit" value="Cancel / Done">
145 <?PHP
146 }
147 ?></form>
148 </td>
149 <td align="right" valign="top">
150 <?PHP if ($spamcop_method == 'thorough_email' ||
151 $spamcop_method == 'quick_email') {
152 if ($spamcop_method == 'thorough_email')
153 $report_email = 'submit.' . $spamcop_id . '@spam.spamcop.net';
154 else
155 $report_email = 'quick.' . $spamcop_id . '@spam.spamcop.net';
156 $form_action = SM_PATH . 'src/compose.php';
157 ?> <form method="post" action="<?PHP echo $form_action?>">
158 <input type="hidden" name="mailbox" value="<?PHP echo htmlspecialchars($mailbox) ?>">
159 <input type="hidden" name="spamcop_is_composing" value="<?PHP echo htmlspecialchars($passed_id) ?>">
160 <input type="hidden" name="send_to" value="<?PHP echo $report_email?>">
161 <input type="hidden" name="subject" value="reply anyway">
162 <input type="hidden" name="identity" value="0">
163 <input type="hidden" name="session" value="<?PHP echo $session?>">
164 <input type="submit" name="send" value="Send Spam Report">
165 <?PHP } else {
166 $spam_message = mime_fetch_body ($imap_stream, $passed_id, 0, 50000);
167
168 if (strlen($spam_message) == 50000) {
169 $Warning = "\n[truncated by SpamCop]\n";
170 $spam_message = substr($spam_message, 0, 50000 - strlen($Warning)) . $Warning;
171 }
172 if (isset($js_web) && $js_web) {
173 ?> <form method="post" action="http://www.spamcop.net/sc" name="submitspam"
174 enctype="multipart/form-data"><?PHP
175 } else {
176 ?> <form method="post" action="http://www.spamcop.net/sc" name="submitspam"
177 enctype="multipart/form-data" target="_blank"><?PHP
178 } ?>
179 <input type="hidden" name="action" value="submit">
180 <input type="hidden" name="oldverbose" value="1">
181 <input type="hidden" name="code" value="<?PHP echo $spamcop_id ?>">
182 <input type="hidden" name="spam" value="<?PHP echo htmlspecialchars($spam_message); ?>">
183 <input type="submit" name="x1" value="Send Spam Report">
184 <?PHP }
185 ?> </form>
186 </td>
187 </tr>
188 </table>
189 </body>
190 </html>