/*
* Copyright (c) 1999-2003, 2005-2007 Apple Inc. All Rights Reserved.
*
* @APPLE_LICENSE_HEADER_START@
*
* This file contains Original Code and/or Modifications of Original Code
* as defined in and that are subject to the Apple Public Source License
* Version 2.0 (the 'License'). You may not use this file except in
* compliance with the License. Please obtain a copy of the License at
* http://www.opensource.apple.com/apsl/ and read it before using this
* file.
*
* The Original Code and all software distributed under the License are
* distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
* EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
* INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
* FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
* Please see the License for the specific language governing rights and
* limitations under the License.
*
* @APPLE_LICENSE_HEADER_END@
*/
/*
* objc-errors.m
* Copyright 1988-2001, NeXT Software, Inc., Apple Computer, Inc.
*/
#include "objc-private.h"
#if TARGET_OS_WIN32
#include <conio.h>
PRIVATE_EXTERN void _objc_inform_on_crash(const char *fmt, ...)
{
}
PRIVATE_EXTERN void _objc_inform(const char *fmt, ...)
{
va_list args;
va_start(args, fmt);
_vcprintf(fmt, args);
va_end(args);
_cprintf("\n");
}
PRIVATE_EXTERN void _objc_fatal(const char *fmt, ...)
{
va_list args;
va_start(args, fmt);
_vcprintf(fmt, args);
va_end(args);
_cprintf("\n");
abort();
}
PRIVATE_EXTERN void __objc_error(id rcv, const char *fmt, ...)
{
va_list args;
va_start(args, fmt);
_vcprintf(fmt, args);
va_end(args);
abort();
}
PRIVATE_EXTERN void _objc_error(id rcv, const char *fmt, va_list args)
{
_vcprintf(fmt, args);
abort();
}
#else
OBJC_EXPORT void (*_error)(id, const char *, va_list);
static void _objc_trap(void) __attribute__((noreturn));
// Add "message" to any forthcoming crash log.
static void _objc_crashlog(const char *message)
{
char *newmsg;
#if 0
{
// for debugging at BOOT time.
extern char **_NSGetProgname(void);
FILE *crashlog = fopen("/_objc_crash.log", "a");
setbuf(crashlog, NULL);
fprintf(crashlog, "[ fclose(crashlog);
sync();
}
#endif
static mutex_t crashlog_lock = MUTEX_INITIALIZER;
mutex_lock(&crashlog_lock);
char *oldmsg = (char *)CRGetCrashLogMessage();
if (!oldmsg) {
newmsg = strdup(message);
} else {
asprintf(&newmsg, " }
if (newmsg) {
// Strip trailing newline
char *c = &newmsg[strlen(newmsg)-1];
if (*c == '\n') *c = '\0';
if (oldmsg) free(oldmsg);
CRSetCrashLogMessage(newmsg);
}
mutex_unlock(&crashlog_lock);
}
// Print "message" to the console.
static void _objc_syslog(const char *message)
{
if (fcntl(STDERR_FILENO, F_GETFL, 0) != -1) {
// stderr is open - use it
write(STDERR_FILENO, message, strlen(message));
if (message[strlen(message)-1] != '\n') {
write(STDERR_FILENO, "\n", 1);
}
} else {
syslog(LOG_ERR, " }
}
/*
* _objc_error is the default *_error handler.
*/
#if __OBJC2__
PRIVATE_EXTERN __attribute__((noreturn))
#else
// used by ExceptionHandling.framework
#endif
void _objc_error(id self, const char *fmt, va_list ap)
{
char *buf1;
char *buf2;
vasprintf(&buf1, fmt, ap);
asprintf(&buf2, "objc[ getpid(), object_getClassName(self), buf1);
_objc_syslog(buf2);
_objc_crashlog(buf2);
_objc_trap();
}
/*
* this routine handles errors that involve an object (or class).
*/
PRIVATE_EXTERN void __objc_error(id rcv, const char *fmt, ...)
{
va_list vp;
va_start(vp,fmt);
#if !__OBJC2__
(*_error)(rcv, fmt, vp);
#endif
_objc_error (rcv, fmt, vp); /* In case (*_error)() returns. */
va_end(vp);
}
/*
* this routine handles severe runtime errors...like not being able
* to read the mach headers, allocate space, etc...very uncommon.
*/
PRIVATE_EXTERN void _objc_fatal(const char *fmt, ...)
{
va_list ap;
char *buf1;
char *buf2;
va_start(ap,fmt);
vasprintf(&buf1, fmt, ap);
va_end (ap);
asprintf(&buf2, "objc[ _objc_syslog(buf2);
_objc_crashlog(buf2);
_objc_trap();
}
/*
* this routine handles soft runtime errors...like not being able
* add a category to a class (because it wasn't linked in).
*/
PRIVATE_EXTERN void _objc_inform(const char *fmt, ...)
{
va_list ap;
char *buf1;
char *buf2;
va_start (ap,fmt);
vasprintf(&buf1, fmt, ap);
va_end (ap);
asprintf(&buf2, "objc[ _objc_syslog(buf2);
free(buf2);
free(buf1);
}
/*
* Like _objc_inform(), but prints the message only in any
* forthcoming crash log, not to the console.
*/
PRIVATE_EXTERN void _objc_inform_on_crash(const char *fmt, ...)
{
va_list ap;
char *buf1;
char *buf2;
va_start (ap,fmt);
vasprintf(&buf1, fmt, ap);
va_end (ap);
asprintf(&buf2, "objc[ _objc_crashlog(buf2);
free(buf2);
free(buf1);
}
/*
* Like calling both _objc_inform and _objc_inform_on_crash.
*/
PRIVATE_EXTERN void _objc_inform_now_and_on_crash(const char *fmt, ...)
{
va_list ap;
char *buf1;
char *buf2;
va_start (ap,fmt);
vasprintf(&buf1, fmt, ap);
va_end (ap);
asprintf(&buf2, "objc[ _objc_crashlog(buf2);
_objc_syslog(buf2);
free(buf2);
free(buf1);
}
/* Kill the process in a way that generates a crash log.
* This is better than calling exit(). */
static void _objc_trap(void)
{
__builtin_trap();
}
/* Try to keep _objc_warn_deprecated out of crash logs
* caused by _objc_trap(). rdar://4546883 */
__attribute__((used))
static void _objc_trap2(void)
{
__builtin_trap();
}
#endif
BREAKPOINT_FUNCTION(
void _objc_warn_deprecated(void)
);
PRIVATE_EXTERN void _objc_inform_deprecated(const char *oldf, const char *newf)
{
if (PrintDeprecation) {
if (newf) {
_objc_inform("The function } else {
_objc_inform("The function }
}
_objc_warn_deprecated();
}