$home="/users/bastys/www/academic/ATE/pratybos";
$klaidu=0;
function err_msg($s){
global $klaidu;
echo "Klaida: $s
";
$klaidu++;
}
function get_par($s){
global $HTTP_POST_VARS;
$v=$HTTP_POST_VARS[$s]; if (!isset($v)|strlen($v)<3) err_msg("Blogas $s");
echo "$s=$v
";
return $v;
}
$grupe=$HTTP_POST_VARS['grupe'];
unset($kelias);
if (strcmp($grupe,"2003")==0) $kelias="2003";
else
if (strcmp($grupe,"2004")==0) $kelias="2004";
if (isset($kelias)){
$Vardas=get_par('Vardas');
$Pavarde=get_par('Pavarde');
$Login=get_par('Login');
if (strcmp($Login,"vapaxxxx")==0) err_msg("Blogas Login=$Login");
$email=get_par('email');
if ($klaidu==0) {
$pavarde=strtolower($Pavarde);
$failas="$home/$kelias/$pavarde";
if (file_exists($failas)) err_msg("$pavarde jau registruotas");
else{
$f=fopen($failas,'w');
if (!$f) err_msg("Negaliu atidaryti $failas įrašymui");
else{
fputs($f,"$Pavarde $Vardas|$Login\n$email\n");
fclose($f);
chmod ("$failas", 0766);
}
}
}
if ($klaidu!=0) echo "Viso klaidu: $klaidu
";
else echo " Sveikinu!
Jūs sėkmingai užregistravote.
Sėkmės atliekant praktikos užduotis!