зеркало из https://github.com/mozilla/pjs.git
521 строка
14 KiB
C++
521 строка
14 KiB
C++
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
|
|
/* ***** BEGIN LICENSE BLOCK *****
|
|
* Version: MPL 1.1/GPL 2.0/LGPL 2.1
|
|
*
|
|
* The contents of this file are subject to the Mozilla Public License Version
|
|
* 1.1 (the "License"); you may not use this file except in compliance with
|
|
* the License. You may obtain a copy of the License at
|
|
* http://www.mozilla.org/MPL/
|
|
*
|
|
* Software distributed under the License is distributed on an "AS IS" basis,
|
|
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
|
|
* for the specific language governing rights and limitations under the
|
|
* License.
|
|
*
|
|
* The Original Code is mozilla.org code.
|
|
*
|
|
* The Initial Developer of the Original Code is
|
|
* Netscape Communications Corporation.
|
|
* Portions created by the Initial Developer are Copyright (C) 1998
|
|
* the Initial Developer. All Rights Reserved.
|
|
*
|
|
* Contributor(s):
|
|
* IBM Corp.
|
|
* Henry Sobotka
|
|
* Benjamin Smedberg <benjamin@smedbergs.us>
|
|
*
|
|
* Alternatively, the contents of this file may be used under the terms of
|
|
* either of the GNU General Public License Version 2 or later (the "GPL"),
|
|
* or the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
|
|
* in which case the provisions of the GPL or the LGPL are applicable instead
|
|
* of those above. If you wish to allow use of your version of this file only
|
|
* under the terms of either the GPL or the LGPL, and not to allow others to
|
|
* use your version of this file under the terms of the MPL, indicate your
|
|
* decision by deleting the provisions above and replace them with the notice
|
|
* and other provisions required by the GPL or the LGPL. If you do not delete
|
|
* the provisions above, a recipient may use your version of this file under
|
|
* the terms of any one of the MPL, the GPL or the LGPL.
|
|
*
|
|
* ***** END LICENSE BLOCK ***** */
|
|
|
|
#include "nsDebugImpl.h"
|
|
#include "nsDebug.h"
|
|
#include "prprf.h"
|
|
#include "prlog.h"
|
|
#include "prinit.h"
|
|
#include "plstr.h"
|
|
#include "nsError.h"
|
|
#include "prerror.h"
|
|
#include "prerr.h"
|
|
#include "prenv.h"
|
|
|
|
#if defined(XP_BEOS)
|
|
/* For DEBUGGER macros */
|
|
#include <Debug.h>
|
|
#endif
|
|
|
|
#if defined(XP_UNIX) || defined(_WIN32) || defined(XP_OS2) || defined(XP_BEOS)
|
|
/* for abort() and getenv() */
|
|
#include <stdlib.h>
|
|
#endif
|
|
|
|
#include "nsTraceRefcntImpl.h"
|
|
#include "nsISupportsUtils.h"
|
|
|
|
#if defined(XP_UNIX)
|
|
#include <signal.h>
|
|
#endif
|
|
|
|
static void
|
|
Abort(const char *aMsg);
|
|
|
|
static void
|
|
Break(const char *aMsg);
|
|
|
|
#if defined(XP_OS2)
|
|
# define INCL_WINDIALOGS // need for WinMessageBox
|
|
# include <os2.h>
|
|
# include <string.h>
|
|
#endif /* XP_OS2 */
|
|
|
|
#if defined(_WIN32)
|
|
#include <windows.h>
|
|
#include <signal.h>
|
|
#include <malloc.h> // for _alloca
|
|
#elif defined(XP_UNIX)
|
|
#include <stdlib.h>
|
|
#endif
|
|
|
|
/*
|
|
* Determine if debugger is present in windows.
|
|
*/
|
|
#if defined (_WIN32)
|
|
|
|
typedef WINBASEAPI BOOL (WINAPI* LPFNISDEBUGGERPRESENT)();
|
|
PRBool InDebugger()
|
|
{
|
|
#ifndef WINCE
|
|
PRBool fReturn = PR_FALSE;
|
|
LPFNISDEBUGGERPRESENT lpfnIsDebuggerPresent = NULL;
|
|
HINSTANCE hKernel = LoadLibrary("Kernel32.dll");
|
|
|
|
if(hKernel)
|
|
{
|
|
lpfnIsDebuggerPresent =
|
|
(LPFNISDEBUGGERPRESENT)GetProcAddress(hKernel, "IsDebuggerPresent");
|
|
if(lpfnIsDebuggerPresent)
|
|
{
|
|
fReturn = (*lpfnIsDebuggerPresent)();
|
|
}
|
|
FreeLibrary(hKernel);
|
|
}
|
|
|
|
return fReturn;
|
|
#else
|
|
return PR_FALSE;
|
|
#endif
|
|
}
|
|
|
|
#endif /* WIN32*/
|
|
|
|
NS_IMPL_QUERY_INTERFACE1(nsDebugImpl, nsIDebug)
|
|
|
|
NS_IMETHODIMP_(nsrefcnt)
|
|
nsDebugImpl::AddRef()
|
|
{
|
|
return 2;
|
|
}
|
|
|
|
NS_IMETHODIMP_(nsrefcnt)
|
|
nsDebugImpl::Release()
|
|
{
|
|
return 1;
|
|
}
|
|
|
|
NS_IMETHODIMP
|
|
nsDebugImpl::Assertion(const char *aStr, const char *aExpr,
|
|
const char *aFile, PRInt32 aLine)
|
|
{
|
|
NS_DebugBreak(NS_DEBUG_ASSERTION, aStr, aExpr, aFile, aLine);
|
|
return NS_OK;
|
|
}
|
|
|
|
NS_IMETHODIMP
|
|
nsDebugImpl::Warning(const char *aStr, const char *aFile, PRInt32 aLine)
|
|
{
|
|
NS_DebugBreak(NS_DEBUG_WARNING, aStr, nsnull, aFile, aLine);
|
|
return NS_OK;
|
|
}
|
|
|
|
NS_IMETHODIMP
|
|
nsDebugImpl::Break(const char *aFile, PRInt32 aLine)
|
|
{
|
|
NS_DebugBreak(NS_DEBUG_BREAK, nsnull, nsnull, aFile, aLine);
|
|
return NS_OK;
|
|
}
|
|
|
|
NS_IMETHODIMP
|
|
nsDebugImpl::Abort(const char *aFile, PRInt32 aLine)
|
|
{
|
|
NS_DebugBreak(NS_DEBUG_ABORT, nsnull, nsnull, aFile, aLine);
|
|
return NS_OK;
|
|
}
|
|
|
|
/**
|
|
* Implementation of the nsDebug methods. Note that this code is
|
|
* always compiled in, in case some other module that uses it is
|
|
* compiled with debugging even if this library is not.
|
|
*/
|
|
static PRLogModuleInfo* gDebugLog;
|
|
|
|
static void InitLog(void)
|
|
{
|
|
if (0 == gDebugLog) {
|
|
gDebugLog = PR_NewLogModule("nsDebug");
|
|
gDebugLog->level = PR_LOG_DEBUG;
|
|
}
|
|
}
|
|
|
|
enum nsAssertBehavior {
|
|
NS_ASSERT_UNINITIALIZED,
|
|
NS_ASSERT_WARN,
|
|
NS_ASSERT_SUSPEND,
|
|
NS_ASSERT_STACK,
|
|
NS_ASSERT_TRAP,
|
|
NS_ASSERT_ABORT,
|
|
NS_ASSERT_STACK_AND_ABORT
|
|
};
|
|
|
|
static nsAssertBehavior GetAssertBehavior()
|
|
{
|
|
static nsAssertBehavior gAssertBehavior = NS_ASSERT_UNINITIALIZED;
|
|
if (gAssertBehavior != NS_ASSERT_UNINITIALIZED)
|
|
return gAssertBehavior;
|
|
|
|
#if defined(XP_WIN) || defined(XP_OS2)
|
|
gAssertBehavior = NS_ASSERT_TRAP;
|
|
#else
|
|
gAssertBehavior = NS_ASSERT_WARN;
|
|
#endif
|
|
|
|
const char *assertString = PR_GetEnv("XPCOM_DEBUG_BREAK");
|
|
if (!assertString || !*assertString)
|
|
return gAssertBehavior;
|
|
|
|
if (!strcmp(assertString, "warn"))
|
|
return gAssertBehavior = NS_ASSERT_WARN;
|
|
|
|
if (!strcmp(assertString, "suspend"))
|
|
return gAssertBehavior = NS_ASSERT_SUSPEND;
|
|
|
|
if (!strcmp(assertString, "stack"))
|
|
return gAssertBehavior = NS_ASSERT_STACK;
|
|
|
|
if (!strcmp(assertString, "abort"))
|
|
return gAssertBehavior = NS_ASSERT_ABORT;
|
|
|
|
if (!strcmp(assertString, "trap") || !strcmp(assertString, "break"))
|
|
return gAssertBehavior = NS_ASSERT_TRAP;
|
|
|
|
if (!strcmp(assertString, "stack-and-abort"))
|
|
return gAssertBehavior = NS_ASSERT_STACK_AND_ABORT;
|
|
|
|
fprintf(stderr, "Unrecognized value of XPCOM_DEBUG_BREAK\n");
|
|
return gAssertBehavior;
|
|
}
|
|
|
|
struct FixedBuffer
|
|
{
|
|
FixedBuffer() : curlen(0) { buffer[0] = '\0'; }
|
|
|
|
char buffer[1000];
|
|
PRUint32 curlen;
|
|
};
|
|
|
|
static PRIntn
|
|
StuffFixedBuffer(void *closure, const char *buf, PRUint32 len)
|
|
{
|
|
if (!len)
|
|
return 0;
|
|
|
|
FixedBuffer *fb = (FixedBuffer*) closure;
|
|
|
|
// strip the trailing null, we add it again later
|
|
if (buf[len - 1] == '\0')
|
|
--len;
|
|
|
|
if (fb->curlen + len >= sizeof(fb->buffer))
|
|
len = sizeof(fb->buffer) - fb->curlen - 1;
|
|
|
|
if (len) {
|
|
memcpy(fb->buffer + fb->curlen, buf, len);
|
|
fb->curlen += len;
|
|
fb->buffer[fb->curlen] = '\0';
|
|
}
|
|
|
|
return len;
|
|
}
|
|
|
|
EXPORT_XPCOM_API(void)
|
|
NS_DebugBreak(PRUint32 aSeverity, const char *aStr, const char *aExpr,
|
|
const char *aFile, PRInt32 aLine)
|
|
{
|
|
InitLog();
|
|
|
|
FixedBuffer buf;
|
|
PRLogModuleLevel ll = PR_LOG_WARNING;
|
|
const char *sevString = "WARNING";
|
|
|
|
switch (aSeverity) {
|
|
case NS_DEBUG_ASSERTION:
|
|
sevString = "###!!! ASSERTION";
|
|
ll = PR_LOG_ERROR;
|
|
break;
|
|
|
|
case NS_DEBUG_BREAK:
|
|
sevString = "###!!! BREAK";
|
|
ll = PR_LOG_ALWAYS;
|
|
break;
|
|
|
|
case NS_DEBUG_ABORT:
|
|
sevString = "###!!! ABORT";
|
|
ll = PR_LOG_ALWAYS;
|
|
break;
|
|
|
|
default:
|
|
aSeverity = NS_DEBUG_WARNING;
|
|
};
|
|
|
|
PR_sxprintf(StuffFixedBuffer, &buf, "%s: ", sevString);
|
|
|
|
if (aStr)
|
|
PR_sxprintf(StuffFixedBuffer, &buf, "%s: ", aStr);
|
|
|
|
if (aExpr)
|
|
PR_sxprintf(StuffFixedBuffer, &buf, "'%s', ", aExpr);
|
|
|
|
if (aFile)
|
|
PR_sxprintf(StuffFixedBuffer, &buf, "file %s, ", aFile);
|
|
|
|
if (aLine != -1)
|
|
PR_sxprintf(StuffFixedBuffer, &buf, "line %d", aLine);
|
|
|
|
// Write out the message to the debug log
|
|
PR_LOG(gDebugLog, ll, ("%s", buf.buffer));
|
|
PR_LogFlush();
|
|
|
|
// errors on platforms without a debugdlg ring a bell on stderr
|
|
#if !defined(XP_WIN) && !defined(XP_OS2)
|
|
if (ll != PR_LOG_WARNING)
|
|
fprintf(stderr, "\07");
|
|
#endif
|
|
|
|
// Write the message to stderr
|
|
fprintf(stderr, "%s\n", buf.buffer);
|
|
fflush(stderr);
|
|
|
|
switch (aSeverity) {
|
|
case NS_DEBUG_WARNING:
|
|
return;
|
|
|
|
case NS_DEBUG_BREAK:
|
|
Break(buf.buffer);
|
|
return;
|
|
|
|
case NS_DEBUG_ABORT:
|
|
nsTraceRefcntImpl::WalkTheStack(stderr);
|
|
Abort(buf.buffer);
|
|
return;
|
|
}
|
|
|
|
// Now we deal with assertions
|
|
|
|
switch (GetAssertBehavior()) {
|
|
case NS_ASSERT_WARN:
|
|
return;
|
|
|
|
case NS_ASSERT_SUSPEND:
|
|
#ifdef XP_UNIX
|
|
fprintf(stderr, "Suspending process; attach with the debugger.\n");
|
|
kill(0, SIGSTOP);
|
|
#else
|
|
Break(buf.buffer);
|
|
#endif
|
|
return;
|
|
|
|
case NS_ASSERT_STACK:
|
|
nsTraceRefcntImpl::WalkTheStack(stderr);
|
|
return;
|
|
|
|
case NS_ASSERT_STACK_AND_ABORT:
|
|
nsTraceRefcntImpl::WalkTheStack(stderr);
|
|
// Fall through to abort
|
|
|
|
case NS_ASSERT_ABORT:
|
|
Abort(buf.buffer);
|
|
return;
|
|
|
|
case NS_ASSERT_TRAP:
|
|
Break(buf.buffer);
|
|
}
|
|
}
|
|
|
|
static void
|
|
Abort(const char *aMsg)
|
|
{
|
|
#if defined(_WIN32)
|
|
//This should exit us
|
|
raise(SIGABRT);
|
|
//If we are ignored exit this way..
|
|
_exit(3);
|
|
#elif defined(XP_UNIX)
|
|
PR_Abort();
|
|
#elif defined(XP_BEOS)
|
|
{
|
|
#ifndef DEBUG_cls
|
|
DEBUGGER(aMsg);
|
|
#endif
|
|
}
|
|
#else
|
|
// Don't know how to abort on this platform! call Break() instead
|
|
Break(aMsg);
|
|
#endif
|
|
}
|
|
|
|
// Abort() calls this function, don't call it!
|
|
static void
|
|
Break(const char *aMsg)
|
|
{
|
|
#if defined(_WIN32)
|
|
#ifndef WINCE // we really just want to crash for now
|
|
static int ignoreDebugger;
|
|
if (!ignoreDebugger) {
|
|
const char *shouldIgnoreDebugger = getenv("XPCOM_DEBUG_DLG");
|
|
ignoreDebugger = 1 + (shouldIgnoreDebugger && !strcmp(shouldIgnoreDebugger, "1"));
|
|
}
|
|
if((ignoreDebugger == 2) || !InDebugger()) {
|
|
DWORD code = IDRETRY;
|
|
|
|
/* Create the debug dialog out of process to avoid the crashes caused by
|
|
* Windows events leaking into our event loop from an in process dialog.
|
|
* We do this by launching windbgdlg.exe (built in xpcom/windbgdlg).
|
|
* See http://bugzilla.mozilla.org/show_bug.cgi?id=54792
|
|
*/
|
|
PROCESS_INFORMATION pi;
|
|
STARTUPINFO si;
|
|
char executable[MAX_PATH];
|
|
char* pName;
|
|
|
|
memset(&pi, 0, sizeof(pi));
|
|
|
|
memset(&si, 0, sizeof(si));
|
|
si.cb = sizeof(si);
|
|
si.wShowWindow = SW_SHOW;
|
|
|
|
// 2nd arg of CreateProcess is in/out
|
|
char *msgCopy = (char*) _alloca(strlen(aMsg) + 1);
|
|
strcpy(msgCopy, aMsg);
|
|
|
|
if(GetModuleFileName(GetModuleHandle("xpcom.dll"), executable, MAX_PATH) &&
|
|
NULL != (pName = strrchr(executable, '\\')) &&
|
|
NULL != strcpy(pName+1, "windbgdlg.exe") &&
|
|
CreateProcess(executable, msgCopy, NULL, NULL, PR_FALSE,
|
|
DETACHED_PROCESS | NORMAL_PRIORITY_CLASS,
|
|
NULL, NULL, &si, &pi)) {
|
|
WaitForSingleObject(pi.hProcess, INFINITE);
|
|
GetExitCodeProcess(pi.hProcess, &code);
|
|
CloseHandle(pi.hProcess);
|
|
CloseHandle(pi.hThread);
|
|
}
|
|
|
|
switch(code) {
|
|
case IDABORT:
|
|
//This should exit us
|
|
raise(SIGABRT);
|
|
//If we are ignored exit this way..
|
|
_exit(3);
|
|
|
|
case IDIGNORE:
|
|
return;
|
|
}
|
|
}
|
|
|
|
::DebugBreak();
|
|
|
|
#endif // WINCE
|
|
#elif defined(XP_OS2)
|
|
char msg[1200];
|
|
PR_snprintf(msg, sizeof(msg),
|
|
"%s\n\nClick Cancel to Debug Application.\n"
|
|
"Click Enter to continue running the Application.", aMsg);
|
|
ULONG code = MBID_ERROR;
|
|
code = WinMessageBox(HWND_DESKTOP, HWND_DESKTOP, msg,
|
|
"NSGlue_Assertion", 0,
|
|
MB_ERROR | MB_ENTERCANCEL);
|
|
|
|
/* It is possible that we are executing on a thread that doesn't have a
|
|
* message queue. In that case, the message won't appear, and code will
|
|
* be 0xFFFF. We'll give the user a chance to debug it by calling
|
|
* Break()
|
|
* Actually, that's a really bad idea since this happens a lot with threadsafe
|
|
* assertions and since it means that you can't actually run the debug build
|
|
* outside a debugger without it crashing constantly.
|
|
*/
|
|
if (( code == MBID_ENTER ) || (code == MBID_ERROR))
|
|
return;
|
|
|
|
asm("int $3");
|
|
#elif defined(XP_BEOS)
|
|
DEBUGGER(aMsg);
|
|
#elif defined(XP_MACOSX)
|
|
/* Note that we put this Mac OS X test above the GNUC/x86 test because the
|
|
* GNUC/x86 test is also true on Intel Mac OS X and we want the PPC/x86
|
|
* impls to be the same.
|
|
*/
|
|
raise(SIGTRAP);
|
|
#elif defined(__GNUC__) && (defined(__i386__) || defined(__i386) || defined(__x86_64__))
|
|
asm("int $3");
|
|
#else
|
|
// don't know how to break on this platform
|
|
#endif
|
|
}
|
|
|
|
static const nsDebugImpl kImpl;
|
|
|
|
NS_METHOD
|
|
nsDebugImpl::Create(nsISupports* outer, const nsIID& aIID, void* *aInstancePtr)
|
|
{
|
|
NS_ENSURE_NO_AGGREGATION(outer);
|
|
|
|
return const_cast<nsDebugImpl*>(&kImpl)->
|
|
QueryInterface(aIID, aInstancePtr);
|
|
}
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
NS_COM nsresult
|
|
NS_ErrorAccordingToNSPR()
|
|
{
|
|
PRErrorCode err = PR_GetError();
|
|
switch (err) {
|
|
case PR_OUT_OF_MEMORY_ERROR: return NS_ERROR_OUT_OF_MEMORY;
|
|
case PR_WOULD_BLOCK_ERROR: return NS_BASE_STREAM_WOULD_BLOCK;
|
|
case PR_FILE_NOT_FOUND_ERROR: return NS_ERROR_FILE_NOT_FOUND;
|
|
case PR_READ_ONLY_FILESYSTEM_ERROR: return NS_ERROR_FILE_READ_ONLY;
|
|
case PR_NOT_DIRECTORY_ERROR: return NS_ERROR_FILE_NOT_DIRECTORY;
|
|
case PR_IS_DIRECTORY_ERROR: return NS_ERROR_FILE_IS_DIRECTORY;
|
|
case PR_LOOP_ERROR: return NS_ERROR_FILE_UNRESOLVABLE_SYMLINK;
|
|
case PR_FILE_EXISTS_ERROR: return NS_ERROR_FILE_ALREADY_EXISTS;
|
|
case PR_FILE_IS_LOCKED_ERROR: return NS_ERROR_FILE_IS_LOCKED;
|
|
case PR_FILE_TOO_BIG_ERROR: return NS_ERROR_FILE_TOO_BIG;
|
|
case PR_NO_DEVICE_SPACE_ERROR: return NS_ERROR_FILE_NO_DEVICE_SPACE;
|
|
case PR_NAME_TOO_LONG_ERROR: return NS_ERROR_FILE_NAME_TOO_LONG;
|
|
case PR_DIRECTORY_NOT_EMPTY_ERROR: return NS_ERROR_FILE_DIR_NOT_EMPTY;
|
|
case PR_NO_ACCESS_RIGHTS_ERROR: return NS_ERROR_FILE_ACCESS_DENIED;
|
|
default: return NS_ERROR_FAILURE;
|
|
}
|
|
}
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|