[squirrelmail.git] / src / left_main.php

<?php
   /**
    **  left_main.php
    **  Copyright (c) 1999-2000 The SquirrelMail development team
    **  Licensed under the GNU GPL. For full terms see the file COPYING.
    **
    **  This is the code for the left bar.  The left bar shows the folders
    **  available, and has cookie information.
    **
    **  $Id$
    **/

   session_start();

   if (!isset($i18n_php))
      include ("../functions/i18n.php");

   if(!isset($username)) {
      set_up_language($squirrelmail_language, true);
          include ("../themes/default_theme.php");
          printf('<html><BODY TEXT="%s" BGCOLOR="%s" LINK="%s" VLINK="%s" ALINK="%s">',
                          $color[8], $color[4], $color[7], $color[7], $color[7]);
          echo "</body></html>";
      exit;
   }


   if (!isset($strings_php))
      include("../functions/strings.php");
   if (!isset($config_php))
      include("../config/config.php");
   if (!isset($array_php))
      include("../functions/array.php");
   if (!isset($imap_php))
      include("../functions/imap.php");
   if (!isset($page_header_php))
      include("../functions/page_header.php");
   if (!isset($i18n_php))
      include("../functions/i18n.php");
   if (!isset($plugin_php))
      include("../functions/plugin.php");

   // open a connection on the imap port (143)
   $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 10); // the 10 is to hide the output

   /** If it was a successful login, lets load their preferences **/
   include("../src/load_prefs.php");

   displayHtmlHeader();

   function formatMailboxName($imapConnection, $box_array, $delimeter) {
      global $folder_prefix, $trash_folder, $sent_folder;
      global $color, $move_to_sent, $move_to_trash;
      global $unseen_notify, $unseen_type, $collapse_folders;

      $real_box = $box_array['unformatted'];
      $mailbox = $box_array['formatted'];
      $mailboxURL = urlencode($real_box);
      
      $unseen = 0;
      
      if (($unseen_notify == 2 && $real_box == "INBOX") ||
          $unseen_notify == 3) {
         $unseen = sqimap_unseen_messages($imapConnection, $numUnseen, $real_box);
         if ($unseen_type == 1 && $unseen > 0) {
            $unseen_string = "($unseen)";
            $unseen_found = true;
         } else if ($unseen_type == 2) {
            $numMessages = sqimap_get_num_messages($imapConnection, $real_box);
            $unseen_string = "<font color=\"$color[11]\">($unseen/$numMessages)</font>";
            $unseen_found = true;
         }
      }
      
      $special_color = false;
      if ((strtolower($real_box) == "inbox") ||
          (($real_box == $trash_folder) && ($move_to_trash)) ||
          (($real_box == $sent_folder) && ($move_to_sent)))
         $special_color = true;
         
      $spaces = '';
      $line = "<NOBR>";
      if (ereg("^( *)([^ ]*)$", $mailbox, $regs)) {
          $spaces = $regs[1];
          $mailbox = $regs[2];
      }
      
      if ($unseen > 0)
          $line .= "<B>";
      $line .= str_replace(' ', '&nbsp;', $spaces);
      
      if ($collapse_folders) {
         if (isset($box_array['parent']))
            $line .= FoldLink($box_array['unformatted'], $box_array['parent']);
         else
            $line .= '<tt>&nbsp;</tt>&nbsp;';
      }
          
      $line .= "<a href=\"right_main.php?sort=0&startMessage=1&mailbox=$mailboxURL\" target=\"right\" style=\"text-decoration:none\">";
      if ($special_color == true)
         $line .= "<FONT COLOR=\"$color[11]\">";
      $line .= str_replace(' ', '&nbsp;', $mailbox);
      if ($special_color == true)
         $line .= "</font>";
      $line .= "</a>";

      if ($unseen > 0)
         $line .= "</B>";

      if (isset($unseen_found) && $unseen_found) {
         $line .= "&nbsp;<small>$unseen_string</small>";
      }

      if (($move_to_trash == true) && ($real_box == $trash_folder)) {
         $urlMailbox = urlencode($real_box);
         $line .= "\n<small>\n";
         $line .= " &nbsp; (<B><A HREF=\"empty_trash.php\" style=\"text-decoration:none\">"._("purge")."</A></B>)";
         $line .= "\n</small>\n";
      }
      $line .= "</NOBR>";
      return $line;
   }

   if (isset($left_refresh) && ($left_refresh != "None") && ($left_refresh != "")) {
      echo "<META HTTP-EQUIV=\"Expires\" CONTENT=\"Thu, 01 Dec 1994 16:00:00 GMT\">\n";
      echo "<META HTTP-EQUIV=\"Pragma\" CONTENT=\"no-cache\">\n"; 
      echo "<META HTTP-EQUIV=\"REFRESH\" CONTENT=\"$left_refresh;URL=left_main.php\">\n";
   }
   
   echo "\n<BODY BGCOLOR=\"$color[3]\" TEXT=\"$color[6]\" LINK=\"$color[6]\" VLINK=\"$color[6]\" ALINK=\"$color[6]\">\n";

   do_hook("left_main_before");

   $boxes = sqimap_mailbox_list($imapConnection);

   echo "<CENTER><FONT SIZE=4><B>";
   echo _("Folders") . "</B><BR></FONT>\n\n";

   echo "<small>(<A HREF=\"../src/left_main.php\" TARGET=\"left\">";
   echo _("refresh folder list");
   echo "</A>)</small></CENTER><BR>";
   $delimeter = sqimap_get_delimiter($imapConnection);

   if (isset($collapse_folders) && $collapse_folders) {
      if (isset($fold))
         setPref($data_dir, $username, 'collapse_folder_' . $fold, 1);
      if (isset($unfold))
         setPref($data_dir, $username, 'collapse_folder_' . $unfold, 0);
      $IAmAParent = array();
      for ($i = 0; $i < count($boxes); $i ++) {
          $parts = explode($delimeter, $boxes[$i]['unformatted']);
          $box_name = array_pop($parts);
          $box_parent = implode($delimeter, $parts);
          $hidden = 0;
          if (isset($box_parent)) {
              $hidden = getPref($data_dir, $username, 
                  'collapse_folder_' . $box_parent);
              $IAmAParent[$box_parent] = $hidden;
          }
          $boxes[$i]['folded'] = $hidden;
      }
   }

   for ($i = 0;$i < count($boxes); $i++) {
      if (! isset($boxes[$i]['folded']) || ! $boxes[$i]['folded'])
      {
         $line = "";
         $mailbox = $boxes[$i]["formatted"];

         if (isset($collapse_folders) && $collapse_folders && isset($IAmAParent[$boxes[$i]['unformatted']])) {
            $boxes[$i]['parent'] = $IAmAParent[$boxes[$i]['unformatted']];
         }

         if (in_array('noselect', $boxes[$i]['flags'])) {
            $line .= "<FONT COLOR=\"$color[10]\">";
            if (ereg("^( *)([^ ]*)$", $mailbox, $regs)) {
                $line .= str_replace(' ', '&nbsp;', $regs[1]);
                if (isset($boxes[$i]['parent']))
                    $line .= FoldLink($boxes[$i]['unformatted'], 
                        $boxes[$i]['parent']);
                elseif ($collapse_folders)
                    $line .= '<tt>&nbsp;</tt>&nbsp;';
                $line .= str_replace(' ', '&nbsp;', $regs[2]);
            }
            $line .= '</FONT>';
         } else {
            $line .= formatMailboxName($imapConnection, $boxes[$i], $delimeter);
         }
         echo "$line<BR>\n";
      }
   }
   sqimap_logout($imapConnection);
   do_hook("left_main_after");

   function FoldLink($mailbox, $folded) {
       $mailbox = urlencode($mailbox);
       echo '<tt><a target="left" style="text-decoration:none" ';
       echo 'href="left_main.php?';
       if ($folded)
           echo "unfold=$mailbox\">+";
       else
           echo "fold=$mailbox\">-";
       echo '</a></tt>&nbsp;';
   }
   
