Skip to content

W
wine-cw
Commit c1494edc authored by Alexandre Julliard's avatar Alexandre Julliard
Browse files
Options

Updated module definitions for Perl unit tests.

parent 575f5f8c
Expand all Hide whitespace changes
Inline Side-by-side
Showing with 240 additions and 35 deletions
programs/winetest/include/advapi32.pm
View file @ c1494edc
......@@ -12,6 +12,8 @@ use vars qw(@ISA @EXPORT @EXPORT_OK);
@EXPORT_OK = qw();
my $module_declarations = {
"AbortSystemShutdownA" => ["long", ["str"]],
"AbortSystemShutdownW" => ["long", ["wstr"]],
"AccessCheck" => ["long", ["ptr", "long", "long", "ptr", "ptr", "ptr", "ptr", "ptr"]],
"AddAccessAllowedAce" => ["long", ["ptr", "long", "long", "ptr"]],
"AdjustTokenPrivileges" => ["long", ["long", "long", "ptr", "long", "ptr", "ptr"]],
......@@ -19,6 +21,7 @@ my $module_declarations = {
"AllocateLocallyUniqueId" => ["long", ["ptr"]],
"BackupEventLogA" => ["long", ["long", "str"]],
"BackupEventLogW" => ["long", ["long", "wstr"]],
"CheckTokenMembership" => ["long", ["long", "ptr", "ptr"]],
"ClearEventLogA" => ["long", ["long", "str"]],
"ClearEventLogW" => ["long", ["long", "wstr"]],
"CloseEventLog" => ["long", ["long"]],
......@@ -73,6 +76,7 @@ my $module_declarations = {
"EqualPrefixSid" => ["long", ["ptr", "ptr"]],
"EqualSid" => ["long", ["ptr", "ptr"]],
"FreeSid" => ["ptr", ["ptr"]],
"GetAce" => ["long", ["ptr", "long", "ptr"]],
"GetFileSecurityA" => ["long", ["str", "long", "ptr", "long", "ptr"]],
"GetFileSecurityW" => ["long", ["wstr", "long", "ptr", "long", "ptr"]],
"GetLengthSid" => ["long", ["ptr"]],
......@@ -91,6 +95,7 @@ my $module_declarations = {
"GetTokenInformation" => ["long", ["long", "long", "ptr", "long", "ptr"]],
"GetUserNameA" => ["long", ["str", "ptr"]],
"GetUserNameW" => ["long", ["wstr", "ptr"]],
"ImpersonateLoggedOnUser" => ["long", ["long"]],
"ImpersonateSelf" => ["long", ["long"]],
"InitializeAcl" => ["long", ["ptr", "long", "long"]],
"InitializeSecurityDescriptor" => ["long", ["ptr", "long"]],
......@@ -120,6 +125,7 @@ my $module_declarations = {
"OpenServiceA" => ["long", ["long", "str", "long"]],
"OpenServiceW" => ["long", ["long", "wstr", "long"]],
"OpenThreadToken" => ["long", ["long", "long", "long", "ptr"]],
"PrivilegeCheck" => ["long", ["long", "ptr", "ptr"]],
"QueryServiceStatus" => ["long", ["long", "ptr"]],
"QueryWindows31FilesMigration" => ["long", ["long"]],
"ReadEventLogA" => ["long", ["long", "long", "long", "ptr", "long", "ptr", "ptr"]],
......
programs/winetest/include/avicap32.pm 0 → 100644
View file @ c1494edc
package avicap32;
use strict;
require Exporter;
use wine;
use vars qw(@ISA @EXPORT @EXPORT_OK);
@ISA = qw(Exporter);
@EXPORT = qw();
@EXPORT_OK = qw();
my $module_declarations = {
"capCreateCaptureWindowA" => ["long", ["str", "long", "long", "long", "long", "long", "long", "long"]],
"capCreateCaptureWindowW" => ["long", ["wstr", "long", "long", "long", "long", "long", "long", "long"]],
"capGetDriverDescriptionA" => ["long", ["long", "str", "long", "str", "long"]],
"capGetDriverDescriptionW" => ["long", ["long", "wstr", "long", "wstr", "long"]]
};
&wine::declare("avicap32",%$module_declarations);
push @EXPORT, map { "&" . $_; } sort(keys(%$module_declarations));
1;
programs/winetest/include/gdi32.pm
View file @ c1494edc
......@@ -155,6 +155,8 @@ my $module_declarations = {
"GetEnhMetaFileW" => ["long", ["wstr"]],
"GetFontData" => ["long", ["long", "long", "long", "ptr", "long"]],
"GetFontLanguageInfo" => ["long", ["long"]],
"GetGlyphIndicesA" => ["long", ["long", "str", "long", "ptr", "long"]],
"GetGlyphIndicesW" => ["long", ["long", "wstr", "long", "ptr", "long"]],
"GetGlyphOutlineA" => ["long", ["long", "long", "long", "ptr", "long", "ptr", "ptr"]],
"GetGlyphOutlineW" => ["long", ["long", "long", "long", "ptr", "long", "ptr", "ptr"]],
"GetGraphicsMode" => ["long", ["long"]],
......@@ -200,6 +202,7 @@ my $module_declarations = {
"GetTextExtentPoint32A" => ["long", ["long", "str", "long", "ptr"]],
"GetTextExtentPoint32W" => ["long", ["long", "wstr", "long", "ptr"]],
"GetTextExtentPointA" => ["long", ["long", "str", "long", "ptr"]],
"GetTextExtentPointI" => ["long", ["long", "ptr", "long", "ptr"]],
"GetTextExtentPointW" => ["long", ["long", "wstr", "long", "ptr"]],
"GetTextFaceA" => ["long", ["long", "long", "str"]],
"GetTextFaceW" => ["long", ["long", "long", "wstr"]],
......
programs/winetest/include/imm32.pm
View file @ c1494edc
......@@ -21,6 +21,7 @@ my $module_declarations = {
"ImmDestroyContext" => ["long", ["long"]],
"ImmDestroyIMCC" => ["long", ["long"]],
"ImmDestroySoftKeyboard" => ["long", ["long"]],
"ImmDisableIME" => ["long", ["long"]],
"ImmEnumRegisterWordA" => ["long", ["long", "ptr", "str", "long", "str", "ptr"]],
"ImmEnumRegisterWordW" => ["long", ["long", "ptr", "wstr", "long", "wstr", "ptr"]],
"ImmEscapeA" => ["long", ["long", "long", "long", "ptr"]],
......
programs/winetest/include/kernel32.pm
View file @ c1494edc
......@@ -144,7 +144,10 @@ my $module_declarations = {
"CreateWaitableTimerA" => ["long", ["ptr", "long", "str"]],
"CreateWaitableTimerW" => ["long", ["ptr", "long", "wstr"]],
"DebugActiveProcess" => ["long", ["long"]],
"DebugActiveProcessStop" => ["long", ["long"]],
"DebugBreak" => ["void", []],
"DebugBreakProcess" => ["long", ["long"]],
"DebugSetProcessKillOnExit" => ["long", ["long"]],
"DefineDosDeviceA" => ["long", ["long", "str", "str"]],
"DeleteAtom" => ["long", ["long"]],
"DeleteFileA" => ["long", ["str"]],
......@@ -254,6 +257,8 @@ my $module_declarations = {
"GetCompressedFileSizeA" => ["long", ["str", "ptr"]],
"GetCompressedFileSizeW" => ["long", ["wstr", "ptr"]],
"GetComputerNameA" => ["long", ["str", "ptr"]],
"GetComputerNameExA" => ["long", ["ptr", "str", "ptr"]],
"GetComputerNameExW" => ["long", ["ptr", "wstr", "ptr"]],
"GetComputerNameW" => ["long", ["wstr", "ptr"]],
"GetConsoleCP" => ["long", []],
"GetConsoleCursorInfo" => ["long", ["long", "ptr"]],
......@@ -633,6 +638,7 @@ my $module_declarations = {
"SetThreadAffinityMask" => ["long", ["long", "long"]],
"SetThreadContext" => ["long", ["long", "ptr"]],
"SetThreadExecutionState" => ["long", ["long"]],
"SetThreadIdealProcessor" => ["long", ["long", "long"]],
"SetThreadLocale" => ["long", ["long"]],
"SetThreadPriority" => ["long", ["long", "long"]],
"SetThreadPriorityBoost" => ["long", ["long", "long"]],
......
programs/winetest/include/msimg32.pm 0 → 100644
View file @ c1494edc
package msimg32;
use strict;
require Exporter;
use wine;
use vars qw(@ISA @EXPORT @EXPORT_OK);
@ISA = qw(Exporter);
@EXPORT = qw();
@EXPORT_OK = qw();
my $module_declarations = {
"AlphaBlend" => ["long", ["long", "long", "long", "long", "long", "long", "long", "long", "long", "long", "ptr"]],
"GradientFill" => ["long", ["long", "ptr", "long", "ptr", "long", "long"]],
"TransparentBlt" => ["long", ["long", "long", "long", "long", "long", "long", "long", "long", "long", "long", "long"]],
"vSetDdrawflag" => ["void", []]
};
&wine::declare("msimg32",%$module_declarations);
push @EXPORT, map { "&" . $_; } sort(keys(%$module_declarations));
1;
programs/winetest/include/msisys_ocx.pm 0 → 100644
View file @ c1494edc
package msisys_ocx;
use strict;
require Exporter;
use wine;
use vars qw(@ISA @EXPORT @EXPORT_OK);
@ISA = qw(Exporter);
@EXPORT = qw();
@EXPORT_OK = qw();
my $module_declarations = {
"DllCanUnloadNow" => ["long", []],
"DllGetClassObject" => ["long", ["ptr", "ptr", "ptr"]],
"DllRegisterServer" => ["long", []],
"DllUnregisterServer" => ["long", []]
};
&wine::declare("msisys.ocx",%$module_declarations);
push @EXPORT, map { "&" . $_; } sort(keys(%$module_declarations));
1;
programs/winetest/include/ole32.pm
View file @ c1494edc
......@@ -26,12 +26,16 @@ my $module_declarations = {
"CoGetClassObject" => ["long", ["ptr", "long", "ptr", "ptr", "ptr"]],
"CoGetCurrentProcess" => ["long", []],
"CoGetMalloc" => ["long", ["long", "ptr"]],
"CoGetMarshalSizeMax" => ["long", ["ptr", "ptr", "ptr", "long", "ptr", "long"]],
"CoGetPSClsid" => ["long", ["ptr", "ptr"]],
"CoGetStandardMarshal" => ["long", ["ptr", "ptr", "long", "ptr", "long", "ptr"]],
"CoInitialize" => ["long", ["ptr"]],
"CoInitializeWOW" => ["long", ["long", "long"]],
"CoIsOle1Class" => ["long", ["ptr"]],
"CoLoadLibrary" => ["long", ["str", "long"]],
"CoLockObjectExternal" => ["long", ["ptr", "long", "long"]],
"CoMarshalInterThreadInterfaceInStream" => ["long", ["ptr", "ptr", "ptr"]],
"CoMarshalInterface" => ["long", ["ptr", "ptr", "ptr", "long", "ptr", "long"]],
"CoRegisterClassObject" => ["long", ["ptr", "ptr", "long", "long", "ptr"]],
"CoRegisterMessageFilter" => ["long", ["ptr", "ptr"]],
"CoRevokeClassObject" => ["long", ["long"]],
......@@ -41,6 +45,7 @@ my $module_declarations = {
"CoTaskMemRealloc" => ["ptr", ["ptr", "long"]],
"CoTreatAsClass" => ["long", ["ptr", "ptr"]],
"CoUninitialize" => ["void", []],
"CoUnmarshalInterface" => ["long", ["ptr", "ptr", "ptr"]],
"CreateAntiMoniker" => ["long", ["ptr"]],
"CreateBindCtx" => ["long", ["long", "ptr"]],
"CreateDataAdviseHolder" => ["long", ["ptr"]],
......
programs/winetest/include/oleaut32.pm
View file @ c1494edc
......@@ -217,8 +217,10 @@ my $module_declarations = {
"OleCreateFontIndirect" => ["long", ["ptr", "ptr", "ptr"]],
"OleTranslateColor" => ["long", ["long", "long", "ptr"]],
"OleLoadPictureEx" => ["long", ["ptr", "long", "long", "ptr", "long", "long", "long", "ptr"]],
"SafeArrayAllocDescriptorEx" => ["long", ["long", "long", "ptr"]],
"VarBstrCat" => ["long", ["wstr", "wstr", "ptr"]],
"VarBstrCmp" => ["long", ["wstr", "wstr", "long", "long"]]
"VarBstrCmp" => ["long", ["wstr", "wstr", "long", "long"]],
"VarCat" => ["long", ["ptr", "ptr", "ptr"]]
};
&wine::declare("oleaut32",%$module_declarations);
......
programs/winetest/include/rpcrt4.pm
View file @ c1494edc
......@@ -12,7 +12,10 @@ use vars qw(@ISA @EXPORT @EXPORT_OK);
@EXPORT_OK = qw();
my $module_declarations = {
"NdrDllCanUnloadNow" => ["long", ["ptr"]],
"NdrDllGetClassObject" => ["long", ["ptr", "ptr", "ptr", "ptr", "ptr", "ptr"]],
"NdrDllRegisterProxy" => ["long", ["long", "ptr", "ptr"]],
"RpcBindingFree" => ["long", ["ptr"]],
"RpcBindingFromStringBindingA" => ["long", ["str", "ptr"]],
"RpcBindingFromStringBindingW" => ["long", ["wstr", "ptr"]],
"RpcServerListen" => ["long", ["long", "long", "long"]],
......
programs/winetest/include/setupapi.pm
View file @ c1494edc
......@@ -12,25 +12,66 @@ use vars qw(@ISA @EXPORT @EXPORT_OK);
@EXPORT_OK = qw();
my $module_declarations = {
"SetupCloseFileQueue" => ["void", ["long"]],
"SetupCloseFileQueue" => ["long", ["long"]],
"SetupCloseInfFile" => ["void", ["long"]],
"SetupCommitFileQueueA" => ["long", ["long", "long", "ptr", "ptr"]],
"SetupCommitFileQueueW" => ["long", ["long", "long", "ptr", "ptr"]],
"SetupDefaultQueueCallbackA" => ["long", ["ptr", "long", "long", "long"]],
"SetupDefaultQueueCallbackW" => ["long", ["ptr", "long", "long", "long"]],
"SetupFindFirstLineA" => ["long", ["long", "str", "str", "ptr"]],
"SetupFindFirstLineW" => ["long", ["long", "str", "str", "ptr"]],
"SetupFindNextLine" => ["long", ["ptr", "ptr"]],
"SetupFindNextMatchLineA" => ["long", ["ptr", "str", "ptr"]],
"SetupFindNextMatchLineW" => ["long", ["ptr", "str", "ptr"]],
"SetupGetBinaryField" => ["long", ["ptr", "long", "ptr", "long", "ptr"]],
"SetupGetFieldCount" => ["long", ["ptr"]],
"SetupGetFileQueueCount" => ["long", ["long", "long", "ptr"]],
"SetupGetFileQueueFlags" => ["long", ["long", "ptr"]],
"SetupGetIntField" => ["long", ["ptr", "long", "ptr"]],
"SetupGetLineByIndexA" => ["long", ["long", "str", "long", "ptr"]],
"SetupGetLineTextA" => ["long", ["ptr", "long", "str", "str", "str", "long", "ptr"]],
"SetupGetStringFieldA" => ["long", ["ptr", "long", "str", "long", "ptr"]],
"SetupGetLineByIndexW" => ["long", ["long", "str", "long", "ptr"]],
"SetupGetLineCountA" => ["long", ["long", "str"]],
"SetupGetLineCountW" => ["long", ["long", "str"]],
"SetupGetLineTextA" => ["long", ["ptr", "long", "str", "str", "ptr", "long", "ptr"]],
"SetupGetLineTextW" => ["long", ["ptr", "long", "str", "str", "str", "long", "ptr"]],
"SetupGetMultiSzFieldA" => ["long", ["ptr", "long", "ptr", "long", "ptr"]],
"SetupGetMultiSzFieldW" => ["long", ["ptr", "long", "str", "long", "ptr"]],
"SetupGetStringFieldA" => ["long", ["ptr", "long", "ptr", "long", "ptr"]],
"SetupGetStringFieldW" => ["long", ["ptr", "long", "str", "long", "ptr"]],
"SetupInitDefaultQueueCallback" => ["ptr", ["long"]],
"SetupInitDefaultQueueCallbackEx" => ["ptr", ["long", "long", "long", "long", "ptr"]],
"SetupInstallFilesFromInfSectionA" => ["long", ["long", "long", "long", "str", "str", "long"]],
"SetupInstallFilesFromInfSectionW" => ["long", ["long", "long", "long", "str", "str", "long"]],
"SetupInstallFromInfSectionA" => ["long", ["long", "long", "str", "long", "long", "str", "long", "ptr", "ptr", "long", "ptr"]],
"SetupInstallFromInfSectionW" => ["long", ["long", "long", "str", "long", "long", "str", "long", "ptr", "ptr", "long", "ptr"]],
"SetupIterateCabinetA" => ["long", ["str", "long", "ptr", "ptr"]],
"SetupIterateCabinetW" => ["long", ["str", "long", "ptr", "ptr"]],
"SetupOpenAppendInfFileA" => ["long", ["str", "long", "ptr"]],
"SetupOpenAppendInfFileW" => ["long", ["str", "long", "ptr"]],
"SetupOpenFileQueue" => ["long", []],
"SetupOpenInfFileA" => ["long", ["str", "str", "long", "ptr"]],
"SetupOpenInfFileW" => ["long", ["str", "str", "long", "ptr"]],
"SetupQueueCopyA" => ["long", ["long", "str", "str", "str", "str", "str", "str", "str", "long"]],
"SetupQueueCopyIndirectA" => ["long", ["ptr"]],
"SetupQueueCopyIndirectW" => ["long", ["ptr"]],
"SetupQueueCopySectionA" => ["long", ["long", "str", "long", "long", "str", "long"]],
"SetupQueueCopySectionW" => ["long", ["long", "str", "long", "long", "str", "long"]],
"SetupQueueCopyW" => ["long", ["long", "str", "str", "str", "str", "str", "str", "str", "long"]],
"SetupQueueDefaultCopyA" => ["long", ["long", "long", "str", "str", "str", "long"]],
"SetupQueueDefaultCopyW" => ["long", ["long", "long", "str", "str", "str", "long"]],
"SetupQueueDeleteA" => ["long", ["long", "str", "str"]],
"SetupQueueDeleteSectionA" => ["long", ["long", "long", "long", "str"]],
"SetupQueueDeleteSectionW" => ["long", ["long", "long", "long", "str"]],
"SetupQueueDeleteW" => ["long", ["long", "str", "str"]],
"SetupQueueRenameA" => ["long", ["long", "str", "str", "str", "str"]],
"SetupQueueRenameSectionA" => ["long", ["long", "long", "long", "str"]],
"SetupQueueRenameSectionW" => ["long", ["long", "long", "long", "str"]],
"SetupQueueRenameW" => ["long", ["long", "str", "str", "str", "str"]],
"SetupScanFileQueueA" => ["long", ["long", "long", "long", "ptr", "ptr", "ptr"]],
"SetupScanFileQueueW" => ["long", ["long", "long", "long", "ptr", "ptr", "ptr"]],
"SetupSetDirectoryIdA" => ["long", ["long", "long", "str"]],
"SetupSetDirectoryIdW" => ["long", ["long", "long", "str"]],
"SetupSetFileQueueFlags" => ["long", ["long", "long", "long"]],
"SetupTermDefaultQueueCallback" => ["void", ["ptr"]]
};
......
programs/winetest/include/shdocvw.pm
View file @ c1494edc
......@@ -13,11 +13,11 @@ use vars qw(@ISA @EXPORT @EXPORT_OK);
my $module_declarations = {
"DllCanUnloadNow" => ["long", []],
"DllGetClassObject" => ["long", ["ptr", "ptr", "ptr"]],
"DllGetVersion" => ["long", ["ptr"]],
"DllInstall" => ["long", ["long", "wstr"]],
"DllRegisterServer" => ["long", ["undef"]],
"DllUnregisterServer" => ["long", ["undef"]],
"DllGetClassObject" => ["long", ["ptr", "ptr", "ptr"]]
"DllRegisterServer" => ["long", []],
"DllUnregisterServer" => ["long", []]
};
&wine::declare("shdocvw",%$module_declarations);
......
programs/winetest/include/shell32.pm
View file @ c1494edc
......@@ -45,14 +45,14 @@ my $module_declarations = {
"PathFileExists" => ["long", ["ptr"]],
"PathMatchSpec" => ["long", ["ptr", "ptr"]],
"PathMakeUniqueName" => ["long", ["ptr", "long", "ptr", "ptr", "ptr"]],
"PathSetDlgItemPath" => ["long", ["long", "long", "ptr"]],
"PathSetDlgItemPath" => ["void", ["long", "long", "ptr"]],
"PathQualify" => ["long", ["ptr"]],
"PathStripToRoot" => ["long", ["ptr"]],
"PathResolve" => ["long", ["ptr", "ptr", "long"]],
"PathGetArgs" => ["ptr", ["ptr"]],
"DoEnvironmentSubst" => ["long", ["ptr", "ptr"]],
"DragAcceptFiles" => ["void", ["long", "long"]],
"PathQuoteSpaces" => ["ptr", ["ptr"]],
"PathQuoteSpaces" => ["void", ["ptr"]],
"PathUnquoteSpaces" => ["void", ["ptr"]],
"PathGetDriveNumber" => ["long", ["ptr"]],
"ParseField" => ["long", ["ptr", "long", "ptr", "long"]],
......@@ -204,6 +204,7 @@ my $module_declarations = {
"DoEnvironmentSubstW" => ["long", ["wstr", "wstr"]],
"DuplicateIcon" => ["long", ["long", "long"]],
"ExtractAssociatedIconA" => ["long", ["long", "str", "ptr"]],
"ExtractAssociatedIconExW" => ["long", ["long", "long", "long", "long"]],
"ExtractIconA" => ["long", ["long", "str", "long"]],
"ExtractIconEx" => ["long", ["ptr", "long", "ptr", "ptr", "long"]],
"ExtractIconExA" => ["long", ["str", "long", "ptr", "ptr", "long"]],
......
programs/winetest/include/shlwapi.pm
View file @ c1494edc
......@@ -49,6 +49,8 @@ my $module_declarations = {
"PathFindNextComponentW" => ["wstr", ["wstr"]],
"PathFindOnPathA" => ["long", ["str", "ptr"]],
"PathFindOnPathW" => ["long", ["wstr", "ptr"]],
"PathFindSuffixArrayA" => ["long", ["str", "ptr", "long"]],
"PathFindSuffixArrayW" => ["long", ["wstr", "ptr", "long"]],
"PathGetArgsA" => ["str", ["str"]],
"PathGetArgsW" => ["wstr", ["wstr"]],
"PathGetCharTypeA" => ["long", ["long"]],
......@@ -58,9 +60,15 @@ my $module_declarations = {
"PathIsContentTypeA" => ["long", ["str", "str"]],
"PathIsContentTypeW" => ["long", ["wstr", "wstr"]],
"PathIsDirectoryA" => ["long", ["str"]],
"PathIsDirectoryEmptyA" => ["long", ["str"]],
"PathIsDirectoryEmptyW" => ["long", ["wstr"]],
"PathIsDirectoryW" => ["long", ["wstr"]],
"PathIsFileSpecA" => ["long", ["str"]],
"PathIsFileSpecW" => ["long", ["wstr"]],
"PathIsLFNFileSpecA" => ["long", ["str"]],
"PathIsLFNFileSpecW" => ["long", ["wstr"]],
"PathIsNetworkPathA" => ["long", ["str"]],
"PathIsNetworkPathW" => ["long", ["wstr"]],
"PathIsPrefixA" => ["long", ["str", "str"]],
"PathIsPrefixW" => ["long", ["wstr", "wstr"]],
"PathIsRelativeA" => ["long", ["str"]],
......@@ -87,8 +95,8 @@ my $module_declarations = {
"PathMatchSpecW" => ["long", ["wstr", "wstr"]],
"PathParseIconLocationA" => ["long", ["str"]],
"PathParseIconLocationW" => ["long", ["wstr"]],
"PathQuoteSpacesA" => ["str", ["str"]],
"PathQuoteSpacesW" => ["wstr", ["wstr"]],
"PathQuoteSpacesA" => ["void", ["str"]],
"PathQuoteSpacesW" => ["void", ["wstr"]],
"PathRelativePathToA" => ["long", ["str", "str", "long", "str", "long"]],
"PathRelativePathToW" => ["long", ["wstr", "wstr", "long", "wstr", "long"]],
"PathRemoveArgsA" => ["void", ["str"]],
......@@ -105,14 +113,16 @@ my $module_declarations = {
"PathRenameExtensionW" => ["long", ["wstr", "wstr"]],
"PathSearchAndQualifyA" => ["long", ["str", "str", "long"]],
"PathSearchAndQualifyW" => ["long", ["wstr", "wstr", "long"]],
"PathSetDlgItemPathA" => ["long", ["long", "long", "str"]],
"PathSetDlgItemPathW" => ["long", ["long", "long", "wstr"]],
"PathSetDlgItemPathA" => ["void", ["long", "long", "str"]],
"PathSetDlgItemPathW" => ["void", ["long", "long", "wstr"]],
"PathSkipRootA" => ["str", ["str"]],
"PathSkipRootW" => ["wstr", ["wstr"]],
"PathStripPathA" => ["void", ["str"]],
"PathStripPathW" => ["void", ["wstr"]],
"PathStripToRootA" => ["long", ["str"]],
"PathStripToRootW" => ["long", ["wstr"]],
"PathUndecorateA" => ["void", ["str"]],
"PathUndecorateW" => ["void", ["wstr"]],
"PathUnmakeSystemFolderA" => ["long", ["str"]],
"PathUnmakeSystemFolderW" => ["long", ["wstr"]],
"PathUnquoteSpacesA" => ["void", ["str"]],
......@@ -131,6 +141,7 @@ my $module_declarations = {
"SHEnumValueA" => ["long", ["long", "long", "str", "ptr", "ptr", "ptr", "ptr"]],
"SHEnumValueW" => ["long", ["long", "long", "wstr", "ptr", "ptr", "ptr", "ptr"]],
"SHGetInverseCMAP" => ["long", ["ptr", "long"]],
"SHGetThreadRef" => ["long", ["ptr"]],
"SHGetValueA" => ["long", ["long", "str", "str", "ptr", "ptr", "ptr"]],
"SHGetValueW" => ["long", ["long", "wstr", "wstr", "ptr", "ptr", "ptr"]],
"SHIsLowMemoryMachine" => ["long", ["long"]],
......@@ -162,6 +173,7 @@ my $module_declarations = {
"SHRegSetPathW" => ["long", ["long", "wstr", "wstr", "wstr", "long"]],
"SHRegWriteUSValueA" => ["long", ["long", "str", "long", "ptr", "long", "long"]],
"SHRegWriteUSValueW" => ["long", ["long", "wstr", "long", "ptr", "long", "long"]],
"SHSetThreadRef" => ["long", ["ptr"]],
"SHSetValueA" => ["long", ["long", "str", "str", "long", "ptr", "long"]],
"SHSetValueW" => ["long", ["long", "wstr", "wstr", "long", "ptr", "long"]],
"StrCSpnA" => ["long", ["str", "str"]],
......
programs/winetest/include/urlmon.pm
View file @ c1494edc
......@@ -12,6 +12,7 @@ use vars qw(@ISA @EXPORT @EXPORT_OK);
@EXPORT_OK = qw();
my $module_declarations = {
"CoInternetGetSession" => ["long", ["long", "ptr", "long"]],
"CreateAsyncBindCtxEx" => ["long", ["ptr", "long", "ptr", "ptr", "ptr", "long"]],
"CreateURLMoniker" => ["long", ["ptr", "wstr", "ptr"]],
"DllCanUnloadNow" => ["long", []],
......@@ -20,6 +21,8 @@ my $module_declarations = {
"DllRegisterServer" => ["long", []],
"DllRegisterServerEx" => ["long", []],
"DllUnregisterServer" => ["long", []],
"Extract" => ["long", ["long", "long"]],
"ObtainUserAgentString" => ["long", ["long", "str", "ptr"]],
"RegisterBindStatusCallback" => ["long", ["ptr", "ptr", "ptr", "long"]],
"RevokeBindStatusCallback" => ["long", ["ptr", "ptr"]],
"UrlMkSetSessionOption" => ["long", ["long", "ptr", "long", "long"]]
......
programs/winetest/include/winearts_drv.pm 0 → 100644
View file @ c1494edc
package winearts_drv;
use strict;
require Exporter;
use wine;
use vars qw(@ISA @EXPORT @EXPORT_OK);
@ISA = qw(Exporter);
@EXPORT = qw();
@EXPORT_OK = qw();
my $module_declarations = {
"DriverProc" => ["long", ["long", "long", "long", "long", "long"]],
"wodMessage" => ["long", ["long", "long", "long", "long", "long"]]
};
&wine::declare("winearts.drv",%$module_declarations);
push @EXPORT, map { "&" . $_; } sort(keys(%$module_declarations));
1;
programs/winetest/include/wingdi.pm
View file @ c1494edc
......@@ -632,6 +632,7 @@ require Exporter;
GETTRACKKERNTABLE
GETVECTORBRUSHSIZE
GETVECTORPENSIZE
GGI_MARK_NONEXISTING_GLYPHS
GGO_BITMAP
GGO_GLYPH_INDEX
GGO_GRAY2_BITMAP
......@@ -642,6 +643,10 @@ require Exporter;
GM_ADVANCED
GM_COMPATIBLE
GM_LAST
GRADIENT_FILL_OP_FLAG
GRADIENT_FILL_RECT_H
GRADIENT_FILL_RECT_V
GRADIENT_FILL_TRIANGLE
GRAY_BRUSH
GREEK_CHARSET
HALFTONE
......@@ -845,7 +850,6 @@ require Exporter;
OUT_TT_ONLY_PRECIS
OUT_TT_PRECIS
PANOSE_COUNT
PANOSE_FAMILYTYPE_INDEX
PAN_ANY
PAN_ARMSTYLE_INDEX
PAN_BENT_ARMS_DOUBLE_SERIF
......@@ -863,6 +867,7 @@ require Exporter;
PAN_CONTRAST_VERY_HIGH
PAN_CONTRAST_VERY_LOW
PAN_CULTURE_LATIN
PAN_FAMILYTYPE_INDEX
PAN_FAMILY_DECORATIVE
PAN_FAMILY_PICTORIAL
PAN_FAMILY_SCRIPT
......@@ -1830,6 +1835,7 @@ use constant GETTECHNOLOGY => 20;
use constant GETTRACKKERNTABLE => 259;
use constant GETVECTORBRUSHSIZE => 27;
use constant GETVECTORPENSIZE => 26;
use constant GGI_MARK_NONEXISTING_GLYPHS => 1;
use constant GGO_BITMAP => 1;
use constant GGO_GLYPH_INDEX => 128;
use constant GGO_GRAY2_BITMAP => 4;
......@@ -1840,6 +1846,10 @@ use constant GGO_NATIVE => 2;
use constant GM_ADVANCED => 2;
use constant GM_COMPATIBLE => 1;
use constant GM_LAST => 2;
use constant GRADIENT_FILL_OP_FLAG => 255;
use constant GRADIENT_FILL_RECT_H => 0;
use constant GRADIENT_FILL_RECT_V => 1;
use constant GRADIENT_FILL_TRIANGLE => 2;
use constant GRAY_BRUSH => 2;
use constant GREEK_CHARSET => 161;
use constant HALFTONE => 4;
......@@ -2043,7 +2053,6 @@ use constant OUT_STROKE_PRECIS => 3;
use constant OUT_TT_ONLY_PRECIS => 7;
use constant OUT_TT_PRECIS => 4;
use constant PANOSE_COUNT => 10;
use constant PANOSE_FAMILYTYPE_INDEX => 0;
use constant PAN_ANY => 0;
use constant PAN_ARMSTYLE_INDEX => 6;
use constant PAN_BENT_ARMS_DOUBLE_SERIF => 11;
......@@ -2061,6 +2070,7 @@ use constant PAN_CONTRAST_NONE => 2;
use constant PAN_CONTRAST_VERY_HIGH => 9;
use constant PAN_CONTRAST_VERY_LOW => 3;
use constant PAN_CULTURE_LATIN => 0;
use constant PAN_FAMILYTYPE_INDEX => 0;
use constant PAN_FAMILY_DECORATIVE => 4;
use constant PAN_FAMILY_PICTORIAL => 5;
use constant PAN_FAMILY_SCRIPT => 3;
......
programs/winetest/include/wininet.pm
View file @ c1494edc
......@@ -44,6 +44,8 @@ my $module_declarations = {
"InternetQueryOptionA" => ["long", ["long", "long", "ptr", "ptr"]],
"InternetReadFile" => ["long", ["long", "ptr", "long", "ptr"]],
"InternetSetCookieA" => ["long", ["str", "str", "str"]],
"InternetSetOptionA" => ["long", ["long", "long", "ptr", "long"]],
"InternetSetOptionW" => ["long", ["long", "long", "ptr", "long"]],
"InternetSetStatusCallback" => ["ptr", ["long", "ptr"]],
"InternetWriteFile" => ["long", ["long", "ptr", "long", "ptr"]]
};
......
programs/winetest/include/winnt.pm
View file @ c1494edc
......@@ -23,6 +23,7 @@ require Exporter;
ACL_REVISION3
ACL_REVISION4
ANYSIZE_ARRAY
APPLICATION_ERROR_MASK
CONTAINER_INHERIT_ACE
CONTEXT86_CONTROL
CONTEXT86_DEBUG_REGISTERS
......@@ -63,6 +64,10 @@ require Exporter;
EPT_NT_CANT_PERFORM_OP
EPT_NT_INVALID_ENTRY
EPT_NT_NOT_REGISTERED
ERROR_SEVERITY_ERROR
ERROR_SEVERITY_INFORMATIONAL
ERROR_SEVERITY_SUCCESS
ERROR_SEVERITY_WARNING
ES_CONTINUOUS
ES_DISPLAY_REQUIRED
ES_SYSTEM_REQUIRED
......@@ -76,15 +81,8 @@ require Exporter;
EVENT_ALL_ACCESS
EVENT_MODIFY_STATE
EXCEPTION_CONTINUABLE
EXCEPTION_CONTINUE_EXECUTION
EXCEPTION_CONTINUE_SEARCH
EXCEPTION_EXECUTE_HANDLER
EXCEPTION_MAXIMUM_PARAMETERS
EXCEPTION_NONCONTINUABLE
ExceptionCollidedUnwind
ExceptionContinueExecution
ExceptionContinueSearch
ExceptionNestedException
FAILED_ACCESS_ACE_FLAG
FALSE
FILE_128_BYTE_ALIGNMENT
......@@ -215,6 +213,7 @@ require Exporter;
IMAGE_DOS_SIGNATURE
IMAGE_FILE_16BIT_MACHINE
IMAGE_FILE_32BIT_MACHINE
IMAGE_FILE_AGGRESIVE_WS_TRIM
IMAGE_FILE_BASE_RELOCATION_TABLE
IMAGE_FILE_BYTES_REVERSED_HI
IMAGE_FILE_BYTES_REVERSED_LO
......@@ -227,6 +226,7 @@ require Exporter;
IMAGE_FILE_EXECUTABLE_IMAGE
IMAGE_FILE_EXPORT_DIRECTORY
IMAGE_FILE_IMPORT_DIRECTORY
IMAGE_FILE_LARGE_ADDRESS_AWARE
IMAGE_FILE_LINE_NUMS_STRIPPED
IMAGE_FILE_LOCAL_SYMS_STRIPPED
IMAGE_FILE_MACHINE_ALPHA
......@@ -239,10 +239,12 @@ require Exporter;
IMAGE_FILE_MACHINE_UNKNOWN
IMAGE_FILE_MACHINE_VALUE
IMAGE_FILE_RELOCS_STRIPPED
IMAGE_FILE_REMOVABLE_RUN_FROM_SWAP
IMAGE_FILE_RESOURCE_DIRECTORY
IMAGE_FILE_SECURITY_DIRECTORY
IMAGE_FILE_SYSTEM
IMAGE_FILE_THREAD_LOCAL_STORAGE
IMAGE_FILE_UP_SYSTEM_ONLY
IMAGE_NT_OPTIONAL_HDR_MAGIC
IMAGE_NT_SIGNATURE
IMAGE_NUMBEROF_DIRECTORY_ENTRIES
......@@ -606,6 +608,7 @@ require Exporter;
MAXCHAR
MAXDWORD
MAXIMUM_ALLOWED
MAXIMUM_PROCESSORS
MAXIMUM_SUPPORTED_EXTENSION
MAXIMUM_SUSPEND_COUNT
MAXIMUM_WAIT_OBJECTS
......@@ -1664,6 +1667,7 @@ use constant ACL_REVISION2 => 2;
use constant ACL_REVISION3 => 3;
use constant ACL_REVISION4 => 4;
use constant ANYSIZE_ARRAY => 1;
use constant APPLICATION_ERROR_MASK => 536870912;
use constant CONTAINER_INHERIT_ACE => 2;
use constant CONTEXT86_CONTROL => 65537;
use constant CONTEXT86_DEBUG_REGISTERS => 65552;
......@@ -1704,6 +1708,10 @@ use constant EPT_NT_CANT_CREATE => -1073610676;
use constant EPT_NT_CANT_PERFORM_OP => -1073610699;
use constant EPT_NT_INVALID_ENTRY => -1073610700;
use constant EPT_NT_NOT_REGISTERED => -1073610698;
use constant ERROR_SEVERITY_ERROR => -1073741824;
use constant ERROR_SEVERITY_INFORMATIONAL => 1073741824;
use constant ERROR_SEVERITY_SUCCESS => 0;
use constant ERROR_SEVERITY_WARNING => -2147483648;
use constant ES_CONTINUOUS => -2147483648;
use constant ES_DISPLAY_REQUIRED => 2;
use constant ES_SYSTEM_REQUIRED => 1;
......@@ -1717,15 +1725,8 @@ use constant EVENTLOG_WARNING_TYPE => 2;
use constant EVENT_ALL_ACCESS => 2031619;
use constant EVENT_MODIFY_STATE => 2;
use constant EXCEPTION_CONTINUABLE => 0;
use constant EXCEPTION_CONTINUE_EXECUTION => -1;
use constant EXCEPTION_CONTINUE_SEARCH => 0;
use constant EXCEPTION_EXECUTE_HANDLER => 1;
use constant EXCEPTION_MAXIMUM_PARAMETERS => 15;
use constant EXCEPTION_NONCONTINUABLE => 1;
use constant ExceptionCollidedUnwind => 3;
use constant ExceptionContinueExecution => 0;
use constant ExceptionContinueSearch => 1;
use constant ExceptionNestedException => 2;
use constant FAILED_ACCESS_ACE_FLAG => 128;
use constant FALSE => 0;
use constant FILE_128_BYTE_ALIGNMENT => 127;
......@@ -1813,11 +1814,11 @@ use constant HEAP_REALLOC_IN_PLACE_ONLY => 16;
use constant HEAP_SHARED => 67108864;
use constant HEAP_TAIL_CHECKING_ENABLED => 32;
use constant HEAP_ZERO_MEMORY => 8;
use constant IMAGE_ARCHIVE_END => 134640134;
use constant IMAGE_ARCHIVE_LINKER_MEMBER => 134640199;
use constant IMAGE_ARCHIVE_LONGNAMES_MEMBER => 134640273;
use constant IMAGE_ARCHIVE_PAD => 134574128;
use constant IMAGE_ARCHIVE_START => 134640423;
use constant IMAGE_ARCHIVE_END => 134640838;
use constant IMAGE_ARCHIVE_LINKER_MEMBER => 134640903;
use constant IMAGE_ARCHIVE_LONGNAMES_MEMBER => 134640977;
use constant IMAGE_ARCHIVE_PAD => 134574800;
use constant IMAGE_ARCHIVE_START => 134641127;
use constant IMAGE_ARCHIVE_START_SIZE => 8;
use constant IMAGE_COMDAT_SELECT_ANY => 2;
use constant IMAGE_COMDAT_SELECT_ASSOCIATIVE => 5;
......@@ -1856,6 +1857,7 @@ use constant IMAGE_DIRECTORY_ENTRY_TLS => 9;
use constant IMAGE_DOS_SIGNATURE => 23117;
use constant IMAGE_FILE_16BIT_MACHINE => 64;
use constant IMAGE_FILE_32BIT_MACHINE => 256;
use constant IMAGE_FILE_AGGRESIVE_WS_TRIM => 16;
use constant IMAGE_FILE_BASE_RELOCATION_TABLE => 5;
use constant IMAGE_FILE_BYTES_REVERSED_HI => 32768;
use constant IMAGE_FILE_BYTES_REVERSED_LO => 128;
......@@ -1868,6 +1870,7 @@ use constant IMAGE_FILE_EXCEPTION_DIRECTORY => 3;
use constant IMAGE_FILE_EXECUTABLE_IMAGE => 2;
use constant IMAGE_FILE_EXPORT_DIRECTORY => 0;
use constant IMAGE_FILE_IMPORT_DIRECTORY => 1;
use constant IMAGE_FILE_LARGE_ADDRESS_AWARE => 32;
use constant IMAGE_FILE_LINE_NUMS_STRIPPED => 4;
use constant IMAGE_FILE_LOCAL_SYMS_STRIPPED => 8;
use constant IMAGE_FILE_MACHINE_ALPHA => 388;
......@@ -1880,10 +1883,12 @@ use constant IMAGE_FILE_MACHINE_R4000 => 358;
use constant IMAGE_FILE_MACHINE_UNKNOWN => 0;
use constant IMAGE_FILE_MACHINE_VALUE => 8;
use constant IMAGE_FILE_RELOCS_STRIPPED => 1;
use constant IMAGE_FILE_REMOVABLE_RUN_FROM_SWAP => 1024;
use constant IMAGE_FILE_RESOURCE_DIRECTORY => 2;
use constant IMAGE_FILE_SECURITY_DIRECTORY => 4;
use constant IMAGE_FILE_SYSTEM => 4096;
use constant IMAGE_FILE_THREAD_LOCAL_STORAGE => 9;
use constant IMAGE_FILE_UP_SYSTEM_ONLY => 16384;
use constant IMAGE_NT_OPTIONAL_HDR_MAGIC => 267;
use constant IMAGE_NT_SIGNATURE => 17744;
use constant IMAGE_NUMBEROF_DIRECTORY_ENTRIES => 16;
......@@ -2247,6 +2252,7 @@ use constant MAXBYTE => 255;
use constant MAXCHAR => 127;
use constant MAXDWORD => -1;
use constant MAXIMUM_ALLOWED => 33554432;
use constant MAXIMUM_PROCESSORS => 32;
use constant MAXIMUM_SUPPORTED_EXTENSION => 512;
use constant MAXIMUM_SUSPEND_COUNT => 127;
use constant MAXIMUM_WAIT_OBJECTS => 64;
......
programs/winetest/include/winspool_drv.pm
View file @ c1494edc
......@@ -42,6 +42,8 @@ my $module_declarations = {
"EnumPrinterDriversW" => ["long", ["wstr", "wstr", "long", "ptr", "long", "ptr", "ptr"]],
"EnumPrintersA" => ["long", ["long", "str", "long", "ptr", "long", "ptr", "ptr"]],
"EnumPrintersW" => ["long", ["long", "wstr", "long", "ptr", "long", "ptr", "ptr"]],
"GetDefaultPrinterA" => ["long", ["str", "ptr"]],
"GetDefaultPrinterW" => ["long", ["wstr", "ptr"]],
"GetFormA" => ["long", ["long", "str", "long", "ptr", "long", "ptr"]],
"GetFormW" => ["long", ["long", "wstr", "long", "ptr", "long", "ptr"]],
"GetPrinterA" => ["long", ["long", "long", "ptr", "long", "ptr"]],
......
programs/winetest/include/winuser.pm
View file @ c1494edc
......@@ -317,6 +317,7 @@ require Exporter;
DFCS_CAPTIONRESTORE
DFCS_CHECKED
DFCS_FLAT
DFCS_HOT
DFCS_INACTIVE
DFCS_MENUARROW
DFCS_MENUARROWRIGHT
......@@ -331,6 +332,7 @@ require Exporter;
DFCS_SCROLLSIZEGRIP
DFCS_SCROLLSIZEGRIPRIGHT
DFCS_SCROLLUP
DFCS_TRANSPARENT
DFC_BUTTON
DFC_CAPTION
DFC_MENU
......@@ -1495,6 +1497,7 @@ require Exporter;
SWP_NOZORDER
SWP_SHOWWINDOW
SW_ERASE
SW_FORCEMINIMIZE
SW_HIDE
SW_INVALIDATE
SW_MAX
......@@ -2316,6 +2319,7 @@ use constant DFCS_CAPTIONMIN => 1;
use constant DFCS_CAPTIONRESTORE => 3;
use constant DFCS_CHECKED => 1024;
use constant DFCS_FLAT => 16384;
use constant DFCS_HOT => 4096;
use constant DFCS_INACTIVE => 256;
use constant DFCS_MENUARROW => 0;
use constant DFCS_MENUARROWRIGHT => 4;
......@@ -2330,6 +2334,7 @@ use constant DFCS_SCROLLRIGHT => 3;
use constant DFCS_SCROLLSIZEGRIP => 8;
use constant DFCS_SCROLLSIZEGRIPRIGHT => 16;
use constant DFCS_SCROLLUP => 0;
use constant DFCS_TRANSPARENT => 2048;
use constant DFC_BUTTON => 4;
use constant DFC_CAPTION => 1;
use constant DFC_MENU => 2;
......@@ -3494,9 +3499,10 @@ use constant SWP_NOSIZE => 1;
use constant SWP_NOZORDER => 4;
use constant SWP_SHOWWINDOW => 64;
use constant SW_ERASE => 4;
use constant SW_FORCEMINIMIZE => 11;
use constant SW_HIDE => 0;
use constant SW_INVALIDATE => 2;
use constant SW_MAX => 10;
use constant SW_MAX => 11;
use constant SW_MAXIMIZE => 3;
use constant SW_MINIMIZE => 6;
use constant SW_NORMAL => 1;
......
programs/winetest/include/ws2_32.pm
View file @ c1494edc
......@@ -38,9 +38,13 @@ my $module_declarations = {
"WSApSetPostRoutine" => ["long", ["ptr"]],
"WSAAccept" => ["long", ["long", "ptr", "ptr", "ptr", "long"]],
"WSACloseEvent" => ["long", ["long"]],
"WSAConnect" => ["long", ["long", "ptr", "long", "ptr", "ptr", "undef", "undef"]],
"WSACreateEvent" => ["long", []],
"WSAEnumNetworkEvents" => ["long", ["long", "long", "ptr"]],
"WSAEnumProtocolsA" => ["long", ["ptr", "ptr", "ptr"]],
"WSAEnumProtocolsW" => ["long", ["ptr", "ptr", "ptr"]],
"WSAEventSelect" => ["long", ["long", "long", "long"]],
"WSAGetOverlappedResult" => ["long", ["long", "ptr", "ptr", "long", "ptr"]],
"gethostbyaddr" => ["ptr", ["ptr", "long", "long"]],
"gethostbyname" => ["ptr", ["ptr"]],
"getprotobyname" => ["ptr", ["ptr"]],
......@@ -48,8 +52,10 @@ my $module_declarations = {
"getservbyname" => ["ptr", ["ptr", "ptr"]],
"getservbyport" => ["ptr", ["long", "ptr"]],
"gethostname" => ["long", ["ptr", "long"]],
"WSARecv" => ["long", ["long", "ptr", "long", "ptr", "ptr", "ptr", "ptr"]],
"WSARecvFrom" => ["long", ["long", "ptr", "long", "ptr", "ptr", "ptr", "ptr", "ptr", "ptr"]],
"WSASend" => ["long", ["long", "ptr", "long", "ptr", "long", "ptr", "ptr"]],
"WSASendTo" => ["long", ["long", "ptr", "long", "ptr", "long", "ptr", "long", "ptr", "ptr"]],
"WSASocketA" => ["long", ["long", "long", "long", "ptr", "long", "long"]],
"WSCDeinstallProvider" => ["long", ["ptr", "ptr"]],
"WSCInstallProvider" => ["long", ["ptr", "wstr", "ptr", "long", "ptr"]],
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment