Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Improve detection of remote exceptions
[simgrid.git] / include / xbt / ex.h
index c2de673bc66605600950055043e5440699648515..8d73645118acb0d0ce33af252f70fa61a878d1d0 100644 (file)
@@ -32,8 +32,8 @@
 #ifndef __XBT_EX_H__
 #define __XBT_EX_H__
 
-#include <xbt/misc.h>
 #include <xbt/sysdep.h>
+#include <xbt/misc.h>
 
 /* do not include execinfo.h directly since it's not always available. 
    Instead, copy the parts we need (and fake when it's not there) */
@@ -211,6 +211,7 @@ typedef struct { __ex_mctx_struct } __ex_mctx_t;
  * @{
  */
 
+/** @brief different kind of errors */
 typedef enum {
   unknown_error=0,  /**< unknown error */
   arg_error,        /**< Invalid argument */
@@ -231,51 +232,56 @@ typedef struct {
   xbt_errcat_t category; /**< category like HTTP (what went wrong) */
   int          value;    /**< like errno (why did it went wrong) */
   /* throw point */
-  char *host;     /* NULL for localhost; hostname:port if remote */
+  short remote; /* whether it was raised remotely */
+  char *host;     /* NULL for localhost; hostname if remote */
+  /* FIXME: host should be hostname:port[#thread] */
   char *procname; 
   char *file;     /**< to be freed only for remote exceptions */
   int   line;     
   char *func;     /**< to be freed only for remote exceptions */
   /* Backtrace */
-  void *bt[XBT_BACKTRACE_SIZE];
   int   used;
+  char **bt_strings; /* only filed on display (or before the network propagation) */
+  void *bt[XBT_BACKTRACE_SIZE];
 } xbt_ex_t;
 
 /* declare the context type (private) */
 typedef struct {
     __ex_mctx_t  *ctx_mctx;     /* permanent machine context of enclosing try/catch */
-    int           ctx_caught;   /* temporary flag whether exception was caught */
-    volatile xbt_ex_t ctx_ex;       /* temporary exception storage */
+    volatile int ctx_caught;    /* temporary flag whether exception was caught */
+    volatile xbt_ex_t ctx_ex;   /* temporary exception storage */
 } ex_ctx_t;
 
 /* the static and dynamic initializers for a context structure */
 #define XBT_CTX_INITIALIZER \
     { NULL, 0, { /* content */ NULL, unknown_error, 0, \
-                 /* throw point*/ NULL, NULL, NULL, 0, NULL,\
-                 /* backtrace */ {NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL},0 } }
+                 /* throw point*/ 0,NULL, NULL, NULL, 0, NULL,\
+                 /* backtrace */ 0,NULL,{NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL} } }
 #define XBT_CTX_INITIALIZE(ctx) \
     do { \
-        (ctx)->ctx_mctx        = NULL; \
-        (ctx)->ctx_caught      = 0;    \
-        (ctx)->ctx_ex.msg      = NULL; \
-        (ctx)->ctx_ex.category = unknown_error;    \
-        (ctx)->ctx_ex.value    = 0;    \
-        (ctx)->ctx_ex.host     = NULL; \
-        (ctx)->ctx_ex.procname = NULL; \
-        (ctx)->ctx_ex.file     = NULL; \
-        (ctx)->ctx_ex.line     = 0;    \
-        (ctx)->ctx_ex.func     = NULL; \
-        (ctx)->ctx_ex.bt[0]    = NULL; \
-        (ctx)->ctx_ex.bt[1]    = NULL; \
-        (ctx)->ctx_ex.bt[2]    = NULL; \
-        (ctx)->ctx_ex.bt[3]    = NULL; \
-        (ctx)->ctx_ex.bt[4]    = NULL; \
-        (ctx)->ctx_ex.bt[5]    = NULL; \
-        (ctx)->ctx_ex.bt[6]    = NULL; \
-        (ctx)->ctx_ex.bt[7]    = NULL; \
-        (ctx)->ctx_ex.bt[8]    = NULL; \
-        (ctx)->ctx_ex.bt[9]    = NULL; \
-        (ctx)->ctx_ex.used     = 0; \
+        (ctx)->ctx_mctx          = NULL; \
+        (ctx)->ctx_caught        = 0;    \
+        (ctx)->ctx_ex.msg        = NULL; \
+        (ctx)->ctx_ex.category   = 0;    \
+        (ctx)->ctx_ex.value      = 0;    \
+        (ctx)->ctx_ex.remote     = 0;    \
+        (ctx)->ctx_ex.host       = NULL; \
+        (ctx)->ctx_ex.procname   = NULL; \
+        (ctx)->ctx_ex.file       = NULL; \
+        (ctx)->ctx_ex.line       = 0;    \
+        (ctx)->ctx_ex.func       = NULL; \
+        (ctx)->ctx_ex.bt[0]      = NULL; \
+        (ctx)->ctx_ex.bt[1]      = NULL; \
+        (ctx)->ctx_ex.bt[2]      = NULL; \
+        (ctx)->ctx_ex.bt[3]      = NULL; \
+        (ctx)->ctx_ex.bt[4]      = NULL; \
+        (ctx)->ctx_ex.bt[5]      = NULL; \
+        (ctx)->ctx_ex.bt[6]      = NULL; \
+        (ctx)->ctx_ex.bt[7]      = NULL; \
+        (ctx)->ctx_ex.bt[8]      = NULL; \
+        (ctx)->ctx_ex.bt[9]      = NULL; \
+        (ctx)->ctx_ex.used       = 0; \
+        (ctx)->ctx_ex.bt_strings = NULL; \
     } while (0)
 
 /* the exception context */
