source: trunk/src/imm32/initterm.cpp@ 10605

Last change on this file since 10605 was 10605, checked in by sandervl, 21 years ago

KOM: update

File size: 4.1 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 <initdll.h>
36#include <exitlist.h>
37#include <dbglog.h>
38
39#include "im32.h"
40
41/*-------------------------------------------------------------------*/
42/* A clean up routine registered with DosExitList must be used if */
43/* runtime calls are required and the runtime is dynamically linked. */
44/* This will guarantee that this clean up routine is run before the */
45/* library DLL is terminated. */
46/*-------------------------------------------------------------------*/
47static void APIENTRY cleanup(ULONG reason);
48
49/****************************************************************************/
50/* _DLL_InitTerm is the function that gets called by the operating system */
51/* loader when it loads and frees this DLL for each process that accesses */
52/* this DLL. However, it only gets called the first time the DLL is loaded */
53/* and the last time it is freed for a particular process. The system */
54/* linkage convention MUST be used because the operating system loader is */
55/* calling this function. */
56/****************************************************************************/
57ULONG DLLENTRYPOINT_CCONV DLLENTRYPOINT_NAME(ULONG hModule, ULONG ulFlag)
58{
59 size_t i;
60 APIRET rc;
61
62 /*-------------------------------------------------------------------------*/
63 /* If ulFlag is zero then the DLL is being loaded so initialization should */
64 /* be performed. If ulFlag is 1 then the DLL is being freed so */
65 /* termination should be performed. */
66 /*-------------------------------------------------------------------------*/
67
68 switch (ulFlag) {
69 case 0 :
70 ctordtorInit();
71
72 /*******************************************************************/
73 /* A DosExitList routine must be used to clean up if runtime calls */
74 /* are required and the runtime is dynamically linked. */
75 /*******************************************************************/
76
77 rc = DosExitList(EXITLIST_NONCRITDLL|EXLST_ADD, cleanup);
78 if (rc)
79 return 0UL;
80
81 return inittermImm32(hModule, ulFlag);
82
83 case 1 :
84 return inittermImm32(hModule, ulFlag);
85
86 default :
87 return 0UL;
88 }
89
90 /***********************************************************/
91 /* A non-zero value must be returned to indicate success. */
92 /***********************************************************/
93 return 1UL;
94}
95//******************************************************************************
96//******************************************************************************
97static void APIENTRY cleanup(ULONG ulReason)
98{
99 IM32Term();
100 dprintf(("IMM32 exit"));
101 ctordtorTerm();
102
103 DosExitList(EXLST_EXIT, cleanup);
104 return ;
105}
106//******************************************************************************
107//******************************************************************************
Note: See TracBrowser for help on using the repository browser.