1a99b0bdd77f52276133d3cd0853c135a212cb15
[squirrelmail.git] / src / right_main.php
1 <?php
2
3 /**
4 * right_main.php
5 *
6 * Copyright (c) 1999-2003 The SquirrelMail Project Team
7 * Licensed under the GNU GPL. For full terms see the file COPYING.
8 *
9 * This is where the mailboxes are listed. This controls most of what
10 * goes on in SquirrelMail.
11 *
12 * $Id$
13 */
14
15 /* Path for SquirrelMail required files. */
16 define('SM_PATH','../');
17
18 /* SquirrelMail required files. */
19 require_once(SM_PATH . 'include/validate.php');
20 require_once(SM_PATH . 'functions/imap.php');
21 require_once(SM_PATH . 'functions/date.php');
22 require_once(SM_PATH . 'functions/mime.php');
23 require_once(SM_PATH . 'functions/mailbox_display.php');
24 require_once(SM_PATH . 'functions/display_messages.php');
25 require_once(SM_PATH . 'functions/html.php');
26
27 /***********************************************************
28 * incoming variables from URL: *
29 * $sort Direction to sort by date *
30 * values: 0 - descending order *
31 * values: 1 - ascending order *
32 * $startMessage Message to start at *
33 * $mailbox Full Mailbox name *
34 * *
35 * incoming from cookie: *
36 * $key pass *
37 * incoming from session: *
38 * $username duh *
39 * *
40 ***********************************************************/
41
42
43 /* lets get the global vars we may need */
44 sqgetGlobalVar('key', $key, SQ_COOKIE);
45 sqgetGlobalVar('username', $username, SQ_SESSION);
46 sqgetGlobalVar('onetimepad',$onetimepad, SQ_SESSION);
47 sqgetGlobalVar('delimiter', $delimiter, SQ_SESSION);
48 sqgetGlobalVar('base_uri', $base_uri, SQ_SESSION);
49
50 sqgetGlobalVar('mailbox', $mailbox);
51 sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION);
52 sqgetGlobalVar('session', $session, SQ_GET);
53 sqgetGlobalVar('note', $note, SQ_GET);
54
55 if ( sqgetGlobalVar('startMessage', $temp) ) {
56 $startMessage = (int) $temp;
57 }
58 if ( sqgetGlobalVar('PG_SHOWNUM', $temp) ) {
59 $PG_SHOWNUM = (int) $temp;
60 }
61 if ( sqgetGlobalVar('PG_SHOWALL', $temp, SQ_GET) ) {
62 $PG_SHOWALL = (int) $temp;
63 }
64 if ( sqgetGlobalVar('newsort', $temp, SQ_GET) ) {
65 $newsort = (int) $temp;
66 }
67 if ( sqgetGlobalVar('checkall', $temp, SQ_GET) ) {
68 $checkall = (int) $temp;
69 }
70 if ( sqgetGlobalVar('set_thread', $temp, SQ_GET) ) {
71 $set_thread = (int) $temp;
72 }
73 if ( !sqgetGlobalVar('composenew', $composenew, SQ_GET) ) {
74 $composenew = false;
75 }
76 /* end of get globals */
77
78
79 /* Open a connection on the imap port (143) */
80
81 $imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);
82
83 if (isset($PG_SHOWALL)) {
84 if ($PG_SHOWALL) {
85 $PG_SHOWNUM=999999;
86 $show_num=$PG_SHOWNUM;
87 sqsession_register($PG_SHOWNUM, 'PG_SHOWNUM');
88 }
89 else {
90 sqsession_unregister('PG_SHOWNUM');
91 unset($PG_SHOWNUM);
92 }
93 }
94 else if( isset( $PG_SHOWNUM ) ) {
95 $show_num = $PG_SHOWNUM;
96 }
97
98 if (isset($newsort) && $newsort != $sort) {
99 setPref($data_dir, $username, 'sort', $newsort);
100 }
101
102
103
104 /* If the page has been loaded without a specific mailbox, */
105 /* send them to the inbox */
106 if (!isset($mailbox)) {
107 $mailbox = 'INBOX';
108 $startMessage = 1;
109 }
110
111
112 if (!isset($startMessage) || ($startMessage == '')) {
113 $startMessage = 1;
114 }
115
116 /* compensate for the UW vulnerability. */
117 if ($imap_server_type == 'uw' && (strstr($mailbox, '../') ||
118 substr($mailbox, 0, 1) == '/')) {
119 $mailbox = 'INBOX';
120 }
121
122 /* decide if we are thread sorting or not */
123 if ($allow_thread_sort == TRUE) {
124 if (isset($set_thread)) {
125 if ($set_thread == 1) {
126 setPref($data_dir, $username, "thread_$mailbox", 1);
127 $thread_sort_messages = '1';
128 }
129 elseif ($set_thread == 2) {
130 setPref($data_dir, $username, "thread_$mailbox", 0);
131 $thread_sort_messages = '0';
132 }
133 }
134 else {
135 $thread_sort_messages = getPref($data_dir, $username, "thread_$mailbox");
136 }
137 }
138 else {
139 $thread_sort_messages = 0;
140 }
141
142 do_hook ('generic_header');
143
144 sqimap_mailbox_select($imapConnection, $mailbox);
145
146 if ($composenew) {
147 $comp_uri = SM_PATH . 'src/compose.php?mailbox='. urlencode($mailbox).
148 "&session=$session";
149 displayPageHeader($color, $mailbox, "comp_in_new('$comp_uri');", false);
150 } else {
151 displayPageHeader($color, $mailbox);
152 }
153 do_hook('right_main_after_header');
154 if (isset($note)) {
155 echo html_tag( 'div', '<b>' . $note .'</b>', 'center' ) . "<br>\n";
156 }
157
158 if (isset($_SESSION['just_logged_in'])) {
159 $just_logged_in = $_SESSION['just_logged_in'];
160 if ($just_logged_in == true) {
161 $just_logged_in = false;
162
163 if (strlen(trim($motd)) > 0) {
164 echo html_tag( 'table',
165 html_tag( 'tr',
166 html_tag( 'td',
167 html_tag( 'table',
168 html_tag( 'tr',
169 html_tag( 'td', $motd, 'center' )
170 ) ,
171 '', $color[4], 'width="100%" cellpadding="5" cellspacing="1" border="0"' )
172 )
173 ) ,
174 'center', $color[9], 'width="70%" cellpadding="0" cellspacing="3" border="0"' );
175 }
176 }
177 }
178
179 if (isset($newsort)) {
180 $sort = $newsort;
181 sqsession_register($sort, 'sort');
182 }
183
184 /*********************************************************************
185 * Check to see if we can use cache or not. Currently the only time *
186 * when you will not use it is when a link on the left hand frame is *
187 * used. Also check to make sure we actually have the array in the *
188 * registered session data. :) *
189 *********************************************************************/
190 if (! isset($use_mailbox_cache)) {
191 $use_mailbox_cache = 0;
192 }
193
194 if ($use_mailbox_cache && sqsession_is_registered('msgs')) {
195 showMessagesForMailbox($imapConnection, $mailbox, $numMessages, $startMessage, $sort, $color, $show_num, $use_mailbox_cache);
196 } else {
197 if (sqsession_is_registered('msgs')) {
198 unset($msgs);
199 }
200
201 if (sqsession_is_registered('msort')) {
202 unset($msort);
203 }
204
205 if (sqsession_is_registered('numMessages')) {
206 unset($numMessages);
207 }
208
209 $numMessages = sqimap_get_num_messages ($imapConnection, $mailbox);
210
211 showMessagesForMailbox($imapConnection, $mailbox, $numMessages,
212 $startMessage, $sort, $color, $show_num,
213 $use_mailbox_cache);
214
215 if (sqsession_is_registered('msgs') && isset($msgs)) {
216 sqsession_register($msgs, 'msgs');
217 $_SESSION['msgs'] = $msgs;
218 }
219
220 if (sqsession_is_registered('msort') && isset($msort)) {
221 sqsession_register($msort, 'msort');
222 $_SESSION['msort'] = $msort;
223 }
224
225 sqsession_register($numMessages, 'numMessages');
226 $_SESSION['numMessages'] = $numMessages;
227 }
228 do_hook('right_main_bottom');
229 sqimap_logout ($imapConnection);
230
231 echo '</body></html>';
232
233 ?>