| | |
| | | { |
| | | $now = mktime(); |
| | | $valid = ($_COOKIE['sessauth'] == rcmail_auth_hash(session_id(), $_SESSION['auth_time'])); |
| | | |
| | | // renew auth cookie every 5 minutes |
| | | if (!$valid || ($now-$_SESSION['auth_time'] > 300)) |
| | | |
| | | // renew auth cookie every 5 minutes (only for GET requests) |
| | | if (!$valid || ($_SERVER['REQUEST_METHOD']!='POST' && $now-$_SESSION['auth_time'] > 300)) |
| | | { |
| | | $_SESSION['auth_time'] = $now; |
| | | setcookie('sessauth', rcmail_auth_hash(session_id(), $now)); |
| | |
| | | if ($CONFIG['enable_caching']===TRUE) |
| | | $IMAP->set_caching(TRUE); |
| | | |
| | | if (is_array($CONFIG['default_imap_folders'])) |
| | | $IMAP->set_default_mailboxes($CONFIG['default_imap_folders']); |
| | | |
| | | // set pagesize from config |
| | | if (isset($CONFIG['pagesize'])) |
| | | $IMAP->set_pagesize($CONFIG['pagesize']); |
| | |
| | | // set root dir from config |
| | | if (!empty($CONFIG['imap_root'])) |
| | | $IMAP->set_rootdir($CONFIG['imap_root']); |
| | | |
| | | if (is_array($CONFIG['default_imap_folders'])) |
| | | $IMAP->set_default_mailboxes($CONFIG['default_imap_folders']); |
| | | |
| | | if (!empty($_SESSION['mbox'])) |
| | | $IMAP->set_mailbox($_SESSION['mbox']); |
| | |
| | | Inspired by Marco <P0L0_notspam_binware.org> |
| | | */ |
| | | // Check if we need to add domain |
| | | if ($CONFIG['username_domain'] && !strstr($user, '@')) |
| | | if (!empty($CONFIG['username_domain']) && !strstr($user, '@')) |
| | | { |
| | | if (is_array($CONFIG['username_domain']) && isset($CONFIG['username_domain'][$host])) |
| | | $user .= '@'.$CONFIG['username_domain'][$host]; |
| | | else if (!empty($CONFIG['username_domain'])) |
| | | $user .= '@'.$CONFIG['username_domain']; |
| | | else if (is_string($CONFIG['username_domain'])) |
| | | $user .= '@'.$CONFIG['username_domain']; |
| | | } |
| | | |
| | | |
| | |
| | | $_SESSION['user_lang'] = $sess_user_lang; |
| | | $_SESSION['password'] = encrypt_passwd($pass); |
| | | |
| | | // force reloading complete list of subscribed mailboxes |
| | | // force reloading complete list of subscribed mailboxes |
| | | rcmail_set_imap_prop(); |
| | | $IMAP->clear_cache('mailboxes'); |
| | | $IMAP->create_default_folders(); |
| | | |
| | | return TRUE; |
| | | } |
| | |
| | | |
| | | $framed = $GLOBALS['_framed']; |
| | | $command = sprintf("display_message('%s', '%s');", |
| | | addslashes(rep_specialchars_output(rcube_label(array('name' => $message, 'vars' => $vars)))), |
| | | rep_specialchars_output(rcube_label(array('name' => $message, 'vars' => $vars)), 'js'), |
| | | $type); |
| | | |
| | | if ($REMOTE_REQUEST) |
| | | return 'this.'.$command; |
| | | |
| | | else |
| | | $OUTPUT->add_script(sprintf("%s%s.%s", |
| | | $OUTPUT->add_script(sprintf("%s%s.%s\n", |
| | | $framed ? sprintf('if(parent.%s)parent.', $JS_OBJECT_NAME) : '', |
| | | $JS_OBJECT_NAME, |
| | | $command)); |
| | | |
| | | // console(rcube_label($message)); |
| | | } |
| | | |
| | | |
| | | function console($msg, $type=1) |
| | | { |
| | | if ($GLOBALS['REMOTE_REQUEST']) |
| | | print "// $msg\n"; |
| | | else |
| | | { |
| | | print $msg; |
| | | print "\n<hr>\n"; |
| | | } |
| | | } |
| | | |
| | | |
| | |
| | | flush(); |
| | | else // terminate script |
| | | exit; |
| | | } |
| | | |
| | | |
| | | // send correctly formatted response for a request posted to an iframe |
| | | function rcube_iframe_response($js_code='') |
| | | { |
| | | global $OUTPUT, $JS_OBJECT_NAME; |
| | | |
| | | if (!empty($js_code)) |
| | | $OUTPUT->add_script("if(parent.$JS_OBJECT_NAME){\n" . $js_code . "\n}"); |
| | | |
| | | $OUTPUT->write(); |
| | | exit; |
| | | } |
| | | |
| | | |
| | |
| | | // convert string to UTF-8 |
| | | if ($from=='UTF-7') |
| | | $str = rcube_charset_convert(UTF7DecodeString($str), 'ISO-8859-1'); |
| | | else if ($from=='ISO-8859-1' && function_exists('utf8_encode')) |
| | | else if (($from=='ISO-8859-1') && function_exists('utf8_encode')) |
| | | $str = utf8_encode($str); |
| | | else if ($from!='UTF-8') |
| | | { |
| | |
| | | |
| | | // encode string for output |
| | | if ($to=='UTF-7') |
| | | return UTF7EncodeString($str); |
| | | return UTF7EncodeString(rcube_charset_convert($str, 'UTF-8', 'ISO-8859-1')); |
| | | else if ($to=='ISO-8859-1' && function_exists('utf8_decode')) |
| | | return utf8_decode($str); |
| | | else if ($to!='UTF-8') |
| | |
| | | if ($OUTPUT->get_charset()!='UTF-8') |
| | | $str = rcube_charset_convert($str, $GLOBALS['CHARSET'], $OUTPUT->get_charset()); |
| | | |
| | | return preg_replace(array("/\r\n/", '/"/', "/([^\\\])'/"), array('\n', '\"', "$1\'"), strtr($str, $js_rep_table)); |
| | | return addslashes(preg_replace(array("/\r\n/", "/\r/"), array('\n', '\n'), strtr($str, $js_rep_table))); |
| | | } |
| | | |
| | | // encode for RTF |
| | |
| | | } |
| | | |
| | | |
| | | /****** debugging function ********/ |
| | | /****** debugging functions ********/ |
| | | |
| | | |
| | | /** |
| | | * Print or write debug messages |
| | | * |
| | | * @param mixed Debug message or data |
| | | */ |
| | | function console($msg) |
| | | { |
| | | if (!is_string($msg)) |
| | | $msg = var_export($msg, true); |
| | | |
| | | if (!($GLOBALS['CONFIG']['debug_level'] & 4)) |
| | | write_log('console', $msg); |
| | | else if ($GLOBALS['REMOTE_REQUEST']) |
| | | print "/*\n $msg \n*/\n"; |
| | | else |
| | | { |
| | | print '<div style="background:#eee; border:1px solid #ccc; margin-bottom:3px; padding:6px"><pre>'; |
| | | print $msg; |
| | | print "</pre></div>\n"; |
| | | } |
| | | } |
| | | |
| | | |
| | | /** |
| | | * Append a line to a logfile in the logs directory. |
| | | * Date will be added automatically to the line. |
| | | * |
| | | * @param $name Name of logfile |
| | | * @param $line Line to append |
| | | */ |
| | | function write_log($name, $line) |
| | | { |
| | | global $CONFIG; |
| | | |
| | | $log_entry = sprintf("[%s]: %s\n", |
| | | date("d-M-Y H:i:s O", mktime()), |
| | | $line); |
| | | |
| | | if (empty($CONFIG['log_dir'])) |
| | | $CONFIG['log_dir'] = $INSTALL_PATH.'logs'; |
| | | |
| | | // try to open specific log file for writing |
| | | if ($fp = @fopen($CONFIG['log_dir'].'/'.$name, 'a')) |
| | | { |
| | | fwrite($fp, $log_entry); |
| | | fclose($fp); |
| | | } |
| | | } |
| | | |
| | | |
| | | function rcube_timer() |
| | | { |