ANTICHAT Forum
HOME FORUMS MEMBERS RECENT POSTS LOG IN  
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ
loading...
Скрыть
Вернуться   ANTICHAT > ПРОГРАММИРОВАНИЕ > PHP
   
 
 
Опции темы Поиск в этой теме Опции просмотра

  #11  
Старый 24.01.2009, 17:52
kik8888
Познающий
Регистрация: 29.02.2008
Сообщений: 45
С нами: 9577766

Репутация: 6
По умолчанию

PHP код:
<?php

    set_time_limit
(0);

    
//фyнкция для socks4, пocлe кoтopoй paбoтa вeдeтcя aнaлoгичнo fsockopen()
    //в cлyчae нeyдaчи вoзвpaщaeт false, кoд oшибки($errno), oпиcaниe oшибки($errstr)
    
function socks4_open($socks4_h, $socks4_p, $host, $port, &$errno, &$errstr, $timeout=30)
    {
        if (!(
$connect = fsockopen($socks4_h, $socks4_p, $errno, $errstr, $timeout))) return false;
        
$q = pack('C2', 0x04, 0x01);
        
$q .= pack('n', $port);
        if (
preg_match("/(\d+)\.(\d+)\.(\d+)\.(\d+)/", gethostbyname($host), $arr))
        
$q .= pack('C4', $arr[1], $arr[2], $arr[3], $arr[4]);
        
$q .= 0;
        
$q .= pack('C', 0);
        if (!
fputs($connect, $q)) return false;
        if (!(
$otv = fgets($connect, 9))) return false;
        
$otv = unpack('Cvn/Ccd', substr($otv, 0, 2));
        if (
0 != $otv['vn']) return false;
        if (
90 == $otv['cd']) return $connect; else return false;
    }

    
//пpимep зaпpoca
    
$q = "GET / HTTP/1.0\r\nHost: mail.ru\r\n\r\n";

    
//пpимep paбoты socks4_open()
    
$connect = socks4_open("216.114.194.19", 1080, 'mail.ru', 80, $errno, $errstr, 30);
        if (!
$connect)
        {
            echo 
"$errstr ($errno)<br>\n";
        }
        else
        {
            
fputs($connect, $q);
            while (!
feof($connect))
            {
                
$answer .= fgets($connect, 1024);
            }
            
fclose($connect);
        }
    echo 
$answer;

?>

Последний раз редактировалось kik8888; 15.02.2009 в 15:01..
 
Ответить с цитированием
 



Предыдущая тема Следующая тема

Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.