<?
require_once('config.php');
require_once('phplib/mdb2_utils.php');
require_once('common.php');
require_once('phplib/fancymail.php');
function logit() {
}

session_name($session_name);
session_start();
header('Content-type: text/plain;charset=UTF-8');

if (deadline_expired()) {
	$_SESSION['err'] = "Inschrijving is gesloten";
	header('Location: '.$location);
	exit;
}

if (!isset($_POST['naam0']) || !isset($_POST['naam1']) ||
		!isset($_POST['naam2']) || !isset($_POST['workshop1_id']) ||
		!isset($_POST['workshop2_id']) ||
		!preg_match('/^[[:digit:]]+/', $_POST['workshop1_id']) ||
		!preg_match('/^[[:digit:]]+/', $_POST['workshop2_id'])) {
	$_SESSION['err'] = 'Ongeldige input, dit is onmogelijk!';
	header('Location: '.$location);
	exit;
}

$naam0 = htmlenc(trim($_POST['naam0']));
$naam1 = htmlenc(trim($_POST['naam1']));
$naam2 = htmlenc(trim($_POST['naam2']));
$email = htmlenc(trim($_POST['email']));

$db = mdb2_open($dsn);

if ($_POST['workshop1_id'] != 0 &&
		!($workshop1_id = mdb2_single_val($db, 
		"SELECT oudersws_id FROM oudersws WHERE oudersws_id != 1 AND oudersws_id = %i",
		$_POST['workshop1_id']))) {
	$_SESSION['err'] = 'Ongeldige input, dit is onmogelijk!';
	header('Location: '.$location);
	exit;
}

if ($_POST['workshop2_id'] != 0 &&
		!($workshop2_id = mdb2_single_val($db, 
		"SELECT oudersws_id FROM oudersws WHERE oudersws_id != 1 AND oudersws_id = %i",
		$_POST['workshop2_id']))) {
	$_SESSION['err'] = 'Ongeldige input, dit is onmogelijk!';
	header('Location: '.$location);
	exit;
} else if ($_POST['workshop2_id'] == 0) {
	$workshop2_id = 0;
}

if ($_POST['namens'] == 1) $namens = 1;
else if ($_POST['namens'] == 2) $namens = 2;
else {
	$_SESSION['err'] = 'Ongeldige input, dit is onmogelijk!';
	header('Location: '.$location);
	exit;
}

if ($naam0 == '' || $naam1 == '' || $email == '' || !$workshop1_id) {
	$_SESSION['err'] = 'U heeft niet alle verplichte velden ingevuld';
	header('Location: '.$location.sprint_url_parms($_POST, 1));
	exit;
}

if (filter_var($_POST['email'], FILTER_VALIDATE_EMAIL) === false) {
	$_SESSION['err'] = 'Het opgegeven emailadres is ongeldig';
	header('Location: '.$location.sprint_url_parms($_POST, 1));
	exit;
}

if ($workshop1_id == $workshop2_id) {
	$_SESSION['err'] = 'U kunt zich niet inschrijven voor twee dezelfde workshops.';
	header('Location: '.$location.sprint_url_parms($_POST, 1));
	exit;
}

// deze query maakt een lijst van workshops, met de beschikbare plaatsen per ronde 
// (indien iemand met twee personen inschrijft, delen we het aantal beschikbare plaatsen
// per lokaal door 2, een lokaal met 1 lege plek heb je immers niks aan als je met zijn 2en komt
mdb2_query($db, 'LOCK TABLES ouderslokalen READ, ouders WRITE, ouders AS ouders1 READ, ouders AS ouders2 READ, ouders AS ouders3 READ, oudersws READ');
$result = mdb2_all_assoc_rekey($db, <<<EOQ
SELECT bla.* FROM (
	SELECT oudersws_id,
		SUM(( capaciteit - IFNULL(b1, 0) ) DIV $namens) o1,
		SUM(( capaciteit - IFNULL(b2, 0) ) DIV $namens) o2,
		SUM(( capaciteit - IFNULL(b3, 0) ) DIV $namens) o3
	FROM ouderslokalen
	LEFT JOIN (
		SELECT r1_lokaal_id AS lokaal_id, SUM(count) b1 FROM ouders AS ouders1
		WHERE timestamp_delete IS NULL
		GROUP BY r1_lokaal_id
	) AS b1 USING (lokaal_id)
	LEFT JOIN (
		SELECT r2_lokaal_id AS lokaal_id, SUM(count) b2 FROM ouders AS ouders2
		WHERE timestamp_delete IS NULL
		GROUP BY r2_lokaal_id
	) AS b2 USING (lokaal_id)
	LEFT JOIN (
		SELECT r3_lokaal_id AS lokaal_id, SUM(count) b3 FROM ouders AS ouders3
		WHERE timestamp_delete IS NULL
		GROUP BY r3_lokaal_id
	) AS b3 USING (lokaal_id)
	GROUP BY oudersws_id
) AS bla
JOIN oudersws USING (oudersws_id)
ORDER BY `order`
EOQ
);

