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 char *MSVCRT__pgmptr
;
42 static unsigned int MSVCRT_abort_behavior
= MSVCRT__WRITE_ABORT_MSG
| MSVCRT__CALL_REPORTFAULT
;
44 void (*CDECL _aexit_rtn
)(int) = MSVCRT__exit
;
46 /* INTERNAL: call atexit functions */
47 static void __MSVCRT__call_atexit(void)
49 /* Note: should only be called with the exit lock held */
50 TRACE("%d atext functions to call\n", MSVCRT_atexit_registered
);
51 /* Last registered gets executed first */
52 while (MSVCRT_atexit_registered
> 0)
54 MSVCRT_atexit_registered
--;
55 TRACE("next is %p\n",MSVCRT_atexit_table
[MSVCRT_atexit_registered
]);
56 if (MSVCRT_atexit_table
[MSVCRT_atexit_registered
])
57 (*MSVCRT_atexit_table
[MSVCRT_atexit_registered
])();
62 /*********************************************************************
63 * __dllonexit (MSVCRT.@)
65 MSVCRT__onexit_t CDECL
__dllonexit(MSVCRT__onexit_t func
, MSVCRT__onexit_t
**start
, MSVCRT__onexit_t
**end
)
67 MSVCRT__onexit_t
*tmp
;
70 TRACE("(%p,%p,%p)\n", func
, start
, end
);
72 if (!start
|| !*start
|| !end
|| !*end
)
78 len
= (*end
- *start
);
80 TRACE("table start %p-%p, %d entries\n", *start
, *end
, len
);
85 tmp
= MSVCRT_realloc(*start
, len
* sizeof(tmp
));
91 TRACE("new table start %p-%p, %d entries\n", *start
, *end
, len
);
95 /*********************************************************************
98 void CDECL
MSVCRT__exit(int exitcode
)
100 TRACE("(%d)\n", exitcode
);
101 ExitProcess(exitcode
);
104 /* Print out an error message with an option to debug */
105 static void DoMessageBox(LPCSTR lead
, LPCSTR message
)
107 MSGBOXPARAMSA msgbox
;
111 snprintf(text
,sizeof(text
),"%s\n\nProgram: %s\n%s\n\n"
112 "Press OK to exit the program, or Cancel to start the Wine debugger.\n ",
113 lead
, MSVCRT__pgmptr
, message
);
115 msgbox
.cbSize
= sizeof(msgbox
);
116 msgbox
.hwndOwner
= GetActiveWindow();
117 msgbox
.hInstance
= 0;
118 msgbox
.lpszText
= text
;
119 msgbox
.lpszCaption
= szMsgBoxTitle
;
120 msgbox
.dwStyle
= MB_OKCANCEL
|MB_ICONERROR
;
121 msgbox
.lpszIcon
= NULL
;
122 msgbox
.dwContextHelpId
= 0;
123 msgbox
.lpfnMsgBoxCallback
= NULL
;
124 msgbox
.dwLanguageId
= LANG_NEUTRAL
;
126 ret
= MessageBoxIndirectA(&msgbox
);
131 /*********************************************************************
132 * _amsg_exit (MSVCRT.@)
134 void CDECL
_amsg_exit(int errnum
)
136 TRACE("(%d)\n", errnum
);
137 /* FIXME: text for the error number. */
138 if (MSVCRT_app_type
== 2)
141 sprintf(text
, "Error: R60%d",errnum
);
142 DoMessageBox("Runtime error!", text
);
145 _cprintf("\nruntime error R60%d\n",errnum
);
149 /*********************************************************************
152 void CDECL
MSVCRT_abort(void)
156 if (MSVCRT_abort_behavior
& MSVCRT__WRITE_ABORT_MSG
)
158 if (MSVCRT_app_type
== 2)
160 DoMessageBox("Runtime error!", "abnormal program termination");
163 _cputs("\nabnormal program termination\n");
165 MSVCRT_raise(MSVCRT_SIGABRT
);
166 /* in case raise() returns */
170 /*********************************************************************
171 * _set_abort_behavior (MSVCRT.@)
173 * Not exported by native msvcrt, added in msvcr80
175 unsigned int CDECL
MSVCRT__set_abort_behavior(unsigned int flags
, unsigned int mask
)
177 unsigned int old
= MSVCRT_abort_behavior
;
179 TRACE("%x, %x\n", flags
, mask
);
180 if (mask
& MSVCRT__CALL_REPORTFAULT
)
181 FIXME("_WRITE_CALL_REPORTFAULT unhandled\n");
183 MSVCRT_abort_behavior
= (MSVCRT_abort_behavior
& ~mask
) | (flags
& mask
);
187 /*********************************************************************
190 void CDECL
MSVCRT__assert(const char* str
, const char* file
, unsigned int line
)
192 TRACE("(%s,%s,%d)\n",str
,file
,line
);
193 if (MSVCRT_app_type
== 2)
196 snprintf(text
, sizeof(text
), "File: %s\nLine: %d\n\nExpression: \"%s\"", file
, line
, str
);
197 DoMessageBox("Assertion failed!", text
);
200 _cprintf("Assertion failed: %s, file %s, line %d\n\n",str
, file
, line
);
201 MSVCRT_raise(MSVCRT_SIGABRT
);
202 /* in case raise() returns */
206 /*********************************************************************
209 void CDECL
MSVCRT__c_exit(void)
212 /* All cleanup is done on DLL detach; Return to caller */
215 /*********************************************************************
218 void CDECL
MSVCRT__cexit(void)
222 __MSVCRT__call_atexit();
226 /*********************************************************************
229 MSVCRT__onexit_t CDECL
MSVCRT__onexit(MSVCRT__onexit_t func
)
231 TRACE("(%p)\n",func
);
237 if (MSVCRT_atexit_registered
> MSVCRT_atexit_table_size
- 1)
239 MSVCRT__onexit_t
*newtable
;
240 TRACE("expanding table\n");
241 newtable
= MSVCRT_calloc(sizeof(void *),MSVCRT_atexit_table_size
+ 32);
248 memcpy (newtable
, MSVCRT_atexit_table
, MSVCRT_atexit_table_size
);
249 MSVCRT_atexit_table_size
+= 32;
250 MSVCRT_free (MSVCRT_atexit_table
);
251 MSVCRT_atexit_table
= newtable
;
253 MSVCRT_atexit_table
[MSVCRT_atexit_registered
] = func
;
254 MSVCRT_atexit_registered
++;
259 /*********************************************************************
262 void CDECL
MSVCRT_exit(int exitcode
)
264 TRACE("(%d)\n",exitcode
);
266 ExitProcess(exitcode
);
269 /*********************************************************************
272 int CDECL
MSVCRT_atexit(void (*func
)(void))
274 TRACE("(%p)\n", func
);
275 return MSVCRT__onexit((MSVCRT__onexit_t
)func
) == (MSVCRT__onexit_t
)func
? 0 : -1;
278 /* _set_purecall_handler - not exported in native msvcrt */
279 MSVCRT_purecall_handler CDECL
_set_purecall_handler(MSVCRT_purecall_handler function
)
281 MSVCRT_purecall_handler ret
= purecall_handler
;
283 TRACE("(%p)\n", function
);
284 purecall_handler
= function
;
288 /*********************************************************************
289 * _purecall (MSVCRT.@)
291 void CDECL
_purecall(void)