glib/glib.h

   1 /* GLIB - Library of useful routines for C programming
   2  * Copyright (C) 1995-1997  Peter Mattis, Spencer Kimball and Josh MacDonald
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Library General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Library General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Library General Public
  15  * License along with this library; if not, write to the
  16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17  * Boston, MA 02111-1307, USA.
  18  */
  19 #ifndef __G_LIB_H__
  20 #define __G_LIB_H__
  21
  22 /* system specific config file glibconfig.h provides definitions for
  23  * the extrema of many of the standard types. These are:
  24  *
  25  *  G_MINSHORT, G_MAXSHORT
  26  *  G_MININT, G_MAXINT
  27  *  G_MINLONG, G_MAXLONG
  28  *  G_MINFLOAT, G_MAXFLOAT
  29  *  G_MINDOUBLE, G_MAXDOUBLE
  30  *
  31  * It also provides the following typedefs:
  32  *
  33  *  gint8, guint8
  34  *  gint16, guint16
  35  *  gint32, guint32
  36  *  gint64, guint64
  37  *
  38  * It defines the G_BYTE_ORDER symbol to one of G_*_ENDIAN (see later in
  39  * this file).
  40  *
  41  * And it provides a way to store and retrieve a `gint' in/from a `gpointer'.
  42  * This is useful to pass an integer instead of a pointer to a callback.
  43  *
  44  *  GINT_TO_POINTER(i), GUINT_TO_POINTER(i)
  45  *  GPOINTER_TO_INT(p), GPOINTER_TO_UINT(p)
  46  *
  47  * Finally, it provide the following wrappers to STDC functions:
  48  *
  49  *  g_ATEXIT
  50  *    To register hooks which are executed on exit().
  51  *    Usually a wrapper for STDC atexit.
  52  *
  53  *  void *g_memmove(void *dest, const void *src, guint count);
  54  *    A wrapper for STDC memmove, or an implementation, if memmove doesn't
  55  *    exist.  The prototype looks like the above, give or take a const,
  56  *    or size_t.
  57  */
  58 #include <glibconfig.h>
  59
  60 /* include varargs functions for assertment macros
  61  */
  62 #include <stdarg.h>
  63
  64 /* optionally feature DMALLOC memory allocation debugger
  65  */
  66 #ifdef USE_DMALLOC
  67 #include "dmalloc.h"
  68 #endif
  69
  70
  71 #ifdef NATIVE_WIN32
  72
  73 /* On native Win32, directory separator is the backslash, and search path
  74  * separator is the semicolon.
  75  */
  76 #define G_DIR_SEPARATOR '\\'
  77 #define G_DIR_SEPARATOR_S "\\"
  78 #define G_SEARCHPATH_SEPARATOR ';'
  79 #define G_SEARCHPATH_SEPARATOR_S ";"
  80
  81 #else  /* !NATIVE_WIN32 */
  82
  83 /* Unix */
  84
  85 #define G_DIR_SEPARATOR '/'
  86 #define G_DIR_SEPARATOR_S "/"
  87 #define G_SEARCHPATH_SEPARATOR ':'
  88 #define G_SEARCHPATH_SEPARATOR_S ":"
  89
  90 #endif /* !NATIVE_WIN32 */
  91
  92 #ifdef __cplusplus
  93 extern "C" {
  94 #endif /* __cplusplus */
  95
  96
  97 /* Provide definitions for some commonly used macros.
  98  *  Some of them are only provided if they haven't already
  99  *  been defined. It is assumed that if they are already
 100  *  defined then the current definition is correct.
 101  */
 102 #ifndef NULL
 103 #define NULL    ((void*) 0)
 104 #endif
 105
 106 #ifndef FALSE
 107 #define FALSE   (0)
 108 #endif
 109
 110 #ifndef TRUE
 111 #define TRUE    (!FALSE)
 112 #endif
 113
 114 #undef  MAX
 115 #define MAX(a, b)  (((a) > (b)) ? (a) : (b))
 116
 117 #undef  MIN
 118 #define MIN(a, b)  (((a) < (b)) ? (a) : (b))
 119
 120 #undef  ABS
 121 #define ABS(a)     (((a) < 0) ? -(a) : (a))
 122
 123 #undef  CLAMP
 124 #define CLAMP(x, low, high)  (((x) > (high)) ? (high) : (((x) < (low)) ? (low) : (x)))
 125
 126
 127 /* Define G_VA_COPY() to do the right thing for copying va_list variables.
 128  * glibconfig.h may have already defined G_VA_COPY as va_copy or __va_copy.
 129  */
 130 #if !defined (G_VA_COPY)
 131 #  if defined (__GNUC__) && defined (__PPC__) && (defined (_CALL_SYSV) || defined (_WIN32))
 132 #  define G_VA_COPY(ap1, ap2)     (*(ap1) = *(ap2))
 133 #  elif defined (G_VA_COPY_AS_ARRAY)
 134 #  define G_VA_COPY(ap1, ap2)     g_memmove ((ap1), (ap2), sizeof (va_list))
 135 #  else /* va_list is a pointer */
 136 #  define G_VA_COPY(ap1, ap2)     ((ap1) = (ap2))
 137 #  endif /* va_list is a pointer */
 138 #endif /* !G_VA_COPY */
 139
 140
 141 /* Provide convenience macros for handling structure
 142  * fields through their offsets.
 143  */
 144 #define G_STRUCT_OFFSET(struct_type, member)    \
 145     ((gulong) ((gchar*) &((struct_type*) 0)->member))
 146 #define G_STRUCT_MEMBER_P(struct_p, struct_offset)   \
 147     ((gpointer) ((gchar*) (struct_p) + (gulong) (struct_offset)))
 148 #define G_STRUCT_MEMBER(member_type, struct_p, struct_offset)   \
 149     (*(member_type*) G_STRUCT_MEMBER_P ((struct_p), (struct_offset)))
 150
 151
 152 /* inlining hassle. for compilers that don't allow the `inline' keyword,
 153  * mostly because of strict ANSI C compliance or dumbness, we try to fall
 154  * back to either `__inline__' or `__inline'.
 155  * we define G_CAN_INLINE, if the compiler seems to be actually
 156  * *capable* to do function inlining, in which case inline function bodys
 157  * do make sense. we also define G_INLINE_FUNC to properly export the
 158  * function prototypes if no inlinig can be performed.
 159  * we special case most of the stuff, so inline functions can have a normal
 160  * implementation by defining G_INLINE_FUNC to extern and G_CAN_INLINE to 1.
 161  */
 162 #ifndef G_INLINE_FUNC
 163 #  define G_CAN_INLINE 1
 164 #endif
 165 #ifdef G_HAVE_INLINE
 166 #  if defined (__GNUC__) && defined (__STRICT_ANSI__)
 167 #    undef inline
 168 #    define inline __inline__
 169 #  endif
 170 #else /* !G_HAVE_INLINE */
 171 #  undef inline
 172 #  if defined (G_HAVE___INLINE__)
 173 #    define inline __inline__
 174 #  else /* !inline && !__inline__ */
 175 #    if defined (G_HAVE___INLINE)
 176 #      define inline __inline
 177 #    else /* !inline && !__inline__ && !__inline */
 178 #      define inline /* don't inline, then */
 179 #      ifndef G_INLINE_FUNC
 180 #        undef G_CAN_INLINE
 181 #      endif
 182 #    endif
 183 #  endif
 184 #endif
 185 #ifndef G_INLINE_FUNC
 186 #  ifdef __GNUC__
 187 #    ifdef __OPTIMIZE__
 188 #      define G_INLINE_FUNC extern inline
 189 #    else
 190 #      undef G_CAN_INLINE
 191 #      define G_INLINE_FUNC extern
 192 #    endif
 193 #  else /* !__GNUC__ */
 194 #    ifdef G_CAN_INLINE
 195 #      define G_INLINE_FUNC static inline
 196 #    else
 197 #      define G_INLINE_FUNC extern
 198 #    endif
 199 #  endif /* !__GNUC__ */
 200 #endif /* !G_INLINE_FUNC */
 201
 202
 203 /* Provide simple macro statement wrappers (adapted from Perl):
 204  *  G_STMT_START { statements; } G_STMT_END;
 205  *  can be used as a single statement, as in
 206  *  if (x) G_STMT_START { ... } G_STMT_END; else ...
 207  *
 208  *  For gcc we will wrap the statements within `({' and `})' braces.
 209  *  For SunOS they will be wrapped within `if (1)' and `else (void) 0',
 210  *  and otherwise within `do' and `while (0)'.
 211  */
 212 #if !(defined (G_STMT_START) && defined (G_STMT_END))
 213 #  if defined (__GNUC__) && !defined (__STRICT_ANSI__) && !defined (__cplusplus)
 214 #    define G_STMT_START        (void)(
 215 #    define G_STMT_END          )
 216 #  else
 217 #    if (defined (sun) || defined (__sun__))
 218 #      define G_STMT_START      if (1)
 219 #      define G_STMT_END        else (void)0
 220 #    else
 221 #      define G_STMT_START      do
 222 #      define G_STMT_END        while (0)
 223 #    endif
 224 #  endif
 225 #endif
 226
 227
 228 /* Provide macros to feature the GCC function attribute.
 229  */
 230 #if     __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ > 4)
 231 #define G_GNUC_PRINTF( format_idx, arg_idx )    \
 232   __attribute__((format (printf, format_idx, arg_idx)))
 233 #define G_GNUC_SCANF( format_idx, arg_idx )     \
 234   __attribute__((format (scanf, format_idx, arg_idx)))
 235 #define G_GNUC_FORMAT( arg_idx )                \
 236   __attribute__((format_arg (arg_idx)))
 237 #define G_GNUC_NORETURN                         \
 238   __attribute__((noreturn))
 239 #define G_GNUC_CONST                            \
 240   __attribute__((const))
 241 #define G_GNUC_UNUSED                           \
 242   __attribute__((unused))
 243 #else   /* !__GNUC__ */
 244 #define G_GNUC_PRINTF( format_idx, arg_idx )
 245 #define G_GNUC_SCANF( format_idx, arg_idx )
 246 #define G_GNUC_FORMAT( arg_idx )
 247 #define G_GNUC_NORETURN
 248 #define G_GNUC_CONST
 249 #define G_GNUC_UNUSED
 250 #endif  /* !__GNUC__ */
 251
 252
 253 /* Wrap the gcc __PRETTY_FUNCTION__ and __FUNCTION__ variables with
 254  * macros, so we can refer to them as strings unconditionally.
 255  */
 256 #ifdef  __GNUC__
 257 #define G_GNUC_FUNCTION         (__FUNCTION__)
 258 #define G_GNUC_PRETTY_FUNCTION  (__PRETTY_FUNCTION__)
 259 #else   /* !__GNUC__ */
 260 #define G_GNUC_FUNCTION         ("")
 261 #define G_GNUC_PRETTY_FUNCTION  ("")
 262 #endif  /* !__GNUC__ */
 263
 264 /* we try to provide a usefull equivalent for ATEXIT if it is
 265  * not defined, but use is actually abandoned. people should
 266  * use g_atexit() instead.
 267  */
 268 #ifndef ATEXIT
 269 # define ATEXIT(proc)   g_ATEXIT(proc)
 270 #else
 271 # define G_NATIVE_ATEXIT
 272 #endif /* ATEXIT */
 273
 274 /* Hacker macro to place breakpoints for elected machines.
 275  * Actual use is strongly deprecated of course ;)
 276  */
 277 #if defined (__i386__) && defined (__GNUC__) && __GNUC__ >= 2
 278 #define G_BREAKPOINT()          G_STMT_START{ __asm__ __volatile__ ("int $03"); }G_STMT_END
 279 #elif defined (__alpha__) && defined (__GNUC__) && __GNUC__ >= 2
 280 #define G_BREAKPOINT()          G_STMT_START{ __asm__ __volatile__ ("bpt"); }G_STMT_END
 281 #else   /* !__i386__ && !__alpha__ */
 282 #define G_BREAKPOINT()
 283 #endif  /* __i386__ */
 284
 285
 286 /* Provide macros for easily allocating memory. The macros
 287  *  will cast the allocated memory to the specified type
 288  *  in order to avoid compiler warnings. (Makes the code neater).
 289  */
 290
 291 #ifdef __DMALLOC_H__
 292 #  define g_new(type, count)            (ALLOC (type, count))
 293 #  define g_new0(type, count)           (CALLOC (type, count))
 294 #  define g_renew(type, mem, count)     (REALLOC (mem, type, count))
 295 #else /* __DMALLOC_H__ */
 296 #  define g_new(type, count)      \
 297       ((type *) g_malloc ((unsigned) sizeof (type) * (count)))
 298 #  define g_new0(type, count)     \
 299       ((type *) g_malloc0 ((unsigned) sizeof (type) * (count)))
 300 #  define g_renew(type, mem, count)       \
 301       ((type *) g_realloc (mem, (unsigned) sizeof (type) * (count)))
 302 #endif /* __DMALLOC_H__ */
 303
 304 #define g_mem_chunk_create(type, pre_alloc, alloc_type) ( \
 305   g_mem_chunk_new (#type " mem chunks (" #pre_alloc ")", \
 306                    sizeof (type), \
 307                    sizeof (type) * (pre_alloc), \
 308                    (alloc_type)) \
 309 )
 310 #define g_chunk_new(type, chunk)        ( \
 311   (type *) g_mem_chunk_alloc (chunk) \
 312 )
 313 #define g_chunk_new0(type, chunk)       ( \
 314   (type *) g_mem_chunk_alloc0 (chunk) \
 315 )
 316 #define g_chunk_free(mem, mem_chunk)    G_STMT_START { \
 317   g_mem_chunk_free ((mem_chunk), (mem)); \
 318 } G_STMT_END
 319
 320
 321 #define g_string(x) #x
 322
 323
 324 /* Provide macros for error handling. The "assert" macros will
 325  *  exit on failure. The "return" macros will exit the current
 326  *  function. Two different definitions are given for the macros
 327  *  if G_DISABLE_ASSERT is not defined, in order to support gcc's
 328  *  __PRETTY_FUNCTION__ capability.
 329  */
 330
 331 #ifdef G_DISABLE_ASSERT
 332
 333 #define g_assert(expr)
 334 #define g_assert_not_reached()
 335
 336 #else /* !G_DISABLE_ASSERT */
 337
 338 #ifdef __GNUC__
 339
 340 #define g_assert(expr)                  G_STMT_START{           \
 341      if (!(expr))                                               \
 342        g_log (G_LOG_DOMAIN,                                     \
 343               G_LOG_LEVEL_ERROR,                                \
 344               "file %s: line %d (%s): assertion failed: (%s)",  \
 345               __FILE__,                                         \
 346               __LINE__,                                         \
 347               __PRETTY_FUNCTION__,                              \
 348               #expr);                   }G_STMT_END
 349
 350 #define g_assert_not_reached()          G_STMT_START{           \
 351      g_log (G_LOG_DOMAIN,                                       \
 352             G_LOG_LEVEL_ERROR,                                  \
 353             "file %s: line %d (%s): should not be reached",     \
 354             __FILE__,                                           \
 355             __LINE__,                                           \
 356             __PRETTY_FUNCTION__);       }G_STMT_END
 357
 358 #else /* !__GNUC__ */
 359
 360 #define g_assert(expr)                  G_STMT_START{           \
 361      if (!(expr))                                               \
 362        g_log (G_LOG_DOMAIN,                                     \
 363               G_LOG_LEVEL_ERROR,                                \
 364               "file %s: line %d: assertion failed: (%s)",       \
 365               __FILE__,                                         \
 366               __LINE__,                                         \
 367               #expr);                   }G_STMT_END
 368
 369 #define g_assert_not_reached()          G_STMT_START{   \
 370      g_log (G_LOG_DOMAIN,                               \
 371             G_LOG_LEVEL_ERROR,                          \
 372             "file %s: line %d: should not be reached",  \
 373             __FILE__,                                   \
 374             __LINE__);          }G_STMT_END
 375
 376 #endif /* __GNUC__ */
 377
 378 #endif /* !G_DISABLE_ASSERT */
 379
 380
 381 #ifdef G_DISABLE_CHECKS
 382
 383 #define g_return_if_fail(expr)
 384 #define g_return_val_if_fail(expr,val)
 385
 386 #else /* !G_DISABLE_CHECKS */
 387
 388 #ifdef __GNUC__
 389
 390 #define g_return_if_fail(expr)          G_STMT_START{                   \
 391      if (!(expr))                                                       \
 392        {                                                                \
 393          g_log (G_LOG_DOMAIN,                                           \
 394                 G_LOG_LEVEL_CRITICAL,                                   \
 395                 "file %s: line %d (%s): assertion `%s' failed.",        \
 396                 __FILE__,                                               \
 397                 __LINE__,                                               \
 398                 __PRETTY_FUNCTION__,                                    \
 399                 #expr);                                                 \
 400          return;                                                        \
 401        };                               }G_STMT_END
 402
 403 #define g_return_val_if_fail(expr,val)  G_STMT_START{                   \
 404      if (!(expr))                                                       \
 405        {                                                                \
 406          g_log (G_LOG_DOMAIN,                                           \
 407                 G_LOG_LEVEL_CRITICAL,                                   \
 408                 "file %s: line %d (%s): assertion `%s' failed.",        \
 409                 __FILE__,                                               \
 410                 __LINE__,                                               \
 411                 __PRETTY_FUNCTION__,                                    \
 412                 #expr);                                                 \
 413          return val;                                                    \
 414        };                               }G_STMT_END
 415
 416 #else /* !__GNUC__ */
 417
 418 #define g_return_if_fail(expr)          G_STMT_START{           \
 419      if (!(expr))                                               \
 420        {                                                        \
 421          g_log (G_LOG_DOMAIN,                                   \
 422                 G_LOG_LEVEL_CRITICAL,                           \
 423                 "file %s: line %d: assertion `%s' failed.",     \
 424                 __FILE__,                                       \
 425                 __LINE__,                                       \
 426                 #expr);                                         \
 427          return;                                                \
 428        };                               }G_STMT_END
 429
 430 #define g_return_val_if_fail(expr, val) G_STMT_START{           \
 431      if (!(expr))                                               \
 432        {                                                        \
 433          g_log (G_LOG_DOMAIN,                                   \
 434                 G_LOG_LEVEL_CRITICAL,                           \
 435                 "file %s: line %d: assertion `%s' failed.",     \
 436                 __FILE__,                                       \
 437                 __LINE__,                                       \
 438                 #expr);                                         \
 439          return val;                                            \
 440        };                               }G_STMT_END
 441
 442 #endif /* !__GNUC__ */
 443
 444 #endif /* !G_DISABLE_CHECKS */
 445
 446
 447 /* Provide type definitions for commonly used types.
 448  *  These are useful because a "gint8" can be adjusted
 449  *  to be 1 byte (8 bits) on all platforms. Similarly and
 450  *  more importantly, "gint32" can be adjusted to be
 451  *  4 bytes (32 bits) on all platforms.
 452  */
 453
 454 typedef char   gchar;
 455 typedef short  gshort;
 456 typedef long   glong;
 457 typedef int    gint;
 458 typedef gint   gboolean;
 459
 460 typedef unsigned char   guchar;
 461 typedef unsigned short  gushort;
 462 typedef unsigned long   gulong;
 463 typedef unsigned int    guint;
 464
 465 typedef float   gfloat;
 466 typedef double  gdouble;
 467
 468 /* HAVE_LONG_DOUBLE doesn't work correctly on all platforms.
 469  * Since gldouble isn't used anywhere, just disable it for now */
 470
 471 #if 0
 472 #ifdef HAVE_LONG_DOUBLE
 473 typedef long double gldouble;
 474 #else /* HAVE_LONG_DOUBLE */
 475 typedef double gldouble;
 476 #endif /* HAVE_LONG_DOUBLE */
 477 #endif /* 0 */
 478
 479 typedef void* gpointer;
 480 typedef const void *gconstpointer;
 481
 482
 483 typedef gint32  gssize;
 484 typedef guint32 gsize;
 485 typedef guint32 GQuark;
 486 typedef gint32  GTime;
 487
 488
 489 /* Portable endian checks and conversions
 490  */
 491
 492 #define G_LITTLE_ENDIAN 1234
 493 #define G_BIG_ENDIAN    4321
 494 #define G_PDP_ENDIAN    3412            /* unused, need specific PDP check */
 495
 496 /* Basic bit swapping functions
 497  */
 498 #define GUINT16_SWAP_LE_BE_CONSTANT(val)        ((guint16) ( \
 499     (((guint16) (val) & (guint16) 0x00ffU) << 8) | \
 500     (((guint16) (val) & (guint16) 0xff00U) >> 8)))
 501 #define GUINT32_SWAP_LE_BE_CONSTANT(val)        ((guint32) ( \
 502     (((guint32) (val) & (guint32) 0x000000ffU) << 24) | \
 503     (((guint32) (val) & (guint32) 0x0000ff00U) <<  8) | \
 504     (((guint32) (val) & (guint32) 0x00ff0000U) >>  8) | \
 505     (((guint32) (val) & (guint32) 0xff000000U) >> 24)))
 506
 507 /* Intel specific stuff for speed
 508  */
 509 #if defined (__i386__) && defined (__GNUC__) && __GNUC__ >= 2
 510
 511 #  define GUINT16_SWAP_LE_BE_X86(val) \
 512      (__extension__                                     \
 513       ({ register guint16 __v;                          \
 514          if (__builtin_constant_p (val))                \
 515            __v = GUINT16_SWAP_LE_BE_CONSTANT (val);     \
 516          else                                           \
 517            __asm__ __const__ ("rorw $8, %w0"            \
 518                               : "=r" (__v)              \
 519                               : "0" ((guint16) (val))); \
 520         __v; }))
 521
 522 #  define GUINT16_SWAP_LE_BE(val) (GUINT16_SWAP_LE_BE_X86 (val))
 523
 524 #  if !defined(__i486__) && !defined(__i586__) \
 525       && !defined(__pentium__) && !defined(__i686__) && !defined(__pentiumpro__)
 526 #     define GUINT32_SWAP_LE_BE_X86(val) \
 527         (__extension__                                          \
 528          ({ register guint32 __v;                               \
 529             if (__builtin_constant_p (val))                     \
 530               __v = GUINT32_SWAP_LE_BE_CONSTANT (val);          \
 531           else                                                  \
 532             __asm__ __const__ ("rorw $8, %w0\n\t"               \
 533                                "rorl $16, %0\n\t"               \
 534                                "rorw $8, %w0"                   \
 535                                : "=r" (__v)                     \
 536                                : "0" ((guint32) (val)));        \
 537         __v; }))
 538
 539 #  else /* 486 and higher has bswap */
 540 #     define GUINT32_SWAP_LE_BE_X86(val) \
 541         (__extension__                                          \
 542          ({ register guint32 __v;                               \
 543             if (__builtin_constant_p (val))                     \
 544               __v = GUINT32_SWAP_LE_BE_CONSTANT (val);          \
 545           else                                                  \
 546             __asm__ __const__ ("bswap %0"                       \
 547                                : "=r" (__v)                     \
 548                                : "0" ((guint32) (val)));        \
 549         __v; }))
 550 #  endif /* processor specific 32-bit stuff */
 551
 552 #  define GUINT32_SWAP_LE_BE(val) (GUINT32_SWAP_LE_BE_X86 (val))
 553
 554 #else /* !__i386__ */
 555 #  define GUINT16_SWAP_LE_BE(val) (GUINT16_SWAP_LE_BE_CONSTANT (val))
 556 #  define GUINT32_SWAP_LE_BE(val) (GUINT32_SWAP_LE_BE_CONSTANT (val))
 557 #endif /* __i386__ */
 558
 559 #ifdef G_HAVE_GINT64
 560 #  define GUINT64_SWAP_LE_BE_CONSTANT(val)      ((guint64) ( \
 561       (((guint64) (val) &                                               \
 562         (guint64) G_GINT64_CONSTANT(0x00000000000000ffU)) << 56) |      \
 563       (((guint64) (val) &                                               \
 564         (guint64) G_GINT64_CONSTANT(0x000000000000ff00U)) << 40) |      \
 565       (((guint64) (val) &                                               \
 566         (guint64) G_GINT64_CONSTANT(0x0000000000ff0000U)) << 24) |      \
 567       (((guint64) (val) &                                               \
 568         (guint64) G_GINT64_CONSTANT(0x00000000ff000000U)) <<  8) |      \
 569       (((guint64) (val) &                                               \
 570         (guint64) G_GINT64_CONSTANT(0x000000ff00000000U)) >>  8) |      \
 571       (((guint64) (val) &                                               \
 572         (guint64) G_GINT64_CONSTANT(0x0000ff0000000000U)) >> 24) |      \
 573       (((guint64) (val) &                                               \
 574         (guint64) G_GINT64_CONSTANT(0x00ff000000000000U)) >> 40) |      \
 575       (((guint64) (val) &                                               \
 576         (guint64) G_GINT64_CONSTANT(0xff00000000000000U)) >> 56)))
 577
 578 #  if defined (__i386__) && defined (__GNUC__) && __GNUC__ >= 2
 579 #    define GUINT64_SWAP_LE_BE_X86(val) \
 580         (__extension__                                          \
 581          ({ union { guint64 __ll;                               \
 582                     guint32 __l[2]; } __r;                      \
 583             if (__builtin_constant_p (val))                     \
 584               __r.__ll = GUINT64_SWAP_LE_BE_CONSTANT (val);     \
 585             else                                                \
 586               {                                                 \
 587                 union { guint64 __ll;                           \
 588                         guint32 __l[2]; } __w;                  \
 589                 __w.__ll = ((guint64) val);                     \
 590                 __r.__l[0] = GUINT32_SWAP_LE_BE (__w.__l[1]);   \
 591                 __r.__l[1] = GUINT32_SWAP_LE_BE (__w.__l[0]);   \
 592               }                                                 \
 593           __r.__ll; }))
 594
 595 #    define GUINT64_SWAP_LE_BE(val) (GUINT64_SWAP_LE_BE_X86 (val))
 596
 597 #  else /* !__i386__ */
 598 #    define GUINT64_SWAP_LE_BE(val) (GUINT64_SWAP_LE_BE_CONSTANT(val))
 599 #  endif
 600 #endif
 601
 602 #define GUINT16_SWAP_LE_PDP(val)        ((guint16) (val))
 603 #define GUINT16_SWAP_BE_PDP(val)        (GUINT16_SWAP_LE_BE (val))
 604 #define GUINT32_SWAP_LE_PDP(val)        ((guint32) ( \
 605     (((guint32) (val) & (guint32) 0x0000ffffU) << 16) | \
 606     (((guint32) (val) & (guint32) 0xffff0000U) >> 16)))
 607 #define GUINT32_SWAP_BE_PDP(val)        ((guint32) ( \
 608     (((guint32) (val) & (guint32) 0x00ff00ffU) << 8) | \
 609     (((guint32) (val) & (guint32) 0xff00ff00U) >> 8)))
 610
 611 /* The TO_?E stuff is defined in glibconfig.h. The transformation is symmetric,
 612    so the FROM just maps to the TO.
 613  */
 614 #define GINT16_FROM_LE(val)     (GINT16_TO_LE (val))
 615 #define GUINT16_FROM_LE(val)    (GUINT16_TO_LE (val))
 616 #define GINT16_FROM_BE(val)     (GINT16_TO_BE (val))
 617 #define GUINT16_FROM_BE(val)    (GUINT16_TO_BE (val))
 618 #define GINT32_FROM_LE(val)     (GINT32_TO_LE (val))
 619 #define GUINT32_FROM_LE(val)    (GUINT32_TO_LE (val))
 620 #define GINT32_FROM_BE(val)     (GINT32_TO_BE (val))
 621 #define GUINT32_FROM_BE(val)    (GUINT32_TO_BE (val))
 622
 623 #ifdef G_HAVE_GINT64
 624 #define GINT64_FROM_LE(val)     (GINT32_TO_LE (val))
 625 #define GUINT64_FROM_LE(val)    (GUINT32_TO_LE (val))
 626 #define GINT64_FROM_BE(val)     (GINT32_TO_BE (val))
 627 #define GUINT64_FROM_BE(val)    (GUINT32_TO_BE (val))
 628 #endif
 629
 630 #define GLONG_FROM_LE(val)      (GLONG_TO_LE (val))
 631 #define GULONG_FROM_LE(val)     (GULONG_TO_LE (val))
 632 #define GLONG_FROM_BE(val)      (GLONG_TO_BE (val))
 633 #define GULONG_FROM_BE(val)     (GULONG_TO_BE (val))
 634
 635 #define GINT_FROM_LE(val)       (GINT_TO_LE (val))
 636 #define GUINT_FROM_LE(val)      (GUINT_TO_LE (val))
 637 #define GINT_FROM_BE(val)       (GINT_TO_BE (val))
 638 #define GUINT_FROM_BE(val)      (GUINT_TO_BE (val))
 639
 640 /* Portable versions of host-network order stuff
 641  */
 642 #define g_ntohl(val) (GUINT32_FROM_BE (val))
 643 #define g_ntohs(val) (GUINT16_FROM_BE (val))
 644 #define g_htonl(val) (GUINT32_TO_BE (val))
 645 #define g_htons(val) (GUINT16_TO_BE (val))
 646
 647
 648 /* Glib version.
 649  * we prefix variable declarations so they can
 650  * properly get exported in windows dlls.
 651  */
 652 #ifdef NATIVE_WIN32
 653 #  ifdef GLIB_COMPILATION
 654 #    define GUTILS_C_VAR __declspec(dllexport)
 655 #  else /* !GLIB_COMPILATION */
 656 #    define GUTILS_C_VAR extern __declspec(dllimport)
 657 #  endif /* !GLIB_COMPILATION */
 658 #else /* !NATIVE_WIN32 */
 659 #  define GUTILS_C_VAR extern
 660 #endif /* !NATIVE_WIN32 */
 661
 662 GUTILS_C_VAR const guint glib_major_version;
 663 GUTILS_C_VAR const guint glib_minor_version;
 664 GUTILS_C_VAR const guint glib_micro_version;
 665 GUTILS_C_VAR const guint glib_interface_age;
 666 GUTILS_C_VAR const guint glib_binary_age;
 667
 668 /* Forward declarations of glib types.
 669  */
 670
 671 typedef struct _GAllocator      GAllocator;
 672 typedef struct _GArray          GArray;
 673 typedef struct _GByteArray      GByteArray;
 674 typedef struct _GCache          GCache;
 675 typedef struct _GCompletion     GCompletion;
 676 typedef struct _GData           GData;
 677 typedef struct _GDebugKey       GDebugKey;
 678 typedef struct _GHashTable      GHashTable;
 679 typedef struct _GHook           GHook;
 680 typedef struct _GHookList       GHookList;
 681 typedef struct _GList           GList;
 682 typedef struct _GMemChunk       GMemChunk;
 683 typedef struct _GNode           GNode;
 684 typedef struct _GPtrArray       GPtrArray;
 685 typedef struct _GRelation       GRelation;
 686 typedef struct _GScanner        GScanner;
 687 typedef struct _GScannerConfig  GScannerConfig;
 688 typedef struct _GSList          GSList;
 689 typedef struct _GString         GString;
 690 typedef struct _GStringChunk    GStringChunk;
 691 typedef struct _GTimer          GTimer;
 692 typedef struct _GTree           GTree;
 693 typedef struct _GTuples         GTuples;
 694 typedef union  _GTokenValue     GTokenValue;
 695 typedef struct _GIOChannel      GIOChannel;
 696
 697
 698 typedef enum
 699 {
 700   G_TRAVERSE_LEAFS      = 1 << 0,
 701   G_TRAVERSE_NON_LEAFS  = 1 << 1,
 702   G_TRAVERSE_ALL        = G_TRAVERSE_LEAFS | G_TRAVERSE_NON_LEAFS,
 703   G_TRAVERSE_MASK       = 0x03
 704 } GTraverseFlags;
 705
 706 typedef enum
 707 {
 708   G_IN_ORDER,
 709   G_PRE_ORDER,
 710   G_POST_ORDER,
 711   G_LEVEL_ORDER
 712 } GTraverseType;
 713
 714 /* Log level shift offset for user defined
 715  * log levels (0-7 are used by GLib).
 716  */
 717 #define G_LOG_LEVEL_USER_SHIFT  (8)
 718
 719 /* Glib log levels and flags.
 720  */
 721 typedef enum
 722 {
 723   /* log flags */
 724   G_LOG_FLAG_RECURSION          = 1 << 0,
 725   G_LOG_FLAG_FATAL              = 1 << 1,
 726
 727   /* GLib log levels */
 728   G_LOG_LEVEL_ERROR             = 1 << 2,       /* always fatal */
 729   G_LOG_LEVEL_CRITICAL          = 1 << 3,
 730   G_LOG_LEVEL_WARNING           = 1 << 4,
 731   G_LOG_LEVEL_MESSAGE           = 1 << 5,
 732   G_LOG_LEVEL_INFO              = 1 << 6,
 733   G_LOG_LEVEL_DEBUG             = 1 << 7,
 734
 735   G_LOG_LEVEL_MASK              = ~(G_LOG_FLAG_RECURSION | G_LOG_FLAG_FATAL)
 736 } GLogLevelFlags;
 737
 738 /* GLib log levels that are considered fatal by default */
 739 #define G_LOG_FATAL_MASK        (G_LOG_FLAG_RECURSION | G_LOG_LEVEL_ERROR)
 740
 741
 742 typedef gpointer        (*GCacheNewFunc)        (gpointer       key);
 743 typedef gpointer        (*GCacheDupFunc)        (gpointer       value);
 744 typedef void            (*GCacheDestroyFunc)    (gpointer       value);
 745 typedef gint            (*GCompareFunc)         (gconstpointer  a,
 746                                                  gconstpointer  b);
 747 typedef gchar*          (*GCompletionFunc)      (gpointer);
 748 typedef void            (*GDestroyNotify)       (gpointer       data);
 749 typedef void            (*GDataForeachFunc)     (GQuark         key_id,
 750                                                  gpointer       data,
 751                                                  gpointer       user_data);
 752 typedef void            (*GFunc)                (gpointer       data,
 753                                                  gpointer       user_data);
 754 typedef guint           (*GHashFunc)            (gconstpointer  key);
 755 typedef void            (*GFreeFunc)            (gpointer       data);
 756 typedef void            (*GHFunc)               (gpointer       key,
 757                                                  gpointer       value,
 758                                                  gpointer       user_data);
 759 typedef gboolean        (*GHRFunc)              (gpointer       key,
 760                                                  gpointer       value,
 761                                                  gpointer       user_data);
 762 typedef gint            (*GHookCompareFunc)     (GHook          *new_hook,
 763                                                  GHook          *sibling);
 764 typedef gboolean        (*GHookFindFunc)        (GHook          *hook,
 765                                                  gpointer        data);
 766 typedef void            (*GHookMarshaller)      (GHook          *hook,
 767                                                  gpointer        data);
 768 typedef void            (*GHookFunc)            (gpointer        data);
 769 typedef gboolean        (*GHookCheckFunc)       (gpointer        data);
 770 typedef void            (*GHookFreeFunc)        (GHookList      *hook_list,
 771                                                  GHook          *hook);
 772 typedef void            (*GLogFunc)             (const gchar   *log_domain,
 773                                                  GLogLevelFlags log_level,
 774                                                  const gchar   *message,
 775                                                  gpointer       user_data);
 776 typedef gboolean        (*GNodeTraverseFunc)    (GNode         *node,
 777                                                  gpointer       data);
 778 typedef void            (*GNodeForeachFunc)     (GNode         *node,
 779                                                  gpointer       data);
 780 typedef gint            (*GSearchFunc)          (gpointer       key,
 781                                                  gpointer       data);
 782 typedef void            (*GScannerMsgFunc)      (GScanner      *scanner,
 783                                                  gchar         *message,
 784                                                  gint           error);
 785 typedef gint            (*GTraverseFunc)        (gpointer       key,
 786                                                  gpointer       value,
 787                                                  gpointer       data);
 788 typedef void            (*GVoidFunc)            (void);
 789
 790
 791 struct _GList
 792 {
 793   gpointer data;
 794   GList *next;
 795   GList *prev;
 796 };
 797
 798 struct _GSList
 799 {
 800   gpointer data;
 801   GSList *next;
 802 };
 803
 804 struct _GString
 805 {
 806   gchar *str;
 807   gint len;
 808 };
 809
 810 struct _GArray
 811 {
 812   gchar *data;
 813   guint len;
 814 };
 815
 816 struct _GByteArray
 817 {
 818   guint8 *data;
 819   guint   len;
 820 };
 821
 822 struct _GPtrArray
 823 {
 824   gpointer *pdata;
 825   guint     len;
 826 };
 827
 828 struct _GTuples
 829 {
 830   guint len;
 831 };
 832
 833 struct _GDebugKey
 834 {
 835   gchar *key;
 836   guint  value;
 837 };
 838
 839
 840 /* Doubly linked lists
 841  */
 842 void   g_list_push_allocator    (GAllocator     *allocator);
 843 void   g_list_pop_allocator     (void);
 844 GList* g_list_alloc             (void);
 845 void   g_list_free              (GList          *list);
 846 void   g_list_free_1            (GList          *list);
 847 GList* g_list_append            (GList          *list,
 848                                  gpointer        data);
 849 GList* g_list_prepend           (GList          *list,
 850                                  gpointer        data);
 851 GList* g_list_insert            (GList          *list,
 852                                  gpointer        data,
 853                                  gint            position);
 854 GList* g_list_insert_sorted     (GList          *list,
 855                                  gpointer        data,
 856                                  GCompareFunc    func);
 857 GList* g_list_concat            (GList          *list1,
 858                                  GList          *list2);
 859 GList* g_list_remove            (GList          *list,
 860                                  gpointer        data);
 861 GList* g_list_remove_link       (GList          *list,
 862                                  GList          *llink);
 863 GList* g_list_reverse           (GList          *list);
 864 GList* g_list_copy              (GList          *list);
 865 GList* g_list_nth               (GList          *list,
 866                                  guint           n);
 867 GList* g_list_find              (GList          *list,
 868                                  gpointer        data);
 869 GList* g_list_find_custom       (GList          *list,
 870                                  gpointer        data,
 871                                  GCompareFunc    func);
 872 gint   g_list_position          (GList          *list,
 873                                  GList          *llink);
 874 gint   g_list_index             (GList          *list,
 875                                  gpointer        data);
 876 GList* g_list_last              (GList          *list);
 877 GList* g_list_first             (GList          *list);
 878 guint  g_list_length            (GList          *list);
 879 void   g_list_foreach           (GList          *list,
 880                                  GFunc           func,
 881                                  gpointer        user_data);
 882 GList* g_list_sort              (GList          *list,
 883                                  GCompareFunc    compare_func);
 884 gpointer g_list_nth_data        (GList          *list,
 885                                  guint           n);
 886 #define g_list_previous(list)   ((list) ? (((GList *)(list))->prev) : NULL)
 887 #define g_list_next(list)       ((list) ? (((GList *)(list))->next) : NULL)
 888
 889
 890 /* Singly linked lists
 891  */
 892 void    g_slist_push_allocator  (GAllocator     *allocator);
 893 void    g_slist_pop_allocator   (void);
 894 GSList* g_slist_alloc           (void);
 895 void    g_slist_free            (GSList         *list);
 896 void    g_slist_free_1          (GSList         *list);
 897 GSList* g_slist_append          (GSList         *list,
 898                                  gpointer        data);
 899 GSList* g_slist_prepend         (GSList         *list,
 900                                  gpointer        data);
 901 GSList* g_slist_insert          (GSList         *list,
 902                                  gpointer        data,
 903                                  gint            position);
 904 GSList* g_slist_insert_sorted   (GSList         *list,
 905                                  gpointer        data,
 906                                  GCompareFunc    func);
 907 GSList* g_slist_concat          (GSList         *list1,
 908                                  GSList         *list2);
 909 GSList* g_slist_remove          (GSList         *list,
 910                                  gpointer        data);
 911 GSList* g_slist_remove_link     (GSList         *list,
 912                                  GSList         *llink);
 913 GSList* g_slist_reverse         (GSList         *list);
 914 GSList* g_slist_copy            (GSList         *list);
 915 GSList* g_slist_nth             (GSList         *list,
 916                                  guint           n);
 917 GSList* g_slist_find            (GSList         *list,
 918                                  gpointer        data);
 919 GSList* g_slist_find_custom     (GSList         *list,
 920                                  gpointer        data,
 921                                  GCompareFunc    func);
 922 gint    g_slist_position        (GSList         *list,
 923                                  GSList         *llink);
 924 gint    g_slist_index           (GSList         *list,
 925                                  gpointer        data);
 926 GSList* g_slist_last            (GSList         *list);
 927 guint   g_slist_length          (GSList         *list);
 928 void    g_slist_foreach         (GSList         *list,
 929                                  GFunc           func,
 930                                  gpointer        user_data);
 931 GSList*  g_slist_sort           (GSList          *list,
 932                                  GCompareFunc    compare_func);
 933 gpointer g_slist_nth_data       (GSList         *list,
 934                                  guint           n);
 935 #define g_slist_next(slist)     ((slist) ? (((GSList *)(slist))->next) : NULL)
 936
 937
 938 /* Hash tables
 939  */
 940 GHashTable* g_hash_table_new            (GHashFunc       hash_func,
 941                                          GCompareFunc    key_compare_func);
 942 void        g_hash_table_destroy        (GHashTable     *hash_table);
 943 void        g_hash_table_insert         (GHashTable     *hash_table,
 944                                          gpointer        key,
 945                                          gpointer        value);
 946 void        g_hash_table_remove         (GHashTable     *hash_table,
 947                                          gconstpointer   key);
 948 gpointer    g_hash_table_lookup         (GHashTable     *hash_table,
 949                                          gconstpointer   key);
 950 gboolean    g_hash_table_lookup_extended(GHashTable     *hash_table,
 951                                          gconstpointer   lookup_key,
 952                                          gpointer       *orig_key,
 953                                          gpointer       *value);
 954 void        g_hash_table_freeze         (GHashTable     *hash_table);
 955 void        g_hash_table_thaw           (GHashTable     *hash_table);
 956 void        g_hash_table_foreach        (GHashTable     *hash_table,
 957                                          GHFunc          func,
 958                                          gpointer        user_data);
 959 gint        g_hash_table_foreach_remove (GHashTable     *hash_table,
 960                                          GHRFunc         func,
 961                                          gpointer        user_data);
 962 gint        g_hash_table_size           (GHashTable     *hash_table);
 963 void        g_hash_table_set_key_freefunc (GHashTable   *hash_table,
 964                                          GFreeFunc      *free_func);
 965
 966
 967 /* Caches
 968  */
 969 GCache*  g_cache_new           (GCacheNewFunc      value_new_func,
 970                                 GCacheDestroyFunc  value_destroy_func,
 971                                 GCacheDupFunc      key_dup_func,
 972                                 GCacheDestroyFunc  key_destroy_func,
 973                                 GHashFunc          hash_key_func,
 974                                 GHashFunc          hash_value_func,
 975                                 GCompareFunc       key_compare_func);
 976 void     g_cache_destroy       (GCache            *cache);
 977 gpointer g_cache_insert        (GCache            *cache,
 978                                 gpointer           key);
 979 void     g_cache_remove        (GCache            *cache,
 980                                 gpointer           value);
 981 void     g_cache_key_foreach   (GCache            *cache,
 982                                 GHFunc             func,
 983                                 gpointer           user_data);
 984 void     g_cache_value_foreach (GCache            *cache,
 985                                 GHFunc             func,
 986                                 gpointer           user_data);
 987
 988
 989 /* Balanced binary trees
 990  */
 991 GTree*   g_tree_new      (GCompareFunc   key_compare_func);
 992 void     g_tree_destroy  (GTree         *tree);
 993 void     g_tree_insert   (GTree         *tree,
 994                           gpointer       key,
 995                           gpointer       value);
 996 void     g_tree_remove   (GTree         *tree,
 997                           gpointer       key);
 998 gpointer g_tree_lookup   (GTree         *tree,
 999                           gpointer       key);
