$vandaag = date("Y") . date("m") . date("d"); $tijd = date("H") . date("i") . date("s"); $weekje = date("w"); $ip=getenv(REMOTE_ADDR); $ref=$HTTP_REFERER; // get user hostname $r_hostname = gethostbyaddr($REMOTE_ADDR); if($r_hostname == $REMOTE_ADDR){ $hostname = "IP Only"; }else{ $r_hostname = explode(".", $r_hostname); $host_size = sizeof($r_hostname); if($host_size == 3){ $hostname = $r_hostname[$host_size-2].".".$r_hostname[$host_size-1]; }else{ $hostname = $r_hostname[$host_size-3].".".$r_hostname[$host_size-2].".".$r_hostname[$host_size-1]; } } // get user browser if(strstr($HTTP_USER_AGENT, "MSIE 6")){ $user_browser = "Internet Explorer 6"; }elseif(strstr($HTTP_USER_AGENT, "MSIE 5")){ $user_browser = "Internet Explorer 5"; }elseif(strstr($HTTP_USER_AGENT, "MSIE 4")){ $user_browser = "Internet Explorer 4"; }elseif(strstr($HTTP_USER_AGENT, "Netscape7")){ $user_browser = "Netscape 7"; }elseif(strstr($HTTP_USER_AGENT, "Netscape6")){ $user_browser = "Netscape 6"; }elseif(strstr($HTTP_USER_AGENT, "Netscape4")){ $user_browser = "Netscape 4"; }elseif(strstr($HTTP_USER_AGENT, "Netscape3")){ $user_browser = "Netscape 3"; }elseif(strstr($HTTP_USER_AGENT, "Opera")){ $user_browser = "Opera"; }else{ $user_browser = "Other"; } // get user os if(strstr($HTTP_USER_AGENT, "Windows NT 5.1")){ $user_os = "Windows XP"; }elseif(strstr($HTTP_USER_AGENT, "Windows NT 5.0")){ $user_os = "Windows 2000"; }elseif(strstr($HTTP_USER_AGENT, "Windows NT 4")){ $user_os = "Windows NT 4.0"; }elseif(strstr($HTTP_USER_AGENT, "Windows 9") || strstr($HTTP_USER_AGENT, "Win 9")){ $user_os = "Windows 9x"; }elseif(strstr($HTTP_USER_AGENT, "Windows Me")){ $user_os = "Windows Me"; }elseif(strstr($HTTP_USER_AGENT, "Linux")){ $user_os = "Linux"; }else{ $user_os = "Other"; } // update screen width if($_GET['sw'] == 640){ $sw = "640x480"; }elseif($_GET['sw'] == 800){ $sw = "800x600"; }elseif($_GET['sw'] == 1024){ $sw = "1024x768"; }elseif($_GET['sw'] == 1152){ $sw = "1152x684"; }elseif($_GET['sw'] == 1280){ $sw = "1280x1024"; }else{ $sw = "unknown"; } // vastleggen van nieuwe count. $fi = fopen("counter.csv", "a"); if (!$fi) die("File Error."); // if (!flock($fi,2)) die("File locked."); $str = $vandaag .";". $tijd .";". $weekje .";". $proces .";".$ip .";". $ref .";". $hostname .";". $user_browser .";". $user_os .";". $sw . ";\r\n"; fputs($fi,$str, 500); flock($fi,3); fclose($fi);