plugins/delete_move_next/setup.php

   1 <?php
   2
   3 /**
   4  * setup.php
   5  *
   6  * delete_move_next
   7  *   deletes or moves currently displayed message and displays
   8  *   next or previous message.
   9  *
  10  * Copyright (c) 1999-2003 The SquirrelMail Project Team
  11  * Licensed under the GNU GPL. For full terms see the file COPYING.
  12  *
  13  * $Id$
  14  */
  15
  16 function squirrelmail_plugin_init_delete_move_next() {
  17     global $squirrelmail_plugin_hooks;
  18
  19     $squirrelmail_plugin_hooks['html_top']['delete_move_next'] = 'delete_move_next_action';
  20     $squirrelmail_plugin_hooks['right_main_after_header']['delete_move_next'] = 'delete_move_next_action';
  21     $squirrelmail_plugin_hooks['read_body_bottom']['delete_move_next'] = 'delete_move_next_read_b';
  22     $squirrelmail_plugin_hooks['read_body_menu_bottom']['delete_move_next'] = 'delete_move_next_read_t';
  23     $squirrelmail_plugin_hooks['options_display_inside']['delete_move_next'] = 'delete_move_next_display_inside';
  24     $squirrelmail_plugin_hooks['options_display_save']['delete_move_next'] = 'delete_move_next_display_save';
  25     $squirrelmail_plugin_hooks['loading_prefs']['delete_move_next'] = 'delete_move_next_loading_prefs';
  26 }
  27
  28
  29 /* fixes the sort_array for the prev_del/next_del links when
  30  * using server side sorting or thread sorting
  31  */
  32
  33 function fix_sort_array () {
  34     global $username, $data_dir, $allow_server_sort, $allow_thread_sort,
  35     $thread_sort_messages,
  36     $mailbox, $imapConnection, $sort, $uid_support, $mbx_response;
  37
  38     // Got to grab this out of prefs, since it isn't saved from mailbox_view.php
  39     if ($allow_thread_sort) {
  40         $thread_sort_messages = getPref($data_dir, $username, "thread_$mailbox",0);
  41     }
  42
  43     switch (true) {
  44       case ($allow_thread_sort && $thread_sort_messages):
  45           $server_sort_array = get_thread_sort($imapConnection);
  46           break;
  47       case ($allow_server_sort):
  48           $server_sort_array = sqimap_get_sort_order($imapConnection, $sort, $mbx_response);
  49           break;
  50       case ($uid_support):
  51           $server_sort_array = sqimap_get_php_sort_order($imapConnection, $mbx_response);
  52           break;
  53       default:
  54           break;
  55     }
  56 }
  57
  58 /*
  59  * Warning: this function relies on the internal representation of
  60  * of the message cache for the current mailbox. As such, it is fragile
  61  * because the underlying implementation can change. I will present it
  62  * to the squirrelmail maintainers as a proposed addition to the API,
  63  * perhaps even as inline code to sqimap_mailbox_expunge(). In the
  64  * meantime, you have been warned. [alane@geeksrus.net 2001/05/06]
  65  */
  66
  67 function delete_move_del_arr_elem($arr, $index) {
  68     $tmp = array();
  69     $j = 0;
  70     foreach ($arr as $v) {
  71         if ($j != $index) {
  72            $tmp[] = $v;
  73          }
  74          $j++;
  75     }
  76     return $tmp;
  77 }
  78
  79 function delete_move_show_msg_array() {
  80     global $msort, $msgs;
  81     $keys = array_keys($msort);
  82     for ($i = 0; $i < count($keys); $i++) {
  83         echo '<p>key ' . $keys[$i] . ' msgid ' . $msgs[$keys[$i]]['ID'] . '</p>';
  84     }
  85 }
  86
  87
  88 function delete_move_expunge_from_all($id) {
  89     global $msgs, $msort, $sort, $imapConnection, $mailbox, $uid_support;
  90     $delAt = -1;
  91     for ($i = 0; $i < count($msort); $i++) {
  92         if ($msgs[$i]['ID'] == $id) {
  93             $delAt = $i;
  94         } elseif ($msgs[$i]['ID'] > $id) {
  95             if (!$uid_support) {
  96                $msgs[$i]['ID']--;
  97             }
  98         }
  99     }
 100
 101     $msgs = delete_move_del_arr_elem($msgs, $delAt);
 102     $msort = delete_move_del_arr_elem($msort, $delAt);
 103     if ($sort < 6) {
 104         if ($sort % 2) {
 105             asort($msort);
 106         } else {
 107             arsort($msort);
 108         }
 109     }
 110     sqsession_register($msgs, 'msgs');
 111     sqsession_register($msort, 'msort');
 112
 113     sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 114 }
 115
 116 function delete_move_next_action() {
 117
 118     global $PHP_SELF;
 119
 120     if ( !check_php_version(4,1) ) {
 121         global $_GET, $_POST;
 122     }
 123
 124     if (isset($_GET['delete_id'])) {
 125         $delete_id = $_GET['delete_id'];
 126     }
 127     if (isset($_POST['move_id'])) {
 128         $move_id = $_POST['move_id'];
 129     }
 130
 131     if (isset($delete_id)) {
 132         delete_move_next_delete();
 133         fix_sort_array();
 134     } elseif (isset($move_id)) {
 135         delete_move_next_move();
 136         fix_sort_array();
 137     }
 138
 139 }
 140
 141 function delete_move_next_read_t() {
 142
 143     global $delete_move_next_t;
 144
 145     if($delete_move_next_t == 'on') {
 146         delete_move_next_read('top');
 147     }
 148 }
 149
 150 function delete_move_next_read_b() {
 151
 152     global $delete_move_next_b;
 153
 154     if ($delete_move_next_b != 'off') {
 155         delete_move_next_read('bottom');
 156     }
 157 }
 158
 159
 160 function delete_move_next_read($currloc) {
 161     global $delete_move_next_formATtop, $delete_move_next_formATbottom,
 162            $color, $where, $what, $currentArrayIndex, $passed_id,
 163            $mailbox, $sort, $startMessage, $delete_id, $move_id,
 164            $imapConnection, $auto_expunge, $move_to_trash, $mbx_response,
 165            $uid_support, $passed_ent_id;
 166
 167     $urlMailbox = urlencode($mailbox);
 168
 169     if (!isset($passed_ent_id)) $passed_ent_id = 0;
 170
 171     if (!(($where && $what) || ($currentArrayIndex == -1)) && !$passed_ent_id) {
 172         $next = findNextMessage($passed_id);
 173         $prev = findPreviousMessage($mbx_response['EXISTS'], $passed_id);
 174         $prev_if_del = $prev;
 175         $next_if_del = $next;
 176         if (!$uid_support && ($auto_expunge || $move_to_trash)) {
 177             if ($prev_if_del > $passed_id) {
 178                 $prev_if_del--;
 179             }
 180             if ($next_if_del > $passed_id) {
 181                 $next_if_del--;
 182             }
 183         }
 184
 185         /* Base is illegal within documents
 186         * $location = get_location();
 187         * echo "<base href=\"$location/\">" . */
 188         echo '<table cellspacing=0 width="100%" border=0 cellpadding=2>'.
 189              '<tr>'.
 190                  "<td bgcolor=\"$color[9]\" width=\"100%\" align=center><small>";
 191
 192         if ($prev > 0){
 193             echo "<a href=\"read_body.php?passed_id=$prev_if_del&amp;mailbox=$urlMailbox&amp;sort=$sort&amp;startMessage=$startMessage&amp;show_more=0&amp;delete_id=$passed_id\">" . _("Delete & Prev") . "</a>" . "&nbsp;|&nbsp;\n";
 194         }
 195         else {
 196             echo _("Delete & Prev") . "&nbsp;|&nbsp;";
 197         }
 198         if ($next > 0){
 199             echo "<a href=\"read_body.php?passed_id=$next_if_del&amp;mailbox=$urlMailbox&amp;sort=$sort&amp;startMessage=$startMessage&amp;show_more=0&amp;delete_id=$passed_id\">" . _("Delete & Next") . "</a>\n";
 200         } else {
 201             echo _("Delete & Next");
 202         }
 203         echo '</small></td></tr>';
 204
 205         if ($next_if_del < 0) {
 206             $next_if_del = $prev_if_del;
 207         }
 208         if (($delete_move_next_formATtop == 'on') && ($currloc == 'top')) {
 209             if ($next_if_del > 0) {
 210                 delete_move_next_moveNextForm($next_if_del);
 211             } else {
 212                 delete_move_next_moveRightMainForm();
 213             }
 214         }
 215         if (($delete_move_next_formATbottom != 'off') && ($currloc == 'bottom')) {
 216             if ($next_if_del > 0) {
 217                 delete_move_next_moveNextForm($next_if_del);
 218             } else {
 219                 delete_move_next_moveRightMainForm();
 220             }
 221         }
 222         echo '</table>';
 223     }
 224 }
 225
 226 function get_move_target_list() {
 227     global $imapConnection, $lastTargetMailbox;
 228     if (isset($lastTargetMailbox) && !empty($lastTargetMailbox)) {
 229         echo sqimap_mailbox_option_list($imapConnection, array(strtolower($lastTargetMailbox)));
 230     }
 231     else {
 232         echo sqimap_mailbox_option_list($imapConnection);
 233     }
 234 }
 235
 236 function delete_move_next_moveNextForm($next) {
 237
 238     global $color, $where, $what, $currentArrayIndex, $passed_id,
 239            $mailbox, $sort, $startMessage, $delete_id, $move_id,
 240            $imapConnection;
 241
 242     echo '<tr>'.
 243          "<td bgcolor=\"$color[9]\" width=\"100%\" align=\"center\">".
 244            '<form action="read_body.php" method="post"><small>'.
 245             "<input type=\"hidden\" name=\"passed_id\" value=\"$next\">".
 246             "<input type=\"hidden\" name=\"mailbox\" value=\"".$mailbox."\">".
 247             "<input type=\"hidden\" name=\"sort\" value=\"$sort\">".
 248             "<input type=\"hidden\" name=\"startMessage\" value=\"$startMessage\">".
 249             "<input type=\"hidden\" name=\"show_more\" value=\"0\">".
 250             "<input type=\"hidden\" name=\"move_id\" value=\"$passed_id\">".
 251             _("Move to:") .
 252             ' <select name="targetMailbox">';
 253     get_move_target_list();
 254     echo    '</select> '.
 255             '<input type="submit" value="' . _("Move") . '">'.
 256             '</small>'.
 257            '</form>'.
 258          '</td>'.
 259          '</tr>';
 260
 261 }
 262 function delete_move_next_moveRightMainForm() {
 263
 264     global $color, $where, $what, $currentArrayIndex, $passed_id,
 265            $mailbox, $sort, $startMessage, $delete_id, $move_id,
 266            $imapConnection;
 267
 268     echo '<tr>' .
 269             "<td bgcolor=\"$color[9]\" width=\"100%\" align=\"center\">".
 270             '<form action="right_main.php" method="post"><small>' .
 271             "<input type=\"hidden\" name=\"mailbox\" value=\"".$mailbox."\">".
 272             "<input type=\"hidden\" name=\"sort\" value=\"$sort\">".
 273             "<input type=\"hidden\" name=\"startMessage\" value=\"$startMessage\">".
 274             "<input type=\"hidden\" name=\"move_id\" value=\"$passed_id\">".
 275             _("Move to:") .
 276             ' <select name="targetMailbox">';
 277     get_move_target_list();
 278     echo    ' </select>' .
 279             '<input type=submit value="' . _("Move") . '">'.
 280             '</small>'.
 281          '</form>' .
 282          '</td>'.
 283          '</tr>';
 284
 285 }
 286
 287
 288 function delete_move_next_delete() {
 289     global $imapConnection, $auto_expunge;
 290
 291     if ( !check_php_version(4,1) ) {
 292         global $_GET;
 293     }
 294
 295     $delete_id = $_GET['delete_id'];
 296     $mailbox = $_GET['mailbox'];
 297
 298     sqimap_messages_delete($imapConnection, $delete_id, $delete_id, $mailbox);
 299     if ($auto_expunge) {
 300         delete_move_expunge_from_all($delete_id);
 301         // sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 302     }
 303 }
 304
 305 function delete_move_next_move() {
 306     global $imapConnection, $mailbox, $auto_expunge, $lastTargetMailbox;
 307
 308     if ( !check_php_version(4,1) ) {
 309         global $_POST;
 310     }
 311
 312     $move_id = $_POST['move_id'];
 313     $mailbox = $_POST['mailbox'];
 314     $targetMailbox = $_POST['targetMailbox'];
 315
 316     // Move message
 317     sqimap_messages_copy($imapConnection, $move_id, $move_id, $targetMailbox);
 318     sqimap_messages_flag($imapConnection, $move_id, $move_id, 'Deleted', true);
 319     if ($auto_expunge) {
 320         delete_move_expunge_from_all($move_id);
 321         // sqimap_mailbox_expunge($imapConnection, $mailbox, true);
 322     }
 323
 324     if ($targetMailbox != $lastTargetMailbox) {
 325         $lastTargetMailbox = $targetMailbox;
 326         sqsession_register('lastTargetMailbox' , $lastTargetMailbox);
 327     }
 328 }
 329
 330 function delete_move_next_display_inside() {
 331     global $username,$data_dir,
 332         $delete_move_next_t, $delete_move_next_formATtop,
 333         $delete_move_next_b, $delete_move_next_formATbottom;
 334
 335     echo "<tr><td align=right valign=top>\n".
 336          _("Delete/Move/Next Buttons:") . "</td>\n".
 337          "<td><input type=checkbox name=delete_move_next_ti";
 338
 339     if ($delete_move_next_t == 'on') {
 340         echo " checked";
 341     }
 342     echo '> ' . _("Display at top").
 343          " <input type=checkbox name=delete_move_next_formATtopi";
 344
 345     if ($delete_move_next_formATtop == 'on') {
 346         echo ' checked';
 347     }
 348     echo '> ' . _("with move option") . '<br>';
 349
 350     echo '<input type=checkbox name=delete_move_next_bi';
 351     if($delete_move_next_b != 'off') {
 352         echo ' checked';
 353     }
 354     echo '> ' . _("Display at bottom") .
 355          '<input type=checkbox name=delete_move_next_formATbottomi';
 356
 357     if ($delete_move_next_formATbottom != 'off') {
 358         echo ' checked';
 359     }
 360     echo '> ' . _("with move option") . '<br>'.
 361          "</td></tr>\n";
 362 }
 363
 364 function delete_move_next_display_save() {
 365
 366     global $username,$data_dir;
 367
 368     if ( !check_php_version(4,1) ) {
 369         global $_POST;
 370     }
 371
 372     if (isset($_POST['delete_move_next_ti'])) {
 373         $delete_move_next_ti = $_POST['delete_move_next_ti'];
 374     }
 375     if (isset($_POST['delete_move_next_bi'])) {
 376         $delete_move_next_bi = $_POST['delete_move_next_bi'];
 377     }
 378     if (isset($_POST['delete_move_next_formATtopi'])) {
 379         $delete_move_next_formATtopi = $_POST['delete_move_next_formATtopi'];
 380     }
 381     if (isset($_POST['delete_move_next_formATbottomi'])) {
 382         $delete_move_next_formATbottomi = $_POST['delete_move_next_formATbottomi'];
 383     }
 384
 385     if (isset($delete_move_next_ti)) {
 386         setPref($data_dir, $username, 'delete_move_next_t', 'on');
 387     } else {
 388         setPref($data_dir, $username, 'delete_move_next_t', "off");
 389     }
 390
 391     if (isset($delete_move_next_formATtopi)) {
 392         setPref($data_dir, $username, 'delete_move_next_formATtop', 'on');
 393     } else {
 394         setPref($data_dir, $username, 'delete_move_next_formATtop', "off");
 395     }
 396
 397
 398     if (isset($delete_move_next_bi)) {
 399         setPref($data_dir, $username, 'delete_move_next_b', 'on');
 400     } else {
 401         setPref($data_dir, $username, 'delete_move_next_b', "off");
 402     }
 403
 404     if (isset($delete_move_next_formATbottomi)) {
 405         setPref($data_dir, $username, 'delete_move_next_formATbottom', 'on');
 406     } else {
 407         setPref($data_dir, $username, 'delete_move_next_formATbottom', "off");
 408     }
 409
 410 }
 411
 412
 413 function delete_move_next_loading_prefs() {
 414     global $username,$data_dir,
 415            $delete_move_next_t, $delete_move_next_formATtop,
 416            $delete_move_next_b, $delete_move_next_formATbottom;
 417
 418     $delete_move_next_t = getPref($data_dir, $username, 'delete_move_next_t');
 419     $delete_move_next_b = getPref($data_dir, $username, 'delete_move_next_b');
 420     $delete_move_next_formATtop = getPref($data_dir, $username, 'delete_move_next_formATtop');
 421     $delete_move_next_formATbottom = getPref($data_dir, $username, 'delete_move_next_formATbottom');
 422
 423 }
 424
 425 ?>