Source for file setup.php

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

Documentation generated on Sat, 07 Oct 2006 16:33:32 +0300 by phpDocumentor 1.3.0RC6