$selector = build_selector($workshop1_id, $workshop2_id);

function find_min_of_order($order) {
	global $result, $weights, $db;

	$capacities = mdb2_all_ordered_rekey($db, <<<EOQ
SELECT oudersws_id, SUM(capaciteit) FROM ouderslokalen
GROUP BY oudersws_id
EOQ
);
	/*echo("capac\n");
	print_r($capacities);
	echo("order\n");
	print_r($order);
	echo("results\n");
	print_r($result); */
	//print_r($result[$order[0]]);
	//print_r($result[$order[1]]);
	//print_r($result[$order[2]]);
	if (!$order[0]) $m1 = 1;
	else $m1 = $result[$order[0]]['o1']/$capacities[$order[0]]*$weights[0];
	if (!$order[1]) $m2 = 1;
	else $m2 = $result[$order[1]]['o2']/$capacities[$order[1]]*$weights[1];
	if (!$order[2]) $m3 = 1;
	else $m3 = $result[$order[2]]['o3']/$capacities[$order[2]]*$weights[2];
	//$ma1 = $result[$order[0]]['o1']/$capacities[$order[0]]; //*$weights[0];
	//$ma2 = $result[$order[1]]['o2']/$capacities[$order[1]]; //*$weights[1];
	//$ma3 = $result[$order[2]]['o3']/$capacities[$order[2]]; //*$weights[2];
	//echo("min($m1 [{$result[$order[0]]['o1']}], $m2 [{$result[$order[1]]['o2']}], $m3 [{$result[$order[2]]['o3']}])\n");
	// orden met relatieve bezettingen!
	$return = array('order' => $order,
		'min' => min($m1, min($m2, $m3)),
		'max' => max($m1, max($m2, $m3))
	);
	//return array('order' => $order, 'min' => min($result[$order[0]]['o1']/$capacities[$order[0]]/$weights[0], min($result[$order[1]]['o2']/$capacities[$order[1]]/$weights[1], $result[$order[2]]['o3']/$capacities[$order[2]]/$weights[2])));
	//return array('order' => $order, 'min' => min($result[$order[0]]['o1'], min($result[$order[1]]['o2'], $result[$order[2]]['o3'])));
	//return array('order' => $order, 'min' => min($weights[0]*$result[$order[0]]['o1'], min($weights[1]*$result[$order[1]]['o2'], $weights[2]*$result[$order[2]]['o3'])));
	//print_r($return);
	//exit;
	return $return;
}
//print_r($result);
$possibilities = array_map('find_min_of_order', $selector);
// find possibility with largest 'min'
//print_r($possibilities);
shuffle($possibilities);
$best = $possibilities[0];
for ($i = 1; $i < count($possibilities); $i++) {
	if ($best['min'] < $possibilities[$i]['min']) {
		$best = $possibilities[$i];
	}
}


if ($best['min'] <= 0) {
	$_SESSION['err'] = 'De gekozen combinatie van workshops is helaas reeds volgeboekt.';
	header('Location: '.$location.sprint_url_parms($_POST, 1));
	exit;
}

// neem degene met de meeste plek
for ($i = 1; $i < count($possibilities); $i++) {
	if ($best['max'] < $possibilities[$i]['max'] && $possibilities[$i]['min'] >  0) {
		$best = $possibilities[$i];
	}
}

