Страница 16 из 30
libcurl for Clarion
Добавлено: 16 Август 2018, 10:39
Дед Пахом
Игорь Столяров писал(а): ↑16 Август 2018, 6:45Можно ли мечтать о методе
Разумно, добавлю на днях.
libcurl for Clarion
Добавлено: 16 Август 2018, 11:31
Игорь Столяров
Прошу сразу не ругаться и не посылать меня в мануал (тем более, что я там уже был).
Вопрос скорее по теории протоколов, а не по реализации LibCurl …
Надо дёрнуть обычный GET (на простом примере):
Вот так работает:
Код: Выделить всё
MyCurl.SendRequest('http://sms.ru/sms/send','',Loc:RespBuffer)
А вот так требует какой-то сертификат:
Код: Выделить всё
MyCurl.SendRequest('https://sms.ru/sms/send','',Loc:RespBuffer)
В любом броузере или при вызове через WinAPI (WinINet) вариант с HTTPS работает.
Как установить сертификат перед вызовом - я вижу в примерах.
Но какой оно хочет сертификат ? Где вообще живут эти сертификаты и как их оттуда добыть ?
Заранее спасибо ...
libcurl for Clarion
Добавлено: 16 Август 2018, 15:13
RaFaeL
Так а .SetSSL* прописаны или нет?
libcurl for Clarion
Добавлено: 16 Август 2018, 16:16
Игорь Столяров
RaFaeL писал(а): ↑16 Август 2018, 15:13Так а .SetSSL* прописаны или нет?
Упс ! Точно. Спасибо. Добавил:
Код: Выделить всё
Curl.SetSSLVersion(CURL_SSLVERSION_DEFAULT)
Curl.SetSSLVerifyHost(False)
Curl.SetSSLVerifyPeer(False)
и HTTPS теперь с нами !
Правильно ли я понимаю, что эти строчки можно включать всегда по умолчанию,
т.к. на обычный протокол HTTP они не действуют ? А с ними работает и HTTP и HTTPS ...
libcurl for Clarion
Добавлено: 17 Август 2018, 9:24
Игорь Столяров
Я снова дико извиняюсь, но лучше спрошу, чем жить во тьме.
Пример FTPManager (любой).
В чём смысл добавления имени пользователя (без пароля !) в строку подключения, после выполненной авторизации ?
(закоментированные строки)
Код: Выделить всё
TCurlFtpClassEx.BuildUrl PROCEDURE(STRING pUrl, STRING pUser, TSSHSettings pSSH)
url STRING(256)
sprotocol CSTRING(20)
CODE
sprotocol = CHOOSE(pSSH.AuthMethod = CURLSSH_AUTH_NONE, 'ftp://', 'sftp://')
! IF pUser AND NOT INSTRING('@', pUser, 1, 1)
! url = sprotocol & CLIP(pUser) &'@'& CLIP(pUrl)
! ELSE
url = sprotocol & CLIP(pUrl)
! END
IF url AND url[LEN(CLIP(url))] <> '/'
url = CLIP(url) & '/'
END
RETURN CLIP(url)
Отследил до самого вызова perform() - нигде это не используется.
В примерах на сях такая конструкция имеет смысл только с паролем, если
используется упрощённая схема доступа к FTP серверу, без предварительной авторизации ...
Код: Выделить всё
const char *remote = "sftp://user:pass@example.com/path/filename";
libcurl for Clarion
Добавлено: 17 Август 2018, 11:56
Дед Пахом
Что-то у меня не работало,а с именем пользователя в url заработало, так и оставил.
Игорь Столяров писал(а): ↑17 Август 2018, 9:24В примерах на сях такая конструкция имеет смысл только с паролем
https://www.cs.rutgers.edu/~watrous/user-pass-url.html
libcurl for Clarion
Добавлено: 17 Август 2018, 12:22
Игорь Столяров
Спасибо, я понял.
Речь видимо идёт о подключении к открытому FTP разделу без предварительной авторизации,
но с именем пользователя отличным от "anonymous" … редкий случай, даже проверить не на чем.
С другой стороны - оно и не мешает.
libcurl for Clarion
Добавлено: 17 Август 2018, 15:57
Дед Пахом
FTPManager универсальная программа, может подключаться к FTP/SFTP/FTPS, поэтому тестировал на многих серверах, какие-то из них на какие-то команды возвращали ошибку, поэтому нашёл вот такой способ передачи url, который работает везде (по крайней мере, много где). Правда, если в имени пользователя есть символ @, то libcurl не сможет правильно распарсить строку соединения.
В обычной жизни, как правило, достаточно вызвать SetDefaultProtocol('ftp'), SetUserPsw(user, psw) и WriteFile(url), где url примерно такая: '32.78.23.87'
libcurl for Clarion
Добавлено: 17 Август 2018, 16:55
Игорь Столяров
Дед Пахом писал(а): ↑17 Август 2018, 15:57Правда, если в имени пользователя есть символ @
Это та же самая проблема, что и при вызове строки подключения к FTP в броузере, когда имя пользователя - это e-mail.
Просто заменяем "@" на "#40" + порт подключения.
У меня первый хостинг был на АГАВА, а там имя пользователя - всегда e-mail, без вариантов.
см. например:
http://www.slavyane.net.ua/kompyuternay ... =component
libcurl for Clarion
Добавлено: 17 Август 2018, 18:49
Дед Пахом
Игорь Столяров писал(а): ↑16 Август 2018, 6:45Можно ли мечтать о методе:
КОД: ВЫДЕЛИТЬ ВСЁ
FormPost PROCEDURE(STRING pUrl, *IDynStr pDynStr, <curl::ProgressDataProcType xferproc>), CURLcode, PROC
но с передачей параметров pPostFields
Обновление v1.29 на GitHub. Вместо размножения методов FormPost предлагается просто вызвать curl.SetPostFields('k1=v1&k2=v2').
libcurl for Clarion
Добавлено: 17 Август 2018, 20:06
RaFaeL
Игорь Столяров писал(а): ↑16 Август 2018, 16:16Правильно ли я понимаю, что эти строчки можно включать всегда по умолчанию,
т.к. на обычный протокол HTTP они не действуют ? А с ними работает и HTTP и HTTPS ...
А зачем? У меня в классе этот флаг передается в параметре Init, соотв. если ресурсу нужен SSL - передаем, не нужен - не передаем
libcurl for Clarion
Добавлено: 17 Август 2018, 20:07
RaFaeL
Дед Пахом писал(а): ↑17 Август 2018, 18:49Обновление v1.29 на GitHub. Вместо размножения методов FormPost предлагается просто вызвать curl.SetPostFields('k1=v1&k2=v2').
А старые варианты работать будут или они выпилены и придется все переделывать? (пока не качал не смотрел)
libcurl for Clarion
Добавлено: 17 Август 2018, 20:38
Дед Пахом
RaFaeL писал(а): ↑17 Август 2018, 20:07А старые варианты работать будут
Старые я не трогал.
libcurl for Clarion
Добавлено: 17 Август 2018, 22:30
Дед Пахом
Дед Пахом писал(а): ↑17 Август 2018, 18:49Обновление v1.29 на GitHub
Перезалил libcurlmail.clw, кое-что исправил.
libcurl for Clarion
Добавлено: 18 Август 2018, 16:51
Игорь Столяров
Заранее извиняюсь, но это снова я …
Решил развить успех и попробовать работать с запросами через файл (базовый пример PostFile).
Элементарный запрос для проверки ИНН на сайте ФНС. В примере поменял только URL:
Код: Выделить всё
curl.Init()
url = 'http://npchk.nalog.ru/FNSNDSCAWS_2?wsdl' ! ЗАМЕНИЛ
argname = 'userfile'
infile = 'test.xml'
respfile = 'post_response.txt'
res = curl.PostFile(url, argname, infile, respfile)
...
В XML файле набрал запрос (этот пример запроса опубликован и проверен):
Код: Выделить всё
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:req="http://ws.unisoft/FNSNDSCAWS2/Request">
<soapenv:Header/>
<soapenv:Body>
<req:NdsRequest2>
<!--1 to 10000 repetitions:-->
<req:NP INN="7812014560" KPP="770701001" DT="18.08.2018"/>
</req:NdsRequest2>
</soapenv:Body>
</soapenv:Envelope>
Всё выполняется, получаю ответ: Success, see file post_response.txt for details !
Т.е. всё хорошо, но файла post_response.txt - НЕТ. Совсем. Нигде.
Я бы понял, если бы он содержал ошибку или мусор. Но он просто не формируется.
Я что-то не то делаю ? Заранее спасибо за наводку куда смотреть ...