4 * Copyright 2006 Andrew Ziem
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21 #include "wine/test.h"
34 typedef void (__cdecl
*_INITTERMFUN
)(void);
35 static void (__cdecl
*p_initterm
)(_INITTERMFUN
*start
, _INITTERMFUN
*end
);
37 static int (__cdecl
*p_get_pgmptr
)(char **p
);
39 static int callbacked
;
41 static void __cdecl
initcallback(void)
46 #define initterm_test(start, end, expected) \
48 p_initterm(start, end); \
49 ok(expected == callbacked,"_initterm: callbacks count mismatch: got %i, expected %i\n", callbacked, expected);
51 static void test_initterm(void)
54 static _INITTERMFUN callbacks
[4];
59 for (i
= 0; i
< 4; i
++)
61 callbacks
[i
] = initcallback
;
64 initterm_test(&callbacks
[0], &callbacks
[1], 1);
65 initterm_test(&callbacks
[0], &callbacks
[2], 2);
66 initterm_test(&callbacks
[0], &callbacks
[3], 3);
69 initterm_test(&callbacks
[0], &callbacks
[3], 2);
72 static void test_initvar( HMODULE hmsvcrt
)
74 OSVERSIONINFO osvi
= { sizeof(OSVERSIONINFO
) };
75 int *pp_winver
= (int*)GetProcAddress(hmsvcrt
, "_winver");
76 int *pp_winmajor
= (int*)GetProcAddress(hmsvcrt
, "_winmajor");
77 int *pp_winminor
= (int*)GetProcAddress(hmsvcrt
, "_winminor");
78 int *pp_osver
= (int*)GetProcAddress(hmsvcrt
, "_osver");
79 int *pp_osplatform
= (int*)GetProcAddress(hmsvcrt
, "_osplatform");
80 unsigned int winver
, winmajor
, winminor
, osver
, osplatform
;
82 if( !( pp_winmajor
&& pp_winminor
&& pp_winver
)) {
83 win_skip("_winver variables are not available\n");
87 winminor
= *pp_winminor
;
88 winmajor
= *pp_winmajor
;
90 ok( winminor
== osvi
.dwMinorVersion
, "Wrong value for _winminor %02x expected %02x\n",
91 winminor
, osvi
.dwMinorVersion
);
92 ok( winmajor
== osvi
.dwMajorVersion
, "Wrong value for _winmajor %02x expected %02x\n",
93 winmajor
, osvi
.dwMajorVersion
);
94 ok( winver
== ((osvi
.dwMajorVersion
<< 8) | osvi
.dwMinorVersion
),
95 "Wrong value for _winver %02x expected %02x\n",
96 winver
, ((osvi
.dwMajorVersion
<< 8) | osvi
.dwMinorVersion
));
97 if( !pp_osver
|| !pp_osplatform
) {
98 win_skip("_osver variables are not available\n");
102 osplatform
= *pp_osplatform
;
103 ok( osver
== (osvi
.dwBuildNumber
& 0xffff) ||
104 ((osvi
.dwBuildNumber
>> 24) == osvi
.dwMajorVersion
&&
105 ((osvi
.dwBuildNumber
>> 16) & 0xff) == osvi
.dwMinorVersion
), /* 95/98/ME */
106 "Wrong value for _osver %04x expected %04x\n",
107 osver
, osvi
.dwBuildNumber
);
108 ok(osplatform
== osvi
.dwPlatformId
,
109 "Wrong value for _osplatform %x exprected %x\n",
110 osplatform
, osvi
.dwPlatformId
);
113 static void test_get_pgmptr(void)
121 res
= p_get_pgmptr(&pgm
);
123 ok( res
== 0, "Wrong _get_pgmptr return value %d expected 0\n", res
);
124 ok( pgm
!= NULL
, "_get_pgmptr returned a NULL pointer\n" );
131 hmsvcrt
= GetModuleHandleA("msvcrt.dll");
133 hmsvcrt
= GetModuleHandleA("msvcrtd.dll");
136 p_initterm
=(void*)GetProcAddress(hmsvcrt
, "_initterm");
137 p_get_pgmptr
=(void*)GetProcAddress(hmsvcrt
, "_get_pgmptr");
140 test_initvar(hmsvcrt
);