git.oblomov.eu Git - wine/blob - programs/winetest/include/wininet.pm

   1 package wininet;
   2
   3 use strict;
   4
   5 require Exporter;
   6
   7 use wine;
   8 use vars qw(@ISA @EXPORT @EXPORT_OK);
   9
  10 @ISA = qw(Exporter);
  11 @EXPORT = qw();
  12 @EXPORT_OK = qw();
  13
  14 my $module_declarations = {
  15     "CommitUrlCacheEntryA" => ["long",  ["str", "str", "long", "long", "long", "ptr", "long", "str", "long"]],
  16     "DllInstall" => ["long",  ["long", "wstr"]],
  17     "FtpCreateDirectoryA" => ["long",  ["long", "str"]],
  18     "FtpDeleteFileA" => ["long",  ["long", "str"]],
  19     "FtpFindFirstFileA" => ["long",  ["long", "str", "ptr", "long", "long"]],
  20     "FtpGetCurrentDirectoryA" => ["long",  ["long", "str", "ptr"]],
  21     "FtpGetFileA" => ["long",  ["long", "str", "str", "long", "long", "long", "long"]],
  22     "FtpOpenFileA" => ["long",  ["long", "str", "long", "long", "long"]],
  23     "FtpPutFileA" => ["long",  ["long", "str", "str", "long", "long"]],
  24     "FtpRemoveDirectoryA" => ["long",  ["long", "str"]],
  25     "FtpRenameFileA" => ["long",  ["long", "str", "str"]],
  26     "FtpSetCurrentDirectoryA" => ["long",  ["long", "str"]],
  27     "GetUrlCacheEntryInfoA" => ["long",  ["str", "ptr", "ptr"]],
  28     "HttpAddRequestHeadersA" => ["long",  ["long", "str", "long", "long"]],
  29     "HttpOpenRequestA" => ["long",  ["long", "str", "str", "str", "str", "ptr", "long", "long"]],
  30     "HttpQueryInfoA" => ["long",  ["long", "long", "ptr", "ptr", "ptr"]],
  31     "HttpSendRequestA" => ["long",  ["long", "str", "long", "ptr", "long"]],
  32     "HttpSendRequestExA" => ["long",  ["long", "ptr", "ptr", "long", "long"]],
  33     "InternetAttemptConnect" => ["long",  ["long"]],
  34     "InternetCanonicalizeUrlA" => ["long",  ["str", "str", "ptr", "long"]],
  35     "InternetCheckConnectionA" => ["long",  ["str", "long", "long"]],
  36     "InternetCloseHandle" => ["long",  ["long"]],
  37     "InternetConnectA" => ["long",  ["long", "str", "long", "str", "str", "long", "long", "long"]],
  38     "InternetCrackUrlA" => ["long",  ["str", "long", "long", "ptr"]],
  39     "InternetFindNextFileA" => ["long",  ["long", "ptr"]],
  40     "InternetGetConnectedState" => ["long",  ["ptr", "long"]],
  41     "InternetGetCookieA" => ["long",  ["str", "str", "str", "ptr"]],
  42     "InternetGetLastResponseInfoA" => ["long",  ["ptr", "str", "ptr"]],
  43     "InternetOpenA" => ["long",  ["str", "long", "str", "str", "long"]],
  44     "InternetQueryOptionA" => ["long",  ["long", "long", "ptr", "ptr"]],
  45     "InternetReadFile" => ["long",  ["long", "ptr", "long", "ptr"]],
  46     "InternetSetCookieA" => ["long",  ["str", "str", "str"]],
  47     "InternetSetOptionA" => ["long",  ["long", "long", "ptr", "long"]],
  48     "InternetSetOptionW" => ["long",  ["long", "long", "ptr", "long"]],
  49     "InternetSetStatusCallback" => ["ptr",  ["long", "ptr"]],
  50     "InternetWriteFile" => ["long",  ["long", "ptr", "long", "ptr"]]
  51 };
  52
  53 &wine::declare("wininet",%$module_declarations);
  54 push @EXPORT, map { "&" . $_; } sort(keys(%$module_declarations));
  55 1;