Subversion Repositories ALCASAR

Rev

Details | Last modification | View Log

Rev Author Line No. Line
344 richard 1
<?php
2
#
3
# Things should work even if register_globals is set to off
4
#
5
$testVer=intval(str_replace(".", "",'4.1.0'));
6
$curVer=intval(str_replace(".", "",phpversion()));
7
if( $curVer >= $testVer )
8
	import_request_variables('GPC');
9
# If using sessions set use_session to 1 to also cache the config file
10
#
11
$use_session = 0;
12
unset($config);
13
unset($nas_list);
14
if ($use_session){
15
	// Start session
16
	@session_start();
17
	if (isset($_SESSION['config']))
18
		$config = $_SESSION['config'];
19
	if (isset($_SESSION['nas_list']))
20
		$nas_list = $_SESSION['nas_list'];
21
}
22
if (!isset($config)){
23
	$ARR=file("/etc/freeradius-web/admin.conf");
24
	$EXTRA_ARR = array();
25
	foreach($ARR as $val) {
26
		$val=chop($val);
27
		if (ereg('^[[:space:]]*#',$val) || ereg('^[[:space:]]*$',$val))
28
			continue;
29
		list($key,$v)=split(":[[:space:]]*",$val,2);
30
		if (preg_match("/%\{(.+)\}/",$v,$matches)){
31
			$val=$config[$matches[1]];
32
			$v=preg_replace("/%\{$matches[1]\}/",$val,$v);
33
		}
34
		if (preg_match("/^nas(\d+)_(\w+)$/",$key,$matches))
35
			$nas_list[$matches[1]][$matches[2]] = $v;
36
		if ($key == 'INCLUDE'){
37
			if (is_readable($v))
38
				array_push($EXTRA_ARR,file($v));
39
			else
40
				echo "<b>Error: File '$v' does not exist or is not readable</b><br>\n";
41
		}
42
		else
43
			$config["$key"]="$v";
44
	}
45
	foreach($EXTRA_ARR as $val1) {
46
		foreach($val1 as $val){
47
			$val=chop($val);
48
			if (ereg('^[[:space:]]*#',$val) || ereg('^[[:space:]]*$',$val))
49
				continue;
50
			list($key,$v)=split(":[[:space:]]*",$val,2);
51
			if (preg_match("/%\{(.+)\}/",$v,$matches)){
52
				$val=$config[$matches[1]];
53
				$v=preg_replace("/%\{$matches[1]\}/",$val,$v);
54
			}
55
			if (preg_match("/^nas(\d+)_(\w+)$/",$key,$matches))
56
				$nas_list[$matches[1]][$matches[2]] = $v;
57
			$config["$key"]="$v";
58
		}
59
	}
60
	if ($use_session){
61
		session_register('config');
62
		session_register('nas_list');
63
	}
64
 
65
}
66
if ($use_session == 0 && $config['general_use_session'] == 'yes'){
67
	// Start session
68
	@session_start();
69
	if (isset($nas_list))
70
		session_register('nas_list');
71
}
72
//Make sure we are only passed allowed strings in username
73
if (isset($login)){
74
	if ($login != '')
75
		$login = preg_replace("/[^\w\.\/\@\:\-]/",'',$login);
76
	if ($login != '' && $config['general_strip_realms'] == 'yes'){
77
		$realm_del = ($config['general_realm_delimiter'] != '') ? $config['general_realm_delimiter'] : '@';
78
		$realm_for = ($config['general_realm_format'] != '') ? $config['general_realm_format'] : 'suffix';
79
		$new = explode($realm_del,$login,2);
80
		if (count($new) == 2)
81
			$login = ($realm_for == 'suffix') ? $new[0] : $new[1];
82
	}
83
}
84
unset($mappings);
85
if (isset($_SESSION['mappings']))
86
	$mappings = $_SESSION['mappings'];
87
if (!isset($mappings) && $config['general_username_mappings_file'] != ''){
88
	$ARR = file($config['general_username_mappings_file']);
89
	foreach($ARR as $val){
90
		$val=chop($val);
91
		if (ereg('^[[:space:]]*#',$val) || ereg('^[[:space:]]*$',$val))
92
			continue;
93
		list($key,$realm,$v)=split(":[[:space:]]*",$val,3);
94
		if ($realm == 'accounting' || $realm == 'userdb' || $realm == 'nasdb' || $realm == 'nasadmin')
95
			$mappings["$key"][$realm] = $v;
96
		if ($realm == 'nasdb'){
97
			$NAS_ARR = array();
98
			$NAS_ARR = split(',',$v);
99
			foreach ($nas_list as $key => $nas){
100
				foreach ($NAS_ARR as $nas_check){
101
					if ($nas_check == $nas['name'])
102
						unset($nas_list[$key]);
103
				}
104
			}
105
		}
106
	}
107
	if ($config['general_use_session'] == 'yes')
108
		session_register('mappings');
109
}
110
 
111
//Include missing.php if needed
112
if (!function_exists('array_change_key_case'))
113
	include_once('../lib/missing.php');
114
@header('Content-type: text/html; charset='.$config['general_charset'].';');
115
?>