source: trunk/src/crtdll/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.8 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 <misc.h> /*PLF Wed 98-03-18 23:18:15*/
33#include <win32type.h>
34#include <winconst.h>
35#include <odinlx.h>
36#include <initdll.h>
37
38extern "C" {
39
40 //Win32 resource table (produced by wrc)
41 extern DWORD _Resource_PEResTab;
42}
43
44BOOL WIN32API CRTDLL_Init(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved);
45
46static HMODULE dllHandle = 0;
47
48//******************************************************************************
49//******************************************************************************
50BOOL WINAPI LibMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID fImpLoad)
51{
52 switch (fdwReason)
53 {
54 case DLL_PROCESS_ATTACH:
55 case DLL_THREAD_ATTACH:
56 case DLL_THREAD_DETACH:
57 return CRTDLL_Init(hinstDLL, fdwReason, fImpLoad);
58
59 case DLL_PROCESS_DETACH:
60 CRTDLL_Init(hinstDLL, fdwReason, fImpLoad);
61 ctordtorTerm();
62 return TRUE;
63 }
64 return FALSE;
65}
66/****************************************************************************/
67/* _DLL_InitTerm is the function that gets called by the operating system */
68/* loader when it loads and frees this DLL for each process that accesses */
69/* this DLL. However, it only gets called the first time the DLL is loaded */
70/* and the last time it is freed for a particular process. The system */
71/* linkage convention MUST be used because the operating system loader is */
72/* calling this function. */
73/****************************************************************************/
74unsigned long SYSTEM _DLL_InitTerm(unsigned long hModule, unsigned long
75 ulFlag)
76{
77 size_t i;
78 APIRET rc;
79
80 /*-------------------------------------------------------------------------*/
81 /* If ulFlag is zero then the DLL is being loaded so initialization should */
82 /* be performed. If ulFlag is 1 then the DLL is being freed so */
83 /* termination should be performed. */
84 /*-------------------------------------------------------------------------*/
85
86 switch (ulFlag) {
87 case 0 :
88 ctordtorInit();
89
90 CheckVersionFromHMOD(PE2LX_VERSION, hModule); /*PLF Wed 98-03-18 05:28:48*/
91
92 dllHandle = RegisterLxDll(hModule, LibMain, (PVOID)&_Resource_PEResTab);
93 if(dllHandle == 0)
94 return 0UL;
95
96 break;
97 case 1 :
98 if(dllHandle) {
99 UnregisterLxDll(dllHandle);
100 }
101 break;
102
103 default :
104 return 0UL;
105 }
106
107 /***********************************************************/
108 /* A non-zero value must be returned to indicate success. */
109 /***********************************************************/
110 return 1UL;
111}
112//******************************************************************************
113//******************************************************************************
Note: See TracBrowser for help on using the repository browser.