← Back to branch summary

~mingw-w64/mingw-w64/experimental

« back to all changes in this revision

Viewing changes to ros-privexp/mingw-w64-crt/crt/crtdll.c

  • Committer: NightStrike
  • Date: 2010-08-11 22:20:57 UTC
  • Revision ID: svn-v4:4407c894-4637-0410-b4f5-ada5f102cad1:experimental:3266
Branch for adding option for supporting ros

Show diffs side-by-side

added added

removed removed

Lines of Context:
ros-privexp/mingw-w64-crt/crt/crtdll.c
 
1
/**
 
2
 * This file has no copyright assigned and is placed in the Public Domain.
 
3
 * This file is part of the w64 mingw-runtime package.
 
4
 * No warranty is given; refer to the file DISCLAIMER.PD within this package.
 
5
 */
 
6
 
 
7
#ifdef CRTDLL
 
8
#undef CRTDLL
 
9
#ifndef _DLL
 
10
#define _DLL
 
11
#endif
 
12
 
 
13
#include <oscalls.h>
 
14
#include <internal.h>
 
15
#include <stdlib.h>
 
16
#include <windows.h>
 
17
#define _DECL_DLLMAIN
 
18
#include <process.h>
 
19
#include <crtdbg.h>
 
20
 
 
21
#ifndef _CRTIMP
 
22
#ifdef CRTDLL
 
23
#define _CRTIMP __declspec(dllexport)
 
24
#else
 
25
#ifdef _DLL
 
26
#define _CRTIMP __declspec(dllimport)
 
27
#else
 
28
#define _CRTIMP
 
29
#endif
 
30
#endif
 
31
#endif
 
32
#include <sect_attribs.h>
 
33
#include <locale.h>
 
34
 
 
35
extern void __cdecl _initterm(_PVFV *,_PVFV *);
 
36
extern void __main ();
 
37
extern void _pei386_runtime_relocator (void);
 
38
extern _CRTALLOC(".CRT$XIA") _PIFV __xi_a[];
 
39
extern _CRTALLOC(".CRT$XIZ") _PIFV __xi_z[];
 
40
extern _CRTALLOC(".CRT$XCA") _PVFV __xc_a[];
 
41
extern _CRTALLOC(".CRT$XCZ") _PVFV __xc_z[];
 
42
 
 
43
/* TLS initialization hook.  */
 
44
extern const PIMAGE_TLS_CALLBACK __dyn_tls_init_callback;
 
45
 
 
46
static int __proc_attached = 0;
 
47
 
 
48
extern _PVFV *__onexitbegin;
 
49
extern _PVFV *__onexitend;
 
50
 
 
51
extern int mingw_app_type;
 
52
 
 
53
extern WINBOOL WINAPI DllMain (HANDLE hDllHandle, DWORD dwReason, LPVOID lpreserved);
 
54
 
 
55
extern WINBOOL WINAPI DllEntryPoint (HANDLE, DWORD, LPVOID);
 
56
 
 
57
static int pre_c_init (void);
 
58
 
 
59
_CRTALLOC(".CRT$XIAA") _PIFV pcinit = pre_c_init;
 
60
 
 
61
static int
 
62
pre_c_init (void)
 
63
{
 
64
  _PVFV *onexitbegin;
 
65
 
 
66
  onexitbegin = (_PVFV *) malloc (32 * sizeof (_PVFV));
 
67
  __onexitend = __onexitbegin = (_PVFV *) _encode_pointer (onexitbegin);
 
68
 
 
69
  if (onexitbegin == NULL)
 
70
    return 1;
 
71
  *onexitbegin = (_PVFV) NULL;
 
72
  return 0;
 
73
}
 
74
 
 
75
WINBOOL WINAPI _CRT_INIT (HANDLE hDllHandle, DWORD dwReason, LPVOID lpreserved)
 
