b8bf19ab492d77119bff1f4b1becccb8f68445b6
[squirrelmail.git] / src / right_main.php
1 <?php
2 /**
3 ** right_main.php
4 **
5 ** Copyright (c) 1999-2000 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 include('../src/validate.php');
15 include('../functions/imap.php');
16 include('../functions/date.php');
17 include('../functions/array.php');
18 include('../functions/mime.php');
19 include('../functions/mailbox_display.php');
20 include('../functions/display_messages.php');
21
22 /////////////////////////////////////////////////////////////////////////////////
23 //
24 // incoming variables from URL:
25 // $sort Direction to sort by date
26 // values: 0 - descending order
27 // values: 1 - ascending order
28 // $startMessage Message to start at
29 // $mailbox Full Mailbox name
30 //
31 // incoming from cookie:
32 // $username duh
33 // $key pass
34 //
35 /////////////////////////////////////////////////////////////////////////////////
36
37 // open a connection on the imap port (143)
38 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
39
40 if (isset($newsort) && $newsort != $sort) {
41 setPref($data_dir, $username, 'sort', $newsort);
42 }
43
44 // If the page has been loaded without a specific mailbox,
45 // send them to the inbox
46 if (!isset($mailbox)) {
47 $mailbox = 'INBOX';
48 $startMessage = 1;
49 }
50
51 // compensate for the UW vulnerability
52 if ($imap_server_type == 'uw' && (strstr($mailbox, '../') !== false ||
53 substr($mailbox, 0, 1) == '/')) {
54 $mailbox = 'INBOX';
55 }
56
57 sqimap_mailbox_select($imapConnection, $mailbox);
58 displayPageHeader($color, $mailbox);
59
60 do_hook('right_main_after_header');
61
62 if (isset($just_logged_in) && $just_logged_in == 1 &&
63 strlen(trim($motd)) > 0) {
64 echo "<center><br>\n";
65 echo "<table width=70% cellpadding=0 cellspacing=0 border=0><tr><td bgcolor=\"$color[9]\">\n";
66 echo "<table width=100% cellpadding=5 cellspacing=1 border=0><tr><td bgcolor=\"$color[4]\">\n";
67 echo "$motd\n";
68 echo "</td></tr></table>\n";
69 echo "</td></tr></table>\n";
70 echo "</center><br>\n";
71 }
72
73 if (isset($newsort)) {
74 $sort = $newsort;
75 session_register('sort');
76 }
77
78 // Check to see if we can use cache or not. Currently the only time when you wont use it is
79 // when a link on the left hand frame is used. Also check to make sure we actually have the
80 // array in the registered session data. :)
81 if (! isset($use_mailbox_cache))
82 $use_mailbox_cache = 0;
83 if ($use_mailbox_cache && session_is_registered('msgs')) {
84 showMessagesForMailbox($imapConnection, $mailbox, $numMessages, $startMessage, $sort, $color, $show_num, $use_mailbox_cache);
85 } else {
86 if (session_is_registered('msgs'))
87 unset($msgs);
88 if (session_is_registered('msort'))
89 unset($msort);
90 if (session_is_registered('numMessages'))
91 unset($numMessages);
92
93 $numMessages = sqimap_get_num_messages ($imapConnection, $mailbox);
94
95 showMessagesForMailbox($imapConnection, $mailbox, $numMessages, $startMessage, $sort, $color, $show_num, $use_mailbox_cache);
96
97 if (session_is_registered('msgs') && isset($msgs))
98 session_register('msgs');
99 if (session_is_registered('msort') && isset($msort))
100 session_register('msort');
101 session_register('numMessages');
102 }
103
104 do_hook('right_main_bottom');
105 sqimap_logout ($imapConnection);
106 ?>
107 </FONT>
108 </BODY>
109 </HTML>