src/login.php

   1 <?php
   2
   3 /**
   4  * login.php -- simple login screen
   5  *
   6  * Copyright (c) 1999-2002 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  */
  14
  15 $rcptaddress = '';
  16 if (isset($emailaddress)) {
  17     if (stristr($emailaddress, 'mailto:')) {
  18         $rcptaddress = substr($emailaddress, 7);
  19     } else {
  20         $rcptaddress = $emailaddress;
  21     }
  22
  23     if (($pos = strpos($rcptaddress, '?')) !== false) {
  24         $a = substr($rcptaddress, $pos + 1);
  25         $rcptaddress = substr($rcptaddress, 0, $pos);
  26         $a = explode('=', $a, 2);
  27         if (isset($a[1])) {
  28             $name = urldecode($a[0]);
  29             $val = urldecode($a[1]);
  30             global $$name;
  31             $$naame = $val;
  32         }
  33     }
  34
  35     /* At this point, we have parsed a lot of the mailto stuff. */
  36     /*   Let's do the rest -- CC, BCC, Subject, Body            */
  37     /*   Note:  They can all be case insensitive                */
  38     foreach ($GLOBALS as $k => $v) {
  39         $key = strtolower($k);
  40         $value = urlencode($v);
  41         if ($key == 'cc') {
  42             $rcptaddress .= '&send_to_cc=' . $value;
  43         } else if ($key == 'bcc') {
  44             $rcptaddress .= '&send_to_bcc=' . $value;
  45         } else if ($key == 'subject') {
  46             $rcptaddress .= '&subject=' . $value;
  47         } else if ($key == 'body') {
  48             $rcptaddress .= '&body=' . $value;
  49         }
  50     }
  51
  52     /* Double-encode in this fashion to get past redirect.php properly. */
  53     $rcptaddress = urlencode($rcptaddress);
  54 }
  55
  56 require_once('../functions/strings.php');
  57 require_once('../config/config.php');
  58 require_once('../functions/i18n.php');
  59 require_once('../functions/plugin.php');
  60 require_once('../functions/constants.php');
  61 require_once('../functions/page_header.php');
  62
  63 /*
  64  * $squirrelmail_language is set by a cookie when the user selects
  65  * language and logs out
  66  */
  67 set_up_language($squirrelmail_language, TRUE);
  68
  69 /* Need the base URI to set the cookies. (Same code as in webmail.php). */
  70 ereg ("(^.*/)[^/]+/[^/]+$", $PHP_SELF, $regs);
  71 $base_uri = $regs[1];
  72 @session_destroy();
  73
  74 /*
  75  * In case the last session was not terminated properly, make sure
  76  * we get a new one.
  77  */
  78 $cookie_params = session_get_cookie_params();
  79 setcookie(session_name(),'',0,$cookie_params['path'].$cookie_params['domain']);
  80 setcookie('username', '', 0, $base_uri);
  81 setcookie('key', '', 0, $base_uri);
  82 header('Pragma: no-cache');
  83
  84 do_hook('login_cookie');
  85
  86 /* Output the javascript onload function. */
  87
  88 $header = "<SCRIPT LANGUAGE=\"JavaScript\">\n" .
  89           "<!--\n".
  90           "  function squirrelmail_loginpage_onload() {\n".
  91           "    document.forms[0].js_autodetect_results.value = '" . SMPREF_JS_ON . "';\n".
  92           '    document.forms[0].elements[' . (isset($loginname) ? 1 : 0) . "].focus();\n".
  93           "  }\n".
  94           "// -->\n".
  95           "</script>\n";
  96 $custom_css = 'none';
  97 displayHtmlHeader( "$org_name - " . _("Login"), $header, FALSE );
  98
  99 /* Set the title of this page. */
 100 echo "<BODY TEXT=\"#000000\" BGCOLOR=\"#FFFFFF\" LINK=\"#0000CC\" VLINK=\"#0000CC\" ALINK=\"#0000CC\" onLoad='squirrelmail_loginpage_onload();'>\n".
 101      "<FORM ACTION=\"redirect.php\" METHOD=\"POST\" NAME=f>\n";
 102
 103 do_hook('login_top');
 104
 105 $loginname_value = (isset($loginname) ? htmlspecialchars($loginname) : '');
 106
 107 echo "<CENTER>".
 108      "  <IMG SRC=\"$org_logo\"><BR>\n".
 109      ( $hide_sm_attributions ? '' :
 110        '<SMALL>' . sprintf (_("SquirrelMail version %s"), $version) . "<BR>\n".
 111        '  ' . _("By the SquirrelMail Development Team") . "<BR></SMALL>\n" ) .
 112      "</CENTER>\n".
 113
 114      "<CENTER>\n".
 115      "<TABLE COLS=1 WIDTH=350>\n".
 116      "   <TR><TD ALIGN=CENTER BGCOLOR=\"#DCDCDC\">\n".
 117      '      <B>' . sprintf (_("%s Login"), $org_name) . "</B>\n".
 118      "   </TD></TR>".
 119      "   <TR><TD BGCOLOR=\"#FFFFFF\"><TABLE COLS=2 WIDTH=\"100%\">\n".
 120      "      <TR>\n".
 121      '         <TD WIDTH="30%" ALIGN=right>' . _("Name:") . "</TD>\n".
 122      "         <TD WIDTH=\"*\" ALIGN=left>\n".
 123      "            <INPUT TYPE=TEXT NAME=\"login_username\" VALUE=\"$loginname_value\">\n".
 124      "         </TD>\n".
 125      "      </TR>\n".
 126      "      <TR>\n".
 127      '         <TD WIDTH="30%" ALIGN=right>' . _("Password:") . "</TD>\n".
 128      "         <TD WIDTH=\"*\" ALIGN=left>\n".
 129      "            <INPUT TYPE=PASSWORD NAME=\"secretkey\">\n".
 130      "            <INPUT TYPE=HIDDEN NAME=\"js_autodetect_results\" VALUE=\"" . SMPREF_JS_OFF . "\">\n".
 131      "            <INPUT TYPE=HIDDEN NAME=\"just_logged_in\" value=1>\n";
 132 if ($rcptaddress != '') {
 133     echo "         <INPUT TYPE=HIDDEN NAME=\"rcptemail\" VALUE=\"".htmlspecialchars($rcptaddress)."\">\n";
 134 }
 135 echo "         </TD>\n".
 136      "      </TR>\n".
 137      "   </TABLE></TD></TR>\n".
 138      "   <TR><TD>\n".
 139      '      <CENTER><INPUT TYPE=SUBMIT VALUE="' . _("Login") . "\"></CENTER>\n".
 140      "   </TD></TR>\n".
 141      "</TABLE>\n".
 142      "</CENTER>\n";
 143
 144 do_hook('login_form');
 145 echo "</FORM>\n";
 146
 147 do_hook('login_bottom');
 148 echo "</BODY>\n".
 149      "</HTML>\n";
 150 ?>