[php]

function detectar($HUA) {
$HUA=strtolower($HUA);
$navegador="Desconocido";
$version="Desconocida";
$sistema="Desconocido";
if (stristr($HUA,"opera")) {
$navegador="Opera";
$K=strpos($HUA, "opera");
$version=substr($HUA,$K+6,5);
}
elseif (stristr($HUA,"aweb")) {
$navegador="AWeb";
$sistema="Amiga OS";
}
elseif (stristr($HUA, "msie")) {
$navegador="Internet Explorer";
$K=strpos($HUA, "msie");
$temp=substr($HUA,$K);
$P=strpos($temp, chr(59));
$version=substr($temp,5,$P-5);
if (stristr($HUA,"aol")) {
$K=strpos($HUA, "aol");
$temp=substr($HUA,$K);
$P=strpos($temp, chr(59));
$navegador.=" (AOL ".substr($temp,4,$P-4).")";
}
elseif (stristr($HUA,"msn")) {
$K=strpos($HUA, "msn");
$temp=substr($HUA,$K);
$P=strpos($temp, chr(59));
$navegador.=" (MSN ".substr($temp,4,$P-4).")";
}
}
elseif (stristr($HUA,"mozilla") && ! (stristr($HUA,"opera") || stristr($HUA,"msie"))) {
$navegador="Mozilla";
if (stristr($HUA,"rv:")) {
$K=strpos($HUA, "rv:");
$P=strrpos($HUA, chr(41))-$K;
$version=substr($HUA,$K+3,$P-3);
}
elseif (stristr($HUA,"mozilla/5.0")) {
$version="5.0";
}
else {
$navegador="Netscape Navigator";
$K=strpos($HUA,"/");
$P=strpos($HUA," ");
$version=substr($HUA,$K+1, $P-7);
if (stristr($HUA,"c-cck-mcd")) {
$version=str_replace("c-cck-mcd","",$version);
}
if (stristr($HUA,"sc-sgi")) {
$version=str_replace("sc-sgi","",$version);
}
if(stristr($HUA,"gold")) {
$version=str_replace("gold"," Gold",$version);
$version=str_replace("Gold"," Gold",$version);
}
}
if (stristr($HUA,"phoenix")) {
$navegador="Phoenix";
$K=strrpos($HUA,"phoenix");
$version=substr($HUA,$K+8);
$version=str_replace("/"," ",$version);
}
elseif (stristr($HUA,"netscape")) {
$navegador="Netscape";
$K=strrpos($HUA,"netscape");
$version=substr($HUA,$K+9);
$version=str_replace("/"," ",$version);
}
elseif (stristr($HUA,"firefox")) {
$navegador="Firefox";
$K=strrpos($HUA,"firefox");
$version=substr($HUA,$K+4,strlen($HUA)-$K-4);
$version=str_replace("/"," ",$version);
}
elseif (stristr($HUA,"Chimera")) {
$navegador="Chimera";
$K=strrpos($HUA,"chimera");
$version=substr($HUA,$K+7);
$version=str_replace("/"," ",$version);
$sistema="Mac OS X";
}

elseif (stristr($HUA,"Camino")) {
$navegador="Camino";
$K=strrpos($HUA,"camino");

$version=str_replace("/"," ",$version);
$version=str_replace("+","",$version);
$sistema="Mac OS X";
}
elseif (stristr($HUA,"safari")) {
$navegador="Safari";
$K=strrpos($HUA,"safari");
$version="1.0 Build ".substr($HUA,$K+7);

}
elseif (stristr($HUA,"konqueror")) {
$navegador="Konqueror";
$K=strpos($HUA, "konqueror");
$temp=substr($HUA,$K);
$P=strpos($temp, chr(59));
$version=substr($temp,10,$P-10);
}
elseif (stristr($HUA,"galeon")) {
$navegador="Galeon";
$K=strpos($HUA, "galeon");
$temp=substr($HUA,$K);
$P=strpos($temp, chr(32));
$version=substr($temp,7,$P-7);
}
elseif (stristr($HUA,"MultiZilla")) {
$navegador="MultiZilla";
$K=strpos($HUA,"multizilla");
$temp=substr($HUA,$K);
$K=strpos($temp,"v");
$temp=substr($temp,$K+1);
$P=strpos($temp," ");
$version=substr($temp,0,$P);
}
elseif (stristr($HUA,"netpositive") || stristr($HUA,"zonesurf")) {
$navegador="NetPositive";
$K=strpos($HUA, "netpositive");
$temp=substr($HUA,$K);
$P=strrpos($temp, chr(41));
$version=substr($temp,12,$P-12);
$sistema="BeOS";
}
elseif (stristr($HUA,"qnx voyager")) {
$navegador="Voyager";
$K=strpos($HUA, "qnx voyager");
$temp=substr($HUA,$K);
$P=strpos($temp, chr(59));
$version=substr($temp,12,$P-12);
}
}
elseif (stristr($HUA,"lynx") || stristr($HUA,"links")) {
$navegador="Lynx";
if (stristr($HUA,"lynx")) {
$P=strpos($HUA," ");
$version=substr($HUA,5, $P-5);
}
elseif (stristr($HUA,"0.")) {
$P=strpos($HUA,chr(59));
$version=substr($HUA,7, $P-7);
}

}
elseif (stristr($HUA,"arachne")) {
$navegador="Arachne";
}
elseif (stristr($HUA,"googlebot")) {
$navegador="Googlebot";
}
elseif(stristr($HUA,"infomine")) {
$navegador="Infomine";
}
elseif(stristr($HUA,"ia_archiver")) {
$navegador="Archive.org Spider";
}
elseif(stristr($HUA,"msnbot")) {
$navegador="MSN Bot";
}
elseif(stristr($HUA,"validator") && stristr($HUA,"w3c")) {
$navegador="W3C Validator";
}
if (stristr($HUA,"dos")) {
$sistema="MS-DOS";
}
if (stristr($HUA,"amiga")) {
$sistema="Amiga OS";
}
if (stristr($HUA,"windows 3.1") || (stristr($HUA,"win16")) || (stristr($HUA,"win95") && stristr($HUA,"16bit"))) {
$sistema="Win3.1/3.11";
}
elseif (stristr($HUA,"nt 3.51") || (stristr($HUA,"nt3.51"))) {
$sistema="Winnt 3.51";
}
elseif (stristr($HUA,"windows 95") || (stristr($HUA,"win95"))) {
$sistema="Win95";
}
elseif (stristr($HUA,"windows me") || (stristr($HUA,"win") && stristr($HUA,"4.90"))) {
$sistema="WinMe";
}
elseif (stristr($HUA,"windows 98") || (stristr($HUA,"win98")) || (stristr($HUA,"win") && stristr($HUA,"3.95"))) {
$sistema="Win98";
}
elseif (stristr($HUA,"nt 5.0") || stristr($HUA,"windows 2000")) {
$sistema="Win2K";
}
elseif (stristr($HUA,"nt 5.1") || stristr($HUA,"windows xp")) {
$sistema="XP";
}
elseif (stristr($HUA,"nt 5.2")) {
$sistema="Win2003";
}
elseif (stristr($HUA,"windows CE")) {
$sistema="Pocket PC";
}
elseif (stristr($HUA,"nt 4") || stristr($HUA,"nt4") || stristr($HUA,"winnt") || stristr($HUA,"windows nt")) {
$sistema="NT 4.0";
}
elseif (stristr($HUA,"windows")) {
$sistema="Windows";
}
if (stristr($HUA,"mac os x")) {
$sistema="Mac OS X";
}
elseif (stristr($HUA,"68k")) {
$sistema="Mac 68K";
}
elseif (stristr($HUA,"mac_powerpc") || stristr($HUA,"ppc") || stristr($HUA,"macintosh")) {
$sistema="Mac OS 8/9";
}
if (stristr($HUA,"linux")) {
$sistema="Linux";
}
elseif (stristr($HUA,"freebsd")) {
$sistema="FreeBSD";
}
elseif (stristr($HUA,"openbsd")) {
$sistema="OpenBSD";
}
elseif (stristr($HUA,"netbsd")) {
$sistema="NetBSD";
}
elseif (stristr($HUA,"beos")) {
$sistema="BeOS";
}
elseif (stristr($HUA,"sunos") || stristr($HUA,"solaris")) {
$sistema="Sun Solaris";
$K=strpos($HUA, "sunos");
$temp=substr($HUA,$K+6);
$P=strpos($temp, chr(32));
$temp=substr($temp,0,$P);
if ($temp=="sun4u;" || $temp=="sun4m;") {
$temp="";
}
$sistema.=" ".$temp;
}
elseif (stristr($HUA,"qnx") || stristr($HUA,"photon")) {
$sistema="QNX";
}
elseif (stristr($HUA,"hp-ux")) {
$sistema="HP-UX";
}
elseif (stristr($HUA,"irix")) {
$sistema="SGI IRIX";
}
elseif (stristr($HUA,"aix") || stristr($HUA,"ibm")) {
$sistema="IBM AIX";
}
elseif (stristr($HUA,"os/2") && stristr($HUA,"warp")) {
$sistema="OS/2 Warp";
}
elseif (stristr($HUA,"os/2")) {
$sistema="OS/2";
}
elseif (stristr($HUA,"HURD") || (stristr($HUA,"GNU") && stristr($HUA,"HURD"))) {
$sistema="Unix (GNU Hurd)";
}

elseif (stristr($HUA,"unix") || stristr($HUA,"x11")) {
$sistema="Unix";
}
$version=str_replace(")","",$version);
$version=str_replace("Wink","",$version);
$version=str_replace("+","",$version);
$version=str_replace("c-sgi [","",$version);
$version=str_replace("c-ja","",$version);
$version=str_replace("c-cern","",$version);
$version=str_replace("_strs","",$version);
$version=str_replace(" [","",$version);

if($sistema==="Linux" && $navegador==="Internet Explorer") {
$navegador="Mozilla";
$version="Desconocida";
}
if($sistema===false || $sistema==="") {
$sistema=false;
}
if($version===false || $version==="") {
$version=false;
}
if($navegador===false || $navegador==="") {
$navegador=false;
}

$res[]=$navegador;
$res[]=$version;
$res[]=$sistema;

return $res;
}