// dit is de verdeling van de workshops over de rondes, nu nog lokalen zoeken
echo("best:\n");
print_r($best);

function select_lokaal($namens, $ronde, $oudersws_id) {
	global $db, $soft_limit;
	assert($ronde == 1 || $ronde == 2 || $ronde == 3);
	$infos = mdb2_all_assoc_rekey($db, <<<EOQ
SELECT lokaal_id, ( capaciteit - IFNULL(b{$ronde}, 0) ) DIV $namens o, capaciteit DIV $namens t
FROM ouderslokalen
LEFT JOIN (
	SELECT r{$ronde}_lokaal_id AS lokaal_id, SUM(count) b{$ronde}
	FROM ouders AS ouders{$ronde}
	WHERE timestamp_delete IS NULL
	GROUP BY r{$ronde}_lokaal_id
) AS b{$ronde} USING (lokaal_id)
WHERE oudersws_id = $oudersws_id AND ( capaciteit - IFNULL(b{$ronde}, 0) ) DIV $namens > 0
ORDER BY lokaal_id
EOQ
);
	echo("function select lokaal aangeroepen voor ronde $ronde!\n");

	$aantal_lokalen = count($infos);
	$first_less_than_fullish = 0;
	$least_full_factor = 1;
	$least_full = 0;
	if (!$aantal_lokalen) return 0;

	foreach ($infos as $lokaal_id => $info) {
		$factor = 1 - $info['o']/$info['t'];
		if ($info['o'] > 0 && $least_full_factor > $factor) {
			$least_full_factor = $factor;
			$least_full = $lokaal_id;
		}
		if ($factor >= $soft_limit) {
			$infos[$lokaal_id]['lessthanfullish'] = 0;
		} else {
			if (!$first_less_than_fullish) $first_less_than_fullish = $lokaal_id;
			$infos[$lokaal_id]['lessthanfullish'] = 1;
		}
	}
	print_r($infos);
	if ($first_less_than_fullish) return $first_less_than_fullish;
	else if ($least_full) return $least_full;
	else return 0;
}

$r1_lokaal_id = select_lokaal($namens, 1, $best['order'][0]);
$r2_lokaal_id = select_lokaal($namens, 2, $best['order'][1]);
$r3_lokaal_id = select_lokaal($namens, 3, $best['order'][2]);

echo('$r1_lokaal_id='.$r1_lokaal_id."\n");
echo('$r2_lokaal_id='.$r2_lokaal_id."\n"); 
echo('$r3_lokaal_id='.$r3_lokaal_id."\n");

mdb2_exec($db, <<<EOQ
INSERT INTO ouders ( naam0, naam1, naam2, count, phpsessid, timestamp_create,
	ipv4, email, r1_lokaal_id, r2_lokaal_id, r3_lokaal_id )
VALUES ( '%q', '%q', '%q', %i, '%q', {$_SERVER['REQUEST_TIME']},
	'{$_SERVER['REMOTE_ADDR']}', '%q', $r1_lokaal_id, $r2_lokaal_id, $r3_lokaal_id )
EOQ
, $naam0, $naam1, $naam2, $namens, session_id(), $email);
$inschrijving_id = mdb2_single_val($db, $last_insert_id);


mdb2_query($db, 'UNLOCK TABLES');

// inschrijving is gelukt

$authcode = md5($inschrijf_secret.'-'.$inschrijving_id);

//echo("<code>inschrijf secret = $inschrijf_secret, inschrijving_id = $inschrijving_id, authcode = $authcode</code>");
$info = mdb2_single_row($db, MDB2_FETCHMODE_ASSOC, <<<EOQ
SELECT inschrijving_id, naam0, naam1, naam2, email, count,
        IFNULL(CONCAT(w1.oudersws_oms, ' in ', l1.long_name), '-') ronde_1,
        IFNULL(CONCAT(w2.oudersws_oms, ' in ', l2.long_name), '-') ronde_2,
        IFNULL(CONCAT(w3.oudersws_oms, ' in ', l3.long_name), '-') ronde_3
FROM ouders
LEFT JOIN ouderslokalen AS l1 ON l1.lokaal_id = r1_lokaal_id
LEFT JOIN oudersws AS w1 ON w1.oudersws_id = l1.oudersws_id
LEFT JOIN ouderslokalen AS l2 ON l2.lokaal_id = r2_lokaal_id
LEFT JOIN oudersws AS w2 ON w2.oudersws_id = l2.oudersws_id
LEFT JOIN ouderslokalen AS l3 ON l3.lokaal_id = r3_lokaal_id
LEFT JOIN oudersws AS w3 ON w3.oudersws_id = l3.oudersws_id
WHERE inschrijving_id = %i
EOQ
, $inschrijving_id);