?>
</BODY></HTML>
Commit	Line	Data
59177427	1	<?php
21c3249f	2	/**
a09387f4	3	** left_main.php
ef870322	4	** Copyright (c) 1999-2000 The SquirrelMail development team
ef870322	5	** Licensed under the GNU GPL. For full terms see the file COPYING.
21c3249f	6	**
	7	** This is the code for the left bar. The left bar shows the folders
	8	** available, and has cookie information.
	9	**
245a6892	10	** $Id$
21c3249f	11	**/
21c3249f	12
2a32fc83	13	session_start();
2a32fc83	14
6d7061ac	15	if (!isset($i18n_php))
	16	include ("../functions/i18n.php");
	17
21c3249f	18	if(!isset($username)) {
441f2d33	19	set_up_language($squirrelmail_language, true);
235a65d5	20	include ("../themes/default_theme.php");
	21	printf('<html><BODY TEXT="%s" BGCOLOR="%s" LINK="%s" VLINK="%s" ALINK="%s">',
	22	$color[8], $color[4], $color[7], $color[7], $color[7]);
	23	echo "</body></html>";
21c3249f	24	exit;
21c3249f	25	}
142499d4	26
207dff25	27
245a6892	28	if (!isset($strings_php))
245a6892	29	include("../functions/strings.php");
d068c0ec	30	if (!isset($config_php))
	31	include("../config/config.php");
	32	if (!isset($array_php))
	33	include("../functions/array.php");
