[Indy idHTTP] https авторизация POST запросом

[Adamrus]

Здравствуйте.

- Indy версии 10.6.2.0
- Delphi 2010
- авторизуемся на сайте объявлений m.a**to.ru
- на форме idHTTP, IdSSLIOHandlerSocketOpenSSL, IdCookieManager

procedure TForm1.Button1Click(Sender: TObject);
var
 log: TStringList;
 timeout: Integer;
begin
 try
  timeout := 50000;
  
  IdHTTP1.ReadTimeout  := timeout;
  IdHTTP1.ConnectTimeout := timeout;
  IdSSLIOHandlerSocketOpenSSL1.ReadTimeout := timeout;
  IdSSLIOHandlerSocketOpenSSL1.ConnectTimeout := timeout;
  
  log := TStringList.Create;
  log.Add('login='+edit1.text);
  log.Add('password='+edit2.text);
  log.Add('next=/profile');
  log.Add('from=');

  idHTTP1.Post('https://m.a**to.ru/profile/login',log);

 Except
  on E : Exception do
   begin
    memo1.Lines.add(E.ClassName+' ошибка с сообщением : '+E.Message);
    log.Free;
    IdHTTP1.Free;
   end;
 end;

end;

Включаем сниффер HTTP Analyzer V7 и смотрим, что передает браузер и что передает программа.
инди.jpg

получается программа авторизуется успешно на сайте, НО затем срабатывает при редиректе на страницу профиля не GET запрос как в браузере, а снова POST, в итоге получаю 404



дорогие коллеги по цеху и сочувствующие помогите разобраться с данной проблемой.

[Serge_Bliznykov]

я вообще не в теме. но, думаю, что с avito всё будет очень и очень не просто!
Они 100% всеми силами борются с внешними клиентами - пользователь должен заходить через браузер и точка. Программно подключаться нельзя.
Разумеется, можно ковырять протокол и заставлять программу прикидываться браузером, но можно навешать кучу защит, начиная от использования сессий и заканчивая пользовательским JS скриптом, который посылает/принимает нужные данные.

Не пытайтесь решить общую задачу (авторизуемся на сайте объявлений m.a**to.ru)
ищите информацию по авторизации конкретно на авито.ру

p.s. сорри за оффтоп. Вряд ли это всё Вам поможет.
Но я не мог пройти молча мимо..

[Adamrus]

Сообщение от Serge_Bliznykov

я вообще не в теме. но, думаю, что с avito всё будет очень и очень не просто!
Они 100% всеми силами борются с внешними клиентами - пользователь должен заходить через браузер и точка. Программно подключаться нельзя.
Разумеется, можно ковырять протокол и заставлять программу прикидываться браузером, но можно навешать кучу защит, начиная от использования сессий и заканчивая пользовательским JS скриптом, который посылает/принимает нужные данные.

Не пытайтесь решить общую задачу (авторизуемся на сайте объявлений m.a**to.ru)
ищите информацию по авторизации конкретно на авито.ру

p.s. сорри за оффтоп. Вряд ли это всё Вам поможет.
Но я не мог пройти молча мимо..

нормуль, спасибо, что тему подняли ))))

я добился того, что смотрю данные сниффера - вижу что данные моя программа по сути полностью имитирует как у браузера....


просто в сети есть прога, называется, авитобот, они как то логинятся )))

[Smagulov85]

Сообщение от Adamrus

нормуль, спасибо, что тему подняли ))))

я добился того, что смотрю данные сниффера - вижу что данные моя программа по сути полностью имитирует как у браузера....


просто в сети есть прога, называется, авитобот, они как то логинятся )))

Не знаю актуально еще или нет. Судя по твоему коду имитации запроса как в браузере у тебя нет.

если после POST идет редирект на GET то надо использовать

procedure TForm1.IdHTTP1Redirect(Sender: TObject; var dest: string;
  var NumRedirect: Integer; var Handled: Boolean; var VMethod: string);
begin
VMethod:='GET'
end;

[Alex11223]

вижу что данные моя программа по сути полностью имитирует как у браузера....

Что она имитирует если даже User-Agent и Referer не стоит?

+там наверняка выполняется какой-нибудь запрос (или генерируется часть данных) с помощью JS.

И еще там форма не обычная application/x-www-form-urlencoded, а multipart/form-data.

[Adamrus]

Сообщение от Alex11223

Что она имитирует если даже User-Agent и Referer не стоит?

+там наверняка выполняется какой-нибудь запрос (или генерируется часть данных) с помощью JS.

И еще там форма не обычная application/x-www-form-urlencoded, а multipart/form-data.

User-Agent прописан в св-х idHTTP
referer https: // m. avito. ru/ profile/login?from=


multipart/form-data исправил



теперь так

[Айдар]

Сообщение от Adamrus

User-Agent прописан в св-х idHTTP
referer https: // m. avito. ru/ profile/login?from=


multipart/form-data исправил



теперь так

Не решили?

procedure TForm1.Button1Click(Sender: TObject);
begin
form1.IdCookieManager1.CookieCollection.Clear;
form1.idHTTP1.AllowCookies:=true;
form1.idHTTP1.Request.UserAgent:='Mozilla/5.0 (Windows NT 5.1; rv:49.0) Gecko/20100101 Firefox/49.0';
form1.idHTTP1.Request.AcceptLanguage:='Accept-Language=ru-RU,ru;q=0.8,en-US;q=0.5,en;q=0.3';
form1.IdHTTP1.Request.Referer :='https://m.avito.ru/profile';
enter:=Tstringlist.create;
enter.Add('login=xxx);
enter.Add('password=xxx');
enter.Add('next=/profile');
enter.Add('from=');
form1.Memo1.Text:=form1.idHTTP1.post('https://m.avito.ru/profile/login',enter);
//enter.free;
end;