error_handling.h

Go to the documentation of this file.

/***************************************************************************\
* Copyright (c) 2008, Claudio Pica                                          *   
* All rights reserved.                                                      * 
\***************************************************************************/
 
#ifndef ERROR_HANDLING_H
#define ERROR_HANDLING_H
 
#ifdef __cplusplus
extern "C" {
#endif
 
#include <stdio.h>
 
//error.c
void error(int test, int no, const char *name, const char *text, ...);
 
//print_trace.c
void print_trace(void);
void register_sighandlers(void);
 
//TODO: should we keep this here?
#ifdef WITH_MPI
#define CHECK_MPI(call)                                                     \
    do {                                                                    \
        const int mpireturn = call;                                         \
        if (mpireturn != MPI_SUCCESS) {                                     \
            char message[MPI_MAX_ERROR_STRING];                             \
            int message_length;                                             \
            MPI_Error_string(mpireturn, message, &message_length);          \
            char errmsg[500];                                               \
            sprintf(errmsg, "Error in: %s:%d, function: %s\n \
                            Communications call exited with code %d: %s\n", \
                    __FILE__, __LINE__, __func__, mpireturn, message);      \
            error(1, 1, __func__, errmsg);                                  \
        }                                                                   \
    } while (0)
#endif
 
#ifdef __cplusplus
}
#endif
#endif