Skip to content

W
wine-cw
Commit f1d80a39 authored by Patrik Stridvall's avatar Patrik Stridvall Committed by Alexandre Julliard
Browse files
Options

- Made the Perl module generated by make_symbols a real exporting

module. - Use constants instead of variables.
parent 04c160e5
Expand all Hide whitespace changes
Inline Side-by-side
Showing with 509 additions and 203 deletions
programs/winetest/include/wincon.pm
View file @ f1d80a39
......@@ -3,47 +3,107 @@
# Perl definitions for header file wincon.h
#
$BACKGROUND_BLUE = 16;
$BACKGROUND_GREEN = 32;
$BACKGROUND_INTENSITY = 128;
$BACKGROUND_RED = 64;
$CAPSLOCK_ON = 128;
$CONSOLE_TEXTMODE_BUFFER = 1;
$CTRL_BREAK_EVENT = 1;
$CTRL_CLOSE_EVENT = 2;
$CTRL_C_EVENT = 0;
$CTRL_LOGOFF_EVENT = 5;
$CTRL_SHUTDOWN_EVENT = 6;
$DOUBLE_CLICK = 2;
$ENABLE_ECHO_INPUT = 4;
$ENABLE_LINE_INPUT = 2;
$ENABLE_MOUSE_INPUT = 16;
$ENABLE_PROCESSED_INPUT = 1;
$ENABLE_PROCESSED_OUTPUT = 1;
$ENABLE_WINDOW_INPUT = 8;
$ENABLE_WRAP_AT_EOL_OUTPUT = 2;
$ENHANCED_KEY = 256;
$FOCUS_EVENT = 16;
$FOREGROUND_BLUE = 1;
$FOREGROUND_GREEN = 2;
$FOREGROUND_INTENSITY = 8;
$FOREGROUND_RED = 4;
$FROM_LEFT_1ST_BUTTON_PRESSED = 1;
$FROM_LEFT_2ND_BUTTON_PRESSED = 4;
$FROM_LEFT_3RD_BUTTON_PRESSED = 8;
$FROM_LEFT_4TH_BUTTON_PRESSED = 16;
$KEY_EVENT = 1;
$LEFT_ALT_PRESSED = 2;
$LEFT_CTRL_PRESSED = 8;
$MENU_EVENT = 8;
$MOUSE_EVENT = 2;
$MOUSE_MOVED = 1;
$MOUSE_WHEELED = 4;
$NUMLOCK_ON = 32;
$RIGHTMOST_BUTTON_PRESSED = 2;
$RIGHT_ALT_PRESSED = 1;
$RIGHT_CTRL_PRESSED = 4;
$SCROLLLOCK_ON = 64;
$SHIFT_PRESSED = 16;
$WINDOW_BUFFER_SIZE_EVENT = 4;
$WINE_ENABLE_LINE_INPUT_EMACS = 128;
package wincon;
use strict;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
require Exporter;
@ISA = qw(Exporter);
@EXPORT = qw(
BACKGROUND_BLUE
BACKGROUND_GREEN
BACKGROUND_INTENSITY
BACKGROUND_RED
CAPSLOCK_ON
CONSOLE_TEXTMODE_BUFFER
CTRL_BREAK_EVENT
CTRL_CLOSE_EVENT
CTRL_C_EVENT
CTRL_LOGOFF_EVENT
CTRL_SHUTDOWN_EVENT
DOUBLE_CLICK
ENABLE_ECHO_INPUT
ENABLE_LINE_INPUT
ENABLE_MOUSE_INPUT
ENABLE_PROCESSED_INPUT
ENABLE_PROCESSED_OUTPUT
ENABLE_WINDOW_INPUT
ENABLE_WRAP_AT_EOL_OUTPUT
ENHANCED_KEY
FOCUS_EVENT
FOREGROUND_BLUE
FOREGROUND_GREEN
FOREGROUND_INTENSITY
FOREGROUND_RED
FROM_LEFT_1ST_BUTTON_PRESSED
FROM_LEFT_2ND_BUTTON_PRESSED
FROM_LEFT_3RD_BUTTON_PRESSED
FROM_LEFT_4TH_BUTTON_PRESSED
KEY_EVENT
LEFT_ALT_PRESSED
LEFT_CTRL_PRESSED
MENU_EVENT
MOUSE_EVENT
MOUSE_MOVED
MOUSE_WHEELED
NUMLOCK_ON
RIGHTMOST_BUTTON_PRESSED
RIGHT_ALT_PRESSED
RIGHT_CTRL_PRESSED
SCROLLLOCK_ON
SHIFT_PRESSED
WINDOW_BUFFER_SIZE_EVENT
WINE_ENABLE_LINE_INPUT_EMACS
);
@EXPORT_OK = qw();
use constant BACKGROUND_BLUE => 16;
use constant BACKGROUND_GREEN => 32;
use constant BACKGROUND_INTENSITY => 128;
use constant BACKGROUND_RED => 64;
use constant CAPSLOCK_ON => 128;
use constant CONSOLE_TEXTMODE_BUFFER => 1;
use constant CTRL_BREAK_EVENT => 1;
use constant CTRL_CLOSE_EVENT => 2;
use constant CTRL_C_EVENT => 0;
use constant CTRL_LOGOFF_EVENT => 5;
use constant CTRL_SHUTDOWN_EVENT => 6;
use constant DOUBLE_CLICK => 2;
use constant ENABLE_ECHO_INPUT => 4;
use constant ENABLE_LINE_INPUT => 2;
use constant ENABLE_MOUSE_INPUT => 16;
use constant ENABLE_PROCESSED_INPUT => 1;
use constant ENABLE_PROCESSED_OUTPUT => 1;
use constant ENABLE_WINDOW_INPUT => 8;
use constant ENABLE_WRAP_AT_EOL_OUTPUT => 2;
use constant ENHANCED_KEY => 256;
use constant FOCUS_EVENT => 16;
use constant FOREGROUND_BLUE => 1;
use constant FOREGROUND_GREEN => 2;
use constant FOREGROUND_INTENSITY => 8;
use constant FOREGROUND_RED => 4;
use constant FROM_LEFT_1ST_BUTTON_PRESSED => 1;
use constant FROM_LEFT_2ND_BUTTON_PRESSED => 4;
use constant FROM_LEFT_3RD_BUTTON_PRESSED => 8;
use constant FROM_LEFT_4TH_BUTTON_PRESSED => 16;
use constant KEY_EVENT => 1;
use constant LEFT_ALT_PRESSED => 2;
use constant LEFT_CTRL_PRESSED => 8;
use constant MENU_EVENT => 8;
use constant MOUSE_EVENT => 2;
use constant MOUSE_MOVED => 1;
use constant MOUSE_WHEELED => 4;
use constant NUMLOCK_ON => 32;
use constant RIGHTMOST_BUTTON_PRESSED => 2;
use constant RIGHT_ALT_PRESSED => 1;
use constant RIGHT_CTRL_PRESSED => 4;
use constant SCROLLLOCK_ON => 64;
use constant SHIFT_PRESSED => 16;
use constant WINDOW_BUFFER_SIZE_EVENT => 4;
use constant WINE_ENABLE_LINE_INPUT_EMACS => 128;
1;
programs/winetest/include/windef.pm
View file @ f1d80a39
......@@ -3,11 +3,35 @@
# Perl definitions for header file windef.h
#
$HFILE_ERROR = -1;
$MAX_PATH = 260;
$WINVER = 1280;
$_MAX_DIR = 256;
$_MAX_DRIVE = 3;
$_MAX_EXT = 256;
$_MAX_FNAME = 256;
$_MAX_PATH = 260;
package windef;
use strict;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
require Exporter;
@ISA = qw(Exporter);
@EXPORT = qw(
HFILE_ERROR
MAX_PATH
WINVER
_MAX_DIR
_MAX_DRIVE
_MAX_EXT
_MAX_FNAME
_MAX_PATH
);
@EXPORT_OK = qw();
use constant HFILE_ERROR => -1;
use constant MAX_PATH => 260;
use constant WINVER => 1280;
use constant _MAX_DIR => 256;
use constant _MAX_DRIVE => 3;
use constant _MAX_EXT => 256;
use constant _MAX_FNAME => 256;
use constant _MAX_PATH => 260;
1;
programs/winetest/include/winerror.pm
View file @ f1d80a39
This source diff could not be displayed because it is too large. You can view the blob instead.
programs/winetest/include/winnt.pm
View file @ f1d80a39
This source diff could not be displayed because it is too large. You can view the blob instead.
programs/winetest/include/winreg.pm
View file @ f1d80a39
......@@ -3,10 +3,33 @@
# Perl definitions for header file winreg.h
#
$HKEY_CLASSES_ROOT = -2147483648;
$HKEY_CURRENT_CONFIG = -2147483643;
$HKEY_CURRENT_USER = -2147483647;
$HKEY_DYN_DATA = -2147483642;
$HKEY_LOCAL_MACHINE = -2147483646;
$HKEY_PERFORMANCE_DATA = -2147483644;
$HKEY_USERS = -2147483645;
package winreg;
use strict;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
require Exporter;
@ISA = qw(Exporter);
@EXPORT = qw(
HKEY_CLASSES_ROOT
HKEY_CURRENT_CONFIG
HKEY_CURRENT_USER
HKEY_DYN_DATA
HKEY_LOCAL_MACHINE
HKEY_PERFORMANCE_DATA
HKEY_USERS
);
@EXPORT_OK = qw();
use constant HKEY_CLASSES_ROOT => -2147483648;
use constant HKEY_CURRENT_CONFIG => -2147483643;
use constant HKEY_CURRENT_USER => -2147483647;
use constant HKEY_DYN_DATA => -2147483642;
use constant HKEY_LOCAL_MACHINE => -2147483646;
use constant HKEY_PERFORMANCE_DATA => -2147483644;
use constant HKEY_USERS => -2147483645;
1;
programs/winetest/include/winsock2.pm
View file @ f1d80a39
......@@ -3,72 +3,157 @@
# Perl definitions for header file winsock2.h
#
$BASE_PROTOCOL = 1;
$CF_ACCEPT = 0;
$CF_DEFER = 2;
$CF_REJECT = 1;
$FD_ACCEPT_BIT = 3;
$FD_CLOSE_BIT = 5;
$FD_CONNECT_BIT = 4;
$FD_MAX_EVENTS = 10;
$FD_OOB_BIT = 2;
$FD_READ_BIT = 0;
$FD_WRITE_BIT = 1;
$INCL_WINSOCK_API_PROTOTYPES = 1;
$INCL_WINSOCK_API_TYPEDEFS = 0;
$IOC_PROTOCOL = 268435456;
$IOC_UNIX = 0;
$IOC_VENDOR = 402653184;
$IOC_WS2 = 134217728;
$LAYERED_PROTOCOL = 0;
$MAX_PROTOCOL_CHAIN = 7;
$PVD_CONFIG = 12289;
$SD_BOTH = 2;
$SD_RECEIVE = 0;
$SD_SEND = 1;
$SG_CONSTRAINED_GROUP = 2;
$SG_UNCONSTRAINED_GROUP = 1;
$SIO_ADDRESS_LIST_CHANGE = 671088663;
$SIO_ADDRESS_LIST_QUERY = 1207959574;
$SIO_ASSOCIATE_HANDLE = -2013265919;
$SIO_ENABLE_CIRCULAR_QUEUEING = 671088642;
$SIO_FIND_ROUTE = 1207959555;
$SIO_FLUSH = 671088644;
$SIO_GET_BROADCAST_ADDRESS = 1207959557;
$SIO_GET_EXTENSION_FUNCTION_POINTER = -939524090;
$SIO_GET_GROUP_QOS = -939524088;
$SIO_GET_INTERFACE_LIST = 1074033791;
$SIO_GET_QOS = -939524089;
$SIO_MULTICAST_SCOPE = -2013265910;
$SIO_MULTIPOINT_LOOPBACK = -2013265911;
$SIO_QUERY_TARGET_PNP_HANDLE = 1207959576;
$SIO_ROUTING_INTERFACE_CHANGE = -2013265899;
$SIO_ROUTING_INTERFACE_QUERY = -939524076;
$SIO_SET_GROUP_QOS = -2013265908;
$SIO_SET_QOS = -2013265909;
$SIO_TRANSLATE_HANDLE = -939524083;
$SO_CONDITIONAL_ACCEPT = 12290;
$SO_GROUP_ID = 8193;
$SO_GROUP_PRIORITY = 8194;
$SO_MAX_MSG_SIZE = 8195;
$SO_PROTOCOL_INFOA = 8196;
$SO_PROTOCOL_INFOW = 8197;
$WSAPROTOCOL_LEN = 255;
$WSA_FLAG_MULTIPOINT_C_LEAF = 4;
$WSA_FLAG_MULTIPOINT_C_ROOT = 2;
$WSA_FLAG_MULTIPOINT_D_LEAF = 16;
$WSA_FLAG_MULTIPOINT_D_ROOT = 8;
$WSA_FLAG_OVERLAPPED = 1;
$WSA_INFINITE = -1;
$WSA_INVALID_EVENT = 0;
$WSA_INVALID_HANDLE = 6;
$WSA_INVALID_PARAMETER = 87;
$WSA_IO_INCOMPLETE = 996;
$WSA_IO_PENDING = 997;
$WSA_MAXIMUM_WAIT_EVENTS = 64;
$WSA_NOT_ENOUGH_MEMORY = 8;
$WSA_OPERATION_ABORTED = 995;
$WSA_WAIT_EVENT_0 = 0;
$WSA_WAIT_FAILED = -1;
$WSA_WAIT_IO_COMPLETION = 192;
$WSA_WAIT_TIMEOUT = 258;
package winsock2;
use strict;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
require Exporter;
@ISA = qw(Exporter);
@EXPORT = qw(
BASE_PROTOCOL
CF_ACCEPT
CF_DEFER
CF_REJECT
FD_ACCEPT_BIT
FD_CLOSE_BIT
FD_CONNECT_BIT
FD_MAX_EVENTS
FD_OOB_BIT
FD_READ_BIT
FD_WRITE_BIT
INCL_WINSOCK_API_PROTOTYPES
INCL_WINSOCK_API_TYPEDEFS
IOC_PROTOCOL
IOC_UNIX
IOC_VENDOR
IOC_WS2
LAYERED_PROTOCOL
MAX_PROTOCOL_CHAIN
PVD_CONFIG
SD_BOTH
SD_RECEIVE
SD_SEND
SG_CONSTRAINED_GROUP
SG_UNCONSTRAINED_GROUP
SIO_ADDRESS_LIST_CHANGE
SIO_ADDRESS_LIST_QUERY
SIO_ASSOCIATE_HANDLE
SIO_ENABLE_CIRCULAR_QUEUEING
SIO_FIND_ROUTE
SIO_FLUSH
SIO_GET_BROADCAST_ADDRESS
SIO_GET_EXTENSION_FUNCTION_POINTER
SIO_GET_GROUP_QOS
SIO_GET_INTERFACE_LIST
SIO_GET_QOS
SIO_MULTICAST_SCOPE
SIO_MULTIPOINT_LOOPBACK
SIO_QUERY_TARGET_PNP_HANDLE
SIO_ROUTING_INTERFACE_CHANGE
SIO_ROUTING_INTERFACE_QUERY
SIO_SET_GROUP_QOS
SIO_SET_QOS
SIO_TRANSLATE_HANDLE
SO_CONDITIONAL_ACCEPT
SO_GROUP_ID
SO_GROUP_PRIORITY
SO_MAX_MSG_SIZE
SO_PROTOCOL_INFOA
SO_PROTOCOL_INFOW
WSAPROTOCOL_LEN
WSA_FLAG_MULTIPOINT_C_LEAF
WSA_FLAG_MULTIPOINT_C_ROOT
WSA_FLAG_MULTIPOINT_D_LEAF
WSA_FLAG_MULTIPOINT_D_ROOT
WSA_FLAG_OVERLAPPED
WSA_INFINITE
WSA_INVALID_EVENT
WSA_INVALID_HANDLE
WSA_INVALID_PARAMETER
WSA_IO_INCOMPLETE
WSA_IO_PENDING
WSA_MAXIMUM_WAIT_EVENTS
WSA_NOT_ENOUGH_MEMORY
WSA_OPERATION_ABORTED
WSA_WAIT_EVENT_0
WSA_WAIT_FAILED
WSA_WAIT_IO_COMPLETION
WSA_WAIT_TIMEOUT
);
@EXPORT_OK = qw();
use constant BASE_PROTOCOL => 1;
use constant CF_ACCEPT => 0;
use constant CF_DEFER => 2;
use constant CF_REJECT => 1;
use constant FD_ACCEPT_BIT => 3;
use constant FD_CLOSE_BIT => 5;
use constant FD_CONNECT_BIT => 4;
use constant FD_MAX_EVENTS => 10;
use constant FD_OOB_BIT => 2;
use constant FD_READ_BIT => 0;
use constant FD_WRITE_BIT => 1;
use constant INCL_WINSOCK_API_PROTOTYPES => 1;
use constant INCL_WINSOCK_API_TYPEDEFS => 0;
use constant IOC_PROTOCOL => 268435456;
use constant IOC_UNIX => 0;
use constant IOC_VENDOR => 402653184;
use constant IOC_WS2 => 134217728;
use constant LAYERED_PROTOCOL => 0;
use constant MAX_PROTOCOL_CHAIN => 7;
use constant PVD_CONFIG => 12289;
use constant SD_BOTH => 2;
use constant SD_RECEIVE => 0;
use constant SD_SEND => 1;
use constant SG_CONSTRAINED_GROUP => 2;
use constant SG_UNCONSTRAINED_GROUP => 1;
use constant SIO_ADDRESS_LIST_CHANGE => 671088663;
use constant SIO_ADDRESS_LIST_QUERY => 1207959574;
use constant SIO_ASSOCIATE_HANDLE => -2013265919;
use constant SIO_ENABLE_CIRCULAR_QUEUEING => 671088642;
use constant SIO_FIND_ROUTE => 1207959555;
use constant SIO_FLUSH => 671088644;
use constant SIO_GET_BROADCAST_ADDRESS => 1207959557;
use constant SIO_GET_EXTENSION_FUNCTION_POINTER => -939524090;
use constant SIO_GET_GROUP_QOS => -939524088;
use constant SIO_GET_INTERFACE_LIST => 1074033791;
use constant SIO_GET_QOS => -939524089;
use constant SIO_MULTICAST_SCOPE => -2013265910;
use constant SIO_MULTIPOINT_LOOPBACK => -2013265911;
use constant SIO_QUERY_TARGET_PNP_HANDLE => 1207959576;
use constant SIO_ROUTING_INTERFACE_CHANGE => -2013265899;
use constant SIO_ROUTING_INTERFACE_QUERY => -939524076;
use constant SIO_SET_GROUP_QOS => -2013265908;
use constant SIO_SET_QOS => -2013265909;
use constant SIO_TRANSLATE_HANDLE => -939524083;
use constant SO_CONDITIONAL_ACCEPT => 12290;
use constant SO_GROUP_ID => 8193;
use constant SO_GROUP_PRIORITY => 8194;
use constant SO_MAX_MSG_SIZE => 8195;
use constant SO_PROTOCOL_INFOA => 8196;
use constant SO_PROTOCOL_INFOW => 8197;
use constant WSAPROTOCOL_LEN => 255;
use constant WSA_FLAG_MULTIPOINT_C_LEAF => 4;
use constant WSA_FLAG_MULTIPOINT_C_ROOT => 2;
use constant WSA_FLAG_MULTIPOINT_D_LEAF => 16;
use constant WSA_FLAG_MULTIPOINT_D_ROOT => 8;
use constant WSA_FLAG_OVERLAPPED => 1;
use constant WSA_INFINITE => -1;
use constant WSA_INVALID_EVENT => 0;
use constant WSA_INVALID_HANDLE => 6;
use constant WSA_INVALID_PARAMETER => 87;
use constant WSA_IO_INCOMPLETE => 996;
use constant WSA_IO_PENDING => 997;
use constant WSA_MAXIMUM_WAIT_EVENTS => 64;
use constant WSA_NOT_ENOUGH_MEMORY => 8;
use constant WSA_OPERATION_ABORTED => 995;
use constant WSA_WAIT_EVENT_0 => 0;
use constant WSA_WAIT_FAILED => -1;
use constant WSA_WAIT_IO_COMPLETION => 192;
use constant WSA_WAIT_TIMEOUT => 258;
1;
programs/winetest/include/winuser.pm
View file @ f1d80a39
This source diff could not be displayed because it is too large. You can view the blob instead.
programs/winetest/include/winver.pm
View file @ f1d80a39
......@@ -3,77 +3,167 @@
# Perl definitions for header file winver.h
#
$VFFF_ISSHAREDFILE = 1;
$VFF_BUFFTOOSMALL = 4;
$VFF_CURNEDEST = 1;
$VFF_FILEINUSE = 2;
$VFT2_DRV_COMM = 10;
$VFT2_DRV_DISPLAY = 4;
$VFT2_DRV_INPUTMETHOD = 11;
$VFT2_DRV_INSTALLABLE = 8;
$VFT2_DRV_KEYBOARD = 2;
$VFT2_DRV_LANGUAGE = 3;
$VFT2_DRV_MOUSE = 5;
$VFT2_DRV_NETWORK = 6;
$VFT2_DRV_PRINTER = 1;
$VFT2_DRV_SOUND = 9;
$VFT2_DRV_SYSTEM = 7;
$VFT2_FONT_RASTER = 1;
$VFT2_FONT_TRUETYPE = 3;
$VFT2_FONT_VECTOR = 2;
$VFT2_UNKNOWN = 0;
$VFT_APP = 1;
$VFT_DLL = 2;
$VFT_DRV = 3;
$VFT_FONT = 4;
$VFT_STATIC_LIB = 7;
$VFT_UNKNOWN = 0;
$VFT_VXD = 5;
$VIFF_DONTDELETEOLD = 2;
$VIFF_FORCEINSTALL = 1;
$VIF_ACCESSVIOLATION = 512;
$VIF_BUFFTOOSMALL = 262144;
$VIF_CANNOTCREATE = 2048;
$VIF_CANNOTDELETE = 4096;
$VIF_CANNOTDELETECUR = 16384;
$VIF_CANNOTREADDST = 131072;
$VIF_CANNOTREADSRC = 65536;
$VIF_CANNOTRENAME = 8192;
$VIF_DIFFCODEPG = 16;
$VIF_DIFFLANG = 8;
$VIF_DIFFTYPE = 32;
$VIF_FILEINUSE = 128;
$VIF_MISMATCH = 2;
$VIF_OUTOFMEMORY = 32768;
$VIF_OUTOFSPACE = 256;
$VIF_SHARINGVIOLATION = 1024;
$VIF_SRCOLD = 4;
$VIF_TEMPFILE = 1;
$VIF_WRITEPROT = 64;
$VOS_DOS = 65536;
$VOS_DOS_WINDOWS16 = 65537;
$VOS_DOS_WINDOWS32 = 65540;
$VOS_NT = 262144;
$VOS_NT_WINDOWS32 = 262148;
$VOS_OS216 = 131072;
$VOS_OS216_PM16 = 131074;
$VOS_OS232 = 196608;
$VOS_OS232_PM32 = 196611;
$VOS_UNKNOWN = 0;
$VOS__BASE = 0;
$VOS__PM16 = 2;
$VOS__PM32 = 3;
$VOS__WINDOWS16 = 1;
$VOS__WINDOWS32 = 4;
$VS_FFI_FILEFLAGSMASK = 63;
$VS_FFI_SIGNATURE = -17890115;
$VS_FFI_STRUCVERSION = 65536;
$VS_FF_DEBUG = 1;
$VS_FF_INFOINFERRED = 16;
$VS_FF_PATCHED = 4;
$VS_FF_PRERELEASE = 2;
$VS_FF_PRIVATEBUILD = 8;
$VS_FF_SPECIALBUILD = 32;
$VS_FILE_INFO = 16;
$VS_USER_DEFINED = 100;
$VS_VERSION_INFO = 1;
package winver;
use strict;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
require Exporter;
@ISA = qw(Exporter);
@EXPORT = qw(
VFFF_ISSHAREDFILE
VFF_BUFFTOOSMALL
VFF_CURNEDEST
VFF_FILEINUSE
VFT2_DRV_COMM
VFT2_DRV_DISPLAY
VFT2_DRV_INPUTMETHOD
VFT2_DRV_INSTALLABLE
VFT2_DRV_KEYBOARD
VFT2_DRV_LANGUAGE
VFT2_DRV_MOUSE
VFT2_DRV_NETWORK
VFT2_DRV_PRINTER
VFT2_DRV_SOUND
VFT2_DRV_SYSTEM
VFT2_FONT_RASTER
VFT2_FONT_TRUETYPE
VFT2_FONT_VECTOR
VFT2_UNKNOWN
VFT_APP
VFT_DLL
VFT_DRV
VFT_FONT
VFT_STATIC_LIB
VFT_UNKNOWN
VFT_VXD
VIFF_DONTDELETEOLD
VIFF_FORCEINSTALL
VIF_ACCESSVIOLATION
VIF_BUFFTOOSMALL
VIF_CANNOTCREATE
VIF_CANNOTDELETE
VIF_CANNOTDELETECUR
VIF_CANNOTREADDST
VIF_CANNOTREADSRC
VIF_CANNOTRENAME
VIF_DIFFCODEPG
VIF_DIFFLANG
VIF_DIFFTYPE
VIF_FILEINUSE
VIF_MISMATCH
VIF_OUTOFMEMORY
VIF_OUTOFSPACE
VIF_SHARINGVIOLATION
VIF_SRCOLD
VIF_TEMPFILE
VIF_WRITEPROT
VOS_DOS
VOS_DOS_WINDOWS16
VOS_DOS_WINDOWS32
VOS_NT
VOS_NT_WINDOWS32
VOS_OS216
VOS_OS216_PM16
VOS_OS232
VOS_OS232_PM32
VOS_UNKNOWN
VOS__BASE
VOS__PM16
VOS__PM32
VOS__WINDOWS16
VOS__WINDOWS32
VS_FFI_FILEFLAGSMASK
VS_FFI_SIGNATURE
VS_FFI_STRUCVERSION
VS_FF_DEBUG
VS_FF_INFOINFERRED
VS_FF_PATCHED
VS_FF_PRERELEASE
VS_FF_PRIVATEBUILD
VS_FF_SPECIALBUILD
VS_FILE_INFO
VS_USER_DEFINED
VS_VERSION_INFO
);
@EXPORT_OK = qw();
use constant VFFF_ISSHAREDFILE => 1;
use constant VFF_BUFFTOOSMALL => 4;
use constant VFF_CURNEDEST => 1;
use constant VFF_FILEINUSE => 2;
use constant VFT2_DRV_COMM => 10;
use constant VFT2_DRV_DISPLAY => 4;
use constant VFT2_DRV_INPUTMETHOD => 11;
use constant VFT2_DRV_INSTALLABLE => 8;
use constant VFT2_DRV_KEYBOARD => 2;
use constant VFT2_DRV_LANGUAGE => 3;
use constant VFT2_DRV_MOUSE => 5;
use constant VFT2_DRV_NETWORK => 6;
use constant VFT2_DRV_PRINTER => 1;
use constant VFT2_DRV_SOUND => 9;
use constant VFT2_DRV_SYSTEM => 7;
use constant VFT2_FONT_RASTER => 1;
use constant VFT2_FONT_TRUETYPE => 3;
use constant VFT2_FONT_VECTOR => 2;
use constant VFT2_UNKNOWN => 0;
use constant VFT_APP => 1;
use constant VFT_DLL => 2;
use constant VFT_DRV => 3;
use constant VFT_FONT => 4;
use constant VFT_STATIC_LIB => 7;
use constant VFT_UNKNOWN => 0;
use constant VFT_VXD => 5;
use constant VIFF_DONTDELETEOLD => 2;
use constant VIFF_FORCEINSTALL => 1;
use constant VIF_ACCESSVIOLATION => 512;
use constant VIF_BUFFTOOSMALL => 262144;
use constant VIF_CANNOTCREATE => 2048;
use constant VIF_CANNOTDELETE => 4096;
use constant VIF_CANNOTDELETECUR => 16384;
use constant VIF_CANNOTREADDST => 131072;
use constant VIF_CANNOTREADSRC => 65536;
use constant VIF_CANNOTRENAME => 8192;
use constant VIF_DIFFCODEPG => 16;
use constant VIF_DIFFLANG => 8;
use constant VIF_DIFFTYPE => 32;
use constant VIF_FILEINUSE => 128;
use constant VIF_MISMATCH => 2;
use constant VIF_OUTOFMEMORY => 32768;
use constant VIF_OUTOFSPACE => 256;
use constant VIF_SHARINGVIOLATION => 1024;
use constant VIF_SRCOLD => 4;
use constant VIF_TEMPFILE => 1;
use constant VIF_WRITEPROT => 64;
use constant VOS_DOS => 65536;
use constant VOS_DOS_WINDOWS16 => 65537;
use constant VOS_DOS_WINDOWS32 => 65540;
use constant VOS_NT => 262144;
use constant VOS_NT_WINDOWS32 => 262148;
use constant VOS_OS216 => 131072;
use constant VOS_OS216_PM16 => 131074;
use constant VOS_OS232 => 196608;
use constant VOS_OS232_PM32 => 196611;
use constant VOS_UNKNOWN => 0;
use constant VOS__BASE => 0;
use constant VOS__PM16 => 2;
use constant VOS__PM32 => 3;
use constant VOS__WINDOWS16 => 1;
use constant VOS__WINDOWS32 => 4;
use constant VS_FFI_FILEFLAGSMASK => 63;
use constant VS_FFI_SIGNATURE => -17890115;
use constant VS_FFI_STRUCVERSION => 65536;
use constant VS_FF_DEBUG => 1;
use constant VS_FF_INFOINFERRED => 16;
use constant VS_FF_PATCHED => 4;
use constant VS_FF_PRERELEASE => 2;
use constant VS_FF_PRIVATEBUILD => 8;
use constant VS_FF_SPECIALBUILD => 32;
use constant VS_FILE_INFO => 16;
use constant VS_USER_DEFINED => 100;
use constant VS_VERSION_INFO => 1;
1;
programs/winetest/make_symbols
View file @ f1d80a39
......@@ -46,6 +46,9 @@ foreach $basename (@list)
my $result = "include/" . $basename;
$result =~ s!\.h$!.pm!;
my $package = $basename;
$package =~ s/\.h$//;
open INPUT, "$include_dir/$basename" or die "Cannot open $include_dir/$basename";
open OUTPUT, ">sym.c" or die "Cannot create sym.c";
print "Building $result\n";
......@@ -64,6 +67,17 @@ int main()
printf( "#\\n" );
printf( "# Perl definitions for header file $basename\\n" );
printf( "#\\n\\n" );
printf( "\\n" );
printf( "package $package;\\n" );
printf( "\\n" );
printf( "use strict;\\n" );
printf( "\\n" );
printf( "use vars qw(\$VERSION \@ISA \@EXPORT \@EXPORT_OK);\\n" );
printf( "\\n" );
printf( "require Exporter;\\n" );
printf( "\\n" );
printf( "\@ISA = qw(Exporter);\\n" );
printf( "\@EXPORT = qw(\\n" );
EOF
my %symbols = ();
......@@ -84,8 +98,18 @@ EOF
}
foreach $sym (sort keys %symbols)
{
printf OUTPUT " printf(\"\$$sym = %%d;\\n\", (int)($sym));\n";
printf OUTPUT " printf(\" $sym\\n\");\n";
}
printf OUTPUT " printf(\");\\n\");\n";
printf OUTPUT " printf(\"\@EXPORT_OK = qw();\\n\");\n";
printf OUTPUT " printf(\"\\n\");\n";
foreach $sym (sort keys %symbols)
{
printf OUTPUT " printf(\"use constant $sym => %%d;\\n\", (int)($sym));\n";
}
printf OUTPUT " printf(\"\\n\");\n";
printf OUTPUT " printf(\"1;\\n\");\n";
print OUTPUT " exit(0);\n}\n";
close OUTPUT;
#print "cc -I../../include -o sym sym.c\n";
......
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