git.sur5r.net Git - bacula/bacula/blob - bacula/src/lib/dlist.c

   1 /*
   2  *  Bacula doubly linked list routines.
   3  *
   4  *    dlist is a doubly linked list with the links being in the
   5  *       list data item.
   6  *
   7  *   Kern Sibbald, July MMIII
   8  *
   9  *   Version $Id$
  10  *
  11  */
  12 /*
  13    Copyright (C) 2000-2003 Kern Sibbald and John Walker
  14
  15    This program is free software; you can redistribute it and/or
  16    modify it under the terms of the GNU General Public License as
  17    published by the Free Software Foundation; either version 2 of
  18    the License, or (at your option) any later version.
  19
  20    This program is distributed in the hope that it will be useful,
  21    but WITHOUT ANY WARRANTY; without even the implied warranty of
  22    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  23    General Public License for more details.
  24
  25    You should have received a copy of the GNU General Public
  26    License along with this program; if not, write to the Free
  27    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  28    MA 02111-1307, USA.
  29
  30  */
  31
  32 #include "bacula.h"
  33
  34 /* ===================================================================
  35  *    dlist
  36  */
  37 /*
  38  * Append an item to the list
  39  */
  40 void dlist::append(void *item)
  41 {
  42    ((dlink *)((char *)item+loffset))->next = NULL;
  43    ((dlink *)((char *)item+loffset))->prev = tail;
  44    if (tail) {
  45       ((dlink *)((char *)tail+loffset))->next = item;
  46    }
  47    tail = item;
  48    if (head == NULL) {                /* if empty list, */
  49       head = item;                    /* item is head as well */
  50    }
  51 }
  52
  53 /*
  54  * Append an item to the list
  55  */
  56 void dlist::prepend(void *item)
  57 {
  58    ((dlink *)((char *)item+loffset))->next = head;
  59    ((dlink *)((char *)item+loffset))->prev = NULL;
  60    if (head) {
  61       ((dlink *)((char *)head+loffset))->prev = item;
  62    }
  63    head = item;
  64    if (tail == NULL) {                /* if empty list, */
  65       tail = item;                    /* item is tail too */
  66    }
  67 }
  68
  69 void dlist::remove(void *item)
  70 {
  71    void *xitem;
  72    dlink *ilink = (dlink *)((char *)item+loffset);   /* item's link */
  73    if (item == head) {
  74       head = ilink->next;
  75       ((dlink *)((char *)head+loffset))->prev = NULL;
  76    } else if (item == tail) {
  77       tail = ilink->prev;
  78       ((dlink *)((char *)tail+loffset))->next = NULL;
  79    } else {
  80       xitem = ilink->next;
  81       ((dlink *)((char *)xitem+loffset))->prev = ilink->prev;
  82       xitem = ilink->prev;
  83       ((dlink *)((char *)xitem+loffset))->next = ilink->next;
  84    }
  85    free(item);
  86 }
  87
  88 void * dlist::next(void *item)
  89 {
  90    if (item == NULL) {
  91       return head;
  92    }
  93    return ((dlink *)((char *)item+loffset))->next;
  94 }
  95
  96 /* Destroy the list and its contents */
  97 void dlist::destroy()
  98 {
  99    for (void *n=head; n; ) {
 100       void *ni = ((dlink *)((char *)n+loffset))->next;
 101       free(n);
 102       n = ni;
 103    }
 104 }
 105
 106
 107
 108 #ifdef TEST_PROGRAM
 109
 110 struct MYJCR {
 111    char *buf;
 112    dlist link;
 113 };
 114
 115 int main()
 116 {
 117    char buf[30];
 118    dlist *jcr_chain;
 119    MYJCR *save_jcr = NULL;
 120
 121    jcr_chain = (dlist *)malloc(sizeof(dlist));
 122    jcr_chain->init((int)&MYJCR::link);
 123
 124    printf("Prepend 20 items 0-19\n");
 125    for (int i=0; i<20; i++) {
 126       MYJCR *jcr;
 127       sprintf(buf, "This is dlist item %d", i);
 128       jcr = (MYJCR *)malloc(sizeof(MYJCR));
 129       jcr->buf = bstrdup(buf);
 130       jcr_chain->prepend(jcr);
 131       if (i == 10) {
 132          save_jcr = jcr;
 133       }
 134    }
 135
 136    printf("Remove 10th item\n");
 137    free(save_jcr->buf);
 138    jcr_chain->remove(save_jcr);
 139
 140    printf("Print remaining list.\n");
 141    for (MYJCR *jcr=NULL; (jcr=(MYJCR *)jcr_chain->next(jcr)); ) {
 142       printf("Dlist item = %s\n", jcr->buf);
 143       free(jcr->buf);
 144    }
 145    jcr_chain->destroy();
 146    free(jcr_chain);
 147
 148    sm_dump(False);
 149
 150 }
 151 #endif