6c523a4219a0459e68c5b27b7b1da33710cfbda9
[squirrelmail.git] / plugins / spamcop / setup.php
1 <?php
2 /**
3 ** setup.php -- SpamCop plugin
4 **
5 ** Copyright (c) 1999-2002 The SquirrelMail development team
6 ** Licensed under the GNU GPL. For full terms see the file COPYING.
7 **
8 ** $Id$
9 **/
10
11 /* Initialize the plugin */
12 function squirrelmail_plugin_init_spamcop() {
13 global $squirrelmail_plugin_hooks, $data_dir, $username,
14 $spamcop_is_composing;
15
16 $squirrelmail_plugin_hooks['optpage_register_block']['spamcop'] =
17 'spamcop_options';
18 $squirrelmail_plugin_hooks['loading_prefs']['spamcop'] =
19 'spamcop_load';
20 $squirrelmail_plugin_hooks['read_body_header_right']['spamcop'] =
21 'spamcop_show_link';
22
23 sqextractGlobalVar('spamcop_is_composing');
24
25 if (isset($spamcop_is_composing)) {
26 $squirrelmail_plugin_hooks['compose_send']['spamcop'] =
27 'spamcop_while_sending';
28 }
29 }
30
31
32 // Load the settings
33 // Validate some of it (make '' into 'default', etc.)
34 function spamcop_load() {
35 global $username, $data_dir, $spamcop_enabled, $spamcop_delete,
36 $spamcop_method, $spamcop_id;
37
38 $spamcop_enabled = getPref($data_dir, $username, 'spamcop_enabled');
39 $spamcop_delete = getPref($data_dir, $username, 'spamcop_delete');
40 $spamcop_method = getPref($data_dir, $username, 'spamcop_method');
41 $spamcop_id = getPref($data_dir, $username, 'spamcop_id');
42 if ($spamcop_method == '') {
43 if (getPref($data_dir, $username, 'spamcop_form'))
44 $spamcop_method = 'web_form';
45 else
46 $spamcop_method = 'thorough_email';
47 setPref($data_dir, $username, 'spamcop_method', $spamcop_method);
48 }
49 if ($spamcop_id == '')
50 $spamcop_enabled = 0;
51 }
52
53
54 // Show the link on the read-a-message screen
55 function spamcop_show_link() {
56 global $spamcop_enabled, $spamcop_method;
57
58 if (! $spamcop_enabled)
59 return;
60
61 /* GLOBALS */
62 $passed_id = $_GET['passed_id'];
63 $mailbox = $_GET['mailbox'];
64 $startMessage = $_GET['startMessage'];
65 /* END GLOBALS */
66
67 echo "<br>\n";
68
69 if ($spamcop_method == 'web_form') {
70 ?><script language=javascript>
71 document.write('<a href="../plugins/spamcop/spamcop.php?passed_id=<?PHP
72 echo urlencode($passed_id); ?>&js_web=1&mailbox=<?PHP
73 echo urlencode($mailbox); ?>" target="_blank">');
74 document.write("<?PHP echo _("Report as Spam"); ?>");
75 document.write("</a>");
76 </script><noscript>
77 <a href="../plugins/spamcop/spamcop.php?passed_id=<?PHP
78 echo urlencode($passed_id); ?>&mailbox=<?PHP
79 echo urlencode($mailbox); ?>&startMessage=<?PHP
80 echo urlencode($startMessage); ?>"><?PHP
81 echo _("Report as Spam"); ?></a>
82 </noscript><?PHP
83 } else {
84 ?><a href="../plugins/spamcop/spamcop.php?passed_id=<?PHP
85 echo urlencode($passed_id); ?>&mailbox=<?PHP
86 echo urlencode($mailbox); ?>&startMessage=<?PHP
87 echo urlencode($startMessage); ?>"><?PHP
88 echo _("Report as Spam"); ?></a><?PHP
89 }
90 }
91
92
93 // Show the link to our own custom options page
94 function spamcop_options()
95 {
96 global $optpage_blocks;
97
98 $optpage_blocks[] = array(
99 'name' => _("SpamCop - Spam Reporting"),
100 'url' => '../plugins/spamcop/options.php',
101 'desc' => _("Help fight the battle against unsolicited email. SpamCop reads the spam email and determines the correct addresses to send complaints to. Quite fast, really smart, and easy to use."),
102 'js' => false
103 );
104 }
105
106
107 // When we send the email, we optionally trash it then too
108 function spamcop_while_sending()
109 {
110 global $mailbox, $spamcop_delete, $spamcop_is_composing, $auto_expunge,
111 $username, $key, $imapServerAddress, $imapPort;
112
113 if ($spamcop_delete) {
114 $imapConnection = sqimap_login($username, $key, $imapServerAddress,
115 $imapPort, 0);
116 sqimap_mailbox_select($imapConnection, $mailbox);
117 sqimap_messages_delete($imapConnection, $spamcop_is_composing,
118 $spamcop_is_composing, $mailbox);
119 if ($auto_expunge)
120 sqimap_mailbox_expunge($imapConnection, $mailbox, true);
121 }
122 }
123
124 ?>