source: trunk/src/wing32/initterm.cpp@ 5280

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

VAC 3.6.5 bug workaround

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