githubFork/roundcubemail.git

alecpl

2009-05-29 a5c2ad25327a96f69f90fd855d2151d867908134

commit \| author \| age
4e17e6	1	<?php
T	2	/*
a6f90e	3	+-------------------------------------------------------------------------+
A	4	\| RoundCube Webmail IMAP Client \|
cc97ea	5	\| Version 0.3-20090419 \|
a6f90e	6	\| \|
cbbef3	7	\| Copyright (C) 2005-2009, RoundCube Dev. - Switzerland \|
a6f90e	8	\| \|
A	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	+-------------------------------------------------------------------------+
4e17e6	25
T	26	$Id$
	27
	28	*/
15a9d1	29
47124c	30	// include environment
T	31	require_once 'program/include/iniset.php';
15a9d1	32
83a763	33	// init application and start session with requested task
T	34	$RCMAIL = rcmail::get_instance();
	35
	36	// init output class
	37	$OUTPUT = !empty($_REQUEST['_remote']) ? $RCMAIL->init_json() : $RCMAIL->load_gui(!empty($_REQUEST['_framed']));
cc97ea	38
T	39	// init plugin API
	40	$RCMAIL->plugins->init();
83a763	41
2f2f15	42	// set output buffering
197601	43	if ($RCMAIL->action != 'get' && $RCMAIL->action != 'viewsource') {
2f2f15	44	// use gzip compression if supported
03fcc1	45	if (function_exists('ob_gzhandler')
47124c	46	&& !ini_get('zlib.output_compression')
T	47	&& ini_get('output_handler') != 'ob_gzhandler') {
2f2f15	48	ob_start('ob_gzhandler');
03fcc1	49	}
47124c	50	else {
2f2f15	51	ob_start();
47124c	52	}
f11541	53	}
8affba	54
8c72e3	55	// check if config files had errors
T	56	if ($err_str = $RCMAIL->config->get_error()) {
	57	raise_error(array(
	58	'code' => 601,
	59	'type' => 'php',
	60	'message' => $err_str), false, true);
	61	}
	62
8affba	63	// check DB connections and exit on failure
47124c	64	if ($err_str = $DB->is_error()) {
f11541	65	raise_error(array(
T	66	'code' => 603,
	67	'type' => 'db',
	68	'message' => $err_str), FALSE, TRUE);
	69	}
8affba	70
4e17e6	71	// error steps
197601	72	if ($RCMAIL->action=='error' && !empty($_GET['_code'])) {
4e17e6	73	raise_error(array('code' => hexdec($_GET['_code'])), FALSE, TRUE);
47124c	74	}
570f0b	75
cc97ea	76
T	77	// trigger startup plugin hook
	78	$startup = $RCMAIL->plugins->exec_hook('startup', array('task' => $RCMAIL->task, 'action' => $RCMAIL->action));
	79	$RCMAIL->set_task($startup['task']);
	80	$RCMAIL->action = $startup['action'];
	81
	82
4e17e6	83	// try to log in
197601	84	if ($RCMAIL->action=='login' && $RCMAIL->task=='mail') {
0129d7	85	// purge the session in case of new login when a session already exists
cc97ea	86	$RCMAIL->kill_session();
0129d7	87
cc97ea	88	$auth = $RCMAIL->plugins->exec_hook('authenticate', array(
T	89	'host' => $RCMAIL->autoselect_host(),
	90	'user' => trim(get_input_value('_user', RCUBE_INPUT_POST)),
	91	)) + array('pass' => get_input_value('_pass', RCUBE_INPUT_POST, true, 'ISO-8859-1'));
	92
4e17e6	93	// check if client supports cookies
47124c	94	if (empty($_COOKIE)) {
f11541	95	$OUTPUT->show_message("cookiesdisabled", 'warning');
T	96	}
cc97ea	97	else if ($_SESSION['temp'] && !empty($auth['user']) && !empty($auth['host']) && isset($auth['pass']) &&
T	98	$RCMAIL->login($auth['user'], $auth['pass'], $auth['host'])) {
aad6e2	99	// create new session ID
f22c2c	100	rcube_sess_unset('temp');
2e3ce3	101	rcube_sess_regenerate_id();
aad6e2	102
T	103	// send auth cookie if necessary
1854c4	104	$RCMAIL->authenticate_session();
aad6e2	105
5e0045	106	// log successful login
c8a21d	107	if ($RCMAIL->config->get('log_logins')) {
T	108	write_log('userlogins', sprintf('Successful login for %s (id %d) from %s',
	109	$RCMAIL->user->get_username(),
	110	$RCMAIL->user->ID,
	111	$_SERVER['REMOTE_ADDR']));
	112	}
cc97ea	113
T	114	// restore original request parameters
	115	$query = array();
	116	if ($url = get_input_value('_url', RCUBE_INPUT_POST))
	117	parse_str($url, $query);
	118
	119	// allow plugins to control the redirect url after login success
	120	$redir = $RCMAIL->plugins->exec_hook('login_after', $query + array('task' => $RCMAIL->task));
	121	unset($redir['abort']);
5e0045	122
4e17e6	123	// send redirect
cc97ea	124	$OUTPUT->redirect($redir);
4e17e6	125	}
47124c	126	else {
7342d7	127	$OUTPUT->show_message($IMAP->error_code < -1 ? 'imaperror' : 'loginfailed', 'warning');
cc97ea	128	$RCMAIL->plugins->exec_hook('login_failed', array('code' => $IMAP->error_code, 'host' => $auth['host'], 'user' => $auth['user']));
1854c4	129	$RCMAIL->kill_session();
f11541	130	}
T	131	}
4e17e6	132
T	133	// end session
197601	134	else if (($RCMAIL->task=='logout' \|\| $RCMAIL->action=='logout') && isset($_SESSION['user_id'])) {
f11541	135	$OUTPUT->show_message('loggedout');
1854c4	136	$RCMAIL->logout_actions();
T	137	$RCMAIL->kill_session();
f11541	138	}
4e17e6	139
bac7d1	140	// check session and auth cookie
197601	141	else if ($RCMAIL->action != 'login' && $_SESSION['user_id'] && $RCMAIL->action != 'send') {
1854c4	142	if (!$RCMAIL->authenticate_session()) {
f11541	143	$OUTPUT->show_message('sessionerror', 'error');
1854c4	144	$RCMAIL->kill_session();
4e17e6	145	}
f11541	146	}
4e17e6	147
T	148
719a25	149	// check client X-header to verify request origin
47124c	150	if ($OUTPUT->ajax_call) {
835ae8	151	if (!$RCMAIL->config->get('devel_mode') && !rc_request_header('X-RoundCube-Referer')) {
719a25	152	header('HTTP/1.1 404 Not Found');
T	153	die("Invalid Request");
	154	}
	155	}
	156
