Pileus Git - ~andy/gtk/blob - glib/garray.c

   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 Free
  16  * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  17  */
  18 #include <string.h>
  19 #include "glib.h"
  20
  21
  22 #define MIN_ARRAY_SIZE  16
  23
  24
  25 typedef struct _GRealArray  GRealArray;
  26
  27 struct _GRealArray
  28 {
  29   guint8 *data;
  30   guint   len;
  31   guint   alloc;
  32   guint   zero_terminated;
  33 };
  34
  35
  36 static gint g_nearest_pow        (gint        num);
  37 static void g_array_maybe_expand (GRealArray *array,
  38                                   gint        len);
  39
  40
  41 static GMemChunk *array_mem_chunk = NULL;
  42
  43
  44 GArray*
  45 g_array_new (zero_terminated)
  46 {
  47   GRealArray *array;
  48
  49   if (!array_mem_chunk)
  50     array_mem_chunk = g_mem_chunk_new ("array mem chunk",
  51                                        sizeof (GRealArray),
  52                                        1024, G_ALLOC_AND_FREE);
  53
  54   array = g_chunk_new (GRealArray, array_mem_chunk);
  55
  56   array->data = NULL;
  57   array->len = 0;
  58   array->alloc = 0;
  59   array->zero_terminated = (zero_terminated ? 1 : 0);
  60
  61   return (GArray*) array;
  62 }
  63
  64 void
  65 g_array_free (GArray *array,
  66               gint    free_segment)
  67 {
  68   if (free_segment)
  69     g_free (array->data);
  70
  71   g_mem_chunk_free (array_mem_chunk, array);
  72 }
  73
  74 GArray*
  75 g_rarray_append (GArray   *array,
  76                  gpointer  data,
  77                  gint      size)
  78 {
  79   g_array_maybe_expand ((GRealArray*) array, size);
  80
  81   memcpy (array->data + array->len, data, size);
  82
  83   array->len += size;
  84
  85   return array;
  86 }
  87
  88 GArray*
  89 g_rarray_prepend (GArray   *array,
  90                   gpointer  data,
  91                   gint      size)
  92 {
  93   g_array_maybe_expand ((GRealArray*) array, size);
  94
  95   memmove (array->data + size, array->data, array->len);
  96   memcpy (array->data, data, size);
  97
  98   array->len += size;
  99
 100   return array;
 101 }
 102
 103 GArray*
 104 g_rarray_truncate (GArray *array,
 105                    gint    length,
 106                    gint    size)
 107 {
 108   if (array->data)
 109     memset (array->data + length * size, 0, size);
 110   array->len = length;
 111   return array;
 112 }
 113
 114
 115 static gint
 116 g_nearest_pow (gint num)
 117 {
 118   gint n = 1;
 119
 120   while (n < num)
 121     n <<= 1;
 122
 123   return n;
 124 }
 125
 126 static void
 127 g_array_maybe_expand (GRealArray *array,
 128                       gint        len)
 129 {
 130   guint old_alloc;
 131
 132   if ((array->len + len) > array->alloc)
 133     {
 134       old_alloc = array->alloc;
 135
 136       array->alloc = g_nearest_pow (array->len + array->zero_terminated + len);
 137       array->alloc = MAX (array->alloc, MIN_ARRAY_SIZE);
 138       array->data = g_realloc (array->data, array->alloc);
 139
 140       memset (array->data + old_alloc, 0, array->alloc - old_alloc);
 141     }
 142 }