mirror of
https://github.com/Unidata/netcdf-c.git
synced 2025-03-07 17:08:02 +08:00
59 lines
1.2 KiB
C
59 lines
1.2 KiB
C
/*********************************************************************
|
|
* Copyright 2018, UCAR/Unidata
|
|
* See netcdf/COPYRIGHT file for copying and redistribution conditions.
|
|
*********************************************************************/
|
|
#include "config.h"
|
|
#include <stdarg.h>
|
|
#include <stdio.h>
|
|
#ifdef HAVE_EXECINFO_H
|
|
#include <execinfo.h>
|
|
#endif
|
|
|
|
#include "hdf5debug.h"
|
|
|
|
#ifdef H5CATCH
|
|
|
|
#define STSIZE 1000
|
|
|
|
#ifdef HAVE_EXECINFO_H
|
|
#ifdef H5BACKTRACE
|
|
# if !defined _WIN32 && !defined __CYGWIN__
|
|
static void* stacktrace[STSIZE];
|
|
# endif
|
|
#endif
|
|
#endif
|
|
|
|
int
|
|
nch5breakpoint(int err)
|
|
{
|
|
#ifdef HAVE_EXECINFO_H
|
|
#ifdef H5BACKTRACE
|
|
# if !defined _WIN32 && !defined __CYGWIN__
|
|
int count = 0;
|
|
char** trace = NULL;
|
|
int i;
|
|
|
|
count = backtrace(stacktrace,STSIZE);
|
|
trace = backtrace_symbols(stacktrace, STSIZE);
|
|
fprintf(stderr,"backtrace:\n");
|
|
for(i=0;i<count;i++)
|
|
fprintf(stderr,"[%03d] %s\n",i,trace[i]);
|
|
# if 0
|
|
if(trace != NULL) free(trace);
|
|
# endif
|
|
# endif
|
|
#endif
|
|
#endif
|
|
return err;
|
|
}
|
|
|
|
int
|
|
nch5throw(int err, int line)
|
|
{
|
|
if(err == 0) return err;
|
|
fprintf(stderr,">>> hdf5throw: line=%d err=%d\n",line,err); fflush(stderr);
|
|
return nch5breakpoint(err);
|
|
}
|
|
#endif
|
|
|