X-Git-Url: http://git.indexdata.com/?p=idzebra-moved-to-github.git;a=blobdiff_plain;f=dict%2Fdelete.c;h=d81c384666c361457f04e557feddc0e276ffdc55;hp=6b0d565b434ae350fded37d4fb52ca1e6713f8ea;hb=3bb2fd863b1664f1ff71dadb540313f301ca234f;hpb=896c0427df9d8eff5de6a1735dcd992e067df844 diff --git a/dict/delete.c b/dict/delete.c index 6b0d565..d81c384 100644 --- a/dict/delete.c +++ b/dict/delete.c @@ -1,8 +1,5 @@ -/* $Id: delete.c,v 1.8 2002-08-02 19:26:55 adam Exp $ - Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002 - Index Data Aps - -This file is part of the Zebra server. +/* This file is part of the Zebra server. + 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 @@ -15,95 +12,93 @@ FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License -along with Zebra; see the file LICENSE.zebra. If not, write to the -Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA -02111-1307, USA. -*/ - +along with this program; if not, write to the Free Software +Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA +*/ +#if HAVE_CONFIG_H +#include +#endif #include #include #include #include -#include +#include "dict-p.h" -static void dict_del_subtree (Dict dict, Dict_ptr ptr, - void *client, - int (*f)(const char *, void *)) +static void dict_del_subtree(Dict dict, Dict_ptr ptr, + void *client, + int (*f)(const char *, void *)) { - int more = 1; void *p = 0; + short *indxp; + int i, hi; if (!ptr) return; - - while (more) - { - short *indxp; - int i, hi; - dict_bf_readp (dict->dbf, ptr, &p); - hi = DICT_nodir(p)-1; - indxp = (short*) ((char*) p+DICT_bsize(p)-sizeof(short)); - more = 0; - for (i = 0; i <= hi; i++) + dict_bf_readp(dict->dbf, ptr, &p); + indxp = (short*) ((char*) p+DICT_bsize(p)-sizeof(short)); + hi = DICT_nodir(p)-1; + for (i = 0; i <= hi; i++) + { + if (indxp[-i] > 0) + { + /* string (Dict_char *) DICT_EOS terminated */ + /* unsigned char length of information */ + /* char * information */ + char *info = (char*)p + indxp[-i]; + if (f) + (*f)(info + (dict_strlen((Dict_char*) info)+1) + *sizeof(Dict_char), client); + } + else { - if (indxp[-i] > 0) + Dict_ptr subptr; + + /* Dict_ptr subptr */ + /* Dict_char sub char */ + /* unsigned char length of information */ + /* char * information */ + char *info = (char*)p - indxp[-i]; + memcpy(&subptr, info, sizeof(Dict_ptr)); + + if (info[sizeof(Dict_ptr)+sizeof(Dict_char)]) { - /* string (Dict_char *) DICT_EOS terminated */ - /* unsigned char length of information */ - /* char * information */ - char *info = (char*)p + indxp[-i]; if (f) - (*f)(info + (dict_strlen((Dict_char*) info)+1) - *sizeof(Dict_char), client); + (*f)(info+sizeof(Dict_ptr)+sizeof(Dict_char), client); } - else + if (subptr) { - - Dict_ptr subptr; - - /* Dict_ptr subptr */ - /* Dict_char sub char */ - /* unsigned char length of information */ - /* char * information */ - char *info = (char*)p - indxp[-i]; - memcpy (&subptr, info, sizeof(Dict_ptr)); - - if (info[sizeof(Dict_ptr)+sizeof(Dict_char)]) - { - if (f) - (*f)(info+sizeof(Dict_ptr)+sizeof(Dict_char), client); - } - if (subptr) - { - dict_del_subtree (dict, subptr, client, f); - more = 1; - break; - } + dict_del_subtree(dict, subptr, client, f); + + /* page may be gone. reread it .. */ + dict_bf_readp(dict->dbf, ptr, &p); + indxp = (short*) ((char*) p+DICT_bsize(p)-sizeof(short)); } } } DICT_backptr(p) = dict->head.freelist; dict->head.freelist = ptr; - dict_bf_touch (dict->dbf, ptr); + dict_bf_touch(dict->dbf, ptr); } -static int dict_del_string (Dict dict, const Dict_char *str, Dict_ptr ptr, - int sub_flag, void *client, - int (*f)(const char *, void *)) +static int dict_del_string(Dict dict, const Dict_char *str, Dict_ptr ptr, + int sub_flag, void *client, + int (*f)(const char *, void *)) { int mid, lo, hi; int cmp; void *p; short *indxp; char *info; + int r = 0; + Dict_ptr subptr = 0; if (!ptr) return 0; - dict_bf_readp (dict->dbf, ptr, &p); + dict_bf_readp(dict->dbf, ptr, &p); mid = lo = 0; hi = DICT_nodir(p)-1; indxp = (short*) ((char*) p+DICT_bsize(p)-sizeof(short)); @@ -121,7 +116,7 @@ static int dict_del_string (Dict dict, const Dict_char *str, Dict_ptr ptr, if (sub_flag) { /* determine if prefix match */ - if (!dict_strncmp (str, (Dict_char*) info, dict_strlen(str))) + if (!dict_strncmp(str, (Dict_char*) info, dict_strlen(str))) { if (f) (*f)(info + (dict_strlen((Dict_char*) info)+1) @@ -135,9 +130,10 @@ 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); + 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; } @@ -155,65 +151,92 @@ 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; + dict_bf_touch(dict->dbf, ptr); + r = 1; + break; } } } else { Dict_char dc; - Dict_ptr subptr; /* Dict_ptr subptr */ /* Dict_char sub char */ /* unsigned char length of information */ /* char * information */ info = (char*)p - indxp[-mid]; - memcpy (&dc, info+sizeof(Dict_ptr), sizeof(Dict_char)); + memcpy(&dc, info+sizeof(Dict_ptr), sizeof(Dict_char)); cmp = dc- *str; if (!cmp) { - memcpy (&subptr, info, sizeof(Dict_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); + dict_bf_touch(dict->dbf, 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); + dict_bf_touch(dict->dbf, ptr); } - return 0; } else { - if (subptr == 0) - return 0; - ptr = subptr; - 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; + /* subptr may be 0 */ + r = dict_del_string(dict, str, subptr, sub_flag, client, f); + + /* recover */ + dict_bf_readp(dict->dbf, ptr, &p); + 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) @@ -221,18 +244,37 @@ 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) +int dict_delete(Dict dict, const char *p) { - return dict_del_string (dict, (const Dict_char*) p, dict->head.root, 0, - 0, 0); + return dict_del_string(dict, (const Dict_char*) p, dict->head.root, 0, + 0, 0); } -int dict_delete_subtree (Dict dict, const char *p, void *client, - int (*f)(const char *info, void *client)) +int dict_delete_subtree(Dict dict, const char *p, void *client, + int (*f)(const char *info, void *client)) { - return dict_del_string (dict, (const Dict_char*) p, dict->head.root, 1, - client, f); + return dict_del_string(dict, (const Dict_char*) p, dict->head.root, 1, + client, f); } +/* + * Local variables: + * c-basic-offset: 4 + * c-file-style: "Stroustrup" + * indent-tabs-mode: nil + * End: + * vim: shiftwidth=4 tabstop=8 expandtab + */ +