source: trunk/src/odincrt/initterm.cpp@ 2015

Last change on this file since 2015 was 1874, checked in by bird, 26 years ago

Console hack - Experimental.
File size: 5.3 KB
Line 
1/* $Id: initterm.cpp,v 1.2 1999-11-29 00:11:47 bird 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 <misc.h> /*PLF Wed 98-03-18 23:18:15*/
35
36extern "C" {
37/*-------------------------------------------------------------------*/
38/* _CRT_init is the C run-time environment initialization function. */
39/* It will return 0 to indicate success and -1 to indicate failure. */
40/*-------------------------------------------------------------------*/
41int CDECL CRT_init(void);
42/*-------------------------------------------------------------------*/
43/* _CRT_term is the C run-time environment termination function. */
44/* It only needs to be called when the C run-time functions are */
45/* statically linked. */
46/*-------------------------------------------------------------------*/
47void CDECL CRT_term(void);
48void CDECL _ctordtorInit( void );
49void CDECL _ctordtorTerm( void );
50}
51
52/*-------------------------------------------------------------------*/
53/* A clean up routine registered with DosExitList must be used if */
54/* runtime calls are required and the runtime is dynamically linked. */
55/* This will guarantee that this clean up routine is run before the */
56/* library DLL is terminated. */
57/*-------------------------------------------------------------------*/
58static void APIENTRY cleanup(ULONG reason);
59
60
61/****************************************************************************/
62/* _DLL_InitTerm is the function that gets called by the operating system */
63/* loader when it loads and frees this DLL for each process that accesses */
64/* this DLL. However, it only gets called the first time the DLL is loaded */
65/* and the last time it is freed for a particular process. The system */
66/* linkage convention MUST be used because the operating system loader is */
67/* calling this function. */
68/****************************************************************************/
69unsigned long SYSTEM _DLL_InitTerm(unsigned long hModule, unsigned long
70 ulFlag)
71{
72 size_t i;
73 APIRET rc;
74
75 /*-------------------------------------------------------------------------*/
76 /* If ulFlag is zero then the DLL is being loaded so initialization should */
77 /* be performed. If ulFlag is 1 then the DLL is being freed so */
78 /* termination should be performed. */
79 /*-------------------------------------------------------------------------*/
80
81 switch (ulFlag) {
82 case 0 :
83
84 /*******************************************************************/
85 /* The C run-time environment initialization function must be */
86 /* called before any calls to C run-time functions that are not */
87 /* inlined. */
88 /*******************************************************************/
89
90 if (CRT_init() == -1)
91 return 0UL;
92 _ctordtorInit();
93
94 /*******************************************************************/
95 /* A DosExitList routine must be used to clean up if runtime calls */
96 /* are required and the runtime is dynamically linked. */
97 /*******************************************************************/
98
99 rc = DosExitList(0x0000FF00|EXLST_ADD, cleanup);
100 if(rc)
101 return 0UL;
102 #if 1 /*
103 * Experimental console hack. Sets apptype to PM anyhow.
104 * First Dll to be initiated should now allways be OdinCrt!
105 * So include odincrt first!
106 */
107 PPIB pPIB;
108 PTIB pTIB;
109 rc = DosGetInfoBlocks(&pTIB, &pPIB);
110 if (rc != NO_ERROR)
111 return 0UL;
112 pPIB->pib_ultype = 3;
113 #endif
114 break;
115 case 1 :
116 break;
117 default :
118 return 0UL;
119 }
120
121 /***********************************************************/
122 /* A non-zero value must be returned to indicate success. */
123 /***********************************************************/
124 return 1UL;
125}
126
127
128static void APIENTRY cleanup(ULONG ulReason)
129{
130 _ctordtorTerm();
131 CRT_term();
132 DosExitList(EXLST_EXIT, cleanup);
133 return ;
134}
Note: See TracBrowser for help on using the repository browser.