Fixes some bugs in preferences
[squirrelmail.git] / src / left_main.php
CommitLineData
21c3249f 1<?
2 /**
a09387f4 3 ** left_main.php
21c3249f 4 **
5 ** This is the code for the left bar. The left bar shows the folders
6 ** available, and has cookie information.
7 **
8 **/
9
10 if(!isset($username)) {
11 echo "You need a valid user and password to access this page!";
12 exit;
13 }
14?>
15<HTML>
21c3249f 16<?
a09387f4 17 include("../config/config.php");
d92b6f31 18 include("../functions/array.php");
a09387f4 19 include("../functions/strings.php");
20 include("../functions/imap.php");
de80e95e 21 include("../functions/mailbox.php");
21c3249f 22
d3cdb279 23 function formatMailboxName($imapConnection, $mailbox, $delimeter, $color) {
d92b6f31 24 require ("../config/config.php");
25
26 $mailboxURL = urlencode($mailbox);
27 selectMailbox($imapConnection, $mailbox, $numNessages);
28 $unseen = unseenMessages($imapConnection, $numUnseen);
29
97be2168 30 echo "<NOBR>";
d92b6f31 31 if ($unseen)
32 $line .= "<B>";
33
7ce342dc 34 $special_color = false;
35 for ($i = 0; $i < count($special_folders); $i++) {
36 if (($special_folders[$i] == $mailbox) && ($use_special_folder_color == true))
37 $special_color = true;
38 }
39
40 if ($special_color == true) {
41 $line .= "<a href=\"right_main.php?sort=0&startMessage=1&mailbox=$mailboxURL\" target=\"right\" style=\"text-decoration:none\"><FONT FACE=\"Arial,Helvetica\" COLOR=\"$color[11]\">";
42 $line .= readShortMailboxName($mailbox, $delimeter);
43 $line .= "</font></a>";
44 } else {
45 $line .= "<a href=\"right_main.php?sort=0&startMessage=1&mailbox=$mailboxURL\" target=\"right\" style=\"text-decoration:none\"><FONT FACE=\"Arial,Helvetica\">";
46 $line .= readShortMailboxName($mailbox, $delimeter);
47 $line .= "</font></a>";
d92b6f31 48 }
7ce342dc 49
50 if ($unseen)
51 $line .= "</B>";
52
d92b6f31 53 if ($numUnseen > 0) {
7ce342dc 54 $line .= "&nbsp;<FONT FACE=\"Arial,Helvetica\" SIZE=2>($numUnseen)</FONT>";
55 }
56
57 if (($move_to_trash == true) && (trim($mailbox) == $trash_folder)) {
58 $urlMailbox = urlencode($mailbox);
59 $line .= "<FONT FACE=\"Arial,Helvetica\" SIZE=2>";
60 $line .= "&nbsp;&nbsp;&nbsp;&nbsp;(<B><A HREF=\"empty_trash.php?numMessages=$numMessages&mailbox=$urlMailbox\" TARGET=right style=\"text-decoration:none\">empty</A></B>)";
61 $line .= "</FONT></a>\n";
d92b6f31 62 }
97be2168 63
64 echo "</NOBR>";
d92b6f31 65 return $line;
66 }
67
21c3249f 68 // open a connection on the imap port (143)
d92b6f31 69 $imapConnection = loginToImapServer($username, $key, $imapServerAddress, 10); // the 10 is to hide the output
21c3249f 70
f3d17401 71 /** If it was a successful login, lets load their preferences **/
72 include("../src/load_prefs.php");
f3d17401 73 echo "<BODY BGCOLOR=\"$color[3]\" TEXT=\"$color[6]\" LINK=\"$color[6]\" VLINK=\"$color[6]\" ALINK=\"$color[6]\">";
74 echo "<FONT FACE=\"Arial,Helvetica\">";
75
7ce342dc 76 getFolderList($imapConnection, $boxes);
21c3249f 77
d92b6f31 78 echo "<FONT FACE=\"Arial,Helvetica\" SIZE=4><B><CENTER>";
ff89ac8a 79 echo "Folders</B><BR></FONT>";
97afcee9 80
d92b6f31 81 echo "<FONT FACE=\"Arial,Helvetica\" SIZE=2>(<A HREF=\"../src/left_main.php\" TARGET=left>refresh folder list</A>)</FONT></CENTER><BR>";
ff89ac8a 82 echo "<FONT FACE=\"Arial,Helvetica\">\n";
d92b6f31 83 $delimeter = findMailboxDelimeter($imapConnection);
7ce342dc 84 for ($i = 0;$i < count($boxes); $i++) {
85 $mailbox = $boxes[$i]["UNFORMATTED"];
86 $boxFlags = getMailboxFlags($boxes[$i]["RAW"]);
de80e95e 87
d92b6f31 88 $boxCount = countCharInString($mailbox, $delimeter);
89
90 $line = "";
21c3249f 91 // indent the correct number of spaces.
d92b6f31 92 for ($j = 0;$j < $boxCount;$j++)
93 $line .= "&nbsp;&nbsp;";
94
95 if (trim($boxFlags[0]) != "") {
7ce342dc 96 $noselect = false;
d92b6f31 97 for ($h = 0; $h < count($boxFlags); $h++) {
7ce342dc 98 if (strtolower($boxFlags[$h]) == "noselect")
99 $noselect = true;
d92b6f31 100 }
d92b6f31 101
7ce342dc 102 if ($noselect == true) {
103 $line .= "<FONT COLOR=\"$color[10]\" FACE=\"Arial,Helvetica\">";
104 $line .= readShortMailboxName($mailbox, $delimeter);
105 $line .= "</FONT><FONT FACE=\"Arial,Helvetica\">";
106 } else {
d3cdb279 107 $line .= formatMailboxName($imapConnection, $mailbox, $delimeter, $color);
d92b6f31 108 }
7ce342dc 109 } else {
d3cdb279 110 $line .= formatMailboxName($imapConnection, $mailbox, $delimeter, $color);
d92b6f31 111 }
7ce342dc 112 echo "$line<BR>";
d92b6f31 113 }
114
ff89ac8a 115 echo "</FONT>";
21c3249f 116
117 fclose($imapConnection);
118
119?>
120</FONT></BODY></HTML>