mono/eglib/glib.h

   1 #ifndef __GLIB_H
   2 #define __GLIB_H
   3
   4 // Ask stdint.h and inttypes.h for the full C99 features for CentOS 6 g++ 4.4, Android, etc.
   5 // See for example:
   6 // $HOME/android-toolchain/toolchains/armeabi-v7a-clang/sysroot/usr/include/inttypes.h
   7 // $HOME/android-toolchain/toolchains/armeabi-v7a-clang/sysroot/usr/include/stdint.h
   8 #ifdef __cplusplus
   9 #ifndef __STDC_LIMIT_MACROS
  10 #define __STDC_LIMIT_MACROS
  11 #endif
  12 #ifndef __STDC_CONSTANT_MACROS
  13 #define __STDC_CONSTANT_MACROS
  14 #endif
  15 #ifndef __STDC_FORMAT_MACROS
  16 #define __STDC_FORMAT_MACROS
  17 #endif
  18 #endif // __cplusplus
  19
  20 #include <stdarg.h>
  21 #include <stdlib.h>
  22 #include <string.h>
  23 #include <stdio.h>
  24 #include <stddef.h>
  25 #include <ctype.h>
  26 #include <limits.h>
  27 #include <stdint.h>
  28 #include <inttypes.h>
  29 #ifdef _MSC_VER
  30 #include <eglib-config.hw>
  31 #else
  32 #include <eglib-config.h>
  33 #endif
  34
  35 // - Pointers should only be converted to or from pointer-sized integers.
  36 // - Any size integer can be converted to any other size integer.
  37 // - Therefore a pointer-sized integer is the intermediary between
  38 //   a pointer and any integer type.
  39 #define GPOINTER_TO_INT(ptr)   ((gint)(gssize)(ptr))
  40 #define GPOINTER_TO_UINT(ptr)  ((guint)(gsize)(ptr))
  41 #define GINT_TO_POINTER(v)     ((gpointer)(gssize)(v))
  42 #define GUINT_TO_POINTER(v)    ((gpointer)(gsize)(v))
  43
  44 #ifndef EGLIB_NO_REMAP
  45 #include <eglib-remap.h>
  46 #endif
  47
  48 #ifdef G_HAVE_ALLOCA_H
  49 #include <alloca.h>
  50 #endif
  51
  52 #ifdef WIN32
  53 /* For alloca */
  54 #include <malloc.h>
  55 #endif
  56
  57 #ifdef G_HAVE_UNISTD_H
  58 #include <unistd.h>
  59 #endif
  60
  61 #ifndef offsetof
  62 #   define offsetof(s_name,n_name) (size_t)(char *)&(((s_name*)0)->m_name)
  63 #endif
  64
  65 #ifdef  __cplusplus
  66 #define G_BEGIN_DECLS  extern "C" {
  67 #define G_END_DECLS    }
  68 #define G_EXTERN_C     extern "C"
  69 #else
  70 #define G_BEGIN_DECLS  /* nothing */
  71 #define G_END_DECLS    /* nothing */
  72 #define G_EXTERN_C     /* nothing */
  73 #endif
  74
  75 #ifdef __cplusplus
  76
  77 #define g_cast monoeg_g_cast // in case not inlined (see eglib-remap.h)
  78
  79 // g_cast converts void* to T*.
  80 // e.g. #define malloc(x) (g_cast (malloc (x)))
  81 // FIXME It used to do more. Rename?
  82 struct g_cast
  83 {
  84 private:
  85         void * const x;
  86 public:
  87         explicit g_cast (void volatile *y) : x((void*)y) { }
  88         // Lack of rvalue constructor inhibits ternary operator.
  89         // Either don't use ternary, or cast each side.
  90         // sa = (salen <= 128) ? g_alloca (salen) : g_malloc (salen);
  91         // w32socket.c:1045:24: error: call to deleted constructor of 'monoeg_g_cast'
  92         //g_cast (g_cast&& y) : x(y.x) { }
  93         g_cast (g_cast&&) = delete;
  94         g_cast () = delete;
  95         g_cast (const g_cast&) = delete;
  96
  97         template <typename TTo>
  98         operator TTo* () const
  99         {
 100                 return (TTo*)x;
 101         }
 102 };
 103
 104 #else
 105
 106 // FIXME? Parens are omitted to preserve prior meaning.
 107 #define g_cast(x) x
 108
 109 #endif
 110
 111 // G++4.4 breaks opeq below without this.
 112 #if defined  (__GNUC__) || defined  (__clang__)
 113 #define G_MAY_ALIAS  __attribute__((__may_alias__))
 114 #else
 115 #define G_MAY_ALIAS /* nothing */
 116 #endif
 117
 118 #ifdef __cplusplus
 119
 120 // Provide for bit operations on enums, but not all integer operations.
 121 // This alleviates a fair number of casts in porting C to C++.
 122
 123 // Forward declare template with no generic implementation.
 124 template <size_t> struct g_size_to_int;
 125
 126 // Template specializations.
 127 template <> struct g_size_to_int<1> { typedef int8_t type; };
 128 template <> struct g_size_to_int<2> { typedef int16_t type; };
 129 template <> struct g_size_to_int<4> { typedef int32_t type; };
 130 template <> struct g_size_to_int<8> { typedef int64_t type; };
 131
 132 // g++4.4 does not accept:
 133 //template <typename T>
 134 //using g_size_to_int_t = typename g_size_to_int <sizeof (T)>::type;
 135 #define g_size_to_int_t(x) g_size_to_int <sizeof (x)>::type
 136
 137 #define G_ENUM_BINOP(Enum, op, opeq)            \
 138 inline Enum                                     \
 139 operator op (Enum a, Enum b)                    \
 140 {                                               \
 141         typedef g_size_to_int_t (Enum) type;    \
 142         return static_cast<Enum>(static_cast<type>(a) op b); \
 143 }                                               \
 144                                                 \
 145 inline Enum&                                    \
 146 operator opeq (Enum& a, Enum b)                 \
 147 {                                               \
 148         typedef g_size_to_int_t (Enum) G_MAY_ALIAS type; \
 149         return (Enum&)((type&)a opeq b);        \
 150 }                                               \
 151
 152 #define G_ENUM_FUNCTIONS(Enum)                  \
 153 extern "C++" { /* in case within extern "C" */  \
 154 inline Enum                                     \
 155 operator~ (Enum a)                              \
 156 {                                               \
 157         typedef g_size_to_int_t (Enum) type;    \
 158         return static_cast<Enum>(~static_cast<type>(a)); \
 159 }                                               \
 160                                                 \
 161 G_ENUM_BINOP (Enum, |, |=)                      \
 162 G_ENUM_BINOP (Enum, &, &=)                      \
 163 G_ENUM_BINOP (Enum, ^, ^=)                      \
 164                                                 \
 165 } /* extern "C++" */
 166
 167 #else
 168 #define G_ENUM_FUNCTIONS(Enum) /* nothing */
 169 #endif
 170
 171 G_BEGIN_DECLS
 172
 173 /*
 174  * Basic data types
 175  */
 176 typedef int            gint;
 177 typedef unsigned int   guint;
 178 typedef short          gshort;
 179 typedef unsigned short gushort;
 180 typedef long           glong;
 181 typedef unsigned long  gulong;
 182 typedef void *         gpointer;
 183 typedef const void *   gconstpointer;
 184 typedef char           gchar;
 185 typedef unsigned char  guchar;
 186
 187 /* Types defined in terms of the stdint.h */
 188 typedef int8_t         gint8;
 189 typedef uint8_t        guint8;
 190 typedef int16_t        gint16;
 191 typedef uint16_t       guint16;
 192 typedef int32_t        gint32;
 193 typedef uint32_t       guint32;
 194 typedef int64_t        gint64;
 195 typedef uint64_t       guint64;
 196 typedef float          gfloat;
 197 typedef double         gdouble;
 198 typedef int32_t        gboolean;
 199
 200 #if defined (HOST_WIN32) || defined (_WIN32)
 201 G_END_DECLS
 202 #include <wchar.h>
 203 typedef wchar_t gunichar2;
 204 G_BEGIN_DECLS
 205 #else
 206 typedef guint16 gunichar2;
 207 #endif
 208 typedef guint32 gunichar;
 209
 210 /*
 211  * Macros
 212  */
 213 #define G_N_ELEMENTS(s)      (sizeof(s) / sizeof ((s) [0]))
 214
 215 // e.g. strncmp (foo, G_STRING_CONSTANT_AND_LENGTH ("version"))
 216 #define G_STRING_CONSTANT_AND_LENGTH(x) (x), G_N_ELEMENTS (x) - 1
 217
 218 #define FALSE                0
 219 #define TRUE                 1
 220
 221 #define G_MINSHORT           SHRT_MIN
 222 #define G_MAXSHORT           SHRT_MAX
 223 #define G_MAXUSHORT          USHRT_MAX
 224 #define G_MAXINT             INT_MAX
 225 #define G_MININT             INT_MIN
 226 #define G_MAXINT8            INT8_MAX
 227 #define G_MAXUINT8           UINT8_MAX
 228 #define G_MININT8            INT8_MIN
 229 #define G_MAXINT16           INT16_MAX
 230 #define G_MAXUINT16          UINT16_MAX
 231 #define G_MININT16           INT16_MIN
 232 #define G_MAXINT32           INT32_MAX
 233 #define G_MAXUINT32          UINT32_MAX
 234 #define G_MININT32           INT32_MIN
 235 #define G_MININT64           INT64_MIN
 236 #define G_MAXINT64           INT64_MAX
 237 #define G_MAXUINT64          UINT64_MAX
 238
 239 #define G_LITTLE_ENDIAN 1234
 240 #define G_BIG_ENDIAN    4321
 241 #define G_STMT_START    do
 242 #define G_STMT_END      while (0)
 243
 244 #define G_USEC_PER_SEC  1000000
 245
 246 #ifndef ABS
 247 #define ABS(a)         ((a) > 0 ? (a) : -(a))
 248 #endif
 249
 250 #define ALIGN_TO(val,align) ((((gssize)val) + (gssize)((align) - 1)) & (~((gssize)(align - 1))))
 251
 252 #define ALIGN_DOWN_TO(val,align) (((gssize)val) & (~((gssize)(align - 1))))
 253
 254 #define ALIGN_PTR_TO(ptr,align) (gpointer)((((gssize)(ptr)) + (gssize)(align - 1)) & (~((gssize)(align - 1))))
 255
 256 #define G_STRUCT_OFFSET(p_type,field) offsetof(p_type,field)
 257
 258 #define EGLIB_STRINGIFY(x) #x
 259 #define EGLIB_TOSTRING(x) EGLIB_STRINGIFY(x)
 260 #define G_STRLOC __FILE__ ":" EGLIB_TOSTRING(__LINE__) ":"
 261
 262 #define G_CONST_RETURN const
 263
 264 #define G_GUINT64_FORMAT PRIu64
 265 #define G_GINT64_FORMAT PRIi64
 266 #define G_GUINT32_FORMAT PRIu32
 267 #define G_GINT32_FORMAT PRIi32
 268
 269 #ifdef __GNUC__
 270 #define G_ATTR_FORMAT_PRINTF(fmt_pos,arg_pos) __attribute__((__format__(__printf__,fmt_pos,arg_pos)))
 271 #else
 272 #define G_ATTR_FORMAT_PRINTF(fmt_pos,arg_pos)
 273 #endif
 274
 275 /*
 276  * Allocation
 277  */
 278 G_EXTERN_C // Used by MonoPosixHelper or MonoSupportW, at least.
 279 void g_free (void *ptr);
 280 G_EXTERN_C // Used by MonoPosixHelper or MonoSupportW, at least.
 281 gpointer g_realloc (gpointer obj, gsize size);
 282 G_EXTERN_C // Used by MonoPosixHelper or MonoSupportW, at least.
 283 gpointer g_malloc (gsize x);
 284 G_EXTERN_C // Used by MonoPosixHelper or MonoSupportW, at least.
 285 gpointer g_malloc0 (gsize x);
 286 G_EXTERN_C // Used by profilers, at least.
 287 gpointer g_calloc (gsize n, gsize x);
 288 gpointer g_try_malloc (gsize x);
 289 gpointer g_try_realloc (gpointer obj, gsize size);
 290
 291 #define g_new(type,size)        ((type *) g_malloc (sizeof (type) * (size)))
 292 #define g_new0(type,size)       ((type *) g_malloc0 (sizeof (type)* (size)))
 293 #define g_newa(type,size)       ((type *) alloca (sizeof (type) * (size)))
 294 #define g_newa0(type,size)      ((type *) memset (alloca (sizeof (type) * (size)), 0, sizeof (type) * (size)))
 295
 296 #define g_memmove(dest,src,len) memmove (dest, src, len)
 297 #define g_renew(struct_type, mem, n_structs) ((struct_type*)g_realloc (mem, sizeof (struct_type) * n_structs))
 298 #define g_alloca(size)          (g_cast (alloca (size)))
 299
 300 G_EXTERN_C // Used by libtest, at least.
 301 gpointer g_memdup (gconstpointer mem, guint byte_size);
 302 static inline gchar   *g_strdup (const gchar *str) { if (str) { return (gchar*) g_memdup (str, (guint)strlen (str) + 1); } return NULL; }
 303 gchar **g_strdupv (gchar **str_array);
 304
 305 typedef struct {
 306         gpointer (*malloc)      (gsize    n_bytes);
 307         gpointer (*realloc)     (gpointer mem, gsize n_bytes);
 308         void     (*free)        (gpointer mem);
 309         gpointer (*calloc)      (gsize    n_blocks, gsize n_block_bytes);
 310 } GMemVTable;
 311
 312 void g_mem_set_vtable (GMemVTable* vtable);
 313 void g_mem_get_vtable (GMemVTable* vtable);
 314
 315 struct _GMemChunk {
 316         guint alloc_size;
 317 };
 318
 319 typedef struct _GMemChunk GMemChunk;
 320 /*
 321  * Misc.
 322  */
 323
 324 gboolean         g_hasenv(const gchar *variable);
 325 gchar *          g_getenv(const gchar *variable);
 326
 327 G_EXTERN_C // sdks/wasm/driver.c is C and uses this
 328 gboolean         g_setenv(const gchar *variable, const gchar *value, gboolean overwrite);
 329
 330 void             g_unsetenv(const gchar *variable);
 331
 332 gchar*           g_win32_getlocale(void);
 333
 334 /*
 335  * Precondition macros
 336  */
 337 #define g_warn_if_fail(x)  G_STMT_START { if (!(x)) { g_warning ("%s:%d: assertion '%s' failed\n", __FILE__, __LINE__, #x); } } G_STMT_END
 338 #define g_return_if_fail(x)  G_STMT_START { if (!(x)) { g_critical ("%s:%d: assertion '%s' failed\n", __FILE__, __LINE__, #x); return; } } G_STMT_END
 339 #define g_return_val_if_fail(x,e)  G_STMT_START { if (!(x)) { g_critical ("%s:%d: assertion '%s' failed\n", __FILE__, __LINE__, #x); return (e); } } G_STMT_END
 340
 341 /*
 342  * Errors
 343  */
 344 typedef struct {
 345         /* In the real glib, this is a GQuark, but we dont use/need that */
 346         gpointer domain;
 347         gint     code;
 348         gchar   *message;
 349 } GError;
 350
 351 void    g_clear_error (GError **gerror);
 352 void    g_error_free (GError *gerror);
 353 GError *g_error_new  (gpointer domain, gint code, const char *format, ...);
 354 void    g_set_error  (GError **err, gpointer domain, gint code, const gchar *format, ...);
 355 void    g_propagate_error (GError **dest, GError *src);
 356
 357 /*
 358  * Strings utility
 359  */
 360 G_EXTERN_C // Used by libtest, at least.
 361 gchar       *g_strdup_printf  (const gchar *format, ...) G_ATTR_FORMAT_PRINTF(1, 2);
 362 gchar       *g_strdup_vprintf (const gchar *format, va_list args);
 363 gchar       *g_strndup        (const gchar *str, gsize n);
 364 const gchar *g_strerror       (gint errnum);
 365 gchar       *g_strndup        (const gchar *str, gsize n);
 366 void         g_strfreev       (gchar **str_array);
 367 gchar       *g_strconcat      (const gchar *first, ...);
 368 gchar      **g_strsplit       (const gchar *string, const gchar *delimiter, gint max_tokens);
 369 gchar      **g_strsplit_set   (const gchar *string, const gchar *delimiter, gint max_tokens);
 370 gchar       *g_strreverse     (gchar *str);
 371 gboolean     g_str_has_prefix (const gchar *str, const gchar *prefix);
 372 gboolean     g_str_has_suffix (const gchar *str, const gchar *suffix);
 373 guint        g_strv_length    (gchar **str_array);
 374 gchar       *g_strjoin        (const gchar *separator, ...);
 375 gchar       *g_strjoinv       (const gchar *separator, gchar **str_array);
 376 gchar       *g_strchug        (gchar *str);
 377 gchar       *g_strchomp       (gchar *str);
 378 void         g_strdown        (gchar *string);
 379 gchar       *g_strnfill       (gsize length, gchar fill_char);
 380 gsize        g_strnlen        (const char*, gsize);
 381 char        *g_str_from_file_region (int fd, guint64 offset, gsize size);
 382
 383 void         g_strdelimit     (char *string, char delimiter, char new_delimiter);
 384 gchar       *g_strescape      (const gchar *source, const gchar *exceptions);
 385
 386 gchar       *g_filename_to_uri   (const gchar *filename, const gchar *hostname, GError **gerror);
 387 gchar       *g_filename_from_uri (const gchar *uri, gchar **hostname, GError **gerror);
 388
 389 gint         g_printf          (gchar const *format, ...) G_ATTR_FORMAT_PRINTF(1, 2);
 390 gint         g_fprintf         (FILE *file, gchar const *format, ...) G_ATTR_FORMAT_PRINTF(2, 3);
 391 gint         g_sprintf         (gchar *string, gchar const *format, ...) G_ATTR_FORMAT_PRINTF(2, 3);
 392 gint         g_snprintf        (gchar *string, gulong n, gchar const *format, ...) G_ATTR_FORMAT_PRINTF(3, 4);
 393 gint         g_vasprintf       (gchar **ret, const gchar *fmt, va_list ap);
 394 #define g_vprintf vprintf
 395 #define g_vfprintf vfprintf
 396 #define g_vsprintf vsprintf
 397 #define g_vsnprintf vsnprintf
 398
 399 gsize   g_strlcpy            (gchar *dest, const gchar *src, gsize dest_size);
 400 gchar  *g_stpcpy             (gchar *dest, const char *src);
 401
 402
 403 gchar   g_ascii_tolower      (gchar c);
 404 gchar   g_ascii_toupper      (gchar c);
 405 gchar  *g_ascii_strdown      (const gchar *str, gssize len);
 406 void    g_ascii_strdown_no_alloc (char* dst, const char* src, gsize len);
 407 gchar  *g_ascii_strup        (const gchar *str, gssize len);
 408 gint    g_ascii_strncasecmp  (const gchar *s1, const gchar *s2, gsize n);
 409 gint    g_ascii_strcasecmp   (const gchar *s1, const gchar *s2);
 410 gint    g_ascii_xdigit_value (gchar c);
 411 #define g_ascii_isspace(c)   (isspace (c) != 0)
 412 #define g_ascii_isalpha(c)   (isalpha (c) != 0)
 413 #define g_ascii_isprint(c)   (isprint (c) != 0)
 414 #define g_ascii_isxdigit(c)  (isxdigit (c) != 0)
 415 gboolean g_utf16_ascii_equal (const gunichar2 *utf16, size_t ulen, const char *ascii, size_t alen);
 416 gboolean g_utf16_asciiz_equal (const gunichar2 *utf16, const char *ascii);
 417
 418 static inline
 419 gboolean g_ascii_equal (const char *s1, gsize len1, const char *s2, gsize len2)
 420 {
 421     return len1 == len2 && (s1 == s2 || memcmp (s1, s2, len1) == 0);
 422 }
 423
 424 static inline
 425 gboolean g_asciiz_equal (const char *s1, const char *s2)
 426 {
 427     return s1 == s2 || strcmp (s1, s2) == 0;
 428 }
 429
 430 static inline
 431 gboolean
 432 g_ascii_equal_caseinsensitive (const char *s1, gsize len1, const char *s2, gsize len2)
 433 {
 434     return len1 == len2 && (s1 == s2 || g_ascii_strncasecmp (s1, s2, len1) == 0);
 435 }
 436
 437 static inline
 438 gboolean
 439 g_asciiz_equal_caseinsensitive (const char *s1, const char *s2)
 440 {
 441     return s1 == s2 || g_ascii_strcasecmp (s1, s2) == 0;
 442 }
 443
 444 /* FIXME: g_strcasecmp supports utf8 unicode stuff */
 445 #ifdef _MSC_VER
 446 #define g_strcasecmp _stricmp
 447 #define g_strncasecmp _strnicmp
 448 #define g_strstrip(a) g_strchug (g_strchomp (a))
 449 #else
 450 #define g_strcasecmp strcasecmp
 451 #define g_ascii_strtoull strtoull
 452 #define g_strncasecmp strncasecmp
 453 #define g_strstrip(a) g_strchug (g_strchomp (a))
 454 #endif
 455 #define g_ascii_strdup strdup
 456
 457 /*
 458  * String type
 459  */
 460 typedef struct {
 461         char *str;
 462         gsize len;
 463         gsize allocated_len;
 464 } GString;
 465
 466 GString     *g_string_new           (const gchar *init);
 467 GString     *g_string_new_len       (const gchar *init, gssize len);
 468 GString     *g_string_sized_new     (gsize default_size);
 469 gchar       *g_string_free          (GString *string, gboolean free_segment);
 470 GString     *g_string_append        (GString *string, const gchar *val);
 471
 472 void         g_string_printf        (GString *string, const gchar *format, ...) G_ATTR_FORMAT_PRINTF(2, 3);
 473 void         g_string_append_printf (GString *string, const gchar *format, ...) G_ATTR_FORMAT_PRINTF(2, 3);
 474 void         g_string_append_vprintf (GString *string, const gchar *format, va_list args);
 475 GString     *g_string_append_unichar (GString *string, gunichar c);
 476 GString     *g_string_append_c      (GString *string, gchar c);
 477 GString     *g_string_append        (GString *string, const gchar *val);
 478 GString     *g_string_append_len    (GString *string, const gchar *val, gssize len);
 479 GString     *g_string_truncate      (GString *string, gsize len);
 480 GString     *g_string_set_size      (GString *string, gsize len);
 481
 482 #define g_string_sprintfa g_string_append_printf
 483
 484 typedef void     (*GFunc)          (gpointer data, gpointer user_data);
 485 typedef gint     (*GCompareFunc)   (gconstpointer a, gconstpointer b);
 486 typedef gint     (*GCompareDataFunc) (gconstpointer a, gconstpointer b, gpointer user_data);
 487 typedef void     (*GHFunc)         (gpointer key, gpointer value, gpointer user_data);
 488 typedef gboolean (*GHRFunc)        (gpointer key, gpointer value, gpointer user_data);
 489 typedef void     (*GDestroyNotify) (gpointer data);
 490 typedef guint    (*GHashFunc)      (gconstpointer key);
 491 typedef gboolean (*GEqualFunc)     (gconstpointer a, gconstpointer b);
 492 typedef void     (*GFreeFunc)      (gpointer       data);
 493
 494 /*
 495  * Lists
 496  */
 497 typedef struct _GSList GSList;
 498 struct _GSList {
 499         gpointer data;
 500         GSList *next;
 501 };
 502
 503 GSList *g_slist_alloc         (void);
 504 GSList *g_slist_append        (GSList        *list,
 505                                gpointer       data);
 506 GSList *g_slist_prepend       (GSList        *list,
 507                                gpointer       data);
 508 void    g_slist_free          (GSList        *list);
 509 void    g_slist_free_1        (GSList        *list);
 510 GSList *g_slist_copy          (GSList        *list);
 511 GSList *g_slist_concat        (GSList        *list1,
 512                                GSList        *list2);
 513 void    g_slist_foreach       (GSList        *list,
 514                                GFunc          func,
 515                                gpointer       user_data);
 516 GSList *g_slist_last          (GSList        *list);
 517 GSList *g_slist_find          (GSList        *list,
 518                                gconstpointer  data);
 519 GSList *g_slist_find_custom   (GSList        *list,
 520                                gconstpointer  data,
 521                                GCompareFunc   func);
 522 GSList *g_slist_remove        (GSList        *list,
 523                                gconstpointer  data);
 524 GSList *g_slist_remove_all    (GSList        *list,
 525                                gconstpointer  data);
 526 GSList *g_slist_reverse       (GSList        *list);
 527 guint   g_slist_length        (GSList        *list);
 528 GSList *g_slist_remove_link   (GSList        *list,
 529                                GSList        *link);
 530 GSList *g_slist_delete_link   (GSList        *list,
 531                                GSList        *link);
 532 GSList *g_slist_insert_sorted (GSList        *list,
 533                                gpointer       data,
 534                                GCompareFunc   func);
 535 GSList *g_slist_insert_before (GSList        *list,
 536                                GSList        *sibling,
 537                                gpointer       data);
 538 GSList *g_slist_sort          (GSList        *list,
 539                                GCompareFunc   func);
 540 gint    g_slist_index         (GSList        *list,
 541                                gconstpointer  data);
 542 GSList *g_slist_nth           (GSList        *list,
 543                                guint          n);
 544 gpointer g_slist_nth_data     (GSList        *list,
 545                                guint          n);
 546
 547 #define g_slist_next(slist) ((slist) ? (((GSList *) (slist))->next) : NULL)
 548
 549
 550 typedef struct _GList GList;
 551 struct _GList {
 552   gpointer data;
 553   GList *next;
 554   GList *prev;
 555 };
 556
 557 #define g_list_next(list) ((list) ? (((GList *) (list))->next) : NULL)
 558 #define g_list_previous(list) ((list) ? (((GList *) (list))->prev) : NULL)
 559
 560 GList *g_list_alloc         (void);
 561 GList *g_list_append        (GList         *list,
 562                              gpointer       data);
 563 GList *g_list_prepend       (GList         *list,
 564                              gpointer       data);
 565 void   g_list_free          (GList         *list);
 566 void   g_list_free_1        (GList         *list);
 567 GList *g_list_copy          (GList         *list);
 568 guint  g_list_length        (GList         *list);
 569 gint   g_list_index         (GList         *list,
 570                              gconstpointer  data);
 571 GList *g_list_nth           (GList         *list,
 572                              guint          n);
 573 gpointer g_list_nth_data      (GList         *list,
 574                              guint          n);
 575 GList *g_list_last          (GList         *list);
 576 GList *g_list_concat        (GList         *list1,
 577                              GList         *list2);
 578 void   g_list_foreach       (GList         *list,
 579                              GFunc          func,
 580                              gpointer       user_data);
 581 GList *g_list_first         (GList         *list);
 582 GList *g_list_find          (GList         *list,
 583                              gconstpointer  data);
 584 GList *g_list_find_custom   (GList         *list,
 585                              gconstpointer  data,
 586                              GCompareFunc   func);
 587 GList *g_list_remove        (GList         *list,
 588                              gconstpointer  data);
 589 GList *g_list_remove_all    (GList         *list,
 590                              gconstpointer  data);
 591 GList *g_list_reverse       (GList         *list);
 592 GList *g_list_remove_link   (GList         *list,
 593                              GList         *link);
 594 GList *g_list_delete_link   (GList         *list,
 595                              GList         *link);
 596 GList *g_list_insert_sorted (GList         *list,
 597                              gpointer       data,
 598                              GCompareFunc   func);
 599 GList *g_list_insert_before (GList         *list,
 600                              GList         *sibling,
 601                              gpointer       data);
 602 GList *g_list_sort          (GList         *sort,
 603                              GCompareFunc   func);
 604
 605 /*
 606  * Hashtables
 607  */
 608 typedef struct _GHashTable GHashTable;
 609 typedef struct _GHashTableIter GHashTableIter;
 610
 611 /* Private, but needed for stack allocation */
 612 struct _GHashTableIter
 613 {
 614         gpointer dummy [8];
 615 };
 616
 617 G_EXTERN_C // Used by MonoPosixHelper or MonoSupportW, at least.
 618 GHashTable     *g_hash_table_new             (GHashFunc hash_func, GEqualFunc key_equal_func);
 619 GHashTable     *g_hash_table_new_full        (GHashFunc hash_func, GEqualFunc key_equal_func,
 620                                               GDestroyNotify key_destroy_func, GDestroyNotify value_destroy_func);
 621 G_EXTERN_C // Used by MonoPosixHelper or MonoSupportW, at least.
 622 void            g_hash_table_insert_replace  (GHashTable *hash, gpointer key, gpointer value, gboolean replace);
 623 guint           g_hash_table_size            (GHashTable *hash);
 624 GList          *g_hash_table_get_keys        (GHashTable *hash);
 625 GList          *g_hash_table_get_values      (GHashTable *hash);
 626 gboolean        g_hash_table_contains (GHashTable *hash, gconstpointer key);
 627 G_EXTERN_C // Used by MonoPosixHelper or MonoSupportW, at least.
 628 gpointer        g_hash_table_lookup          (GHashTable *hash, gconstpointer key);
 629 gboolean        g_hash_table_lookup_extended (GHashTable *hash, gconstpointer key, gpointer *orig_key, gpointer *value);
 630 G_EXTERN_C // Used by MonoPosixHelper or MonoSupportW, at least.
 631 void            g_hash_table_foreach         (GHashTable *hash, GHFunc func, gpointer user_data);
 632 gpointer        g_hash_table_find            (GHashTable *hash, GHRFunc predicate, gpointer user_data);
 633 G_EXTERN_C // Used by MonoPosixHelper or MonoSupportW, at least.
 634 gboolean        g_hash_table_remove          (GHashTable *hash, gconstpointer key);
 635 gboolean        g_hash_table_steal           (GHashTable *hash, gconstpointer key);
 636 void            g_hash_table_remove_all      (GHashTable *hash);
 637 guint           g_hash_table_foreach_remove  (GHashTable *hash, GHRFunc func, gpointer user_data);
 638 guint           g_hash_table_foreach_steal   (GHashTable *hash, GHRFunc func, gpointer user_data);
 639 G_EXTERN_C // Used by MonoPosixHelper or MonoSupportW, at least.
 640 void            g_hash_table_destroy         (GHashTable *hash);
 641 void            g_hash_table_print_stats     (GHashTable *table);
 642
 643 void            g_hash_table_iter_init       (GHashTableIter *iter, GHashTable *hash_table);
 644 gboolean        g_hash_table_iter_next       (GHashTableIter *iter, gpointer *key, gpointer *value);
 645
 646 guint           g_spaced_primes_closest      (guint x);
 647
 648 #define g_hash_table_insert(h,k,v)    g_hash_table_insert_replace ((h),(k),(v),FALSE)
 649 #define g_hash_table_replace(h,k,v)   g_hash_table_insert_replace ((h),(k),(v),TRUE)
 650 #define g_hash_table_add(h,k)         g_hash_table_insert_replace ((h),(k),(k),TRUE)
 651
 652 G_EXTERN_C // Used by MonoPosixHelper or MonoSupportW, at least.
 653 gboolean g_direct_equal (gconstpointer v1, gconstpointer v2);
 654 G_EXTERN_C // Used by MonoPosixHelper or MonoSupportW, at least.
 655 guint    g_direct_hash  (gconstpointer v1);
 656 gboolean g_int_equal    (gconstpointer v1, gconstpointer v2);
 657 guint    g_int_hash     (gconstpointer v1);
 658 gboolean g_str_equal    (gconstpointer v1, gconstpointer v2);
 659 guint    g_str_hash     (gconstpointer v1);
 660
 661 /*
 662  * ByteArray
 663  */
 664
 665 typedef struct _GByteArray GByteArray;
 666 struct _GByteArray {
 667         guint8 *data;
 668         gint len;
 669 };
 670
 671 GByteArray *g_byte_array_new    (void);
 672 GByteArray* g_byte_array_append (GByteArray *array, const guint8 *data, guint len);
 673 guint8*  g_byte_array_free      (GByteArray *array, gboolean free_segment);
 674 void     g_byte_array_set_size  (GByteArray *array, gint length);
 675
 676 /*
 677  * Array
 678  */
 679
 680 typedef struct _GArray GArray;
 681 struct _GArray {
 682         gchar *data;
 683         gint len;
 684 };
 685
 686 GArray *g_array_new               (gboolean zero_terminated, gboolean clear_, guint element_size);
 687 GArray *g_array_sized_new         (gboolean zero_terminated, gboolean clear_, guint element_size, guint reserved_size);
 688 gchar*  g_array_free              (GArray *array, gboolean free_segment);
 689 GArray *g_array_append_vals       (GArray *array, gconstpointer data, guint len);
 690 GArray* g_array_insert_vals       (GArray *array, guint index_, gconstpointer data, guint len);
 691 GArray* g_array_remove_index      (GArray *array, guint index_);
 692 GArray* g_array_remove_index_fast (GArray *array, guint index_);
 693 void    g_array_set_size          (GArray *array, gint length);
 694
 695 #define g_array_append_val(a,v)   (g_array_append_vals((a),&(v),1))
 696 #define g_array_insert_val(a,i,v) (g_array_insert_vals((a),(i),&(v),1))
 697 #define g_array_index(a,t,i)      *(t*)(((a)->data) + sizeof(t) * (i))
 698 //FIXME previous missing parens
 699
 700 /*
 701  * QSort
 702 */
 703
 704 void g_qsort_with_data (gpointer base, size_t nmemb, size_t size, GCompareDataFunc compare, gpointer user_data);
 705
 706 /*
 707  * Pointer Array
 708  */
 709
 710 typedef struct _GPtrArray GPtrArray;
 711 struct _GPtrArray {
 712         gpointer *pdata;
 713         guint len;
 714 };
 715
 716 GPtrArray *g_ptr_array_new                (void);
 717 GPtrArray *g_ptr_array_sized_new          (guint reserved_size);
 718 void       g_ptr_array_add                (GPtrArray *array, gpointer data);
 719 gboolean   g_ptr_array_remove             (GPtrArray *array, gpointer data);
 720 gpointer   g_ptr_array_remove_index       (GPtrArray *array, guint index);
 721 gboolean   g_ptr_array_remove_fast        (GPtrArray *array, gpointer data);
 722 gpointer   g_ptr_array_remove_index_fast  (GPtrArray *array, guint index);
 723 void       g_ptr_array_sort               (GPtrArray *array, GCompareFunc compare_func);
 724 void       g_ptr_array_sort_with_data     (GPtrArray *array, GCompareDataFunc compare_func, gpointer user_data);
 725 void       g_ptr_array_set_size           (GPtrArray *array, gint length);
 726 gpointer  *g_ptr_array_free               (GPtrArray *array, gboolean free_seg);
 727 void       g_ptr_array_foreach            (GPtrArray *array, GFunc func, gpointer user_data);
 728 guint      g_ptr_array_capacity           (GPtrArray *array);
 729 #define    g_ptr_array_index(array,index) (array)->pdata[(index)]
 730 //FIXME previous missing parens
 731
 732 /*
 733  * Queues
 734  */
 735 typedef struct {
 736         GList *head;
 737         GList *tail;
 738         guint length;
 739 } GQueue;
 740
 741 gpointer g_queue_pop_head  (GQueue   *queue);
 742 void     g_queue_push_head (GQueue   *queue,
 743                             gpointer  data);
 744 void     g_queue_push_tail (GQueue   *queue,
 745                             gpointer  data);
 746 gboolean g_queue_is_empty  (GQueue   *queue);
 747 GQueue  *g_queue_new       (void);
 748 void     g_queue_free      (GQueue   *queue);
 749 void     g_queue_foreach   (GQueue   *queue, GFunc func, gpointer user_data);
 750
 751 /*
 752  * Messages
 753  */
 754 #ifndef G_LOG_DOMAIN
 755 #define G_LOG_DOMAIN ((gchar*) 0)
 756 #endif
 757
 758 typedef enum {
 759         G_LOG_FLAG_RECURSION          = 1 << 0,
 760         G_LOG_FLAG_FATAL              = 1 << 1,
 761
 762         G_LOG_LEVEL_ERROR             = 1 << 2,
 763         G_LOG_LEVEL_CRITICAL          = 1 << 3,
 764         G_LOG_LEVEL_WARNING           = 1 << 4,
 765         G_LOG_LEVEL_MESSAGE           = 1 << 5,
 766         G_LOG_LEVEL_INFO              = 1 << 6,
 767         G_LOG_LEVEL_DEBUG             = 1 << 7,
 768
 769         G_LOG_LEVEL_MASK              = ~(G_LOG_FLAG_RECURSION | G_LOG_FLAG_FATAL)
 770 } GLogLevelFlags;
 771
 772 G_ENUM_FUNCTIONS (GLogLevelFlags)
 773
 774 gint           g_printv               (const gchar *format, va_list args);
 775 void           g_print                (const gchar *format, ...);
 776 void           g_printerr             (const gchar *format, ...);
 777 GLogLevelFlags g_log_set_always_fatal (GLogLevelFlags fatal_mask);
 778 GLogLevelFlags g_log_set_fatal_mask   (const gchar *log_domain, GLogLevelFlags fatal_mask);
 779 void           g_logv                 (const gchar *log_domain, GLogLevelFlags log_level, const gchar *format, va_list args);
 780 G_EXTERN_C // Used by MonoPosixHelper or MonoSupportW, at least.
 781 void           g_log                  (const gchar *log_domain, GLogLevelFlags log_level, const gchar *format, ...);
 782 G_EXTERN_C // Used by MonoPosixHelper or MonoSupportW, at least.
 783 void           g_assertion_message    (const gchar *format, ...) G_GNUC_NORETURN;
 784 void           mono_assertion_message_disabled  (const char *file, int line) G_GNUC_NORETURN;
 785 void           mono_assertion_message  (const char *file, int line, const char *condition) G_GNUC_NORETURN;
 786 void           mono_assertion_message_unreachable (const char *file, int line) G_GNUC_NORETURN;
 787 const char *   g_get_assertion_message (void);
 788
 789 #ifdef HAVE_C99_SUPPORT
 790 /* The for (;;) tells gc thats g_error () doesn't return, avoiding warnings */
 791 #define g_error(format, ...)    do { g_log (G_LOG_DOMAIN, G_LOG_LEVEL_ERROR, format, __VA_ARGS__); for (;;); } while (0)
 792 #define g_critical(format, ...) g_log (G_LOG_DOMAIN, G_LOG_LEVEL_CRITICAL, format, __VA_ARGS__)
 793 #define g_warning(format, ...)  g_log (G_LOG_DOMAIN, G_LOG_LEVEL_WARNING, format, __VA_ARGS__)
 794 #define g_message(format, ...)  g_log (G_LOG_DOMAIN, G_LOG_LEVEL_MESSAGE, format, __VA_ARGS__)
 795 #define g_debug(format, ...)    g_log (G_LOG_DOMAIN, G_LOG_LEVEL_DEBUG, format, __VA_ARGS__)
 796 #else   /* HAVE_C99_SUPPORT */
 797 #define g_error(...)    do { g_log (G_LOG_DOMAIN, G_LOG_LEVEL_ERROR, __VA_ARGS__); for (;;); } while (0)
 798 #define g_critical(...) g_log (G_LOG_DOMAIN, G_LOG_LEVEL_CRITICAL, __VA_ARGS__)
 799 #define g_warning(...)  g_log (G_LOG_DOMAIN, G_LOG_LEVEL_WARNING, __VA_ARGS__)
 800 #define g_message(...)  g_log (G_LOG_DOMAIN, G_LOG_LEVEL_MESSAGE, __VA_ARGS__)
 801 #define g_debug(...)    g_log (G_LOG_DOMAIN, G_LOG_LEVEL_DEBUG, __VA_ARGS__)
 802 #endif  /* ndef HAVE_C99_SUPPORT */
 803
 804 typedef void (*GLogFunc) (const gchar *log_domain, GLogLevelFlags log_level, const gchar *message, gpointer user_data);
 805 typedef void (*GPrintFunc) (const gchar *string);
 806 typedef void (*GAbortFunc) (void);
 807
 808 void       g_assertion_disable_global   (GAbortFunc func);
 809 void       g_assert_abort               (void);
 810 void       g_log_default_handler     (const gchar *log_domain, GLogLevelFlags log_level, const gchar *message, gpointer unused_data);
 811 GLogFunc   g_log_set_default_handler (GLogFunc log_func, gpointer user_data);
 812 GPrintFunc g_set_print_handler       (GPrintFunc func);
 813 GPrintFunc g_set_printerr_handler    (GPrintFunc func);
 814 /*
 815  * Conversions
 816  */
 817
 818 gpointer g_convert_error_quark(void);
 819
 820
 821 /*
 822  * Unicode Manipulation: most of this is not used by Mono by default, it is
 823  * only used if the old collation code is activated, so this is only the
 824  * bare minimum to build.
 825  */
 826
 827 typedef enum {
 828         G_UNICODE_CONTROL,
 829         G_UNICODE_FORMAT,
 830         G_UNICODE_UNASSIGNED,
 831         G_UNICODE_PRIVATE_USE,
 832         G_UNICODE_SURROGATE,
 833         G_UNICODE_LOWERCASE_LETTER,
 834         G_UNICODE_MODIFIER_LETTER,
 835         G_UNICODE_OTHER_LETTER,
 836         G_UNICODE_TITLECASE_LETTER,
 837         G_UNICODE_UPPERCASE_LETTER,
 838         G_UNICODE_COMBINING_MARK,
 839         G_UNICODE_ENCLOSING_MARK,
 840         G_UNICODE_NON_SPACING_MARK,
 841         G_UNICODE_DECIMAL_NUMBER,
 842         G_UNICODE_LETTER_NUMBER,
 843         G_UNICODE_OTHER_NUMBER,
 844         G_UNICODE_CONNECT_PUNCTUATION,
 845         G_UNICODE_DASH_PUNCTUATION,
 846         G_UNICODE_CLOSE_PUNCTUATION,
 847         G_UNICODE_FINAL_PUNCTUATION,
 848         G_UNICODE_INITIAL_PUNCTUATION,
 849         G_UNICODE_OTHER_PUNCTUATION,
 850         G_UNICODE_OPEN_PUNCTUATION,
 851         G_UNICODE_CURRENCY_SYMBOL,
 852         G_UNICODE_MODIFIER_SYMBOL,
 853         G_UNICODE_MATH_SYMBOL,
 854         G_UNICODE_OTHER_SYMBOL,
 855         G_UNICODE_LINE_SEPARATOR,
 856         G_UNICODE_PARAGRAPH_SEPARATOR,
 857         G_UNICODE_SPACE_SEPARATOR
 858 } GUnicodeType;
 859
 860 typedef enum {
 861         G_UNICODE_BREAK_MANDATORY,
 862         G_UNICODE_BREAK_CARRIAGE_RETURN,
 863         G_UNICODE_BREAK_LINE_FEED,
 864         G_UNICODE_BREAK_COMBINING_MARK,
 865         G_UNICODE_BREAK_SURROGATE,
 866         G_UNICODE_BREAK_ZERO_WIDTH_SPACE,
 867         G_UNICODE_BREAK_INSEPARABLE,
 868         G_UNICODE_BREAK_NON_BREAKING_GLUE,
 869         G_UNICODE_BREAK_CONTINGENT,
 870         G_UNICODE_BREAK_SPACE,
 871         G_UNICODE_BREAK_AFTER,
 872         G_UNICODE_BREAK_BEFORE,
 873         G_UNICODE_BREAK_BEFORE_AND_AFTER,
 874         G_UNICODE_BREAK_HYPHEN,
 875         G_UNICODE_BREAK_NON_STARTER,
 876         G_UNICODE_BREAK_OPEN_PUNCTUATION,
 877         G_UNICODE_BREAK_CLOSE_PUNCTUATION,
 878         G_UNICODE_BREAK_QUOTATION,
 879         G_UNICODE_BREAK_EXCLAMATION,
 880         G_UNICODE_BREAK_IDEOGRAPHIC,
 881         G_UNICODE_BREAK_NUMERIC,
 882         G_UNICODE_BREAK_INFIX_SEPARATOR,
 883         G_UNICODE_BREAK_SYMBOL,
 884         G_UNICODE_BREAK_ALPHABETIC,
 885         G_UNICODE_BREAK_PREFIX,
 886         G_UNICODE_BREAK_POSTFIX,
 887         G_UNICODE_BREAK_COMPLEX_CONTEXT,
 888         G_UNICODE_BREAK_AMBIGUOUS,
 889         G_UNICODE_BREAK_UNKNOWN,
 890         G_UNICODE_BREAK_NEXT_LINE,
 891         G_UNICODE_BREAK_WORD_JOINER,
 892         G_UNICODE_BREAK_HANGUL_L_JAMO,
 893         G_UNICODE_BREAK_HANGUL_V_JAMO,
 894         G_UNICODE_BREAK_HANGUL_T_JAMO,
 895         G_UNICODE_BREAK_HANGUL_LV_SYLLABLE,
 896         G_UNICODE_BREAK_HANGUL_LVT_SYLLABLE
 897 } GUnicodeBreakType;
 898
 899 gunichar       g_unichar_toupper (gunichar c);
 900 gunichar       g_unichar_tolower (gunichar c);
 901 gunichar       g_unichar_totitle (gunichar c);
 902 GUnicodeType   g_unichar_type    (gunichar c);
 903 gboolean       g_unichar_isspace (gunichar c);
 904 gboolean       g_unichar_isxdigit (gunichar c);
 905 gint           g_unichar_xdigit_value (gunichar c);
 906 GUnicodeBreakType   g_unichar_break_type (gunichar c);
 907
 908 #ifndef MAX
 909 #define MAX(a,b) (((a)>(b)) ? (a) : (b))
 910 #endif
 911
 912 #ifndef MIN
 913 #define MIN(a,b) (((a)<(b)) ? (a) : (b))
 914 #endif
 915
 916 #ifndef CLAMP
 917 #define CLAMP(a,low,high) (((a) < (low)) ? (low) : (((a) > (high)) ? (high) : (a)))
 918 #endif
 919
 920 #if defined(__GNUC__) && (__GNUC__ > 2)
 921 #define G_LIKELY(expr) (__builtin_expect ((expr) != 0, 1))
 922 #define G_UNLIKELY(expr) (__builtin_expect ((expr) != 0, 0))
 923 #else
 924 #define G_LIKELY(x) (x)
 925 #define G_UNLIKELY(x) (x)
 926 #endif
 927
 928 #if defined(_MSC_VER)
 929 #define  eg_unreachable() __assume(0)
 930 #elif defined(__GNUC__) && ((__GNUC__ > 4) || (__GNUC__ == 4 && (__GNUC_MINOR__ >= 5)))
 931 #define  eg_unreachable() __builtin_unreachable()
 932 #else
 933 #define  eg_unreachable()
 934 #endif
 935
 936 /* g_assert is a boolean expression; the precise value is not preserved, just true or false. */
 937 #ifdef DISABLE_ASSERT_MESSAGES
 938 // This is smaller than the equivalent mono_assertion_message (..."disabled");
 939 #define g_assert(x) (G_LIKELY((x)) ? 1 : (mono_assertion_message_disabled (__FILE__, __LINE__), 0))
 940 #else
 941 #define g_assert(x) (G_LIKELY((x)) ? 1 : (mono_assertion_message (__FILE__, __LINE__, #x), 0))
 942 #endif
 943
 944 #ifdef __cplusplus
 945 #define g_static_assert(x) static_assert (x, "")
 946 #else
 947 #define g_static_assert(x) g_assert (x)
 948 #endif
 949
 950 #define  g_assert_not_reached() G_STMT_START { mono_assertion_message_unreachable (__FILE__, __LINE__); eg_unreachable(); } G_STMT_END
 951
 952 #if ENABLE_NETCORE
 953 #define g_assert_netcore()     /* nothing */
 954 #define g_assert_not_netcore() g_assert (!"This function should only be called on mono-notnetcore.")
 955 #else
 956 #define g_assert_netcore()     g_assert (!"This function should only be called on mono-netcore.")
 957 #define g_assert_not_netcore() /* nothing */
 958 #endif
 959
 960 /* f is format -- like printf and scanf
 961  * Where you might have said:
 962  *      if (!(expr))
 963  *              g_error("%s invalid bar:%d", __func__, bar)
 964  *
 965  * You can say:
 966  *      g_assertf(expr, "bar:%d", bar);
 967  *
 968  * The usual assertion text of file/line/expr/newline are builtin, and __func__.
 969  *
 970  * g_assertf is a boolean expression -- the precise value is not preserved, just true or false.
 971  *
 972  * Other than expr, the parameters are not evaluated unless expr is false.
 973  *
 974  * format must be a string literal, in order to be concatenated.
 975  * If this is too restrictive, g_error remains.
 976  */
 977 #ifdef DISABLE_ASSERT_MESSAGES
 978 #define g_assertf(x, format, ...) (G_LIKELY((x)) ? 1 : (mono_assertion_message_disabled (__FILE__, __LINE__), 0))
 979 #elif defined(_MSC_VER) && (_MSC_VER < 1910)
 980 #define g_assertf(x, format, ...) (G_LIKELY((x)) ? 1 : (g_assertion_message ("* Assertion at %s:%d, condition `%s' not met, function:%s, " format "\n", __FILE__, __LINE__, #x, __func__, __VA_ARGS__), 0))
 981 #else
 982 #define g_assertf(x, format, ...) (G_LIKELY((x)) ? 1 : (g_assertion_message ("* Assertion at %s:%d, condition `%s' not met, function:%s, " format "\n", __FILE__, __LINE__, #x, __func__, ##__VA_ARGS__), 0))
 983 #endif
 984
 985 /*
 986  * Unicode conversion
 987  */
 988
 989 #define G_CONVERT_ERROR g_convert_error_quark()
 990
 991 typedef enum {
 992         G_CONVERT_ERROR_NO_CONVERSION,
 993         G_CONVERT_ERROR_ILLEGAL_SEQUENCE,
 994         G_CONVERT_ERROR_FAILED,
 995         G_CONVERT_ERROR_PARTIAL_INPUT,
 996         G_CONVERT_ERROR_BAD_URI,
 997         G_CONVERT_ERROR_NOT_ABSOLUTE_PATH
 998 } GConvertError;
 999
