about summary refs log tree commit diff
path: root/custom_mutators/grammatron/utarray.h
diff options
context:
space:
mode:
Diffstat (limited to 'custom_mutators/grammatron/utarray.h')
-rw-r--r--custom_mutators/grammatron/utarray.h392
1 files changed, 0 insertions, 392 deletions
diff --git a/custom_mutators/grammatron/utarray.h b/custom_mutators/grammatron/utarray.h
deleted file mode 100644
index 5c0d272b..00000000
--- a/custom_mutators/grammatron/utarray.h
+++ /dev/null
@@ -1,392 +0,0 @@
-/*
-Copyright (c) 2008-2018, Troy D. Hanson   http://troydhanson.github.com/uthash/
-All rights reserved.
-
-Redistribution and use in source and binary forms, with or without
-modification, are permitted provided that the following conditions are met:
-
-    * Redistributions of source code must retain the above copyright
-      notice, this list of conditions and the following disclaimer.
-
-THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
-IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
-TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
-PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
-OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
-EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
-PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
-PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
-LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
-NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
-SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-*/
-
-/* a dynamic array implementation using macros
- */
-#ifndef UTARRAY_H
-#define UTARRAY_H
-
-#define UTARRAY_VERSION 2.1.0
-
-#include <stddef.h>                                               /* size_t */
-#include <string.h>                                          /* memset, etc */
-#include <stdlib.h>                                                 /* exit */
-
-#ifdef __GNUC__
-  #define UTARRAY_UNUSED __attribute__((__unused__))
-#else
-  #define UTARRAY_UNUSED
-#endif
-
-#ifdef oom
-  #error \
-      "The name of macro 'oom' has been changed to 'utarray_oom'. Please update your code."
-  #define utarray_oom() oom()
-#endif
-
-#ifndef utarray_oom
-  #define utarray_oom() exit(-1)
-#endif
-
-typedef void(ctor_f)(void *dst, const void *src);
-typedef void(dtor_f)(void *elt);
-typedef void(init_f)(void *elt);
-typedef struct {
-
-  size_t  sz;
-  init_f *init;
-  ctor_f *copy;
-  dtor_f *dtor;
-
-} UT_icd;
-
-typedef struct {
-
-  unsigned i, n;           /* i: index of next available slot, n: num slots */
-  UT_icd   icd;               /* initializer, copy and destructor functions */
-  char *   d;                                     /* n slots of size icd->sz*/
-
-} UT_array;
-
-#define utarray_init(a, _icd)       \
-  do {                              \
-                                    \
-    memset(a, 0, sizeof(UT_array)); \
-    (a)->icd = *(_icd);             \
-                                    \
-  } while (0)
-
-#define utarray_done(a)                            \
-  do {                                             \
-                                                   \
-    if ((a)->n) {                                  \
-                                                   \
-      if ((a)->icd.dtor) {                         \
-                                                   \
-        unsigned _ut_i;                            \
-        for (_ut_i = 0; _ut_i < (a)->i; _ut_i++) { \
-                                                   \
-          (a)->icd.dtor(utarray_eltptr(a, _ut_i)); \
-                                                   \
-        }                                          \
-                                                   \
-      }                                            \
-      free((a)->d);                                \
-                                                   \
-    }                                              \
-    (a)->n = 0;                                    \
-                                                   \
-  } while (0)
-
-#define utarray_new(a, _icd)                    \
-  do {                                          \
-                                                \
-    (a) = (UT_array *)malloc(sizeof(UT_array)); \
-    if ((a) == NULL) { utarray_oom(); }         \
-    utarray_init(a, _icd);                      \
-                                                \
-  } while (0)
-
-#define utarray_free(a) \
-  do {                  \
-                        \
-    utarray_done(a);    \
-    free(a);            \
-                        \
-  } while (0)
-
-#define utarray_reserve(a, by)                                     \
-  do {                                                             \
-                                                                   \
-    if (((a)->i + (by)) > (a)->n) {                                \
-                                                                   \
-      char *utarray_tmp;                                           \
-      while (((a)->i + (by)) > (a)->n) {                           \
-                                                                   \
-        (a)->n = ((a)->n ? (2 * (a)->n) : 8);                      \
-                                                                   \
-      }                                                            \
-      utarray_tmp = (char *)realloc((a)->d, (a)->n * (a)->icd.sz); \
-      if (utarray_tmp == NULL) { utarray_oom(); }                  \
-      (a)->d = utarray_tmp;                                        \
-                                                                   \
-    }                                                              \
-                                                                   \
-  } while (0)
-
-#define utarray_push_back(a, p)                             \
-  do {                                                      \
-                                                            \
-    utarray_reserve(a, 1);                                  \
-    if ((a)->icd.copy) {                                    \
-                                                            \
-      (a)->icd.copy(_utarray_eltptr(a, (a)->i++), p);       \
-                                                            \
-    } else {                                                \
-                                                            \
-      memcpy(_utarray_eltptr(a, (a)->i++), p, (a)->icd.sz); \
-                                                            \
-    };                                                      \
-                                                            \
-  } while (0)
-
-#define utarray_pop_back(a)                          \
-  do {                                               \
-                                                     \
-    if ((a)->icd.dtor) {                             \
-                                                     \
-      (a)->icd.dtor(_utarray_eltptr(a, --((a)->i))); \
-                                                     \
-    } else {                                         \
-                                                     \
-      (a)->i--;                                      \
-                                                     \
-    }                                                \
-                                                     \
-  } while (0)
-
-#define utarray_extend_back(a)                            \
-  do {                                                    \
-                                                          \
-    utarray_reserve(a, 1);                                \
-    if ((a)->icd.init) {                                  \
-                                                          \
-      (a)->icd.init(_utarray_eltptr(a, (a)->i));          \
-                                                          \
-    } else {                                              \
-                                                          \
-      memset(_utarray_eltptr(a, (a)->i), 0, (a)->icd.sz); \
-                                                          \
-    }                                                     \
-    (a)->i++;                                             \
-                                                          \
-  } while (0)
-
-#define utarray_len(a) ((a)->i)
-
-#define utarray_eltptr(a, j) (((j) < (a)->i) ? _utarray_eltptr(a, j) : NULL)
-#define _utarray_eltptr(a, j) ((a)->d + ((a)->icd.sz * (j)))
-
-#define utarray_insert(a, p, j)                                   \
-  do {                                                            \
-                                                                  \
-    if ((j) > (a)->i) utarray_resize(a, j);                       \
-    utarray_reserve(a, 1);                                        \
-    if ((j) < (a)->i) {                                           \
-                                                                  \
-      memmove(_utarray_eltptr(a, (j) + 1), _utarray_eltptr(a, j), \
-              ((a)->i - (j)) * ((a)->icd.sz));                    \
-                                                                  \
-    }                                                             \
-    if ((a)->icd.copy) {                                          \
-                                                                  \
-      (a)->icd.copy(_utarray_eltptr(a, j), p);                    \
-                                                                  \
-    } else {                                                      \
-                                                                  \
-      memcpy(_utarray_eltptr(a, j), p, (a)->icd.sz);              \
-                                                                  \
-    };                                                            \
-    (a)->i++;                                                     \
-                                                                  \
-  } while (0)
-
-#define utarray_inserta(a, w, j)                                               \
-  do {                                                                         \
-                                                                               \
-    if (utarray_len(w) == 0) break;                                            \
-    if ((j) > (a)->i) utarray_resize(a, j);                                    \
-    utarray_reserve(a, utarray_len(w));                                        \
-    if ((j) < (a)->i) {                                                        \
-                                                                               \
-      memmove(_utarray_eltptr(a, (j) + utarray_len(w)), _utarray_eltptr(a, j), \
-              ((a)->i - (j)) * ((a)->icd.sz));                                 \
-                                                                               \
-    }                                                                          \
-    if ((a)->icd.copy) {                                                       \
-                                                                               \
-      unsigned _ut_i;                                                          \
-      for (_ut_i = 0; _ut_i < (w)->i; _ut_i++) {                               \
-                                                                               \
-        (a)->icd.copy(_utarray_eltptr(a, (j) + _ut_i),                         \
-                      _utarray_eltptr(w, _ut_i));                              \
-                                                                               \
-      }                                                                        \
-                                                                               \
-    } else {                                                                   \
-                                                                               \
-      memcpy(_utarray_eltptr(a, j), _utarray_eltptr(w, 0),                     \
-             utarray_len(w) * ((a)->icd.sz));                                  \
-                                                                               \
-    }                                                                          \
-    (a)->i += utarray_len(w);                                                  \
-                                                                               \
-  } while (0)
-
-#define utarray_resize(dst, num)                                   \
-  do {                                                             \
-                                                                   \
-    unsigned _ut_i;                                                \
-    if ((dst)->i > (unsigned)(num)) {                              \
-                                                                   \
-      if ((dst)->icd.dtor) {                                       \
-                                                                   \
-        for (_ut_i = (num); _ut_i < (dst)->i; ++_ut_i) {           \
-                                                                   \
-          (dst)->icd.dtor(_utarray_eltptr(dst, _ut_i));            \
-                                                                   \
-        }                                                          \
-                                                                   \
-      }                                                            \
-                                                                   \
-    } else if ((dst)->i < (unsigned)(num)) {                       \
-                                                                   \
-      utarray_reserve(dst, (num) - (dst)->i);                      \
-      if ((dst)->icd.init) {                                       \
-                                                                   \
-        for (_ut_i = (dst)->i; _ut_i < (unsigned)(num); ++_ut_i) { \
-                                                                   \
-          (dst)->icd.init(_utarray_eltptr(dst, _ut_i));            \
-                                                                   \
-        }                                                          \
-                                                                   \
-      } else {                                                     \
-                                                                   \
-        memset(_utarray_eltptr(dst, (dst)->i), 0,                  \
-               (dst)->icd.sz *((num) - (dst)->i));                 \
-                                                                   \
-      }                                                            \
-                                                                   \
-    }                                                              \
-    (dst)->i = (num);                                              \
-                                                                   \
-  } while (0)
-
-#define utarray_concat(dst, src)                 \
-  do {                                           \
-                                                 \
-    utarray_inserta(dst, src, utarray_len(dst)); \
-                                                 \
-  } while (0)
-
-#define utarray_erase(a, pos, len)                                        \
-  do {                                                                    \
-                                                                          \
-    if ((a)->icd.dtor) {                                                  \
-                                                                          \
-      unsigned _ut_i;                                                     \
-      for (_ut_i = 0; _ut_i < (len); _ut_i++) {                           \
-                                                                          \
-        (a)->icd.dtor(utarray_eltptr(a, (pos) + _ut_i));                  \
-                                                                          \
-      }                                                                   \
-                                                                          \
-    }                                                                     \
-    if ((a)->i > ((pos) + (len))) {                                       \
-                                                                          \
-      memmove(_utarray_eltptr(a, pos), _utarray_eltptr(a, (pos) + (len)), \
-              ((a)->i - ((pos) + (len))) * (a)->icd.sz);                  \
-                                                                          \
-    }                                                                     \
-    (a)->i -= (len);                                                      \
-                                                                          \
-  } while (0)
-
-#define utarray_renew(a, u) \
-  do {                      \
-                            \
-    if (a)                  \
-      utarray_clear(a);     \
-    else                    \
-      utarray_new(a, u);    \
-                            \
-  } while (0)
-
-#define utarray_clear(a)                            \
-  do {                                              \
-                                                    \
-    if ((a)->i > 0) {                               \
-                                                    \
-      if ((a)->icd.dtor) {                          \
-                                                    \
-        unsigned _ut_i;                             \
-        for (_ut_i = 0; _ut_i < (a)->i; _ut_i++) {  \
-                                                    \
-          (a)->icd.dtor(_utarray_eltptr(a, _ut_i)); \
-                                                    \
-        }                                           \
-                                                    \
-      }                                             \
-      (a)->i = 0;                                   \
-                                                    \
-    }                                               \
-                                                    \
-  } while (0)
-
-#define utarray_sort(a, cmp)                 \
-  do {                                       \
-                                             \
-    qsort((a)->d, (a)->i, (a)->icd.sz, cmp); \
-                                             \
-  } while (0)
-
-#define utarray_find(a, v, cmp) bsearch((v), (a)->d, (a)->i, (a)->icd.sz, cmp)
-
-#define utarray_front(a) (((a)->i) ? (_utarray_eltptr(a, 0)) : NULL)
-#define utarray_next(a, e)                                             \
-  (((e) == NULL) ? utarray_front(a)                                    \
-                 : (((a)->i != utarray_eltidx(a, e) + 1)               \
-                        ? _utarray_eltptr(a, utarray_eltidx(a, e) + 1) \
-                        : NULL))
-#define utarray_prev(a, e)                                             \
-  (((e) == NULL) ? utarray_back(a)                                     \
-                 : ((utarray_eltidx(a, e) != 0)                        \
-                        ? _utarray_eltptr(a, utarray_eltidx(a, e) - 1) \
-                        : NULL))
-#define utarray_back(a) (((a)->i) ? (_utarray_eltptr(a, (a)->i - 1)) : NULL)
-#define utarray_eltidx(a, e) (((char *)(e) - (a)->d) / (a)->icd.sz)
-
-/* last we pre-define a few icd for common utarrays of ints and strings */
-static void utarray_str_cpy(void *dst, const void *src) {
-
-  char **_src = (char **)src, **_dst = (char **)dst;
-  *_dst = (*_src == NULL) ? NULL : strdup(*_src);
-
-}
-
-static void utarray_str_dtor(void *elt) {
-
-  char **eltc = (char **)elt;
-  if (*eltc != NULL) free(*eltc);
-
-}
-
-static const UT_icd ut_str_icd UTARRAY_UNUSED = {
-
-    sizeof(char *), NULL, utarray_str_cpy, utarray_str_dtor};
-static const UT_icd ut_int_icd UTARRAY_UNUSED = {sizeof(int), NULL, NULL, NULL};
-static const UT_icd ut_ptr_icd UTARRAY_UNUSED = {sizeof(void *), NULL, NULL,
-                                                 NULL};
-
-#endif                                                         /* UTARRAY_H */
-