source: trunk/src/comctl32/initterm.cpp@ 5135

Last change on this file since 5135 was 5135, checked in by sandervl, 25 years ago

VAC 3.6.5 bug workaround

File size: 4.5 KB
Line 
1/*
2 * COMCTL32 DLL entry point
3 *
4 * Copyright 1998 Sander van Leeuwen
5 * Copyright 1998 Peter Fitzsimmons
6 * Copyright 1999 Achim Hasenmueller
7 *
8 * Project Odin Software License can be found in LICENSE.TXT
9 *
10 *
11 */
12
13/*-------------------------------------------------------------*/
14/* INITERM.C -- Source for a custom dynamic link library */
15/* initialization and termination (_DLL_InitTerm) */
16/* function. */
17/* */
18/* When called to perform initialization, this sample function */
19/* gets storage for an array of integers, and initializes its */
20/* elements with random integers. At termination time, it */
21/* frees the array. Substitute your own special processing. */
22/*-------------------------------------------------------------*/
23
24
25/* Include files */
26#define INCL_DOSMODULEMGR
27#define INCL_DOSPROCESS
28#include <os2wrap.h> //Odin32 OS/2 api wrappers
29#include <stdlib.h>
30#include <stdio.h>
31#include <string.h>
32#include <misc.h> /*PLF Wed 98-03-18 23:18:29*/
33#include <win32type.h>
34#include <winconst.h>
35#include <odinlx.h>
36#include <initdll.h>
37
38extern "C" {
39 //Win32 resource table (produced by wrc)
40 extern DWORD _Resource_PEResTab;
41}
42
43static HMODULE dllHandle = 0;
44
45void CDECL RegisterCOMCTL32WindowClasses(unsigned long hinstDLL);
46void CDECL UnregisterCOMCTL32WindowClasses(void);
47
48//******************************************************************************
49//******************************************************************************
50BOOL WINAPI LibMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID fImpLoad)
51{
52 switch (fdwReason)
53 {
54 case DLL_PROCESS_ATTACH:
55 /* register Win32 window classes implemented in this DLL */
56 RegisterCOMCTL32WindowClasses(hinstDLL);
57 return TRUE;
58
59 case DLL_THREAD_ATTACH:
60 case DLL_THREAD_DETACH:
61 return TRUE;
62
63 case DLL_PROCESS_DETACH:
64 /* unregister Win32 window classes */
65 UnregisterCOMCTL32WindowClasses();
66 ctordtorTerm();
67 return TRUE;
68 }
69 return FALSE;
70}
71/****************************************************************************/
72/* _DLL_InitTerm is the function that gets called by the operating system */
73/* loader when it loads and frees this DLL for each process that accesses */
74/* this DLL. However, it only gets called the first time the DLL is loaded */
75/* and the last time it is freed for a particular process. The system */
76/* linkage convention MUST be used because the operating system loader is */
77/* calling this function. */
78/****************************************************************************/
79unsigned long _System _DLL_InitTerm(unsigned long hModule, unsigned long
80 ulFlag)
81{
82 size_t i;
83 APIRET rc;
84
85 /*-------------------------------------------------------------------------*/
86 /* If ulFlag is zero then the DLL is being loaded so initialization should */
87 /* be performed. If ulFlag is 1 then the DLL is being freed so */
88 /* termination should be performed. */
89 /*-------------------------------------------------------------------------*/
90
91 switch (ulFlag) {
92 case 0 :
93
94 ctordtorInit();
95
96 /*******************************************************************/
97 /* A DosExitList routine must be used to clean up if runtime calls */
98 /* are required and the runtime is dynamically linked. */
99 /*******************************************************************/
100
101 dllHandle = RegisterLxDll(hModule, LibMain, (PVOID)&_Resource_PEResTab,
102 COMCTL32_MAJORIMAGE_VERSION, COMCTL32_MINORIMAGE_VERSION,
103 IMAGE_SUBSYSTEM_WINDOWS_GUI);
104 if(dllHandle == 0)
105 return 0UL;
106
107 CheckVersionFromHMOD(PE2LX_VERSION, hModule); /*PLF Wed 98-03-18 05:28:48*/
108
109 break;
110 case 1 :
111 if(dllHandle) {
112 UnregisterLxDll(dllHandle);
113 }
114 break;
115 default :
116 return 0UL;
117 }
118
119 /***********************************************************/
120 /* A non-zero value must be returned to indicate success. */
121 /***********************************************************/
122 return 1UL;
123}
124//******************************************************************************
125//******************************************************************************
Note: See TracBrowser for help on using the repository browser.