[squirrelmail.git] / src / login.php

<?php

/**
 * login.php -- simple login screen
 *
 * Copyright (c) 1999-2005 The SquirrelMail Project Team
 * Licensed under the GNU GPL. For full terms see the file COPYING.
 *
 * This a simple login screen. Some housekeeping is done to clean
 * cookies and find language.
 *
 * @version $Id$
 * @package squirrelmail
 */

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

/* SquirrelMail required files. */
require_once(SM_PATH . 'functions/strings.php');
require_once(SM_PATH . 'config/config.php');
require_once(SM_PATH . 'functions/i18n.php');
require_once(SM_PATH . 'functions/plugin.php');
require_once(SM_PATH . 'functions/constants.php');
require_once(SM_PATH . 'functions/page_header.php');
require_once(SM_PATH . 'functions/html.php');
require_once(SM_PATH . 'functions/global.php');
require_once(SM_PATH . 'functions/imap_general.php');
require_once(SM_PATH . 'functions/forms.php');

/**
 * $squirrelmail_language is set by a cookie when the user selects
 * language and logs out
 */
set_up_language($squirrelmail_language, TRUE, TRUE);

/**
 * Find out the base URI to set cookies.
 */
if (!function_exists('sqm_baseuri')){
    require_once(SM_PATH . 'functions/display_messages.php');
}
$base_uri = sqm_baseuri();

/*
 * In case the last session was not terminated properly, make sure
 * we get a new one.
 */

sqsession_destroy();

header('Pragma: no-cache');

/**
 * This detects if the IMAP server has logins disabled, and if so,
 * squelches the display of the login form and puts up a message
 * explaining the situation.
 */
if($imap_auth_mech == 'login') {
    $imap = sqimap_create_stream($imapServerAddress, $imapPort, $use_imap_tls);
    $logindisabled = sqimap_capability($imap,'LOGINDISABLED');
    sqimap_logout($imap);
    if ($logindisabled) {
        $string = _("The IMAP server is reporting that plain text logins are disabled.").'<br />'.
            _("Using CRAM-MD5 or DIGEST-MD5 authentication instead may work.").'<br />';
        if (!$use_imap_tls) {
            $string .= _("Also, the use of TLS may allow SquirrelMail to login.").'<br />';
        }
        $string .= _("Please contact your system administrator and report this error.");
        error_box($string,$color);
        exit;
    }
}

do_hook('login_cookie');

/* Output the javascript onload function. */

$header = "<script language=\"JavaScript\" type=\"text/javascript\">\n" .
          "<!--\n".
          "  function squirrelmail_loginpage_onload() {\n".
          "    var textElements = 0;\n".
          "    for (i = 0; i < document.forms[0].elements.length; i++) {\n".
          "      if (document.forms[0].elements[i].type == \"text\" || document.forms[0].elements[i].type == \"password\") {\n".
          "        textElements++;\n".
          "        if (textElements == " . (isset($loginname) ? 2 : 1) . ") {\n".
          "          document.forms[0].elements[i].focus();\n".
          "          break;\n".
          "        }\n".
          "      }\n".
          "    }\n".
          "  }\n".
          "// -->\n".
          "</script>\n";

if (@file_exists($theme[$theme_default]['PATH']))
   @include ($theme[$theme_default]['PATH']);

displayHtmlHeader( "$org_name - " . _("Login"), $header, FALSE );

echo "<body text=\"$color[8]\" bgcolor=\"$color[4]\" link=\"$color[7]\" vlink=\"$color[7]\" alink=\"$color[7]\" onLoad=\"squirrelmail_loginpage_onload()\">" .
     "\n" . '<form action="redirect.php" method="post" onSubmit="document.forms[0].js_autodetect_results.value=\'' . SMPREF_JS_ON .'\';">' . "\n";

$username_form_name = 'login_username';
$password_form_name = 'secretkey';
do_hook('login_top');

$loginname_value = (sqGetGlobalVar('loginname', $loginname) ? htmlspecialchars($loginname) : '');

