home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 January / Chip_2001-01_cd1.bin / tema / mysql / mysql-3.23.28g-win-source.exe / mysys / list.c < prev    next >
C/C++ Source or Header  |  2000-08-31  |  2KB  |  117 lines
  1. /* Copyright (C) 2000 MySQL AB & MySQL Finland AB & TCX DataKonsult AB
  2.    
  3.    This library is free software; you can redistribute it and/or
  4.    modify it under the terms of the GNU Library General Public
  5.    License as published by the Free Software Foundation; either
  6.    version 2 of the License, or (at your option) any later version.
  7.    
  8.    This library is distributed in the hope that it will be useful,
  9.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  10.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  11.    Library General Public License for more details.
  12.    
  13.    You should have received a copy of the GNU Library General Public
  14.    License along with this library; if not, write to the Free
  15.    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  16.    MA 02111-1307, USA */
  17.  
  18. /*
  19.   Code for handling dubble-linked lists in C
  20. */
  21.  
  22. #include "mysys_priv.h"
  23. #include <my_list.h>
  24.  
  25.  
  26.  
  27.     /* Add a element to start of list */
  28.  
  29. LIST *list_add(LIST *root, LIST *element)
  30. {
  31.   DBUG_ENTER("list_add");
  32.   DBUG_PRINT("enter",("root: %lx  element: %lx", root, element));
  33.   if (root)
  34.   {
  35.     if (root->prev)            /* If add in mid of list */
  36.       root->prev->next= element;
  37.     element->prev=root->prev;
  38.     root->prev=element;
  39.   }
  40.   else
  41.     element->prev=0;
  42.   element->next=root;
  43.   DBUG_RETURN(element);            /* New root */
  44. }
  45.  
  46.  
  47. LIST *list_delete(LIST *root, LIST *element)
  48. {
  49.   if (element->prev)
  50.     element->prev->next=element->next;
  51.   else
  52.     root=element->next;
  53.   if (element->next)
  54.     element->next->prev=element->prev;
  55.   return root;
  56. }
  57.  
  58.  
  59. void list_free(LIST *root, pbool free_data)
  60. {
  61.   LIST *next;
  62.   while (root)
  63.   {
  64.     next=root->next;
  65.     if (free_data)
  66.       my_free((gptr) root->data,MYF(0));
  67.     my_free((gptr) root,MYF(0));
  68.     root=next;
  69.   }
  70. }
  71.  
  72.  
  73. LIST *list_cons(void *data, LIST *list)
  74. {
  75.   LIST *new=(LIST*) my_malloc(sizeof(LIST),MYF(MY_FAE));
  76.   if (!new)
  77.     return 0;
  78.   new->data=data;
  79.   return list_add(list,new);
  80. }
  81.  
  82.  
  83. LIST *list_reverse(LIST *root)
  84. {
  85.   LIST *last;
  86.  
  87.   last=root;
  88.   while (root)
  89.   {
  90.     last=root;
  91.     root=root->next;
  92.     last->next=last->prev;
  93.     last->prev=root;
  94.   }
  95.   return last;
  96. }
  97.  
  98. uint list_length(LIST *list)
  99. {
  100.   uint count;
  101.   for (count=0 ; list ; list=list->next, count++) ;
  102.   return count;
  103. }
  104.  
  105.  
  106. int list_walk(LIST *list, list_walk_action action, gptr argument)
  107. {
  108.   int error=0;
  109.   while (list)
  110.   {
  111.     if ((error = (*action)(list->data,argument)))
  112.       return error;
  113.     list=rest(list);
  114.   }
  115.   return 0;
  116. }
  117.