<? 
	$cursos = array( 
			array(
			n => 'Introducción a Perl - Viernes de 19:30 a 21:00',
			f => '2005-perl.csv',
			v => 25 - contarLineas('2005-perl.csv') ),
			array(
			n => 'Curso intensivo GNU/Linux - Viernes de 21:00 a 22:30',
			f => '2005-intensivo.csv',
			v => 25 - contarLineas('2005-intensivo.csv') ),
	);

	function contarLineas($filename) 
	{
		$handle = fopen ($filename, "r");
		$contents = '';
		while (!feof($handle)) {
		   $contents .= fread($handle, 8192);
		}
		fclose ($handle);
		return strpos_count($contents,"\n");
	}
	function strpos_count($haystack, $needle, $i = 0) {
   		while (strpos($haystack,$needle) !== false) {
			$haystack = substr($haystack, (strpos($haystack,$needle) + 1)); 
			$i++;
		}
   		return $i;
	}
?>
<HTML>
<HEAD>
<TITLE>Inscripción a Cursos de GNU/Linux</TITLE>
</HEAD>
<BODY>
<? if (!$nombre) { 
		
	$carreras = array('Ing. Electrónica', 'Ing. Informática', 'Lic. Sistemas', 
				'Ing. Civil', 'Ing. Industrial', 'Ing. Mecánica', 
				'Ing. Naval', 'Ing. Electricista', 'Agrimensura',
				'Ing. Química', 'Ing. en Alimentos');
?>
<H3>Vacantes</H3>
<?	$quedan = 0; 
	for ($i=0; $i<sizeof($cursos); $i++) { ?>
   <?=$cursos[$i]["n"]?>: <b><?=$cursos[$i]["v"]?> vacantes</b>.<br/>
<?		if ($cursos[$i]["v"] > 0) 
			$quedan = 1;
	} 

if ($quedan) { ?>
<H3>Formulario de Inscripción</H3>

Para inscribirte, llená los datos a continuación.   
Por favor, antes de enviar tus datos, tené en cuenta que las vacantes son 
muy limitadas y que si te inscribís y después no venís estás quitándole el
lugar a otra persona.
<BR/><BR/>
<FORM METHOD="POST"> 
<TABLE border="0" cellpadding="4" valign="top" >
	<TR>
		<TH>Nombre y Apellido:</TH>
		<TD><INPUT size="40" maxlength="255" name="nombre" /></TD>
	</TR>
	<TR>
		<TH>email:</TH>
		<TD><INPUT size="40" maxlength="255" name="email" /></TD>
	</TR>
	<TR>
		<TH>Curso al que te inscribís</TH>
		<TD>
			<SELECT name="curso" >
			<? for ($i=0; $i<sizeof($cursos); $i++) { 
				if ($cursos[$i]["v"] > 0) { ?>
				<OPTION value="<?=$i?>"><?=$cursos[$i]["n"]?></OPTION>
			<? } 
			} ?>
			</SELECT>
		</TD>
	</TR>
	<TR valign="top">
		<TH>Si cursás en FIUBA:</TH>
		<TD><b>Carrera</b>:
			<SELECT name="carrera" >
				<OPTION value=""></OPTION>
			<? for ($i=0; $i<sizeof($carreras); $i++) { ?>
				<OPTION value="<?=$carreras[$i]?>"><?=$carreras[$i]?></OPTION>
			<? } ?>
			</SELECT><BR/>
			<b>Padrón</b>:
			<INPUT size="7" maxlength="5" name="padron" /></TD>
	</TR>
	<TR valign="top">
		<TH>Si no cursás en FIUBA:</TH>
		<TD>
		<b>Carrera</b>:
		<INPUT size="30" maxlength="255" name="carrera_ext" /><BR/>
		<b>Facultad</b>:
		<INPUT size="30" maxlength="255" name="univ_ext" /><BR/>
		<FONT size="1">(la que estés haciendo, hayas hecho 
		o estés por hacer)</font>
		</TD>
	</TR>
	<TR><TD align="center" colspan="2"><INPUT type="submit" value="Enviar" /></TD></TR>
</TABLE>
</FORM>

<? 		}
	} else {

		if ($carrera_ext) {
			$carrera = $carrera_ext;
			$padron  = $univ_ext;
		}

		// abrir el archivo
		$filename = $cursos[$curso]["f"];
		$handle = fopen ($filename, "a");

		fwrite($handle, $nombre . "," . $email . "," 
					. $carrera . "," . 	$padron . "\n" );
		
		fclose ($handle);

		// Mandar mail a gnuservers
		$subject = "Inscripción automática desde la web";
		$to = "cursos@gnuservers.com.ar";
		$data = "\n Nombre: $nombre \n Email: $email \n ";
		if ($carrera_ext) {
			$data .= "Carrera: $carrera \n Facultad: $padron \n";
		} else {
			$data .= "Carrera: $carrera \n Padrón: $padron \n";
		}		 
		$data .= " Curso: " . $cursos[$curso]["n"] . "\n";
		$from  = "From: " . '"' . $nombre . '"' . "<$email>\n";
		$from .= "X-Mailer: PHP/" . phpversion();
		mail ($to, $subject, $data, $from);

		// Mandar mail al inscripto
		$subject = "Confirmacion de inscripción";
		$to = '"' . $nombre . '"' . "<$email>";
		$data = "\n Este mensaje es para confirmar la inscripción \n";
		$data .= " realizada desde la web de gnuservers.com.ar. \n\n";
		$data .= " Estos son los datos recibidos: \n";
		$data .= "Nombre: $nombre \n Email: $email \n ";
		if ($carrera_ext) {
			$data .= "Carrera: $carrera \n Facultad: $padron \n";
		} else {
			$data .= "Carrera: $carrera \n Padrón: $padron \n";
		}		 
		$data .= " Curso: " . $cursos[$curso]["n"] . "\n\n";
		$data .= " Te esperamos! \n";
		$from  = "From: Cursos de GNU/Linux <curso@gnuservers.com.ar>\n";
		$from .= "X-Mailer: PHP/" . phpversion();
		mail ($to, $subject, $data, $from);

		?>

<H3>Inscripción Exitosa</H3>

<?=$nombre?> estás inscripto/a para el curso <?=$cursos[$curso]["n"]?>.
<BR/><BR/>
Te estamos enviando un mail confirmando tu inscripción. No es necesario que lo
contestes.
<BR/><BR/>
Cualquier duda, escribinos a <a
href="mailto:curso@gnuservers.com.ar">curso@gnuservers.com.ar</a>.
<br/><br/>
<? } ?>
<HR/>
<CENTER><a href="index.html">Cursos</a></CENTER>
</BODY>
</HTML>
