require ('login.txt'); if (!IsSet($PHP_AUTH_USER)): Header("WWW-Authenticate: Basic realm=\"Přihlášky KSU\""); Header("HTTP/1.0 401 Unauthorized"); echo "Přístup k těmto stránkám je vázán na zadání jména a hesla."; exit; else: @$spojeni=mysql_connect($server,$user,$pass); if(!$spojeni): echo "Nepodařilo se připojit k databázi."; exit; endif; mysql_select_db($db); mysql_query("SET character_set_results = cp1250;"); @$vysledek_l=MySQL_Query("SELECT reg, pass FROM clen WHERE reg = $PHP_AUTH_USER"); if (!$vysledek_l): echo "Vaše uživatelské jméno nelze ověřit."; exit; endif; $zaznam_l=mysql_fetch_array($vysledek_l); if (!$zaznam_l): echo "Neexistující uživatelské jméno.\n"; exit; else: if ($zaznam_l["pass"]!=$PHP_AUTH_PW): echo "Špatné heslo."; exit; endif; endif; $reg=$PHP_AUTH_USER; endif; $dnes = getdate(); $day = $dnes["mday"]; $mon = $dnes["mon"]; $year = $dnes["year"]; function Write_MyData_T() { $directory = "./pocitadlo/"; $file = StrTR($GLOBALS["SCRIPT_NAME"], "./\\", "___"); $soubor = $directory.$file."_t.cnt"; if (! File_Exists($soubor)) { $fp = FOpen($soubor, "w"); if (!$fp) return; $counts = 1; } else { $fp = FOpen($soubor, "r+"); if (!$fp) return; $counts = FGetS($fp,10) + 1; Rewind($fp); } FPutS($fp, $counts); FClose($fp); // ------------------------------------------ // IP ADRESA if (isset($_SERVER['HTTP_X_FORWARDED_FOR'])){ $explode_ip = explode(',', $_SERVER['HTTP_X_FORWARDED_FOR']); $ip = $explode_ip[0]; $proxy = $_SERVER['REMOTE_ADDR']; } elseif(isset($_SERVER['HTTP_CLIENT_IP'])) { $ip = $_SERVER['HTTP_CLIENT_IP']; $proxy = $_SERVER['REMOTE_ADDR']; } else { $ip = $_SERVER['REMOTE_ADDR']; $proxy = '0.0.0.0'; } // ------------------------------------------ // DOMENOVA ADRESA if(isset($_SERVER['REMOTE_HOST']) and $_SERVER['REMOTE_HOST'] != '') { $ip_name = $_SERVER['REMOTE_HOST']; } else { $ip_name = gethostbyaddr($ip); } // pokud se nepodarilo IP adresu prevest na domenovou adresu, vlozime do $ip_name "0" $ip_name = strtolower($ip_name); if($ip_name == '') $ip_name = 0; else if(eregi("[[:digit:]]{1,3}\.[[:digit:]]{1,3}\.[[:digit:]]{1,3}\.[[:digit:]]{1,3}", $ip_name)) $ip_name = 0; // ------------------------------------------ // OS a BROWSER $agent = $_SERVER['HTTP_USER_AGENT']; // ------------------------------------------ // DATE TIME $now = date("D M j G:i:s T Y"); //echo $counts.' '.$ip_name.' '.$ip.' '.$proxy.' '.$agent.' '.$now; $soubor_2 = $directory.$file."_t.dat"; $fp = FOpen($soubor_2, "a+"); if (!$fp) return; FWrite($fp,"$counts $ip_name $ip $proxy $agent $now\n"); FClose($fp); } function Write_MyData_U() { $directory = "./pocitadlo/"; $file = StrTR($GLOBALS["SCRIPT_NAME"], "./\\", "___"); $soubor = $directory.$file."_u.cnt"; if (! File_Exists($soubor)) { $fp = FOpen($soubor, "w"); if (!$fp) return; $counts = 1; } else { $fp = FOpen($soubor, "r+"); if (!$fp) return; $counts = FGetS($fp,10) + 1; Rewind($fp); } FPutS($fp, $counts); FClose($fp); // ------------------------------------------ // IP ADRESA if (isset($_SERVER['HTTP_X_FORWARDED_FOR'])){ $explode_ip = explode(',', $_SERVER['HTTP_X_FORWARDED_FOR']); $ip = $explode_ip[0]; $proxy = $_SERVER['REMOTE_ADDR']; } elseif(isset($_SERVER['HTTP_CLIENT_IP'])) { $ip = $_SERVER['HTTP_CLIENT_IP']; $proxy = $_SERVER['REMOTE_ADDR']; } else { $ip = $_SERVER['REMOTE_ADDR']; $proxy = '0.0.0.0'; } // ------------------------------------------ // DOMENOVA ADRESA if(isset($_SERVER['REMOTE_HOST']) and $_SERVER['REMOTE_HOST'] != '') { $ip_name = $_SERVER['REMOTE_HOST']; } else { $ip_name = gethostbyaddr($ip); } // pokud se nepodarilo IP adresu prevest na domenovou adresu, vlozime do $ip_name "0" $ip_name = strtolower($ip_name); if($ip_name == '') $ip_name = 0; else if(eregi("[[:digit:]]{1,3}\.[[:digit:]]{1,3}\.[[:digit:]]{1,3}\.[[:digit:]]{1,3}", $ip_name)) $ip_name = 0; // ------------------------------------------ // OS a BROWSER $agent = $_SERVER['HTTP_USER_AGENT']; // ------------------------------------------ // DATE TIME $now = date("D M j G:i:s T Y"); //echo $counts.' '.$ip_name.' '.$ip.' '.$proxy.' '.$agent.' '.$now; $soubor_2 = $directory.$file."_u.dat"; $fp = FOpen($soubor_2, "a+"); if (!$fp) return; FWrite($fp,"$counts $ip_name $ip $proxy $agent $now\n"); FClose($fp); } ?>
@$vysledek_t=MySQL_Query("SELECT reg, jmeno, prijmeni FROM clen WHERE reg!=8888 AND reg!=5555 ORDER BY prijmeni");
echo " Vyber závodníka jehož údaje chceš editovat: \n"; echo " |
if($z=="") $z=9910;
@$vysledek_z=MySQL_Query("SELECT id, datum, nazev, poradatel FROM zavod ORDER BY id");
echo " Vyber závod pro hromadnou přihlášku více lidí: \n"; echo " |
Jestli chceš přihlásit více závodníků na jeden závod, vyber na který a potvrď výběr.
Závodník:
|
Datum | \n";
echo "Závod | \n";
echo "Pořadatel | \n";
echo "Ranking | \n";
echo "Termín přihlášek | \n";
echo "Kategorie | \n";
echo "Změny | \n";
echo "Poznámka | \n";
echo "Ubytování | \n";
echo "Přihlášeno lidí | \n";
echo "Vedoucí výpravy | \n";
echo "Doprava | \n";
echo "Web závodu | \n";
echo "||
".$dat." | \n";
echo "".$naz." | \n";
echo ""."".$por." | \n";
echo "".$rank." | \n";
if (($ter!="-")&&((($day>$tden&&$mon>=$tmesic)||($mon>$tmesic))&&($year==$trok))):
echo "po termínu! | \n";
else:
echo "".$ter." | \n";
endif;
echo "".$zaznam_p["kat"]." | \n";
if (($ter!="-")&&((($day>$tden&&$mon>=$tmesic)||($mon>$tmesic))&&($year==$trok))):
echo "po termínu | \n";
else:
echo ""; endif; echo " | ".$zaznam_p["pozn"]." | \n";
echo "".$zaznam_p["ubyt"]." | \n";
echo "".$pocet[0]." ...ukázat | \n";
echo "".$sef." | \n";
echo "".$doprava." | \n";
if ($web=="nezadán"):
echo "nezadán | \n"; endif; $i++; endwhile; echo " |
".$zaznam_c["jmeno"]." ".$zaznam_c["prijmeni"]." není přihlášen(a) na žádný závod.
\n";
?>
@$vysledek_t=MySQL_Query("SELECT reg, jmeno, prijmeni FROM clen WHERE reg!=8888 AND reg!=5555 ORDER BY prijmeni");
echo " Vyber závodníka jehož údaje chceš editovat: \n"; echo " |
if($z=="") $z=9910;
@$vysledek_z=MySQL_Query("SELECT id, datum, nazev, poradatel FROM zavod ORDER BY id");
echo " Vyber závod pro hromadnou přihlášku více lidí: \n"; echo " |
Jestli chceš přihlásit více závodníků na jeden závod, vyber na který a potvrď výběr.
Závodník:
|
Datum | \n";
echo "Závod | \n";
echo "Pořadatel | \n";
echo "Ranking | \n";
echo "Termín přihlášek | \n";
echo "Kategorie | \n";
echo "Změny | \n";
echo "Poznámka | \n";
echo "Ubytování | \n";
echo "Přihlášeno lidí | \n";
echo "Vedoucí výpravy | \n";
echo "Doprava | \n";
echo "Web závodu | \n";
echo "|
".$dat." | \n";
echo "".$naz." | \n";
echo ""."".$por." | \n";
echo "".$rank." | \n";
if (($ter!="-")&&((($day>$tden&&$mon>=$tmesic)||($mon>$tmesic))&&($year==$trok))):
echo "po termínu! | \n";
else:
echo "".$ter." | \n";
endif;
echo "".$zaznam_p["kat"]." | \n";
echo ""; echo " | ".$zaznam_p["pozn"]." | \n";
echo "".$zaznam_p["ubyt"]." | \n";
echo "".$pocet[0]." ...ukázat | \n";
echo "".$sef." | \n";
echo "".$doprava." | \n";
if ($web=="nezadán"):
echo "nezadán | \n"; endif; $i++; endwhile; echo " |
".$zaznam_c["jmeno"]." ".$zaznam_c["prijmeni"]." není přihlášen(a) na žádný závod.
\n";
?>