<?php
/**
 * right_main.php
 *
 * Copyright (c) 1999-2004 The SquirrelMail Project Team
 * Licensed under the GNU GPL. For full terms see the file COPYING.
 *
 * This is where the mailboxes are listed. This controls most of what
 * goes on in SquirrelMail.
 *
 * @version $Id$
 * @package squirrelmail
 */

/**
 * Path for SquirrelMail required files.
 * @ignore
 */
define('SM_PATH','../');

/* SquirrelMail required files. */
require_once(SM_PATH . 'include/validate.php');
require_once(SM_PATH . 'functions/global.php');
require_once(SM_PATH . 'functions/imap.php');
require_once(SM_PATH . 'functions/date.php');
require_once(SM_PATH . 'functions/mime.php');
require_once(SM_PATH . 'functions/mailbox_display.php');
require_once(SM_PATH . 'functions/display_messages.php');
require_once(SM_PATH . 'functions/html.php');
require_once(SM_PATH . 'functions/plugin.php');

/***********************************************************
 * incoming variables from URL:                            *
 *   $sort             Direction to sort by date           *
 *                        values:  0  -  descending order  *
 *                        values:  1  -  ascending order   *
 *   $startMessage     Message to start at                 *
 *    $mailbox          Full Mailbox name                  *
 *                                                         *
 * incoming from cookie:                                   *
 *    $key              pass                               *
 * incoming from session:                                  *
 *    $username         duh                                *
 *                                                         *
 ***********************************************************/


/* lets get the global vars we may need */
sqgetGlobalVar('key',       $key,           SQ_COOKIE);
sqgetGlobalVar('username',  $username,      SQ_SESSION);
sqgetGlobalVar('onetimepad',$onetimepad,    SQ_SESSION);
sqgetGlobalVar('delimiter', $delimiter,     SQ_SESSION);
sqgetGlobalVar('base_uri',  $base_uri,      SQ_SESSION);

sqgetGlobalVar('mailbox',   $mailbox);
sqgetGlobalVar('lastTargetMailbox', $lastTargetMailbox, SQ_SESSION);
sqgetGlobalVar('sort'             , $sort,              SQ_SESSION);
sqgetGlobalVar('session',           $session,           SQ_GET);
sqgetGlobalVar('note',              $note,              SQ_GET);
sqgetGlobalVar('mail_sent',         $mail_sent,         SQ_GET);

if ( sqgetGlobalVar('startMessage', $temp) ) {
  $startMessage = (int) $temp;
}
if ( sqgetGlobalVar('PG_SHOWNUM', $temp) ) {
  $PG_SHOWNUM = (int) $temp;
}
if ( sqgetGlobalVar('PG_SHOWALL', $temp, SQ_GET) ) {
  $PG_SHOWALL = (int) $temp;
}
if ( sqgetGlobalVar('newsort', $temp, SQ_GET) ) {
  $newsort = (int) $temp;
}
if ( sqgetGlobalVar('checkall', $temp, SQ_GET) ) {
  $checkall = (int) $temp;
}
if ( sqgetGlobalVar('set_thread', $temp, SQ_GET) ) {
  $set_thread = (int) $temp;
}
if ( !sqgetGlobalVar('composenew', $composenew, SQ_GET) ) {
    $composenew = false;
}
/* end of get globals */


/* Open an imap connection */

$imapConnection = sqimap_login($username, $key, $imapServerAddress, $imapPort, 0);

if (isset($PG_SHOWALL)) {
    if ($PG_SHOWALL) {
       $PG_SHOWNUM=999999;
       $show_num=$PG_SHOWNUM;
       sqsession_register($PG_SHOWNUM, 'PG_SHOWNUM');
    }
    else {
       sqsession_unregister('PG_SHOWNUM');
       unset($PG_SHOWNUM);
    }
}
else if( isset( $PG_SHOWNUM ) ) {
    $show_num = $PG_SHOWNUM;
}
$mailbox = (isset($mailbox) && $mailbox) ? $mailbox : 'INBOX';
/* compensate for the UW vulnerability. */
if ($imap_server_type == 'uw' && (strstr($mailbox, '../') ||
                                  substr($mailbox, 0, 1) == '/')) {
   $mailbox = 'INBOX';
}

if (isset($newsort) ) {
    if ( $newsort != $sort ) {
        setPref($data_dir, $username, 'sort', $newsort);
    }
    $oldsort = $sort;
    $sort = $newsort;
    sqsession_register($sort, 'sort');
}

do_hook ('generic_header');

$aMbxResponse = sqimap_mailbox_select($imapConnection, $mailbox);
$aMbxResponse['SORT_ARRAY'] = false;

sqgetGlobalVar('aLastSelectedMailbox',$aLastSelectedMailbox,SQ_SESSION);

// deal with imap servers that do not return the required UIDNEXT or
// UIDVALIDITY response
// from a SELECT call (since rfc 3501 it's required)
if (!isset($aMbxResponse['UIDNEXT']) || !isset($aMbxResponse['UIDVALIDITY'])) {
    $aStatus = sqimap_status_messages($imapConnection,$mailbox,
                                      array('UIDNEXT','UIDVALIDITY'));
    $aMbxResponse['UIDNEXT'] = $aStatus['UIDNEXT'];
    $aMbxResponse['UIDVALIDTY'] = $aStatus['UIDVALIDITY'];
}

