Project

General

Profile

1 13614 aaronmk
<?php
2 13694 aaronmk
function login__from_env()
3
{
4
	return $_SERVER["PHP_AUTH_USER"]
5
		.($_SERVER["PHP_AUTH_PW"] !== "" ? ":".$_SERVER["PHP_AUTH_PW"] : "");
6
}
7
8 13614 aaronmk
function user2path($user) # multiple @ and nested . OK: a@b.c@url -> url?b.c.a
9 13695 aaronmk
{
10 13701 aaronmk
	$path = $user;
11
12 13698 aaronmk
	# remove padding used to visually separate elements:__x__@y__@url -> x@y@url
13 13701 aaronmk
	$path = preg_replace('/\b__|__\b/', '', $path);
14
15 13712 aaronmk
	# remove linewraps: x_-_.y@url -> x.y@url
16 13711 aaronmk
	# the _ are needed to work in Google spreadsheets
17
	$path = str_replace('_-_', '', $path);
18
19 13710 aaronmk
	# remove comments: (c)x(d)@url -> x@url
20
	# can't use : for this because Firefox will not update the "password" for
21
	#  the website with the new value after the :
22
	$path = preg_replace('/\(.*?\)/', '', $path);
23 13702 aaronmk
24 13695 aaronmk
	# translate reverse @-paths into forward .-paths
25 13701 aaronmk
	$path = implode(".", array_reverse(explode("@", $path)));
26
27
	return $path;
28 13695 aaronmk
}
29 13614 aaronmk
30
if (!isset($_SERVER["PHP_AUTH_USER"])) # browser first omits Authorization
31
{
32
	header('WWW-Authenticate: Basic realm="please leave username/password blank or as filled in"');
33
}
34
else
35
{
36 13668 aaronmk
	$dest = preg_replace('!\b/!', "./", $_SERVER["SCRIPT_URI"])."?";
37
		# append trailing . to host to prevent infinite redirect loop
38 13665 aaronmk
	if ($_SERVER["PHP_AUTH_USER"] !== "") # prepend to query string
39 13694 aaronmk
		$dest .= "."/*force dotpath*/.user2path(login__from_env());
40 13665 aaronmk
	$dest .= $_SERVER["QUERY_STRING"];
41 13625 aaronmk
42
	header("Location: ".$dest);
43 13614 aaronmk
}
44
?>