source: trunk/src/winmm/initterm.c@ 4

Last change on this file since 4 was 4, checked in by ktk, 26 years ago

Import
File size: 5.2 KB
Line 
1/* $Id: initterm.c,v 1.1 1999-05-24 20:20:05 ktk Exp $ */
2
3/*
4 * WINMM DLL entry point
5 *
6 * Copyright 1998 Sander van Leeuwen (sandervl@xs4all.nl)
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 <os2.h>
30#include <stdlib.h>
31#include <stdio.h>
32#include <string.h>
33#include <builtin.h>
34#include "misc.h" /*PLF Wed 98-03-18 23:19:26*/
35#include "aux.h"
36
37void IRTMidiShutdown(); // IRTMidi shutdown routine
38
39/*-------------------------------------------------------------------*/
40/* _CRT_init is the C run-time environment initialization function. */
41/* It will return 0 to indicate success and -1 to indicate failure. */
42/*-------------------------------------------------------------------*/
43int _CRT_init(void);
44/*-------------------------------------------------------------------*/
45/* _CRT_term is the C run-time environment termination function. */
46/* It only needs to be called when the C run-time functions are */
47/* statically linked. */
48/*-------------------------------------------------------------------*/
49void _CRT_term(void);
50void __ctordtorInit( void );
51void __ctordtorTerm( void );
52
53/*-------------------------------------------------------------------*/
54/* A clean up routine registered with DosExitList must be used if */
55/* runtime calls are required and the runtime is dynamically linked. */
56/* This will guarantee that this clean up routine is run before the */
57/* library DLL is terminated. */
58/*-------------------------------------------------------------------*/
59static void APIENTRY cleanup(ULONG reason);
60
61
62
63/****************************************************************************/
64/* _DLL_InitTerm is the function that gets called by the operating system */
65/* loader when it loads and frees this DLL for each process that accesses */
66/* this DLL. However, it only gets called the first time the DLL is loaded */
67/* and the last time it is freed for a particular process. The system */
68/* linkage convention MUST be used because the operating system loader is */
69/* calling this function. */
70/****************************************************************************/
71unsigned long _System _DLL_InitTerm(unsigned long hModule, unsigned long
72 ulFlag)
73{
74 size_t i;
75 APIRET rc;
76
77 /*-------------------------------------------------------------------------*/
78 /* If ulFlag is zero then the DLL is being loaded so initialization should */
79 /* be performed. If ulFlag is 1 then the DLL is being freed so */
80 /* termination should be performed. */
81 /*-------------------------------------------------------------------------*/
82
83 switch (ulFlag) {
84 case 0 :
85
86 /*******************************************************************/
87 /* The C run-time environment initialization function must be */
88 /* called before any calls to C run-time functions that are not */
89 /* inlined. */
90 /*******************************************************************/
91
92 if (_CRT_init() == -1)
93 return 0UL;
94 __ctordtorInit();
95
96 CheckVersionFromHMOD(PE2LX_VERSION, hModule); /*PLF Wed 98-03-18 05:28:48*/
97
98 /*******************************************************************/
99 /* A DosExitList routine must be used to clean up if runtime calls */
100 /* are required and the runtime is dynamically linked. */
101 /*******************************************************************/
102
103 rc = DosExitList(0x0000FF00|EXLST_ADD, cleanup);
104 if(rc)
105 return 0UL;
106
107 break;
108 case 1 :
109 auxOS2Close(); /* SvL: Close aux device if necessary */
110 break;
111 default :
112 return 0UL;
113 }
114
115 /***********************************************************/
116 /* A non-zero value must be returned to indicate success. */
117 /***********************************************************/
118 return 1UL;
119}
120
121
122static void APIENTRY cleanup(ULONG ulReason)
123{
124 auxOS2Close(); /* SvL: Close aux device if necessary */
125 IRTMidiShutdown; /* JT: Shutdown RT Midi subsystem, if running. */
126 __ctordtorTerm();
127 _CRT_term();
128 DosExitList(EXLST_EXIT, cleanup);
129 return ;
130}
131
Note: See TracBrowser for help on using the repository browser.