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