if ($aLastSelectedMailbox) {
    // check if we deal with the same mailbox
    if ($aLastSelectedMailbox['NAME'] == $mailbox) {
       if ($aLastSelectedMailbox['EXISTS'] == $aMbxResponse['EXISTS'] &&
           $aLastSelectedMailbox['UIDVALIDITY'] == $aMbxResponse['UIDVALIDITY'] &&
           $aLastSelectedMailbox['UIDNEXT']  == $aMbxResponse['UIDNEXT']) {
           sqgetGlobalVar('server_sort_array',$server_sort_array,SQ_SESSION);
           if ($server_sort_array && is_array($server_sort_array)) {
               $aMbxResponse['SORT_ARRAY'] = $server_sort_array;
               // check if oldsort can be used in case we changed the sort order of the same column
               if (isset($newsort) ) {
                    if ((($newsort % 2) && ($newsort + 1 == $oldsort)) ||
                        (!($newsort % 2) && ($newsort - 1 == $oldsort))) {
                        $server_sort_array = array_reverse($server_sort_array);
                    } else {
                        $server_sort_array = false;
                    }
               }
               $aMbxResponse['SORT_ARRAY'] = $server_sort_array;
           }
       }
    }
}

$aLastSelectedMailbox['NAME'] = $mailbox;
$aLastSelectedMailbox['EXISTS'] = $aMbxResponse['EXISTS'];
$aLastSelectedMailbox['UIDVALIDITY'] = $aMbxResponse['UIDVALIDITY'];
$aLastSelectedMailbox['UIDNEXT'] = $aMbxResponse['UIDNEXT'];
$aLastSelectedMailbox['PERMANENTFLAGS'] = $aMbxResponse['PERMANENTFLAGS'];
$aLastSelectedMailbox['OFFSET'] = (isset($startMessage) && $startMessage) ? $startMessage -1 : 0;
$aLastSelectedMailbox['PAGEOFFSET'] = (isset($startMessage) && $startMessage) ? $startMessage : 1;
$aLastSelectedMailbox['SORT'] = ($sort !== false) ? $sort : 0;
$aLastSelectedMailbox['LIMIT'] = ($show_num != 999999) ? $show_num : $aMbxResponse['EXISTS'];

$aLastSelectedMailbox['UIDSET'] = $aMbxResponse['SORT_ARRAY'];
$aLastSelectedMailbox['SEEN'] = (isset($aMbxResponse['SEEN'])) ? $aMbxResponse['SEEN'] : $aMbxResponse['EXISTS'];
$aLastSelectedMailbox['RECENT'] = (isset($aMbxResponse['RECENT'])) ? $aMbxResponse['RECENT'] : 0;

$aLastSelectedMailbox['AUTO_EXPUNGE'] = $auto_expunge;

/* decide if we are thread sorting or not */
$aLastSelectedMailbox['ALLOW_THREAD'] = $allow_thread_sort;
if ($allow_thread_sort == TRUE) {
    if (isset($set_thread)) {
        $aLastSelectedMailbox['SORT_ARRAY'] = false;
        if (sqsession_is_registered('indent_array')) {
            sqsession_unregister('indent_array');
        }
        if (sqsession_is_registered('server_sort_array')) {
            sqsession_unregister('server_sort_array');
        }
        if ($set_thread == 1) {
            setPref($data_dir, $username, "thread_$mailbox", 1);
            $thread_sort_messages = '1';
        } else if ($set_thread == 2)  {
            setPref($data_dir, $username, "thread_$mailbox", 0);
            $thread_sort_messages = '0';
        }
    } else {
        $thread_sort_messages = getPref($data_dir, $username, "thread_$mailbox");
    }
} else {
    $thread_sort_messages = 0;
}
if ($thread_sort_messages == 1) {
    $aLastSelectedMailbox['SORT_METHOD'] = 'THREAD';
} else if ($allow_server_sort) {
    $aLastSelectedMailbox['SORT_METHOD'] = 'SERVER';
} else {
    $aLastSelectedMailbox['SORT_METHOD'] = 'SQUIRREL';
}

if ($composenew) {
    $comp_uri = SM_PATH . 'src/compose.php?mailbox='. urlencode($mailbox).
        "&session=$session";
    displayPageHeader($color, $mailbox, "comp_in_new('$comp_uri');", false);
} else {
    displayPageHeader($color, $mailbox);
}
do_hook('right_main_after_header');

/* display a message to the user that their mail has been sent */
if (isset($mail_sent) && $mail_sent == 'yes') {
    $note = _("Your Message has been sent.");
}
if (isset($note)) {
    echo html_tag( 'div', '<b>' . $note .'</b>', 'center' ) . "<br>\n";
}

if ( sqgetGlobalVar('just_logged_in', $just_logged_in, SQ_SESSION) ) {
    if ($just_logged_in == true) {
        $just_logged_in = false;
        sqsession_register($just_logged_in, 'just_logged_in');

        if (strlen(trim($motd)) > 0) {
            echo html_tag( 'table',
                        html_tag( 'tr',
                            html_tag( 'td',
                                html_tag( 'table',
                                    html_tag( 'tr',
                                        html_tag( 'td', $motd, 'center' )
                                    ) ,
                                '', $color[4], 'width="100%" cellpadding="5" cellspacing="1" border="0"' )
                             )
                        ) ,
                    'center', $color[9], 'width="70%" cellpadding="0" cellspacing="3" border="0"' );
        }
    }
}

showMessagesForMailbox($imapConnection,$aLastSelectedMailbox);

do_hook('right_main_bottom');
sqimap_logout ($imapConnection);
echo '</body></html>';

sqsession_register($aLastSelectedMailbox,'aLastSelectedMailbox');

?>