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