Added initial config file support.

vector.c

@@ -0,0 +1,81 @@
+/*
+ * vector.c:
+ * simple vectors
+ *
+ * Copyright (c) 2001 Chris Lightfoot. All rights reserved.
+ *
+ */
+
+static const char rcsid[] = "$Id$";
+
+#ifdef HAVE_CONFIG_H
+/*include "configuration.h"*/
+#endif /* HAVE_CONFIG_H */
+
+#include <stdlib.h>
+#include <string.h>
+
+#include "vector.h"
+/*include "util.h"*/
+
+vector vector_new(void) {
+    vector v;
+    
+    v = xcalloc(1, sizeof *v);
+    if (!v) return NULL;
+
+    v->ary = xcalloc(16, sizeof *v->ary);
+    v->n = 16;
+    v->n_used = 0;
+    return v;
+}
+
+void vector_delete(vector v) {
+    xfree(v->ary);
+    xfree(v);
+}
+
+void vector_delete_free(vector v) {
+    item *i;
+    vector_iterate(v, i) {
+        xfree(i->v);
+    }
+    xfree(v->ary);
+    xfree(v);
+}
+
+void vector_push_back(vector v, const item t) {
+    if (v->n_used == v->n) vector_reallocate(v, v->n * 2);
+    v->ary[v->n_used++] = t;
+}
+
+void vector_pop_back(vector v) {
+    if (v->n_used > 0) {
+        --v->n_used;
+        if (v->n_used < v->n / 2) vector_reallocate(v, v->n / 2);
+    }
+}
+
+item vector_back(vector v) {
+    return v->ary[v->n_used - 1];
+}
+
+item *vector_remove(vector v, item *t) {
+    if (t >= v->ary + v->n_used) return NULL;
+    if (t < v->ary + v->n_used - 1)
+        memmove(t, t + 1, (v->n_used - (t - v->ary)) * sizeof(item));
+    memset(v->ary + v->n_used--, 0, sizeof(item));
+    if (v->n_used < v->n / 2 && v->n > 16) {
+        size_t i = t - v->ary;
+        vector_reallocate(v, v->n / 2);
+        t = v->ary + i;
+    }
+    return t;
+}
+
+void vector_reallocate(vector v, const size_t n) {
+    if (n < v->n_used || n <= 0) return;
+    v->ary = xrealloc(v->ary, n * sizeof(item));
+    memset(v->ary + v->n_used, 0, (v->n - v->n_used) * sizeof(item));
+    v->n = n;
+}