'0',
'HIDE_STUDENTS' => '0',
'HIDE_ROOMS' => '0',
'SCHOOLJAAR_LONG' => '2014/2015',
'SHOWHIDE_STUDENTNAMES' => '0'
);
// get config from database and set all unconfigured items to default values
function get_config() {
global $config_info;
$config_local = mdb2_all_assoc_rekey("SELECT config_key, config_value FROM config");
foreach ($config_info as $key => $value) {
if (!isset($config_local[$key])) {
$config_local[$key] = $value;
mdb2_exec("INSERT INTO config ( config_key, config_value ) VALUES ( '%q', '%q' )", $key, $value);
}
}
return $config_local;
}
function config($key) {
static $config_static;
global $config;
// UPLOAD_SECRET has a special meaning when empty
if ($key == 'UPLOAD_SECRET' &&
(!isset($config['UPLOAD_SECRET']) || $config['UPLOAD_SECRET'] == ''))
fatal_error('toegang voor roostermakers is niet geconfigureerd');
// is this key in the static config?
// these values can be accessed without database access
if (isset($config[$key])) return $config[$key];
// nope, so look in the DB
if (!isset($config_static)) $config_static = get_config();
if (!isset($config_static[$key])) fatal_error("Config key $key is not set?!?!");
/*
echo('');
print_r($config_static);
echo('');
exit;
*/
return $config_static[$key];
}
function check_roostermaker($secret) {
if ($secret != config('UPLOAD_SECRET')) fatal_error('deze pagina is alleen toegankelijk voor de roostermakers');
}
function cidr_match($ip, $range) {
// echo("cidr_match $ip $range");
list ($subnet, $bits) = explode('/', $range);
// no /, so $range is a single IP address
if (!$bits) {
if ($ip == $range) return true;
else return false;
}
$ip = ip2long($ip);
if ($ip === false) return false;
$subnet = ip2long($subnet);
if ($subnet == false) fatal_error('invalid IP address in range '.$range);
$mask = -1 << (32 - $bits);
if ($subnet&$mask != $subnet) fatal_error('subnet in range ('.$range.') incorrecly arranged');
return ($ip & $mask) == $subnet;
}
// van binnen school mogen we de namen van de leerlingen laten zien
// van buiten mag dat niet, deze functie moet detecteren waar het request
// vandaan komt
function binnen_school() {
// testing?
if (config('SHOWHIDE_STUDENTNAMES') > 0) return true;
else if (config('SHOWHIDE_STUDENTNAMES') < 0) return false;
foreach (config('INTERNAL_IPS') as $range)
if (cidr_match($_SERVER['REMOTE_ADDR'], $range)) return true;
return false;
}
function get_default_week($weken) {
if (count($weken) == 0) return NULL;
if (count($weken) == 1) return $weken[0];
// de default week is de eerste lesweek na vrijdag het 9e uur in de vorige lesweek
$week = date('W', $_SERVER['REQUEST_TIME'] + 2*24*60*60 + (10 + 7*60)*60);
$year = date('o', $_SERVER['REQUEST_TIME'] + 2*24*60*60 + (10 + 7*60)*60);
$startweek = $weken[0];
$eindweek = $weken[count($weken) - 1];
if ($week >= $startweek && $startweek > 30) {
if ($year < substr(config('SCHOOLJAAR_LONG'), 0, 4)) {
$week = $startweek;
} else if ($year > substr(config('SCHOOLJAAR_LONG'), 0, 4)) {
$week = $eindweek;
}
} else if ($week <= $eindweek && $eindweek < 31) {
if ($year < substr(config('SCHOOLJAAR_LONG'), 5)) {
$week = $startweek;
} else if ($year > substr(config('SCHOOLJAAR_LONG'), 5)) {
$week = $eindweek;
}
} else if ($year <= substr(config('SCHOOLJAAR_LONG'), 0, 4)) {
$week = $startweek;
} else {
$week = $eindweek;
}
while (!in_array($week, $weken) && $week < 53) $week++;
if (!in_array($week, $weken)) $week = 1;
while (!in_array($week, $weken) && $week < 31) $week++;
if ($week == 31) $week = $weken[count($weken) - 1];
return $week;
}
/* get rid of slashes produced by a moronic default setting on which
* some software still relies... */
function cleanup_magic_quotes(&$array) {
foreach ($array as $key => $value) {
if (is_array($value)) cleanup_magic_quotes($value);
else $array[$key] = stripslashes($value);
}
}
if (get_magic_quotes_gpc()) {
if (isset($_GET)) cleanup_magic_quotes($_GET);
if (isset($_POST)) cleanup_magic_quotes($_POST);
}
/*
function logit_r($data, $indent = '') {
if (is_array($data)) {
echo('Array ('."\n");
foreach ($data as $key => $value) {
echo($indent.' ['.$key.'] => ');
logit_r($data, $indent.' ');
}
echo($indent.')'."\n");
} else echo($data);
}*/
mb_internal_encoding("UTF-8");
function htmlenc($string) {
return htmlspecialchars($string, ENT_QUOTES, 'UTF-8');
}
function fatal_error($string) {
global $uploadfunction;
/*
if ($uploadfunction) {
ob_end_clean();
die($string);
exit;
}*/
if (php_sapi_name() != 'cli') {
header('Content-Type: text/plain');
header('Content-Disposition: inline; filename=error.txt;');
}
logit('fatal error: '.$string);
exit;
}
// log to user and to logfile
function logit($string) {
$datetime = date("Y-m-d H:i:s", time());
if ($fp = fopen(config('DATADIR').config('LOGFILE'), 'a+')) {
fwrite($fp, $datetime.' '.$string."\n");
fclose($fp);
}
echo($datetime.' '.$string."\n");
}
function fopen_or_fail($filename) {
if ($fp = fopen($filename, 'r')) return $fp;
fatal_error('opening file: '.$filename);
}
function read_all_sections(&$sections, $file_name, $ignore_multiple = false) {
$section_name = 'PREAMBULE';
$fp = fopen($file_name, 'r');
if (!$fp) {
logit("unable to open $file_name");
$sections = false;
return;
}
$sections = array();
$sections[$section_name] = array();
while (!feof($fp)) {
$line = fgets($fp);
if ($line === NULL) {
logit('read error at line '.$no.' of '.$file_name);
$sections = false;
return;
}
$tmp = explode("\t", trim($line));
if ($tmp[0] == '########') {
if (!$ignore_multiple && isset($sections[$tmp[1]])) {
logit('file '.$file_name.' contains multiple sections with the same name: '.$tmp[1]);
$sections = false;
return;
}
$section_name = $tmp[1];
$sections[$section_name] = array();
} else {
$sections[$section_name][] = $tmp;
}
}
if (!fclose($fp)) {
logit('error at fclose of '.$file_name);
$sections = false;
}
}
function print_dag($dag) {
switch ($dag) {
case 0: return 'zo';
case 1: return 'ma';
case 2: return 'di';
case 3: return 'wo';
case 4: return 'do';
case 5: return 'vr';
case 6: return 'za';
}
}
function print_rev($time, $rev = 0) {
return 'r'.$rev.' '.date('W', $time).print_dag(date('w', $time)).date('G:i', $time);
//return date('W', $time).print_dag(date('w', $time)).date('G:i T', $time);
}
function get_baselink() {
$pos = strrpos($_SERVER['PHP_SELF'], '/');
if ($pos === false) fatal_error('geen / gevonden in PHP_SELF');
return 'http://'.$_SERVER['HTTP_HOST'].substr($_SERVER['PHP_SELF'], 0, $pos + 1);
}
function bbtohtml($t) {
$pattern['url'] = '/\[url\=(.+?)\](.+?)\[\/url\]/is';
$replacement['url'] = '$2';
$pattern['lf'] = '/\r\n/is';
$replacement['lf'] = '
';
$pattern['b'] = '/\[b\](.+?)\[\/b\]/is';
$replacement['b'] = '$1';
$pattern['i'] = '/\[i\](.+?)\[\/i\]/is';
$replacement['i'] = '$1';
return preg_replace($pattern, $replacement, $t);
}
function htmltobb($t) {
$pattern['lf'] = '/
/is';
$replacement['lf'] = "\r\n";
$pattern['url'] = '/(.+?)<\/a>/is';
$replacement['url'] = '[url=$1]$2[/url]';
$pattern['b'] = '/(.+?)<\/b>/is';
$replacement['b'] = '[b]$1[/b]';
$pattern['i'] = '/(.+?)<\/i>/is';
$replacement['i'] = '[i]$1[/i]';
return preg_replace($pattern, $replacement, $t);
}
function lock_release() {
// we can only release a lock if it is ours, so we check by including the PID
mdb2_exec('DELETE FROM locking WHERE locking_id = 0 AND locking_pid = '.getmypid());
}
function lock_acquire($string, $randid) {
do {
$lock = mdb2_single_assoc("SELECT * FROM locking WHERE locking_id = 0");
if ($lock === NULL) {
$PID = getmypid();
$time = time();
if (mdb2_exec_error(MDB2_ERROR_CONSTRAINT, <<