summaryrefslogtreecommitdiff
path: root/tools/gator/daemon/mxml/mxml-private.c
diff options
context:
space:
mode:
Diffstat (limited to 'tools/gator/daemon/mxml/mxml-private.c')
-rw-r--r--tools/gator/daemon/mxml/mxml-private.c331
1 files changed, 0 insertions, 331 deletions
diff --git a/tools/gator/daemon/mxml/mxml-private.c b/tools/gator/daemon/mxml/mxml-private.c
deleted file mode 100644
index 72f3e2320c7..00000000000
--- a/tools/gator/daemon/mxml/mxml-private.c
+++ /dev/null
@@ -1,331 +0,0 @@
-/*
- * "$Id: mxml-private.c 422 2010-11-07 22:55:11Z mike $"
- *
- * Private functions for Mini-XML, a small XML-like file parsing library.
- *
- * Copyright 2003-2010 by Michael R Sweet.
- *
- * These coded instructions, statements, and computer programs are the
- * property of Michael R Sweet and are protected by Federal copyright
- * law. Distribution and use rights are outlined in the file "COPYING"
- * which should have been included with this file. If this file is
- * missing or damaged, see the license at:
- *
- * http://www.minixml.org/
- *
- * Contents:
- *
- * mxml_error() - Display an error message.
- * mxml_integer_cb() - Default callback for integer values.
- * mxml_opaque_cb() - Default callback for opaque values.
- * mxml_real_cb() - Default callback for real number values.
- * _mxml_global() - Get global data.
- */
-
-/*
- * Include necessary headers...
- */
-
-#include "mxml-private.h"
-
-
-/*
- * Some crazy people think that unloading a shared object is a good or safe
- * thing to do. Unfortunately, most objects are simply *not* safe to unload
- * and bad things *will* happen.
- *
- * The following mess of conditional code allows us to provide a destructor
- * function in Mini-XML for our thread-global storage so that it can possibly
- * be unloaded safely, although since there is no standard way to do so I
- * can't even provide any guarantees that you can do it safely on all platforms.
- *
- * This code currently supports AIX, HP-UX, Linux, Mac OS X, Solaris, and
- * Windows. It might work on the BSDs and IRIX, but I haven't tested that.
- */
-
-#if defined(__sun) || defined(_AIX)
-# pragma fini(_mxml_fini)
-# define _MXML_FINI _mxml_fini
-#elif defined(__hpux)
-# pragma FINI _mxml_fini
-# define _MXML_FINI _mxml_fini
-#elif defined(__GNUC__) /* Linux and Mac OS X */
-# define _MXML_FINI __attribute((destructor)) _mxml_fini
-#else
-# define _MXML_FINI _fini
-#endif /* __sun */
-
-
-/*
- * 'mxml_error()' - Display an error message.
- */
-
-void
-mxml_error(const char *format, /* I - Printf-style format string */
- ...) /* I - Additional arguments as needed */
-{
- va_list ap; /* Pointer to arguments */
- char s[1024]; /* Message string */
- _mxml_global_t *global = _mxml_global();
- /* Global data */
-
-
- /*
- * Range check input...
- */
-
- if (!format)
- return;
-
- /*
- * Format the error message string...
- */
-
- va_start(ap, format);
-
- vsnprintf(s, sizeof(s), format, ap);
-
- va_end(ap);
-
- /*
- * And then display the error message...
- */
-
- if (global->error_cb)
- (*global->error_cb)(s);
- else
- fprintf(stderr, "mxml: %s\n", s);
-}
-
-
-/*
- * 'mxml_ignore_cb()' - Default callback for ignored values.
- */
-
-mxml_type_t /* O - Node type */
-mxml_ignore_cb(mxml_node_t *node) /* I - Current node */
-{
- (void)node;
-
- return (MXML_IGNORE);
-}
-
-
-/*
- * 'mxml_integer_cb()' - Default callback for integer values.
- */
-
-mxml_type_t /* O - Node type */
-mxml_integer_cb(mxml_node_t *node) /* I - Current node */
-{
- (void)node;
-
- return (MXML_INTEGER);
-}
-
-
-/*
- * 'mxml_opaque_cb()' - Default callback for opaque values.
- */
-
-mxml_type_t /* O - Node type */
-mxml_opaque_cb(mxml_node_t *node) /* I - Current node */
-{
- (void)node;
-
- return (MXML_OPAQUE);
-}
-
-
-/*
- * 'mxml_real_cb()' - Default callback for real number values.
- */
-
-mxml_type_t /* O - Node type */
-mxml_real_cb(mxml_node_t *node) /* I - Current node */
-{
- (void)node;
-
- return (MXML_REAL);
-}
-
-
-#ifdef HAVE_PTHREAD_H /**** POSIX threading ****/
-# include <pthread.h>
-
-static pthread_key_t _mxml_key = -1; /* Thread local storage key */
-static pthread_once_t _mxml_key_once = PTHREAD_ONCE_INIT;
- /* One-time initialization object */
-static void _mxml_init(void);
-static void _mxml_destructor(void *g);
-
-
-/*
- * '_mxml_destructor()' - Free memory used for globals...
- */
-
-static void
-_mxml_destructor(void *g) /* I - Global data */
-{
- free(g);
-}
-
-
-/*
- * '_mxml_fini()' - Clean up when unloaded.
- */
-
-static void
-_MXML_FINI(void)
-{
- _mxml_global_t *global; /* Global data */
-
-
- if (_mxml_key != -1)
- {
- if ((global = (_mxml_global_t *)pthread_getspecific(_mxml_key)) != NULL)
- _mxml_destructor(global);
-
- pthread_key_delete(_mxml_key);
- _mxml_key = -1;
- }
-}
-
-
-/*
- * '_mxml_global()' - Get global data.
- */
-
-_mxml_global_t * /* O - Global data */
-_mxml_global(void)
-{
- _mxml_global_t *global; /* Global data */
-
-
- pthread_once(&_mxml_key_once, _mxml_init);
-
- if ((global = (_mxml_global_t *)pthread_getspecific(_mxml_key)) == NULL)
- {
- global = (_mxml_global_t *)calloc(1, sizeof(_mxml_global_t));
- pthread_setspecific(_mxml_key, global);
-
- global->num_entity_cbs = 1;
- global->entity_cbs[0] = _mxml_entity_cb;
- global->wrap = 72;
- }
-
- return (global);
-}
-
-
-/*
- * '_mxml_init()' - Initialize global data...
- */
-
-static void
-_mxml_init(void)
-{
- pthread_key_create(&_mxml_key, _mxml_destructor);
-}
-
-
-#elif defined(WIN32) && defined(MXML1_EXPORTS) /**** WIN32 threading ****/
-# include <windows.h>
-
-static DWORD _mxml_tls_index; /* Index for global storage */
-
-
-/*
- * 'DllMain()' - Main entry for library.
- */
-
-BOOL WINAPI /* O - Success/failure */
-DllMain(HINSTANCE hinst, /* I - DLL module handle */
- DWORD reason, /* I - Reason */
- LPVOID reserved) /* I - Unused */
-{
- _mxml_global_t *global; /* Global data */
-
-
- (void)hinst;
- (void)reserved;
-
- switch (reason)
- {
- case DLL_PROCESS_ATTACH : /* Called on library initialization */
- if ((_mxml_tls_index = TlsAlloc()) == TLS_OUT_OF_INDEXES)
- return (FALSE);
- break;
-
- case DLL_THREAD_DETACH : /* Called when a thread terminates */
- if ((global = (_mxml_global_t *)TlsGetValue(_mxml_tls_index)) != NULL)
- free(global);
- break;
-
- case DLL_PROCESS_DETACH : /* Called when library is unloaded */
- if ((global = (_mxml_global_t *)TlsGetValue(_mxml_tls_index)) != NULL)
- free(global);
-
- TlsFree(_mxml_tls_index);
- break;
-
- default:
- break;
- }
-
- return (TRUE);
-}
-
-
-/*
- * '_mxml_global()' - Get global data.
- */
-
-_mxml_global_t * /* O - Global data */
-_mxml_global(void)
-{
- _mxml_global_t *global; /* Global data */
-
-
- if ((global = (_mxml_global_t *)TlsGetValue(_mxml_tls_index)) == NULL)
- {
- global = (_mxml_global_t *)calloc(1, sizeof(_mxml_global_t));
-
- global->num_entity_cbs = 1;
- global->entity_cbs[0] = _mxml_entity_cb;
- global->wrap = 72;
-
- TlsSetValue(_mxml_tls_index, (LPVOID)global);
- }
-
- return (global);
-}
-
-
-#else /**** No threading ****/
-/*
- * '_mxml_global()' - Get global data.
- */
-
-_mxml_global_t * /* O - Global data */
-_mxml_global(void)
-{
- static _mxml_global_t global = /* Global data */
- {
- NULL, /* error_cb */
- 1, /* num_entity_cbs */
- { _mxml_entity_cb }, /* entity_cbs */
- 72, /* wrap */
- NULL, /* custom_load_cb */
- NULL /* custom_save_cb */
- };
-
-
- return (&global);
-}
-#endif /* HAVE_PTHREAD_H */
-
-
-/*
- * End of "$Id: mxml-private.c 422 2010-11-07 22:55:11Z mike $".
- */
generated by cgit v1.2.3 (git 2.25.1) at 2024-05-27 17:48:09 +0000