- Minor API files update

- Minor bug fixes
This commit is contained in:
Patrik Stridvall 2001-04-25 19:52:34 +00:00 committed by Alexandre Julliard
parent 6db325014e
commit f6d5c6ce36
17 changed files with 95 additions and 24 deletions

View File

@ -26,6 +26,8 @@ dlls/commdlg
% dlls/crtdll/crtdll.spec % dlls/crtdll/crtdll.spec
dlls/crtdll
% dlls/dciman32/dciman32.spec % dlls/dciman32/dciman32.spec
dlls/dciman32 dlls/dciman32
@ -464,6 +466,10 @@ dlls/wsock32
dlls/winspool dlls/winspool
% dlls/wintrust/wintrust.spec
dlls/wintrust
% dlls/wow32/wow32.spec % dlls/wow32/wow32.spec
% dlls/x11drv/x11drv.spec % dlls/x11drv/x11drv.spec

View File

@ -12,6 +12,7 @@ INT
%ptr %ptr
CLSID * CLSID *
COSERVERINFO *
FILETIME * FILETIME *
GUID * GUID *
HTASK16 * HTASK16 *

View File

@ -2,15 +2,18 @@
DWORD DWORD
LPARAM LPARAM
int
%ptr %ptr
HINF16 * HINF16 *
LPBYTE LPBYTE
LPDWORD LPDWORD
LPEXPANDVTBL
LPHKEY LPHKEY
LPLOGDISKDESC LPLOGDISKDESC
LPLPDEVICE_INFO16 LPLPDEVICE_INFO16
LPVOID
VIFPROC VIFPROC
%str %str
@ -31,4 +34,7 @@ HINSTANCE16
HKEY HKEY
HWND16 HWND16
RETERR16 RETERR16
UINT16
VHSTR
WORD WORD
WPARAM

View File

@ -13,7 +13,6 @@ POINT16
BOOL BOOL
INT INT
UINT UINT
HINSTANCE
%ptr %ptr

View File

@ -0,0 +1,13 @@
%long
int
size_t
%ptr
char ***
int *
%void
void

View File

@ -8,6 +8,7 @@ CALID
CALTYPE CALTYPE
COORD COORD
DWORD DWORD
EXECUTION_STATE
LCTYPE LCTYPE
HANDLE HANDLE
HFILE HFILE

View File

@ -8,16 +8,16 @@ DWORD
HANDLE HANDLE
INT INT
LONG LONG
MSVCRT_clock_t
MSVCRT_complex MSVCRT_complex
MSVCRT_size_t
MSVCRT_time_t
ULONG ULONG
WCHAR WCHAR
clock_t
int int
long long
unsigned int unsigned int
unsigned long unsigned long
size_t
time_t
%longlong %longlong
@ -26,24 +26,22 @@ ULONGLONG
%ptr %ptr
DWORD * __non_rtti_object *
_HEAPINFO *
_INITTERMFUN *
_onexit_t
_onexit_t **
LPDWORD * LPDWORD *
LPTHREAD_START_ROUTINE
MSVCRT__INITTERMFUN *
MSVCRT_EXCEPTION_FRAME * MSVCRT_EXCEPTION_FRAME *
MSVCRT_FILE * MSVCRT_FILE *
MSVCRT_HEAPINFO * MSVCRT_compar_fn_t
MSVCRT_atexit_func MSVCRT_exception *
MSVCRT_atexit_func **
MSVCRT_comp_func
MSVCRT_diskfree_t *
MSVCRT_finddata_t *
MSVCRT_fpos_t * MSVCRT_fpos_t *
MSVCRT_matherr_func MSVCRT_matherr_func
MSVCRT_new_handler_func MSVCRT_new_handler_func
MSVCRT_sig_handler_func MSVCRT_sig_handler_func
MSVCRT_timeb * MSVCRT_time_t *
MSVCRT_wfinddata_t * MSVCRT_wint_t
PCONTEXT PCONTEXT
PEXCEPTION_FRAME PEXCEPTION_FRAME
PEXCEPTION_FRAME * PEXCEPTION_FRAME *
@ -53,7 +51,6 @@ WCHAR *
WCHAR ** WCHAR **
WCHAR *** WCHAR ***
WORD ** WORD **
__non_rtti_object *
bad_cast * bad_cast *
bad_typeid * bad_typeid *
char * char *
@ -62,9 +59,12 @@ char ***
exception * exception *
int * int *
jmp_buf jmp_buf
struct _finddata_t *
struct _diskfree_t *
struct _stat * struct _stat *
struct _timeb *
struct _utimbuf * struct _utimbuf *
time_t * struct _wfinddata_t *
type_info * type_info *
unsigned char * unsigned char *
unsigned int * unsigned int *
@ -78,8 +78,8 @@ LPCSTR
%unknown %unknown
div_t MSVCRT_div_t
ldiv_t MSVCRT_ldiv_t
%void %void

View File

@ -114,7 +114,7 @@ WCHAR ***
char * char *
char *** char ***
enum __DEBUG_CLASS enum __DEBUG_CLASS
enum request union generic_request *
va_list va_list
%str %str

