debugprint.h

// Copyright (c) 1999-2018 David Muse
// See the file COPYING for more information
 
#ifdef DEBUG_TO_FILE
        #include <rudiments/file.h>
        #include <rudiments/permissions.h>
        static  file    f;
#else
        #include <rudiments/stdio.h>
#endif
 
#if (defined(_MSC_VER) && (_MSC_VER <= 1300)) || \
        (defined(__USLC__) && !defined(__GNUC__)) || \
        defined(__VMS) || defined(__DECCXX) || defined(__SGICXX)
 
        // degenerate debug macros for really incapable compilers
        // (old microsoft compilers, unixware native compiler,
        // openvms compiler, sgi native compiler...)
 
        static void debugFunction() {}
        static void debugPrintf(const char *format, ...) {}
        static void debugSafePrint(const char *data, int32_t length) {}
        static void debugSafePrint(const byte_t *data, int32_t length) {}
        static void debugPrintBits(byte_t value) {}
        static void debugPrintBits(uint16_t value) {}
        static void debugPrintBits(uint32_t value) {}
        static void debugPrintBits(uint64_t value) {}
        static void debugPrintBits(char value) {}
        static void debugPrintBits(int16_t value) {}
        static void debugPrintBits(int32_t value) {}
        static void debugPrintBits(int64_t value) {}
 
#else
 
        // working debug macros for more modern compilers
        #ifdef DEBUG_MESSAGES
                #ifdef DEBUG_TO_FILE
                        #define debugFunction() { if (f.getFileDescriptor()==-1) { f.dontGetCurrentPropertiesOnOpen(); f.open(debugfile,O_RDWR|O_APPEND|O_CREAT,permissions::evalPermString("rw-r--r--")); } if (f.getFileDescriptor()!=-1) { f.printf("%s:%s():%d:\n",__FILE__,__FUNCTION__,__LINE__); } }
                        #ifdef _MSC_VER
                                #define debugPrintf(args,...) { if (f.getFileDescriptor()==-1) { f.dontGetCurrentPropertiesOnOpen(); f.open(debugfile,O_RDWR|O_APPEND|O_CREAT,permissions::evalPermString("rw-r--r--")); } if (f.getFileDescriptor()!=-1) { f.printf(args,__VA_ARGS__); } }
                        #else
                                #define debugPrintf(args...) { if (f.getFileDescriptor()==-1) { f.dontGetCurrentPropertiesOnOpen(); f.open(debugfile,O_RDWR|O_APPEND|O_CREAT,permissions::evalPermString("rw-r--r--")); } if (f.getFileDescriptor()!=-1) { f.printf(args); } }
                        #endif
                        #define debugSafePrint(a,b) { if (f.getFileDescriptor()==-1) { f.dontGetCurrentPropertiesOnOpen(); f.open(debugfile,O_RDWR|O_APPEND|O_CREAT,permissions::evalPermString("rw-r--r--")); } f.safePrint(a,b); }
                        #define debugPrintBits(a) { if (f.getFileDescriptor()==-1) { f.dontGetCurrentPropertiesOnOpen(); f.open(debugfile,O_RDWR|O_APPEND|O_CREAT,permissions::evalPermString("rw-r--r--")); } if (f.getFileDescriptor()!=-1) { f.printBits(a); } }
                #else
                        #define debugFunction() stdoutput.printf("%s:%s():%d:\n",__FILE__,__FUNCTION__,__LINE__); stdoutput.flush();
                        #ifdef _MSC_VER
                                #define debugPrintf(args,...) stdoutput.printf(args,__VA_ARGS__); stdoutput.flush();
                        #else
                                #define debugPrintf(args...) stdoutput.printf(args); stdoutput.flush();
                        #endif
                        #define debugSafePrint(a,b) stdoutput.safePrint(a,b); stdoutput.flush();
                        #define debugPrintBits(a) stdoutput.printBits(a); stdoutput.flush();
                #endif
        #else
                #define debugFunction() /* */
                #ifdef _MSC_VER
                        #define debugPrintf(args,...) /* */
                #else
                        #define debugPrintf(args...) /* */
                #endif
                #define debugSafePrint(a,b) /* */
                #define debugPrintBits(a) /* */
        #endif
 
#endif