d068c0ec	34	if (!isset($imap_php))
d068c0ec	35	include("../functions/imap.php");
142499d4	36	if (!isset($page_header_php))
142499d4	37	include("../functions/page_header.php");
9c1852ff	38	if (!isset($i18n_php))
9c1852ff	39	include("../functions/i18n.php");
9d0c7bee	40	if (!isset($plugin_php))
9d0c7bee	41	include("../functions/plugin.php");
142499d4	42
99ab0367	43	// open a connection on the imap port (143)
	44	$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 10); // the 10 is to hide the output
	45
	46	/ If it was a successful login, lets load their preferences /
	47	include("../src/load_prefs.php");
	48
2a833d72	49	displayHtmlHeader();
21c3249f	50
235a65d5	51	function formatMailboxName($imapConnection, $box_array, $delimeter) {
5bdd7223	52	global $folder_prefix, $trash_folder, $sent_folder;
5bdd7223	53	global $color, $move_to_sent, $move_to_trash;
235a65d5	54	global $unseen_notify, $unseen_type, $collapse_folders;
	55
	56	$real_box = $box_array['unformatted'];
	57	$mailbox = $box_array['formatted'];
5c42b0dd	58	$mailboxURL = urlencode($real_box);
0cd84d75	59
235a65d5	60	$unseen = 0;
	61
	62	if (($unseen_notify == 2 && $real_box == "INBOX") \|\|
	63	$unseen_notify == 3) {
	64	$unseen = sqimap_unseen_messages($imapConnection, $numUnseen, $real_box);
24fc5dd2	65	if ($unseen_type == 1 && $unseen > 0) {
	66	$unseen_string = "($unseen)";
	67	$unseen_found = true;
	68	} else if ($unseen_type == 2) {
	69	$numMessages = sqimap_get_num_messages($imapConnection, $real_box);
	70	$unseen_string = "<font color=\"$color[11]\">($unseen/$numMessages)</font>";
	71	$unseen_found = true;
	72	}
	73	}
5bdd7223	74
7ce342dc	75	$special_color = false;
508ca2d3	76	if ((strtolower($real_box) == "inbox") \|\|
235a65d5	77	(($real_box == $trash_folder) && ($move_to_trash)) \|\|
	78	(($real_box == $sent_folder) && ($move_to_sent)))
	79	$special_color = true;
	80
	81	$spaces = '';
	82	$line = "<NOBR>";
	83	if (ereg("^( )([^ ])$", $mailbox, $regs)) {
	84	$spaces = $regs[1];
	85	$mailbox = $regs[2];
	86	}
5bdd7223	87
235a65d5	88	if ($unseen > 0)
	89	$line .= "<B>";
	90	$line .= str_replace(' ', ' ', $spaces);
	91
	92	if ($collapse_folders) {
	93	if (isset($box_array['parent']))
	94	$line .= FoldLink($box_array['unformatted'], $box_array['parent']);
	95	else
	96	$line .= '<tt> </tt> ';
d92b6f31	97	}
235a65d5	98
	99	$line .= "<a href=\"right_main.php?sort=0&startMessage=1&mailbox=$mailboxURL\" target=\"right\" style=\"text-decoration:none\">";
	100	if ($special_color == true)
	101	$line .= "<FONT COLOR=\"$color[11]\">";
	102	$line .= str_replace(' ', ' ', $mailbox);
	103	if ($special_color == true)
	104	$line .= "</font>";
	105	$line .= "</a>";
7ce342dc	106
d1941f35	107	if ($unseen > 0)
7ce342dc	108	$line .= "</B>";
235a65d5	109
245a6892	110	if (isset($unseen_found) && $unseen_found) {
24fc5dd2	111	$line .= " <small>$unseen_string</small>";
7ce342dc	112	}
7ce342dc	113
1e0628fb	114	if (($move_to_trash == true) && ($real_box == $trash_folder)) {
0ab89329	115	$urlMailbox = urlencode($real_box);
1d4fe45e	116	$line .= "\n<small>\n";
235a65d5	117	$line .= "   (<B><A HREF=\"empty_trash.php\" style=\"text-decoration:none\">"._("purge")."</A></B>)";
1d4fe45e	118	$line .= "\n</small>\n";
d92b6f31	119	}
1d4fe45e	120	$line .= "</NOBR>";
d92b6f31	121	return $line;
	122	}
	123