76
{
 
77
  if (dwReason == DLL_PROCESS_DETACH)
 
78
    {
 
79
      if (__proc_attached > 0)
 
80
        __proc_attached--;
 
81
      else
 
82
        return FALSE;
 
83
    }
 
84
  if (dwReason == DLL_PROCESS_ATTACH)
 
85
    {
 
86
      void *lock_free = NULL;
 
87
      void *fiberid = ((PNT_TIB)NtCurrentTeb ())->StackBase;
 
88
      int nested = FALSE;
 
89
      
 
90
      while ((lock_free = InterlockedCompareExchangePointer ((volatile PVOID *) &__native_startup_lock,
 
91
                                                             fiberid, 0)) != 0)
 
92
        {
 
93
          if (lock_free == fiberid)
 
94
            {
 
95
              nested = TRUE;
 
96
              break;
 
97
            }
 
98
          Sleep(1000);
 
99
        }
 
100
      if (__native_startup_state != __uninitialized)
 
101
        {
 
102
          _amsg_exit(31);
 
103
        }
 
104
      else
 
105
        {
 
106
          __native_startup_state = __initializing;
 
107
          
 
108
          _initterm ((_PVFV *) (void *) __xi_a, (_PVFV *) (void *) __xi_z);
 
109
          _initterm (__xc_a,__xc_z);
 
110
          __native_startup_state = __initialized;
 
111
        }
 
112
      if (! nested)
 
113
        {
 
114
          (void) InterlockedExchangePointer ((volatile PVOID *) &__native_startup_lock, 0);
 
115
        }
 
116
      if (__dyn_tls_init_callback != NULL)
 
117
        {
 
118
          __dyn_tls_init_callback (hDllHandle, DLL_THREAD_ATTACH, lpreserved);
 
119
        }
 
120
      __proc_attached++;
 
121
    }
 
122
  else if (dwReason == DLL_PROCESS_DETACH)
 
123
    {
 
124
      void *lock_free = NULL;
 
125
      while ((lock_free = InterlockedCompareExchangePointer ((volatile PVOID *) &__native_startup_lock,(PVOID) 1, 0)) != 0)
 
126
        {
 
127
          Sleep(1000);
 
128
        }
 
129
      if(__native_startup_state!=__initialized)
 
130
        {
 
131
          _amsg_exit (31);
 
132
        }
 
133
      else
 
134
        {
 
135
          _PVFV * onexitbegin = (_PVFV *) _decode_pointer (__onexitbegin);
 
136
          if (onexitbegin)
 
137
            {
 
138
              _PVFV *onexitend = (_PVFV *) _decode_pointer (__onexitend);
 
139
              while (--onexitend >= onexitbegin)
 
140
                if (*onexitend != NULL)
 
141
                  (**onexitend) ();
 
142
              free (onexitbegin);
 
143
              __onexitbegin = __onexitend = (_PVFV *) NULL;
 
144
            }
 
145
          __native_startup_state = __uninitialized;
 
146
          (void) InterlockedExchangePointer ((volatile PVOID *) &__native_startup_lock, 0);
 
147
        }
 
148
    }
 
149
  return TRUE;
 
150
}
 
151
 
 
152
static WINBOOL __DllMainCRTStartup (HANDLE, DWORD, LPVOID);
 
153
 
 
154
WINBOOL WINAPI DllMainCRTStartup (HANDLE, DWORD, LPVOID);
 
155
int __mingw_init_ehandler (void);
 
156
 
 
157
WINBOOL WINAPI
 
158
DllMainCRTStartup (HANDLE hDllHandle, DWORD dwReason, LPVOID lpreserved)
 
159
{
 
160
  mingw_app_type = 0;
 
161
  if (dwReason == DLL_PROCESS_ATTACH)
 
162
    {
 
163
      __security_init_cookie ();
 
164
#ifdef _WIN64
 
165
      __mingw_init_ehandler ();
 
166
#endif
 
167
    }
 
168
  return __DllMainCRTStartup (hDllHandle, dwReason, lpreserved);
 
169
}
 
170
 
 
171
__declspec(noinline) WINBOOL
 
172
__DllMainCRTStartup (HANDLE hDllHandle, DWORD dwReason, LPVOID lpreserved)
 
173
{
 
174
  WINBOOL retcode = TRUE;
 
175
 
 
176
  __native_dllmain_reason = dwReason;
 
177
  if (dwReason == DLL_PROCESS_DETACH && __proc_attached == 0)
 
178
    {
 
179
        retcode = FALSE;
 
180
        goto i__leave;
 
181
    }
 
182
  if (dwReason == DLL_PROCESS_ATTACH || dwReason == DLL_THREAD_ATTACH)
 
183
    {
 
184
        retcode = DllEntryPoint (hDllHandle, dwReason, lpreserved);
 
185
        if (retcode)
 
186
          retcode = _CRT_INIT (hDllHandle, dwReason, lpreserved);
 
187
        if (! retcode)
 
188
          goto i__leave;
 
189
    }
 
190
  _pei386_runtime_relocator ();
 
191
  if (retcode && dwReason == DLL_PROCESS_ATTACH)
 
192
    __main ();
 
193
  retcode = DllMain(hDllHandle,dwReason,lpreserved);
 
194
  if ((dwReason == DLL_PROCESS_ATTACH) && ! retcode)
 
195
    {
 
196
        DllMain (hDllHandle, DLL_PROCESS_DETACH, lpreserved);
 
197
        _CRT_INIT (hDllHandle, DLL_PROCESS_DETACH, lpreserved);
 
198
        DllEntryPoint (hDllHandle, DLL_PROCESS_DETACH, lpreserved);
 
199
    }
 
200
  if (dwReason == DLL_PROCESS_DETACH || dwReason == DLL_THREAD_DETACH)
 
201
    {
 
202
        if (_CRT_INIT (hDllHandle, dwReason, lpreserved) == FALSE)
 
203
          {
 
204
            retcode = FALSE;
 
205
          }
 
206
        if (retcode)
 
207
          {
 
208
            retcode = DllEntryPoint (hDllHandle, dwReason, lpreserved);
 
209
          }
 
210
    }
 
211
i__leave:
 
212
  __native_dllmain_reason = UINT_MAX;
 
213
  return retcode ;
 
214
}
 
215
#endif