Do not build for Debian lenny anymore

[idzebra-moved-to-github.git] / dict / delete.c

diff --git a/dict/delete.c b/dict/delete.c
index 38e4cd3..d81c384 100644 (file)
--- a/dict/delete.c
+++ b/dict/delete.c
@@ -1,5 +1,5 @@
 /* This file is part of the Zebra server.
-   Copyright (C) 1994-2009 Index Data
+   Copyright (C) 1994-2011 Index Data
 
 Zebra is free software; you can redistribute it and/or modify it under
 the terms of the GNU General Public License as published by the Free
@@ -17,6 +17,9 @@ Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 
 */
 
+#if HAVE_CONFIG_H
+#include <config.h>
+#endif
 #include <stdlib.h>
 #include <string.h>
 #include <stdio.h>
@@ -90,6 +93,8 @@ static int dict_del_string(Dict dict, const Dict_char *str, Dict_ptr ptr,
     void *p;
     short *indxp;
     char *info;
+    int r = 0;
+    Dict_ptr subptr = 0;
 
     if (!ptr)
        return 0;
@@ -128,6 +133,7 @@ static int dict_del_string(Dict dict, const Dict_char *str, Dict_ptr ptr,
                    dict_bf_touch(dict->dbf, ptr);
                    --hi;
                    mid = lo = 0;
+                    r = 1; /* signal deleted */
                     /* start again (may not be the most efficient way to go)*/
                    continue; 
                }
@@ -146,14 +152,14 @@ static int dict_del_string(Dict dict, const Dict_char *str, Dict_ptr ptr,
                    DICT_type(p) = 1;
                    (DICT_nodir(p))--;
                    dict_bf_touch(dict->dbf, ptr);
-                   return 1;
+                    r = 1;
+                    break;
                }
            }
         }
         else
         {
             Dict_char dc;
-            Dict_ptr subptr;
 
             /* Dict_ptr             subptr */
             /* Dict_char            sub char */
@@ -167,13 +173,9 @@ static int dict_del_string(Dict dict, const Dict_char *str, Dict_ptr ptr,
                 memcpy(&subptr, info, sizeof(Dict_ptr));
                 if (*++str == DICT_EOS)
                 {
-                   if (sub_flag && subptr)
-                   {
-                       Dict null_ptr = 0;
-                       memcpy(info, &null_ptr, sizeof(Dict_ptr));
-                   }
                     if (info[sizeof(Dict_ptr)+sizeof(Dict_char)])
                     {
+                        /* entry does exist. Wipe it out */
                         info[sizeof(Dict_ptr)+sizeof(Dict_char)] = 0;
                         DICT_type(p) = 1;
                         dict_bf_touch(dict->dbf, ptr);
@@ -181,29 +183,60 @@ static int dict_del_string(Dict dict, const Dict_char *str, Dict_ptr ptr,
                        if (f)
                            (*f)(info+sizeof(Dict_ptr)+sizeof(Dict_char),
                                 client);
-                       if (sub_flag && subptr)
-                           dict_del_subtree(dict, subptr, client, f);
-                        return 1;
+                        r = 1;
                     }
-                   if (sub_flag && subptr)
+                   if (sub_flag)
                    {
+                        /* must delete all suffixes (subtrees) as well */
+                        hi = DICT_nodir(p)-1;
+                        while (mid < hi)
+                        {
+                            indxp[-mid] = indxp[-mid-1];
+                            mid++;
+                        }
+                        (DICT_nodir(p))--;
                         DICT_type(p) = 1;
                         dict_bf_touch(dict->dbf, ptr);
-                       dict_del_subtree(dict, subptr, client, f);
                    }
-                    return 0;
                 }
                 else
                 {
-                    if (subptr == 0)
-                        return 0;
-                    ptr = subptr;
+                    /* subptr may be 0 */
+                    r = dict_del_string(dict, str, subptr, sub_flag, client, f);
+
+                    /* recover */
                     dict_bf_readp(dict->dbf, ptr, &p);
-                    mid = lo = 0;
-                    hi = DICT_nodir(p)-1;
-                    indxp = (short*) ((char*) p+DICT_bsize(p)-sizeof(short));
-                    continue;
+                    indxp = (short*)
+                        ((char*) p+DICT_bsize(p)-sizeof(short));
+                    info = (char*)p - indxp[-mid];
+
+                    subptr = 0; /* avoid dict_del_subtree (end of function)*/
+                    if (r == 2)
+                    {   /* subptr page became empty and is removed */
+                        
+                        /* see if this entry is a real one or if it just
+                           serves as pointer to subptr */
+                        if (info[sizeof(Dict_ptr)+sizeof(Dict_char)])
+                        {
+                            /* this entry do exist, set subptr to 0 */
+                            memcpy(info, &subptr, sizeof(subptr));
+                        }
+                        else
+                        {
+                            /* this entry ONLY points to subptr. remove it */
+                            hi = DICT_nodir(p)-1;
+                            while (mid < hi)
+                            {
+                                indxp[-mid] = indxp[-mid-1];
+                                mid++;
+                            }
+                            (DICT_nodir(p))--;
+                        }
+                        dict_bf_touch(dict->dbf, ptr);
+                        r = 1;
+                    }
                 }
+                break;
             }
         }
         if (cmp < 0)
@@ -211,7 +244,17 @@ static int dict_del_string(Dict dict, const Dict_char *str, Dict_ptr ptr,
         else
             hi = mid-1;
     }
-    return 0;
+    if (DICT_nodir(p) == 0 && ptr != dict->head.root)
+    {
+        DICT_backptr(p) = dict->head.freelist;
+        dict->head.freelist = ptr;
+        dict_bf_touch(dict->dbf, ptr);
+        r = 2;
+    }
+    if (subptr && sub_flag)
+        dict_del_subtree(dict, subptr, client, f);
+
+    return r;
 }
 
 int dict_delete(Dict dict, const char *p)