/* If they don't have a logo, don't bother.. */
if (isset($org_logo) && $org_logo) {
    /* Display width and height like good little people */
    $width_and_height = '';
    if (isset($org_logo_width) && is_numeric($org_logo_width) &&
     $org_logo_width>0) {
        $width_and_height = " width=\"$org_logo_width\"";
    }
    if (isset($org_logo_height) && is_numeric($org_logo_height) &&
     $org_logo_height>0) {
        $width_and_height .= " height=\"$org_logo_height\"";
    }
}

if(sqgetGlobalVar('mailto', $mailto)) {
    $rcptaddress = addHidden('mailto', $mailto);
} else {
    $rcptaddress = '';
}
echo html_tag( 'table',
    html_tag( 'tr',
        html_tag( 'td',
            '<center>'.
            ( isset($org_logo) && $org_logo
              ? '<img src="' . $org_logo . '" alt="' .
                sprintf(_("%s Logo"), $org_name) .'"' . $width_and_height .
                ' /><br />' . "\n"
              : '' ).
            ( (isset($hide_sm_attributions) && $hide_sm_attributions) ? '' :
            '<small>' . _("SquirrelMail Webmail Application") . '<br />' ."\n".
            '  ' . _("By the SquirrelMail Development Team") . '<br /></small>' . "\n" ) .
            html_tag( 'table',
                html_tag( 'tr',
                    html_tag( 'td',
                        '<b>' . sprintf (_("%s Login"), $org_name) . "</b>\n",
                    'center', $color[0] )
                ) .
                html_tag( 'tr',
                    html_tag( 'td',  "\n" .
                        html_tag( 'table',
                            html_tag( 'tr',
                                html_tag( 'td',
                                    _("Name:") ,
                                'right', '', 'width="30%"' ) .
                                html_tag( 'td',
                                    addInput($username_form_name, $loginname_value),
                                'left', '', 'width="*"' )
                                ) . "\n" .
                            html_tag( 'tr',
                                html_tag( 'td',
                                    _("Password:") ,
                                'right', '', 'width="30%"' ) .
                                html_tag( 'td',
                                    addPwField($password_form_name).
                                    addHidden('js_autodetect_results', SMPREF_JS_OFF).
                                    $rcptaddress .
                                    addHidden('just_logged_in', '1'),
                                'left', '', 'width="*"' )
                            ) ,
                        'center', $color[4], 'border="0" width="100%"' ) ,
                    'left', $color[4] )
                ) .
                html_tag( 'tr',
                    html_tag( 'td',
                        '<center>'. addSubmit(_("Login")) .'</center>',
                    'left' )
                ),
            '', $color[4], 'border="0" width="350"' ) . '</center>',
        'center' )
    ) ,
'', $color[4], 'border="0" cellspacing="0" cellpadding="0" width="100%"' );
do_hook('login_form');
echo '</form>' . "\n";

do_hook('login_bottom');
?>
</body></html>
Commit	Line	Data
59177427	1	<?php
895905c0	2
35586184	3	/**
	4	* login.php -- simple login screen
	5	*
6c84ba1e	6	* Copyright (c) 1999-2005 The SquirrelMail Project Team
35586184	7	* Licensed under the GNU GPL. For full terms see the file COPYING.
	8	*
	9	* This a simple login screen. Some housekeeping is done to clean
	10	* cookies and find language.
	11	*
30967a1e	12	* @version $Id$
8f6f9ba5	13	* @package squirrelmail
35586184	14	*/
8e2ed807	15
30967a1e	16	/**
	17	* Path for SquirrelMail required files.
	18	* @ignore
	19	*/
86725763	20	define('SM_PATH','../');
	21
	22	/* SquirrelMail required files. */
	23	require_once(SM_PATH . 'functions/strings.php');
	24	require_once(SM_PATH . 'config/config.php');
	25	require_once(SM_PATH . 'functions/i18n.php');
	26	require_once(SM_PATH . 'functions/plugin.php');
	27	require_once(SM_PATH . 'functions/constants.php');
	28	require_once(SM_PATH . 'functions/page_header.php');
	29	require_once(SM_PATH . 'functions/html.php');
