<?
require_once('phplib/phplib.php');
require_once('rquery.php');

check_personeel();

define('LOKAAL', 3);
define('LESGROEP', 4);
define('STAMKLAS', 5);
define('VAK', 6);
define('CATEGORIE', 7);
$db = mdb2_open($dsn); // pak het nieuwste basisrooster

mdb2_exec($db, "SET SESSION default_week_format = 3");

$min_week_id = mdb2_single_val($db, "SELECT config_value FROM config WHERE config_key = 'MIN_WEEK_ID'");
$max_week_id = mdb2_single_val($db, "SELECT config_value FROM config WHERE config_key = 'MAX_WEEK_ID'");

if ($_SESSION['admin']) {
	$voorwaarde = "%i >= 0 AND %i >= 0";
} else {
	// geen admin, verwijder verboven lokalen
	foreach ($computerlokalen_secret as $naam) {
		if (($i = array_search($naam, $computerlokalen_names)) !== FALSE) unset($computerlokalen_names[$i]);
	}
	$voorwaarde = "weken.week_id >= %i AND weken.week_id <= %i";
}

$weken = mdb2_all_assoc_rekey($db, <<<EOQ
SELECT weken.week_id, week, year,
		roosters.basis_id, roosters.wijz_id, roosters.rooster_id,
		 ma, di, wo, do, vr
FROM $roosterdb.roosters
LEFT JOIN $roosterdb.roosters AS more
ON more.week_id = roosters.week_id
	AND ( more.basis_id > roosters.basis_id
		OR ( more.basis_id = roosters.basis_id AND more.wijz_id > roosters.wijz_id ) )
RIGHT JOIN $roosterdb.weken ON weken.week_id = roosters.week_id
WHERE more.week_id IS NULL AND $voorwaarde
ORDER BY year, week
EOQ
, $min_week_id, $max_week_id);

$time = $_SERVER['REQUEST_TIME'];
$year_iso8601 = date("o", $time);
$week_iso8601 = date("W", $time);
$day_iso8601 = date("N", $time);
$hour = date("G");
$minute = date("i");
$lescounter = -1;

function getthisdeadline($week) {
	global $deadline_day, $deadline_hour, $deadline_minute;
	$day_in_week = strtotime(sprintf("{$week['year']}-01-04 + %d weeks", $week['week'] - 1));
	$monday_in_week = $day_in_week - ((date('w', $day_in_week) + 6)%7)*24*60*60;
	return $monday_in_week +
		($deadline_day  - 1)*24*60*60 + $deadline_hour*60*60 + $deadline_minute*60;
}

// intialize $_GET['week_id'] if it is nog set to silence warnings
// 0 means: take default week
if (!isset($_GET['week_id']) || !($_GET['week_id'] > 0)) $_GET['week_id'] = 0;

// omdat de deadline vrijdagmiddag van de vorige lesweek is, is de eerste lesweek automatisch 'op slot'

if ($_SESSION['admin']) {
	if (isset($weken[$max_week_id + 1])) {
		$default_week_id = $max_week_id + 1;
	} else {
		$default_week_id = $min_week_id;
	}
} else {
	$default_week_id = $min_week_id;
}
if ($_GET['week_id'] == 0) {
	$selected_week_id = $default_week_id;
} else {
	$selected_week_id = $_GET['week_id'];
}
if ($_GET['week_id'] == $default_week_id) $_GET['week_id'] = '';

//echo("default_week_id = $default_week_id ");

if (count($weken) == 0) {
	do_logout();
	echo("er staan geen lesweken open om een computerlokaal te reserveren");
	exit;
}

