There are too many modified files being committed without the copyright year being...
[squirrelmail.git] / src / login.php
index cff8c3f98388570dd2daceb84ef49f4de18b75a8..d3f514e405c48042c571c763b2a62687a1b39dab 100644 (file)
-<?
-   /**
-    **  login.php
-    **
-    **  Very simple login screen that clears the cookie every time it's loaded
-    **
-    **/
-
-   setcookie("username", "", time(), "/");
-   setcookie("key", "", time(), "/");
-   setcookie("logged_in", 0, time(), "/");
-?>
-<HTML>
-<BODY BGCOLOR=FFFFFF>
-<?
-   include("../config/config.php");
-
-   echo "<FORM ACTION=webmail.php METHOD=POST NAME=f>\n";
-   echo "<CENTER><IMG SRC=\"$org_logo\"</CENTER>\n";
-   echo "<CENTER><FONT FACE=\"Arial,Helvetica\" SIZE=-2>SquirrelMail version $version<BR>By Nathan and Luke Ehresman<BR></FONT><CENTER>\n";
-   echo "<TABLE COLS=1 WIDTH=350>\n";
-   echo "   <TR>\n";
-   echo "      <TD BGCOLOR=CCCCCC>\n";
-   echo "         <B><CENTER><FONT FACE=\"Arial,Helvetica\">$org_name Login</FONT></CENTER></B>\n";
-   echo "      </TD>\n";
-   echo "   </TR><TR>\n";
-   echo "      <TD BGCOLOR=FFFFFF>\n";
-   echo "         <TABLE COLS=2 WIDTH=100%>\n";
-   echo "            <TR>\n";
-   echo "               <TD WIDTH=30% ALIGN=right>\n";
-   echo "                  <FONT FACE=\"Arial,Helvetica\">Name:</FONT>\n";
-   echo "               </TD><TD WIDTH=* ALIGN=left>\n";
-   echo "                  <CENTER><INPUT TYPE=TEXT NAME=username></CENTER>\n";
-   echo "               </TD>\n";
-   echo "            </TR><TR>\n";
-   echo "               <TD WIDTH=30% ALIGN=right>\n";
-   echo "                  <FONT FACE=\"Arial,Helvetica\">Password:</FONT>\n";
-   echo "               </TD><TD WIDTH=* ALIGN=left>\n";
-   echo "                  <CENTER><INPUT TYPE=PASSWORD NAME=key></CENTER>\n";
-   echo "               </TD>\n"; 
-   echo "         </TABLE>\n";
-   echo "      </TD>\n";
-   echo "   </TR><TR>\n";
-   echo "      <TD>\n";
-   echo "         <CENTER><INPUT TYPE=SUBMIT VALUE=Login></CENTER>\n";
-   echo "      </TD>\n";
-   echo "   </TR>\n";
-   echo "</TABLE>\n";
-   echo "</FORM>\n";
-?>
-
-<SCRIPT LANGUAGE="JavaScript">
-   document.f.username.focus(); 
-</SCRIPT>
-
-</BODY>
-</HTML>
+<?php
 
