2000-11-05 04:51:34 +00:00
|
|
|
/*
|
|
|
|
* Debugging functions
|
2002-03-09 23:29:33 +00:00
|
|
|
*
|
|
|
|
* Copyright 2000 Alexandre Julliard
|
|
|
|
*
|
|
|
|
* This library is free software; you can redistribute it and/or
|
|
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
|
|
* License as published by the Free Software Foundation; either
|
|
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
|
|
*
|
|
|
|
* This library is distributed in the hope that it will be useful,
|
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
|
|
* Lesser General Public License for more details.
|
|
|
|
*
|
|
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
|
|
* License along with this library; if not, write to the Free Software
|
|
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
2000-11-05 04:51:34 +00:00
|
|
|
*/
|
|
|
|
|
2002-07-22 20:51:02 +00:00
|
|
|
#include "config.h"
|
|
|
|
#include "wine/port.h"
|
2002-08-26 21:53:24 +00:00
|
|
|
|
2001-02-16 19:52:50 +00:00
|
|
|
#include <assert.h>
|
2000-11-05 04:51:34 +00:00
|
|
|
#include <stdio.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <string.h>
|
2002-08-17 00:43:16 +00:00
|
|
|
#ifdef HAVE_UNISTD_H
|
|
|
|
# include <unistd.h>
|
|
|
|
#endif
|
2000-11-05 04:51:34 +00:00
|
|
|
#include <ctype.h>
|
|
|
|
|
2002-03-09 23:29:33 +00:00
|
|
|
#include "wine/debug.h"
|
2001-10-17 19:39:22 +00:00
|
|
|
#include "wine/exception.h"
|
2002-05-19 22:29:01 +00:00
|
|
|
#include "wine/library.h"
|
2002-05-17 02:55:48 +00:00
|
|
|
#include "wine/unicode.h"
|
2000-11-05 04:51:34 +00:00
|
|
|
#include "winnt.h"
|
2002-09-12 22:07:02 +00:00
|
|
|
#include "winternl.h"
|
2002-12-12 23:34:01 +00:00
|
|
|
#include "excpt.h"
|
2003-10-08 22:34:37 +00:00
|
|
|
#include "ntdll_misc.h"
|
2000-11-05 04:51:34 +00:00
|
|
|
|
2002-03-09 23:29:33 +00:00
|
|
|
WINE_DECLARE_DEBUG_CHANNEL(tid);
|
2001-05-08 00:13:38 +00:00
|
|
|
|
2005-09-26 16:45:25 +00:00
|
|
|
static struct __wine_debug_functions default_funcs;
|
|
|
|
|
2000-11-05 04:51:34 +00:00
|
|
|
/* ---------------------------------------------------------------------- */
|
|
|
|
|
|
|
|
/* get the debug info pointer for the current thread */
|
|
|
|
static inline struct debug_info *get_info(void)
|
|
|
|
{
|
2005-06-06 20:04:33 +00:00
|
|
|
return ntdll_get_thread_data()->debug_info;
|
2000-11-05 04:51:34 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/* allocate some tmp space for a string */
|
2005-09-26 16:45:25 +00:00
|
|
|
static char *get_temp_buffer( size_t n )
|
2000-11-05 04:51:34 +00:00
|
|
|
{
|
|
|
|
struct debug_info *info = get_info();
|
|
|
|
char *res = info->str_pos;
|
|
|
|
|
|
|
|
if (res + n >= &info->strings[sizeof(info->strings)]) res = info->strings;
|
|
|
|
info->str_pos = res + n;
|
|
|
|
return res;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* release extra space that we requested in gimme1() */
|
2005-09-26 16:45:25 +00:00
|
|
|
static void release_temp_buffer( char *ptr, size_t size )
|
2000-11-05 04:51:34 +00:00
|
|
|
{
|
2005-06-06 20:04:33 +00:00
|
|
|
struct debug_info *info = get_info();
|
2005-09-26 16:45:25 +00:00
|
|
|
info->str_pos = ptr + size;
|
2000-11-05 04:51:34 +00:00
|
|
|
}
|
|
|
|
|
2001-10-17 19:39:22 +00:00
|
|
|
/***********************************************************************
|
2002-05-17 02:55:48 +00:00
|
|
|
* NTDLL_dbgstr_an
|
2001-10-17 19:39:22 +00:00
|
|
|
*/
|
2002-05-17 02:55:48 +00:00
|
|
|
static const char *NTDLL_dbgstr_an( const char *src, int n )
|
2001-10-17 19:39:22 +00:00
|
|
|
{
|
2005-09-26 16:45:25 +00:00
|
|
|
const char *res;
|
2001-10-21 15:04:04 +00:00
|
|
|
struct debug_info *info = get_info();
|
2001-10-17 19:39:22 +00:00
|
|
|
/* save current position to restore it on exception */
|
2005-09-26 16:45:25 +00:00
|
|
|
char *old_pos = info->str_pos;
|
|
|
|
|
2001-10-17 19:39:22 +00:00
|
|
|
__TRY
|
|
|
|
{
|
2005-09-26 16:45:25 +00:00
|
|
|
res = default_funcs.dbgstr_an( src, n );
|
2001-10-17 19:39:22 +00:00
|
|
|
}
|
2005-12-16 16:17:57 +00:00
|
|
|
__EXCEPT_PAGE_FAULT
|
2001-10-17 19:39:22 +00:00
|
|
|
{
|
2005-09-26 16:45:25 +00:00
|
|
|
release_temp_buffer( old_pos, 0 );
|
2001-10-17 19:39:22 +00:00
|
|
|
return "(invalid)";
|
|
|
|
}
|
|
|
|
__ENDTRY
|
|
|
|
return res;
|
|
|
|
}
|
|
|
|
|
|
|
|
/***********************************************************************
|
2002-05-17 02:55:48 +00:00
|
|
|
* NTDLL_dbgstr_wn
|
2001-10-17 19:39:22 +00:00
|
|
|
*/
|
2002-05-17 02:55:48 +00:00
|
|
|
static const char *NTDLL_dbgstr_wn( const WCHAR *src, int n )
|
2001-10-17 19:39:22 +00:00
|
|
|
{
|
2005-09-26 16:45:25 +00:00
|
|
|
const char *res;
|
2001-10-21 15:04:04 +00:00
|
|
|
struct debug_info *info = get_info();
|
2001-10-17 19:39:22 +00:00
|
|
|
/* save current position to restore it on exception */
|
2005-09-26 16:45:25 +00:00
|
|
|
char *old_pos = info->str_pos;
|
|
|
|
|
2001-10-17 19:39:22 +00:00
|
|
|
__TRY
|
|
|
|
{
|
2005-09-26 16:45:25 +00:00
|
|
|
res = default_funcs.dbgstr_wn( src, n );
|
2001-10-17 19:39:22 +00:00
|
|
|
}
|
2005-12-16 16:17:57 +00:00
|
|
|
__EXCEPT_PAGE_FAULT
|
2001-10-17 19:39:22 +00:00
|
|
|
{
|
2005-09-26 16:45:25 +00:00
|
|
|
release_temp_buffer( old_pos, 0 );
|
2001-10-17 19:39:22 +00:00
|
|
|
return "(invalid)";
|
|
|
|
}
|
|
|
|
__ENDTRY
|
|
|
|
return res;
|
|
|
|
}
|
|
|
|
|
2000-11-25 03:09:30 +00:00
|
|
|
/***********************************************************************
|
2002-05-17 02:55:48 +00:00
|
|
|
* NTDLL_dbg_vprintf
|
2000-11-25 03:09:30 +00:00
|
|
|
*/
|
2002-05-17 02:55:48 +00:00
|
|
|
static int NTDLL_dbg_vprintf( const char *format, va_list args )
|
2000-11-05 04:51:34 +00:00
|
|
|
{
|
|
|
|
struct debug_info *info = get_info();
|
2001-02-16 19:52:50 +00:00
|
|
|
char *p;
|
2000-11-05 04:51:34 +00:00
|
|
|
|
2001-02-16 19:52:50 +00:00
|
|
|
int ret = vsnprintf( info->out_pos, sizeof(info->output) - (info->out_pos - info->output),
|
|
|
|
format, args );
|
|
|
|
|
|
|
|
/* make sure we didn't exceed the buffer length
|
2001-07-17 00:56:37 +00:00
|
|
|
* the two checks are due to glibc changes in vsnprintfs return value
|
|
|
|
* the buffer size can be exceeded in case of a missing \n in
|
|
|
|
* debug output */
|
|
|
|
if ((ret == -1) || (ret >= sizeof(info->output) - (info->out_pos - info->output)))
|
|
|
|
{
|
|
|
|
fprintf( stderr, "wine_dbg_vprintf: debugstr buffer overflow (contents: '%s')\n",
|
|
|
|
info->output);
|
|
|
|
info->out_pos = info->output;
|
|
|
|
abort();
|
|
|
|
}
|
2001-02-16 19:52:50 +00:00
|
|
|
|
|
|
|
p = strrchr( info->out_pos, '\n' );
|
2000-11-05 04:51:34 +00:00
|
|
|
if (!p) info->out_pos += ret;
|
|
|
|
else
|
|
|
|
{
|
|
|
|
char *pos = info->output;
|
|
|
|
p++;
|
|
|
|
write( 2, pos, p - pos );
|
|
|
|
/* move beginning of next line to start of buffer */
|
|
|
|
while ((*pos = *p++)) pos++;
|
|
|
|
info->out_pos = pos;
|
|
|
|
}
|
|
|
|
return ret;
|
|
|
|
}
|
|
|
|
|
2000-11-25 03:09:30 +00:00
|
|
|
/***********************************************************************
|
2002-05-17 02:55:48 +00:00
|
|
|
* NTDLL_dbg_vlog
|
2000-11-25 03:09:30 +00:00
|
|
|
*/
|
2005-09-23 10:52:07 +00:00
|
|
|
static int NTDLL_dbg_vlog( enum __wine_debug_class cls, struct __wine_debug_channel *channel,
|
2002-05-17 02:55:48 +00:00
|
|
|
const char *function, const char *format, va_list args )
|
2000-11-05 04:51:34 +00:00
|
|
|
{
|
2003-03-14 04:02:03 +00:00
|
|
|
static const char * const classes[] = { "fixme", "err", "warn", "trace" };
|
|
|
|
struct debug_info *info = get_info();
|
2000-11-10 23:31:06 +00:00
|
|
|
int ret = 0;
|
2000-11-05 04:51:34 +00:00
|
|
|
|
2003-03-14 04:02:03 +00:00
|
|
|
/* only print header if we are at the beginning of the line */
|
|
|
|
if (info->out_pos == info->output || info->out_pos[-1] == '\n')
|
|
|
|
{
|
|
|
|
if (TRACE_ON(tid))
|
2003-08-27 23:14:29 +00:00
|
|
|
ret = wine_dbg_printf( "%04lx:", GetCurrentThreadId() );
|
2003-03-14 04:02:03 +00:00
|
|
|
if (cls < sizeof(classes)/sizeof(classes[0]))
|
2005-09-23 10:52:07 +00:00
|
|
|
ret += wine_dbg_printf( "%s:%s:%s ", classes[cls], channel->name, function );
|
2003-03-14 04:02:03 +00:00
|
|
|
}
|
2000-11-10 23:31:06 +00:00
|
|
|
if (format)
|
2002-05-17 02:55:48 +00:00
|
|
|
ret += NTDLL_dbg_vprintf( format, args );
|
2000-11-10 23:31:06 +00:00
|
|
|
return ret;
|
2000-11-05 04:51:34 +00:00
|
|
|
}
|
2002-05-17 02:55:48 +00:00
|
|
|
|
2005-09-23 10:52:07 +00:00
|
|
|
|
|
|
|
static const struct __wine_debug_functions funcs =
|
|
|
|
{
|
2005-09-26 16:45:25 +00:00
|
|
|
get_temp_buffer,
|
|
|
|
release_temp_buffer,
|
2005-09-23 10:52:07 +00:00
|
|
|
NTDLL_dbgstr_an,
|
|
|
|
NTDLL_dbgstr_wn,
|
|
|
|
NTDLL_dbg_vprintf,
|
|
|
|
NTDLL_dbg_vlog
|
|
|
|
};
|
|
|
|
|
2002-05-17 02:55:48 +00:00
|
|
|
/***********************************************************************
|
|
|
|
* debug_init
|
|
|
|
*/
|
2004-01-07 04:50:11 +00:00
|
|
|
void debug_init(void)
|
2002-05-17 02:55:48 +00:00
|
|
|
{
|
2005-09-26 16:45:25 +00:00
|
|
|
__wine_dbg_set_functions( &funcs, &default_funcs, sizeof(funcs) );
|
2002-05-17 02:55:48 +00:00
|
|
|
}
|