//echo("max_week_id = $max_week_id ");
//echo("default_week_id = $default_week_id ");
//echo("selected_week_id = $selected_week_id ");
$requested_week_id = 0;
$last_week_id = 0;
$last_file_id_basis = 0;
$next_locked = 1;
$week_options = '';
foreach ($weken as $week_id => $week) {
	$weken[$week_id]['deadline'] = getthisdeadline($week);
	if ($week['rooster_id']) {
		$last_file_id_basis = $weken[$week_id]['file_id_basis'] =  mdb2_single_val($db, "SELECT file_id FROM $roosterdb.roosters WHERE basis_id = %i AND wijz_id = 0", $week['basis_id']);
		$weken[$week_id]['file_id_wijz'] = mdb2_single_val($db, "SELECT file_id FROM $roosterdb.roosters WHERE basis_id = %i AND wijz_id = %i", $week['basis_id'], $week['wijz_id']);
		if ($weken[$week_id]['file_id_basis'] == $weken[$week_id]['file_id_wijz'])
			$weken[$week_id]['file_id_wijz'] = 0;
	} else {
		$weken[$week_id]['file_id_basis'] = $last_file_id_basis;
		$weken[$week_id]['file_id_wijz'] = 0;
	}
	$weken[$week_id]['dateinfo'] =  '('.date('j-n', strtotime($week['year'].'W'.str_pad($week['week'], 2, '0', STR_PAD_LEFT))).' t/m '.date('j-n', strtotime($week['year'].'W'.str_pad($week['week'], 2, '0', STR_PAD_LEFT)) + 4*60*60*24).')';
	$weken[$week_id]['locked'] = 0; /// deadline uitgeschaked $next_locked;
	if ($weken[$week_id]['deadline'] <= $time) $next_locked = 1;
	else $next_locked = 0;
	if ($week_id == $_GET['week_id']) $requested_week_id = $week_id;
	$selected = '';
	if ($selected_week_id == $week_id) {
		$selected = 'selected ';
	}
	if ($weken[$week_id]['locked'] == 0 && $default_week_id == 0) {
	       	$default_week_id = $week_id;
		$week_options .= '<option '.$selected.'value="">'.$week['week'].' '.$weken[$week_id]['dateinfo'].'</option>'."\n";
	} else {
		$week_options .= '<option '.$selected.'value="'.$week_id.'">'.$week['week'].' '.$weken[$week_id]['dateinfo'].'</option>'."\n";
	}
	$last_week_id = $week_id;
}

if ($requested_week_id) {
	//echo('current=req');
	$current_week_id = $requested_week_id;
} else if ($default_week_id) {
	//echo('current=default');
	$current_week_id = $default_week_id;
} else {
	//echo('current=max');
	$current_week_id = $max_week_id;
}

//echo("current_week_id = $current_week_id\n");

function find_entity_id($name) {
	global $db, $roosterdb;
	return mdb2_single_val($db, "SELECT entity_id FROM $roosterdb.entities WHERE entity_name = '%q'", $name);
}

$afkorting = mdb2_single_val($db, "SELECT ppl_login FROM $kldv.ppl WHERE ppl_id = %i", $_SESSION['ppl_id']);

$computerlokalen = array();
foreach ($computerlokalen_names as $name) {
	$computerlokalen[$name] = array();
	$computerlokalen[$name]['lokaal_id'] = find_entity_id($name);
}

$docent_id = find_entity_id($afkorting);
if (!$docent_id) {
	html_start(); ?><p>Docent <?=$afkorting?> is nog niet bekend op het roosterbord en kan daarom op dit moment geen reserveringen maken.<?
	html_end();
	exit();
}

//$docent_id = mdb2_single_val($db, "SELECT entity_id FROM $roosterdb.entities WHERE entity_name = '%q'", $afkorting);

$week = $weken[$current_week_id];

function get_rooster($target_id) {
	global $db, $roosterdb, $week;
	$subquery = rquery($target_id, $target_id,
			$week['file_id_basis'], $week['file_id_wijz'], 'LEFT ');

	return mdb2_all_assoc_rekey($db, <<<EOQ
SELECT f_zid, f.les_id, f.dag, f.uur, f.lesgroepen, f.vakken, IFNULL(GROUP_CONCAT(CONCAT(entities.entity_id, '/', entity_name)), '0/LOK?') lokalen
FROM ( $subquery ) AS sub
JOIN $roosterdb.lessen AS f ON f.les_id = f_id
LEFT JOIN $roosterdb.lessen AS s ON s.les_id = s_id
JOIN $roosterdb.entities2lessen ON entities2lessen.les_id = f.les_id
LEFT JOIN $roosterdb.entities ON entities.entity_id = entities2lessen.entity_id AND entity_type = %i
WHERE f.lesgroepen IS NOT NULL AND f.lesgroepen != '' AND f.dag != 0 AND f.uur != 0 AND ( wijz = 1 OR  s_zid IS NULL )
GROUP BY f.les_id
ORDER BY f.dag, f.uur
EOQ
, LOKAAL);
}

