Tema: x voyager
Ver Mensaje Individual
Antiguo 20/07/2005, 01:23   #12
Voyager
Hasta el infinito...
 
Avatar de Voyager
 
Fecha de ingreso: 23/dic/2002
Mensajes: 31.222
Voyager Leyenda viva del foroVoyager Leyenda viva del foroVoyager Leyenda viva del foroVoyager Leyenda viva del foroVoyager Leyenda viva del foroVoyager Leyenda viva del foroVoyager Leyenda viva del foroVoyager Leyenda viva del foroVoyager Leyenda viva del foroVoyager Leyenda viva del foroVoyager Leyenda viva del foro
bcm74:

El codigo es este:
Código PHP:
<?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($tempchr(59));
        
$version=substr($temp,5,$P-5);
        if (
stristr($HUA,"aol")) {
            
$K=strpos($HUA"aol");
            
$temp=substr($HUA,$K);
            
$P=strpos($tempchr(59));
            
$navegador.=" (AOL ".substr($temp,4,$P-4).")";
        }
        elseif (
stristr($HUA,"msn")) {
            
$K=strpos($HUA"msn");
            
$temp=substr($HUA,$K);
            
$P=strpos($tempchr(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($HUAchr(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($tempchr(59));
            
$version=substr($temp,10,$P-10);
        }
        elseif (
stristr($HUA,"galeon")) {
            
$navegador="Galeon";
            
$K=strpos($HUA"galeon");
            
$temp=substr($HUA,$K);
            
$P=strpos($tempchr(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($tempchr(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($tempchr(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($tempchr(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);
}


    
header"Content-Type: image/png" );
    
$img imagecreatefromjpeg"nokia.jpg" );
    
$font  3;
    
$text_color imagecolorallocate ($img144,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";
        }
    }
    
$IP GetIp();
    
imagestring ($img$font1010,  "Bienvenido navegante, usas $navegador $browser[1] bajo $browser[2]"$text_color);
    
imagestring ($img21030,  "tu IP es $IP"$text_color);
    
imagestring ($img21050,  "El Big Brother te vigila, no bajes la guardia."$text_color);
    
imagestring ($img21070,  "(c) 2005 BCM74 "$text_color);

    
imagepng$img );
    
imagedestroy$img );

    
$navegador$browser[0];


?>

Este codigo lo colocas en un servidor php gratuito:

mirate en www.madpage.com y create una cuenta

Luego subes esta pagina con un fichero que se llame firmabcm74.php por ejemplo, y ya tienes tu firma

Un saludo
__________________
"Aquel que es cruel con los animales se vuelve tosco en su trato con los hombres. Se puede juzgar el corazón de un hombre por su trato a los animales."
(Inmanuel Kant)
Voyager está desconectado
Respuesta rápida a este mensaje
Responder Citando Subir