[squirrelmail.git] / src / login.php

<?php

/**
 * login.php -- simple login screen
 *
 * Copyright (c) 1999-2004 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.
 *
 * $Id$
 * @package squirrelmail
 */

/** Path for SquirrelMail required files. */
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');

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