$rooster_docent = get_rooster($docent_id);
foreach ($computerlokalen as $name => $lokaal) {
	//$computerlokalen[$name]['lokaal_id'] = $lokaal['lokaal_id'];
	$computerlokalen[$name]['rooster'] = get_rooster($lokaal['lokaal_id']);
	$computerlokalen[$name]['rooster_index'] = array();
	foreach ($computerlokalen[$name]['rooster'] as $zid => $les) {
		$moment = $les['dag'].'-'.$les['uur'];
		if (!isset($computerlokalen[$name]['rooster_index'][$moment])) 
			$computerlokalen[$name]['rooster_index'][$moment] = array();
		$computerlokalen[$name]['rooster_index'][$moment][] = $zid;
	}

$computerlokalen[$name]['bloks'] = mdb2_all_assoc_rekey($db, <<<EOQ
SELECT CONCAT(dag, '-', uur), text_roostermaker FROM blokgroups
JOIN entblok USING (blokgroup_id)
JOIN uurblok USING (blokgroup_id)
WHERE week_id = {$current_week_id} AND entity_id = {$lokaal['lokaal_id']} AND timestamp_delete IS NULL AND soort = 'HARD'
EOQ
);

$computerlokalen[$name]['softbloks'] = mdb2_all_assoc_rekey($db, <<<EOQ
SELECT CONCAT(dag, '-', uur), text_roostermaker FROM blokgroups
JOIN entblok USING (blokgroup_id)
JOIN uurblok USING (blokgroup_id)
WHERE week_id = {$current_week_id} AND entity_id = {$lokaal['lokaal_id']} AND timestamp_delete IS NULL AND soort = 'SOFT'
EOQ
);

	$computerlokalen[$name]['resvs'] = mdb2_all_assoc_rekey($db, <<<EOQ
SELECT entwijz_id, zermelo_id, entity_id_old, reservant, text_reservant, text_roostermaker, lessen.*
FROM entwijz
JOIN $roosterdb.lessen USING (les_id)
WHERE entity_id_new = {$lokaal['lokaal_id']} AND week_id = {$current_week_id} AND timestamp_delete IS NULL
EOQ
);
	$computerlokalen[$name]['resvs_zindex'] = array();
	foreach ($computerlokalen[$name]['resvs'] as $id => $les) {
		$zid = $les['zermelo_id'];
		if (!isset($computerlokalen[$name]['resvs_zindex'][$zid])) 
			$computerlokalen[$name]['resvs_zindex'][$zid] = array ();
		$computerlokalen[$name]['resvs_zindex'][$zid][] = $id;
	}
	$computerlokalen[$name]['resvs_index'] = array();
	foreach ($computerlokalen[$name]['resvs'] as $id => $les) {
		$moment = $les['dag'].'-'.$les['uur'];
		if (!isset($computerlokalen[$name]['resvs_index'][$moment])) 
			$computerlokalen[$name]['resvs_index'][$moment] = array();
		$computerlokalen[$name]['resvs_index'][$moment][] = $id;
	}
}

$resvs = mdb2_all_assoc_rekey($db, <<<EOQ
SELECT entwijz_id, zermelo_id, entity_id_new, entity_id_old, text_reservant, text_roostermaker, lessen.*
FROM entwijz
JOIN $roosterdb.lessen USING (les_id)
WHERE reservant = '%q' AND week_id = {$current_week_id} AND timestamp_delete IS NULL
EOQ
, $_SESSION['username']);

$dagen = array ( 'zo', 'ma', 'di', 'wo', 'do', 'vr', 'za' );

$resvs_index = array();
foreach ($resvs as $id => $les) {
	$moment = $les['dag'].'-'.$les['uur'];
	if (!isset($resvs_index[$moment]))
		$resvs_index[$moment] = array();
	$resvs_index[$les['dag'].'-'.$les['uur']][] = $id;
}