a32985a5	30	require_once(SM_PATH . 'functions/global.php');
ea348fd3	31	require_once(SM_PATH . 'functions/imap_general.php');
a34d6890	32	require_once(SM_PATH . 'functions/forms.php');
98f2ee76	33
8f6f9ba5	34	/**
98f2ee76	35	* $squirrelmail_language is set by a cookie when the user selects
	36	* language and logs out
	37	*/
5e2b6751	38	set_up_language($squirrelmail_language, TRUE, TRUE);
d4e84069	39
85b454a0	40	/**
	41	* Find out the base URI to set cookies.
	42	*/
f3bc099d	43	if (!function_exists('sqm_baseuri')){
86725763	44	require_once(SM_PATH . 'functions/display_messages.php');
f3bc099d	45	}
f3bc099d	46	$base_uri = sqm_baseuri();
8e2ed807	47
98f2ee76	48	/*
	49	* In case the last session was not terminated properly, make sure
	50	* we get a new one.
	51	*/
5250f7e7	52
69146537	53	sqsession_destroy();
91e0dccc	54
98f2ee76	55	header('Pragma: no-cache');
98f2ee76	56
8f6f9ba5	57	/**
91e0dccc	58	* This detects if the IMAP server has logins disabled, and if so,
8f6f9ba5	59	* squelches the display of the login form and puts up a message
	60	* explaining the situation.
	61	*/
6d611a76	62	if($imap_auth_mech == 'login') {
	63	$imap = sqimap_create_stream($imapServerAddress, $imapPort, $use_imap_tls);
	64	$logindisabled = sqimap_capability($imap,'LOGINDISABLED');
	65	sqimap_logout($imap);
	66	if ($logindisabled) {
df758744	67	$string = _("The IMAP server is reporting that plain text logins are disabled.").'<br />'.
df758744	68	_("Using CRAM-MD5 or DIGEST-MD5 authentication instead may work.").'<br />';
6d611a76	69	if (!$use_imap_tls) {
66cc922f	70	$string .= _("Also, the use of TLS may allow SquirrelMail to login.").'<br />';
6d611a76	71	}
d3b3a524	72	$string .= _("Please contact your system administrator and report this error.");
6d611a76	73	error_box($string,$color);
6d611a76	74	exit;
ea348fd3	75	}
ea348fd3	76	}
ea348fd3	77
98f2ee76	78	do_hook('login_cookie');
	79
	80	/* Output the javascript onload function. */
	81
d68323ff	82	$header = "<script language=\"JavaScript\" type=\"text/javascript\">\n" .
98f2ee76	83	"<!--\n".
98f2ee76	84	" function squirrelmail_loginpage_onload() {\n".
03ccb49b	85	" var textElements = 0;\n".
	86	" for (i = 0; i < document.forms[0].elements.length; i++) {\n".
	87	" if (document.forms[0].elements[i].type == \"text\" \|\| document.forms[0].elements[i].type == \"password\") {\n".
	88	" textElements++;\n".
	89	" if (textElements == " . (isset($loginname) ? 2 : 1) . ") {\n".
	90	" document.forms[0].elements[i].focus();\n".
	91	" break;\n".
	92	" }\n".
	93	" }\n".
	94	" }\n".
98f2ee76	95	" }\n".
	96	"// -->\n".
	97	"</script>\n";
dfb94cac	98
	99	if (@file_exists($theme[$theme_default]['PATH']))
	100	@include ($theme[$theme_default]['PATH']);
	101
