source: trunk/src/oleaut32/initterm.cpp@ 3993

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

Updates for fake system dll headers

File size: 4.3 KB
Line 
1/* $Id: initterm.cpp,v 1.7 2000-08-11 10:56:22 sandervl Exp $ */
2
3/*
4 * DLL entry point
5 *
6 * Copyright 1998 Sander van Leeuwen
7 * Copyright 1998 Peter Fitzsimmons
8 *
9 *
10 * Project Odin Software License can be found in LICENSE.TXT
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 <odin.h>
34#include <win32type.h>
35#include <winconst.h>
36#include <odinlx.h>
37#include <misc.h> /*PLF Wed 98-03-18 23:18:15*/
38
39extern "C" {
40void CDECL _ctordtorInit( void );
41void CDECL _ctordtorTerm( void );
42
43 //Win32 resource table (produced by wrc)
44 extern DWORD _Resource_PEResTab;
45}
46static HMODULE dllHandle = 0;
47
48//Global DLL Data
49#pragma data_seg(_GLOBALDATA)
50int globLoadNr = 0;
51#pragma data_seg()
52
53char oleaut32Path[CCHMAXPATH] = "";
54int loadNr = 0;
55
56void Hash_Initialise(void);
57
58//******************************************************************************
59//******************************************************************************
60BOOL WINAPI LibMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID fImpLoad)
61{
62 switch (fdwReason)
63 {
64 case DLL_PROCESS_ATTACH:
65 return TRUE;
66
67 case DLL_THREAD_ATTACH:
68 case DLL_THREAD_DETACH:
69 return TRUE;
70
71 case DLL_PROCESS_DETACH:
72 _ctordtorTerm();
73 ClosePrivateLogFiles();
74 return TRUE;
75 }
76 return FALSE;
77}
78/****************************************************************************/
79/* _DLL_InitTerm is the function that gets called by the operating system */
80/* loader when it loads and frees this DLL for each process that accesses */
81/* this DLL. However, it only gets called the first time the DLL is loaded */
82/* and the last time it is freed for a particular process. The system */
83/* linkage convention MUST be used because the operating system loader is */
84/* calling this function. */
85/****************************************************************************/
86unsigned long SYSTEM _DLL_InitTerm(unsigned long hModule, unsigned long
87 ulFlag)
88{
89 size_t i;
90 APIRET rc;
91
92 /*-------------------------------------------------------------------------*/
93 /* If ulFlag is zero then the DLL is being loaded so initialization should */
94 /* be performed. If ulFlag is 1 then the DLL is being freed so */
95 /* termination should be performed. */
96 /*-------------------------------------------------------------------------*/
97
98 switch (ulFlag) {
99 case 0 :
100 {
101 loadNr = globLoadNr++;
102
103 DosQueryModuleName(hModule, sizeof(oleaut32Path), oleaut32Path);
104 char *endofpath = strrchr(oleaut32Path, '\\');
105 *(endofpath+1) = 0;
106
107 _ctordtorInit();
108
109 CheckVersionFromHMOD(PE2LX_VERSION, hModule); /*PLF Wed 98-03-18 05:28:48*/
110
111 dllHandle = RegisterLxDll(hModule, LibMain, (PVOID)&_Resource_PEResTab);
112 if(dllHandle == 0)
113 return 0UL;
114
115#ifdef DEFAULT_LOGGING_OFF
116 if(getenv("WIN32LOG_ENABLED")) {
117#else
118 if(!getenv("NOWIN32LOG")) {
119#endif
120 OpenPrivateLogFiles();
121 }
122 Hash_Initialise();
123
124 break;
125 }
126 case 1 :
127 if(dllHandle) {
128 UnregisterLxDll(dllHandle);
129 }
130 break;
131
132 default :
133 return 0UL;
134 }
135
136 /***********************************************************/
137 /* A non-zero value must be returned to indicate success. */
138 /***********************************************************/
139 return 1UL;
140}
141//******************************************************************************
142//******************************************************************************
Note: See TracBrowser for help on using the repository browser.