except.h

Go to the documentation of this file.

//To be included AFTER or FROM basics.h !!!
 
// Last change: 30/6/97 KG
/* $Id: except.h,v 1.6.2.11 2019/05/28 15:11:09 garloff Exp $ */
 
#ifndef TBCI_EXCEPT_H
#define TBCI_EXCEPT_H  
 
#include "tbci/basics.h"
#include <cstring>
#ifndef HAVE_NO_NEW_HEADERS_BUG
# include <exception>
#else
# include <exception.h>
#endif
 
NAMESPACE_TBCI

class NumErr : public STD__ exception
{
    public:
        const char* errtext;
        long index;
        NumErr()
        : STD__ exception()
        , errtext(strdup("Error in TBCI Numerical Library"))
        , index(0)
        {}
        NumErr(const char* txt, const long idx = 0)
        : STD__ exception()
        , errtext(strdup(txt))
        , index(idx)
        {}
        NumErr(const std::string &str, const long idx = 0)
        : STD__ exception()
        , errtext(str.c_str())
        , index(idx)
        {}
        NumErr(const NumErr& ne)
        : STD__ exception(ne)
        , errtext(strdup(ne.errtext))
        , index(ne.index)
        {}
        virtual const char* what() const throw()
        { return errtext; }
        virtual ~NumErr() throw()
        { CSTD__ free((void*)errtext); }
 
};
 
// We need a long to ascii conversion
#define __TBCIERR_BUF_SZ 256
#ifdef HAVE_WEAK_ATTR   // Try to have only once
char err_bf[__TBCIERR_BUF_SZ] WEAKA;
// racy in multithreaded env but we don't care
volatile unsigned err_ptr WEAKA;
#else
static char err_bf[__TBCIERR_BUF_SZ];
static volatile unsigned err_ptr;
#endif
static char* ltoa(const long l)
{
        unsigned oldptr = err_ptr;
        err_ptr += sprintf(err_bf+oldptr, "%li", l) + 1;
        if (err_ptr >= __TBCIERR_BUF_SZ-16)
                err_ptr = 0;
        return err_bf+oldptr;
}
 
#ifdef HAVE_NOEXCEPT_FALSE
# define THROWEXCEPT noexcept(false)
#else
# define THROWEXCEPT 
#endif
 
NAMESPACE_END
 
#endif /* TBCI_EXCEPT_H */