X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/0c0857127aadbff3d4d1d317ca35b0c50621663a..d579271194fbd8dd7ff1f0f5dbf225e4a1bfd7f2:/include/xbt/sysdep.h diff --git a/include/xbt/sysdep.h b/include/xbt/sysdep.h index e012812d8e..7ae2aee44c 100644 --- a/include/xbt/sysdep.h +++ b/include/xbt/sysdep.h @@ -1,79 +1,141 @@ /* $Id$ */ - -/* gras/sysdep.h -- all system dependency */ +/* xbt/sysdep.h -- all system dependency */ /* no system header should be loaded out of this file so that we have only */ /* one file to check when porting to another OS */ -/* Authors: Martin Quinson */ -/* Copyright (C) 2004 the OURAGAN project. */ +/* Copyright (c) 2004 Martin Quinson. All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it - under the terms of the license (GNU LGPL) which comes with this package. */ - - -#ifndef _GRAS_SYSDEP_H -#define _GRAS_SYSDEP_H - -#include /* Included directly for speed */ - -#include /* FIXME: remove */ -#include /* FIXME: remove */ - -#ifdef __cplusplus -extern "C" + * under the terms of the license (GNU LGPL) which comes with this package. */ + +#ifndef _XBT_SYSDEP_H +#define _XBT_SYSDEP_H + +#include +#include +#include /* va_list */ + +#include "xbt/misc.h" +#include "xbt/asserts.h" + +SG_BEGIN_DECL() + +/* They live in asserts.h, but need to be declared before this module. + double declaration to cut dependency cycle */ +/** + * @addtogroup XBT_error + * + * @{ + */ +XBT_PUBLIC(void) xbt_abort(void) _XBT_GNUC_NORETURN; +XBT_PUBLIC(void) xbt_die(const char *msg) _XBT_GNUC_NORETURN; +/** @} */ + +/* these ones live in str.h, but redeclare them here so that we do + not need to load the whole str.h and its heavy dependencies */ +#ifndef __USE_GNU /* do not redeclare existing headers */ +XBT_PUBLIC(int) asprintf(char **ptr, const char *fmt, /*args */ + ...) _XBT_GNUC_PRINTF(2, 3); +XBT_PUBLIC(int) vasprintf(char **ptr, const char *fmt, va_list ap); #endif +XBT_PUBLIC(char *) bprintf(const char *fmt, ...) _XBT_GNUC_PRINTF(1, 2); + +/** @addtogroup XBT_syscall + * @brief Malloc and associated functions, killing the program on error (with \ref XBT_ex) + * + * @{ + */ + +#if defined(__GNUC__) || defined(DOXYGEN) +/** @brief Like strdup, but xbt_die() on error */ + static XBT_INLINE char *xbt_strdup(const char *s) +{ + char *res = NULL; + if (s) { + res = strdup(s); + if (!res) + xbt_die("memory allocation error (strdup returned NULL)"); + } + return res; +} -void* gras_malloc (long int bytes); -void* gras_malloc0 (long int bytes); -void* gras_realloc (void *memory, long int bytes); -void gras_free (void *memory); - -#define gras_new(type, count) ((type*)gras_malloc (sizeof (type) * (count))) -#define gras_new0(type, count) ((type*)gras_malloc0 (sizeof (type) * (count))) - -/* Attributes are only in recent versions of GCC */ - -#if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ > 4) -# define _GRAS_GNUC_PRINTF( format_idx, arg_idx ) \ - __attribute__((__format__ (__printf__, format_idx, arg_idx))) -# define _GRAS_GNUC_SCANF( format_idx, arg_idx ) \ - __attribute__((__format__ (__scanf__, format_idx, arg_idx))) -# define _GRAS_GNUC_FORMAT( arg_idx ) \ - __attribute__((__format_arg__ (arg_idx))) -# define _GRAS_GNUC_NORETURN __attribute__((__noreturn__)) - -#else /* !__GNUC__ */ -# define _GRAS_GNUC_PRINTF( format_idx, arg_idx ) -# define _GRAS_GNUC_SCANF( format_idx, arg_idx ) -# define _GRAS_GNUC_FORMAT( arg_idx ) -# define _GRAS_GNUC_NORETURN - -#endif /* !__GNUC__ */ - -/* inline and __FUNCTION__ are only in GCC when -ansi is of */ - -#if defined(__GNUC__) && ! defined(__STRICT_ANSI__) - -# define _GRAS_GNUC_FUNCTION __FUNCTION__ -# define _GRAS_INLINE inline -#else -# define _GRAS_GNUC_FUNCTION "function" -# define _GRAS_INLINE -#endif - - -void gras_abort(void) _GRAS_GNUC_NORETURN; - -/* FIXME: This is a very good candidate to rewrite (along with a proper string stuff) - but I'm too lazy right now, so copy the definition */ -long int strtol(const char *nptr, char **endptr, int base); -double strtod(const char *nptr, char **endptr); -int atoi(const char *nptr); - +XBT_PUBLIC(void) xbt_backtrace_display_current(void); + +/** @brief Like malloc, but xbt_die() on error + @hideinitializer */ +static XBT_INLINE void *xbt_malloc(unsigned int n) +{ + void *res; +/* if (n==0) { + xbt_backtrace_display_current(); + xbt_die("malloc(0) is not portable"); + }*/ + + res = malloc(n); + if (!res) + xbt_die(bprintf("Memory allocation of %d bytes failed", n)); + return res; +} - -#ifdef __cplusplus +/** @brief like malloc, but xbt_die() on error and memset data to 0 + @hideinitializer */ +static XBT_INLINE void *xbt_malloc0(unsigned int n) +{ + void *res; + //if (n==0) xbt_die("calloc(0) is not portable"); + res = calloc(n, 1); + if (!res) + xbt_die(bprintf("Memory callocation of %d bytes failed", n)); + return res; } -#endif -#endif /* _GRAS_SYSDEP_H */ +/** @brief like realloc, but xbt_die() on error + @hideinitializer */ +static XBT_INLINE void *xbt_realloc(void *p, unsigned int s) +{ + void *res = res; + //if (s==0) xbt_die("realloc(0) is not portable"); + if (s) { + if (p) { + res = realloc(p, s); + if (!res) + xbt_die(bprintf("memory (re)allocation of %d bytes failed", s)); + } else { + res = xbt_malloc(s); + } + } else { + if (p) { + free(p); + } + } + return res; +} +#else /* non __GNUC__ */ +# define xbt_strdup(s) strdup(s) +# define xbt_malloc(n) malloc(n) +# define xbt_malloc0(n) calloc(n,1) +# define xbt_realloc(p,s) realloc(p,s) +#endif /* __GNUC__ ? */ + +/** @brief like free + @hideinitializer */ +#define xbt_free free /*nothing specific to do here. A poor valgrind replacement? */ +/*#define xbt_free_fct free * replacement with the guareenty of being a function FIXME:KILLME*/ + +/** @brief like free, but you can be sure that it is a function */ +XBT_PUBLIC(void) xbt_free_f(void *p); +/** @brief should be given a pointer to pointer, and frees the second one */ +XBT_PUBLIC(void) xbt_free_ref(void *d); + +/** @brief like calloc, but xbt_die() on error and don't memset to 0 + @hideinitializer */ +#define xbt_new(type, count) ((type*)xbt_malloc (sizeof (type) * (count))) +/** @brief like calloc, but xbt_die() on error + @hideinitializer */ +#define xbt_new0(type, count) ((type*)xbt_malloc0 (sizeof (type) * (count))) + +/** @} */ + + +SG_END_DECL() +#endif /* _XBT_SYSDEP_H */