| 1 | <?php |
|---|
| 2 | /* |
|---|
| 3 | +-------------------------------------------------------------------------+ |
|---|
| 4 | | RoundCube Webmail IMAP Client | |
|---|
| 5 | | Version 0.3-20090201 | |
|---|
| 6 | | | |
|---|
| 7 | | Copyright (C) 2005-2009, RoundCube Dev. - Switzerland | |
|---|
| 8 | | | |
|---|
| 9 | | This program is free software; you can redistribute it and/or modify | |
|---|
| 10 | | it under the terms of the GNU General Public License version 2 | |
|---|
| 11 | | as published by the Free Software Foundation. | |
|---|
| 12 | | | |
|---|
| 13 | | This program is distributed in the hope that it will be useful, | |
|---|
| 14 | | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
|---|
| 15 | | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
|---|
| 16 | | GNU General Public License for more details. | |
|---|
| 17 | | | |
|---|
| 18 | | You should have received a copy of the GNU General Public License along | |
|---|
| 19 | | with this program; if not, write to the Free Software Foundation, Inc., | |
|---|
| 20 | | 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. | |
|---|
| 21 | | | |
|---|
| 22 | +-------------------------------------------------------------------------+ |
|---|
| 23 | | Author: Thomas Bruederli <roundcube@gmail.com> | |
|---|
| 24 | +-------------------------------------------------------------------------+ |
|---|
| 25 | |
|---|
| 26 | $Id$ |
|---|
| 27 | |
|---|
| 28 | */ |
|---|
| 29 | |
|---|
| 30 | // include environment |
|---|
| 31 | require_once 'program/include/iniset.php'; |
|---|
| 32 | |
|---|
| 33 | // init application and start session with requested task |
|---|
| 34 | $RCMAIL = rcmail::get_instance(); |
|---|
| 35 | |
|---|
| 36 | // init output class |
|---|
| 37 | $OUTPUT = !empty($_REQUEST['_remote']) ? $RCMAIL->init_json() : $RCMAIL->load_gui(!empty($_REQUEST['_framed'])); |
|---|
| 38 | |
|---|
| 39 | // set output buffering |
|---|
| 40 | if ($RCMAIL->action != 'get' && $RCMAIL->action != 'viewsource') { |
|---|
| 41 | // use gzip compression if supported |
|---|
| 42 | if (function_exists('ob_gzhandler') |
|---|
| 43 | && !ini_get('zlib.output_compression') |
|---|
| 44 | && ini_get('output_handler') != 'ob_gzhandler') { |
|---|
| 45 | ob_start('ob_gzhandler'); |
|---|
| 46 | } |
|---|
| 47 | else { |
|---|
| 48 | ob_start(); |
|---|
| 49 | } |
|---|
| 50 | } |
|---|
| 51 | |
|---|
| 52 | // check if config files had errors |
|---|
| 53 | if ($err_str = $RCMAIL->config->get_error()) { |
|---|
| 54 | raise_error(array( |
|---|
| 55 | 'code' => 601, |
|---|
| 56 | 'type' => 'php', |
|---|
| 57 | 'message' => $err_str), false, true); |
|---|
| 58 | } |
|---|
| 59 | |
|---|
| 60 | // check DB connections and exit on failure |
|---|
| 61 | if ($err_str = $DB->is_error()) { |
|---|
| 62 | raise_error(array( |
|---|
| 63 | 'code' => 603, |
|---|
| 64 | 'type' => 'db', |
|---|
| 65 | 'message' => $err_str), FALSE, TRUE); |
|---|
| 66 | } |
|---|
| 67 | |
|---|
| 68 | // error steps |
|---|
| 69 | if ($RCMAIL->action=='error' && !empty($_GET['_code'])) { |
|---|
| 70 | raise_error(array('code' => hexdec($_GET['_code'])), FALSE, TRUE); |
|---|
| 71 | } |
|---|
| 72 | |
|---|
| 73 | |
|---|
| 74 | // trigger startup plugin hook |
|---|
| 75 | $startup = $RCMAIL->plugins->exec_hook('startup', array('task' => $RCMAIL->task, 'action' => $RCMAIL->action)); |
|---|
| 76 | $RCMAIL->set_task($startup['task']); |
|---|
| 77 | $RCMAIL->action = $startup['action']; |
|---|
| 78 | |
|---|
| 79 | |
|---|
| 80 | // try to log in |
|---|
| 81 | if ($RCMAIL->action=='login' && $RCMAIL->task=='mail') { |
|---|
| 82 | $auth = $RCMAIL->plugins->exec_hook('authenticate', array( |
|---|
| 83 | 'host' => $RCMAIL->autoselect_host(), |
|---|
| 84 | 'user' => trim(get_input_value('_user', RCUBE_INPUT_POST)), |
|---|
| 85 | )) + array('pass' => get_input_value('_pass', RCUBE_INPUT_POST, true, 'ISO-8859-1')); |
|---|
| 86 | |
|---|
| 87 | // check if client supports cookies |
|---|
| 88 | if (empty($_COOKIE)) { |
|---|
| 89 | $OUTPUT->show_message("cookiesdisabled", 'warning'); |
|---|
| 90 | } |
|---|
| 91 | else if ($_SESSION['temp'] && !empty($auth['user']) && !empty($auth['host']) && isset($auth['pass']) && |
|---|
| 92 | $RCMAIL->login($auth['user'], $auth['pass'], $auth['host'])) { |
|---|
| 93 | // create new session ID |
|---|
| 94 | unset($_SESSION['temp']); |
|---|
| 95 | rcube_sess_regenerate_id(); |
|---|
| 96 | |
|---|
| 97 | // send auth cookie if necessary |
|---|
| 98 | $RCMAIL->authenticate_session(); |
|---|
| 99 | |
|---|
| 100 | // log successful login |
|---|
| 101 | if ($RCMAIL->config->get('log_logins')) { |
|---|
| 102 | write_log('userlogins', sprintf('Successful login for %s (id %d) from %s', |
|---|
| 103 | $RCMAIL->user->get_username(), |
|---|
| 104 | $RCMAIL->user->ID, |
|---|
| 105 | $_SERVER['REMOTE_ADDR'])); |
|---|
| 106 | } |
|---|
| 107 | |
|---|
| 108 | // send redirect |
|---|
| 109 | $OUTPUT->redirect(); |
|---|
| 110 | } |
|---|
| 111 | else { |
|---|
| 112 | $OUTPUT->show_message($IMAP->error_code < -1 ? 'imaperror' : 'loginfailed', 'warning'); |
|---|
| 113 | $RCMAIL->kill_session(); |
|---|
| 114 | } |
|---|
| 115 | } |
|---|
| 116 | |
|---|
| 117 | // end session |
|---|
| 118 | else if (($RCMAIL->task=='logout' || $RCMAIL->action=='logout') && isset($_SESSION['user_id'])) { |
|---|
| 119 | $OUTPUT->show_message('loggedout'); |
|---|
| 120 | $RCMAIL->logout_actions(); |
|---|
| 121 | $RCMAIL->kill_session(); |
|---|
| 122 | } |
|---|
| 123 | |
|---|
| 124 | // check session and auth cookie |
|---|
| 125 | else if ($RCMAIL->action != 'login' && $_SESSION['user_id'] && $RCMAIL->action != 'send') { |
|---|
| 126 | if (!$RCMAIL->authenticate_session()) { |
|---|
| 127 | $OUTPUT->show_message('sessionerror', 'error'); |
|---|
| 128 | $RCMAIL->kill_session(); |
|---|
| 129 | } |
|---|
| 130 | } |
|---|
| 131 | |
|---|
| 132 | |
|---|
| 133 | // check client X-header to verify request origin |
|---|
| 134 | if ($OUTPUT->ajax_call) { |
|---|
| 135 | if (!$RCMAIL->config->get('devel_mode') && !rc_request_header('X-RoundCube-Referer')) { |
|---|
| 136 | header('HTTP/1.1 404 Not Found'); |
|---|
| 137 | die("Invalid Request"); |
|---|
| 138 | } |
|---|
| 139 | } |
|---|
| 140 | |
|---|
| 141 | |
|---|
| 142 | // not logged in -> show login page |
|---|
| 143 | if (empty($RCMAIL->user->ID)) { |
|---|
| 144 | |
|---|
| 145 | if ($OUTPUT->ajax_call) |
|---|
| 146 | $OUTPUT->redirect(array(), 2000); |
|---|
| 147 | |
|---|
| 148 | // check if installer is still active |
|---|
| 149 | if ($RCMAIL->config->get('enable_installer') && is_readable('./installer/index.php')) { |
|---|
| 150 | $OUTPUT->add_footer(html::div(array('style' => "background:#ef9398; border:2px solid #dc5757; padding:0.5em; margin:2em auto; width:50em"), |
|---|
| 151 | html::tag('h2', array('style' => "margin-top:0.2em"), "Installer script is still accessible") . |
|---|
| 152 | html::p(null, "The install script of your RoundCube installation is still stored in its default location!") . |
|---|
| 153 | html::p(null, "Please <b>remove</b> the whole <tt>installer</tt> folder from the RoundCube directory because . |
|---|
| 154 | these files may expose sensitive configuration data like server passwords and encryption keys |
|---|
| 155 | to the public. Make sure you cannot access the <a href=\"./installer/\">installer script</a> from your browser.") |
|---|
| 156 | ) |
|---|
| 157 | ); |
|---|
| 158 | } |
|---|
| 159 | |
|---|
| 160 | $OUTPUT->set_env('task', 'login'); |
|---|
| 161 | $OUTPUT->send('login'); |
|---|
| 162 | } |
|---|
| 163 | |
|---|
| 164 | |
|---|
| 165 | // handle keep-alive signal |
|---|
| 166 | if ($RCMAIL->action == 'keep-alive') { |
|---|
| 167 | $OUTPUT->reset(); |
|---|
| 168 | $OUTPUT->send(); |
|---|
| 169 | } |
|---|
| 170 | // save preference value |
|---|
| 171 | else if ($RCMAIL->action == 'save-pref') { |
|---|
| 172 | $RCMAIL->user->save_prefs(array(get_input_value('_name', RCUBE_INPUT_POST) => get_input_value('_value', RCUBE_INPUT_POST))); |
|---|
| 173 | $OUTPUT->reset(); |
|---|
| 174 | $OUTPUT->send(); |
|---|
| 175 | } |
|---|
| 176 | |
|---|
| 177 | |
|---|
| 178 | // map task/action to a certain include file |
|---|
| 179 | $action_map = array( |
|---|
| 180 | 'mail' => array( |
|---|
| 181 | 'preview' => 'show.inc', |
|---|
| 182 | 'print' => 'show.inc', |
|---|
| 183 | 'moveto' => 'move_del.inc', |
|---|
| 184 | 'delete' => 'move_del.inc', |
|---|
| 185 | 'send' => 'sendmail.inc', |
|---|
| 186 | 'expunge' => 'folders.inc', |
|---|
| 187 | 'purge' => 'folders.inc', |
|---|
| 188 | 'remove-attachment' => 'attachments.inc', |
|---|
| 189 | 'display-attachment' => 'attachments.inc', |
|---|
| 190 | 'upload' => 'attachments.inc', |
|---|
| 191 | ), |
|---|
| 192 | |
|---|
| 193 | 'addressbook' => array( |
|---|
| 194 | 'add' => 'edit.inc', |
|---|
| 195 | ), |
|---|
| 196 | |
|---|
| 197 | 'settings' => array( |
|---|
| 198 | 'folders' => 'manage_folders.inc', |
|---|
| 199 | 'create-folder' => 'manage_folders.inc', |
|---|
| 200 | 'rename-folder' => 'manage_folders.inc', |
|---|
| 201 | 'delete-folder' => 'manage_folders.inc', |
|---|
| 202 | 'subscribe' => 'manage_folders.inc', |
|---|
| 203 | 'unsubscribe' => 'manage_folders.inc', |
|---|
| 204 | 'add-identity' => 'edit_identity.inc', |
|---|
| 205 | ) |
|---|
| 206 | ); |
|---|
| 207 | |
|---|
| 208 | // include task specific functions |
|---|
| 209 | include_once 'program/steps/'.$RCMAIL->task.'/func.inc'; |
|---|
| 210 | |
|---|
| 211 | // allow 5 "redirects" to another action |
|---|
| 212 | $redirects = 0; $incstep = null; |
|---|
| 213 | while ($redirects < 5) { |
|---|
| 214 | $stepfile = !empty($action_map[$RCMAIL->task][$RCMAIL->action]) ? |
|---|
| 215 | $action_map[$RCMAIL->task][$RCMAIL->action] : strtr($RCMAIL->action, '-', '_') . '.inc'; |
|---|
| 216 | |
|---|
| 217 | // execute a plugin action |
|---|
| 218 | if (eregi('^plugin.', $RCMAIL->action)) { |
|---|
| 219 | $RCMAIL->plugins->exec_action($RCMAIL->action); |
|---|
| 220 | break; |
|---|
| 221 | } |
|---|
| 222 | // try to include the step file |
|---|
| 223 | else if (is_file(($incfile = 'program/steps/'.$RCMAIL->task.'/'.$stepfile))) { |
|---|
| 224 | include($incfile); |
|---|
| 225 | $redirects++; |
|---|
| 226 | } |
|---|
| 227 | else { |
|---|
| 228 | break; |
|---|
| 229 | } |
|---|
| 230 | } |
|---|
| 231 | |
|---|
| 232 | |
|---|
| 233 | // parse main template (default) |
|---|
| 234 | $OUTPUT->send($RCMAIL->task); |
|---|
| 235 | |
|---|
| 236 | |
|---|
| 237 | // if we arrive here, something went wrong |
|---|
| 238 | raise_error(array( |
|---|
| 239 | 'code' => 404, |
|---|
| 240 | 'type' => 'php', |
|---|
| 241 | 'line' => __LINE__, |
|---|
| 242 | 'file' => __FILE__, |
|---|
| 243 | 'message' => "Invalid request"), true, true); |
|---|
| 244 | |
|---|
| 245 | ?> |
|---|