4e17e6	157
T	158	// not logged in -> show login page
197601	159	if (empty($RCMAIL->user->ID)) {
83a763	160
T	161	if ($OUTPUT->ajax_call)
c719f3	162	$OUTPUT->redirect(array(), 2000);
83a763	163
330127	164	// check if installer is still active
83a763	165	if ($RCMAIL->config->get('enable_installer') && is_readable('./installer/index.php')) {
47124c	166	$OUTPUT->add_footer(html::div(array('style' => "background:#ef9398; border:2px solid #dc5757; padding:0.5em; margin:2em auto; width:50em"),
T	167	html::tag('h2', array('style' => "margin-top:0.2em"), "Installer script is still accessible") .
	168	html::p(null, "The install script of your RoundCube installation is still stored in its default location!") .
	169	html::p(null, "Please <b>remove</b> the whole <tt>installer</tt> folder from the RoundCube directory because .
	170	these files may expose sensitive configuration data like server passwords and encryption keys
	171	to the public. Make sure you cannot access the <a href=\"./installer/\">installer script</a> from your browser.")
	172	)
	173	);
	174	}
330127	175
bbf15d	176	$OUTPUT->set_env('task', 'login');
f11541	177	$OUTPUT->send('login');
T	178	}
4e17e6	179
T	180
1cded8	181	// handle keep-alive signal
48aff9	182	if ($RCMAIL->action == 'keep-alive') {
T	183	$OUTPUT->reset();
	184	$OUTPUT->send();
	185	}
	186	// save preference value
	187	else if ($RCMAIL->action == 'save-pref') {
	188	$RCMAIL->user->save_prefs(array(get_input_value('_name', RCUBE_INPUT_POST) => get_input_value('_value', RCUBE_INPUT_POST)));
f11541	189	$OUTPUT->reset();
83a763	190	$OUTPUT->send();
f11541	191	}
4e17e6	192
6ea6c9	193
T	194	// map task/action to a certain include file
	195	$action_map = array(
	196	'mail' => array(
	197	'preview' => 'show.inc',
	198	'print' => 'show.inc',
	199	'moveto' => 'move_del.inc',
	200	'delete' => 'move_del.inc',
	201	'send' => 'sendmail.inc',
	202	'expunge' => 'folders.inc',
	203	'purge' => 'folders.inc',
133bb0	204	'remove-attachment' => 'attachments.inc',
A	205	'display-attachment' => 'attachments.inc',
	206	'upload' => 'attachments.inc',
6ea6c9	207	),
88375f	208
6ea6c9	209	'addressbook' => array(
T	210	'add' => 'edit.inc',
	211	),
	212
	213	'settings' => array(
	214	'folders' => 'manage_folders.inc',
	215	'create-folder' => 'manage_folders.inc',
	216	'rename-folder' => 'manage_folders.inc',
	217	'delete-folder' => 'manage_folders.inc',
	218	'subscribe' => 'manage_folders.inc',
	219	'unsubscribe' => 'manage_folders.inc',
	220	'add-identity' => 'edit_identity.inc',
	221	)
	222	);
f5aa16	223
6ea6c9	224	// include task specific functions
T	225	include_once 'program/steps/'.$RCMAIL->task.'/func.inc';
4e17e6	226
6ea6c9	227	// allow 5 "redirects" to another action
T	228	$redirects = 0; $incstep = null;
	229	while ($redirects < 5) {
	230	$stepfile = !empty($action_map[$RCMAIL->task][$RCMAIL->action]) ?
	231	$action_map[$RCMAIL->task][$RCMAIL->action] : strtr($RCMAIL->action, '-', '_') . '.inc';
cc97ea	232
T	233	// execute a plugin action
	234	if (eregi('^plugin.', $RCMAIL->action)) {
	235	$RCMAIL->plugins->exec_action($RCMAIL->action);
	236	break;
	237	}
6ea6c9	238	// try to include the step file
cc97ea	239	else if (is_file(($incfile = 'program/steps/'.$RCMAIL->task.'/'.$stepfile))) {
6ea6c9	240	include($incfile);
T	241	$redirects++;
	242	}
	243	else {
	244	break;
	245	}
	246	}
4e17e6	247
T	248
6ea6c9	249	// parse main template (default)
197601	250	$OUTPUT->send($RCMAIL->task);
539cd4	251
T	252
	253	// if we arrive here, something went wrong
f11541	254	raise_error(array(
T	255	'code' => 404,
	256	'type' => 'php',
	257	'line' => __LINE__,
	258	'file' => __FILE__,
47124c	259	'message' => "Invalid request"), true, true);
539cd4	260
d1d2c4	261	?>