98f2ee76	102	displayHtmlHeader( "$org_name - " . _("Login"), $header, FALSE );
98f2ee76	103
2e394e36	104	echo "<body text=\"$color[8]\" bgcolor=\"$color[4]\" link=\"$color[7]\" vlink=\"$color[7]\" alink=\"$color[7]\" onLoad=\"squirrelmail_loginpage_onload()\">" .
ae958cd3	105	"\n" . '<form action="redirect.php" method="post" onSubmit="document.forms[0].js_autodetect_results.value=\'' . SMPREF_JS_ON .'\';">' . "\n";
98f2ee76	106
0fce910a	107	$username_form_name = 'login_username';
0fce910a	108	$password_form_name = 'secretkey';
98f2ee76	109	do_hook('login_top');
98f2ee76	110
5250f7e7	111	$loginname_value = (sqGetGlobalVar('loginname', $loginname) ? htmlspecialchars($loginname) : '');
98f2ee76	112
78b2428e	113	/* If they don't have a logo, don't bother.. */
	114	if (isset($org_logo) && $org_logo) {
	115	/* Display width and height like good little people */
	116	$width_and_height = '';
	117	if (isset($org_logo_width) && is_numeric($org_logo_width) &&
	118	$org_logo_width>0) {
	119	$width_and_height = " width=\"$org_logo_width\"";
	120	}
	121	if (isset($org_logo_height) && is_numeric($org_logo_height) &&
	122	$org_logo_height>0) {
	123	$width_and_height .= " height=\"$org_logo_height\"";
	124	}
98f2ee76	125	}
3fde693b	126
c67e4479	127	if(sqgetGlobalVar('mailto', $mailto)) {
a34d6890	128	$rcptaddress = addHidden('mailto', $mailto);
c67e4479	129	} else {
	130	$rcptaddress = '';
	131	}
1cac3b9b	132	echo html_tag( 'table',
8e2ed807	133	html_tag( 'tr',
	134	html_tag( 'td',
	135	'<center>'.
78b2428e	136	( isset($org_logo) && $org_logo
	137	? '<img src="' . $org_logo . '" alt="' .
	138	sprintf(_("%s Logo"), $org_name) .'"' . $width_and_height .
	139	' /><br />' . "\n"
	140	: '' ).
8a97a070	141	( (isset($hide_sm_attributions) && $hide_sm_attributions) ? '' :
8b5c49cd	142	'<small>' . _("SquirrelMail Webmail Application") . '<br />' ."\n".
d68323ff	143	' ' . _("By the SquirrelMail Development Team") . '<br /></small>' . "\n" ) .
8e2ed807	144	html_tag( 'table',
	145	html_tag( 'tr',
	146	html_tag( 'td',
	147	'<b>' . sprintf (_("%s Login"), $org_name) . "</b>\n",
dfb94cac	148	'center', $color[0] )
8e2ed807	149	) .
	150	html_tag( 'tr',
	151	html_tag( 'td', "\n" .
	152	html_tag( 'table',
	153	html_tag( 'tr',
	154	html_tag( 'td',
	155	_("Name:") ,
	156	'right', '', 'width="30%"' ) .
	157	html_tag( 'td',
134e4174	158	addInput($username_form_name, $loginname_value),
8e2ed807	159	'left', '', 'width="*"' )
	160	) . "\n" .
	161	html_tag( 'tr',
	162	html_tag( 'td',
	163	_("Password:") ,
	164	'right', '', 'width="30%"' ) .
	165	html_tag( 'td',
134e4174	166	addPwField($password_form_name).
134e4174	167	addHidden('js_autodetect_results', SMPREF_JS_OFF).
c67e4479	168	$rcptaddress .
134e4174	169	addHidden('just_logged_in', '1'),
8e2ed807	170	'left', '', 'width="*"' )
8e2ed807	171	) ,
dfb94cac	172	'center', $color[4], 'border="0" width="100%"' ) ,
dfb94cac	173	'left', $color[4] )
91e0dccc	174	) .
8e2ed807	175	html_tag( 'tr',
8e2ed807	176	html_tag( 'td',
a34d6890	177	'<center>'. addSubmit(_("Login")) .'</center>',
8e2ed807	178	'left' )
8e2ed807	179	),
dfb94cac	180	'', $color[4], 'border="0" width="350"' ) . '</center>',
8e2ed807	181	'center' )
8e2ed807	182	) ,
dfb94cac	183	'', $color[4], 'border="0" cellspacing="0" cellpadding="0" width="100%"' );
98f2ee76	184	do_hook('login_form');
cbaf4cf1	185	echo '</form>' . "\n";
98f2ee76	186
98f2ee76	187	do_hook('login_bottom');
134e4174	188	?>
8b5c49cd	189	</body></html>