Ver Mensaje Individual
  #6 (permalink)  
Antiguo 07/11/2006, 14:00
Avatar de helthon
helthon
 
Fecha de Ingreso: junio-2005
Ubicación: Lima
Mensajes: 549
Antigüedad: 18 años, 10 meses
Puntos: 7
Código PHP:
<?php 
// AL INICIO
ob_start();

define("HOST""localhost"); 
define("PORT"3306); 
define("USER""relaciones"); 
define("PASS""relaciones"); 
define("DB""relaciones"); 

function 
getRealIP() 

    
   if( 
$_SERVER['HTTP_X_FORWARDED_FOR'] != '' 
   { 
      
$client_ip 
         ( !empty(
$_SERVER['REMOTE_ADDR']) ) ? 
            
$_SERVER['REMOTE_ADDR'
            : 
            ( ( !empty(
$_ENV['REMOTE_ADDR']) ) ? 
               
$_ENV['REMOTE_ADDR'
               : 
               
"unknown" ); 
    
      
// los proxys van añadiendo al final de esta cabecera 
      // las direcciones ip que van "ocultando". Para localizar la ip real 
      // del usuario se comienza a mirar por el principio hasta encontrar 
      // una dirección ip que no sea del rango privado. En caso de no 
      // encontrarse ninguna se toma como valor el REMOTE_ADDR 
    
      
$entries split('[, ]'$_SERVER['HTTP_X_FORWARDED_FOR']); 
    
      
reset($entries); 
      while (list(, 
$entry) = each($entries)) 
      { 
         
$entry trim($entry); 
         if ( 
preg_match("/^([0-9]+\.[0-9]+\.[0-9]+\.[0-9]+)/"$entry$ip_list) ) 
         { 
            
$private_ip = array( 
                  
'/^0\./'
                  
'/^127\.0\.0\.1/'
                  
'/^192\.168\..*/'
                  
'/^172\.((1[6-9])|(2[0-9])|(3[0-1]))\..*/'
                  
'/^10\..*/'); 
    
            
$found_ip preg_replace($private_ip$client_ip$ip_list[1]); 
    
            if (
$client_ip != $found_ip
            { 
               
$client_ip $found_ip
               break; 
            } 
         } 
      } 
   } 
   else 
   { 
      
$client_ip 
         ( !empty(
$_SERVER['REMOTE_ADDR']) ) ? 
            
$_SERVER['REMOTE_ADDR'
            : 
            ( ( !empty(
$_ENV['REMOTE_ADDR']) ) ? 
               
$_ENV['REMOTE_ADDR'
               : 
               
"unknown" ); 
   } 
    
   return 
$client_ip
    


$ipclient getRealIP(); 
$ipnumber ip2long($ipclient); 
//$ipnumber = $ipnumber*-1; 
$ipnumber2=sprintf("%u\n"ip2long($ipclient));  

$conn mysql_connect(HOST ":" PORT USERPASS); 
mysql_select_db(DB); 

$sql "SELECT * FROM ips where num_ipinicial<='$ipnumber2' and num_ipfinal>='$ipnumber2'";  
$consulta mysql_query($sql,$conn) or die ("No se pudo ejecutar la consulta");  
while (
$registro=mysql_fetch_Array($consulta)) 

if (
$registro['pais']=='Colombia' or $registro['pais']=='Ecuador' or $registro['pais']=='Peru' or $registro['pais']=='Venezuela' or $registro['pais']=='Spain'
    { 
        switch (
$registro['pais'])  
            { 
                case 
'Colombia'
                
$control=1
                break; 
                case 
'Ecuador'
                
$control=2
                break; 
                case 
'Peru'
                
$control=3
                break; 
                case 
'Venezuela'
                
$control=4
                break; 
                case 
'Spain'
                
$control=5
                break; 
            } 
        
$pais =  $registro['pais']; 
        break; 
    } 
else 
    { 
        
$control 0
    } 


switch(
$pais
    {  
    case 
"Colombia" :  
        
$URL "indexco";  
        break;  
    }  
header("Location : $URL.php"); 

ob_flush();
?>
Header

ob_start()

ob_flush();
__________________
HELTHON FUENTES
FLORERIA FLORES PERU Floresperu.com.pe
Garantizamos que cada entrega de flores será de la más alta calidad y frescura