FUNCTION record_user($Referer_IP,$User_IP)
{
$pathname = "http://radivizija.com/video";
$filename = sprintf("%s%s", $pathname, "referer.txt");
$fp=fopen($filename,"r+");
if ($fp == 0) {
print "Error opening file";
}
while (!feof($fp)) {
fgetc($fp);
}
fputs($fp,"User $User_IP was sent here by $Referer_IP \n");
fclose($fp);
}
FUNCTION heather($listing_title)
{
print "";
print "
";
print "Directory Index
";
print "$listing_title
";
print "[Refresh]";
print "
";
print "";
print " | File Name | Size | Type |
";
print "  | [Go Back]
| | |
";
}
FUNCTION iconcalc($file_name)
{
$temp = explode(".", $file_name);
if ($temp[count($temp)-1] == "txt" || $temp[count($temp)-1] == "diz" || $temp[count
($temp)-1] == "me" || $temp[count($temp)-1] == "nfo") {
return "txtBLK.gif";
} else if ($temp[count($temp)-1] == "gif" || $temp[count($temp)-1] == "jpg" || $temp
[count($temp)-1] == "jpeg" || $temp[count($temp)-1] == "bmp" || $temp[count($temp)-1]
== "tif"){
return "picBLK.gif";
} else if ($temp[count($temp)-1] == "ace" || $temp[count($temp)-1] == "zip" || $temp
[count($temp)-1] == "rar"){
return "aceBLK.gif";
} else if ($temp[count($temp)-1] == "mp3" || $temp[count($temp)-1] == "wav" || $temp
[count($temp)-1] == "mp2"){
return "mp3BLK.gif";
} else if ($temp[count($temp)-1] == "doc" || $temp[count($temp)-1] == "xls") {
return "docBLK.gif";
} else {
return "unknown.gif";
}
}
?>