finish "buttonizing" read_body header.
[squirrelmail.git] / src / login.php
1 <?php
2
3 /**
4 * login.php -- simple login screen
5 *
6 * Copyright (c) 1999-2004 The SquirrelMail Project Team
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$
13 * @package squirrelmail
14 */
15
16 /** Path for SquirrelMail required files. */
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');
27 require_once(SM_PATH . 'functions/global.php');
28 require_once(SM_PATH . 'functions/imap_general.php');
29
30 /**
31 * $squirrelmail_language is set by a cookie when the user selects
32 * language and logs out
33 */
34 set_up_language($squirrelmail_language, TRUE, TRUE);
35
36 /**
37 * Find out the base URI to set cookies.
38 */
39 if (!function_exists('sqm_baseuri')){
40 require_once(SM_PATH . 'functions/display_messages.php');
41 }
42 $base_uri = sqm_baseuri();
43
44 /*
45 * In case the last session was not terminated properly, make sure
46 * we get a new one.
47 */
48
49 sqsession_destroy();
50
51 header('Pragma: no-cache');
52
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 */
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;
70 }
71 }
72
73 do_hook('login_cookie');
74
75 /* Output the javascript onload function. */
76
77 $header = "<script language=\"JavaScript\" type=\"text/javascript\">\n" .
78 "<!--\n".
79 " function squirrelmail_loginpage_onload() {\n".
80 " document.forms[0].js_autodetect_results.value = '" . SMPREF_JS_ON . "';\n".
81 " var textElements = 0;\n".
82 " for (i = 0; i < document.forms[0].elements.length; i++) {\n".
83 " if (document.forms[0].elements[i].type == \"text\" || document.forms[0].elements[i].type == \"password\") {\n".
84 " textElements++;\n".
85 " if (textElements == " . (isset($loginname) ? 2 : 1) . ") {\n".
86 " document.forms[0].elements[i].focus();\n".
87 " break;\n".
88 " }\n".
89 " }\n".
90 " }\n".
91 " }\n".
92 "// -->\n".
93 "</script>\n";
94
95 if (@file_exists($theme[$theme_default]['PATH']))
96 @include ($theme[$theme_default]['PATH']);
97
98 displayHtmlHeader( "$org_name - " . _("Login"), $header, FALSE );
99
100 echo "<body text=\"$color[8]\" bgcolor=\"$color[4]\" link=\"$color[7]\" vlink=\"$color[7]\" alink=\"$color[7]\" onLoad=\"squirrelmail_loginpage_onload()\">" .
101 "\n" . '<form action="redirect.php" method="post">' . "\n";
102
103 $username_form_name = 'login_username';
104 $password_form_name = 'secretkey';
105 do_hook('login_top');
106
107 $loginname_value = (sqGetGlobalVar('loginname', $loginname) ? htmlspecialchars($loginname) : '');
108
109 /* If they don't have a logo, don't bother.. */
110 if (isset($org_logo) && $org_logo) {
111 /* Display width and height like good little people */
112 $width_and_height = '';
113 if (isset($org_logo_width) && is_numeric($org_logo_width) &&
114 $org_logo_width>0) {
115 $width_and_height = " width=\"$org_logo_width\"";
116 }
117 if (isset($org_logo_height) && is_numeric($org_logo_height) &&
118 $org_logo_height>0) {
119 $width_and_height .= " height=\"$org_logo_height\"";
120 }
121 }
122
123 if(sqgetGlobalVar('mailto', $mailto)) {
124 $rcptaddress = '<input type="hidden" name="mailto" value="' . urlencode($mailto) . '" />' . "\n";
125 } else {
126 $rcptaddress = '';
127 }
128 echo html_tag( 'table',
129 html_tag( 'tr',
130 html_tag( 'td',
131 '<center>'.
132 ( isset($org_logo) && $org_logo
133 ? '<img src="' . $org_logo . '" alt="' .
134 sprintf(_("%s Logo"), $org_name) .'"' . $width_and_height .
135 ' /><br />' . "\n"
136 : '' ).
137 ( (isset($hide_sm_attributions) && $hide_sm_attributions) ? '' :
138 '<small>' . sprintf (_("SquirrelMail version %s"), $version) . '<br />' ."\n".
139 ' ' . _("By the SquirrelMail Development Team") . '<br /></small>' . "\n" ) .
140 html_tag( 'table',
141 html_tag( 'tr',
142 html_tag( 'td',
143 '<b>' . sprintf (_("%s Login"), $org_name) . "</b>\n",
144 'center', $color[0] )
145 ) .
146 html_tag( 'tr',
147 html_tag( 'td', "\n" .
148 html_tag( 'table',
149 html_tag( 'tr',
150 html_tag( 'td',
151 _("Name:") ,
152 'right', '', 'width="30%"' ) .
153 html_tag( 'td',
154 '<input type="text" name="' . $username_form_name .'" value="' . $loginname_value .'" />' ,
155 'left', '', 'width="*"' )
156 ) . "\n" .
157 html_tag( 'tr',
158 html_tag( 'td',
159 _("Password:") ,
160 'right', '', 'width="30%"' ) .
161 html_tag( 'td',
162 '<input type="password" name="' . $password_form_name . '" />' . "\n" .
163 '<input type="hidden" name="js_autodetect_results" value="SMPREF_JS_OFF" />' . "\n" .
164 $rcptaddress .
165 '<input type="hidden" name="just_logged_in" value="1" />' . "\n",
166 'left', '', 'width="*"' )
167 ) ,
168 'center', $color[4], 'border="0" width="100%"' ) ,
169 'left', $color[4] )
170 ) .
171 html_tag( 'tr',
172 html_tag( 'td',
173 '<center><input type="submit" value="' . _("Login") . '" /></center>',
174 'left' )
175 ),
176 '', $color[4], 'border="0" width="350"' ) . '</center>',
177 'center' )
178 ) ,
179 '', $color[4], 'border="0" cellspacing="0" cellpadding="0" width="100%"' );
180 do_hook('login_form');
181 echo '</form>' . "\n";
182
183 do_hook('login_bottom');
184 echo "</body>\n".
185 "</html>\n";
186 ?>