diff options
Diffstat (limited to 'compat/seq.c')
-rw-r--r-- | compat/seq.c | 64 |
1 files changed, 64 insertions, 0 deletions
diff --git a/compat/seq.c b/compat/seq.c new file mode 100644 index 0000000..b4c8b46 --- /dev/null +++ b/compat/seq.c @@ -0,0 +1,64 @@ +/* seq.c - This is the sequential visit of the database. This defines two + user-visable routines that are used together. This is the DBM interface. */ + +/* This file is part of GDBM, the GNU data base manager. + Copyright (C) 1990, 1991, 1993, 2007 Free Software Foundation, Inc. + + This program 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 Software Foundation; either version 3, or (at your option) + any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or 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 this program; if not, write to the Free Software Foundation, + Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */ + +/* Include system configuration before all else. */ +#include "autoconf.h" + +#include "gdbmdefs.h" +#include "extern.h" + +/* Start the visit of all keys in the database. This produces something in + hash order, not in any sorted order. */ + +datum +firstkey (void) +{ + datum ret_val; + + /* Free previous dynamic memory, do actual call, and save pointer to new + memory. */ + ret_val = gdbm_firstkey (_gdbm_file); + if (_gdbm_memory.dptr != NULL) free (_gdbm_memory.dptr); + _gdbm_memory = ret_val; + + /* Return the new value. */ + return ret_val; +} + + +/* Continue visiting all keys. The next key following KEY is returned. */ + +datum +nextkey (datum key) +{ + datum ret_val; + + /* Make sure we have a valid key. */ + if (key.dptr == NULL) + return key; + + /* Call gdbm nextkey with supplied value. After that, free the old value. */ + ret_val = gdbm_nextkey (_gdbm_file, key); + if (_gdbm_memory.dptr != NULL) free (_gdbm_memory.dptr); + _gdbm_memory = ret_val; + + /* Return the new value. */ + return ret_val; +} |