Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 1 | /* GDBM module, hacked from the still-breathing corpse of the |
| 2 | DBM module by anthony.baxter@aaii.oz.au. Original copyright |
| 3 | follows: |
| 4 | */ |
| 5 | /*********************************************************** |
Guido van Rossum | 524b588 | 1995-01-04 19:10:35 +0000 | [diff] [blame] | 6 | Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam, |
| 7 | The Netherlands. |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 8 | |
| 9 | All Rights Reserved |
| 10 | |
Guido van Rossum | d266eb4 | 1996-10-25 14:44:06 +0000 | [diff] [blame] | 11 | Permission to use, copy, modify, and distribute this software and its |
| 12 | documentation for any purpose and without fee is hereby granted, |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 13 | provided that the above copyright notice appear in all copies and that |
Guido van Rossum | d266eb4 | 1996-10-25 14:44:06 +0000 | [diff] [blame] | 14 | both that copyright notice and this permission notice appear in |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 15 | supporting documentation, and that the names of Stichting Mathematisch |
Guido van Rossum | d266eb4 | 1996-10-25 14:44:06 +0000 | [diff] [blame] | 16 | Centrum or CWI or Corporation for National Research Initiatives or |
| 17 | CNRI not be used in advertising or publicity pertaining to |
| 18 | distribution of the software without specific, written prior |
| 19 | permission. |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 20 | |
Guido van Rossum | d266eb4 | 1996-10-25 14:44:06 +0000 | [diff] [blame] | 21 | While CWI is the initial source for this software, a modified version |
| 22 | is made available by the Corporation for National Research Initiatives |
| 23 | (CNRI) at the Internet address ftp://ftp.python.org. |
| 24 | |
| 25 | STICHTING MATHEMATISCH CENTRUM AND CNRI DISCLAIM ALL WARRANTIES WITH |
| 26 | REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF |
| 27 | MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH |
| 28 | CENTRUM OR CNRI BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL |
| 29 | DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR |
| 30 | PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER |
| 31 | TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR |
| 32 | PERFORMANCE OF THIS SOFTWARE. |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 33 | |
| 34 | ******************************************************************/ |
Roger E. Masse | e5a9c8f | 1997-03-25 17:39:56 +0000 | [diff] [blame] | 35 | /***************************************************************** |
| 36 | Modification History: |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 37 | |
Roger E. Masse | e5a9c8f | 1997-03-25 17:39:56 +0000 | [diff] [blame] | 38 | Added support for 'gdbm_sync' method. Roger E. Masse 3/25/97 |
| 39 | |
| 40 | *****************************************************************/ |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 41 | /* DBM module using dictionary interface */ |
| 42 | |
| 43 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 44 | #include "Python.h" |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 45 | |
| 46 | #include <sys/types.h> |
| 47 | #include <sys/stat.h> |
| 48 | #include <fcntl.h> |
| 49 | #include "gdbm.h" |
| 50 | |
| 51 | typedef struct { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 52 | PyObject_HEAD |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 53 | int di_size; /* -1 means recompute */ |
| 54 | GDBM_FILE di_dbm; |
| 55 | } dbmobject; |
| 56 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 57 | staticforward PyTypeObject Dbmtype; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 58 | |
| 59 | #define is_dbmobject(v) ((v)->ob_type == &Dbmtype) |
Guido van Rossum | 77eecfa | 1997-07-17 22:56:01 +0000 | [diff] [blame] | 60 | #define check_dbmobject_open(v) if ((v)->di_dbm == NULL) \ |
| 61 | { PyErr_SetString(DbmError, "GDBM object has already been closed"); \ |
| 62 | return NULL; } |
| 63 | |
| 64 | |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 65 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 66 | static PyObject *DbmError; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 67 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 68 | static PyObject * |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 69 | newdbmobject(file, flags, mode) |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 70 | char *file; |
| 71 | int flags; |
| 72 | int mode; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 73 | { |
| 74 | dbmobject *dp; |
| 75 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 76 | dp = PyObject_NEW(dbmobject, &Dbmtype); |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 77 | if (dp == NULL) |
| 78 | return NULL; |
| 79 | dp->di_size = -1; |
Guido van Rossum | b045afc | 1995-03-14 15:04:40 +0000 | [diff] [blame] | 80 | errno = 0; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 81 | if ( (dp->di_dbm = gdbm_open(file, 0, flags, mode, NULL)) == 0 ) { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 82 | if (errno != 0) |
| 83 | PyErr_SetFromErrno(DbmError); |
| 84 | else |
| 85 | PyErr_SetString(DbmError, |
| 86 | (char *) gdbm_strerror(gdbm_errno)); |
| 87 | Py_DECREF(dp); |
| 88 | return NULL; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 89 | } |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 90 | return (PyObject *)dp; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 91 | } |
| 92 | |
| 93 | /* Methods */ |
| 94 | |
| 95 | static void |
| 96 | dbm_dealloc(dp) |
| 97 | register dbmobject *dp; |
| 98 | { |
| 99 | if ( dp->di_dbm ) |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 100 | gdbm_close(dp->di_dbm); |
| 101 | PyMem_DEL(dp); |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 102 | } |
| 103 | |
| 104 | static int |
| 105 | dbm_length(dp) |
| 106 | dbmobject *dp; |
| 107 | { |
Guido van Rossum | 77eecfa | 1997-07-17 22:56:01 +0000 | [diff] [blame] | 108 | if (dp->di_dbm == NULL) { |
| 109 | PyErr_SetString(DbmError, "GDBM object has already been closed"); |
| 110 | return -1; |
| 111 | } |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 112 | if ( dp->di_size < 0 ) { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 113 | datum key,okey; |
| 114 | int size; |
| 115 | okey.dsize=0; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 116 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 117 | size = 0; |
| 118 | for ( key=gdbm_firstkey(dp->di_dbm); key.dptr; |
| 119 | key = gdbm_nextkey(dp->di_dbm,okey)) { |
| 120 | size++; |
| 121 | if(okey.dsize) free(okey.dptr); |
| 122 | okey=key; |
| 123 | } |
| 124 | dp->di_size = size; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 125 | } |
| 126 | return dp->di_size; |
| 127 | } |
| 128 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 129 | static PyObject * |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 130 | dbm_subscript(dp, key) |
| 131 | dbmobject *dp; |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 132 | register PyObject *key; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 133 | { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 134 | PyObject *v; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 135 | datum drec, krec; |
| 136 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 137 | if (!PyArg_Parse(key, "s#", &krec.dptr, &krec.dsize) ) |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 138 | return NULL; |
| 139 | |
| 140 | drec = gdbm_fetch(dp->di_dbm, krec); |
| 141 | if ( drec.dptr == 0 ) { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 142 | PyErr_SetString(PyExc_KeyError, |
| 143 | PyString_AS_STRING((PyStringObject *)key)); |
| 144 | return NULL; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 145 | } |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 146 | v = PyString_FromStringAndSize(drec.dptr, drec.dsize); |
Guido van Rossum | b045afc | 1995-03-14 15:04:40 +0000 | [diff] [blame] | 147 | free(drec.dptr); |
| 148 | return v; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 149 | } |
| 150 | |
| 151 | static int |
| 152 | dbm_ass_sub(dp, v, w) |
| 153 | dbmobject *dp; |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 154 | PyObject *v, *w; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 155 | { |
| 156 | datum krec, drec; |
| 157 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 158 | if ( !PyArg_Parse(v, "s#", &krec.dptr, &krec.dsize) ) { |
| 159 | PyErr_SetString(PyExc_TypeError, |
| 160 | "gdbm mappings have string indices only"); |
| 161 | return -1; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 162 | } |
Guido van Rossum | 77eecfa | 1997-07-17 22:56:01 +0000 | [diff] [blame] | 163 | if (dp->di_dbm == NULL) { |
| 164 | PyErr_SetString(DbmError, "GDBM object has already been closed"); |
| 165 | return -1; |
| 166 | } |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 167 | dp->di_size = -1; |
| 168 | if (w == NULL) { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 169 | if ( gdbm_delete(dp->di_dbm, krec) < 0 ) { |
| 170 | PyErr_SetString(PyExc_KeyError, |
| 171 | PyString_AS_STRING((PyStringObject *)v)); |
| 172 | return -1; |
| 173 | } |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 174 | } else { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 175 | if ( !PyArg_Parse(w, "s#", &drec.dptr, &drec.dsize) ) { |
| 176 | PyErr_SetString(PyExc_TypeError, |
| 177 | "gdbm mappings have string elements only"); |
| 178 | return -1; |
| 179 | } |
| 180 | errno = 0; |
| 181 | if ( gdbm_store(dp->di_dbm, krec, drec, GDBM_REPLACE) < 0 ) { |
| 182 | if (errno != 0) |
| 183 | PyErr_SetFromErrno(DbmError); |
| 184 | else |
| 185 | PyErr_SetString(DbmError, |
| 186 | (char *) gdbm_strerror(gdbm_errno)); |
| 187 | return -1; |
| 188 | } |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 189 | } |
| 190 | return 0; |
| 191 | } |
| 192 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 193 | static PyMappingMethods dbm_as_mapping = { |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 194 | (inquiry)dbm_length, /*mp_length*/ |
| 195 | (binaryfunc)dbm_subscript, /*mp_subscript*/ |
| 196 | (objobjargproc)dbm_ass_sub, /*mp_ass_subscript*/ |
| 197 | }; |
| 198 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 199 | static PyObject * |
Guido van Rossum | 807b7be | 1995-07-07 22:37:11 +0000 | [diff] [blame] | 200 | dbm_close(dp, args) |
| 201 | register dbmobject *dp; |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 202 | PyObject *args; |
Guido van Rossum | 807b7be | 1995-07-07 22:37:11 +0000 | [diff] [blame] | 203 | { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 204 | if ( !PyArg_NoArgs(args) ) |
Guido van Rossum | 807b7be | 1995-07-07 22:37:11 +0000 | [diff] [blame] | 205 | return NULL; |
| 206 | if ( dp->di_dbm ) |
| 207 | gdbm_close(dp->di_dbm); |
| 208 | dp->di_dbm = NULL; |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 209 | Py_INCREF(Py_None); |
| 210 | return Py_None; |
Guido van Rossum | 807b7be | 1995-07-07 22:37:11 +0000 | [diff] [blame] | 211 | } |
| 212 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 213 | static PyObject * |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 214 | dbm_keys(dp, args) |
| 215 | register dbmobject *dp; |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 216 | PyObject *args; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 217 | { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 218 | register PyObject *v, *item; |
Guido van Rossum | 3be7140 | 1996-07-21 02:32:44 +0000 | [diff] [blame] | 219 | datum key, nextkey; |
Guido van Rossum | 66017aa | 1995-08-28 02:58:00 +0000 | [diff] [blame] | 220 | int err; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 221 | |
| 222 | if (dp == NULL || !is_dbmobject(dp)) { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 223 | PyErr_BadInternalCall(); |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 224 | return NULL; |
| 225 | } |
Guido van Rossum | 3be7140 | 1996-07-21 02:32:44 +0000 | [diff] [blame] | 226 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 227 | if (!PyArg_NoArgs(args)) |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 228 | return NULL; |
Guido van Rossum | 3be7140 | 1996-07-21 02:32:44 +0000 | [diff] [blame] | 229 | |
Guido van Rossum | 77eecfa | 1997-07-17 22:56:01 +0000 | [diff] [blame] | 230 | check_dbmobject_open(dp); |
| 231 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 232 | v = PyList_New(0); |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 233 | if (v == NULL) |
| 234 | return NULL; |
Guido van Rossum | 3be7140 | 1996-07-21 02:32:44 +0000 | [diff] [blame] | 235 | |
| 236 | key = gdbm_firstkey(dp->di_dbm); |
| 237 | while (key.dptr) { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 238 | item = PyString_FromStringAndSize(key.dptr, key.dsize); |
| 239 | if (item == NULL) { |
| 240 | free(key.dptr); |
| 241 | Py_DECREF(v); |
| 242 | return NULL; |
| 243 | } |
| 244 | err = PyList_Append(v, item); |
| 245 | Py_DECREF(item); |
| 246 | if (err != 0) { |
| 247 | free(key.dptr); |
| 248 | Py_DECREF(v); |
| 249 | return NULL; |
| 250 | } |
| 251 | nextkey = gdbm_nextkey(dp->di_dbm, key); |
Guido van Rossum | 3be7140 | 1996-07-21 02:32:44 +0000 | [diff] [blame] | 252 | free(key.dptr); |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 253 | key = nextkey; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 254 | } |
Guido van Rossum | 3be7140 | 1996-07-21 02:32:44 +0000 | [diff] [blame] | 255 | |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 256 | return v; |
| 257 | } |
| 258 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 259 | static PyObject * |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 260 | dbm_has_key(dp, args) |
| 261 | register dbmobject *dp; |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 262 | PyObject *args; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 263 | { |
Guido van Rossum | b045afc | 1995-03-14 15:04:40 +0000 | [diff] [blame] | 264 | datum key; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 265 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 266 | if (!PyArg_Parse(args, "s#", &key.dptr, &key.dsize)) |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 267 | return NULL; |
Guido van Rossum | 77eecfa | 1997-07-17 22:56:01 +0000 | [diff] [blame] | 268 | check_dbmobject_open(dp); |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 269 | return PyInt_FromLong((long) gdbm_exists(dp->di_dbm, key)); |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 270 | } |
| 271 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 272 | static PyObject * |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 273 | dbm_firstkey(dp, args) |
| 274 | register dbmobject *dp; |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 275 | PyObject *args; |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 276 | { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 277 | register PyObject *v; |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 278 | datum key; |
| 279 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 280 | if (!PyArg_NoArgs(args)) |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 281 | return NULL; |
Guido van Rossum | 77eecfa | 1997-07-17 22:56:01 +0000 | [diff] [blame] | 282 | check_dbmobject_open(dp); |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 283 | key = gdbm_firstkey(dp->di_dbm); |
| 284 | if (key.dptr) { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 285 | v = PyString_FromStringAndSize(key.dptr, key.dsize); |
| 286 | free(key.dptr); |
| 287 | return v; |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 288 | } else { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 289 | Py_INCREF(Py_None); |
| 290 | return Py_None; |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 291 | } |
| 292 | } |
| 293 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 294 | static PyObject * |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 295 | dbm_nextkey(dp, args) |
| 296 | register dbmobject *dp; |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 297 | PyObject *args; |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 298 | { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 299 | register PyObject *v; |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 300 | datum key, nextkey; |
| 301 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 302 | if (!PyArg_Parse(args, "s#", &key.dptr, &key.dsize)) |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 303 | return NULL; |
Guido van Rossum | 77eecfa | 1997-07-17 22:56:01 +0000 | [diff] [blame] | 304 | check_dbmobject_open(dp); |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 305 | nextkey = gdbm_nextkey(dp->di_dbm, key); |
| 306 | if (nextkey.dptr) { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 307 | v = PyString_FromStringAndSize(nextkey.dptr, nextkey.dsize); |
| 308 | free(nextkey.dptr); |
| 309 | return v; |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 310 | } else { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 311 | Py_INCREF(Py_None); |
| 312 | return Py_None; |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 313 | } |
| 314 | } |
| 315 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 316 | static PyObject * |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 317 | dbm_reorganize(dp, args) |
| 318 | register dbmobject *dp; |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 319 | PyObject *args; |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 320 | { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 321 | if (!PyArg_NoArgs(args)) |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 322 | return NULL; |
Guido van Rossum | 77eecfa | 1997-07-17 22:56:01 +0000 | [diff] [blame] | 323 | check_dbmobject_open(dp); |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 324 | errno = 0; |
| 325 | if (gdbm_reorganize(dp->di_dbm) < 0) { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 326 | if (errno != 0) |
| 327 | PyErr_SetFromErrno(DbmError); |
| 328 | else |
| 329 | PyErr_SetString(DbmError, |
| 330 | (char *) gdbm_strerror(gdbm_errno)); |
| 331 | return NULL; |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 332 | } |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 333 | Py_INCREF(Py_None); |
| 334 | return Py_None; |
Guido van Rossum | fbd30e9 | 1995-03-16 16:07:34 +0000 | [diff] [blame] | 335 | } |
| 336 | |
Roger E. Masse | e5a9c8f | 1997-03-25 17:39:56 +0000 | [diff] [blame] | 337 | static PyObject * |
| 338 | dbm_sync(dp, args) |
| 339 | register dbmobject *dp; |
| 340 | PyObject *args; |
| 341 | { |
| 342 | if (!PyArg_NoArgs(args)) |
| 343 | return NULL; |
Guido van Rossum | 77eecfa | 1997-07-17 22:56:01 +0000 | [diff] [blame] | 344 | check_dbmobject_open(dp); |
Roger E. Masse | e5a9c8f | 1997-03-25 17:39:56 +0000 | [diff] [blame] | 345 | gdbm_sync(dp->di_dbm); |
| 346 | Py_INCREF(Py_None); |
| 347 | return Py_None; |
| 348 | } |
| 349 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 350 | static PyMethodDef dbm_methods[] = { |
| 351 | {"close", (PyCFunction)dbm_close}, |
| 352 | {"keys", (PyCFunction)dbm_keys}, |
| 353 | {"has_key", (PyCFunction)dbm_has_key}, |
| 354 | {"firstkey", (PyCFunction)dbm_firstkey}, |
| 355 | {"nextkey", (PyCFunction)dbm_nextkey}, |
| 356 | {"reorganize", (PyCFunction)dbm_reorganize}, |
Roger E. Masse | e5a9c8f | 1997-03-25 17:39:56 +0000 | [diff] [blame] | 357 | {"sync", (PyCFunction)dbm_sync}, |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 358 | {NULL, NULL} /* sentinel */ |
| 359 | }; |
| 360 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 361 | static PyObject * |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 362 | dbm_getattr(dp, name) |
| 363 | dbmobject *dp; |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 364 | char *name; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 365 | { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 366 | return Py_FindMethod(dbm_methods, (PyObject *)dp, name); |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 367 | } |
| 368 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 369 | static PyTypeObject Dbmtype = { |
| 370 | PyObject_HEAD_INIT(&PyType_Type) |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 371 | 0, |
Guido van Rossum | 807b7be | 1995-07-07 22:37:11 +0000 | [diff] [blame] | 372 | "gdbm", |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 373 | sizeof(dbmobject), |
| 374 | 0, |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 375 | (destructor)dbm_dealloc, /*tp_dealloc*/ |
| 376 | 0, /*tp_print*/ |
| 377 | (getattrfunc)dbm_getattr, /*tp_getattr*/ |
| 378 | 0, /*tp_setattr*/ |
| 379 | 0, /*tp_compare*/ |
| 380 | 0, /*tp_repr*/ |
| 381 | 0, /*tp_as_number*/ |
| 382 | 0, /*tp_as_sequence*/ |
| 383 | &dbm_as_mapping, /*tp_as_mapping*/ |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 384 | }; |
| 385 | |
| 386 | /* ----------------------------------------------------------------- */ |
| 387 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 388 | static PyObject * |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 389 | dbmopen(self, args) |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 390 | PyObject *self; |
| 391 | PyObject *args; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 392 | { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 393 | char *name; |
| 394 | char *flags = "r "; |
| 395 | int iflags; |
| 396 | int mode = 0666; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 397 | |
Guido van Rossum | e36e1fe | 1996-01-26 21:08:01 +0000 | [diff] [blame] | 398 | /* XXXX add other flags. 2nd character can be "f" meaning open in fast mode. */ |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 399 | if ( !PyArg_ParseTuple(args, "s|si", &name, &flags, &mode) ) |
| 400 | return NULL; |
Guido van Rossum | e36e1fe | 1996-01-26 21:08:01 +0000 | [diff] [blame] | 401 | switch (flags[0]) { |
| 402 | case 'r': |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 403 | iflags = GDBM_READER; |
| 404 | break; |
Guido van Rossum | e36e1fe | 1996-01-26 21:08:01 +0000 | [diff] [blame] | 405 | case 'w': |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 406 | iflags = GDBM_WRITER; |
| 407 | break; |
Guido van Rossum | e36e1fe | 1996-01-26 21:08:01 +0000 | [diff] [blame] | 408 | case 'c': |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 409 | iflags = GDBM_WRCREAT; |
| 410 | break; |
Guido van Rossum | e36e1fe | 1996-01-26 21:08:01 +0000 | [diff] [blame] | 411 | case 'n': |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 412 | iflags = GDBM_NEWDB; |
| 413 | break; |
| 414 | default: |
| 415 | PyErr_SetString(DbmError, |
| 416 | "Flags should be one of 'r', 'w', 'c' or 'n'"); |
| 417 | return NULL; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 418 | } |
Guido van Rossum | e36e1fe | 1996-01-26 21:08:01 +0000 | [diff] [blame] | 419 | if (flags[1] == 'f') |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 420 | iflags |= GDBM_FAST; |
| 421 | return newdbmobject(name, iflags, mode); |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 422 | } |
| 423 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 424 | static PyMethodDef dbmmodule_methods[] = { |
| 425 | { "open", (PyCFunction)dbmopen, 1 }, |
| 426 | { 0, 0 }, |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 427 | }; |
| 428 | |
| 429 | void |
| 430 | initgdbm() { |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 431 | PyObject *m, *d; |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 432 | |
Roger E. Masse | b15bef8 | 1996-12-17 19:55:33 +0000 | [diff] [blame] | 433 | m = Py_InitModule("gdbm", dbmmodule_methods); |
| 434 | d = PyModule_GetDict(m); |
Guido van Rossum | 0cb96de | 1997-10-01 04:29:29 +0000 | [diff] [blame] | 435 | DbmError = PyErr_NewException("gdbm.error", NULL, NULL); |
| 436 | if (DbmError != NULL) |
| 437 | PyDict_SetItemString(d, "error", DbmError); |
Guido van Rossum | 4b4c664 | 1994-08-08 08:06:37 +0000 | [diff] [blame] | 438 | } |