libdyn/dyn_insert.c

   1 /*
   2  * This file is part of libdyn.a, the C Dynamic Object library.  It
   3  * contains the source code for the function DynInsert().
   4  *
   5  * There are no restrictions on this code; however, if you make any
   6  * changes, I request that you document them so that I do not get
   7  * credit or blame for your modifications.
   8  *
   9  * Written by Barr3y Jaspan, Student Information Processing Board (SIPB)
  10  * and MIT-Project Athena, 1989.
  11  */
  12
  13 #include "dynP.h"
  14
  15 int
  16 DynInsert(DynObject obj,
  17           int idx,
  18           DynPtr els,
  19           int num)
  20
  21 {
  22      int ret;
  23
  24      if (idx < 0 || idx > obj->num_el) {
  25           if (obj->debug)
  26                fprintf(stderr, "dyn: insert: index %d is not in [0,%d]\n",
  27                        idx, obj->num_el);
  28           return DYN_BADINDEX;
  29      }
  30
  31      if (num < 1) {
  32           if (obj->debug)
  33                fprintf(stderr, "dyn: insert: cannot insert %d elements\n",
  34                        num);
  35           return DYN_BADVALUE;
  36      }
  37
  38      if (obj->debug)
  39           fprintf(stderr,"dyn: insert: Moving %d bytes from %p + %d to + %d\n",
  40                   (obj->num_el-idx)*obj->el_size, obj->array,
  41                   obj->el_size*idx, obj->el_size*(idx+num));
  42
  43      if ((ret = _DynResize(obj, obj->num_el + num)) != DYN_OK)
  44           return ret;
  45
  46      (void) memmove(obj->array + (idx + num), obj->array + idx,
  47                     (obj->num_el-idx)*obj->el_size);
  48
  49      if (obj->debug)
  50           fprintf(stderr, "dyn: insert: Copying %d bytes from %p to %p + %d\n",
  51                   obj->el_size*num, els, obj->array, obj->el_size*idx);
  52
  53      (void) memmove(obj->array + obj->el_size*idx, els, obj->el_size*num);
  54
  55      obj->num_el += num;
  56
  57      if (obj->debug)
  58           fprintf(stderr, "dyn: insert: done.\n");
  59
  60      return DYN_OK;
  61 }