Added "User-Agent" to possible headers with the mailer information.
[squirrelmail.git] / src / login.php
CommitLineData
59177427 1<?php
895905c0 2
23d6bd09 3 /**
895905c0 4 ** login.php -- simple login screen
5 **
6 ** Copyright (c) 1999-2001 The Squirrelmail Development 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 **/
21c3249f 14
23d6bd09 15 $rcptaddress = '';
16 if (isset($emailaddress)) {
17 if (stristr($emailaddress, 'mailto:')) {
18 $rcptaddress = substr($emailaddress, 7);
19 } else {
20 $rcptaddress = $emailaddress;
21 }
0ee3f2af 22
23d6bd09 23 if (($pos = strpos($rcptaddress, '?')) !== false) {
24 $a = substr($rcptaddress, $pos + 1);
0ee3f2af 25 $rcptaddress = substr($rcptaddress, 0, $pos);
23d6bd09 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 }
0ee3f2af 34
23d6bd09 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 }
0ee3f2af 51
23d6bd09 52 /* Double-encode in this fashion to get past redirect.php properly. */
53 $rcptaddress = urlencode($rcptaddress);
54 }
d4e84069 55
23d6bd09 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');
692155b7 61 require_once('../functions/page_header.php');
21c3249f 62
23d6bd09 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);
288491a4 68
23d6bd09 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();
c6d6fe73 73
23d6bd09 74 /*
75 * In case the last session was not terminated properly, make sure
76 * we get a new one.
77 */
692155b7 78 $cookie_params = session_get_cookie_params();
79 setcookie(session_name(),'',0,$cookie_params['path'].$cookie_params['domain']);
23d6bd09 80 setcookie('username', '', 0, $base_uri);
81 setcookie('key', '', 0, $base_uri);
82 header ('Pragma: no-cache');
c6d6fe73 83
23d6bd09 84 do_hook('login_cookie');
1bfeac81 85
23d6bd09 86 /* Output the javascript onload function. */
692155b7 87 displayHtmlHeader( "$org_name - " . _("Login"),
88 "<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[0].focus();\n".
93 " }\n".
94 "// -->\n".
95 "</script>\n", FALSE );
23d6bd09 96
97 /* Set the title of this page. */
692155b7 98 echo "<BODY TEXT=#000000 BGCOLOR=#FFFFFF LINK=#0000CC VLINK=#0000CC ALINK=#0000CC onLoad='squirrelmail_loginpage_onload();'>\n".
0ee3f2af 99 "<FORM ACTION=\"redirect.php\" METHOD=\"POST\" NAME=f>\n";
100
23d6bd09 101 $username_form_name = 'login_username';
102 $password_form_name = 'secretkey';
103 do_hook('login_top');
104
105 $loginname_value = (isset($loginname) ? htmlspecialchars($loginname) : '');
0ee3f2af 106
826b7f71 107 echo "<CENTER>".
0ee3f2af 108 " <IMG SRC=\"$org_logo\"><BR>\n".
826b7f71 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".
0ee3f2af 113
826b7f71 114 "<CENTER>\n".
0ee3f2af 115 "<TABLE COLS=1 WIDTH=350>\n".
116 " <TR><TD BGCOLOR=#DCDCDC>\n".
117 ' <B><CENTER>' . sprintf (_("%s Login"), $org_name) . "</CENTER></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=\"$username_form_name\" 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=\"$password_form_name\">\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";
23d6bd09 132 if ($rcptaddress != '') {
133 echo " <INPUT TYPE=HIDDEN NAME=\"rcptemail\" VALUE=\"".htmlspecialchars($rcptaddress)."\">\n";
134 }
0ee3f2af 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".
826b7f71 141 "</TABLE>\n".
142 "</CENTER>\n";
23d6bd09 143
144 do_hook('login_form');
145 echo "</FORM>\n";
146
147 do_hook('login_bottom');
0ee3f2af 148 echo "</BODY>\n".
149 "</HTML>\n";
826b7f71 150?>