cde/programs/dtinfo/DtMmdb/dstr/slist.C

   1 /*
   2  * CDE - Common Desktop Environment
   3  *
   4  * Copyright (c) 1993-2012, The Open Group. All rights reserved.
   5  *
   6  * These libraries and programs are free software; you can
   7  * redistribute them and/or modify them under the terms of the GNU
   8  * Lesser General Public License as published by the Free Software
   9  * Foundation; either version 2 of the License, or (at your option)
  10  * any later version.
  11  *
  12  * These libraries and programs are distributed in the hope that
  13  * they will be useful, but WITHOUT ANY WARRANTY; without even the
  14  * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
  15  * PURPOSE. See the GNU Lesser General Public License for more
  16  * details.
  17  *
  18  * You should have received a copy of the GNU Lesser General Public
  19  * License along with these librararies and programs; if not, write
  20  * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
  21  * Floor, Boston, MA 02110-1301 USA
  22  */
  23 /*
  24  * $XConsortium: slist.cc /main/4 1996/07/18 14:30:12 drk $
  25  *
  26  * Copyright (c) 1993 HAL Computer Systems International, Ltd.
  27  * All rights reserved.  Unpublished -- rights reserved under
  28  * the Copyright Laws of the United States.  USE OF A COPYRIGHT
  29  * NOTICE IS PRECAUTIONARY ONLY AND DOES NOT IMPLY PUBLICATION
  30  * OR DISCLOSURE.
  31  *
  32  * THIS SOFTWARE CONTAINS CONFIDENTIAL INFORMATION AND TRADE
  33  * SECRETS OF HAL COMPUTER SYSTEMS INTERNATIONAL, LTD.  USE,
  34  * DISCLOSURE, OR REPRODUCTION IS PROHIBITED WITHOUT THE
  35  * PRIOR EXPRESS WRITTEN PERMISSION OF HAL COMPUTER SYSTEMS
  36  * INTERNATIONAL, LTD.
  37  *
  38  *                         RESTRICTED RIGHTS LEGEND
  39  * Use, duplication, or disclosure by the Government is subject
  40  * to the restrictions as set forth in subparagraph (c)(l)(ii)
  41  * of the Rights in Technical Data and Computer Software clause
  42  * at DFARS 252.227-7013.
  43  *
  44  *          HAL COMPUTER SYSTEMS INTERNATIONAL, LTD.
  45  *                  1315 Dell Avenue
  46  *                  Campbell, CA  95008
  47  *
  48  */
  49
  50
  51 #include "dstr/slist.h"
  52 #include "utility/funcs.h"
  53
  54 slist::slist(slist_cell* x) : v_ct(0), v_head(0), v_tail(0)
  55 {
  56    if ( x )
  57       insert_as_tail(x);
  58 }
  59
  60 slist::~slist()
  61 {
  62    slist_cell* y = 0;
  63    slist_cell* x = v_head;
  64
  65    while (x) {
  66       y = x -> v_succ;
  67       delete x;
  68       x = y;
  69    }
  70 }
  71
  72 void slist::append(slist* tail_list)
  73 {
  74    if ( tail_list == 0 ) return;
  75
  76    if ( v_tail != 0 )
  77       v_tail -> v_succ = tail_list -> v_head;
  78
  79    if ( v_head == 0 )
  80       v_head = tail_list -> v_head;
  81
  82    v_tail = tail_list -> v_tail;
  83    v_ct += tail_list -> v_ct;
  84
  85    tail_list -> v_head = tail_list -> v_tail = 0;
  86    tail_list -> v_ct = 0;
  87 }
  88
  89 void slist::insert_as_tail(slist_cell* x)
  90 {
  91    if ( v_head == 0 ) {
  92       v_head = v_tail = x;
  93    } else {
  94       v_tail -> v_succ = x;
  95       v_tail = x;
  96    }
  97    x -> v_succ = 0;
  98    v_ct++;
  99 }
 100
 101 void slist::delete_head()
 102 {
 103    if ( v_ct == 1 )
 104        v_head = v_tail = 0;
 105    else {
 106        v_head = v_head -> v_succ;
 107    }
 108
 109    v_ct--;
 110 }
 111
 112 long slist::first()
 113 {
 114    return long(v_head);
 115 }
 116
 117 long slist::last()
 118 {
 119    return long(v_tail);
 120 }
 121
 122 void slist::next(long& index)
 123 {
 124    if ( index == long(v_tail) )
 125       index = 0;
 126    else
 127       index = long( ((slist_cell*)(index)) -> v_succ );
 128 }
 129
 130 slist* slist::concate_with(slist* first_list ...)
 131 {
 132    va_list ap;
 133    va_start (ap, first_list);
 134
 135    this -> append(first_list);
 136
 137    for (;;) {
 138       slist* p = va_arg(ap, slist*);
 139       if ( p == 0 )
 140          break;
 141       else
 142          this -> append(p);
 143    }
 144
 145    va_end(ap);
 146
 147    return this;
 148 }