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

Last change on this file since 1036 was 951, checked in by sandervl, 26 years ago

Initterm creates LX image object during initialization

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