compiler/arossupport/rkprintf.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Formats a message and makes sure the user will see it.
   6     Lang: english
   7 */
   8
   9 #include <aros/config.h>
  10 #include <aros/arossupportbase.h>
  11 #include <stdarg.h>
  12 #include <aros/system.h>
  13 #include <proto/exec.h>
  14 #include <proto/arossupport.h>
  15 #undef rkprintf
  16
  17 #define AROSBase        ((struct AROSBase *)(SysBase->DebugAROSBase))
  18
  19 /* Can't use ctypt.h *sigh* */
  20 #define isdigit(x)      ((x) >= '0' && (x) <= '9')
  21 #define isprint(x)      (((x) >= ' ' && (x) <= 128) || (x) >= 160)
  22
  23 /*****************************************************************************
  24
  25     NAME */
  26         #include <proto/arossupport.h>
  27
  28         int rkprintf (
  29
  30 /*  SYNOPSIS */
  31         const STRPTR mainSystem,
  32         const STRPTR subSystem,
  33         int level,
  34         const UBYTE * fmt,
  35         ...)
  36
  37 /*  FUNCTION
  38         Call kprintf if debugging for this main and subsystem is enabled
  39         at a level larger than the level above. The minimal level is 1
  40         (this way, debugging can be disabled in the debug config file
  41         by giving a level of 0).
  42
  43         You should not call this function directly but use the rbug
  44         macro. The rbug macro does some magic to make the handling
  45         more simple.
  46
  47     INPUTS
  48         mainSystem - The main system. Use one of the DBG_MAINSYSTEM_*
  49                 macros to avoid typos.
  50         subSystem - The part of the main system. Use one of the
  51                 DBG_*_SUBSYSTEM_* macros.
  52         level - The debug level. Higher levels should give more details.
  53                 The lowest level is 1.
  54         fmt - printf()-style format string
  55
  56     RESULT
  57         The number of characters output.
  58
  59     NOTES
  60         This function is not part of a library and may thus be called
  61         any time.
  62
  63     EXAMPLE
  64         if (cache)
  65         {
  66             ...
  67             D(rbug(INTUITION, INPUTHANDLER, 3,
  68                 "allocating event from cache (%p)", event
  69             ));
  70             ...
  71         }
  72
  73     BUGS
  74
  75     SEE ALSO
  76
  77     INTERNALS
  78
  79     HISTORY
  80         24-12-95    digulla created
  81
  82 ******************************************************************************/
  83 {
  84     va_list      ap;
  85     int          ret;
  86
  87     /* FIXME check the systems and the debug level */
  88     // Check SysBase->DebugAROSBase->DebugConfig
  89
  90     va_start(ap, fmt);
  91     ret = vkprintf(fmt, ap);
  92     va_end(ap);
  93
  94     return ret;
  95 }