1000 void     g_tree_traverse (GTree         *tree,
1001                           GTraverseFunc  traverse_func,
1002                           GTraverseType  traverse_type,
1003                           gpointer       data);
1004 gpointer g_tree_search   (GTree         *tree,
1005                           GSearchFunc    search_func,
1006                           gpointer       data);
1007 gint     g_tree_height   (GTree         *tree);
1008 gint     g_tree_nnodes   (GTree         *tree);
1009
1010
1011
1012 /* N-way tree implementation
1013  */
1014 struct _GNode
1015 {
1016   gpointer data;
1017   GNode   *next;
1018   GNode   *prev;
1019   GNode   *parent;
1020   GNode   *children;
1021 };
1022
1023 #define  G_NODE_IS_ROOT(node)   (((GNode*) (node))->parent == NULL && \
1024                                  ((GNode*) (node))->prev == NULL && \
1025                                  ((GNode*) (node))->next == NULL)
1026 #define  G_NODE_IS_LEAF(node)   (((GNode*) (node))->children == NULL)
1027
1028 void     g_node_push_allocator  (GAllocator       *allocator);
1029 void     g_node_pop_allocator   (void);
1030 GNode*   g_node_new             (gpointer          data);
1031 void     g_node_destroy         (GNode            *root);
1032 void     g_node_unlink          (GNode            *node);
1033 GNode*   g_node_insert          (GNode            *parent,
1034                                  gint              position,
1035                                  GNode            *node);
1036 GNode*   g_node_insert_before   (GNode            *parent,
1037                                  GNode            *sibling,
1038                                  GNode            *node);
1039 GNode*   g_node_prepend         (GNode            *parent,
1040                                  GNode            *node);
1041 guint    g_node_n_nodes         (GNode            *root,
1042                                  GTraverseFlags    flags);
1043 GNode*   g_node_get_root        (GNode            *node);
1044 gboolean g_node_is_ancestor     (GNode            *node,
1045                                  GNode            *descendant);
1046 guint    g_node_depth           (GNode            *node);
1047 GNode*   g_node_find            (GNode            *root,
1048                                  GTraverseType     order,
1049                                  GTraverseFlags    flags,
1050                                  gpointer          data);
1051
1052 /* convenience macros */
1053 #define g_node_append(parent, node)                             \
1054      g_node_insert_before ((parent), NULL, (node))
1055 #define g_node_insert_data(parent, position, data)              \
1056      g_node_insert ((parent), (position), g_node_new (data))
1057 #define g_node_insert_data_before(parent, sibling, data)        \
1058      g_node_insert_before ((parent), (sibling), g_node_new (data))
1059 #define g_node_prepend_data(parent, data)                       \
1060      g_node_prepend ((parent), g_node_new (data))
1061 #define g_node_append_data(parent, data)                        \
1062      g_node_insert_before ((parent), NULL, g_node_new (data))
1063
1064 /* traversal function, assumes that `node' is root
1065  * (only traverses `node' and its subtree).
1066  * this function is just a high level interface to
1067  * low level traversal functions, optimized for speed.
1068  */
1069 void     g_node_traverse        (GNode            *root,
1070                                  GTraverseType     order,
1071                                  GTraverseFlags    flags,
1072                                  gint              max_depth,
1073                                  GNodeTraverseFunc func,
1074                                  gpointer          data);
1075
1076 /* return the maximum tree height starting with `node', this is an expensive
1077  * operation, since we need to visit all nodes. this could be shortened by
1078  * adding `guint height' to struct _GNode, but then again, this is not very
1079  * often needed, and would make g_node_insert() more time consuming.
1080  */
1081 guint    g_node_max_height       (GNode *root);
1082
1083 void     g_node_children_foreach (GNode           *node,
1084                                   GTraverseFlags   flags,
1085                                   GNodeForeachFunc func,
1086                                   gpointer         data);
1087 void     g_node_reverse_children (GNode           *node);
1088 guint    g_node_n_children       (GNode           *node);
1089 GNode*   g_node_nth_child        (GNode           *node,
1090                                   guint            n);
1091 GNode*   g_node_last_child       (GNode           *node);
1092 GNode*   g_node_find_child       (GNode           *node,
1093                                   GTraverseFlags   flags,
1094                                   gpointer         data);
1095 gint     g_node_child_position   (GNode           *node,
1096                                   GNode           *child);
1097 gint     g_node_child_index      (GNode           *node,
1098                                   gpointer         data);
1099
1100 GNode*   g_node_first_sibling    (GNode           *node);
1101 GNode*   g_node_last_sibling     (GNode           *node);
1102
1103 #define  g_node_prev_sibling(node)      ((node) ? \
1104                                          ((GNode*) (node))->prev : NULL)
1105 #define  g_node_next_sibling(node)      ((node) ? \
1106                                          ((GNode*) (node))->next : NULL)
1107 #define  g_node_first_child(node)       ((node) ? \
1108                                          ((GNode*) (node))->children : NULL)
1109
1110
1111 /* Callback maintenance functions
1112  */
1113 #define G_HOOK_FLAG_USER_SHIFT  (4)
1114 typedef enum
1115 {
1116   G_HOOK_FLAG_ACTIVE    = 1 << 0,
1117   G_HOOK_FLAG_IN_CALL   = 1 << 1,
1118   G_HOOK_FLAG_MASK      = 0x0f
1119 } GHookFlagMask;
1120
1121 struct _GHookList
1122 {
1123   guint          seq_id;
1124   guint          hook_size;
1125   guint          is_setup : 1;
1126   GHook         *hooks;
1127   GMemChunk     *hook_memchunk;
1128   GHookFreeFunc  hook_free; /* virtual function */
1129 };
1130
1131 struct _GHook
1132 {
1133   gpointer       data;
1134   GHook         *next;
1135   GHook         *prev;
1136   guint          ref_count;
1137   guint          hook_id;
1138   guint          flags;
1139   gpointer       func;
1140   GDestroyNotify destroy;
1141 };
1142
1143 #define G_HOOK_ACTIVE(hook)             ((((GHook*) hook)->flags & \
1144                                           G_HOOK_FLAG_ACTIVE) != 0)
1145 #define G_HOOK_IN_CALL(hook)            ((((GHook*) hook)->flags & \
1146                                           G_HOOK_FLAG_IN_CALL) != 0)
1147 #define G_HOOK_IS_VALID(hook)           (((GHook*) hook)->hook_id != 0 && \
1148                                          G_HOOK_ACTIVE (hook))
1149 #define G_HOOK_IS_UNLINKED(hook)        (((GHook*) hook)->next == NULL && \
1150                                          ((GHook*) hook)->prev == NULL && \
1151                                          ((GHook*) hook)->hook_id == 0 && \
1152                                          ((GHook*) hook)->ref_count == 0)
1153
1154 void     g_hook_list_init               (GHookList              *hook_list,
1155                                          guint                   hook_size);
1156 void     g_hook_list_clear              (GHookList              *hook_list);
1157 GHook*   g_hook_alloc                   (GHookList              *hook_list);
1158 void     g_hook_free                    (GHookList              *hook_list,
1159                                          GHook                  *hook);
1160 void     g_hook_ref                     (GHookList              *hook_list,
1161                                          GHook                  *hook);
1162 void     g_hook_unref                   (GHookList              *hook_list,
1163                                          GHook                  *hook);
1164 gboolean g_hook_destroy                 (GHookList              *hook_list,
1165                                          guint                   hook_id);
1166 void     g_hook_destroy_link            (GHookList              *hook_list,
1167                                          GHook                  *hook);
1168 void     g_hook_prepend                 (GHookList              *hook_list,
1169                                          GHook                  *hook);
1170 void     g_hook_insert_before           (GHookList              *hook_list,
1171                                          GHook                  *sibling,
1172                                          GHook                  *hook);
1173 void     g_hook_insert_sorted           (GHookList              *hook_list,
1174                                          GHook                  *hook,
1175                                          GHookCompareFunc        func);
1176 GHook*   g_hook_get                     (GHookList              *hook_list,
1177                                          guint                   hook_id);
1178 GHook*   g_hook_find                    (GHookList              *hook_list,
1179                                          gboolean                need_valids,
1180                                          GHookFindFunc           func,
1181                                          gpointer                data);
1182 GHook*   g_hook_find_data               (GHookList              *hook_list,
1183                                          gboolean                need_valids,
1184                                          gpointer                data);
1185 GHook*   g_hook_find_func               (GHookList              *hook_list,
1186                                          gboolean                need_valids,
1187                                          gpointer                func);
1188 GHook*   g_hook_find_func_data          (GHookList              *hook_list,
1189                                          gboolean                need_valids,
1190                                          gpointer                func,
1191                                          gpointer                data);
1192 GHook*   g_hook_first_valid             (GHookList              *hook_list,
1193                                          gboolean                may_be_in_call);
1194 GHook*   g_hook_next_valid              (GHook                  *hook,
1195                                          gboolean                may_be_in_call);
1196
1197 /* GHookCompareFunc implementation to insert hooks sorted by their id */
1198 gint     g_hook_compare_ids             (GHook                  *new_hook,
1199                                          GHook                  *sibling);
1200
1201 /* convenience macros */
1202 #define  g_hook_append( hook_list, hook )  \
1203      g_hook_insert_before ((hook_list), NULL, (hook))
1204
1205 /* invoke all valid hooks with the (*GHookFunc) signature.
1206  */
1207 void     g_hook_list_invoke             (GHookList              *hook_list,
1208                                          gboolean                may_recurse);
1209 /* invoke all valid hooks with the (*GHookCheckFunc) signature,
1210  * and destroy the hook if FALSE is returned.
1211  */
1212 void     g_hook_list_invoke_check       (GHookList              *hook_list,
1213                                          gboolean                may_recurse);
1214 /* invoke a marshaller on all valid hooks.
1215  */
1216 void     g_hook_list_marshal            (GHookList              *hook_list,
1217                                          gboolean                may_recurse,
1218                                          GHookMarshaller         marshaller,
1219                                          gpointer                data);
1220
1221
1222 /* Fatal error handlers.
1223  * g_on_error_query() will prompt the user to either
1224  * [E]xit, [H]alt, [P]roceed or show [S]tack trace.
1225  * g_on_error_stack_trace() invokes gdb, which attaches to the current
1226  * process and shows a stack trace.
1227  * These function may cause different actions on non-unix platforms.
1228  * The prg_name arg is required by gdb to find the executable, if it is
1229  * passed as NULL, g_on_error_query() will try g_get_prgname().
1230  */
1231 void g_on_error_query (const gchar *prg_name);
1232 void g_on_error_stack_trace (const gchar *prg_name);
1233
1234
1235 /* Logging mechanism
1236  */
1237 extern          const gchar             *g_log_domain_glib;
1238 guint           g_log_set_handler       (const gchar    *log_domain,
1239                                          GLogLevelFlags  log_levels,
1240                                          GLogFunc        log_func,
1241                                          gpointer        user_data);
1242 void            g_log_remove_handler    (const gchar    *log_domain,
1243                                          guint           handler_id);
1244 void            g_log_default_handler   (const gchar    *log_domain,
1245                                          GLogLevelFlags  log_level,
1246                                          const gchar    *message,
1247                                          gpointer        unused_data);
1248 void            g_log                   (const gchar    *log_domain,
1249                                          GLogLevelFlags  log_level,
1250                                          const gchar    *format,
1251                                          ...) G_GNUC_PRINTF (3, 4);
1252 void            g_logv                  (const gchar    *log_domain,
1253                                          GLogLevelFlags  log_level,
1254                                          const gchar    *format,
1255                                          va_list         args);
1256 GLogLevelFlags  g_log_set_fatal_mask    (const gchar    *log_domain,
1257                                          GLogLevelFlags  fatal_mask);
1258 GLogLevelFlags  g_log_set_always_fatal  (GLogLevelFlags  fatal_mask);
1259 #ifndef G_LOG_DOMAIN
1260 #define G_LOG_DOMAIN    (NULL)
1261 #endif  /* G_LOG_DOMAIN */
1262 #ifdef  __GNUC__
1263 #define g_error(format, args...)        g_log (G_LOG_DOMAIN, \
1264                                                G_LOG_LEVEL_ERROR, \
1265                                                format, ##args)
1266 #define g_message(format, args...)      g_log (G_LOG_DOMAIN, \
1267                                                G_LOG_LEVEL_MESSAGE, \
1268                                                format, ##args)
1269 #define g_warning(format, args...)      g_log (G_LOG_DOMAIN, \
1270                                                G_LOG_LEVEL_WARNING, \
1271                                                format, ##args)
1272 #else   /* !__GNUC__ */
1273 static inline void
1274 g_error (const gchar *format,
1275          ...)
1276 {
1277   va_list args;
1278   va_start (args, format);
1279   g_logv (G_LOG_DOMAIN, G_LOG_LEVEL_ERROR, format, args);
1280   va_end (args);
1281 }
1282 static inline void
1283 g_message (const gchar *format,
1284            ...)
1285 {
1286   va_list args;
1287   va_start (args, format);
1288   g_logv (G_LOG_DOMAIN, G_LOG_LEVEL_MESSAGE, format, args);
1289   va_end (args);
1290 }
1291 static inline void
1292 g_warning (const gchar *format,
1293            ...)
1294 {
1295   va_list args;
1296   va_start (args, format);
1297   g_logv (G_LOG_DOMAIN, G_LOG_LEVEL_WARNING, format, args);
1298   va_end (args);
1299 }
1300 #endif  /* !__GNUC__ */
1301
1302 typedef void    (*GPrintFunc)           (const gchar    *string);
1303 void            g_print                 (const gchar    *format,
1304                                          ...) G_GNUC_PRINTF (1, 2);
1305 GPrintFunc      g_set_print_handler     (GPrintFunc      func);
1306 void            g_printerr              (const gchar    *format,
1307                                          ...) G_GNUC_PRINTF (1, 2);
1308 GPrintFunc      g_set_printerr_handler  (GPrintFunc      func);
1309
1310 /* deprecated compatibility functions, use g_log_set_handler() instead */
1311 typedef void            (*GErrorFunc)           (const gchar *str);
1312 typedef void            (*GWarningFunc)         (const gchar *str);
1313 GErrorFunc   g_set_error_handler   (GErrorFunc   func);
1314 GWarningFunc g_set_warning_handler (GWarningFunc func);
1315 GPrintFunc   g_set_message_handler (GPrintFunc func);
1316
1317
1318 /* Memory allocation and debugging
1319  */
1320 #ifdef USE_DMALLOC
1321
1322 #define g_malloc(size)       ((gpointer) MALLOC (size))
1323 #define g_malloc0(size)      ((gpointer) CALLOC (char, size))
1324 #define g_realloc(mem,size)  ((gpointer) REALLOC (mem, char, size))
1325 #define g_free(mem)          FREE (mem)
1326
1327 #else /* !USE_DMALLOC */
1328
1329 gpointer g_malloc      (gulong    size);
1330 gpointer g_malloc0     (gulong    size);
1331 gpointer g_realloc     (gpointer  mem,
1332                         gulong    size);
1333 void     g_free        (gpointer  mem);
1334
1335 #endif /* !USE_DMALLOC */
1336
1337 void     g_mem_profile (void);
1338 void     g_mem_check   (gpointer  mem);
1339
1340 /* Generic allocators
1341  */
1342 GAllocator* g_allocator_new   (const gchar  *name,
1343                                guint         n_preallocs);
1344 void        g_allocator_free  (GAllocator   *allocator);
1345
1346 #define G_ALLOCATOR_LIST        (1)
1347 #define G_ALLOCATOR_SLIST       (2)
1348 #define G_ALLOCATOR_NODE        (3)
1349
1350
1351 /* "g_mem_chunk_new" creates a new memory chunk.
1352  * Memory chunks are used to allocate pieces of memory which are
1353  *  always the same size. Lists are a good example of such a data type.
1354  * The memory chunk allocates and frees blocks of memory as needed.
1355  *  Just be sure to call "g_mem_chunk_free" and not "g_free" on data
1356  *  allocated in a mem chunk. ("g_free" will most likely cause a seg
1357  *  fault...somewhere).
1358  *
1359  * Oh yeah, GMemChunk is an opaque data type. (You don't really
1360  *  want to know what's going on inside do you?)
1361  */
1362
1363 /* ALLOC_ONLY MemChunk's can only allocate memory. The free operation
1364  *  is interpreted as a no op. ALLOC_ONLY MemChunk's save 4 bytes per
1365  *  atom. (They are also useful for lists which use MemChunk to allocate
1366  *  memory but are also part of the MemChunk implementation).
1367  * ALLOC_AND_FREE MemChunk's can allocate and free memory.
1368  */
1369
1370 #define G_ALLOC_ONLY      1
1371 #define G_ALLOC_AND_FREE  2
1372
1373 GMemChunk* g_mem_chunk_new     (gchar     *name,
1374                                 gint       atom_size,
1375                                 gulong     area_size,
1376                                 gint       type);
1377 void       g_mem_chunk_destroy (GMemChunk *mem_chunk);
1378 gpointer   g_mem_chunk_alloc   (GMemChunk *mem_chunk);
1379 gpointer   g_mem_chunk_alloc0  (GMemChunk *mem_chunk);
1380 void       g_mem_chunk_free    (GMemChunk *mem_chunk,
1381                                 gpointer   mem);
1382 void       g_mem_chunk_clean   (GMemChunk *mem_chunk);
1383 void       g_mem_chunk_reset   (GMemChunk *mem_chunk);
1384 void       g_mem_chunk_print   (GMemChunk *mem_chunk);
1385 void       g_mem_chunk_info    (void);
1386
1387 /* Ah yes...we have a "g_blow_chunks" function.
1388  * "g_blow_chunks" simply compresses all the chunks. This operation
1389  *  consists of freeing every memory area that should be freed (but
1390  *  which we haven't gotten around to doing yet). And, no,
1391  *  "g_blow_chunks" doesn't follow the naming scheme, but it is a
1392  *  much better name than "g_mem_chunk_clean_all" or something
1393  *  similar.
1394  */
1395 void g_blow_chunks (void);
1396
1397
1398 /* Timer
1399  */
1400 GTimer* g_timer_new     (void);
1401 void    g_timer_destroy (GTimer  *timer);
1402 void    g_timer_start   (GTimer  *timer);
1403 void    g_timer_stop    (GTimer  *timer);
1404 void    g_timer_reset   (GTimer  *timer);
1405 gdouble g_timer_elapsed (GTimer  *timer,
1406                          gulong  *microseconds);
1407
1408
1409 /* String utility functions that modify a string argument or
1410  * return a constant string that must not be freed.
1411  */
1412 #define  G_STR_DELIMITERS       "_-|> <."
1413 gchar*   g_strdelimit           (gchar       *string,
1414                                  const gchar *delimiters,
1415                                  gchar        new_delimiter);
1416 gdouble  g_strtod               (const gchar *nptr,
1417                                  gchar      **endptr);
1418 gchar*   g_strerror             (gint         errnum);
1419 gchar*   g_strsignal            (gint         signum);
1420 gint     g_strcasecmp           (const gchar *s1,
1421                                  const gchar *s2);
1422 gint     g_strncasecmp          (const gchar *s1,
1423                                  const gchar *s2,
1424                                  guint        n);
1425 void     g_strdown              (gchar       *string);
1426 void     g_strup                (gchar       *string);
1427 void     g_strreverse           (gchar       *string);
1428 /* removes leading spaces */
1429 gchar*   g_strchug              (gchar        *string);
1430 /* removes trailing spaces */
1431 gchar*  g_strchomp              (gchar        *string);
1432 /* removes leading & trailing spaces */
1433 #define g_strstrip( string )    g_strchomp (g_strchug (string))
1434
1435 /* String utility functions that return a newly allocated string which
1436  * ought to be freed from the caller at some point.
1437  */
1438 gchar*   g_strdup               (const gchar *str);
1439 gchar*   g_strdup_printf        (const gchar *format,
1440                                  ...) G_GNUC_PRINTF (1, 2);
1441 gchar*   g_strdup_vprintf       (const gchar *format,
1442                                  va_list      args);
1443 gchar*   g_strndup              (const gchar *str,
1444                                  guint        n);
1445 gchar*   g_strnfill             (guint        length,
1446                                  gchar        fill_char);
1447 gchar*   g_strconcat            (const gchar *string1,
1448                                  ...); /* NULL terminated */
1449 gchar*   g_strjoin              (const gchar  *separator,
1450                                  ...); /* NULL terminated */
1451 gchar*   g_strescape            (gchar        *string);
1452 gpointer g_memdup               (gconstpointer mem,
1453                                  guint         byte_size);
1454
1455 /* NULL terminated string arrays.
1456  * g_strsplit() splits up string into max_tokens tokens at delim and
1457  * returns a newly allocated string array.
1458  * g_strjoinv() concatenates all of str_array's strings, sliding in an
1459  * optional separator, the returned string is newly allocated.
1460  * g_strfreev() frees the array itself and all of its strings.
1461  */
1462 gchar**  g_strsplit             (const gchar  *string,
1463                                  const gchar  *delimiter,
1464                                  gint          max_tokens);
1465 gchar*   g_strjoinv             (const gchar  *separator,
1466                                  gchar       **str_array);
1467 void     g_strfreev             (gchar       **str_array);
1468
1469
1470
1471 /* calculate a string size, guarranteed to fit format + args.
1472  */
1473 guint   g_printf_string_upper_bound (const gchar* format,
1474                                      va_list      args);
1475
1476
1477 /* Retrive static string info
1478  */
1479 gchar*  g_get_user_name         (void);
1480 gchar*  g_get_real_name         (void);
1481 gchar*  g_get_home_dir          (void);
1482 gchar*  g_get_tmp_dir           (void);
1483 gchar*  g_get_prgname           (void);
1484 void    g_set_prgname           (const gchar *prgname);
1485
1486
1487 /* Miscellaneous utility functions
1488  */
1489 guint   g_parse_debug_string    (const gchar *string,
1490                                  GDebugKey   *keys,
1491                                  guint        nkeys);
1492 gint    g_snprintf              (gchar       *string,
1493                                  gulong       n,
1494                                  gchar const *format,
1495                                  ...) G_GNUC_PRINTF (3, 4);
1496 gint    g_vsnprintf             (gchar       *string,
1497                                  gulong       n,
1498                                  gchar const *format,
1499                                  va_list      args);
1500 gchar*  g_basename              (const gchar *file_name);
1501 /* Check if a file name is an absolute path */
1502 gboolean g_path_is_absolute     (const gchar *file_name);
1503 /* In case of absolute paths, skip the root part */
1504 gchar*  g_path_skip_root        (gchar       *file_name);
1505
1506 /* strings are newly allocated with g_malloc() */
1507 gchar*  g_dirname               (const gchar *file_name);
1508 gchar*  g_get_current_dir       (void);
1509 gchar*  g_getenv                (const gchar *variable);
1510
1511
1512 /* we use a GLib function as a replacement for ATEXIT, so
1513  * the programmer is not required to check the return value
1514  * (if there is any in the implementation) and doesn't encounter
1515  * missing include files.
1516  */
1517 void    g_atexit                (GVoidFunc    func);
1518
1519
1520 /* Bit tests
1521  */
1522 G_INLINE_FUNC gint      g_bit_nth_lsf (guint32 mask,
1523                                        gint    nth_bit);
1524 #ifdef  G_CAN_INLINE
1525 G_INLINE_FUNC gint
1526 g_bit_nth_lsf (guint32 mask,
1527                gint    nth_bit)
1528 {
1529   do
1530     {
1531       nth_bit++;
1532       if (mask & (1 << (guint) nth_bit))
1533         return nth_bit;
1534     }
1535   while (nth_bit < 32);
1536   return -1;
1537 }
1538 #endif  /* G_CAN_INLINE */
1539
1540 G_INLINE_FUNC gint      g_bit_nth_msf (guint32 mask,
1541                                        gint    nth_bit);
1542 #ifdef G_CAN_INLINE
1543 G_INLINE_FUNC gint
1544 g_bit_nth_msf (guint32 mask,
1545                gint    nth_bit)
1546 {
1547   if (nth_bit < 0)
1548     nth_bit = 32;
1549   do
1550     {
1551       nth_bit--;
1552       if (mask & (1 << (guint) nth_bit))
1553         return nth_bit;
1554     }
1555   while (nth_bit > 0);
1556   return -1;
1557 }
1558 #endif  /* G_CAN_INLINE */
1559
1560 G_INLINE_FUNC guint     g_bit_storage (guint number);
1561 #ifdef G_CAN_INLINE
1562 G_INLINE_FUNC guint
1563 g_bit_storage (guint number)
1564 {
1565   register guint n_bits = 0;
1566
1567   do
1568     {
1569       n_bits++;
1570       number >>= 1;
1571     }
1572   while (number);
1573   return n_bits;
1574 }
1575 #endif  /* G_CAN_INLINE */
1576
1577 /* String Chunks
1578  */
1579 GStringChunk* g_string_chunk_new           (gint size);
1580 void          g_string_chunk_free          (GStringChunk *chunk);
1581 gchar*        g_string_chunk_insert        (GStringChunk *chunk,
1582                                             const gchar  *string);
1583 gchar*        g_string_chunk_insert_const  (GStringChunk *chunk,
1584                                             const gchar  *string);
1585
1586
1587 /* Strings
1588  */
1589 GString* g_string_new       (const gchar *init);
1590 GString* g_string_sized_new (guint        dfl_size);
1591 void     g_string_free      (GString     *string,
1592                              gint         free_segment);
1593 GString* g_string_assign    (GString     *lval,
1594                              const gchar *rval);
1595 GString* g_string_truncate  (GString     *string,
1596                              gint         len);
1597 GString* g_string_append    (GString     *string,
1598                              const gchar *val);
1599 GString* g_string_append_c  (GString     *string,
1600                              gchar        c);
1601 GString* g_string_prepend   (GString     *string,
1602                              const gchar *val);
1603 GString* g_string_prepend_c (GString     *string,
1604                              gchar        c);
1605 GString* g_string_insert    (GString     *string,
1606                              gint         pos,
1607                              const gchar *val);
1608 GString* g_string_insert_c  (GString     *string,
1609                              gint         pos,
1610                              gchar        c);
1611 GString* g_string_erase     (GString     *string,
1612                              gint         pos,
1613                              gint         len);
1614 GString* g_string_down      (GString     *string);
1615 GString* g_string_up        (GString     *string);
1616 void     g_string_sprintf   (GString     *string,
1617                              const gchar *format,
1618                              ...) G_GNUC_PRINTF (2, 3);
1619 void     g_string_sprintfa  (GString     *string,
1620                              const gchar *format,
1621                              ...) G_GNUC_PRINTF (2, 3);
1622
1623
1624 /* Resizable arrays, remove fills any cleared spot and shortens the
1625  * array, while preserving the order. remove_fast will distort the
1626  * order by moving the last element to the position of the removed
1627  */
1628
1629 #define g_array_append_val(a,v) g_array_append_vals(a,&v,1)
1630 #define g_array_prepend_val(a,v) g_array_prepend_vals(a,&v,1)
1631 #define g_array_insert_val(a,i,v) g_array_prepend_vals(a,i,&v,1)
1632 #define g_array_index(a,t,i) (((t*)a->data)[i])
1633
1634 GArray* g_array_new               (gboolean         zero_terminated,
1635                                    gboolean         clear,
1636                                    guint            element_size);
1637 void    g_array_free              (GArray          *array,
1638                                    gboolean         free_segment);
1639 GArray* g_array_append_vals       (GArray          *array,
1640                                    gconstpointer    data,
1641                                    guint            len);
1642 GArray* g_array_prepend_vals      (GArray          *array,
1643                                    gconstpointer    data,
1644                                    guint            len);
1645 GArray* g_array_insert_vals       (GArray          *array,
1646                                    guint            index,
1647                                    gconstpointer    data,
1648                                    guint            len);
1649 GArray* g_array_set_size          (GArray          *array,
1650                                    guint            length);
1651 GArray* g_array_remove_index      (GArray          *array,
1652                                    guint            index);
1653 GArray* g_array_remove_index_fast (GArray          *array,
1654                                    guint            index);
1655
1656 /* Resizable pointer array.  This interface is much less complicated
1657  * than the above.  Add appends appends a pointer.  Remove fills any
1658  * cleared spot and shortens the array. remove_fast will again distort
1659  * order.
1660  */
1661 #define     g_ptr_array_index(array,index) (array->pdata)[index]
1662 GPtrArray*  g_ptr_array_new                (void);
1663 void        g_ptr_array_free               (GPtrArray   *array,
1664                                             gboolean     free_seg);
1665 void        g_ptr_array_set_size           (GPtrArray   *array,
1666                                             gint         length);
1667 gpointer    g_ptr_array_remove_index       (GPtrArray   *array,
1668                                             guint        index);
1669 gpointer    g_ptr_array_remove_index_fast  (GPtrArray   *array,
1670                                             guint        index);
1671 gboolean    g_ptr_array_remove             (GPtrArray   *array,
1672                                             gpointer     data);
1673 gboolean    g_ptr_array_remove_fast        (GPtrArray   *array,
1674                                             gpointer     data);
1675 void        g_ptr_array_add                (GPtrArray   *array,
1676                                             gpointer     data);
1677
1678 /* Byte arrays, an array of guint8.  Implemented as a GArray,
1679  * but type-safe.
1680  */
1681
1682 GByteArray* g_byte_array_new               (void);
1683 void        g_byte_array_free              (GByteArray   *array,
1684                                             gboolean      free_segment);
1685 GByteArray* g_byte_array_append            (GByteArray   *array,
1686                                             const guint8 *data,
1687                                             guint         len);
1688 GByteArray* g_byte_array_prepend           (GByteArray   *array,
1689                                             const guint8 *data,
1690                                             guint         len);
1691 GByteArray* g_byte_array_set_size          (GByteArray   *array,
1692                                             guint         length);
1693 GByteArray* g_byte_array_remove_index      (GByteArray   *array,
1694                                             guint         index);
1695 GByteArray* g_byte_array_remove_index_fast (GByteArray   *array,
1696                                             guint         index);
1697
1698
1699 /* Hash Functions
1700  */
1701 gint  g_str_equal (gconstpointer   v,
1702                    gconstpointer   v2);
1703 guint g_str_hash  (gconstpointer   v);
1704
1705 gint  g_int_equal (gconstpointer   v,
1706                    gconstpointer   v2);
1707 guint g_int_hash  (gconstpointer   v);
1708
1709 /* This "hash" function will just return the key's adress as an
1710  * unsigned integer. Useful for hashing on plain adresses or
1711  * simple integer values.
1712  */
1713 guint g_direct_hash  (gconstpointer v);
1714 gint  g_direct_equal (gconstpointer v,
1715                       gconstpointer v2);
1716
1717
1718 /* Quarks (string<->id association)
1719  */
1720 GQuark    g_quark_try_string            (const gchar    *string);
1721 GQuark    g_quark_from_static_string    (const gchar    *string);
1722 GQuark    g_quark_from_string           (const gchar    *string);
1723 gchar*    g_quark_to_string             (GQuark          quark);
1724
1725
1726 /* Keyed Data List
1727  */
1728 void      g_datalist_init                (GData          **datalist);
1729 void      g_datalist_clear               (GData          **datalist);
1730 gpointer  g_datalist_id_get_data         (GData          **datalist,
1731                                           GQuark           key_id);
1732 void      g_datalist_id_set_data_full    (GData          **datalist,
1733                                           GQuark           key_id,
1734                                           gpointer         data,
1735                                           GDestroyNotify   destroy_func);
1736 void      g_datalist_id_remove_no_notify (GData          **datalist,
1737                                           GQuark           key_id);
1738 void      g_datalist_foreach             (GData          **datalist,
1739                                           GDataForeachFunc func,
1740                                           gpointer         user_data);
1741 #define   g_datalist_id_set_data(dl, q, d)      \
1742      g_datalist_id_set_data_full ((dl), (q), (d), NULL)
1743 #define   g_datalist_id_remove_data(dl, q)      \
1744      g_datalist_id_set_data ((dl), (q), NULL)
1745 #define   g_datalist_get_data(dl, k)            \
1746      (g_datalist_id_get_data ((dl), g_quark_try_string (k)))
1747 #define   g_datalist_set_data_full(dl, k, d, f) \
1748      g_datalist_id_set_data_full ((dl), g_quark_from_string (k), (d), (f))
1749 #define   g_datalist_remove_no_notify(dl, k)    \
1750      g_datalist_id_remove_no_notify ((dl), g_quark_try_string (k))
1751 #define   g_datalist_set_data(dl, k, d)         \
1752      g_datalist_set_data_full ((dl), (k), (d), NULL)
1753 #define   g_datalist_remove_data(dl, k)         \
1754      g_datalist_id_set_data ((dl), g_quark_try_string (k), NULL)
1755
1756
1757 /* Location Associated Keyed Data
1758  */
1759 void      g_dataset_destroy             (gconstpointer    dataset_location);
1760 gpointer  g_dataset_id_get_data         (gconstpointer    dataset_location,
1761                                          GQuark           key_id);
1762 void      g_dataset_id_set_data_full    (gconstpointer    dataset_location,
1763                                          GQuark           key_id,
1764                                          gpointer         data,
1765                                          GDestroyNotify   destroy_func);
1766 void      g_dataset_id_remove_no_notify (gconstpointer    dataset_location,
1767                                          GQuark           key_id);
1768 void      g_dataset_foreach             (gconstpointer    dataset_location,
1769                                          GDataForeachFunc func,
1770                                          gpointer         user_data);
1771 #define   g_dataset_id_set_data(l, k, d)        \
1772      g_dataset_id_set_data_full ((l), (k), (d), NULL)
1773 #define   g_dataset_id_remove_data(l, k)        \
1774      g_dataset_id_set_data ((l), (k), NULL)
1775 #define   g_dataset_get_data(l, k)              \
1776      (g_dataset_id_get_data ((l), g_quark_try_string (k)))
1777 #define   g_dataset_set_data_full(l, k, d, f)   \
1778      g_dataset_id_set_data_full ((l), g_quark_from_string (k), (d), (f))
1779 #define   g_dataset_remove_no_notify(l, k)      \
1780      g_dataset_id_remove_no_notify ((l), g_quark_try_string (k))
1781 #define   g_dataset_set_data(l, k, d)           \
1782      g_dataset_set_data_full ((l), (k), (d), NULL)
1783 #define   g_dataset_remove_data(l, k)           \
1784      g_dataset_id_set_data ((l), g_quark_try_string (k), NULL)
1785
1786
1787 /* GScanner: Flexible lexical scanner for general purpose.
1788  */
1789
1790 /* Character sets */
1791 #define G_CSET_A_2_Z    "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
1792 #define G_CSET_a_2_z    "abcdefghijklmnopqrstuvwxyz"
1793 #define G_CSET_LATINC   "\300\301\302\303\304\305\306"\
1794                         "\307\310\311\312\313\314\315\316\317\320"\
1795                         "\321\322\323\324\325\326"\
1796                         "\330\331\332\333\334\335\336"
1797 #define G_CSET_LATINS   "\337\340\341\342\343\344\345\346"\
1798                         "\347\350\351\352\353\354\355\356\357\360"\
1799                         "\361\362\363\364\365\366"\
1800                         "\370\371\372\373\374\375\376\377"
1801
1802 /* Error types */
1803 typedef enum
1804 {
1805   G_ERR_UNKNOWN,
1806   G_ERR_UNEXP_EOF,
1807   G_ERR_UNEXP_EOF_IN_STRING,
1808   G_ERR_UNEXP_EOF_IN_COMMENT,
1809   G_ERR_NON_DIGIT_IN_CONST,
1810   G_ERR_DIGIT_RADIX,
1811   G_ERR_FLOAT_RADIX,
1812   G_ERR_FLOAT_MALFORMED
1813 } GErrorType;
1814
1815 /* Token types */
1816 typedef enum
1817 {
1818   G_TOKEN_EOF                   =   0,
1819
1820   G_TOKEN_LEFT_PAREN            = '(',
1821   G_TOKEN_RIGHT_PAREN           = ')',
1822   G_TOKEN_LEFT_CURLY            = '{',
1823   G_TOKEN_RIGHT_CURLY           = '}',
1824   G_TOKEN_LEFT_BRACE            = '[',
1825   G_TOKEN_RIGHT_BRACE           = ']',
1826   G_TOKEN_EQUAL_SIGN            = '=',
1827   G_TOKEN_COMMA                 = ',',
1828
1829   G_TOKEN_NONE                  = 256,
1830
1831   G_TOKEN_ERROR,
1832
1833   G_TOKEN_CHAR,
1834   G_TOKEN_BINARY,
1835   G_TOKEN_OCTAL,
1836   G_TOKEN_INT,
1837   G_TOKEN_HEX,
1838   G_TOKEN_FLOAT,
1839   G_TOKEN_STRING,
1840
1841   G_TOKEN_SYMBOL,
1842   G_TOKEN_IDENTIFIER,
1843   G_TOKEN_IDENTIFIER_NULL,
1844
1845   G_TOKEN_COMMENT_SINGLE,
1846   G_TOKEN_COMMENT_MULTI,
1847   G_TOKEN_LAST
1848 } GTokenType;
1849
1850 union   _GTokenValue
1851 {
1852   gpointer      v_symbol;
1853   gchar         *v_identifier;
1854   gulong        v_binary;
1855   gulong        v_octal;
1856   gulong        v_int;
1857   gdouble       v_float;
1858   gulong        v_hex;
1859   gchar         *v_string;
1860   gchar         *v_comment;
1861   guchar        v_char;
1862   guint         v_error;
1863 };
1864
1865 struct  _GScannerConfig
1866 {
1867   /* Character sets
1868    */
1869   gchar         *cset_skip_characters;          /* default: " \t\n" */
1870   gchar         *cset_identifier_first;
1871   gchar         *cset_identifier_nth;
1872   gchar         *cpair_comment_single;          /* default: "#\n" */
1873
1874   /* Should symbol lookup work case sensitive?
1875    */
1876   guint         case_sensitive : 1;
1877
1878   /* Boolean values to be adjusted "on the fly"
1879    * to configure scanning behaviour.
1880    */
1881   guint         skip_comment_multi : 1;         /* C like comment */
1882   guint         skip_comment_single : 1;        /* single line comment */
1883   guint         scan_comment_multi : 1;         /* scan multi line comments? */
1884   guint         scan_identifier : 1;
1885   guint         scan_identifier_1char : 1;
1886   guint         scan_identifier_NULL : 1;
1887   guint         scan_symbols : 1;
1888   guint         scan_binary : 1;
1889   guint         scan_octal : 1;
1890   guint         scan_float : 1;
1891   guint         scan_hex : 1;                   /* `0x0ff0' */
1892   guint         scan_hex_dollar : 1;            /* `$0ff0' */
1893   guint         scan_string_sq : 1;             /* string: 'anything' */
1894   guint         scan_string_dq : 1;             /* string: "\\-escapes!\n" */
1895   guint         numbers_2_int : 1;              /* bin, octal, hex => int */
1896   guint         int_2_float : 1;                /* int => G_TOKEN_FLOAT? */
1897   guint         identifier_2_string : 1;
1898   guint         char_2_token : 1;               /* return G_TOKEN_CHAR? */
1899   guint         symbol_2_token : 1;
1900   guint         scope_0_fallback : 1;           /* try scope 0 on lookups? */
1901 };
1902
1903 struct  _GScanner
1904 {
1905   /* unused fields */
1906   gpointer              user_data;
1907   guint                 max_parse_errors;
1908
1909   /* g_scanner_error() increments this field */
1910   guint                 parse_errors;
1911
1912   /* name of input stream, featured by the default message handler */
1913   const gchar           *input_name;
1914
1915   /* data pointer for derived structures */
1916   gpointer              derived_data;
1917
1918   /* link into the scanner configuration */
1919   GScannerConfig        *config;
1920
1921   /* fields filled in after g_scanner_get_next_token() */
1922   GTokenType            token;
1923   GTokenValue           value;
1924   guint                 line;
1925   guint                 position;
1926
1927   /* fields filled in after g_scanner_peek_next_token() */
1928   GTokenType            next_token;
1929   GTokenValue           next_value;
1930   guint                 next_line;
1931   guint                 next_position;
1932
1933   /* to be considered private */
1934   GHashTable            *symbol_table;
1935   gint                  input_fd;
1936   const gchar           *text;
1937   const gchar           *text_end;
1938   gchar                 *buffer;
1939   guint                 scope_id;
1940
1941   /* handler function for _warn and _error */
1942   GScannerMsgFunc       msg_handler;
1943 };
1944
1945 GScanner*       g_scanner_new                   (GScannerConfig *config_templ);
1946 void            g_scanner_destroy               (GScanner       *scanner);
1947 void            g_scanner_input_file            (GScanner       *scanner,
1948                                                  gint           input_fd);
1949 void            g_scanner_sync_file_offset      (GScanner       *scanner);
1950 void            g_scanner_input_text            (GScanner       *scanner,
1951                                                  const  gchar   *text,
1952                                                  guint          text_len);
1953 GTokenType      g_scanner_get_next_token        (GScanner       *scanner);
1954 GTokenType      g_scanner_peek_next_token       (GScanner       *scanner);
1955 GTokenType      g_scanner_cur_token             (GScanner       *scanner);
1956 GTokenValue     g_scanner_cur_value             (GScanner       *scanner);
1957 guint           g_scanner_cur_line              (GScanner       *scanner);
1958 guint           g_scanner_cur_position          (GScanner       *scanner);
1959 gboolean        g_scanner_eof                   (GScanner       *scanner);
1960 guint           g_scanner_set_scope             (GScanner       *scanner,
1961                                                  guint           scope_id);
1962 void            g_scanner_scope_add_symbol      (GScanner       *scanner,
1963                                                  guint           scope_id,
1964                                                  const gchar    *symbol,
1965                                                  gpointer       value);
1966 void            g_scanner_scope_remove_symbol   (GScanner       *scanner,
1967                                                  guint           scope_id,
1968                                                  const gchar    *symbol);
1969 gpointer        g_scanner_scope_lookup_symbol   (GScanner       *scanner,
1970                                                  guint           scope_id,
1971                                                  const gchar    *symbol);
1972 void            g_scanner_scope_foreach_symbol  (GScanner       *scanner,
1973                                                  guint           scope_id,
1974                                                  GHFunc          func,
1975                                                  gpointer        func_data);
1976 gpointer        g_scanner_lookup_symbol         (GScanner       *scanner,
1977                                                  const gchar    *symbol);
1978 void            g_scanner_freeze_symbol_table   (GScanner       *scanner);
1979 void            g_scanner_thaw_symbol_table     (GScanner       *scanner);
1980 void            g_scanner_unexp_token           (GScanner       *scanner,
1981                                                  GTokenType     expected_token,
1982                                                  const gchar    *identifier_spec,
1983                                                  const gchar    *symbol_spec,
1984                                                  const gchar    *symbol_name,
1985                                                  const gchar    *message,
1986                                                  gint            is_error);
1987 void            g_scanner_error                 (GScanner       *scanner,
1988                                                  const gchar    *format,
1989                                                  ...) G_GNUC_PRINTF (2,3);
1990 void            g_scanner_warn                  (GScanner       *scanner,
1991                                                  const gchar    *format,
1992                                                  ...) G_GNUC_PRINTF (2,3);
1993 gint            g_scanner_stat_mode             (const gchar    *filename);
1994 /* keep downward source compatibility */
1995 #define         g_scanner_add_symbol( scanner, symbol, value )  G_STMT_START { \
1996   g_scanner_scope_add_symbol ((scanner), 0, (symbol), (value)); \
1997 } G_STMT_END
1998 #define         g_scanner_remove_symbol( scanner, symbol )      G_STMT_START { \
1999   g_scanner_scope_remove_symbol ((scanner), 0, (symbol)); \
2000 } G_STMT_END
2001 #define         g_scanner_foreach_symbol( scanner, func, data ) G_STMT_START { \
2002   g_scanner_scope_foreach_symbol ((scanner), 0, (func), (data)); \
2003 } G_STMT_END
2004
2005
2006 /* Completion */
2007
2008 struct _GCompletion
2009 {
2010   GList* items;
2011   GCompletionFunc func;
2012
2013   gchar* prefix;
2014   GList* cache;
2015 };
2016
2017 GCompletion* g_completion_new          (GCompletionFunc func);
2018 void         g_completion_add_items    (GCompletion*    cmp,
2019                                         GList*          items);
2020 void         g_completion_remove_items (GCompletion*    cmp,
2021                                         GList*          items);
2022 void         g_completion_clear_items  (GCompletion*    cmp);
2023 GList*       g_completion_complete     (GCompletion*    cmp,
2024                                         gchar*          prefix,
2025                                         gchar**         new_prefix);
2026 void         g_completion_free         (GCompletion*    cmp);
2027
2028
2029 /* GRelation: Indexed Relations.  Imagine a really simple table in a
2030  * database.  Relations are not ordered.  This data type is meant for
2031  * maintaining a N-way mapping.
2032  *
2033  * g_relation_new() creates a relation with FIELDS fields
2034  *
2035  * g_relation_destroy() frees all resources
2036  * g_tuples_destroy() frees the result of g_relation_select()
2037  *
2038  * g_relation_index() indexes relation FIELD with the provided
2039  *   equality and hash functions.  this must be done before any
2040  *   calls to insert are made.
2041  *
2042  * g_relation_insert() inserts a new tuple.  you are expected to
2043  *   provide the right number of fields.
2044  *
2045  * g_relation_delete() deletes all relations with KEY in FIELD
2046  * g_relation_select() returns ...
2047  * g_relation_count() counts ...
2048  */
2049
2050 GRelation* g_relation_new     (gint         fields);
2051 void       g_relation_destroy (GRelation   *relation);
2052 void       g_relation_index   (GRelation   *relation,
2053                                gint         field,
2054                                GHashFunc    hash_func,
2055                                GCompareFunc key_compare_func);
2056 void       g_relation_insert  (GRelation   *relation,
2057                                ...);
2058 gint       g_relation_delete  (GRelation   *relation,
2059                                gconstpointer  key,
2060                                gint         field);
2061 GTuples*   g_relation_select  (GRelation   *relation,
2062                                gconstpointer  key,
2063                                gint         field);
2064 gint       g_relation_count   (GRelation   *relation,
2065                                gconstpointer  key,
2066                                gint         field);
2067 gboolean   g_relation_exists  (GRelation   *relation,
2068                                ...);
2069 void       g_relation_print   (GRelation   *relation);
2070
2071 void       g_tuples_destroy   (GTuples     *tuples);
2072 gpointer   g_tuples_index     (GTuples     *tuples,
2073                                gint         index,
2074                                gint         field);
2075
2076
2077 /* Prime numbers.
2078  */
2079
2080 /* This function returns prime numbers spaced by approximately 1.5-2.0
2081  * and is for use in resizing data structures which prefer
2082  * prime-valued sizes.  The closest spaced prime function returns the
2083  * next largest prime, or the highest it knows about which is about
2084  * MAXINT/4.
2085  */
2086 guint      g_spaced_primes_closest (guint num);
2087
2088
2089 /* IO Channels.
2090  * These are used for plug-in communication in the GIMP, for instance.
2091  * On Unix, it's simply an encapsulated file descriptor (a pipe).
2092  * On Windows, it's a handle to an anonymouos pipe, *and* (in the case
2093  * of the writable end) a thread id to post a message to when you have written
2094  * stuff.
2095  */
2096 struct _GIOChannel
2097 {
2098   gint fd;                      /* file handle (pseudo such in Win32) */
2099 #ifdef NATIVE_WIN32
2100   guint peer;                   /* thread to post message to */
2101   guint peer_fd;                /* read handle (in the other process) */
2102   guint offset;                 /* counter of accumulated bytes, to
2103                                  * be included in the message posted
2104                                  * so we keep in sync.
2105                                  */
2106   guint need_wakeups;           /* in output channels whether the reader
2107                                  * needs wakeups
2108                                  */
2109 #endif
2110 };
2111
2112 GIOChannel *g_iochannel_new            (gint        fd);
2113 void        g_iochannel_free           (GIOChannel *channel);
2114 void        g_iochannel_close_and_free (GIOChannel *channel);
2115 void        g_iochannel_wakeup_peer    (GIOChannel *channel);
2116 #ifndef NATIVE_WIN32
2117 #  define   g_iochannel_wakeup_peer(channel) G_STMT_START { } G_STMT_END
2118 #endif
2119
2120
2121 /* Windows emulation stubs for common unix functions
2122  */
2123 #ifdef NATIVE_WIN32
2124
2125 #define MAXPATHLEN 1024
2126
2127 #ifdef _MSC_VER
2128 typedef int pid_t;
2129
2130 /* These POSIXish functions are available in the Microsoft C library
2131  * prefixed with underscore (which of course technically speaking is
2132  * the Right Thing, as they are non-ANSI. Not that being non-ANSI
2133  * prevents Microsoft from practically requiring you to include
2134  * <windows.h> every now and then...).
2135  *
2136  * You still need to include the appropriate headers to get the
2137  * prototypes, <io.h> or <direct.h>.
2138  *
2139  * For some functions, we provide emulators in glib, which are prefixed
2140  * with gwin_.
2141  */
2142 #define getcwd                  _getcwd
2143 #define getpid                  _getpid
2144 #define access                  _access
2145 #define open                    _open
2146 #define read                    _read
2147 #define write                   _write
2148 #define lseek                   _lseek
2149 #define close                   _close
2150 #define pipe(phandles)          _pipe (phandles, 4096, _O_BINARY)
2151 #define popen                   _popen
2152 #define pclose                  _pclose
2153 #define fdopen                  _fdopen
2154 #define ftruncate(fd, size)     gwin_ftruncate (fd, size)
2155 #define opendir                 gwin_opendir
2156 #define readdir                 gwin_readdir
2157 #define rewinddir               gwin_rewinddir
2158 #define closedir                gwin_closedir
2159
2160 #define NAME_MAX 255
2161
2162 struct DIR
2163 {
2164   gchar    *dir_name;
2165
2166   gboolean  just_opened;
2167   guint     find_file_handle;
2168   gpointer  find_file_data;
2169 };
2170 typedef struct DIR DIR;
2171 struct dirent
2172 {
2173   gchar  d_name[NAME_MAX + 1];
2174 };
2175
2176 /* emulation functions */
2177 extern int      gwin_ftruncate  (gint            f,
2178                                  guint           size);
2179 DIR*            gwin_opendir    (const gchar    *dirname);
2180 struct dirent*  gwin_readdir    (DIR            *dir);
2181 void            gwin_rewinddir  (DIR            *dir);
2182 gint            gwin_closedir   (DIR            *dir);
2183
2184 #endif /* _MSC_VER */
2185
2186 #endif /* NATIVE_WIN32 */
2187
2188
2189 #ifdef __cplusplus
2190 }
2191 #endif /* __cplusplus */
2192
2193
2194 #endif /* __G_LIB_H__ */