Получить контент сайта через SSL с помощью httr в R
Я пытаюсь получить массив JSON с моего сервера, используя метод HTTP POST в R.
Я пытался использовать обаPOST
функция отhttr
иgetURL
функция отRCurl
но оба возвращают ошибки.
cafile <- system.file("CurlSSL", "cacert.pem", package = "RCurl")
url <- "https://example.com/query/getData.php"
POST(url,body=NULL)
POST(url,body=NULL,config(cainfo=cafile))
getURL(url)
getURL(url,cainfo=cafile)
Ошибка, даннаяPOST
Функция есть (для обоих вызовов):
Error in curl::curl_fetch_memory(url, handle = handle) :
SSL peer certificate or SSH remote key was not OK
Ошибка, даннаяgetURL
функция есть (безconfig(cainfo=cafile)
):
* Hostname was NOT found in DNS cache
* Trying 162.xxx.xxx.xxx...
* connect to 162.xxx.xxx.xxx port 443 failed: Connection refused
* Trying 130.yyy.yyy.yyy...
* Connected to example.com (130.yyy.yyy.yyy) port 443 (#0)
* found 175 certificates in /etc/ssl/certs/ca-certificates.crt
* gnutls_handshake() warning: The server name sent was not recognized
* failed to get server cert
* Closing connection 0
Error in function (type, msg, asError = TRUE) :
gnutls_handshake() warning: The server name sent was not recognized
Я подозреваю, что это как-то связано с R после запуска:
curl 'htt,ps://example.com/query/getData.php'
из командной строки вернуть ожидаемый результат.
Сервер является сервером apache2 с сертификатом SSL COMODO. В/etc/apache2/sites-enabled/000-default.conf
имя сервера установлено на
ServerName www.example.com
Любая помощь будет наиболее ценной