Project

General

Profile

1
<?php
2
function login__from_env()
3
{
4
	return $_SERVER["PHP_AUTH_USER"]
5
		.($_SERVER["PHP_AUTH_PW"] !== "" ? ":".$_SERVER["PHP_AUTH_PW"] : "");
6
}
7

    
8
function user2path($user) # multiple @ and nested . OK: a@b.c@url -> url?b.c.a
9
{
10
	$path = $user;
11
	
12
	# remove padding used to visually separate elements:__x__@y__@url -> x@y@url
13
	$path = preg_replace('/\b__|__\b/', '', $path);
14
	
15
	# remove linewraps: x_-_.y@url -> x.y@url
16
	# the _ are needed to work in Google spreadsheets
17
	$path = str_replace('_-_', '', $path);
18
	
19
	# remove insertion comments: [c]x[d]@url -> x@url
20
	# use [] because in writing, [] denotes insertion
21
	# insertion indicates that the semantic meaning of the [] portion also
22
	#  applies, even though it's not included in the linked term name
23
	# can't use : for this because Firefox will not update the "password" for
24
	#  the website with the new value after the :
25
	$path = preg_replace('/\[.*?\]/', '', $path);
26
	
27
	# remove deletion comments: (-c_-)x@url -> c_x@url
28
	# use () because in editing, () denotes something to remove
29
	# the -...- indicate strikethrough (deletion)
30
	# deletion indicates that the semantic meaning of the () portion does not
31
	#  apply, even though it's included in the linked term name
32
	$path = preg_replace('/\(-([^)]*?)-\)/', '$1', $path);
33
	
34
	# translate reverse @-paths into forward .-paths
35
	$path = implode(".", array_reverse(explode("@", $path)));
36
	
37
	return $path;
38
}
39

    
40
if (!isset($_SERVER["PHP_AUTH_USER"])) # browser first omits Authorization
41
{
42
	header('WWW-Authenticate: Basic realm="'
43
.'please leave username/password blank or as filled in. '
44
.'**IMPORTANT**: to visit the homepage of this site, you should always '
45
.'append \".\": \"'.$_SERVER["HTTP_HOST"].'.\" "');
46
}
47
else
48
{
49
	$dest = preg_replace('!\b/!', "./", $_SERVER["SCRIPT_URI"])."?";
50
		# append trailing . to host to prevent infinite redirect loop
51
	if ($_SERVER["PHP_AUTH_USER"] !== "") # prepend to query string
52
		$dest .= "."/*force dotpath*/.user2path(login__from_env());
53
	$dest .= $_SERVER["QUERY_STRING"];
54
	
55
	header("Location: ".$dest);
56
}
57
?>
(32-32/34)