html_start(<<<EOS
$(function() {
	$('#weekselect > select').change(function () { $('#weekselect').submit(); });
	$('.radio > radio').change(function () { this.form.submit(); });
});
EOS
); 
//print_r($week);
//echo($week['year'].'W'.str_pad($week['week'], 2, '0', STR_PAD_LEFT));
$thismonday = strtotime($week['year'].'W'.str_pad($week['week'], 2, '0', STR_PAD_LEFT));
//$datemonday = date('d-m', $thismonday);
//echo("datemonday=$datemonday\n");
?>
<p>Als je een computerlokaal wilt gebruiken voor iets waar voor- of nawerk voor nodig is, zoals bijvoorbeeld een toets met examenaccounts, neem contact op met Esther. Je kunt hier alleen activiteiten plannen die precies 1 lesuur of minder in beslag nemen.
<form id="weekselect" method="GET">week: <select name="week_id">
<? echo($week_options); ?>
</select></form>
<p>Lessen van <? echo($afkorting); ?>. Merk op dat <b>COM1 = 212</b> en <b>COM2 = 210</b>.
<!-- Deadline <b><? if (!$week['locked']) { ?>niet <? } ?> verstreken</b>. -->
<?
//echo("<p>now: year=$year_iso8601, week=$week_iso8601, day=$day_iso8601, time:$hour:$minute<br>");
//echo("<p>current_week_id=$current_week_id<br>\n");
//echo("<p>afkorting=$afkorting, docent_id=$docent_id\n");
//mdb2_res_table($res);
?><pre><?
//print_r($week);
//print_r($computerlokalen);
//print_r($resvs);
//print_r($resvs_index);
?></pre><?
$cur = current($rooster_docent);
$cur_key = key($rooster_docent);
/*
echo("we hebben $cur_key ");
print_r($cur);
next($rooster_docent);
$cur = current($rooster_docent);
$cur_key = key($rooster_docent);
echo("we hebben $cur_key ");
print_r($cur);*/
for ($dag = 1; $dag <= 5; $dag++) {
			if (isset($_GET['debug'])) { ?>
<pre>
<? print_r($week);
echo($dagen[$dag]);
echo($week[$dagen[$dag]]);
 ?>
</pre>
<?}
	for ($uur = 1; $uur <= 9; $uur++) {
		$moment = $dag.'-'.$uur;
		while ($cur['dag'] == $dag && $cur['uur'] == $uur) {
			// sla dagen over die 'uit' staan op het roosterbord
			if ($week[$dagen[$dag]] == 0) {
				next($rooster_docent);
				$cur = current($rooster_docent);
				$cur_key = key($rooster_docent);
				continue;
			}

			//if ($week[$dagen[$cur['dag']]] == 0) continue;
			$dateinfo = date('j-n', $thismonday + ($dag - 1)*24*60*60);
			echo("<p>$dateinfo {$dagen[$dag]}$uur {$cur['lesgroepen']}/{$cur['vakken']}");
			$lokalen = explode(',', $cur['lokalen']);
			foreach ($lokalen as $lokaal) {
				//echo('<pre>lokaal '.$lokaal.' current week id='.$current_week_id);
			//	print_r($cur);
			//	echo("cur_key=$cur_key\n");
			//	echo('</pre>');
				$lokaal_info = explode('/', $lokaal);
				//echo(' ('.$lokaal_info[1].' -> ');
				// staat er een reservering op deze les op dit uur met dit lokaal als oud lokaal?
				//

//-- WHERE zermelo_id = %i AND entity_id_old = %i AND lessen.uur = %i AND lessen.dag = %i AND week_id = {$current_week_id} AND timestamp_delete IS NULL
$resv = mdb2_single_assoc($db, <<<EOQ
SELECT entwijz_id, zermelo_id, entity_id_new, entity_id_old, text_reservant, text_roostermaker, lessen.*, entities_new.entity_name entity_name_new, entities_old.entity_name entity_name_old
FROM entwijz
JOIN $roosterdb.lessen USING (les_id)
JOIN $roosterdb.entities entities_new ON entities_new.entity_id = entwijz.entity_id_new
JOIN $roosterdb.entities entities_old ON entities_old.entity_id = entwijz.entity_id_old
WHERE zermelo_id = %i AND entity_id_new != %i AND lessen.uur = %i AND lessen.dag = %i AND week_id = {$current_week_id} AND timestamp_delete IS NULL
ORDER BY timestamp_create DESC
LIMIT 1
EOQ
, $cur_key, $lokaal_info[0], $cur['uur'], $cur['dag']);
				//print_r($resv);
				if (is_array($resv)) {
					echo('<span');
					if (isset($computerlokalen[$resv['entity_name_new']]['softbloks'][$moment])) {
						echo(' class="soft"');
					}
					echo('>');
					if ($lokaal_info[1] == $resv['entity_name_old']) echo(' ('.$lokaal_info[1].' -> ');
					else echo(' (<del>'.$resv['entity_name_old'].'</del> -> '.$lokaal_info[1].' -> ');
					echo($resv['entity_name_new'].': '.htmlenc($resv['text_reservant']).' <a href="edittext.php?week_id='.$current_week_id.'&amp;entwijz_id='.$resv['entwijz_id'].'">[bewerken]</a> <a href="verwijder.php?week_id='.$current_week_id.'&amp;entwijz_id='.$resv['entwijz_id'].'">X</a>');
					echo('</span>');
				} else {
				//
				// staat er een reservering met dit lokaal als nieuw lokaal?
$resv = mdb2_single_assoc($db, <<<EOQ
SELECT entwijz_id, zermelo_id, entity_id_new, entity_id_old, text_reservant, text_roostermaker, lessen.*, entity_name
FROM entwijz
JOIN $roosterdb.lessen USING (les_id)
JOIN $roosterdb.entities ON entities.entity_id = entwijz.entity_id_old
WHERE zermelo_id = %i AND entity_id_new = %i AND lessen.uur = %i AND lessen.dag = %i AND week_id = {$current_week_id} AND timestamp_delete IS NULL
ORDER BY timestamp_create DESC
LIMIT 1
EOQ
, $cur_key, $lokaal_info[0], $cur['uur'], $cur['dag']);
				if (is_array($resv)) {
				echo('<span');
				if (isset($computerlokalen[$lokaal_info[1]]['softbloks'][$moment])) {
					echo(' class="soft"');
				}
				echo('>');
				echo(' ('.$lokaal_info[1].' <- ');
					echo($resv['entity_name'].': '.htmlenc($resv['text_reservant']).' <a href="edittext.php?week_id='.$current_week_id.'&amp;entwijz_id='.$resv['entwijz_id'].'">[bewerken]</a> <a href="verwijder.php?week_id='.$current_week_id.'&amp;entwijz_id='.$resv['entwijz_id'].'">X</a>');

				echo('</span>');
				} else {
				echo(' ('.$lokaal_info[1].' -> ');
				//
				// geen reservering?
				//
				// check beschikbaarheid computerlokalen
				foreach ($computerlokalen as $naam => $computerlokaal) {
					if (isset($computerlokaal['rooster_index'][$moment])) {
						?> <span title="reeds ingeroosterd"><del><? echo(htmlenc($naam)); ?></del></span><?
					} else if (isset($computerlokaal['bloks'][$moment])) {
						?> <span title="<? echo('geblokkeerd: '.htmlenc($computerlokaal['bloks'][$moment])); ?>"><del><? echo(htmlenc($naam)); ?></del></span><?
					} else if (isset($computerlokaal['resvs_index'][$moment])) {
						?> <span title="gereserveerd door <? echo(htmlenc($computerlokaal['resvs'][$computerlokaal['resvs_index'][$moment][0]]['reservant'])); ?>"><del><? echo(htmlenc($naam)); ?></del></span><?
					} else {
						?> <a<? if (isset($computerlokaal['softbloks'][$moment])) { ?> class="soft"<? } ?> href="reserveer.php?week_id=<? echo($current_week_id); ?>&amp;file_id_basis=<? echo($week['file_id_basis']) ?>&amp;file_id_wijz=<? echo($week['file_id_wijz']) ?>&amp;les_id=<? echo($cur['les_id']) ?>&amp;zermelo_id=<? echo($cur_key) ?>&amp;entity_id_old=<? echo($lokaal_info[0]) ?>&amp;entity_id_new=<? echo($computerlokaal['lokaal_id']) ?>"><? echo(htmlenc($naam)); ?></a><?
					}
				}
				}
				}
				echo(')'."\n");
				?><pre><? //print_r($computerlokaal); print_r($cur); print_r($week); ?></pre><?
			}
			next($rooster_docent);
			$cur = current($rooster_docent);
			$cur_key = key($rooster_docent);
		}
	}
}
?><span class="legenda soft">&nbsp;</span> reserveringen aangeduid in deze kleur, kunnen mogelijk niet worden gehonoreerd wegens nader in te plannen activiteiten in de computerlokalen.<?
html_end();
?>