[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.
 */
$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".
          "    document.forms[0].js_autodetect_results.value = '" . SMPREF_JS_ON . "';\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">' . "\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	*/
ea348fd3	58	$imap = sqimap_create_stream($imapServerAddress, $imapPort, $use_imap_tls);
	59	$logindisabled = sqimap_capability($imap,'LOGINDISABLED');
	60	sqimap_logout($imap);
	61	if ($logindisabled) {
	62	$string = "The IMAP server is reporting that logins are disabled.<br>";
	63	if (!$use_imap_tls) {
	64	$string .= "The use of TLS may allow SquirrelMail to login.<br>";
	65	}
	66	$string .= "Please contact your system administrator.";
	67	error_box($string,$color);
	68	exit;
	69	}
	70
98f2ee76	71	do_hook('login_cookie');
	72
	73	/* Output the javascript onload function. */
	74
d68323ff	75	$header = "<script language=\"JavaScript\" type=\"text/javascript\">\n" .
98f2ee76	76	"<!--\n".
	77	" function squirrelmail_loginpage_onload() {\n".
	78	" document.forms[0].js_autodetect_results.value = '" . SMPREF_JS_ON . "';\n".
03ccb49b	79	" var textElements = 0;\n".
	80	" for (i = 0; i < document.forms[0].elements.length; i++) {\n".
	81	" if (document.forms[0].elements[i].type == \"text\" \|\| document.forms[0].elements[i].type == \"password\") {\n".
	82	" textElements++;\n".
	83	" if (textElements == " . (isset($loginname) ? 2 : 1) . ") {\n".
	84	" document.forms[0].elements[i].focus();\n".
	85	" break;\n".
	86	" }\n".
	87	" }\n".
	88	" }\n".
98f2ee76	89	" }\n".
	90	"// -->\n".
	91	"</script>\n";
dfb94cac	92
	93	if (@file_exists($theme[$theme_default]['PATH']))
	94	@include ($theme[$theme_default]['PATH']);
	95
98f2ee76	96	displayHtmlHeader( "$org_name - " . _("Login"), $header, FALSE );
98f2ee76	97
2e394e36	98	echo "<body text=\"$color[8]\" bgcolor=\"$color[4]\" link=\"$color[7]\" vlink=\"$color[7]\" alink=\"$color[7]\" onLoad=\"squirrelmail_loginpage_onload()\">" .
1cac3b9b	99	"\n" . '<form action="redirect.php" method="post">' . "\n";
98f2ee76	100
0fce910a	101	$username_form_name = 'login_username';
0fce910a	102	$password_form_name = 'secretkey';
98f2ee76	103	do_hook('login_top');
98f2ee76	104
5250f7e7	105	$loginname_value = (sqGetGlobalVar('loginname', $loginname) ? htmlspecialchars($loginname) : '');
98f2ee76	106
78b2428e	107	/* If they don't have a logo, don't bother.. */
	108	if (isset($org_logo) && $org_logo) {
	109	/* Display width and height like good little people */
	110	$width_and_height = '';
	111	if (isset($org_logo_width) && is_numeric($org_logo_width) &&
	112	$org_logo_width>0) {
	113	$width_and_height = " width=\"$org_logo_width\"";
	114	}
	115	if (isset($org_logo_height) && is_numeric($org_logo_height) &&
	116	$org_logo_height>0) {
	117	$width_and_height .= " height=\"$org_logo_height\"";
	118	}
98f2ee76	119	}
3fde693b	120
c67e4479	121	if(sqgetGlobalVar('mailto', $mailto)) {
	122	$rcptaddress = '<input type="hidden" name="mailto" value="' . urlencode($mailto) . '" />' . "\n";
	123	} else {
	124	$rcptaddress = '';
	125	}
1cac3b9b	126	echo html_tag( 'table',
8e2ed807	127	html_tag( 'tr',
	128	html_tag( 'td',
	129	'<center>'.
78b2428e	130	( isset($org_logo) && $org_logo
	131	? '<img src="' . $org_logo . '" alt="' .
	132	sprintf(_("%s Logo"), $org_name) .'"' . $width_and_height .
	133	' /><br />' . "\n"
	134	: '' ).
8a97a070	135	( (isset($hide_sm_attributions) && $hide_sm_attributions) ? '' :
d68323ff	136	'<small>' . sprintf (_("SquirrelMail version %s"), $version) . '<br />' ."\n".
d68323ff	137	' ' . _("By the SquirrelMail Development Team") . '<br /></small>' . "\n" ) .
8e2ed807	138	html_tag( 'table',
	139	html_tag( 'tr',
	140	html_tag( 'td',
	141	'<b>' . sprintf (_("%s Login"), $org_name) . "</b>\n",
dfb94cac	142	'center', $color[0] )
8e2ed807	143	) .
	144	html_tag( 'tr',
	145	html_tag( 'td', "\n" .
	146	html_tag( 'table',
	147	html_tag( 'tr',
	148	html_tag( 'td',
	149	_("Name:") ,
	150	'right', '', 'width="30%"' ) .
	151	html_tag( 'td',
d68323ff	152	'<input type="text" name="' . $username_form_name .'" value="' . $loginname_value .'" />' ,
8e2ed807	153	'left', '', 'width="*"' )
	154	) . "\n" .
	155	html_tag( 'tr',
	156	html_tag( 'td',
	157	_("Password:") ,
	158	'right', '', 'width="30%"' ) .
	159	html_tag( 'td',
d68323ff	160	'<input type="password" name="' . $password_form_name . '" />' . "\n" .
d68323ff	161	'<input type="hidden" name="js_autodetect_results" value="SMPREF_JS_OFF" />' . "\n" .
c67e4479	162	$rcptaddress .
d68323ff	163	'<input type="hidden" name="just_logged_in" value="1" />' . "\n",
8e2ed807	164	'left', '', 'width="*"' )
8e2ed807	165	) ,
dfb94cac	166	'center', $color[4], 'border="0" width="100%"' ) ,
dfb94cac	167	'left', $color[4] )
8e2ed807	168	) .
	169	html_tag( 'tr',
	170	html_tag( 'td',
d68323ff	171	'<center><input type="submit" value="' . _("Login") . '" /></center>',
8e2ed807	172	'left' )
8e2ed807	173	),
dfb94cac	174	'', $color[4], 'border="0" width="350"' ) . '</center>',
8e2ed807	175	'center' )
8e2ed807	176	) ,
dfb94cac	177	'', $color[4], 'border="0" cellspacing="0" cellpadding="0" width="100%"' );
98f2ee76	178	do_hook('login_form');
cbaf4cf1	179	echo '</form>' . "\n";
98f2ee76	180
98f2ee76	181	do_hook('login_bottom');
8e2ed807	182	echo "</body>\n".
8e2ed807	183	"</html>\n";
dcc1cc82	184	?>