URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [or1ksim/] [support/] [debug.c] - Rev 588
Go to most recent revision | Compare with Previous | Blame | View Log
/* debug.c -- Debug channel support code Copyright (C) 2005 György `nog' Jeney, nog@sdf.lonestar.org Copyright (C) 2008 Embecosm Limited Contributor Jeremy Bennett <jeremy.bennett@embecosm.com> This file is part of Or1ksim, the OpenRISC 1000 Architectural Simulator. This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3 of the License, or (at your option) any later version. This program 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 General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see <http://www.gnu.org/licenses/>. */ /* This program is commented throughout in a fashion suitable for processing with Doxygen. */ /* Autoconf and/or portability configuration */ #include "config.h" #include "port.h" /* System includes */ #include <stdlib.h> #include <stdio.h> #include <stdarg.h> /* Package includes */ #include "arch.h" #include "sim-config.h" #define __ORSIM_NO_DEC_DBCH #include "debug.h" #define DECLARE_DEBUG_CHANNEL(dbch) char __orsim_dbch_##dbch[] = "\0"#dbch; #include "dbchs.h" #undef DECLARE_DEBUG_CHANNEL #define DECLARE_DEBUG_CHANNEL(dbch) __orsim_dbch_##dbch, static char *__orsim_dbchs[] = { #include "dbchs.h" NULL }; #undef DECLARE_DEBUG_CHANNEL static const char *debug_classes[] = { "trace", "fixme", "warn", "err" }; void orsim_dbg_log(enum __ORSIM_DEBUG_CLASS dbcl, const char *dbch, const char *function, const char *format, ...) { va_list ap; static int last_lf = 1; /* There *has* to be a better way */ if(last_lf) { if(!TRACE_ON(cycles)) fprintf(stderr, "%s:%s:%s: ", debug_classes[dbcl], dbch + 1, function); else fprintf(stderr, "%lld:%s:%s:%s: ", runtime.sim.cycles, debug_classes[dbcl], dbch + 1, function); } last_lf = format[strlen(format) - 1] == '\n'; /* This is wrong... */ va_start(ap, format); vfprintf(stderr, format, ap); va_end(ap); } void orsim_dbcl_set(enum __ORSIM_DEBUG_CLASS dbcl, char *dbch, int on) { if(on) dbch[0] |= 1 << dbcl; else dbch[0] &= ~(1 << dbcl); } void orsim_dbcl_set_name(enum __ORSIM_DEBUG_CLASS dbcl, const char *dbch, int on) { char **dbchs = __orsim_dbchs; for(dbchs = __orsim_dbchs; *dbchs; dbchs++) { if(!strcmp(*dbchs + 1, dbch)) { orsim_dbcl_set(dbcl, *dbchs, on); break; } } } void parse_dbchs(const char *str) { enum __ORSIM_DEBUG_CLASS dbcl = 0; int i; int disen; int all; const char *cend; const char *chan_end; while(*str) { cend = strpbrk(str, "+-"); chan_end = strchr(str, ','); if(!chan_end) chan_end = str + strlen(str); if(!cend || (cend > chan_end)) { disen = 1; cend = --str; } else disen = *cend == '+' ? 1 : 0; if(cend == str) { all = 1; } else { for(i = 0; i < 4; i++) { if(!strncmp(str, debug_classes[i], cend - str)) { dbcl = i; break; } } if(i >= 4) fprintf(stderr, "Unknown class specified\n"); all = 0; } cend++; for(i = 0; __orsim_dbchs[i]; i++) if(!strncmp(cend, __orsim_dbchs[i] + 1, chan_end - cend)) break; if(!__orsim_dbchs[i]) fprintf(stderr, "Unknown channel specified\n"); else if(all) { orsim_dbcl_set(__ORSIM_DBCL_TRACE, __orsim_dbchs[i], disen); orsim_dbcl_set(__ORSIM_DBCL_FIXME, __orsim_dbchs[i], disen); orsim_dbcl_set(__ORSIM_DBCL_WARN, __orsim_dbchs[i], disen); orsim_dbcl_set(__ORSIM_DBCL_ERR, __orsim_dbchs[i], disen); } else orsim_dbcl_set(dbcl, __orsim_dbchs[i], disen); if(*chan_end) str = chan_end + 1; else str = chan_end; } } /*---------------------------------------------------------------------------*/ /*!Internal debug function Print the message if the level is greater than or equal to that specified in the configuration. @param[in] level The debug level of this message @param[in] format Varargs format string @param[in] ... The varargs required by the string */ /*---------------------------------------------------------------------------*/ void debug (int level, const char *format, ...) { if (config.sim.debug >= level) { va_list ap; va_start (ap, format); vfprintf (runtime.sim.fout, format, ap); fflush (runtime.sim.fout); } } /* debug() */
Go to most recent revision | Compare with Previous | Blame | View Log