source: trunk/src/user32/old/initterm.cpp@ 950

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

Moved old user32 here

File size: 4.5 KB
Line 
1/* $Id: initterm.cpp,v 1.3 1999-09-15 23:20:38 sandervl Exp $ */
2
3/*
4 * USER32 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 <misc.h> /*PLF Wed 98-03-18 23:18:29*/
35#include <win32type.h>
36#include <odinlx.h>
37#include <wndclass.h>
38#include <spy.h>
39
40/*-------------------------------------------------------------------*/
41/* A clean up routine registered with DosExitList must be used if */
42/* runtime calls are required and the runtime is dynamically linked. */
43/* This will guarantee that this clean up routine is run before the */
44/* library DLL is terminated. */
45/*-------------------------------------------------------------------*/
46static void APIENTRY cleanup(ULONG reason);
47static void APIENTRY cleanupQueue(ULONG ulReason);
48
49extern "C" {
50void CDECL _ctordtorInit( void );
51void CDECL _ctordtorTerm( void );
52}
53
54/****************************************************************************/
55/* _DLL_InitTerm is the function that gets called by the operating system */
56/* loader when it loads and frees this DLL for each process that accesses */
57/* this DLL. However, it only gets called the first time the DLL is loaded */
58/* and the last time it is freed for a particular process. The system */
59/* linkage convention MUST be used because the operating system loader is */
60/* calling this function. */
61/****************************************************************************/
62unsigned long SYSTEM _DLL_InitTerm(unsigned long hModule, unsigned long
63 ulFlag)
64{
65 size_t i;
66 APIRET rc;
67
68 /*-------------------------------------------------------------------------*/
69 /* If ulFlag is zero then the DLL is being loaded so initialization should */
70 /* be performed. If ulFlag is 1 then the DLL is being freed so */
71 /* termination should be performed. */
72 /*-------------------------------------------------------------------------*/
73
74 switch (ulFlag) {
75 case 0 :
76 _ctordtorInit();
77
78 CheckVersionFromHMOD(PE2LX_VERSION, hModule); /*PLF Wed 98-03-18 05:28:48*/
79
80 if(RegisterLxDll(hModule, 0, 0) == FALSE)
81 return 0UL;
82
83 /*******************************************************************/
84 /* A DosExitList routine must be used to clean up if runtime calls */
85 /* are required and the runtime is dynamically linked. */
86 /*******************************************************************/
87
88 rc = DosExitList(0x0000F000|EXLST_ADD, cleanup);
89 if(rc)
90 return 0UL;
91
92 rc = DosExitList(0x00008000|EXLST_ADD, cleanupQueue);
93 if(rc)
94 return 0UL;
95
96 //SvL: 18-7-'98, Register system window classes (button, listbox etc etc)
97 RegisterSystemClasses(hModule);
98
99 //SvL: Try to start communication with our message spy queue server
100 InitSpyQueue();
101 break;
102 case 1 :
103 UnregisterLxDll(hModule);
104 break;
105 default :
106 return 0UL;
107 }
108
109 /***********************************************************/
110 /* A non-zero value must be returned to indicate success. */
111 /***********************************************************/
112 return 1UL;
113}
114
115static void APIENTRY cleanupQueue(ULONG ulReason)
116{
117 CloseSpyQueue();
118 DosExitList(EXLST_EXIT, cleanupQueue);
119 return;
120}
121
122static void APIENTRY cleanup(ULONG ulReason)
123{
124 dprintf(("user32 exit\n"));
125 UnregisterSystemClasses();
126 _ctordtorTerm();
127 dprintf(("user32 exit done\n"));
128 DosExitList(EXLST_EXIT, cleanup);
129 return ;
130}
Note: See TracBrowser for help on using the repository browser.