isl_list.c

   1 /*
   2  * Copyright 2008-2009 Katholieke Universiteit Leuven
   3  *
   4  * Use of this software is governed by the GNU LGPLv2.1 license
   5  *
   6  * Written by Sven Verdoolaege, K.U.Leuven, Departement
   7  * Computerwetenschappen, Celestijnenlaan 200A, B-3001 Leuven, Belgium
   8  */
   9
  10 #include "isl_list.h"
  11 #include "isl_set.h"
  12
  13 struct isl_basic_set_list *isl_basic_set_list_alloc(struct isl_ctx *ctx, int n)
  14 {
  15         struct isl_basic_set_list *list;
  16
  17         isl_assert(ctx, n >= 0, return NULL);
  18         list = isl_alloc(ctx, struct isl_basic_set_list,
  19                          sizeof(struct isl_basic_set_list) +
  20                          (n - 1) * sizeof(struct isl_basic_set *));
  21         if (!list)
  22                 return NULL;
  23
  24         list->ctx = ctx;
  25         isl_ctx_ref(ctx);
  26         list->ref = 1;
  27         list->size = n;
  28         list->n = 0;
  29         return list;
  30 }
  31
  32 struct isl_basic_set_list *isl_basic_set_list_add(
  33         struct isl_basic_set_list *list,
  34         struct isl_basic_set *bset)
  35 {
  36         if (!list || !bset)
  37                 goto error;
  38         isl_assert(list->ctx, list->n < list->size, goto error);
  39         list->p[list->n] = bset;
  40         list->n++;
  41         return list;
  42 error:
  43         isl_basic_set_free(bset);
  44         isl_basic_set_list_free(list);
  45         return NULL;
  46 }
  47
  48 void isl_basic_set_list_free(struct isl_basic_set_list *list)
  49 {
  50         int i;
  51
  52         if (!list)
  53                 return;
  54
  55         if (--list->ref > 0)
  56                 return;
  57
  58         isl_ctx_deref(list->ctx);
  59         for (i = 0; i < list->n; ++i)
  60                 isl_basic_set_free(list->p[i]);
  61         free(list);
  62 }