Sweden-Number/programs/winetest/include/mpr.pm

88 lines
4.6 KiB
Perl

package mpr;
use strict;
require Exporter;
use wine;
use vars qw(@ISA @EXPORT @EXPORT_OK);
@ISA = qw(Exporter);
@EXPORT = qw();
@EXPORT_OK = qw();
my $module_declarations = {
"MultinetGetConnectionPerformanceA" => ["long", ["ptr", "ptr"]],
"MultinetGetConnectionPerformanceW" => ["long", ["ptr", "ptr"]],
"MultinetGetErrorTextA" => ["long", ["long", "long", "long"]],
"MultinetGetErrorTextW" => ["long", ["long", "long", "long"]],
"NPSAuthenticationDialogA" => ["long", ["ptr"]],
"NPSCopyStringA" => ["long", ["str", "ptr", "ptr"]],
"NPSDeviceGetNumberA" => ["long", ["str", "ptr", "ptr"]],
"NPSDeviceGetStringA" => ["long", ["long", "long", "str", "ptr"]],
"NPSGetProviderHandleA" => ["long", ["ptr"]],
"NPSGetProviderNameA" => ["long", ["long", "ptr"]],
"NPSGetSectionNameA" => ["long", ["long", "ptr"]],
"NPSNotifyGetContextA" => ["ptr", ["ptr"]],
"NPSNotifyRegisterA" => ["long", ["long", "ptr"]],
"NPSSetCustomTextA" => ["void", ["str"]],
"NPSSetExtendedErrorA" => ["long", ["long", "str"]],
"WNetAddConnection2A" => ["long", ["ptr", "str", "str", "long"]],
"WNetAddConnection2W" => ["long", ["ptr", "wstr", "wstr", "long"]],
"WNetAddConnection3A" => ["long", ["long", "ptr", "str", "str", "long"]],
"WNetAddConnection3W" => ["long", ["long", "ptr", "wstr", "wstr", "long"]],
"WNetAddConnectionA" => ["long", ["str", "str", "str"]],
"WNetAddConnectionW" => ["long", ["wstr", "wstr", "wstr"]],
"WNetCachePassword" => ["long", ["str", "long", "str", "long", "long", "long"]],
"WNetCancelConnection2A" => ["long", ["str", "long", "long"]],
"WNetCancelConnection2W" => ["long", ["wstr", "long", "long"]],
"WNetCancelConnectionA" => ["long", ["str", "long"]],
"WNetCancelConnectionW" => ["long", ["wstr", "long"]],
"WNetCloseEnum" => ["long", ["long"]],
"WNetConnectionDialog" => ["long", ["long", "long"]],
"WNetConnectionDialog1A" => ["long", ["ptr"]],
"WNetConnectionDialog1W" => ["long", ["ptr"]],
"WNetDisconnectDialog" => ["long", ["long", "long"]],
"WNetDisconnectDialog1A" => ["long", ["ptr"]],
"WNetDisconnectDialog1W" => ["long", ["ptr"]],
"WNetEnumCachedPasswords" => ["long", ["str", "long", "long", "ptr", "long"]],
"WNetEnumResourceA" => ["long", ["long", "ptr", "ptr", "ptr"]],
"WNetEnumResourceW" => ["long", ["long", "ptr", "ptr", "ptr"]],
"WNetGetCachedPassword" => ["long", ["str", "long", "str", "ptr", "long"]],
"WNetGetConnectionA" => ["long", ["str", "str", "ptr"]],
"WNetGetConnectionW" => ["long", ["wstr", "wstr", "ptr"]],
"WNetGetLastErrorA" => ["long", ["ptr", "str", "long", "str", "long"]],
"WNetGetLastErrorW" => ["long", ["ptr", "wstr", "long", "wstr", "long"]],
"WNetGetNetworkInformationA" => ["long", ["str", "ptr"]],
"WNetGetNetworkInformationW" => ["long", ["wstr", "ptr"]],
"WNetGetProviderNameA" => ["long", ["long", "str", "ptr"]],
"WNetGetProviderNameW" => ["long", ["long", "wstr", "ptr"]],
"WNetGetResourceInformationA" => ["long", ["ptr", "ptr", "ptr", "ptr"]],
"WNetGetResourceInformationW" => ["long", ["ptr", "ptr", "ptr", "ptr"]],
"WNetGetResourceParentA" => ["long", ["ptr", "ptr", "ptr"]],
"WNetGetResourceParentW" => ["long", ["ptr", "ptr", "ptr"]],
"WNetGetUniversalNameA" => ["long", ["str", "long", "ptr", "ptr"]],
"WNetGetUniversalNameW" => ["long", ["wstr", "long", "ptr", "ptr"]],
"WNetGetUserA" => ["long", ["str", "str", "ptr"]],
"WNetGetUserW" => ["long", ["wstr", "wstr", "ptr"]],
"WNetLogoffA" => ["long", ["str", "long"]],
"WNetLogoffW" => ["long", ["wstr", "long"]],
"WNetLogonA" => ["long", ["str", "long"]],
"WNetLogonW" => ["long", ["wstr", "long"]],
"WNetOpenEnumA" => ["long", ["long", "long", "long", "ptr", "ptr"]],
"WNetOpenEnumW" => ["long", ["long", "long", "long", "ptr", "ptr"]],
"WNetRemoveCachedPassword" => ["long", ["str", "long", "long"]],
"WNetRestoreConnectionA" => ["long", ["long", "str"]],
"WNetRestoreConnectionW" => ["long", ["long", "wstr"]],
"WNetSetConnectionA" => ["long", ["str", "long", "ptr"]],
"WNetSetConnectionW" => ["long", ["wstr", "long", "ptr"]],
"WNetUseConnectionA" => ["long", ["long", "ptr", "str", "str", "long", "str", "ptr", "ptr"]],
"WNetUseConnectionW" => ["long", ["long", "ptr", "wstr", "wstr", "long", "wstr", "ptr", "ptr"]],
"WNetVerifyPasswordA" => ["long", ["str", "ptr"]],
"WNetVerifyPasswordW" => ["long", ["wstr", "ptr"]]
};
&wine::declare("mpr",%$module_declarations);
push @EXPORT, map { "&" . $_; } sort(keys(%$module_declarations));
1;