4c34dac5	124	if (isset($left_refresh) && ($left_refresh != "None") && ($left_refresh != "")) {
1d4fe45e	125	echo "<META HTTP-EQUIV=\"Expires\" CONTENT=\"Thu, 01 Dec 1994 16:00:00 GMT\">\n";
	126	echo "<META HTTP-EQUIV=\"Pragma\" CONTENT=\"no-cache\">\n";
	127	echo "<META HTTP-EQUIV=\"REFRESH\" CONTENT=\"$left_refresh;URL=left_main.php\">\n";
469eb37b	128	}
813eba2f	129
04632dbc	130	echo "\n<BODY BGCOLOR=\"$color[3]\" TEXT=\"$color[6]\" LINK=\"$color[6]\" VLINK=\"$color[6]\" ALINK=\"$color[6]\">\n";
f3d17401	131
9d0c7bee	132	do_hook("left_main_before");
9d0c7bee	133
813eba2f	134	$boxes = sqimap_mailbox_list($imapConnection);
21c3249f	135
1d4fe45e	136	echo "<CENTER><FONT SIZE=4><B>";
1d4fe45e	137	echo _("Folders") . "</B><BR></FONT>\n\n";
97afcee9	138
9f2215a1	139	echo "<small>(<A HREF=\"../src/left_main.php\" TARGET=\"left\">";
ad6f805c	140	echo _("refresh folder list");
aae41ae9	141	echo "</A>)</small></CENTER><BR>";
813eba2f	142	$delimeter = sqimap_get_delimiter($imapConnection);
4c34dac5	143
235a65d5	144	if (isset($collapse_folders) && $collapse_folders) {
	145	if (isset($fold))
	146	setPref($data_dir, $username, 'collapse_folder_' . $fold, 1);
	147	if (isset($unfold))
	148	setPref($data_dir, $username, 'collapse_folder_' . $unfold, 0);
	149	$IAmAParent = array();
	150	for ($i = 0; $i < count($boxes); $i ++) {
	151	$parts = explode($delimeter, $boxes[$i]['unformatted']);
	152	$box_name = array_pop($parts);
	153	$box_parent = implode($delimeter, $parts);
	154	$hidden = 0;
	155	if (isset($box_parent)) {
	156	$hidden = getPref($data_dir, $username,
	157	'collapse_folder_' . $box_parent);
	158	$IAmAParent[$box_parent] = $hidden;
	159	}
	160	$boxes[$i]['folded'] = $hidden;
	161	}
	162	}
	163
7ce342dc	164	for ($i = 0;$i < count($boxes); $i++) {
235a65d5	165	if (! isset($boxes[$i]['folded']) \|\| ! $boxes[$i]['folded'])
	166	{
	167	$line = "";
	168	$mailbox = $boxes[$i]["formatted"];
	169
	170	if (isset($collapse_folders) && $collapse_folders && isset($IAmAParent[$boxes[$i]['unformatted']])) {
	171	$boxes[$i]['parent'] = $IAmAParent[$boxes[$i]['unformatted']];
	172	}
	173
	174	if (in_array('noselect', $boxes[$i]['flags'])) {
	175	$line .= "<FONT COLOR=\"$color[10]\">";
	176	if (ereg("^( )([^ ])$", $mailbox, $regs)) {
	177	$line .= str_replace(' ', ' ', $regs[1]);
	178	if (isset($boxes[$i]['parent']))
	179	$line .= FoldLink($boxes[$i]['unformatted'],
	180	$boxes[$i]['parent']);
	181	elseif ($collapse_folders)
	182	$line .= '<tt> </tt> ';
	183	$line .= str_replace(' ', ' ', $regs[2]);
	184	}
	185	$line .= '</FONT>';
	186	} else {
	187	$line .= formatMailboxName($imapConnection, $boxes[$i], $delimeter);
	188	}
	189	echo "$line<BR>\n";
d92b6f31	190	}
d92b6f31	191	}
1195c340	192	sqimap_logout($imapConnection);
6b638171	193	do_hook("left_main_after");
235a65d5	194
	195	function FoldLink($mailbox, $folded) {
	196	$mailbox = urlencode($mailbox);
	197	echo '<tt><a target="left" style="text-decoration:none" ';
	198	echo 'href="left_main.php?';
	199	if ($folded)
	200	echo "unfold=$mailbox\">+";
	201	else
	202	echo "fold=$mailbox\">-";
	203	echo '</a></tt> ';
	204	}
	205
21c3249f	206	?>
aae41ae9	207	</BODY></HTML>