Ошибка в INTERNET_STATUS_COOKIE_SENT: Правда о lpvStatusInformation

Delphi , Интернет и Сети , CGI и Cookies

Вопрос, связанный с использованием функций Internet Explorer для работы с куки в программировании на языке Object Pascal (Delphi), часто встречается среди разработчиков, использующих Windows API для работы с сетевыми запросами. В документации Microsoft указано, что при получении уведомления о событии INTERNET_STATUS_COOKIE_SENT параметр lpvStatusInformation представляет собой DWORD, содержащий количество отправленных куки. Однако пользователь столкнулся с проблемой, при которой значение этого параметра было слишком большим (260558716), что выходило за рамки ожидаемого диапазона для 32-битного целого числа.

Пример кода, вызывающего проблему:

procedure THttpClient.Get(const Url: TUrl);
var
  hInet: HINTERNET;
  Context: INTERNET_STATUS_CALLBACK;
begin
  hInet := InternetOpen(PWideChar('Some user agent'), INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0);
  InternetSetOption(hInet, INTERNET_OPTION_CONTEXT_VALUE, Self, SizeOf(Self));
  Context := InternetSetStatusCallback(hInet, INTERNET_STATUS_CALLBACK(@DoWinInetCallback));
  // ... Остальной код ...
end;

procedure DoWinInetCallback(hInet: HINTERNET; dwContext: DWORD;
  dwInternetStatus: DWORD; lpvStatusInformation: Pointer;
  dwStatusInformationLength: DWORD); stdcall;
begin
  // ... Обработка других статусов ...
  INTERNET_STATUS_COOKIE_SENT: // 320
    Notify(Format('Number of cookies sent or suppressed when sending the request were %0:d.', [DWORD(lpvStatusInformation)]));
  // ... Обработка других статусов ...
end;

Решение проблемы:

Проблема заключается в том, что lpvStatusInformation не является непосредственно значением DWORD, а указывает на него. Следовательно, для доступа к значению необходимо выполнить дереференсацию указателя. В документации Microsoft это не было ясно указано, что привело к недопониманию.

Исправленный код:

procedure DoWinInetCallback(hInet: HINTERNET; dwContext: DWORD;
  dwInternetStatus: DWORD; lpvStatusInformation: Pointer;
  dwStatusInformationLength: DWORD); stdcall;
begin
  // ... Обработка других статусов ...
  INTERNET_STATUS_COOKIE_SENT: // 320
    Notify(Format('Number of cookies sent or suppressed when sending the request were %0:d.', [PDWORD(lpvStatusInformation)^]));
  // ... Обработка других статусов ...
end;

Заключение:

Разработчикам, сталкивающимся с подобными проблемами, важно внимательно проверять типы данных, с которыми они работают, и не забывать о деталях, таких как дереференсация указателей. Это позволит избежать ошибок, связанных с неправильной интерпретацией данных, и обеспечит корректную работу с куки в API Internet Explorer.

Создано по материалам из источника по ссылке.

Проблема связана с неправильной интерпретацией указателя lpvStatusInformation в функции обратного вызова InternetSetStatusCallback, используемого для работы с куками в Internet Explorer, что приводит к ошибке при получении слишком большого знач

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: CGI и Cookies ::