//--------------------------------------------------------- IP ---------------------------------------------------

//------------------------------------------------------------------------------------------------------------------

function GetIP()
{
if (getenv("HTTP_CLIENT_IP") && strcasecmp(getenv("HTTP_CLIENT_IP"),"unknown"))
$ip = getenv("HTTP_CLIENT_IP");
else if (getenv("HTTP_X_FORWARDED_FOR") && strcasecmp(getenv("HTTP_X_FORWARDED_FOR"), "unknown"))
$ip = getenv("HTTP_X_FORWARDED_FOR");
else if (getenv("REMOTE_ADDR") && strcasecmp(getenv("REMOTE_ADDR"), "unknown"))
$ip = getenv("REMOTE_ADDR");
else if (isset($_SERVER['REMOTE_ADDR']) && $_SERVER['REMOTE_ADDR'] && strcasecmp($_SERVER['REMOTE_ADDR'], "unknown"))
$ip = $_SERVER['REMOTE_ADDR'];
else
$ip = "unknown";

return($ip);
}

//----------------------------------------------------- Firefox count ----------------------------------------------

//------------------------------------------------------------------------------------------------------------------

function firefox_count() {
$rss='';
$fp = @fopen('http://www.spreadfirefox.com/download_counter.php?ff=1', 'r');

$puntero = 4096;
while($remote_read = fread($fp, $puntero)) {$rss .= $remote_read; }
$count = preg_replace('|.*(.*?).*|is', '$1', $rss);
$newstring = str_replace(",", ".", $count);
return($newstring);
}