+/**
+ * login.php -- simple login screen
+ *
+ * This a simple login screen. Some housekeeping is done to clean
+ * cookies and find language.
+ *
+ * @copyright &copy; 1999-2009 The SquirrelMail Project Team
+ * @license http://opensource.org/licenses/gpl-license.php GNU Public License
+ * @version $Id$
+ * @package squirrelmail
+ */
+
+/** This is the login page */
+define('PAGE_NAME', 'login');
+
+/**
+ * Include the SquirrelMail initialization file.
+ */
+require('../include/init.php');
+
+/* SquirrelMail required files. */
+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);
+
+/**
+ * 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') {
+    /**
+     * detect disabled login, only when imapServerAddress contains
+     * server address and not mapping. See sqimap_get_user_server()
+     */
+    if (substr($imapServerAddress, 0, 4) != "map:") {
+        $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);
+            // display footer (closes html tags) and stop script execution
+            $oTemplate->display('footer.tpl');
+            exit;
+        }
+    }
+}
+
+$username_form_name = 'login_username';
+$password_form_name = 'secretkey';
+do_hook('login_cookie', $null);
+
+$loginname_value = (sqGetGlobalVar('loginname', $loginname) ? htmlspecialchars($loginname) : '');
+
+//FIXME: should be part of the template, not the core!
+/* Output the javascript onload function. */
+$header = "<script type=\"text/javascript\">\n" .
+          "<!--\n".
+          "  var alreadyFocused = false;\n".
+          "  function squirrelmail_loginpage_onload() {\n".
+          "    if (alreadyFocused) return;\n".
+          "    var textElements = 0; var i = 0;\n".
+          "    for (i = 0; i < document.login_form.elements.length; i++) {\n".
+          "      if (document.login_form.elements[i].type == \"text\" || document.login_form.elements[i].type == \"password\") {\n".
+          "        textElements++;\n".
+          "        if (textElements == " . (isset($loginname) ? 2 : 1) . ") {\n".
+          "          document.login_form.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']);
+
+if (! isset($color) || ! is_array($color)) {
+    // Add default color theme, if theme loading fails
+    $color = array();
+    $color[0]  = '#dcdcdc';  /* light gray    TitleBar               */
+    $color[1]  = '#800000';  /* red                                  */
+    $color[2]  = '#cc0000';  /* light red     Warning/Error Messages */
+    $color[4]  = '#ffffff';  /* white         Normal Background      */
+    $color[7]  = '#0000cc';  /* blue          Links                  */
+    $color[8]  = '#000000';  /* black         Normal text            */
+}
+
+displayHtmlHeader( "$org_name - " . _("Login"), $header, FALSE );
+
+
+
+/* If they don't have a logo, don't bother.. */
+$logo_str = '';
+if (isset($org_logo) && $org_logo) {
+
+    if (isset($org_logo_width) && is_numeric($org_logo_width) &&
+     $org_logo_width>0) {
+        $width = $org_logo_width;
+    } else {
+        $width = '';
+    }
+    if (isset($org_logo_height) && is_numeric($org_logo_height) &&
+     $org_logo_height>0) {
+        $height = $org_logo_height;
+    } else {
+        $height = '';
+    }
+
+    $logo_str = create_image($org_logo, sprintf(_("%s Logo"), $org_name),
+                             $width, $height, '', 'sqm_loginImage');
+
+}
+
+$sm_attribute_str = '';
+if (isset($hide_sm_attributions) && !$hide_sm_attributions) {
+    $sm_attribute_str = _("SquirrelMail Webmail")."\n" .
+                        _("By the SquirrelMail Project Team");
+}
+
+if(sqgetGlobalVar('mailtodata', $mailtodata)) {
+    $mailtofield = addHidden('mailtodata', $mailtodata);
+} else {
+    $mailtofield = '';
+}
+
+$password_field = addPwField('secretkey');
+$login_extra = addHidden('js_autodetect_results', SMPREF_JS_OFF).
+               $mailtofield .
+               addHidden('just_logged_in', '1');
+
+session_write_close();
+
+$oTemplate->assign('logo_str', $logo_str, FALSE);
+$oTemplate->assign('logo_path', $org_logo);
+$oTemplate->assign('sm_attribute_str', $sm_attribute_str);
+// i18n: The %s represents the service provider's name
+$oTemplate->assign('org_name_str', sprintf (_("%s Login"), $org_name));
+// i18n: The %s represents the service provider's name
+$oTemplate->assign('org_logo_str', sprintf (_("The %s logo"), $org_name));
+$oTemplate->assign('login_field_value', $loginname_value);
+$oTemplate->assign('login_extra', $login_extra, FALSE);
+
+$oTemplate->display('login.tpl');
+
+do_hook('login_bottom', $null);
+
+// Turn off delayed error handling to make sure all errors are dumped.
+$oErrorHandler->setDelayedErrors(false);
+
+$oTemplate->display('footer.tpl');