if ($info['count'] == 1) $personen = '1 persoon';
else $personen = $info['count'].' personen';

fancymail('Voorlichtingsavond OVC', 'voorlichtingsavond@ovc.nl', $_POST['email'], 'directiesecretariaat@ovc.nl', 'ouderinschrijving voorlichtingsavond OVC '.$deadline_text,<<<EOQ
<img src="ovc-logo.png">

<p>Geachte heer/mevrouw,

<p>U hebt zich zojuist via onze website ingeschreven voor de voorlichtingsavond op het Oostvaarders College op $deadline_text.

<p>De voorlichting voor ouders vindt plaats in drie ronden.

<ul>

<li>Ronde 1 (19:25 - 19:50): {$info['ronde_1']}</li>

<li>Ronde 2 (20:00 - 20:25): {$info['ronde_2']}</li>

<li>Ronde 3 (20:35 - 21:00): {$info['ronde_3']}</li>

</ul>

<p>Uw inschrijving is geldig voor $personen.

<p>Tot ziens op $deadline_text. De inloop is vanaf $inloop_text uur, we starten om $start_text uur.
Deze mail, uitgeprint of op uw smartphone, is uw toegangsbewijs.

<p>Met vriendelijke groeten,

<p>De organisatie voorlichtingsavond M. Leyten, G. Kiesewetter en S. Nietvelt

<pre>
-- 
srv-ovc-linux: (id={$info['inschrijving_id']},authcode=$authcode)
</pre>
EOQ
, <<<EOQ
Geachte heer/mevrouw,

U hebt zich zojuist via onze website ingeschreven voor de voorlichtingsavond op het Oostvaarders College op $deadline_text.

De voorlichting voor ouders vindt plaats in drie ronden.

Ronde 1 (19:25 - 19:50): {$info['ronde_1']}

Ronde 2 (20:00 - 20:25): {$info['ronde_2']}

Ronde 3 (20:35 - 21:00): {$info['ronde_3']}

Uw inschrijving is geldig voor $personen.

Tot ziens op $deadline_text. De inloop is vanaf $inloop_text uur, we starten om $start_text uur.
Deze mail, uitgeprint of op uw smartphone, is uw toegangsbewijs.

Met vriendelijke groeten,

De organisatie voorlichtingsavond M. Leyten, G. Kiesewetter en S. Nietvelt

-- 
srv-ovc-linux: (id={$info['inschrijving_id']},authcode=$authcode)

EOQ
);

header('Location: '.$location.'print_ouders.php?inschrijving_id='.$inschrijving_id.'&authcode='.$authcode);
$corona_html = <<<STOP
<p>In de persconferentie van afgelopen dinsdag werden nieuwe maatregelen
aangekondigd. Wij willen zo veel als mogelijk recht doen aan het advies om 1,5
meter afstand te houden. Op deze korte termijn zal dat niet altijd lukken, maar
wij denken dat het met inspaningen van beide kanten mogelijk is toch een
veilige informatieavond op het OVC te hebben.

<p>Wij vragen uw medewerking bij het volgende:

<ul>
<li>Wij vragen u, als u zich voor twee ouders heeft ingeschreven om maar met één
ouder (en uw kind natuurlijk) te komen. Wij zullen er voor zorgen dat alle
voorlichtingen gestreamd worden zodat de tweede ouder niets mist en alles
vanuit huis kan volgen. Dat scheelt enorm in de drukte en maakt afstand houden
beter mogelijk. Onze presentaties zijn live te volgen op onze website.
www.ovc.nl via de tegel “Live verbinding 04 november“.</li>

