chiark / gitweb /
Bug squashing.
[catacomb-python] / catacomb-python.h
1 /* -*-c-*-
2  *
3  * $Id$
4  *
5  * Definitions for Catacomb bindings
6  *
7  * (c) 2004 Straylight/Edgeware
8  */
9
10 /*----- Licensing notice --------------------------------------------------* 
11  *
12  * This file is part of the Python interface to Catacomb.
13  *
14  * Catacomb/Python is free software; you can redistribute it and/or modify
15  * it under the terms of the GNU General Public License as published by
16  * the Free Software Foundation; either version 2 of the License, or
17  * (at your option) any later version.
18  * 
19  * Catacomb/Python is distributed in the hope that it will be useful,
20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22  * GNU General Public License for more details.
23  * 
24  * You should have received a copy of the GNU General Public License
25  * along with Catacomb/Python; if not, write to the Free Software Foundation,
26  * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
27  */
28
29 #ifndef CATACOMB_PYTHON_H
30 #define CATACOMB_PYTHON_H
31
32 #ifdef __cplusplus
33   extern "C" {
34 #endif
35
36 /*----- Header files ------------------------------------------------------*/
37
38 #include <Python.h>
39 #include <longintrepr.h>
40 #include <structmember.h>
41
42 #undef ULLONG_MAX
43 #undef ULONG_LONG_MAX
44
45 #include <mLib/darray.h>
46 #include <mLib/dstr.h>
47 #include <mLib/macros.h>
48 #include <mLib/quis.h>
49
50 #include <catacomb/buf.h>
51
52 #include <catacomb/grand.h>
53 #include <catacomb/rand.h>
54 #include <catacomb/noise.h>
55 #include <catacomb/bbs.h>
56 #include <catacomb/mprand.h>
57 #include <catacomb/lcrand.h>
58 #include <catacomb/fibrand.h>
59 #include <catacomb/dsarand.h>
60 #include <catacomb/sslprf.h>
61 #include <catacomb/tlsprf.h>
62 #include <catacomb/blkc.h>
63
64 #include <catacomb/gcipher.h>
65 #include <catacomb/ghash.h>
66 #include <catacomb/gmac.h>
67 #include <catacomb/md5.h>
68 #include <catacomb/md5-hmac.h>
69 #include <catacomb/sha.h>
70 #include <catacomb/sha-mgf.h>
71 #include <catacomb/sha-hmac.h>
72
73 #include <catacomb/mp.h>
74 #include <catacomb/mpint.h>
75 #include <catacomb/mpmul.h>
76 #include <catacomb/mpcrt.h>
77 #include <catacomb/mpmont.h>
78 #include <catacomb/mpbarrett.h>
79 #include <catacomb/mpreduce.h>
80
81 #include <catacomb/pgen.h>
82 #include <catacomb/pfilt.h>
83 #include <catacomb/strongprime.h>
84 #include <catacomb/limlee.h>
85 #include <catacomb/dh.h>
86 #include <catacomb/ptab.h>
87 #include <catacomb/bintab.h>
88 #include <catacomb/dsa.h>
89
90 #include <catacomb/gf.h>
91 #include <catacomb/gfreduce.h>
92 #include <catacomb/gfn.h>
93
94 #include <catacomb/field.h>
95 #include <catacomb/field-guts.h>
96
97 #include <catacomb/ec.h>
98 #include <catacomb/ec-raw.h>
99 #include <catacomb/ectab.h>
100
101 #include <catacomb/group.h>
102 #include <catacomb/group-guts.h>
103
104 #include <catacomb/gdsa.h>
105 #include <catacomb/gkcdsa.h>
106 #include <catacomb/rsa.h>
107
108 #include <catacomb/key.h>
109 #include <catacomb/passphrase.h>
110 #include <catacomb/pixie.h>
111
112 #include <catacomb/share.h>
113 #include <catacomb/gfshare.h>
114
115 /*----- Utility macros ----------------------------------------------------*/
116
117 #define RETURN_OBJ(obj) do { Py_INCREF(obj); return (obj); } while (0)
118 #define RETURN_NONE RETURN_OBJ(Py_None)
119 #define RETURN_NOTIMPL RETURN_OBJ(Py_NotImplemented)
120 #define RETURN_TRUE RETURN_OBJ(Py_True)
121 #define RETURN_FALSE RETURN_OBJ(Py_False)
122 #define RETURN_ME RETURN_OBJ(me)
123
124 #define EXCERR(exc, str) do {                                           \
125   PyErr_SetString(exc, str);                                            \
126   goto end;                                                             \
127 } while (0)
128 #define VALERR(str) EXCERR(PyExc_ValueError, str)
129 #define TYERR(str) EXCERR(PyExc_TypeError, str)
130 #define ZDIVERR(str) EXCERR(PyExc_ZeroDivisionError, str)
131 #define SYNERR(str) EXCERR(PyExc_SyntaxError, str)
132 #define SYSERR(str) EXCERR(PyExc_SystemError, str)
133 #define NIERR(str) EXCERR(PyExc_NotImplementedError, str)
134 #define INDEXERR(idx) do {                                              \
135   PyErr_SetObject(PyExc_KeyError, idx);                                 \
136   goto end;                                                             \
137 } while (0)
138 #define OSERR(name) do {                                                \
139   PyErr_SetFromErrnoWithFilename(PyExc_OSError, name);                  \
140   goto end;                                                             \
141 } while (0)
142 #define PGENERR do { pgenerr(); goto end; } while (0)
143
144 #define CONVFUNC(ty, cty, ext)                                          \
145   int conv##ty(PyObject *o, void *p)                                    \
146   {                                                                     \
147     if (!PyObject_TypeCheck(o, ty##_pytype))                            \
148       TYERR("wanted a " #ty);                                           \
149     *(cty *)p = ext(o);                                                 \
150     return (1);                                                         \
151   end:                                                                  \
152     return (0);                                                         \
153   }
154
155 #define root_pytype 0
156 #define type_pytype &PyType_Type
157 #define INITTYPE(ty, base) do {                                         \
158   ty##_pytype_skel.tp_base = base##_pytype;                             \
159   ty##_pytype = inittype(&ty##_pytype_skel);                            \
160 } while (0)
161
162 #define INSERT(name, ob) do {                                           \
163   PyObject *_o = (PyObject *)(ob);                                      \
164   Py_INCREF(_o);                                                        \
165   PyModule_AddObject(mod, name, _o);                                    \
166 } while (0)
167
168 #define INSEXC(name, var, base, meth)                                   \
169   INSERT(name, var = mkexc(mod, base, name, meth))
170
171 #define METH(func, doc)                                                 \
172   { #func, METHNAME(func), METH_VARARGS, doc },
173 #define KWMETH(func, doc)                                               \
174   { #func, (PyCFunction)METHNAME(func),                                 \
175     METH_VARARGS | METH_KEYWORDS, doc },
176
177 #define GET(func, doc)                                                  \
178   { #func, GETSETNAME(get, func), 0, doc },
179 #define GETSET(func, doc)                                               \
180   { #func, GETSETNAME(get, func), GETSETNAME(set, func), doc },
181
182 #define MEMBER(name, ty, f, doc)                                        \
183   { #name, ty, offsetof(MEMBERSTRUCT, name), f, doc },
184
185 #define MODULES(_)                                                      \
186   _(bytestring) _(buffer)                                               \
187   _(rand) _(algorithms) _(pubkey) _(pgen)                               \
188   _(mp) _(field) _(ec) _(group)                                         \
189   _(passphrase) _(share) _(key)
190 #define DOMODINIT(m) m##_pyinit();
191 #define DOMODINSERT(m) m##_pyinsert(mod);
192 #define INIT_MODULES do { MODULES(DOMODINIT) } while (0)
193 #define INSERT_MODULES do { MODULES(DOMODINSERT) } while (0)
194
195 #define DO(m)                                                           \
196   extern void m##_pyinit(void);                                         \
197   extern void m##_pyinsert(PyObject *);
198 MODULES(DO)
199 #undef DO
200
201 #define FREEOBJ(obj)                                                    \
202   (((PyObject *)(obj))->ob_type->tp_free((PyObject *)(obj)))
203
204 #define GEN(func, base)                                                 \
205   static PyObject *func(void)                                           \
206   {                                                                     \
207     PyObject *d = PyDict_New();                                         \
208     PyObject *o;                                                        \
209     int i;                                                              \
210                                                                         \
211     for (i = 0; g##base##tab[i]; i++) {                                 \
212       o = gc##base##_pywrap((/*unconst*/ gc##base *)g##base##tab[i]);   \
213       PyDict_SetItemString(d,                                           \
214                            (/*unconst*/ char *)g##base##tab[i]->name,   \
215                            o);                                          \
216       Py_DECREF(o);                                                     \
217     }                                                                   \
218     return (d);                                                         \
219   }
220
221 struct nameval { const char *name; unsigned long value; };
222 extern void setconstants(PyObject *, const struct nameval *);
223
224 extern PyObject *mexp_common(PyObject *, PyObject *, size_t,
225                              PyObject *(*id)(PyObject *),
226                              int (*fill)(void *, PyObject *,
227                                          PyObject *, PyObject *),
228                              PyObject *(*exp)(PyObject *, void *, int),
229                              void (*drop)(void *));
230
231 extern int convulong(PyObject *, void *);
232 #define DECL_CONVU_(n) extern int convu##n(PyObject *, void *);
233 DOUINTSZ(DECL_CONVU_)
234 extern int convmpw(PyObject *, void *);
235 extern int convuint(PyObject *, void *);
236 extern int convszt(PyObject *, void *);
237 extern int convbool(PyObject *, void *);
238 extern PyObject *abstract_pynew(PyTypeObject *, PyObject *, PyObject *);
239 extern PyObject *getbool(int);
240 #define DECL_GETU_(n) extern PyObject *getu##n(uint##n);
241 DOUINTSZ(DECL_GETU_)
242 extern void *newtype(PyTypeObject *, const PyTypeObject *, const char *);
243
244 extern PyObject * mkexc(PyObject *, PyObject *, const char *, PyMethodDef *);
245 extern PyTypeObject *inittype(PyTypeObject *);
246 extern void addmethods(const PyMethodDef *);
247 extern PyMethodDef *donemethods(void);
248
249 /*----- Mapping methods ---------------------------------------------------*/
250
251 #define GMAP_METH(func, doc) { #func, gmapmeth_##func, METH_VARARGS, doc },
252 #define GMAP_KWMETH(func, doc)                                          \
253   { #func, (PyCFunction)gmapmeth_##func, METH_VARARGS|METH_KEYWORDS, doc },
254 #define GMAP_METHDECL(func, doc)                                        \
255   extern PyObject *gmapmeth_##func(PyObject *, PyObject *);
256 #define GMAP_KWMETHDECL(func, doc)                                      \
257   extern PyObject *gmapmeth_##func(PyObject *, PyObject *, PyObject *);
258
259 #define GMAP_DOMETHODS(METH, KWMETH)                                    \
260   METH  (has_key,       "D.has_key(KEY) -> BOOL")                       \
261   METH  (keys,          "D.keys() -> LIST")                             \
262   METH  (values,        "D.values() -> LIST")                           \
263   METH  (items,         "D.items() -> LIST")                            \
264   METH  (iterkeys,      "D.iterkeys() -> ITER")                         \
265   METH  (itervalues,    "D.itervalues() -> ITER")                       \
266   METH  (iteritems,     "D.iteritems() -> ITER")                        \
267   METH  (clear,         "D.clear()")                                    \
268   KWMETH(get,           "D.get(KEY, [default = None]) -> VALUE")        \
269   KWMETH(setdefault,    "D.setdefault(K, [default = None]) -> VALUE")   \
270   KWMETH(pop,           "D.pop(KEY, [default = <error>]) -> VALUE")     \
271   METH  (popitem,       "D.popitem() -> (KEY, VALUE)")                  \
272   METH  (update,        "D.update(MAP)")
273
274 GMAP_DOMETHODS(GMAP_METHDECL, GMAP_KWMETHDECL)
275 #define GMAP_METHODS GMAP_DOMETHODS(GMAP_METH, GMAP_KWMETH)
276 extern int gmap_pysize(PyObject *);
277 extern PySequenceMethods gmap_pysequence;
278 extern PyMethodDef gmap_pymethods[];
279
280 /*----- Bytestrings -------------------------------------------------------*/
281
282 PyTypeObject *bytestring_pyobj;
283 PyObject *bytestring_pywrap(const void *, size_t);
284 PyObject *bytestring_pywrapbuf(buf *);
285
286 /*----- Multiprecision arithmetic -----------------------------------------*/
287
288 typedef struct mp_pyobj {
289   PyObject_HEAD
290   mp *x;
291 } mp_pyobj;
292
293 extern PyTypeObject *mp_pytype;
294 extern PyTypeObject *gf_pytype;
295 #define MP_X(o) (((mp_pyobj *)(o))->x)
296 #define MP_PYCHECK(o) PyObject_TypeCheck((o), mp_pytype)
297 #define GF_PYCHECK(o) PyObject_TypeCheck((o), gf_pytype)
298
299 extern mp *mp_frompylong(PyObject *);
300 extern PyObject *mp_topylong(mp *);
301 extern mp *tomp(PyObject *);
302 extern mp *getmp(PyObject *);
303 extern int convmp(PyObject *, void *);
304 extern mp *getgf(PyObject *);
305 extern int convgf(PyObject *, void *);
306 extern PyObject *mp_pywrap(mp *);
307 extern PyObject *gf_pywrap(mp *);
308 extern mp *mp_frompyobject(PyObject *, int);
309 extern PyObject *mp_topystring(mp *, int,
310                                const char *, const char *, const char *);
311 extern int mp_tolong_checked(mp *, long *);
312
313 /*----- Abstract fields ---------------------------------------------------*/
314
315 typedef struct field_pyobj {
316   PyHeapTypeObject ty;
317   field *f;
318 } field_pyobj;
319
320 extern PyTypeObject *fe_pytype;
321 #define FE_PYCHECK(o) PyObject_TypeCheck((o), fe_pytype)
322 #define FE_F(o) (((fe_pyobj *)(o))->f)
323 #define FE_FOBJ(o) ((PyObject *)(o)->ob_type)
324 #define FE_X(o) (((fe_pyobj *)(o))->x)
325 extern PyObject *fe_pywrap(PyObject *, mp *);
326 extern mp *getfe(field *, PyObject *);
327
328 typedef struct fe_pyobj {
329   PyObject_HEAD
330   field *f;
331   mp *x;
332 } fe_pyobj;
333       
334 extern PyTypeObject *field_pytype;
335 extern PyTypeObject *primefield_pytype;
336 extern PyTypeObject *niceprimefield_pytype;
337 extern PyTypeObject *binfield_pytype;
338 extern PyTypeObject *binpolyfield_pytype;
339 extern PyTypeObject *binnormfield_pytype;
340 #define FIELD_PYCHECK(o) PyObject_TypeCheck((o), field_pytype)
341 #define FIELD_F(o) (((field_pyobj *)(o))->f)
342 extern PyObject *field_pywrap(field *);
343 extern field *field_copy(field *);
344
345 /*----- Elliptic curves ---------------------------------------------------*/
346
347 typedef struct ecpt_pyobj {
348   PyObject_HEAD
349   ec_curve *c;
350   ec p;
351 } ecpt_pyobj;
352
353 extern PyTypeObject *ecpt_pytype, *ecptcurve_pytype;
354 #define ECPT_PYCHECK(o) PyObject_TypeCheck((o), ecpt_pytype)
355 #define ECPTCURVE_PYCHECK(o) PyObject_TypeCheck((o), ecptcurve_pytype)
356 #define ECPT_C(o) (((ecpt_pyobj *)(o))->c)
357 #define ECPT_COBJ(o) ((PyObject *)(o)->ob_type)
358 #define ECPT_FOBJ(o) ECCURVE_FOBJ(ECPT_COBJ((o)))
359 #define ECPT_P(o) (&((ecpt_pyobj *)(o))->p)
360 extern PyObject *ecpt_pywrap(PyObject *, ec *);
361 extern PyObject *ecpt_pywrapout(void *, ec *);
362 extern int toecpt(ec_curve *, ec *, PyObject *);
363 extern int getecpt(ec_curve *, ec *, PyObject *);
364 extern void getecptout(ec *, PyObject *);
365 extern int convecpt(PyObject *, void *);
366
367 typedef struct eccurve_pyobj {
368   PyHeapTypeObject ty;
369   ec_curve *c;
370   PyObject *fobj;
371 } eccurve_pyobj;
372
373 extern PyTypeObject *eccurve_pytype;
374 extern PyTypeObject *ecprimecurve_pytype;
375 extern PyTypeObject *ecprimeprojcurve_pytype;
376 extern PyTypeObject *ecbincurve_pytype;
377 extern PyTypeObject *ecbinprojcurve_pytype;
378 #define ECCURVE_PYCHECK(o) PyObject_TypeCheck((o), eccurve_pytype)
379 #define ECCURVE_C(o) (((eccurve_pyobj *)(o))->c)
380 #define ECCURVE_FOBJ(o) (((eccurve_pyobj *)(o))->fobj)
381 extern PyObject *eccurve_pywrap(PyObject *, ec_curve *);
382 extern ec_curve *eccurve_copy(ec_curve *);
383
384 typedef struct ecinfo_pyobj {
385   PyObject_HEAD
386   ec_info ei;
387   PyObject *cobj;
388 } ecinfo_pyobj;
389       
390 extern PyTypeObject *ecinfo_pytype;
391 #define ECINFO_PYCHECK(o) PyObject_TypeCheck((o), ecinfo_pytype)
392 #define ECINFO_EI(o) (&((ecinfo_pyobj *)(o))->ei)
393 #define ECINFO_COBJ(o) (((ecinfo_pyobj *)(o))->cobj)
394 extern void ecinfo_copy(ec_info *, const ec_info *);
395 extern PyObject *ecinfo_pywrap(ec_info *);
396
397 /*----- Cyclic groups -----------------------------------------------------*/
398
399 typedef struct fginfo_pyobj {
400   PyObject_HEAD
401   gprime_param dp;
402 } fginfo_pyobj;
403
404 PyTypeObject *fginfo_pytype, *dhinfo_pytype, *bindhinfo_pytype;
405 #define FGINFO_DP(fg) (&((fginfo_pyobj *)(fg))->dp)
406 PyObject *fginfo_pywrap(gprime_param *, PyTypeObject *);
407
408 typedef struct ge_pyobj {
409   PyObject_HEAD
410   ge *x;
411   group *g;
412 } ge_pyobj;
413
414 extern PyTypeObject *ge_pytype;
415 #define GE_PYCHECK(o) PyObject_TypeCheck((o), ge_pytype)
416 #define GE_X(o) (((ge_pyobj *)(o))->x)
417 #define GE_G(o) (((ge_pyobj *)(o))->g)
418 #define GE_GOBJ(o) ((PyObject *)(group_pyobj *)(o)->ob_type)
419 extern PyObject *ge_pywrap(PyObject *, ge *);
420
421 typedef struct group_pyobj {
422   PyHeapTypeObject ty;
423   group *g;
424 } group_pyobj;
425
426 extern PyTypeObject *group_pytype;
427 extern PyTypeObject *primegroup_pytype, *bingroup_pytype, *ecgroup_pytype;
428 #define GROUP_G(o) (((group_pyobj *)(o))->g)
429 extern PyObject *group_pywrap(group *);
430 extern group *group_copy(group *);
431
432 /*----- Random number generators ------------------------------------------*/
433
434 #define f_freeme 1u
435
436 typedef struct grand_pyobj {
437   PyObject_HEAD
438   unsigned f;
439   grand *r;
440 } grand_pyobj;
441
442 extern PyTypeObject *grand_pytype, *truerand_pytype;
443 extern PyTypeObject *lcrand_pytype,* fibrand_pytype;
444 extern PyTypeObject *dsarand_pytype, *bbs_pytype;
445 extern PyObject *rand_pyobj;
446 #define GRAND_PYCHECK(o) PyObject_TypeCheck((o), grand_pytype)
447 #define GRAND_F(o) (((grand_pyobj *)(o))->f)
448 #define GRAND_R(o) (((grand_pyobj *)(o))->r)
449 extern PyObject *grand_pywrap(grand *, unsigned);
450 extern int convgrand(PyObject *, void *);
451
452 /*----- Key sizes ---------------------------------------------------------*/
453
454 typedef struct keysz_pyobj {
455   PyObject_HEAD
456   int dfl;
457 } keysz_pyobj;
458
459 typedef struct keyszrange_pyobj {
460   PyObject_HEAD
461   int dfl;
462   int min, max, mod;
463 } keyszrange_pyobj;
464
465 typedef struct keyszset_pyobj {
466   PyObject_HEAD
467   int dfl;
468   PyObject *set;
469 } keyszset_pyobj;
470
471 #define KEYSZ_PYCHECK(o) PyObject_TypeCheck((o), keysz_pytype)
472 extern PyObject *keysz_pywrap(const octet *);
473
474 /*----- Symmetric cryptography --------------------------------------------*/
475
476 typedef struct gccipher_pyobj {
477   PyHeapTypeObject ty;
478   gccipher *cc;
479 } gccipher_pyobj;
480
481 extern PyTypeObject *gccipher_pytype;
482 #define GCCIPHER_PYCHECK(o) PyObject_TypeCheck((o), gccipher_pytype)
483 #define GCCIPHER_CC(o) (((gccipher_pyobj *)(o))->cc)
484 #define GCCIPHER_F(o) (((gccipher_pyobj *)(o))->f)
485 extern PyObject *gccipher_pywrap(gccipher *);
486 extern int convgccipher(PyObject *, void *);
487 extern int convgcipher(PyObject *, void *);
488
489 typedef struct gcipher_pyobj {
490   PyObject_HEAD
491   unsigned f;
492   gcipher *c;
493 } gcipher_pyobj;
494
495 extern PyTypeObject *gcipher_pytype;
496 #define GCIPHER_PYCHECK(o) PyObject_TypeCheck((o), gcipher_pytype)
497 #define GCIPHER_C(o) (((gcipher_pyobj *)(o))->c)
498 #define GCIPHER_F(o) (((gcipher_pyobj *)(o))->f)
499 extern PyObject *gcipher_pywrap(PyObject *, gcipher *, unsigned);
500 extern int convgcipher(PyObject *, void *);
501
502 typedef struct gchash_pyobj {
503   PyHeapTypeObject ty;
504   gchash *ch;
505 } gchash_pyobj;
506
507 extern PyTypeObject *gchash_pytype;
508 #define GCHASH_PYCHECK(o) PyObject_TypeCheck((o), gchash_pytype)
509 #define GCHASH_CH(o) (((gchash_pyobj *)(o))->ch)
510 #define GCHASH_F(o) (((gchash_pyobj *)(o))->f)
511 extern PyObject *gchash_pywrap(gchash *);
512 extern int convgchash(PyObject *, void *);
513
514 typedef struct ghash_pyobj {
515   PyObject_HEAD
516   unsigned f;
517   ghash *h;
518 } ghash_pyobj;
519
520 extern PyTypeObject *ghash_pytype, *gmhash_pytype;
521 extern PyObject *sha_pyobj, *has160_pyobj;
522 #define GHASH_PYCHECK(o) PyObject_TypeCheck((o), ghash_pytype)
523 #define GHASH_H(o) (((ghash_pyobj *)(o))->h)
524 #define GHASH_F(o) (((ghash_pyobj *)(o))->f)
525 extern PyObject *ghash_pywrap(PyObject *, ghash *, unsigned);
526 extern int convghash(PyObject *, void *);
527 extern int convgmhash(PyObject *, void *);
528
529 typedef struct gcmac_pyobj {
530   PyHeapTypeObject ty;
531   gcmac *cm;
532 } gcmac_pyobj;
533
534 extern PyTypeObject *gcmac_pytype;
535 #define GCMAC_PYCHECK(o) PyObject_TypeCheck((o), gcmac_pytype)
536 #define GCMAC_CM(o) (((gcmac_pyobj *)(o))->cm)
537 #define GCMAC_F(o) (((gcmac_pyobj *)(o))->f)
538 extern PyObject *gcmac_pywrap(gcmac *);
539 extern int convgcmac(PyObject *, void *);
540
541 typedef struct gmac_pyobj {
542   PyHeapTypeObject ty;
543   unsigned f;
544   gmac *m;
545 } gmac_pyobj;
546
547 extern PyTypeObject *gmac_pytype;
548 #define GMAC_PYCHECK(o) PyObject_TypeCheck((o), gmac_pytype)
549 #define GMAC_M(o) (((gmac_pyobj *)(o))->m)
550 #define GMAC_F(o) (((gmac_pyobj *)(o))->f)
551 extern PyObject *gmac_pywrap(PyObject *, gmac *, unsigned);
552 extern int convgmac(PyObject *, void *);
553
554 /*----- Key generation ----------------------------------------------------*/
555     
556 typedef struct pfilt_pyobj {
557   PyObject_HEAD
558   pfilt f;
559   int st;
560 } pfilt_pyobj;
561
562 extern PyTypeObject *pfilt_pytype;
563 #define PFILT_PYCHECK(o) PyObject_TypeCheck(o, pfilt_pytype)
564 #define PFILT_F(o) (&((pfilt_pyobj *)(o))->f)
565 #define PFILT_ST(o) (((pfilt_pyobj *)(o))->st)
566
567 typedef struct { pgen_proc *proc; void *ctx; } pgev;
568 #define PGEV_HEAD PyObject_HEAD pgev pg;
569
570 typedef struct pgev_pyobj {
571   PGEV_HEAD
572 } pgev_pyobj;
573
574 extern PyTypeObject *pgev_pytype;
575 #define PGEV_PYCHECK(o) PyObject_TypeCheck(o, pgev_pytype)
576 #define PGEV_PG(o) (&((pgev_pyobj *)(o))->pg)
577
578 extern int convpgev(PyObject *, void *);
579 extern void droppgev(pgev *);
580 extern void pgenerr(void);
581
582 /*----- That's all, folks -------------------------------------------------*/
583
584 #ifdef __cplusplus
585   }
586 #endif
587
588 #endif