2 * msvcrt.dll exit functions
4 * Copyright 2000 Jon Griffiths
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
24 #include "wine/debug.h"
26 WINE_DEFAULT_DEBUG_CHANNEL(msvcrt
);
29 #define LOCK_EXIT _mlock(_EXIT_LOCK1)
30 #define UNLOCK_EXIT _munlock(_EXIT_LOCK1)
32 static MSVCRT__onexit_t
*MSVCRT_atexit_table
= NULL
;
33 static int MSVCRT_atexit_table_size
= 0;
34 static int MSVCRT_atexit_registered
= 0; /* Points to free slot */
35 static MSVCRT_purecall_handler purecall_handler
= NULL
;
37 static const char szMsgBoxTitle
[] = "Wine C++ Runtime Library";
39 extern int MSVCRT_app_type
;
40 extern MSVCRT_wchar_t
*MSVCRT__wpgmptr
;
42 static unsigned int MSVCRT_abort_behavior
= MSVCRT__WRITE_ABORT_MSG
| MSVCRT__CALL_REPORTFAULT
;
43 static int MSVCRT_error_mode
= MSVCRT__OUT_TO_DEFAULT
;
45 void (*CDECL _aexit_rtn
)(int) = MSVCRT__exit
;
47 /* INTERNAL: call atexit functions */
48 static void __MSVCRT__call_atexit(void)
50 /* Note: should only be called with the exit lock held */
51 TRACE("%d atext functions to call\n", MSVCRT_atexit_registered
);
52 /* Last registered gets executed first */
53 while (MSVCRT_atexit_registered
> 0)
55 MSVCRT_atexit_registered
--;
56 TRACE("next is %p\n",MSVCRT_atexit_table
[MSVCRT_atexit_registered
]);
57 if (MSVCRT_atexit_table
[MSVCRT_atexit_registered
])
58 (*MSVCRT_atexit_table
[MSVCRT_atexit_registered
])();
63 /*********************************************************************
64 * __dllonexit (MSVCRT.@)
66 MSVCRT__onexit_t CDECL
__dllonexit(MSVCRT__onexit_t func
, MSVCRT__onexit_t
**start
, MSVCRT__onexit_t
**end
)
68 MSVCRT__onexit_t
*tmp
;
71 TRACE("(%p,%p,%p)\n", func
, start
, end
);
73 if (!start
|| !*start
|| !end
|| !*end
)
79 len
= (*end
- *start
);
81 TRACE("table start %p-%p, %d entries\n", *start
, *end
, len
);
86 tmp
= MSVCRT_realloc(*start
, len
* sizeof(*tmp
));
92 TRACE("new table start %p-%p, %d entries\n", *start
, *end
, len
);
96 /*********************************************************************
99 void CDECL
MSVCRT__exit(int exitcode
)
101 TRACE("(%d)\n", exitcode
);
102 ExitProcess(exitcode
);
105 /* Print out an error message with an option to debug */
106 static void DoMessageBoxW(const MSVCRT_wchar_t
*lead
, const MSVCRT_wchar_t
*message
)
108 static const MSVCRT_wchar_t message_format
[] = {'%','s','\n','\n','P','r','o','g','r','a','m',':',' ','%','s','\n',
109 '%','s','\n','\n','P','r','e','s','s',' ','O','K',' ','t','o',' ','e','x','i','t',' ','t','h','e',' ',
110 'p','r','o','g','r','a','m',',',' ','o','r',' ','C','a','n','c','e','l',' ','t','o',' ','s','t','a','r','t',' ',
111 't','h','e',' ','W','i','n','e',' ','d','e','b','b','u','g','e','r','.','\n',0};
113 MSGBOXPARAMSW msgbox
;
114 MSVCRT_wchar_t text
[2048];
117 MSVCRT__snwprintf(text
,sizeof(text
),message_format
, lead
, MSVCRT__wpgmptr
, message
);
119 msgbox
.cbSize
= sizeof(msgbox
);
120 msgbox
.hwndOwner
= GetActiveWindow();
121 msgbox
.hInstance
= 0;
122 msgbox
.lpszText
= (LPCWSTR
)text
;
123 msgbox
.lpszCaption
= (LPCWSTR
)szMsgBoxTitle
;
124 msgbox
.dwStyle
= MB_OKCANCEL
|MB_ICONERROR
;
125 msgbox
.lpszIcon
= NULL
;
126 msgbox
.dwContextHelpId
= 0;
127 msgbox
.lpfnMsgBoxCallback
= NULL
;
128 msgbox
.dwLanguageId
= LANG_NEUTRAL
;
130 ret
= MessageBoxIndirectW(&msgbox
);
135 static void DoMessageBox(const char *lead
, const char *message
)
137 MSVCRT_wchar_t leadW
[1024], messageW
[1024];
139 MSVCRT_mbstowcs(leadW
, lead
, 1024);
140 MSVCRT_mbstowcs(messageW
, message
, 1024);
142 DoMessageBoxW(leadW
, messageW
);
145 /*********************************************************************
146 * _amsg_exit (MSVCRT.@)
148 void CDECL
_amsg_exit(int errnum
)
150 TRACE("(%d)\n", errnum
);
152 if ((MSVCRT_error_mode
== MSVCRT__OUT_TO_MSGBOX
) ||
153 ((MSVCRT_error_mode
== MSVCRT__OUT_TO_DEFAULT
) && (MSVCRT_app_type
== 2)))
156 sprintf(text
, "Error: R60%d",errnum
);
157 DoMessageBox("Runtime error!", text
);
160 _cprintf("\nruntime error R60%d\n",errnum
);
164 /*********************************************************************
167 void CDECL
MSVCRT_abort(void)
171 if (MSVCRT_abort_behavior
& MSVCRT__WRITE_ABORT_MSG
)
173 if ((MSVCRT_error_mode
== MSVCRT__OUT_TO_MSGBOX
) ||
174 ((MSVCRT_error_mode
== MSVCRT__OUT_TO_DEFAULT
) && (MSVCRT_app_type
== 2)))
176 DoMessageBox("Runtime error!", "abnormal program termination");
179 _cputs("\nabnormal program termination\n");
181 MSVCRT_raise(MSVCRT_SIGABRT
);
182 /* in case raise() returns */
186 /*********************************************************************
187 * _set_abort_behavior (MSVCRT.@)
189 * Not exported by native msvcrt, added in msvcr80
191 unsigned int CDECL
MSVCRT__set_abort_behavior(unsigned int flags
, unsigned int mask
)
193 unsigned int old
= MSVCRT_abort_behavior
;
195 TRACE("%x, %x\n", flags
, mask
);
196 if (mask
& MSVCRT__CALL_REPORTFAULT
)
197 FIXME("_WRITE_CALL_REPORTFAULT unhandled\n");
199 MSVCRT_abort_behavior
= (MSVCRT_abort_behavior
& ~mask
) | (flags
& mask
);
203 /*********************************************************************
204 * _wassert (MSVCRT.@)
206 void CDECL
MSVCRT__wassert(const MSVCRT_wchar_t
* str
, const MSVCRT_wchar_t
* file
, unsigned int line
)
208 static const MSVCRT_wchar_t assertion_failed
[] = {'A','s','s','e','r','t','i','o','n',' ','f','a','i','l','e','d','!',0};
209 static const MSVCRT_wchar_t format_msgbox
[] = {'F','i','l','e',':',' ','%','s','\n','L','i','n','e',':',' ','%','d',
210 '\n','\n','E','x','p','r','e','s','s','i','o','n',':',' ','\"','%','s','\"',0};
211 static const MSVCRT_wchar_t format_console
[] = {'A','s','s','e','r','t','i','o','n',' ','f','a','i','l','e','d',':',' ',
212 '%','s',',',' ','f','i','l','e',' ','%','s',',',' ','l','i','n','e',' ','%','d','\n','\n',0};
214 TRACE("(%s,%s,%d)\n", debugstr_w(str
), debugstr_w(file
), line
);
216 if ((MSVCRT_error_mode
== MSVCRT__OUT_TO_MSGBOX
) ||
217 ((MSVCRT_error_mode
== MSVCRT__OUT_TO_DEFAULT
) && (MSVCRT_app_type
== 2)))
219 MSVCRT_wchar_t text
[2048];
220 MSVCRT__snwprintf(text
, sizeof(text
), format_msgbox
, file
, line
, str
);
221 DoMessageBoxW(assertion_failed
, text
);
224 _cwprintf(format_console
, str
, file
, line
);
226 MSVCRT_raise(MSVCRT_SIGABRT
);
230 /*********************************************************************
233 void CDECL
MSVCRT__assert(const char* str
, const char* file
, unsigned int line
)
235 MSVCRT_wchar_t strW
[1024], fileW
[1024];
237 MSVCRT_mbstowcs(strW
, str
, 1024);
238 MSVCRT_mbstowcs(fileW
, file
, 1024);
240 MSVCRT__wassert(strW
, fileW
, line
);
243 /*********************************************************************
246 void CDECL
MSVCRT__c_exit(void)
249 /* All cleanup is done on DLL detach; Return to caller */
252 /*********************************************************************
255 void CDECL
MSVCRT__cexit(void)
259 __MSVCRT__call_atexit();
263 /*********************************************************************
266 MSVCRT__onexit_t CDECL
MSVCRT__onexit(MSVCRT__onexit_t func
)
268 TRACE("(%p)\n",func
);
274 if (MSVCRT_atexit_registered
> MSVCRT_atexit_table_size
- 1)
276 MSVCRT__onexit_t
*newtable
;
277 TRACE("expanding table\n");
278 newtable
= MSVCRT_calloc(sizeof(void *),MSVCRT_atexit_table_size
+ 32);
285 memcpy (newtable
, MSVCRT_atexit_table
, MSVCRT_atexit_table_size
);
286 MSVCRT_atexit_table_size
+= 32;
287 MSVCRT_free (MSVCRT_atexit_table
);
288 MSVCRT_atexit_table
= newtable
;
290 MSVCRT_atexit_table
[MSVCRT_atexit_registered
] = func
;
291 MSVCRT_atexit_registered
++;
296 /*********************************************************************
299 void CDECL
MSVCRT_exit(int exitcode
)
302 static const WCHAR mscoreeW
[] = {'m','s','c','o','r','e','e',0};
303 void WINAPI (*pCorExitProcess
)(int);
305 TRACE("(%d)\n",exitcode
);
308 hmscoree
= GetModuleHandleW(mscoreeW
);
312 pCorExitProcess
= (void*)GetProcAddress(hmscoree
, "CorExitProcess");
315 pCorExitProcess(exitcode
);
318 ExitProcess(exitcode
);
321 /*********************************************************************
324 int CDECL
MSVCRT_atexit(void (*func
)(void))
326 TRACE("(%p)\n", func
);
327 return MSVCRT__onexit((MSVCRT__onexit_t
)func
) == (MSVCRT__onexit_t
)func
? 0 : -1;
330 /* _set_purecall_handler - not exported in native msvcrt */
331 MSVCRT_purecall_handler CDECL
_set_purecall_handler(MSVCRT_purecall_handler function
)
333 MSVCRT_purecall_handler ret
= purecall_handler
;
335 TRACE("(%p)\n", function
);
336 purecall_handler
= function
;
340 /*********************************************************************
341 * _purecall (MSVCRT.@)
343 void CDECL
_purecall(void)
352 /******************************************************************************
353 * _set_error_mode (MSVCRT.@)
355 * Set the error mode, which describes where the C run-time writes error messages.
358 * mode - the new error mode
361 * The old error mode.
364 int CDECL
_set_error_mode(int mode
)
367 const int old
= MSVCRT_error_mode
;
368 if ( MSVCRT__REPORT_ERRMODE
!= mode
) {
369 MSVCRT_error_mode
= mode
;