Last options commit for the evening. This one is dedicated to my wife and her colorfu...
[squirrelmail.git] / src / right_main.php
1 <?php
2 /**
3 * right_main.php
4 *
5 * Copyright (c) 1999-2001 The Squirrelmail Development Team
6 * Licensed under the GNU GPL. For full terms see the file COPYING.
7 *
8 * This is where the mailboxes are listed. This controls most of what
9 * goes on in SquirrelMail.
10 *
11 * $Id$
12 */
13
14 require_once('../src/validate.php');
15 require_once('../functions/imap.php');
16 require_once('../functions/date.php');
17 require_once('../functions/array.php');
18 require_once('../functions/mime.php');
19 require_once('../functions/mailbox_display.php');
20 require_once('../functions/display_messages.php');
21
22 /***********************************************************
23 * incoming variables from URL: *
24 * $sort Direction to sort by date *
25 * values: 0 - descending order *
26 * values: 1 - ascending order *
27 * $startMessage Message to start at *
28 * $mailbox Full Mailbox name *
29 * *
30 * incoming from cookie: *
31 * $username duh *
32 * $key pass *
33 ***********************************************************/
34
35 /* Open a connection on the imap port (143) */
36 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
37
38 if (isset($newsort) && $newsort != $sort) {
39 setPref($data_dir, $username, 'sort', $newsort);
40 }
41
42 /* If the page has been loaded without a specific mailbox, */
43 /* send them to the inbox */
44 if (!isset($mailbox)) {
45 $mailbox = 'INBOX';
46 $startMessage = 1;
47 }
48
49 /* compensate for the UW vulnerability. */
50 if ($imap_server_type == 'uw' && (strstr($mailbox, '../') !== false ||
51 substr($mailbox, 0, 1) == '/')) {
52 $mailbox = 'INBOX';
53 }
54
55 sqimap_mailbox_select($imapConnection, $mailbox);
56 displayPageHeader($color, $mailbox);
57 echo "<br>\n";
58
59 do_hook('right_main_after_header');
60
61 if (isset($note)) {
62 echo "<CENTER><B>$note</B></CENTER><BR>\n";
63 }
64
65 if ($just_logged_in == true) {
66 $just_logged_in = false;
67
68 if (strlen(trim($motd)) > 0) {
69 echo "<br><table align=center width=70% cellpadding=0 cellspacing=3 border=0 bgcolor=\"$color[9]\">" .
70 '<tr><td>' .
71 "<table width=100% cellpadding=5 cellspacing=1 border=0 bgcolor=\"$color[4]\">" .
72 "<tr><td align=center>$motd";
73 do_hook('motd');
74 echo '</td></tr>' .
75 '</table>' .
76 '</td></tr></table>';
77 }
78 }
79
80 if (isset($newsort)) {
81 $sort = $newsort;
82 session_register('sort');
83 }
84
85 /*********************************************************************
86 * Check to see if we can use cache or not. Currently the only time *
87 * when you will not use it is when a link on the left hand frame is *
88 * used. Also check to make sure we actually have the array in the *
89 * registered session data. :) *
90 *********************************************************************/
91 if (! isset($use_mailbox_cache)) {
92 $use_mailbox_cache = 0;
93 }
94
95 if ($use_mailbox_cache && session_is_registered('msgs')) {
96 showMessagesForMailbox($imapConnection, $mailbox, $numMessages, $startMessage, $sort, $color, $show_num, $use_mailbox_cache);
97 } else {
98 if (session_is_registered('msgs')) {
99 unset($msgs);
100 }
101
102 if (session_is_registered('msort')) {
103 unset($msort);
104 }
105
106 if (session_is_registered('numMessages')) {
107 unset($numMessages);
108 }
109
110 $numMessages = sqimap_get_num_messages ($imapConnection, $mailbox);
111
112 showMessagesForMailbox($imapConnection, $mailbox, $numMessages, $startMessage, $sort, $color, $show_num, $use_mailbox_cache);
113
114 if (session_is_registered('msgs') && isset($msgs)) {
115 session_register('msgs');
116 }
117
118 if (session_is_registered('msort') && isset($msort)) {
119 session_register('msort');
120 }
121
122 session_register('numMessages');
123 }
124
125 do_hook('right_main_bottom');
126 sqimap_logout ($imapConnection);
127 ?>
128 </FONT>
129 </BODY>
130 </HTML>