<li>Kunt u een mondkapje dragen in de aula/gangen en in lokalen waar het niet
mogelijk is 1,5 meter afstand te houden? Mocht u geen mondkapje meer hebben dan
ontvangt u er een van het OVC.</li>

<li>Bij binnenkomst staan een aantal desinfectiezuilen. Maak hier a.u.b. gebruik van.</li>

<li>Uw kind wordt hartelijk ontvangen bij zijn of haar talentklas in de aula en
naar het goede lokaal gebracht. Wij vragen u zo snel mogelijk naar uw
presentatie in de eerste ronde te gaan om drukte te voorkomen.</li>

<li>Houd anderhalve meter afstand waar mogelijk.</li>

<li>Houd zoveel mogelijk rechts in onze brede gangen</li>

<li>Onze ramen staan in de lokalen zoveel mogelijk open, zodat we extra goed kunnen ventileren. Misschien wel goed om hier rekening mee te houden morgenavond.</li>

<li>Ouders en leerlingen ontmoeten elkaar weer aan het eind van de avond op verschillende punten om drukte te voorkomen zijn deze verspreid door ons gebouw:

<ul>
<li> I AM & Cambridge Engels:         Uitgang 1 bij lokaal 002</li>

<li>- Sport en Kunst:          Uitgang 2 hoofdentree bij de receptie</li>

<li>- Science:                         Uitgang 3 achteruitgang bij lokaal 020</li>
</ul>
</li>
</ul>

Al met al weer veel coronagedoe waar niemand op zit te wachten. Evengoed denken
wij dat u en uw kind zich zo veilig en goed kunnen voorbereiden op de nieuwe
VO-school.
STOP;
$corona = <<<STOP
In de persconferentie van afgelopen dinsdag werden nieuwe maatregelen
aangekondigd. Wij willen zo veel als mogelijk recht doen aan het advies om 1,5
meter afstand te houden. Op deze korte termijn zal dat niet altijd lukken, maar
wij denken dat het met inspaningen van beide kanten mogelijk is toch een
veilige informatieavond op het OVC te hebben.

Wij vragen uw medewerking bij het volgende:

- Wij vragen u, als u zich voor twee ouders heeft ingeschreven om maar met één
ouder (en uw kind natuurlijk) te komen. Wij zullen er voor zorgen dat alle
voorlichtingen gestreamd worden zodat de tweede ouder niets mist en alles
vanuit huis kan volgen. Dat scheelt enorm in de drukte en maakt afstand houden
beter mogelijk. Onze presentaties zijn live te volgen op onze website.
www.ovc.nl via de tegel “Live verbinding 04 november“.

- Kunt u een mondkapje dragen in de aula/gangen en in lokalen waar het niet
mogelijk is 1,5 meter afstand te houden? Mocht u geen mondkapje meer hebben dan
ontvangt u er een van het OVC.

- Bij binnenkomst staan een aantal desinfectiezuilen. Maak hier a.u.b. gebruik van.

- Uw kind wordt hartelijk ontvangen bij zijn of haar talentklas in de aula en naar het goede lokaal gebracht. Wij vragen u zo snel mogelijk naar uw presentatie in de eerste ronde te gaan om drukte te voorkomen.

- Houd anderhalve meter afstand waar mogelijk.

- Houd zoveel mogelijk rechts in onze brede gangen

- Onze ramen staan in de lokalen zoveel mogelijk open, zodat we extra goed kunnen ventileren. Misschien wel goed om hier rekening mee te houden morgenavond.

- Ouders en leerlingen ontmoeten elkaar weer aan het eind van de avond op verschillende punten om drukte te voorkomen zijn deze verspreid door ons gebouw:

  * I AM & Cambridge Engels:         Uitgang 1 bij lokaal 002

  * Sport en Kunst:          Uitgang 2 hoofdentree bij de receptie

  * Science:                         Uitgang 3 achteruitgang bij lokaal 020

Al met al weer veel coronagedoe waar niemand op zit te wachten. Evengoed denken
wij dat u en uw kind zich zo veilig en goed kunnen voorbereiden op de nieuwe
VO-school.
STOP;
?>