1000 gchar     *g_utf8_strup (const gchar *str, gssize len);
1001 gchar     *g_utf8_strdown (const gchar *str, gssize len);
1002 gint       g_unichar_to_utf8 (gunichar c, gchar *outbuf);
1003 gunichar  *g_utf8_to_ucs4_fast (const gchar *str, glong len, glong *items_written);
1004 gunichar  *g_utf8_to_ucs4 (const gchar *str, glong len, glong *items_read, glong *items_written, GError **err);
1005 G_EXTERN_C // Used by libtest, at least.
1006 gunichar2 *g_utf8_to_utf16 (const gchar *str, glong len, glong *items_read, glong *items_written, GError **err);
1007 gunichar2 *eg_utf8_to_utf16_with_nuls (const gchar *str, glong len, glong *items_read, glong *items_written, GError **err);
1008 gunichar2 *eg_wtf8_to_utf16 (const gchar *str, glong len, glong *items_read, glong *items_written, GError **err);
1009 G_EXTERN_C // Used by libtest, at least.
1010 gchar     *g_utf16_to_utf8 (const gunichar2 *str, glong len, glong *items_read, glong *items_written, GError **err);
1011 gunichar  *g_utf16_to_ucs4 (const gunichar2 *str, glong len, glong *items_read, glong *items_written, GError **err);
1012 gchar     *g_ucs4_to_utf8  (const gunichar *str, glong len, glong *items_read, glong *items_written, GError **err);
1013 gunichar2 *g_ucs4_to_utf16 (const gunichar *str, glong len, glong *items_read, glong *items_written, GError **err);
1014 size_t     g_utf16_len     (const gunichar2 *);
1015
1016 #define u8to16(str) g_utf8_to_utf16(str, (glong)strlen(str), NULL, NULL, NULL)
1017
1018 #ifdef G_OS_WIN32
1019 #define u16to8(str) g_utf16_to_utf8((gunichar2 *) (str), (glong)wcslen((wchar_t *) (str)), NULL, NULL, NULL)
1020 #else
1021 #define u16to8(str) g_utf16_to_utf8(str, (glong)strlen(str), NULL, NULL, NULL)
1022 #endif
1023
1024 /*
1025  * Path
1026  */
1027 gchar  *g_build_path           (const gchar *separator, const gchar *first_element, ...);
1028 #define g_build_filename(x, ...) g_build_path(G_DIR_SEPARATOR_S, x, __VA_ARGS__)
1029 gchar  *g_path_get_dirname     (const gchar *filename);
1030 gchar  *g_path_get_basename    (const char *filename);
1031 gchar  *g_find_program_in_path (const gchar *program);
1032 gchar  *g_get_current_dir      (void);
1033 gboolean g_path_is_absolute    (const char *filename);
1034
1035 const gchar *g_get_home_dir    (void);
1036 const gchar *g_get_tmp_dir     (void);
1037 const gchar *g_get_user_name   (void);
1038 gchar *g_get_prgname           (void);
1039 void  g_set_prgname            (const gchar *prgname);
1040
1041 gboolean g_ensure_directory_exists (const gchar *filename);
1042
1043 /*
1044  * Shell
1045  */
1046
1047 gboolean  g_shell_parse_argv (const gchar *command_line, gint *argcp, gchar ***argvp, GError **gerror);
1048 gchar    *g_shell_unquote    (const gchar *quoted_string, GError **gerror);
1049 gchar    *g_shell_quote      (const gchar *unquoted_string);
1050
1051 #ifndef G_OS_WIN32 // Spawn could be implemented but is not.
1052
1053 int eg_getdtablesize (void);
1054
1055 #if !defined (HAVE_FORK) || !defined (HAVE_EXECVE)
1056
1057 #define HAVE_G_SPAWN 0
1058
1059 #else
1060
1061 #define HAVE_G_SPAWN 1
1062
1063
1064 /*
1065  * Spawn
1066  */
1067 typedef enum {
1068         G_SPAWN_LEAVE_DESCRIPTORS_OPEN = 1,
1069         G_SPAWN_DO_NOT_REAP_CHILD      = 1 << 1,
1070         G_SPAWN_SEARCH_PATH            = 1 << 2,
1071         G_SPAWN_STDOUT_TO_DEV_NULL     = 1 << 3,
1072         G_SPAWN_STDERR_TO_DEV_NULL     = 1 << 4,
1073         G_SPAWN_CHILD_INHERITS_STDIN   = 1 << 5,
1074         G_SPAWN_FILE_AND_ARGV_ZERO     = 1 << 6
1075 } GSpawnFlags;
1076
1077 typedef void (*GSpawnChildSetupFunc) (gpointer user_data);
1078
1079 gboolean g_spawn_command_line_sync (const gchar *command_line, gchar **standard_output, gchar **standard_error, gint *exit_status, GError **gerror);
1080 gboolean g_spawn_async_with_pipes  (const gchar *working_directory, gchar **argv, gchar **envp, GSpawnFlags flags, GSpawnChildSetupFunc child_setup,
1081                                 gpointer user_data, GPid *child_pid, gint *standard_input, gint *standard_output, gint *standard_error, GError **gerror);
1082
1083 #endif
1084 #endif
1085
1086 /*
1087  * Timer
1088  */
1089 typedef struct _GTimer GTimer;
1090
1091 GTimer *g_timer_new (void);
1092 void g_timer_destroy (GTimer *timer);
1093 gdouble g_timer_elapsed (GTimer *timer, gulong *microseconds);
1094 void g_timer_stop (GTimer *timer);
1095 void g_timer_start (GTimer *timer);
1096
1097 /*
1098  * Date and time
1099  */
1100 typedef struct {
1101         glong tv_sec;
1102         glong tv_usec;
1103 } GTimeVal;
1104
1105 void g_get_current_time (GTimeVal *result);
1106 void g_usleep (gulong microseconds);
1107
1108 /*
1109  * File
1110  */
1111
1112 gpointer g_file_error_quark (void);
1113
1114 #define G_FILE_ERROR g_file_error_quark ()
1115
1116 typedef enum {
1117         G_FILE_ERROR_EXIST,
1118         G_FILE_ERROR_ISDIR,
1119         G_FILE_ERROR_ACCES,
1120         G_FILE_ERROR_NAMETOOLONG,
1121         G_FILE_ERROR_NOENT,
1122         G_FILE_ERROR_NOTDIR,
1123         G_FILE_ERROR_NXIO,
1124         G_FILE_ERROR_NODEV,
1125         G_FILE_ERROR_ROFS,
1126         G_FILE_ERROR_TXTBSY,
1127         G_FILE_ERROR_FAULT,
1128         G_FILE_ERROR_LOOP,
1129         G_FILE_ERROR_NOSPC,
1130         G_FILE_ERROR_NOMEM,
1131         G_FILE_ERROR_MFILE,
1132         G_FILE_ERROR_NFILE,
1133         G_FILE_ERROR_BADF,
1134         G_FILE_ERROR_INVAL,
1135         G_FILE_ERROR_PIPE,
1136         G_FILE_ERROR_AGAIN,
1137         G_FILE_ERROR_INTR,
1138         G_FILE_ERROR_IO,
1139         G_FILE_ERROR_PERM,
1140         G_FILE_ERROR_NOSYS,
1141         G_FILE_ERROR_FAILED
1142 } GFileError;
1143
1144 typedef enum {
1145         G_FILE_TEST_IS_REGULAR = 1 << 0,
1146         G_FILE_TEST_IS_SYMLINK = 1 << 1,
1147         G_FILE_TEST_IS_DIR = 1 << 2,
1148         G_FILE_TEST_IS_EXECUTABLE = 1 << 3,
1149         G_FILE_TEST_EXISTS = 1 << 4
1150 } GFileTest;
1151
1152 G_ENUM_FUNCTIONS (GFileTest)
1153
1154 gboolean   g_file_set_contents (const gchar *filename, const gchar *contents, gssize length, GError **gerror);
1155 gboolean   g_file_get_contents (const gchar *filename, gchar **contents, gsize *length, GError **gerror);
1156 GFileError g_file_error_from_errno (gint err_no);
1157 gint       g_file_open_tmp (const gchar *tmpl, gchar **name_used, GError **gerror);
1158 gboolean   g_file_test (const gchar *filename, GFileTest test);
1159
1160 #ifdef G_OS_WIN32
1161 #define g_open _open
1162 #else
1163 #define g_open open
1164 #endif
1165 #define g_rename rename
1166 #define g_stat stat
1167 #ifdef G_OS_WIN32
1168 #define g_access _access
1169 #else
1170 #define g_access access
1171 #endif
1172 #ifdef G_OS_WIN32
1173 #define g_mktemp _mktemp
1174 #else
1175 #define g_mktemp mktemp
1176 #endif
1177 #ifdef G_OS_WIN32
1178 #define g_unlink _unlink
1179 #else
1180 #define g_unlink unlink
1181 #endif
1182 #ifdef G_OS_WIN32
1183 #define g_write _write
1184 #else
1185 #define g_write write
1186 #endif
1187 #ifdef G_OS_WIN32
1188 #define g_read _read
1189 #else
1190 #define g_read read
1191 #endif
1192
1193 #define g_fopen fopen
1194 #define g_lstat lstat
1195 #define g_rmdir rmdir
1196 #define g_mkstemp mkstemp
1197 #define g_ascii_isdigit isdigit
1198 #define g_ascii_strtod strtod
1199 #define g_ascii_isalnum isalnum
1200
1201 gchar *g_mkdtemp (gchar *tmpl);
1202
1203 /*
1204  * Low-level write-based printing functions
1205  */
1206
1207 static inline int
1208 g_async_safe_fgets (char *str, int num, int handle, gboolean *newline)
1209 {
1210         memset (str, 0, num);
1211         // Make sure we don't overwrite the last index so that we are
1212         // guaranteed to be NULL-terminated
1213         int without_padding = num - 1;
1214         int i=0;
1215         while (i < without_padding && g_read (handle, &str [i], sizeof(char))) {
1216                 if (str [i] == '\n') {
1217                         str [i] = '\0';
1218                         *newline = TRUE;
1219                 }
1220
1221                 if (!isprint (str [i]))
1222                         str [i] = '\0';
1223
1224                 if (str [i] == '\0')
1225                         break;
1226
1227                 i++;
1228         }
1229
1230         return i;
1231 }
1232
1233 static inline gint
1234 g_async_safe_vfprintf (int handle, gchar const *format, va_list args)
1235 {
1236         char print_buff [1024];
1237         print_buff [0] = '\0';
1238         g_vsnprintf (print_buff, sizeof(print_buff), format, args);
1239         int ret = g_write (handle, print_buff, (guint32) strlen (print_buff));
1240
1241         return ret;
1242 }
1243
1244 static inline gint
1245 g_async_safe_fprintf (int handle, gchar const *format, ...)
1246 {
1247         va_list args;
1248         va_start (args, format);
1249         int ret = g_async_safe_vfprintf (handle, format, args);
1250         va_end (args);
1251         return ret;
1252 }
1253
1254 static inline gint
1255 g_async_safe_vprintf (gchar const *format, va_list args)
1256 {
1257         return g_async_safe_vfprintf (1, format, args);
1258 }
1259
1260 static inline gint
1261 g_async_safe_printf (gchar const *format, ...)
1262 {
1263         va_list args;
1264         va_start (args, format);
1265         int ret = g_async_safe_vfprintf (1, format, args);
1266         va_end (args);
1267
1268         return ret;
1269 }
1270
1271
1272 /*
1273  * Pattern matching
1274  */
1275 typedef struct _GPatternSpec GPatternSpec;
1276 GPatternSpec * g_pattern_spec_new (const gchar *pattern);
1277 void           g_pattern_spec_free (GPatternSpec *pspec);
1278 gboolean       g_pattern_match_string (GPatternSpec *pspec, const gchar *string);
1279
1280 /*
1281  * Directory
1282  */
1283 typedef struct _GDir GDir;
1284 GDir        *g_dir_open (const gchar *path, guint flags, GError **gerror);
1285 const gchar *g_dir_read_name (GDir *dir);
1286 void         g_dir_rewind (GDir *dir);
1287 void         g_dir_close (GDir *dir);
1288
1289 int          g_mkdir_with_parents (const gchar *pathname, int mode);
1290 #define g_mkdir mkdir
1291
1292 /*
1293  * GMarkup
1294  */
1295 typedef struct _GMarkupParseContext GMarkupParseContext;
1296
1297 typedef enum
1298 {
1299         G_MARKUP_DO_NOT_USE_THIS_UNSUPPORTED_FLAG = 1 << 0,
1300         G_MARKUP_TREAT_CDATA_AS_TEXT              = 1 << 1
1301 } GMarkupParseFlags;
1302
1303 typedef struct {
1304         void (*start_element)  (GMarkupParseContext *context,
1305                                 const gchar *element_name,
1306                                 const gchar **attribute_names,
1307                                 const gchar **attribute_values,
1308                                 gpointer user_data,
1309                                 GError **gerror);
1310
1311         void (*end_element)    (GMarkupParseContext *context,
1312                                 const gchar         *element_name,
1313                                 gpointer             user_data,
1314                                 GError             **gerror);
1315
1316         void (*text)           (GMarkupParseContext *context,
1317                                 const gchar         *text,
1318                                 gsize                text_len,
1319                                 gpointer             user_data,
1320                                 GError             **gerror);
1321
1322         void (*passthrough)    (GMarkupParseContext *context,
1323                                 const gchar         *passthrough_text,
1324                                 gsize                text_len,
1325                                 gpointer             user_data,
1326                                 GError             **gerror);
1327         void (*error)          (GMarkupParseContext *context,
1328                                 GError              *gerror,
1329                                 gpointer             user_data);
1330 } GMarkupParser;
1331
1332 GMarkupParseContext *g_markup_parse_context_new   (const GMarkupParser *parser,
1333                                                    GMarkupParseFlags flags,
1334                                                    gpointer user_data,
1335                                                    GDestroyNotify user_data_dnotify);
1336 void                 g_markup_parse_context_free  (GMarkupParseContext *context);
1337 gboolean             g_markup_parse_context_parse (GMarkupParseContext *context,
1338                                                    const gchar *text, gssize text_len,
1339                                                    GError **gerror);
1340 gboolean         g_markup_parse_context_end_parse (GMarkupParseContext *context,
1341                                                    GError **gerror);
1342
1343 /*
1344  * Character set conversion
1345  */
1346 typedef struct _GIConv *GIConv;
1347
1348 gsize g_iconv (GIConv cd, gchar **inbytes, gsize *inbytesleft, gchar **outbytes, gsize *outbytesleft);
1349 GIConv g_iconv_open (const gchar *to_charset, const gchar *from_charset);
1350 int g_iconv_close (GIConv cd);
1351
1352 gboolean  g_get_charset        (G_CONST_RETURN char **charset);
1353 gchar    *g_locale_to_utf8     (const gchar *opsysstring, gssize len,
1354                                 gsize *bytes_read, gsize *bytes_written,
1355                                 GError **gerror);
1356 gchar    *g_locale_from_utf8   (const gchar *utf8string, gssize len, gsize *bytes_read,
1357                                 gsize *bytes_written, GError **gerror);
1358 gchar    *g_filename_from_utf8 (const gchar *utf8string, gssize len, gsize *bytes_read,
1359                                 gsize *bytes_written, GError **gerror);
1360 gchar    *g_convert            (const gchar *str, gssize len,
1361                                 const gchar *to_codeset, const gchar *from_codeset,
1362                                 gsize *bytes_read, gsize *bytes_written, GError **gerror);
1363
1364 /*
1365  * Unicode manipulation
1366  */
1367 extern const guchar g_utf8_jump_table[256];
1368
1369 gboolean  g_utf8_validate      (const gchar *str, gssize max_len, const gchar **end);
1370 gunichar  g_utf8_get_char_validated (const gchar *str, gssize max_len);
1371 #define   g_utf8_next_char(p)  ((p) + g_utf8_jump_table[(guchar)(*p)])
1372 gunichar  g_utf8_get_char      (const gchar *src);
1373 glong     g_utf8_strlen        (const gchar *str, gssize max);
1374 gchar    *g_utf8_offset_to_pointer (const gchar *str, glong offset);
1375 glong     g_utf8_pointer_to_offset (const gchar *str, const gchar *pos);
1376
1377 /*
1378  * priorities
1379  */
1380 #define G_PRIORITY_DEFAULT 0
1381 #define G_PRIORITY_DEFAULT_IDLE 200
1382
1383 #define GUINT16_SWAP_LE_BE_CONSTANT(x) ((((guint16) x) >> 8) | ((((guint16) x) << 8)))
1384
1385 #define GUINT16_SWAP_LE_BE(x) ((guint16) (((guint16) x) >> 8) | ((((guint16)(x)) & 0xff) << 8))
1386 #define GUINT32_SWAP_LE_BE(x) ((guint32) \
1387                                ( (((guint32) (x)) << 24)| \
1388                                  ((((guint32) (x)) & 0xff0000) >> 8) | \
1389                                  ((((guint32) (x)) & 0xff00) << 8) | \
1390                                  (((guint32) (x)) >> 24)) )
1391
1392 #define GUINT64_SWAP_LE_BE(x) ((guint64) (((guint64)(GUINT32_SWAP_LE_BE(((guint64)x) & 0xffffffff))) << 32) | \
1393                                GUINT32_SWAP_LE_BE(((guint64)x) >> 32))
1394
1395
1396
1397 #if G_BYTE_ORDER == G_LITTLE_ENDIAN
1398 #   define GUINT64_FROM_BE(x) GUINT64_SWAP_LE_BE(x)
1399 #   define GUINT32_FROM_BE(x) GUINT32_SWAP_LE_BE(x)
1400 #   define GUINT16_FROM_BE(x) GUINT16_SWAP_LE_BE(x)
1401 #   define GUINT_FROM_BE(x)   GUINT32_SWAP_LE_BE(x)
1402 #   define GUINT64_FROM_LE(x) (x)
1403 #   define GUINT32_FROM_LE(x) (x)
1404 #   define GUINT16_FROM_LE(x) (x)
1405 #   define GUINT_FROM_LE(x)   (x)
1406 #   define GUINT64_TO_BE(x)   GUINT64_SWAP_LE_BE(x)
1407 #   define GUINT32_TO_BE(x)   GUINT32_SWAP_LE_BE(x)
1408 #   define GUINT16_TO_BE(x)   GUINT16_SWAP_LE_BE(x)
1409 #   define GUINT_TO_BE(x)     GUINT32_SWAP_LE_BE(x)
1410 #   define GUINT64_TO_LE(x)   (x)
1411 #   define GUINT32_TO_LE(x)   (x)
1412 #   define GUINT16_TO_LE(x)   (x)
1413 #   define GUINT_TO_LE(x)     (x)
1414 #else
1415 #   define GUINT64_FROM_BE(x) (x)
1416 #   define GUINT32_FROM_BE(x) (x)
1417 #   define GUINT16_FROM_BE(x) (x)
1418 #   define GUINT_FROM_BE(x)   (x)
1419 #   define GUINT64_FROM_LE(x) GUINT64_SWAP_LE_BE(x)
1420 #   define GUINT32_FROM_LE(x) GUINT32_SWAP_LE_BE(x)
1421 #   define GUINT16_FROM_LE(x) GUINT16_SWAP_LE_BE(x)
1422 #   define GUINT_FROM_LE(x)   GUINT32_SWAP_LE_BE(x)
1423 #   define GUINT64_TO_BE(x)   (x)
1424 #   define GUINT32_TO_BE(x)   (x)
1425 #   define GUINT16_TO_BE(x)   (x)
1426 #   define GUINT_TO_BE(x)     (x)
1427 #   define GUINT64_TO_LE(x)   GUINT64_SWAP_LE_BE(x)
1428 #   define GUINT32_TO_LE(x)   GUINT32_SWAP_LE_BE(x)
1429 #   define GUINT16_TO_LE(x)   GUINT16_SWAP_LE_BE(x)
1430 #   define GUINT_TO_LE(x)     GUINT32_SWAP_LE_BE(x)
1431 #endif
1432
1433 #define GINT64_FROM_BE(x)   (GUINT64_TO_BE (x))
1434 #define GINT32_FROM_BE(x)   (GUINT32_TO_BE (x))
1435 #define GINT16_FROM_BE(x)   (GUINT16_TO_BE (x))
1436 #define GINT64_FROM_LE(x)   (GUINT64_TO_LE (x))
1437 #define GINT32_FROM_LE(x)   (GUINT32_TO_LE (x))
1438 #define GINT16_FROM_LE(x)   (GUINT16_TO_LE (x))
1439
1440 #define _EGLIB_MAJOR  2
1441 #define _EGLIB_MIDDLE 4
1442 #define _EGLIB_MINOR  0
1443
1444 #define GLIB_CHECK_VERSION(a,b,c) ((a < _EGLIB_MAJOR) || (a == _EGLIB_MAJOR && (b < _EGLIB_MIDDLE || (b == _EGLIB_MIDDLE && c <= _EGLIB_MINOR))))
1445
1446 #define G_HAVE_API_SUPPORT(x) (x)
1447 #define G_UNSUPPORTED_API "%s:%d: '%s' not supported.", __FILE__, __LINE__
1448 #define g_unsupported_api(name) G_STMT_START { g_warning (G_UNSUPPORTED_API, name); } G_STMT_END
1449
1450 #if _WIN32
1451 // g_free the result
1452 // No MAX_PATH limit.
1453 gboolean
1454 mono_get_module_filename (gpointer mod, gunichar2 **pstr, guint32 *plength);
1455
1456 // g_free the result
1457 // No MAX_PATH limit.
1458 gboolean
1459 mono_get_module_filename_ex (gpointer process, gpointer mod, gunichar2 **pstr, guint32 *plength);
1460
1461 // g_free the result
1462 // No MAX_PATH limit.
1463 gboolean
1464 mono_get_module_basename (gpointer process, gpointer mod, gunichar2 **pstr, guint32 *plength);
1465
1466 // g_free the result
1467 // No MAX_PATH limit.
1468 gboolean
1469 mono_get_current_directory (gunichar2 **pstr, guint32 *plength);
1470 #endif
1471
1472 G_END_DECLS // FIXME: There is more extern C than there should be.
1473
1474 static inline
1475 void
1476 mono_qsort (void* base, size_t num, size_t size, int (*compare)(const void*, const void*))
1477 {
1478         g_assert (compare);
1479         g_assert (size);
1480         if (num < 2 || !size || !base)
1481                 return;
1482         qsort (base, num, size, compare);
1483 }
1484
1485 #define MONO_DECL_CALLBACK(prefix, ret, name, sig) ret (*name) sig;
1486 #define MONO_INIT_CALLBACK(prefix, ret, name, sig) prefix ## _ ## name,
1487
1488 // For each allocator; i.e. returning gpointer that needs to be cast.
1489 // Macros do not recurse, so naming function and macro the same is ok.
1490 // However these are also already macros.
1491 #undef g_malloc
1492 #undef g_realloc
1493 #undef g_malloc0
1494 #undef g_calloc
1495 #undef g_try_malloc
1496 #undef g_try_realloc
1497 #undef g_memdup
1498 #define g_malloc(x) (g_cast (monoeg_malloc (x)))
1499 #define g_realloc(obj, size) (g_cast (monoeg_realloc ((obj), (size))))
1500 #define g_malloc0(x) (g_cast (monoeg_malloc0 (x)))
1501 #define g_calloc(x, y) (g_cast (monoeg_g_calloc ((x), (y))))
1502 #define g_try_malloc(x) (g_cast (monoeg_try_malloc (x)))
1503 #define g_try_realloc(obj, size) (g_cast (monoeg_try_realloc ((obj), (size))))
1504 #define g_memdup(mem, size) (g_cast (monoeg_g_memdup ((mem), (size))))
1505
1506 #endif // __GLIB_H