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: 21 años, 5 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 , USER, PASS); 
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