интересно и как ты себе это представляешь ? есть проги наподобие Autonated Proxy Leecher (http://www.megaupload.com/?d=LCV538G0) которые грабят публичные списки проксей. ищи все места, где выкладываются прокси, грабь их и методом исключения приходи к выводу что какая-то прокся наврятли является публичной
насчет если находит то согласен, а вот если нет то если прокс недавно выложили ? гугл далеко не мгновенный
я так понимаю это блеклист dnsbl.dronebl.org - исследователей в области безопасности. можно узнать по каким принципам туда попадает ip ?
Написал чекер прокси на наличие притензий в сервисе dronebl.org http://multi-up.com/261986 исходник: Code: XIncludeFile "RW_LibCurl_Inc.pb" If InitNetwork() = 0 MessageRequester("Ошибка", "Не могу инициализировать сеть!", 0) End EndIf OpenConsole() OpenFile(0, ProgramParameter()) OpenFile(1, ProgramParameter()) Repeat i+1 proxy.s = ReadString(0) curl = curl_easy_init() RW_LibCurl_InitString() curl_easy_setopt(curl, #CURLOPT_URL, @"dronebl.org/ws/lookup") s.s = "ajax=1&ip="+StringField(proxy.s, 1, ":") ua.s = "Opera/9.80 (Windows NT 5.1; U; en) Presto/2.5.18 Version/10.50" curl_easy_setopt(curl, #CURLOPT_POSTFIELDS, @s.s) curl_easy_setopt(curl, #CURLOPT_USERAGENT, @ua) curl_easy_setopt(curl, #CURLOPT_TIMEOUT, 5) curl_easy_setopt(curl, #CURLOPT_REFERER, @"http://dronebl.org/lookup") curl_easy_setopt(curl, #CURLOPT_WRITEFUNCTION, @RW_LibCurl_WriteStrFunction()) curl_easy_perform(curl) curl_easy_cleanup(curl) res.s = RW_LibCurl_GetString() If FindString(res, "No incidents", 1) WriteStringN(1, proxy.s) PrintN(Str(i) + " " + proxy.s + " No incidents") FlushFileBuffers(1) Else PrintN(Str(i) + " " + proxy.s + " Blacklisted") EndIf Until Eof(0) CloseFile(1) CloseFile(0) CloseConsole() запускать: check_public_proxy.exe файл_прокси файл_приват_прокси