File: hello5.c

package info (click to toggle)
wine 0.0.980315-1
  • links: PTS
  • area: main
  • in suites: hamm
  • size: 10,136 kB
  • ctags: 26,112
  • sloc: ansic: 156,310; makefile: 1,160; yacc: 807; perl: 655; lex: 555; sh: 304
file content (36 lines) | stat: -rw-r--r-- 1,415 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
/*
 * This example demonstrates dynamical loading of (internal) Win32 DLLS.
 */
#include <windows.h>
#include <stdio.h>

int PASCAL WinMain (HANDLE inst, HANDLE prev, LPSTR cmdline, int show)
{
	SYSTEM_INFO	si;
	void (CALLBACK *fnGetSystemInfo)(LPSYSTEM_INFO si);
	HMODULE32	kernel32;

	kernel32 = LoadLibrary("KERNEL32");
	if (kernel32<32) {
		fprintf(stderr,"FATAL: could not load KERNEL32!\n");
		return 0;
	}
	fnGetSystemInfo = (void (CALLBACK*)(LPSYSTEM_INFO))GetProcAddress(kernel32,"GetSystemInfo");
	if (!fnGetSystemInfo) {
		fprintf(stderr,"FATAL: could not find GetSystemInfo!\n");
		return 0;
	}
	fnGetSystemInfo(&si);
	fprintf(stderr,"QuerySystemInfo returns:\n");
	fprintf(stderr,"	wProcessorArchitecture: %d\n",si.u.x.wProcessorArchitecture);
	fprintf(stderr,"	dwPageSize: %ld\n",si.dwPageSize);
	fprintf(stderr,"	lpMinimumApplicationAddress: %p\n",si.lpMinimumApplicationAddress);
	fprintf(stderr,"	lpMaximumApplicationAddress: %p\n",si.lpMaximumApplicationAddress);
	fprintf(stderr,"	dwActiveProcessorMask: %ld\n",si.dwActiveProcessorMask);
	fprintf(stderr,"	dwNumberOfProcessors: %ld\n",si.dwNumberOfProcessors);
	fprintf(stderr,"	dwProcessorType: %ld\n",si.dwProcessorType);
	fprintf(stderr,"	dwAllocationGranularity: %ld\n",si.dwAllocationGranularity);
	fprintf(stderr,"	wProcessorLevel: %d\n",si.wProcessorLevel);
	fprintf(stderr,"	wProcessorRevision: %d\n",si.wProcessorRevision);
	return 0;
}