@@ -347,6 +353,14 @@ extern void __xbt_ex_terminate_default(xbt_ex_t *e);
     } \
     else
 
+#define DO_THROW(e) \
+     /* deal with the exception */                                             \
+     if (__xbt_ex_ctx()->ctx_mctx == NULL)                                     \
+       __xbt_ex_terminate((xbt_ex_t *)&(e)); /* not catched */\
+     else                                                                      \
+       __ex_mctx_restore(__xbt_ex_ctx()->ctx_mctx); /* catched somewhere */    \
+     abort()/* nope, stupid GCC, we won't survive a THROW (this won't be reached) */
+
 /** @brief Helper macro for THROWS0-6
  *  @hideinitializer
  *
@@ -371,18 +385,14 @@ extern void __xbt_ex_terminate_default(xbt_ex_t *e);
      __xbt_ex_ctx()->ctx_ex.msg      = (m); \
      __xbt_ex_ctx()->ctx_ex.category = (xbt_errcat_t)(c); \
      __xbt_ex_ctx()->ctx_ex.value    = (v);  \
+     __xbt_ex_ctx()->ctx_ex.remote   = 0;                            \
      __xbt_ex_ctx()->ctx_ex.host     = (char*)NULL;                            \
      __xbt_ex_ctx()->ctx_ex.procname = strdup(xbt_procname());                 \
      __xbt_ex_ctx()->ctx_ex.file     = (char*)__FILE__;                        \
      __xbt_ex_ctx()->ctx_ex.line     = __LINE__;                               \
      __xbt_ex_ctx()->ctx_ex.func     = (char*)_XBT_FUNCTION;                   \
      __xbt_ex_ctx()->ctx_ex.used     = backtrace((void**)__xbt_ex_ctx()->ctx_ex.bt,XBT_BACKTRACE_SIZE);\
-     /* deal with the exception */                                             \
-     if (__xbt_ex_ctx()->ctx_mctx == NULL)                                     \
-       __xbt_ex_terminate((xbt_ex_t *)&(__xbt_ex_ctx()->ctx_ex)); /* not catched */\
-     else                                                                      \
-       __ex_mctx_restore(__xbt_ex_ctx()->ctx_mctx); /* catched somewhere */    \
-     abort();/* nope, stupid GCC, we won't survive a THROW (this won't be reached) */ \
+     DO_THROW(__xbt_ex_ctx()->ctx_ex);\
   } while (0)
 
 /** @brief Builds and throws an exception with a string taking no arguments