View File

@ -54,6 +54,7 @@ LPENUMFORMATETC *
LPENUMOLEVERB * LPENUMOLEVERB *
LPFILETIME LPFILETIME
LPFORMATETC LPFORMATETC
LPGUID
LPLOCKBYTES * LPLOCKBYTES *
LPMALLOC * LPMALLOC *
LPMESSAGEFILTER LPMESSAGEFILTER

View File

@ -5,6 +5,9 @@ CHAR
DWORD DWORD
INT INT
HANDLE HANDLE
HDC
HRGN
HWND
LONG LONG
UINT UINT
WORD WORD
@ -18,7 +21,7 @@ int
%ptr %ptr
BYTE * BYTE *
KEYBOARD_CONFIG * WINDOWPOS *
LPBYTE LPBYTE
LPDIDEVICEOBJECTDATA LPDIDEVICEOBJECTDATA
LPDWORD LPDWORD

View File

@ -143,6 +143,10 @@ DLGPROC16
HOOKPROC16 HOOKPROC16
WNDPROC16 WNDPROC16
%ptr # --forbidden
int *
%str %str
LPSTR LPSTR

View File

@ -1,5 +1,6 @@
%long %long
BOOL
DWORD DWORD
UINT UINT

View File

@ -0,0 +1,9 @@
%long
HWND
LONG
%ptr
GUID *
LPVOID

View File

@ -24,6 +24,7 @@ FARPROC
INT * INT *
LPDWORD LPDWORD
LPVOID LPVOID
LPWSABUF
LPWSADATA LPWSADATA
LPWSAOVERLAPPED LPWSAOVERLAPPED
LPWSAOVERLAPPED_COMPLETION_ROUTINE LPWSAOVERLAPPED_COMPLETION_ROUTINE

View File

@ -4,6 +4,10 @@ BOOL
CHAR CHAR
DWORD DWORD
HANDLE HANDLE
HDC
HICON
HRGN
HWND
INT INT
LONG LONG
UINT UINT
@ -19,12 +23,12 @@ int
BYTE * BYTE *
CURSORICONINFO * CURSORICONINFO *
KEYBOARD_CONFIG *
LPBYTE LPBYTE
LPDIDEVICEOBJECTDATA LPDIDEVICEOBJECTDATA
LPDWORD LPDWORD
LPMOUSE_EVENT_PROC LPMOUSE_EVENT_PROC
LPVOID LPVOID
WINDOWPOS *
WND * WND *
%str %str
@ -34,6 +38,7 @@ LPSTR
%wstr %wstr
LPCWSTR
LPWSTR LPWSTR
%void %void

View File

@ -100,6 +100,16 @@ sub file_type {
} }
} }
sub file_skip {
local $_ = shift;
if(/agl.c$/) {
return 1;
}
return 0;
}
my $modules = 'modules'->new($options, $output, $wine_dir, $current_dir, \&file_type, "$winapi_check_dir/modules.dat"); my $modules = 'modules'->new($options, $output, $wine_dir, $current_dir, \&file_type, "$winapi_check_dir/modules.dat");
my $win16api = 'winapi'->new($options, $output, "win16", "$winapi_check_dir/win16"); my $win16api = 'winapi'->new($options, $output, "win16", "$winapi_check_dir/win16");
@ -267,7 +277,11 @@ foreach my $file ($options->c_files) {
} }
my $file_type = file_type($file); my $file_type = file_type($file);
if(file_skip($file)) {
next;
}
my $found_function = sub { my $found_function = sub {
my $documentation = shift; my $documentation = shift;
my $linkage = shift; my $linkage = shift;
@ -308,6 +322,11 @@ foreach my $file ($options->c_files) {
$modules->found_module_in_dir($module32, $file_dir); $modules->found_module_in_dir($module32, $file_dir);
} }
my $previous_function;
if(defined($functions{$internal_name})) {
$previous_function = $functions{$internal_name};
}
my $function = 'winapi_function'->new; my $function = 'winapi_function'->new;
$functions{$internal_name} = $function; $functions{$internal_name} = $function;
@ -440,6 +459,7 @@ foreach my $file ($options->c_files) {
} }
if($options->local && $options->documentation && if($options->local && $options->documentation &&
!defined($previous_function) &&
(defined($module16) || defined($module32)) && (defined($module16) || defined($module32)) &&
$linkage ne "extern" && $statements) $linkage ne "extern" && $statements)
{ {

View File

@ -129,7 +129,8 @@ sub check_documentation {
} }
if($options->documentation_pedantic) { if($options->documentation_pedantic) {
if($documentation !~ /^ \*\s+(?:\@|\w+)(?:\s+\(\w+\.(?:\@|\d+)\))+/m) { my $ordinal = $win16api->function_ordinal($internal_name);
if(defined($ordinal) && $documentation !~ /^ \*\s+(?:\@|\w+)(?:\s+[\(\[]\w+\.(?:\@|\d+)[\)\]])+/m) {
$output->write("documentation: pedantic check failed \\\n$documentation\n"); $output->write("documentation: pedantic check failed \\\n$documentation\n");
} }
} }