Récupérer l’adresse ip publique
#L’appel à iconv n’est nécessaire que si votre système utilise utf8 comme jeu de caractères par défaut (ce qui devient de plus en plus courant)… Read More »Récupérer l’adresse ip publique
#L’appel à iconv n’est nécessaire que si votre système utilise utf8 comme jeu de caractères par défaut (ce qui devient de plus en plus courant)… Read More »Récupérer l’adresse ip publique
echo $((RANDOM%256)).$((RANDOM%256)).$((RANDOM%256)).$((RANDOM%256))
<?php $file = “ip_data.dat”; $duration = 30*60; //30 minutes $lines = file($file); foreach($lines as $line) { list($ip, $time) = explode(“µ”, $line); if($time > time()–$duration) { $ips[$ip] = trim($time); } } $ip = $_SERVER[‘REMOTE_ADDR’]; if(@array_key_exists($ip, $ips)) { if($ips[$ip] > time()–$duration) { // TRUE $ips[$ip] = time(); $was_here = TRUE; } } else { $ips[$ip] = time(); $was_here = FALSE; } $fp = fopen($file, “w”); foreach($ips as $ip=>$time) { fputs($fp, $ip.“µ”.$time.“\n“);… Read More »filebased ip lock
lynx -dump http://www.whatismyip.com | grep -i “Your IP is” | awk ‘{ print $4; }’
while($addr !~ /^([O1]?\d\d?|2[0-4]\d|25[0-5])\.([O1]?\d\d?|2[0-4]\d|25[0-5])\.([O1]?\d\d?|2[0-4]\d|25[0-5])\.([O1]?\d\d?|2[0-4]\d|25[0-5])$/){ print “Please give the IP address of the remote server:\n“; … Read More »Perl – Expression régulière pour tester la validité d’une adresse IP
#L’appel à iconv n’est nécessaire que si votre système utilise utf8 comme jeu de caractères par défaut (ce qui devient de plus en plus courant)… Read More »Récupérer l’adresse ip publique