| | |
| | | */ |
| | | |
| | | require_once('lib/des.inc'); |
| | | require_once('lib/utf7.inc'); |
| | | |
| | | |
| | | // register session and connect to server |
| | |
| | | if (!$_SESSION['client_id']) |
| | | { |
| | | $_SESSION['client_id'] = $sess_id; |
| | | $_SESSION['user_lang'] = substr($CONFIG['locale_string'], 0, 2); |
| | | $_SESSION['user_lang'] = rcube_language_prop($CONFIG['locale_string']); |
| | | $_SESSION['auth_time'] = mktime(); |
| | | $_SESSION['auth'] = rcmail_auth_hash($sess_id, $_SESSION['auth_time']); |
| | | unset($GLOBALS['_auth']); |
| | |
| | | |
| | | // set session vars global |
| | | $sess_auth = $_SESSION['auth']; |
| | | $sess_user_lang = $_SESSION['user_lang']; |
| | | $sess_user_lang = rcube_language_prop($_SESSION['user_lang']); |
| | | |
| | | |
| | | // overwrite config with user preferences |
| | |
| | | $IMAP->close(); |
| | | $IMAP->write_cache(); |
| | | } |
| | | |
| | | // before closing the database connection, write session data |
| | | session_write_close(); |
| | | } |
| | | |
| | | |
| | |
| | | |
| | | return $table; |
| | | } |
| | | |
| | | |
| | | |
| | | // check the given string and returns language properties |
| | | function rcube_language_prop($lang, $prop='lang') |
| | | { |
| | | global $INSTLL_PATH; |
| | | static $rcube_languages, $rcube_language_aliases, $rcube_charsets; |
| | | |
| | | if (empty($rcube_languages)) |
| | | @include($INSTLL_PATH.'program/localization/index.inc'); |
| | | |
| | | // check if we have an alias for that language |
| | | if (!isset($rcube_languages[$lang]) && isset($rcube_language_aliases[$lang])) |
| | | $lang = $rcube_language_aliases[$lang]; |
| | | |
| | | // try the first two chars |
| | | if (!isset($rcube_languages[$lang]) && strlen($lang>2)) |
| | | { |
| | | $lang = substr($lang, 0, 2); |
| | | $lang = rcube_language_prop($lang); |
| | | } |
| | | |
| | | if (!isset($rcube_languages[$lang])) |
| | | $lang = 'en_US'; |
| | | |
| | | // language has special charset configured |
| | | if (isset($rcube_charsets[$lang])) |
| | | $charset = $rcube_charsets[$lang]; |
| | | else |
| | | $charset = 'UTF-8'; |
| | | |
| | | if ($prop=='charset') |
| | | return $charset; |
| | | else |
| | | return $lang; |
| | | } |
| | | |
| | | |
| | | // init output object for GUI and add common scripts |
| | | function load_gui() |
| | | { |
| | | global $CONFIG, $OUTPUT, $COMM_PATH, $JS_OBJECT_NAME, $CHARSET, $sess_user_lang; |
| | | global $CONFIG, $OUTPUT, $COMM_PATH, $JS_OBJECT_NAME, $sess_user_lang; |
| | | |
| | | // init output page |
| | | $OUTPUT = new rcube_html_page(); |
| | |
| | | |
| | | // set user-selected charset |
| | | if (!empty($CONFIG['charset'])) |
| | | { |
| | | $OUTPUT->set_charset($CONFIG['charset']); |
| | | $CHARSET = $CONFIG['charset']; |
| | | } |
| | | else |
| | | rcmail_set_locale($sess_user_lang); |
| | | |
| | | |
| | | // add some basic label to client |
| | | rcube_add_label('loading'); |
| | | } |
| | | } |
| | | |
| | | |
| | | // set localization charset based on the given language |
| | | function rcmail_set_locale($lang) |
| | | { |
| | | global $OUTPUT, $INSTLL_PATH, $CHARSET; |
| | | static $rcube_charsets; |
| | | |
| | | if (!$rcube_charsets) |
| | | @include($INSTLL_PATH.'program/localization/index.inc'); |
| | | |
| | | if (isset($rcube_charsets[$lang])) |
| | | { |
| | | $OUTPUT->set_charset($rcube_charsets[$lang]); |
| | | $CHARSET = $rcube_charsets[$lang]; |
| | | } |
| | | else |
| | | { |
| | | $OUTPUT->set_charset('ISO-8859-1'); |
| | | $CHARSET = 'ISO-8859-1'; |
| | | } |
| | | global $OUTPUT; |
| | | $OUTPUT->set_charset(rcube_language_prop($lang, 'charset')); |
| | | } |
| | | |
| | | |
| | |
| | | |
| | | |
| | | |
| | | // convert a string from one charset to another |
| | | // this function is not complete and not tested well |
| | | function rcube_charset_convert($str, $from, $to=NULL) |
| | | { |
| | | $from = strtolower($from); |
| | | $to = $to==NULL ? strtolower($GLOBALS['CHARSET']) : strtolower($to); |
| | | |
| | | if ($from==$to) |
| | | return $str; |
| | | |
| | | // decode characters |
| | | if ($from=='utf-7') |
| | | $str = UTF7DecodeString($str); |
| | | else if ($from=='utf-8' && function_exists('utf8_decode')) |
| | | $str = utf8_decode($str); |
| | | else if ($from=="koi8-r") |
| | | $str = convert_cyr_string($str, 'k', 'i'); |
| | | else if ($from=="windows-1251" || $from=="win-1251") |
| | | $str = convert_cyr_string($str, 'w', 'i'); |
| | | else if ($from=="x-cp866") |
| | | $str = convert_cyr_string($str, 'a', 'i'); |
| | | else if ($from=="x-mac-cyrillic") |
| | | $str = convert_cyr_string($str, 'm', 'i'); |
| | | |
| | | // encode string for output |
| | | if ($to=='utf-8' && function_exists('utf8_encode')) |
| | | return utf8_encode($str); |
| | | else if ($to=='utf-7') |
| | | return UTF7EncodeString($str); |
| | | |
| | | // return raw string |
| | | return $str; |
| | | } |
| | | |
| | | |
| | | |
| | | // replace specials characters to a specific encoding type |
| | | function rep_specialchars_output($str, $enctype='', $mode='', $newlines=TRUE) |
| | | { |
| | | global $OUTPUT_TYPE, $CHARSET; |
| | | global $OUTPUT_TYPE, $OUTPUT; |
| | | static $html_encode_arr, $js_rep_table, $rtf_rep_table, $xml_rep_table; |
| | | |
| | | if (!$enctype) |
| | |
| | | // convert nbsps back to normal spaces if not html |
| | | if ($enctype!='html') |
| | | $str = str_replace(chr(160), ' ', $str); |
| | | |
| | | |
| | | // encode for plaintext |
| | | if ($enctype=='text') |
| | |
| | | { |
| | | if (!$html_encode_arr) |
| | | { |
| | | if ($CHARSET=='ISO-8859-1') |
| | | { |
| | | $html_encode_arr = get_html_translation_table(HTML_ENTITIES); |
| | | $html_encode_arr[chr(128)] = '€'; |
| | | } |
| | | else |
| | | $html_encode_arr = get_html_translation_table(HTML_SPECIALCHARS); |
| | | |
| | | $html_encode_arr = get_html_translation_table(HTML_SPECIALCHARS); |
| | | unset($html_encode_arr['?']); |
| | | unset($html_encode_arr['&']); |
| | | } |
| | |
| | | $str = strip_tags($str); |
| | | |
| | | $out = strtr($str, $encode_arr); |
| | | |
| | | |
| | | return $newlines ? nl2br($out) : $out; |
| | | } |
| | | |
| | |
| | | $rtf_rep_table[Chr($c)] = "\\'$hex"; |
| | | $xml_rep_table[Chr($c)] = "&#$c;"; |
| | | |
| | | if ($CHARSET=='ISO-8859-1') |
| | | if ($OUTPUT->get_charset()=='ISO-8859-1') |
| | | $js_rep_table[Chr($c)] = sprintf("\u%s%s", str_repeat('0', 4-strlen($hex)), $hex); |
| | | } |
| | | |
| | |
| | | |
| | | function rcube_xml_command($command, $str_attrib, $a_attrib=NULL) |
| | | { |
| | | global $IMAP, $CONFIG; |
| | | global $IMAP, $CONFIG, $OUTPUT; |
| | | |
| | | $attrib = array(); |
| | | $command = strtolower($command); |
| | |
| | | 'recordscountdisplay' => 'rcmail_rowcount_display', |
| | | 'contactdetails' => 'rcmail_contact_details', |
| | | 'contacteditform' => 'rcmail_contact_editform', |
| | | 'ldappublicsearch' => 'rcmail_ldap_public_search_form', |
| | | 'ldappublicaddresslist' => 'rcmail_ldap_public_list', |
| | | |
| | | // USER SETTINGS |
| | | 'userprefs' => 'rcmail_user_prefs_form', |
| | |
| | | else if (isset($GLOBALS['PAGE_TITLE'])) |
| | | $title .= $GLOBALS['PAGE_TITLE']; |
| | | else if ($task=='mail' && ($mbox_name = $IMAP->get_mailbox_name())) |
| | | $title .= UTF7DecodeString($mbox_name); |
| | | $title .= rcube_charset_convert($mbox_name, 'UTF-7', 'UTF-8'); |
| | | else |
| | | $title .= $task; |
| | | |
| | |
| | | |
| | | |
| | | |
| | | function rcube_table_output($attrib, $sql_result, $a_show_cols, $id_col) |
| | | function rcube_table_output($attrib, $table_data, $a_show_cols, $id_col) |
| | | { |
| | | global $DB; |
| | | |
| | |
| | | $table .= "</tr></thead>\n<tbody>\n"; |
| | | |
| | | $c = 0; |
| | | while ($sql_result && ($sql_arr = $DB->fetch_assoc($sql_result))) |
| | | |
| | | if (!is_array($table_data)) |
| | | { |
| | | $zebra_class = $c%2 ? 'even' : 'odd'; |
| | | |
| | | $table .= sprintf('<tr id="rcmrow%d" class="contact '.$zebra_class.'">'."\n", $sql_arr[$id_col]); |
| | | |
| | | // format each col |
| | | foreach ($a_show_cols as $col) |
| | | while ($table_data && ($sql_arr = $DB->fetch_assoc($table_data))) |
| | | { |
| | | $cont = rep_specialchars_output($sql_arr[$col]); |
| | | $table .= '<td class="'.$col.'">' . $cont . "</td>\n"; |
| | | } |
| | | $zebra_class = $c%2 ? 'even' : 'odd'; |
| | | |
| | | $table .= "</tr>\n"; |
| | | $c++; |
| | | $table .= sprintf('<tr id="rcmrow%d" class="contact '.$zebra_class.'">'."\n", $sql_arr[$id_col]); |
| | | |
| | | // format each col |
| | | foreach ($a_show_cols as $col) |
| | | { |
| | | $cont = rep_specialchars_output($sql_arr[$col]); |
| | | $table .= '<td class="'.$col.'">' . $cont . "</td>\n"; |
| | | } |
| | | |
| | | $table .= "</tr>\n"; |
| | | $c++; |
| | | } |
| | | } |
| | | else |
| | | { |
| | | foreach ($table_data as $row_data) |
| | | { |
| | | $zebra_class = $c%2 ? 'even' : 'odd'; |
| | | |
| | | $table .= sprintf('<tr id="rcmrow%d" class="contact '.$zebra_class.'">'."\n", $row_data[$id_col]); |
| | | |
| | | // format each col |
| | | foreach ($a_show_cols as $col) |
| | | { |
| | | $cont = rep_specialchars_output($row_data[$col]); |
| | | $table .= '<td class="'.$col.'">' . $cont . "</td>\n"; |
| | | } |
| | | |
| | | $table .= "</tr>\n"; |
| | | $c++; |
| | | } |
| | | } |
| | | |
| | | // complete message table |
| | |
| | | } |
| | | |
| | | |
| | | |
| | | function rcube_timer() |
| | | { |
| | | list($usec, $sec) = explode(" ", microtime()); |
| | |
| | | console(sprintf("%s: %0.4f sec", $label, $diff)); |
| | | } |
| | | |
| | | |
| | | ?> |
| | | ?> |