Security Teams



:::
  Ответ в темуСоздание новой темыСоздание опроса

> Perl: таймаут в функции connect()
19841204
Дата 27.09.2007 - 21:03
Цитировать сообщение




Unregistered












Вот пишу перл граббер есть одна проблемка drinks.gif , ниже код проверки сокса 4 но вот
как задать таймаут коннекта стобы нездать 10 секунд пока он приконектетса help.gif

...
if ( !socket(SOCK, PF_INET, SOCK_STREAM, getprotobyname('tcp')) ) {return 0;}
setsockopt(SOCK,SOL_SOCKET,SO_RCVTIMEO,5);
setsockopt(SOCK,SOL_SOCKET,SO_SNDTIMEO,5);
if ( !connect(SOCK, sockaddr_in($port, inet_aton($ip))) ) {
#wprint("[-] SOCKS4, can't connect to $ip:$port!\n");
return 0;
}
...
Top
drmist
Дата 27.09.2007 - 21:33
Цитировать сообщение
Offline



Professional
*****

Профиль
Группа: -users-
Сообщений: 1165
Пользователь №: 222
Регистрация: 14.04.2005



Рейтинг:
(0%) -----


man setsockopt


--------------------
Когда нельзя еще больше хочется...
PMСайт пользователя
Top

Опции темы Ответ в темуСоздание новой темыСоздание опроса