1*b30d1939SAndy Fiddaman /***********************************************************************
2*b30d1939SAndy Fiddaman * *
3*b30d1939SAndy Fiddaman * This software is part of the ast package *
4*b30d1939SAndy Fiddaman * Copyright (c) 1985-2011 AT&T Intellectual Property *
5*b30d1939SAndy Fiddaman * and is licensed under the *
6*b30d1939SAndy Fiddaman * Eclipse Public License, Version 1.0 *
7*b30d1939SAndy Fiddaman * by AT&T Intellectual Property *
8*b30d1939SAndy Fiddaman * *
9*b30d1939SAndy Fiddaman * A copy of the License is available at *
10*b30d1939SAndy Fiddaman * http://www.eclipse.org/org/documents/epl-v10.html *
11*b30d1939SAndy Fiddaman * (with md5 checksum b35adb5213ca9657e911e9befb180842) *
12*b30d1939SAndy Fiddaman * *
13*b30d1939SAndy Fiddaman * Information and Software Systems Research *
14*b30d1939SAndy Fiddaman * AT&T Research *
15*b30d1939SAndy Fiddaman * Florham Park NJ *
16*b30d1939SAndy Fiddaman * *
17*b30d1939SAndy Fiddaman * Glenn Fowler <gsf@research.att.com> *
18*b30d1939SAndy Fiddaman * David Korn <dgk@research.att.com> *
19*b30d1939SAndy Fiddaman * Phong Vo <kpv@research.att.com> *
20*b30d1939SAndy Fiddaman * *
21*b30d1939SAndy Fiddaman ***********************************************************************/
22*b30d1939SAndy Fiddaman #pragma prototyped
23*b30d1939SAndy Fiddaman
24*b30d1939SAndy Fiddaman /*
25*b30d1939SAndy Fiddaman * ast dynamic data initialization
26*b30d1939SAndy Fiddaman */
27*b30d1939SAndy Fiddaman
28*b30d1939SAndy Fiddaman #ifdef _UWIN
29*b30d1939SAndy Fiddaman
30*b30d1939SAndy Fiddaman #define _std_def_cfree 1
31*b30d1939SAndy Fiddaman
32*b30d1939SAndy Fiddaman #include <sfio_t.h>
33*b30d1939SAndy Fiddaman #include <ast.h>
34*b30d1939SAndy Fiddaman
35*b30d1939SAndy Fiddaman #undef strcoll
36*b30d1939SAndy Fiddaman
37*b30d1939SAndy Fiddaman #include <ast_windows.h>
38*b30d1939SAndy Fiddaman
39*b30d1939SAndy Fiddaman extern Sfio_t _Sfstdin;
40*b30d1939SAndy Fiddaman extern Sfio_t _Sfstdout;
41*b30d1939SAndy Fiddaman extern Sfio_t _Sfstderr;
42*b30d1939SAndy Fiddaman
43*b30d1939SAndy Fiddaman #include "sfhdr.h"
44*b30d1939SAndy Fiddaman
45*b30d1939SAndy Fiddaman #undef sfstdin
46*b30d1939SAndy Fiddaman #undef sfstdout
47*b30d1939SAndy Fiddaman #undef sfstderr
48*b30d1939SAndy Fiddaman
49*b30d1939SAndy Fiddaman #if defined(__EXPORT__)
50*b30d1939SAndy Fiddaman #define extern __EXPORT__
51*b30d1939SAndy Fiddaman #endif
52*b30d1939SAndy Fiddaman
53*b30d1939SAndy Fiddaman /*
54*b30d1939SAndy Fiddaman * for backward compatibility with early UNIX
55*b30d1939SAndy Fiddaman */
56*b30d1939SAndy Fiddaman
57*b30d1939SAndy Fiddaman extern void
cfree(void * addr)58*b30d1939SAndy Fiddaman cfree(void* addr)
59*b30d1939SAndy Fiddaman {
60*b30d1939SAndy Fiddaman free(addr);
61*b30d1939SAndy Fiddaman }
62*b30d1939SAndy Fiddaman
63*b30d1939SAndy Fiddaman extern void
_ast_libinit(void * in,void * out,void * err)64*b30d1939SAndy Fiddaman _ast_libinit(void* in, void* out, void* err)
65*b30d1939SAndy Fiddaman {
66*b30d1939SAndy Fiddaman Sfio_t* sp;
67*b30d1939SAndy Fiddaman
68*b30d1939SAndy Fiddaman sp = (Sfio_t*)in;
69*b30d1939SAndy Fiddaman *sp = _Sfstdin;
70*b30d1939SAndy Fiddaman sfstdin = sp;
71*b30d1939SAndy Fiddaman sp = (Sfio_t*)out;
72*b30d1939SAndy Fiddaman *sp = _Sfstdout;
73*b30d1939SAndy Fiddaman sfstdout = sp;
74*b30d1939SAndy Fiddaman sp = (Sfio_t*)err;
75*b30d1939SAndy Fiddaman *sp = _Sfstderr;
76*b30d1939SAndy Fiddaman sfstderr = sp;
77*b30d1939SAndy Fiddaman }
78*b30d1939SAndy Fiddaman
79*b30d1939SAndy Fiddaman extern void
_ast_init(void)80*b30d1939SAndy Fiddaman _ast_init(void)
81*b30d1939SAndy Fiddaman {
82*b30d1939SAndy Fiddaman struct _astdll* ap = _ast_getdll();
83*b30d1939SAndy Fiddaman
84*b30d1939SAndy Fiddaman _ast_libinit(ap->_ast_stdin,ap->_ast_stdout,ap->_ast_stderr);
85*b30d1939SAndy Fiddaman }
86*b30d1939SAndy Fiddaman
87*b30d1939SAndy Fiddaman extern void
_ast_exit(void)88*b30d1939SAndy Fiddaman _ast_exit(void)
89*b30d1939SAndy Fiddaman {
90*b30d1939SAndy Fiddaman if (_Sfcleanup)
91*b30d1939SAndy Fiddaman (*_Sfcleanup)();
92*b30d1939SAndy Fiddaman }
93*b30d1939SAndy Fiddaman
94*b30d1939SAndy Fiddaman BOOL WINAPI
DllMain(HINSTANCE hinst,DWORD reason,VOID * reserved)95*b30d1939SAndy Fiddaman DllMain(HINSTANCE hinst, DWORD reason, VOID* reserved)
96*b30d1939SAndy Fiddaman {
97*b30d1939SAndy Fiddaman switch (reason)
98*b30d1939SAndy Fiddaman {
99*b30d1939SAndy Fiddaman case DLL_PROCESS_ATTACH:
100*b30d1939SAndy Fiddaman break;
101*b30d1939SAndy Fiddaman case DLL_PROCESS_DETACH:
102*b30d1939SAndy Fiddaman _ast_exit();
103*b30d1939SAndy Fiddaman break;
104*b30d1939SAndy Fiddaman }
105*b30d1939SAndy Fiddaman return 1;
106*b30d1939SAndy Fiddaman }
107*b30d1939SAndy Fiddaman
108*b30d1939SAndy Fiddaman #else
109*b30d1939SAndy Fiddaman
110*b30d1939SAndy Fiddaman #include <ast.h>
111*b30d1939SAndy Fiddaman
112*b30d1939SAndy Fiddaman #if _dll_data_intercept && ( _DLL_BLD || _BLD_DLL )
113*b30d1939SAndy Fiddaman
114*b30d1939SAndy Fiddaman #undef environ
115*b30d1939SAndy Fiddaman
116*b30d1939SAndy Fiddaman extern char** environ;
117*b30d1939SAndy Fiddaman
118*b30d1939SAndy Fiddaman struct _astdll _ast_dll = { &environ };
119*b30d1939SAndy Fiddaman
120*b30d1939SAndy Fiddaman struct _astdll*
_ast_getdll(void)121*b30d1939SAndy Fiddaman _ast_getdll(void)
122*b30d1939SAndy Fiddaman {
123*b30d1939SAndy Fiddaman return &_ast_dll;
124*b30d1939SAndy Fiddaman }
125*b30d1939SAndy Fiddaman
126*b30d1939SAndy Fiddaman #else
127*b30d1939SAndy Fiddaman
128*b30d1939SAndy Fiddaman NoN(astdynamic)
129*b30d1939SAndy Fiddaman
130*b30d1939SAndy Fiddaman #endif
131*b30d1939SAndy Fiddaman
132*b30d1939SAndy Fiddaman #endif
133