Изменение тождества Tor в R

Я использую Tor в комбинации с R и хочу изменить свой IP для каждого нового запроса. Код, который у меня есть, выглядит следующим образом:

library(RCurl)
opts <- list(proxy="127.0.0.1", proxyport=8118)
for (i in 1:10)
  {
  con <- socketConnection(host="127.0.0.1",port=9051)  # DOES NOT WORK
  writeLines("signal newnym", con=con)                 # DOES NOT WORK
  ip <- getURL("http://ifconfig.me/ip", .opts = opts)  
  print(ip)
  Sys.sleep(1)
  }

Я могу подключиться через Tor, однако две строки, помеченные как "НЕ РАБОТАЮТ", похоже, не передают правильный сигнал Tor, поэтому IP остается неизменным.

Привет!

Ответы

Ответ 1

У меня была аналогичная проблема, но мне удалось заставить ее работать после установки Privoxy в качестве http-прокси и настроить его, как описано здесь. Тогда это код, который я использовал в R:

library(RCurl)
# check current IP address
print(getURL("http://ifconfig.me/ip"))
# proxy options
opts <- list(proxy="127.0.0.1", proxyport=8118)
# opening connection with TOR
con <- socketConnection(host="127.0.0.1",port=9051)
print(getURL("http://ifconfig.me/ip", .opts = opts))  

for (i in 1:10)
    {
    writeLines('AUTHENTICATE \"password\"\r\nSIGNAL NEWNYM\r\n', con=con)
    Sys.sleep(5)
    print(getURL("http://ifconfig.me/ip", .opts = opts)) 
    Sys.sleep(5)
    }

Убедитесь, что вы используете ручные настройки для TCP-соединения с адресом 127.0.0.1:9051, а метод аутентификации - "пароль", заменяя пароль между двойными кавычками в приведенном выше коде тем, который вы установили.