<?
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');

print_r($_POST);

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;
}

//print_r($_POST);
// 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;
}

$possibilities = array_map('find_min_of_order', $selector);
// find possibility with largest 'min'
shuffle($possibilities);
$best = $possibilities[0];
for ($i = 1; $i < count($possibilities); $i++) {
	if ($best['min'] < $possibilities[$i]['min']) {
		$best = $possibilities[$i];
	}
}

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

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];
	}
}

print_r($best);

$ronde1 = mdb2_all_ordered_rekey($db, <<<EOQ
SELECT lokaal_id, ( capaciteit - IFNULL(b1, 0) ) DIV $namens o
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)
WHERE oudersws_id = {$best['order'][0]}
EOQ
);

if (count($ronde1)) {
	echo("ronde1\n");
	print_r($ronde1);

	$r1int = rand(0, $result[$best['order'][0]]['o1'] - 1);
	echo('$r1int='.$r1int."\n");

	foreach ($ronde1 as $lokaal_id => $capaciteit) {
		if ($capaciteit > 0) {
			$r1_lokaal_id = $lokaal_id;
			break;
		}
//		if ($r1int < $capaciteit) {
//			$r1_lokaal_id = $lokaal_id;
//			break;
//		}
		$r1int -= $capaciteit;
	}
} else {
	$r1_lokaal_id = 0;
}
echo('$r1_lokaal_id='.$r1_lokaal_id."\n");

$ronde2 = mdb2_all_ordered_rekey($db, <<<EOQ
SELECT lokaal_id, ( capaciteit - IFNULL(b2, 0) ) DIV $namens o
FROM ouderslokalen
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)
WHERE oudersws_id = {$best['order'][1]}
EOQ
);

if (count($ronde2)) {
	echo("ronde2\n");
	print_r($ronde2);
	
	$r2int = rand(0, $result[$best['order'][1]]['o2'] - 1);
	echo('$r2int='.$r2int."\n");

	foreach ($ronde2 as $lokaal_id => $capaciteit) {
		if ($capaciteit > 0) {
			$r2_lokaal_id = $lokaal_id;
			break;
		}
		//if ($r2int < $capaciteit) {
		//	$r2_lokaal_id = $lokaal_id;
		//	break;
		//}
		$r2int -= $capaciteit;
	}
} else {
	$r2_lokaal_id = 0;
}

echo('$r2_lokaal_id='.$r2_lokaal_id."\n"); 
$ronde3 = mdb2_all_ordered_rekey($db, <<<EOQ
SELECT lokaal_id, ( capaciteit - IFNULL(b3, 0) ) DIV $namens o
FROM ouderslokalen
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)
WHERE oudersws_id = {$best['order'][2]}
EOQ
);

if (count($ronde3)) {
	echo("ronde3\n");
	print_r($ronde3);
	
	$r3int = rand(0, $result[$best['order'][2]]['o3'] - 1);
	echo('$r3int='.$r3int."\n");

	foreach ($ronde3 as $lokaal_id => $capaciteit) {
		if ($capaciteit > 0) {
			$r3_lokaal_id = $lokaal_id;
			break;
		}
	//	if ($r3int < $capaciteit) {
	//		$r3_lokaal_id = $lokaal_id;
	//ji		break;
//		}
		$r3int -= $capaciteit;
	}
} else {
	$r3_lokaal_id = 0;
}
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';

/*
mail($_POST['email'], 'ouderinschrijving voorlichtingsavond OVC '.$deadline_text, <<<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:40 - 20:10): {$info['ronde_1']}

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

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

Uw inschrijving is geldig voor $personen.

Tot ziens op $deadline_text.

Met vriendelijke groeten,

Sandra Hundt en Saskia Nietvelt (directiesecretariaat OVC).

-- 
srv-ovc-linux: (id={$info['inschrijving_id']},authcode=$authcode)
EOQ
, 'From: r.snel@ovc.nl'."\r\n".'X-Mailer: PHP/'.phpversion()."\r\n".'Reply-To: directiesecretariaat@ovc.nl'."\r\n", '-f r.snel@ovc.nl');
 */

/*
phplib_mail('Voorlichtingsavond OVC', 'voorlichtingsavond@ovc.nl', $_POST['email'], 'directiesecretariaat@ovc.nl', 'ouderinschrijving voorlichtingsavond OVC '.$deadline_text, <<<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.

Met vriendelijke groeten,

Sandra Hundt en Saskia Nietvelt (directiesecretariaat OVC).

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

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.

<p>Met vriendelijke groeten,

<p>Sandra Hundt en Saskia Nietvelt (directiesecretariaat OVC).

<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.

Met vriendelijke groeten,

Sandra Hundt en Saskia Nietvelt (directiesecretariaat OVC).

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

EOQ
);

header('Location: '.$location.'print_ouders.php?inschrijving_id='.$inschrijving_id.'&authcode='.$authcode);
?>