TIdHTTP: Проверьте действительные файлы cookie перед отправкой запроса?

Question

Я использую Indy TIdHTTP вместе с TIdCookieManager. Я хотел бы проверить текущие файлы cookie для запроса, который я собираюсь отправить, и определить вероятность того, что он будет действительным (я знаю, что не могу быть на 100% уверен, что сервер примет мой запрос). Если нет файлов cookie или срок их действия истек, я хочу сначала войти в систему и приобрести новые файлы cookie. В противном случае просто отправьте запрос.

Как я могу сделать такую ​​проверку? Я считаю, что я должен проверить менеджера файлов cookie, прежде чем отправлять запрос, но не знаю, что проверить.

Answer 1

попробовать что-то вроде этого:

function CheckCookies(Cookies: TIdCookieManager; const TargetURL: String): Boolean; 
var 
    URL: TIdURI; 
    Headers: TIdHeaderList; 
begin 
    Result := False; 

    URL := TIdURI.Create(TargetURL); 
    try 
    Headers := TIdHeaderList.Create(QuoteHTTP); 
    try 
     Cookies.GenerateClientCookies(URL, False, Headers); 
     Result := Headers.Count > 0; 
    finally 
     Headers.Free; 
    end; 
    finally 
    URL.Free; 
    end; 
end; 

.

if not CheckCookies(IdHTTP1.CookieManager, 'http://www.someurl.com/') then 
begin 
    // login and get new cookies ... 
end; 

Answer 2

Как уже указано в комментариях, вы не можете выполнить фактическую акцептную проверку на клиенте, только сервер может это сделать.

Однако вы можете отфильтровать с истекшим сроком годности или недействительное печенье:

function filterInvalidCookies(cookies: TIdCookies; targetURL: TIdURI): Boolean; 
var 
    c: Integer; 
begin 
    Result := False; 

    c := 0; 
    while (cookies.Count > c) do 
    if (not cookies[c].IsExpired and cookies[c].IsAllowed(targetURL, False) and 
     (cookies[c].CookieName <> '')) then 
     begin 
     Result := True; 
     Inc(c); 
     end 
    else 
     cookies.Delete(c); 
end; 

Функция удаляет недействительные печенья и возвращает значение False, если нет действительных из них остались. Назовите это прежде, чем запрос, как это:

if (Assigned(con.CookieManager)) then 
    filterInvalidCookies(con.CookieManager.CookieCollection, 
    TIdURI.Create('http://www.someurl.com/')); 

где con является TIdHTTP объект.

Вы можете сделать дополнительные, возможно, целевые страницы.