59177427 |
1 | <?php |
895905c0 |
2 | |
35586184 |
3 | /** |
4 | * login.php -- simple login screen |
5 | * |
15e6162e |
6 | * Copyright (c) 1999-2002 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$ |
13 | */ |
21c3249f |
14 | |
35586184 |
15 | $rcptaddress = ''; |
16 | if (isset($emailaddress)) { |
98f2ee76 |
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; |
8675ae42 |
31 | $$name = $val; |
23d6bd09 |
32 | } |
98f2ee76 |
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') { |
5e9e90fd |
42 | $rcptaddress .= '&send_to_cc=' . $value; |
98f2ee76 |
43 | } else if ($key == 'bcc') { |
5e9e90fd |
44 | $rcptaddress .= '&send_to_bcc=' . $value; |
98f2ee76 |
45 | } else if ($key == 'subject') { |
5e9e90fd |
46 | $rcptaddress .= '&subject=' . $value; |
98f2ee76 |
47 | } else if ($key == 'body') { |
5e9e90fd |
48 | $rcptaddress .= '&body=' . $value; |
23d6bd09 |
49 | } |
23d6bd09 |
50 | } |
98f2ee76 |
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); |
d4e84069 |
68 | |
98f2ee76 |
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(); |
cb48c245 |
73 | |
98f2ee76 |
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"; |
a714cb95 |
96 | $custom_css = 'none'; |
98f2ee76 |
97 | displayHtmlHeader( "$org_name - " . _("Login"), $header, FALSE ); |
98 | |
99 | /* Set the title of this page. */ |
4da8e94a |
100 | echo '<BODY TEXT="#000000" BGCOLOR="#FFFFFF" LINK="#0000CC" VLINK="#0000CC" ALINK="#0000CC" onLoad="squirrelmail_loginpage_onload();">'. |
101 | "\n<FORM ACTION=\"redirect.php\" METHOD=\"POST\" NAME=f>\n"; |
98f2ee76 |
102 | |
0fce910a |
103 | $username_form_name = 'login_username'; |
104 | $password_form_name = 'secretkey'; |
98f2ee76 |
105 | do_hook('login_top'); |
106 | |
107 | $loginname_value = (isset($loginname) ? htmlspecialchars($loginname) : ''); |
108 | |
b6e0c3b6 |
109 | /* Display width and height like good little people */ |
4da8e94a |
110 | $width_and_height = ''; |
b6e0c3b6 |
111 | if (isset($org_logo_width) && is_int($org_logo_width) && $org_logo_width>0) { |
112 | $width_and_height = " WIDTH=\"$org_logo_width\""; |
113 | } |
114 | if (isset($org_logo_height) && is_int($org_logo_height) && $org_logo_height>0) { |
115 | $width_and_height .= " HEIGHT=\"$org_logo_height\""; |
116 | } |
117 | |
4da8e94a |
118 | echo '<CENTER>'. |
b6e0c3b6 |
119 | " <IMG SRC=\"$org_logo\" ALT=\"" . sprintf(_("%s Logo"), $org_name) . |
120 | "\"$width_and_height><BR>\n". |
98f2ee76 |
121 | ( $hide_sm_attributions ? '' : |
122 | '<SMALL>' . sprintf (_("SquirrelMail version %s"), $version) . "<BR>\n". |
123 | ' ' . _("By the SquirrelMail Development Team") . "<BR></SMALL>\n" ) . |
124 | "</CENTER>\n". |
125 | |
126 | "<CENTER>\n". |
127 | "<TABLE COLS=1 WIDTH=350>\n". |
128 | " <TR><TD ALIGN=CENTER BGCOLOR=\"#DCDCDC\">\n". |
129 | ' <B>' . sprintf (_("%s Login"), $org_name) . "</B>\n". |
130 | " </TD></TR>". |
131 | " <TR><TD BGCOLOR=\"#FFFFFF\"><TABLE COLS=2 WIDTH=\"100%\">\n". |
132 | " <TR>\n". |
133 | ' <TD WIDTH="30%" ALIGN=right>' . _("Name:") . "</TD>\n". |
134 | " <TD WIDTH=\"*\" ALIGN=left>\n". |
0fce910a |
135 | " <INPUT TYPE=TEXT NAME=\"$username_form_name\" VALUE=\"$loginname_value\">\n". |
98f2ee76 |
136 | " </TD>\n". |
137 | " </TR>\n". |
138 | " <TR>\n". |
139 | ' <TD WIDTH="30%" ALIGN=right>' . _("Password:") . "</TD>\n". |
140 | " <TD WIDTH=\"*\" ALIGN=left>\n". |
0fce910a |
141 | " <INPUT TYPE=PASSWORD NAME=\"$password_form_name\">\n". |
98f2ee76 |
142 | " <INPUT TYPE=HIDDEN NAME=\"js_autodetect_results\" VALUE=\"" . SMPREF_JS_OFF . "\">\n". |
143 | " <INPUT TYPE=HIDDEN NAME=\"just_logged_in\" value=1>\n"; |
144 | if ($rcptaddress != '') { |
145 | echo " <INPUT TYPE=HIDDEN NAME=\"rcptemail\" VALUE=\"".htmlspecialchars($rcptaddress)."\">\n"; |
146 | } |
147 | echo " </TD>\n". |
148 | " </TR>\n". |
149 | " </TABLE></TD></TR>\n". |
150 | " <TR><TD>\n". |
151 | ' <CENTER><INPUT TYPE=SUBMIT VALUE="' . _("Login") . "\"></CENTER>\n". |
152 | " </TD></TR>\n". |
153 | "</TABLE>\n". |
154 | "</CENTER>\n"; |
155 | |
156 | do_hook('login_form'); |
157 | echo "</FORM>\n"; |
158 | |
159 | do_hook('login_bottom'); |
160 | echo "</BODY>\n". |
161 | "</HTML>\n"; |
4da8e94a |
162 | ?> |