function mysql_die($error = "unknown")
{
echo "

Error:". $error."

";
exit;
}
include "conectateasql.inc";
$result=mysql_query ("SELECT COUNT(DISTINCT IP) as IP from visitas",$db) or mysql_die("No record");
$registro =mysql_fetch_object($result);
$total = $registro->IP;
$sqlstr = "SELECT COUNT(DISTINCT IP) as IP,Navegador from visitas group by Navegador";
$result=mysql_query ($sqlstr,$db) or mysql_die("No record");
while ($registro =mysql_fetch_object($result))
{
$percent = number_format($registro->IP * 100 / $total,2);
$navegador = $registro->Navegador;
if ($navegador == "Internet Explor") {
$IE = $percent;
}
if ($navegador == "Firefox") {
$FF = $percent;
}
if ($navegador == "Opera") {
$OP = $percent;
}
}

mysql_close($db);

$linea = rand(1,1135);
$i = 0;
$DescriptorFichero = fopen("hall9000.txt","r");
while(!feof($DescriptorFichero)){
$buffer = fgets($DescriptorFichero,4096);
$i += 1;
if ($i==$linea) {
$tag = $buffer;

}

}

header( "Content-Type: image/png" );
$img = imagecreatefromjpeg( "images/displayxpg.jpg" );
$font = 3;
$text_color = imagecolorallocate ($img, 144,238,144);
$ip = GetIp();
$browser = Detectar($_SERVER['HTTP_USER_AGENT']);
$navegador = $browser[0];
if ($navegador=="Internet Explorer") {
$navegador = "IExplorer";
}
else
{
if ($navegador=="Netscape Navigator") {
$navegador = "Netscape";
}
}
imagestring ($img, $font, 10, 10, "Bienvenido navegante, usas $navegador $browser[1] bajo $browser[2]", $text_color);
imagestring ($img, 2, 10, 30, "Estadísticas Zacky: Firefox=$FF% Internet Explorer=$IE% Opera=$OP%", $text_color);
imagestring ($img, 2, 10, 50, $tag, $text_color);
$descargas = firefox_count();
imagestring ($img, 2, 10, 70, "Firefox ha sido descargado $descargas veces..", $text_color);
imagepng( $img );
imagedestroy( $img );

$navegador= $browser[0];
$date = getdate();
$fecha = $date['mday']."-".$date['month']."-".$date['year']." ".$date['hours'].":".$date['minutes'].":".$date['seconds'];
$sqlstr = "INSERT INTO visitas (IP,Navegador,SO) values('$ip','$navegador','$browser[2]')";
$result=mysql_query ($sqlstr,$db) or mysql_die("No record");
mysql_close($db);
?>
[/php]