chiark - git - mdw - mLib-python/blob - assoc.pyx

   1 ### -*-pyrex-*-
   2 ###
   3 ### Association tables
   4 ###
   5 ### (c) 2005 Straylight/Edgeware
   6 ###
   7
   8 ###----- Licensing notice ---------------------------------------------------
   9 ###
  10 ### This file is part of the Python interface to mLib.
  11 ###
  12 ### mLib/Python is free software; you can redistribute it and/or modify
  13 ### it under the terms of the GNU General Public License as published by
  14 ### the Free Software Foundation; either version 2 of the License, or
  15 ### (at your option) any later version.
  16 ###
  17 ### mLib/Python is distributed in the hope that it will be useful,
  18 ### but WITHOUT ANY WARRANTY; without even the implied warranty of
  19 ### MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20 ### GNU General Public License for more details.
  21 ###
  22 ### You should have received a copy of the GNU General Public License
  23 ### along with mLib/Python; if not, write to the Free Software Foundation,
  24 ### Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  25
  26 cdef struct _assoc_entry:
  27   sym_base _b
  28   PyObject *v
  29
  30 cdef class AssocTable (_Mapping):
  31   cdef assoc_table _t
  32   def __cinit__(me):
  33     assoc_create(&me._t)
  34   cdef int _init(me) except -1:
  35     return 0
  36   cdef void *_find(me, object key, unsigned *f) except NULL:
  37     cdef _assoc_entry *e = NULL
  38     cdef object a = atom_pyintern(key)
  39     if not f:
  40       e = <_assoc_entry *>assoc_find(&me._t, ATOM_A(a), 0, NULL)
  41       if not e:
  42         raise KeyError(a)
  43     else:
  44       e = <_assoc_entry *>assoc_find(&me._t, ATOM_A(a), PSIZEOF(e), f)
  45       if not f[0]:
  46         e.v = NULL
  47     return <void *>e
  48   cdef object _key(me, void *e):
  49     return atom_pywrap(ASSOC_ATOM(e))
  50   cdef object _value(me, void *e):
  51     cdef _assoc_entry *ee = <_assoc_entry *>e
  52     Py_INCREF(ee.v)
  53     return <object>ee.v
  54   cdef void _setval(me, void *e, object val):
  55     cdef _assoc_entry *ee = <_assoc_entry *>e
  56     if ee.v:
  57       Py_DECREF(ee.v)
  58     ee.v = <PyObject *>val
  59     Py_INCREF(ee.v)
  60   cdef void _del(me, void *e):
  61     cdef _assoc_entry *ee = <_assoc_entry *>e
  62     if ee.v:
  63       Py_DECREF(ee.v)
  64     assoc_remove(&me._t, <void *>ee)
  65   cdef _MapIterator _iter(me):
  66     return _AssocIter(me)
  67
  68 cdef class _AssocIter (_MapIterator):
  69   cdef AssocTable t
  70   cdef assoc_iter i
  71   def __cinit__(me, AssocTable t not None):
  72     me.t = t
  73     assoc_mkiter(&me.i, &me.t._t)
  74   cdef void *_next(me):
  75     return assoc_next(&me.i)
  76
  77 ###----- That's all, folks --------------------------------------------------