chiark / gitweb /
~mdw / catacomb-python / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
key: Make KeyFiles iterate over their keyids, not their keys.
[catacomb-python] / pubkey.c
CommitLineData
d7ab1bab 1/* -*-c-*-
2 *
3 * $Id$
4 *
5 * Public-key cryptography
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/*----- Header files ------------------------------------------------------*/
30
31#include "catacomb-python.h"
32
33/*----- DSA and similar ---------------------------------------------------*/
34
35typedef struct dsa_pyobj {
36 PyObject_HEAD
37 PyObject *G, *u, *p, *rng, *hash;
38 gdsa d;
39} dsa_pyobj;
40
41static PyTypeObject *dsapub_pytype, *dsapriv_pytype;
42static PyTypeObject *kcdsapub_pytype, *kcdsapriv_pytype;
43#define DSA_D(o) (&((dsa_pyobj *)(o))->d)
44#define DSA_G(o) (((dsa_pyobj *)(o))->G)
45#define DSA_U(o) (((dsa_pyobj *)(o))->u)
46#define DSA_P(o) (((dsa_pyobj *)(o))->p)
47#define DSA_RNG(o) (((dsa_pyobj *)(o))->rng)
48#define DSA_HASH(o) (((dsa_pyobj *)(o))->hash)
49
50static void dsa_pydealloc(PyObject *me)
51{
52 dsa_pyobj *g = (dsa_pyobj *)me;
53 Py_DECREF(g->G); Py_DECREF(g->u); Py_DECREF(g->p);
54 Py_DECREF(g->rng); Py_DECREF(g->hash);
3aa33042 55 FREEOBJ(me);
d7ab1bab 56}
57
58static PyObject *dsa_setup(PyTypeObject *ty, PyObject *G, PyObject *u,
59 PyObject *p, PyObject *rng, PyObject *hash)
60{
61 dsa_pyobj *g;
62
63 g = PyObject_New(dsa_pyobj, ty);
64 if (GROUP_G(G) != GE_G(p) && !group_samep(GROUP_G(G), GE_G(p)))
65 TYERR("public key not from group");
66 if (!u) {
67 g->d.u = 0;
68 u = Py_None;
69 } else if ((g->d.u = getmp(u)) == 0)
70 goto end;
71 g->d.g = GROUP_G(G);
72 g->d.p = GE_X(p);
73 g->d.r = GRAND_R(rng);
74 g->d.h = GCHASH_CH(hash);
75 g->G = G; Py_INCREF(G); g->u = u; Py_INCREF(u); g->p = p; Py_INCREF(p);
76 rng = g->rng; Py_INCREF(rng); g->hash = hash; Py_INCREF(hash);
77 return ((PyObject *)g);
78end:
3aa33042 79 FREEOBJ(g);
d7ab1bab 80 return (0);
81}
82
83static PyObject *dsapub_pynew(PyTypeObject *ty,
84 PyObject *arg, PyObject *kw)
85{
86 PyObject *G, *p, *u = 0, *rng = rand_pyobj, *hash = sha_pyobj;
87 PyObject *rc = 0;
88 char *kwlist[] = { "G", "p", "u", "hash", "rng", 0 };
89
90 if (!PyArg_ParseTupleAndKeywords(arg, kw, "O!O!O!|OO!:new", kwlist,
91 group_pytype, &G,
92 ge_pytype, &p,
93 &u,
94 gchash_pytype, &hash,
95 grand_pytype, &rng) ||
96 (rc = dsa_setup(dsapub_pytype, G, u, p, rng, hash)) == 0)
97 goto end;
98end:
99 return (rc);
100}
101
102static PyObject *dsameth_beginhash(PyObject *me, PyObject *arg)
103{
104 if (!PyArg_ParseTuple(arg, ":beginhash")) return (0);
105 return (ghash_pywrap(DSA_HASH(me), gdsa_beginhash(DSA_D(me)), f_freeme));
106}
107
108static PyObject *dsameth_endhash(PyObject *me, PyObject *arg)
109{
110 ghash *h;
111 PyObject *rc;
112 if (!PyArg_ParseTuple(arg, "O&:endhash", convghash, &h)) return (0);
113 gdsa_endhash(DSA_D(me), h);
114 h = GH_COPY(h);
115 rc = bytestring_pywrap(0, GH_CLASS(h)->hashsz);
116 GH_DONE(h, PyString_AS_STRING(rc));
117 GH_DESTROY(h);
118 return (rc);
119}
120
121static PyObject *dsameth_sign(PyObject *me, PyObject *arg, PyObject *kw)
122{
123 gdsa_sig s = GDSA_SIG_INIT;
124 char *p;
125 int n;
126 mp *k = 0;
127 PyObject *rc = 0;
128 char *kwlist[] = { "msg", "k", 0 };
129
130 if (!PyArg_ParseTupleAndKeywords(arg, kw, "s#|O&:sign", kwlist,
131 &p, &n, convmp, &k))
132 goto end;
133 if (n != DSA_D(me)->h->hashsz)
134 VALERR("bad message length (doesn't match hash size)");
135 gdsa_sign(DSA_D(me), &s, p, k);
136 rc = Py_BuildValue("(NN)", mp_pywrap(s.r), mp_pywrap(s.s));
137end:
138 mp_drop(k);
139 return (rc);
140}
141
142static PyObject *dsameth_verify(PyObject *me, PyObject *arg)
143{
144 char *p;
145 int n;
146 gdsa_sig s = GDSA_SIG_INIT;
147 PyObject *rc = 0;
148
149 if (!PyArg_ParseTuple(arg, "s#(O&O&):verify",
150 &p, &n, convmp, &s.r, convmp, &s.s))
151 goto end;
152 if (n != DSA_D(me)->h->hashsz)
153 VALERR("bad message length (doesn't match hash size)");
154 rc = getbool(gdsa_verify(DSA_D(me), &s, p));
155end:
156 mp_drop(s.r);
157 mp_drop(s.s);
158 return (rc);
159}
160
161static PyObject *dsapriv_pynew(PyTypeObject *ty,
162 PyObject *arg, PyObject *kw)
163{
164 PyObject *G, *p, *u = Py_None, *rng = rand_pyobj, *hash = sha_pyobj;
165 PyObject *rc = 0;
166 char *kwlist[] = { "G", "p", "u", "hash", "rng", 0 };
167
168 if (!PyArg_ParseTupleAndKeywords(arg, kw, "O!O!|O!OO!:new", kwlist,
169 group_pytype, &G,
170 ge_pytype, &p,
171 &u,
172 gchash_pytype, &hash,
173 grand_pytype, &rng) ||
174 (rc = dsa_setup(dsapriv_pytype, G, p, u, rng, hash)) == 0)
175 goto end;
176end:
177 return (rc);
178}
179
180static PyMethodDef dsapub_pymethods[] = {
181#define METHNAME(name) dsameth_##name
182 METH (beginhash, "D.beginhash() -> hash object")
183 METH (endhash, "D.endhash(H) -> BYTES")
184 METH (verify, "D.verify(MSG, (R, S)) -> true/false")
185#undef METHNAME
186 { 0 }
187};
188
189static PyMethodDef dsapriv_pymethods[] = {
190#define METHNAME(name) dsameth_##name
191 KWMETH(sign, "D.sign(MSG, k = K) -> R, S")
192#undef METHNAME
193 { 0 }
194};
195
196static PyMemberDef dsapub_pymembers[] = {
197#define MEMBERSTRUCT dsa_pyobj
198 MEMBER(G, T_OBJECT, READONLY, "D.G -> group to work in")
199 MEMBER(p, T_OBJECT, READONLY, "D.p -> public key (group element")
200 MEMBER(rng, T_OBJECT, READONLY, "D.rng -> random number generator")
201 MEMBER(hash, T_OBJECT, READONLY, "D.hash -> hash class")
202#undef MEMBERSTRUCT
203 { 0 }
204};
205
206static PyMemberDef dsapriv_pymembers[] = {
207#define MEMBERSTRUCT dsa_pyobj
208 MEMBER(u, T_OBJECT, READONLY, "D.u -> private key (exponent)")
209#undef MEMBERSTRUCT
210 { 0 }
211};
212
213static PyTypeObject dsapub_pytype_skel = {
6d4db0bf 214 PyObject_HEAD_INIT(0) 0, /* Header */
d7ab1bab 215 "catacomb.DSAPub", /* @tp_name@ */
216 sizeof(dsa_pyobj), /* @tp_basicsize@ */
217 0, /* @tp_itemsize@ */
218
219 dsa_pydealloc, /* @tp_dealloc@ */
220 0, /* @tp_print@ */
221 0, /* @tp_getattr@ */
222 0, /* @tp_setattr@ */
223 0, /* @tp_compare@ */
224 0, /* @tp_repr@ */
225 0, /* @tp_as_number@ */
226 0, /* @tp_as_sequence@ */
227 0, /* @tp_as_mapping@ */
228 0, /* @tp_hash@ */
229 0, /* @tp_call@ */
230 0, /* @tp_str@ */
231 0, /* @tp_getattro@ */
232 0, /* @tp_setattro@ */
233 0, /* @tp_as_buffer@ */
234 Py_TPFLAGS_DEFAULT | /* @tp_flags@ */
235 Py_TPFLAGS_BASETYPE,
236
237 /* @tp_doc@ */
238"DSA public key information.",
239
240 0, /* @tp_traverse@ */
241 0, /* @tp_clear@ */
242 0, /* @tp_richcompare@ */
243 0, /* @tp_weaklistoffset@ */
244 0, /* @tp_iter@ */
963a6148 245 0, /* @tp_iternext@ */
d7ab1bab 246 dsapub_pymethods, /* @tp_methods@ */
247 dsapub_pymembers, /* @tp_members@ */
248 0, /* @tp_getset@ */
249 0, /* @tp_base@ */
250 0, /* @tp_dict@ */
251 0, /* @tp_descr_get@ */
252 0, /* @tp_descr_set@ */
253 0, /* @tp_dictoffset@ */
254 0, /* @tp_init@ */
255 PyType_GenericAlloc, /* @tp_alloc@ */
256 dsapub_pynew, /* @tp_new@ */
3aa33042 257 0, /* @tp_free@ */
d7ab1bab 258 0 /* @tp_is_gc@ */
259};
260
261static PyTypeObject dsapriv_pytype_skel = {
6d4db0bf 262 PyObject_HEAD_INIT(0) 0, /* Header */
d7ab1bab 263 "catacomb.DSAPriv", /* @tp_name@ */
264 sizeof(dsa_pyobj), /* @tp_basicsize@ */
265 0, /* @tp_itemsize@ */
266
267 0, /* @tp_dealloc@ */
268 0, /* @tp_print@ */
269 0, /* @tp_getattr@ */
270 0, /* @tp_setattr@ */
271 0, /* @tp_compare@ */
272 0, /* @tp_repr@ */
273 0, /* @tp_as_number@ */
274 0, /* @tp_as_sequence@ */
275 0, /* @tp_as_mapping@ */
276 0, /* @tp_hash@ */
277 0, /* @tp_call@ */
278 0, /* @tp_str@ */
279 0, /* @tp_getattro@ */
280 0, /* @tp_setattro@ */
281 0, /* @tp_as_buffer@ */
282 Py_TPFLAGS_DEFAULT | /* @tp_flags@ */
283 Py_TPFLAGS_BASETYPE,
284
285 /* @tp_doc@ */
286"DSA private key information.",
287
288 0, /* @tp_traverse@ */
289 0, /* @tp_clear@ */
290 0, /* @tp_richcompare@ */
291 0, /* @tp_weaklistoffset@ */
292 0, /* @tp_iter@ */
963a6148 293 0, /* @tp_iternext@ */
d7ab1bab 294 dsapriv_pymethods, /* @tp_methods@ */
295 dsapriv_pymembers, /* @tp_members@ */
296 0, /* @tp_getset@ */
297 0, /* @tp_base@ */
298 0, /* @tp_dict@ */
299 0, /* @tp_descr_get@ */
300 0, /* @tp_descr_set@ */
301 0, /* @tp_dictoffset@ */
302 0, /* @tp_init@ */
303 PyType_GenericAlloc, /* @tp_alloc@ */
304 dsapriv_pynew, /* @tp_new@ */
3aa33042 305 0, /* @tp_free@ */
d7ab1bab 306 0 /* @tp_is_gc@ */
307};
308
309static PyObject *kcdsapub_pynew(PyTypeObject *ty,
310 PyObject *arg, PyObject *kw)
311{
312 PyObject *G, *p, *u = 0, *rng = rand_pyobj, *hash = has160_pyobj;
313 PyObject *rc = 0;
314 char *kwlist[] = { "G", "p", "u", "hash", "rng", 0 };
315
316 if (!PyArg_ParseTupleAndKeywords(arg, kw, "O!O!O!|OO!:new", kwlist,
317 group_pytype, &G,
318 ge_pytype, &p,
319 &u,
320 gchash_pytype, &hash,
321 grand_pytype, &rng) ||
322 (rc = dsa_setup(kcdsapub_pytype, G, p, u, rng, hash)) == 0)
323 goto end;
324end:
325 return (rc);
326}
327
328static PyObject *kcdsapriv_pynew(PyTypeObject *ty,
329 PyObject *arg, PyObject *kw)
330{
331 PyObject *G, *p, *u = Py_None, *rng = rand_pyobj, *hash = has160_pyobj;
332 PyObject *rc = 0;
333 char *kwlist[] = { "G", "p", "u", "hash", "rng", 0 };
334
335 if (!PyArg_ParseTupleAndKeywords(arg, kw, "O!O!|O!OO!:new", kwlist,
336 group_pytype, &G,
337 ge_pytype, &p,
338 &u,
339 gchash_pytype, &hash,
340 grand_pytype, &rng) ||
341 (rc = dsa_setup(kcdsapriv_pytype, G, p, u, rng, hash)) == 0)
342 goto end;
343end:
344 return (rc);
345}
346
347static PyObject *kcdsameth_beginhash(PyObject *me, PyObject *arg)
348{
349 if (!PyArg_ParseTuple(arg, ":beginhash")) return (0);
350 return (ghash_pywrap(DSA_HASH(me), gkcdsa_beginhash(DSA_D(me)), f_freeme));
351}
352
353static PyObject *kcdsameth_endhash(PyObject *me, PyObject *arg)
354{
355 ghash *h;
356 PyObject *rc;
357 if (!PyArg_ParseTuple(arg, "O&:endhash", convghash, &h)) return (0);
358 gkcdsa_endhash(DSA_D(me), h);
359 h = GH_COPY(h);
360 rc = bytestring_pywrap(0, GH_CLASS(h)->hashsz);
361 GH_DONE(h, PyString_AS_STRING(rc));
362 GH_DESTROY(h);
363 return (rc);
364}
365
366static PyObject *kcdsameth_sign(PyObject *me, PyObject *arg, PyObject *kw)
367{
368 gkcdsa_sig s = GKCDSA_SIG_INIT;
369 char *p;
370 int n;
371 mp *k = 0;
372 PyObject *r = 0, *rc = 0;
373 char *kwlist[] = { "msg", "k", 0 };
374
375 if (!PyArg_ParseTupleAndKeywords(arg, kw, "s#|O&:sign", kwlist,
376 &p, &n, convmp, &k))
377 goto end;
378 if (n != DSA_D(me)->h->hashsz)
379 VALERR("bad message length (doesn't match hash size)");
380 r = bytestring_pywrap(0, DSA_D(me)->h->hashsz);
46e6ad89 381 s.r = (octet *)PyString_AS_STRING(r);
d7ab1bab 382 gkcdsa_sign(DSA_D(me), &s, p, k);
383 rc = Py_BuildValue("(NN)", r, mp_pywrap(s.s));
384end:
385 Py_XDECREF(r);
386 mp_drop(k);
387 return (rc);
388}
389
390static PyObject *kcdsameth_verify(PyObject *me, PyObject *arg)
391{
392 char *p;
393 int n, rn;
394 gkcdsa_sig s = GKCDSA_SIG_INIT;
395 PyObject *rc = 0;
396
397 if (!PyArg_ParseTuple(arg, "s#(s#O&):verify",
398 &p, &n, &s.r, &rn, convmp, &s.s))
399 goto end;
400 if (n != DSA_D(me)->h->hashsz)
401 VALERR("bad message length (doesn't match hash size)");
402 if (rn != DSA_D(me)->h->hashsz)
403 VALERR("bad signature `r' length (doesn't match hash size)");
404 rc = getbool(gkcdsa_verify(DSA_D(me), &s, p));
405end:
406 mp_drop(s.s);
407 return (rc);
408}
409
410static PyMethodDef kcdsapub_pymethods[] = {
411#define METHNAME(name) kcdsameth_##name
412 METH (beginhash, "D.beginhash() -> hash object")
413 METH (endhash, "D.endhash(H) -> BYTES")
414 METH (verify, "D.verify(MSG, (R, S)) -> true/false")
415#undef METHNAME
416 { 0 }
417};
418
419static PyMethodDef kcdsapriv_pymethods[] = {
420#define METHNAME(name) kcdsameth_##name
421 KWMETH(sign, "D.sign(MSG, k = K) -> R, S")
422#undef METHNAME
423 { 0 }
424};
425
426static PyTypeObject kcdsapub_pytype_skel = {
6d4db0bf 427 PyObject_HEAD_INIT(0) 0, /* Header */
d7ab1bab 428 "catacomb.KCDSAPub", /* @tp_name@ */
429 sizeof(dsa_pyobj), /* @tp_basicsize@ */
430 0, /* @tp_itemsize@ */
431
432 dsa_pydealloc, /* @tp_dealloc@ */
433 0, /* @tp_print@ */
434 0, /* @tp_getattr@ */
435 0, /* @tp_setattr@ */
436 0, /* @tp_compare@ */
437 0, /* @tp_repr@ */
438 0, /* @tp_as_number@ */
439 0, /* @tp_as_sequence@ */
440 0, /* @tp_as_mapping@ */
441 0, /* @tp_hash@ */
442 0, /* @tp_call@ */
443 0, /* @tp_str@ */
444 0, /* @tp_getattro@ */
445 0, /* @tp_setattro@ */
446 0, /* @tp_as_buffer@ */
447 Py_TPFLAGS_DEFAULT | /* @tp_flags@ */
448 Py_TPFLAGS_BASETYPE,
449
450 /* @tp_doc@ */
451"KCDSA public key information.",
452
453 0, /* @tp_traverse@ */
454 0, /* @tp_clear@ */
455 0, /* @tp_richcompare@ */
456 0, /* @tp_weaklistoffset@ */
457 0, /* @tp_iter@ */
963a6148 458 0, /* @tp_iternext@ */
d7ab1bab 459 kcdsapub_pymethods, /* @tp_methods@ */
460 dsapub_pymembers, /* @tp_members@ */
461 0, /* @tp_getset@ */
462 0, /* @tp_base@ */
463 0, /* @tp_dict@ */
464 0, /* @tp_descr_get@ */
465 0, /* @tp_descr_set@ */
466 0, /* @tp_dictoffset@ */
467 0, /* @tp_init@ */
468 PyType_GenericAlloc, /* @tp_alloc@ */
469 kcdsapub_pynew, /* @tp_new@ */
3aa33042 470 0, /* @tp_free@ */
d7ab1bab 471 0 /* @tp_is_gc@ */
472};
473
474static PyTypeObject kcdsapriv_pytype_skel = {
6d4db0bf 475 PyObject_HEAD_INIT(0) 0, /* Header */
d7ab1bab 476 "catacomb.KCDSAPriv", /* @tp_name@ */
477 sizeof(dsa_pyobj), /* @tp_basicsize@ */
478 0, /* @tp_itemsize@ */
479
480 0, /* @tp_dealloc@ */
481 0, /* @tp_print@ */
482 0, /* @tp_getattr@ */
483 0, /* @tp_setattr@ */
484 0, /* @tp_compare@ */
485 0, /* @tp_repr@ */
486 0, /* @tp_as_number@ */
487 0, /* @tp_as_sequence@ */
488 0, /* @tp_as_mapping@ */
489 0, /* @tp_hash@ */
490 0, /* @tp_call@ */
491 0, /* @tp_str@ */
492 0, /* @tp_getattro@ */
493 0, /* @tp_setattro@ */
494 0, /* @tp_as_buffer@ */
495 Py_TPFLAGS_DEFAULT | /* @tp_flags@ */
496 Py_TPFLAGS_BASETYPE,
497
498 /* @tp_doc@ */
499"KCDSA private key information.",
500
501 0, /* @tp_traverse@ */
502 0, /* @tp_clear@ */
503 0, /* @tp_richcompare@ */
504 0, /* @tp_weaklistoffset@ */
505 0, /* @tp_iter@ */
963a6148 506 0, /* @tp_iternext@ */
d7ab1bab 507 kcdsapriv_pymethods, /* @tp_methods@ */
508 dsapriv_pymembers, /* @tp_members@ */
509 0, /* @tp_getset@ */
510 0, /* @tp_base@ */
511 0, /* @tp_dict@ */
512 0, /* @tp_descr_get@ */
513 0, /* @tp_descr_set@ */
514 0, /* @tp_dictoffset@ */
515 0, /* @tp_init@ */
516 PyType_GenericAlloc, /* @tp_alloc@ */
517 kcdsapriv_pynew, /* @tp_new@ */
3aa33042 518 0, /* @tp_free@ */
d7ab1bab 519 0 /* @tp_is_gc@ */
520};
521
522/*----- RSA ---------------------------------------------------------------*/
523
524typedef struct rsapub_pyobj {
525 PyObject_HEAD
526 rsa_pub pub;
527 rsa_pubctx pubctx;
528} rsapub_pyobj;
529
530#define RSA_PUB(o) (&((rsapub_pyobj *)(o))->pub)
531#define RSA_PUBCTX(o) (&((rsapub_pyobj *)(o))->pubctx)
532
533typedef struct rsapriv_pyobj {
534 PyObject_HEAD
535 rsa_pub pub;
536 rsa_pubctx pubctx;
537 rsa_priv priv;
538 rsa_privctx privctx;
539 PyObject *rng;
540} rsapriv_pyobj;
541
542#define RSA_PRIV(o) (&((rsapriv_pyobj *)(o))->priv)
543#define RSA_PRIVCTX(o) (&((rsapriv_pyobj *)(o))->privctx)
544#define RSA_RNG(o) (((rsapriv_pyobj *)(o))->rng)
545
546static PyTypeObject *rsapub_pytype, *rsapriv_pytype;
547
548static PyObject *rsapub_pynew(PyTypeObject *ty,
549 PyObject *arg, PyObject *kw)
550{
551 rsa_pub rp = { 0 };
552 rsapub_pyobj *o;
553 char *kwlist[] = { "n", "e", 0 };
554
555 if (!PyArg_ParseTupleAndKeywords(arg, kw, "O&O&:new", kwlist,
556 convmp, &rp.n, convmp, &rp.e))
557 goto end;
558 o = (rsapub_pyobj *)ty->tp_alloc(ty, 0);
559 o->pub = rp;
560 rsa_pubcreate(&o->pubctx, &o->pub);
561 return ((PyObject *)o);
562end:
563 rsa_pubfree(&rp);
564 return (0);
565}
566
567static void rsapub_pydealloc(PyObject *me)
568{
569 rsa_pubdestroy(RSA_PUBCTX(me));
570 rsa_pubfree(RSA_PUB(me));
3aa33042 571 FREEOBJ(me);
d7ab1bab 572}
573
574static PyObject *rsaget_n(PyObject *me, void *hunoz)
575 { return mp_pywrap(MP_COPY(RSA_PUB(me)->n)); }
576
577static PyObject *rsaget_e(PyObject *me, void *hunoz)
578 { return mp_pywrap(MP_COPY(RSA_PUB(me)->e)); }
579
580static PyObject *rsameth_pubop(PyObject *me, PyObject *arg)
581{
582 mp *x = 0;
583 PyObject *rc = 0;
584
585 if (!PyArg_ParseTuple(arg, "O&:pubop", convmp, &x)) goto end;
586 rc = mp_pywrap(rsa_pubop(RSA_PUBCTX(me), MP_NEW, x));
587end:
588 mp_drop(x);
589 return (rc);
590}
591
592static PyObject *rsapriv_dopywrap(PyTypeObject *ty,
593 rsa_priv *rp, PyObject *rng)
594{
595 rsapriv_pyobj *o;
596
597 o = (rsapriv_pyobj *)ty->tp_alloc(ty, 0);
598 o->priv = *rp;
599 o->pub.n = rp->n;
600 o->pub.e = rp->e;
601 rsa_privcreate(&o->privctx, &o->priv, &rand_global);
602 rsa_pubcreate(&o->pubctx, &o->pub);
603 if (!rng) {
604 rng = Py_None;
605 Py_INCREF(rng);
606 }
607 o->rng = rng;
608 return ((PyObject *)o);
609}
610
611PyObject *rsapriv_pywrap(rsa_priv *rp)
612 { return rsapriv_dopywrap(rsapriv_pytype, rp, 0); }
613
614static PyObject *rsapriv_pynew(PyTypeObject *ty,
615 PyObject *arg, PyObject *kw)
616{
617 rsa_priv rp = { 0 };
618 PyObject *rng = Py_None;
619 char *kwlist[] =
620 { "n", "e", "d", "p", "q", "dp", "dq", "q_inv", "rng", 0 };
621
622 if (!PyArg_ParseTupleAndKeywords(arg, kw, "|O&O&O&O&O&O&O&O&O:new", kwlist,
623 convmp, &rp.n, convmp, &rp.e,
624 convmp, &rp.d,
625 convmp, &rp.p, convmp, &rp.q,
626 convmp, &rp.dp, convmp, &rp.dq,
627 convmp, &rp.q_inv,
628 &rng))
629 goto end;
630 if (rsa_recover(&rp)) VALERR("couldn't construct private key");
631 if (rng != Py_None && !GRAND_PYCHECK(rng))
632 TYERR("not a random number source");
633 Py_INCREF(rng);
634 return (rsapriv_dopywrap(ty, &rp, rng));
635end:
636 rsa_privfree(&rp);
637 return (0);
638}
639
640static void rsapriv_pydealloc(PyObject *me)
641{
642 RSA_PRIVCTX(me)->r = &rand_global;
643 rsa_privdestroy(RSA_PRIVCTX(me));
644 rsa_privfree(RSA_PRIV(me));
645 Py_DECREF(RSA_RNG(me));
3aa33042 646 FREEOBJ(me);
d7ab1bab 647}
648
649static PyObject *rsaget_d(PyObject *me, void *hunoz)
650 { return mp_pywrap(MP_COPY(RSA_PRIV(me)->d)); }
651
652static PyObject *rsaget_p(PyObject *me, void *hunoz)
653 { return mp_pywrap(MP_COPY(RSA_PRIV(me)->p)); }
654
655static PyObject *rsaget_q(PyObject *me, void *hunoz)
656 { return mp_pywrap(MP_COPY(RSA_PRIV(me)->q)); }
657
658static PyObject *rsaget_dp(PyObject *me, void *hunoz)
659 { return mp_pywrap(MP_COPY(RSA_PRIV(me)->dp)); }
660
661static PyObject *rsaget_dq(PyObject *me, void *hunoz)
662 { return mp_pywrap(MP_COPY(RSA_PRIV(me)->dq)); }
663
664static PyObject *rsaget_q_inv(PyObject *me, void *hunoz)
665 { return mp_pywrap(MP_COPY(RSA_PRIV(me)->q_inv)); }
666
667static PyObject *rsaget_rng(PyObject *me, void *hunoz)
668 { RETURN_OBJ(RSA_RNG(me)); }
669
670static int rsaset_rng(PyObject *me, PyObject *val, void *hunoz)
671{
672 int rc = -1;
f368b46e
MW		 673 if (!val)
674 val = Py_None;
675 else if (val != Py_None && !GRAND_PYCHECK(val))
d7ab1bab 676 TYERR("expected grand or None");
677 Py_DECREF(RSA_RNG(me));
678 RSA_RNG(me) = val;
679 Py_INCREF(val);
680 rc = 0;
681end:
682 return (rc);
683}
684
685static PyObject *rsameth_privop(PyObject *me, PyObject *arg, PyObject *kw)
686{
687 PyObject *rng = RSA_RNG(me);
688 mp *x = 0;
689 PyObject *rc = 0;
690 char *kwlist[] = { "x", "rng", 0 };
691
692 if (!PyArg_ParseTupleAndKeywords(arg, kw, "O&|O:privop", kwlist,
693 convmp, &x, &rng))
694 goto end;
695 if (rng != Py_None && !GRAND_PYCHECK(rng))
696 TYERR("not a random number source");
697 RSA_PRIVCTX(me)->r = (rng == Py_None) ? 0 : GRAND_R(rng);
698 rc = mp_pywrap(rsa_privop(RSA_PRIVCTX(me), MP_NEW, x));
699end:
700 mp_drop(x);
701 return (rc);
702}
703
704static PyObject *meth__RSAPriv_generate(PyObject *me,
705 PyObject *arg, PyObject *kw)
706{
707 grand *r = &rand_global;
708 unsigned nbits;
709 unsigned n = 0;
710 rsa_priv rp;
711 pgev evt = { 0 };
712 char *kwlist[] = { "class", "nbits", "event", "rng", "nsteps", 0 };
713 PyObject *rc = 0;
714
715 if (!PyArg_ParseTupleAndKeywords(arg, kw, "OO&|O&O&O&:generate", kwlist,
716 &me, convuint, &nbits, convpgev, &evt,
717 convgrand, &r, convuint, &n))
718 goto end;
719 if (rsa_gen(&rp, nbits, r, n, evt.proc, evt.ctx))
720 PGENERR;
721 rc = rsapriv_pywrap(&rp);
722end:
723 droppgev(&evt);
724 return (rc);
725}
726
727static PyGetSetDef rsapub_pygetset[] = {
728#define GETSETNAME(op, name) rsa##op##_##name
729 GET (n, "R.n -> N")
730 GET (e, "R.e -> E")
731#undef GETSETNAME
732 { 0 }
733};
734
735static PyMethodDef rsapub_pymethods[] = {
736#define METHNAME(name) rsameth_##name
737 METH (pubop, "R.pubop(X) -> X^E (mod N)")
738#undef METHNAME
739 { 0 }
740};
741
742static PyGetSetDef rsapriv_pygetset[] = {
743#define GETSETNAME(op, name) rsa##op##_##name
744 GET (d, "R.d -> D")
745 GET (p, "R.p -> P")
746 GET (q, "R.q -> Q")
747 GET (dp, "R.dp -> D mod (P - 1)")
748 GET (dq, "R.dq -> D mod (Q - 1)")
749 GET (q_inv, "R.q_inv -> Q^{-1} mod P")
750 GETSET(rng, "R.rng -> random number source for blinding")
751#undef GETSETNAME
752 { 0 }
753};
754
755static PyMethodDef rsapriv_pymethods[] = {
756#define METHNAME(name) rsameth_##name
757 KWMETH(privop, "R.privop(X, rng = None) -> X^D (mod N)")
758#undef METHNAME
759 { 0 }
760};
761
762static PyTypeObject rsapub_pytype_skel = {
6d4db0bf 763 PyObject_HEAD_INIT(0) 0, /* Header */
d7ab1bab 764 "catacomb.RSAPub", /* @tp_name@ */
765 sizeof(rsapub_pyobj), /* @tp_basicsize@ */
766 0, /* @tp_itemsize@ */
767
768 rsapub_pydealloc, /* @tp_dealloc@ */
769 0, /* @tp_print@ */
770 0, /* @tp_getattr@ */
771 0, /* @tp_setattr@ */
772 0, /* @tp_compare@ */
773 0, /* @tp_repr@ */
774 0, /* @tp_as_number@ */
775 0, /* @tp_as_sequence@ */
776 0, /* @tp_as_mapping@ */
777 0, /* @tp_hash@ */
778 0, /* @tp_call@ */
779 0, /* @tp_str@ */
780 0, /* @tp_getattro@ */
781 0, /* @tp_setattro@ */
782 0, /* @tp_as_buffer@ */
783 Py_TPFLAGS_DEFAULT | /* @tp_flags@ */
784 Py_TPFLAGS_BASETYPE,
785
786 /* @tp_doc@ */
787"RSA public key information.",
788
789 0, /* @tp_traverse@ */
790 0, /* @tp_clear@ */
791 0, /* @tp_richcompare@ */
792 0, /* @tp_weaklistoffset@ */
793 0, /* @tp_iter@ */
963a6148 794 0, /* @tp_iternext@ */
d7ab1bab 795 rsapub_pymethods, /* @tp_methods@ */
796 0, /* @tp_members@ */
797 rsapub_pygetset, /* @tp_getset@ */
798 0, /* @tp_base@ */
799 0, /* @tp_dict@ */
800 0, /* @tp_descr_get@ */
801 0, /* @tp_descr_set@ */
802 0, /* @tp_dictoffset@ */
803 0, /* @tp_init@ */
804 PyType_GenericAlloc, /* @tp_alloc@ */
805 rsapub_pynew, /* @tp_new@ */
3aa33042 806 0, /* @tp_free@ */
d7ab1bab 807 0 /* @tp_is_gc@ */
808};
809
810static PyTypeObject rsapriv_pytype_skel = {
6d4db0bf 811 PyObject_HEAD_INIT(0) 0, /* Header */
d7ab1bab 812 "catacomb.RSAPriv", /* @tp_name@ */
813 sizeof(rsapriv_pyobj), /* @tp_basicsize@ */
814 0, /* @tp_itemsize@ */
815
816 rsapriv_pydealloc, /* @tp_dealloc@ */
817 0, /* @tp_print@ */
818 0, /* @tp_getattr@ */
819 0, /* @tp_setattr@ */
820 0, /* @tp_compare@ */
821 0, /* @tp_repr@ */
822 0, /* @tp_as_number@ */
823 0, /* @tp_as_sequence@ */
824 0, /* @tp_as_mapping@ */
825 0, /* @tp_hash@ */
826 0, /* @tp_call@ */
827 0, /* @tp_str@ */
828 0, /* @tp_getattro@ */
829 0, /* @tp_setattro@ */
830 0, /* @tp_as_buffer@ */
831 Py_TPFLAGS_DEFAULT | /* @tp_flags@ */
832 Py_TPFLAGS_BASETYPE,
833
834 /* @tp_doc@ */
835"RSA private key information.",
836
837 0, /* @tp_traverse@ */
838 0, /* @tp_clear@ */
839 0, /* @tp_richcompare@ */
840 0, /* @tp_weaklistoffset@ */
841 0, /* @tp_iter@ */
963a6148 842 0, /* @tp_iternext@ */
d7ab1bab 843 rsapriv_pymethods, /* @tp_methods@ */
844 0, /* @tp_members@ */
845 rsapriv_pygetset, /* @tp_getset@ */
846 0, /* @tp_base@ */
847 0, /* @tp_dict@ */
848 0, /* @tp_descr_get@ */
849 0, /* @tp_descr_set@ */
850 0, /* @tp_dictoffset@ */
851 0, /* @tp_init@ */
852 PyType_GenericAlloc, /* @tp_alloc@ */
853 rsapriv_pynew, /* @tp_new@ */
3aa33042 854 0, /* @tp_free@ */
d7ab1bab 855 0 /* @tp_is_gc@ */
856};
857
858/*----- RSA padding schemes -----------------------------------------------*/
859
860static PyObject *meth__p1crypt_encode(PyObject *me,
861 PyObject *arg, PyObject *kw)
862{
863 pkcs1 p1;
864 char *m, *ep;
865 int msz, epsz;
866 unsigned long nbits;
867 PyObject *rc = 0;
868 octet *b = 0;
869 size_t sz;
870 mp *x;
871 char *kwlist[] = { "msg", "nbits", "ep", "rng", 0 };
872
873 p1.r = &rand_global; ep = 0; epsz = 0;
874 if (!PyArg_ParseTupleAndKeywords(arg, kw, "s#O&|s#O&:encode", kwlist,
875 &m, &msz, convulong, &nbits,
876 &ep, &epsz, convgrand, &p1.r))
877 goto end;
878 sz = (nbits + 7)/8;
879 p1.ep = ep; p1.epsz = epsz;
880 if (epsz + msz + 11 > sz) VALERR("buffer underflow");
881 b = xmalloc(sz);
882 x = pkcs1_cryptencode(MP_NEW, m, msz, b, sz, nbits, &p1);
883 rc = mp_pywrap(x);
884end:
885 xfree(b);
886 return (rc);
887}
888
889static PyObject *meth__p1crypt_decode(PyObject *me,
890 PyObject *arg, PyObject *kw)
891{
892 pkcs1 p1;
893 char *ep;
894 int epsz;
895 unsigned long nbits;
896 int n;
897 PyObject *rc = 0;
898 octet *b = 0;
899 size_t sz;
900 mp *x = 0;
901 char *kwlist[] = { "ct", "nbits", "ep", "rng", 0 };
902
903 p1.r = &rand_global; ep = 0; epsz = 0;
904 if (!PyArg_ParseTupleAndKeywords(arg, kw, "O&O&|s#O&:decode", kwlist,
905 convmp, &x, convulong, &nbits,
906 &ep, &epsz, convgrand, &p1.r))
907 goto end;
908 sz = (nbits + 7)/8;
909 p1.ep = ep; p1.epsz = epsz;
910 if (epsz + 11 > sz) VALERR("buffer underflow");
911 b = xmalloc(sz);
912 if ((n = pkcs1_cryptdecode(x, b, sz, nbits, &p1)) < 0)
913 VALERR("decryption failed");
914 rc = bytestring_pywrap(b, n);
915end:
916 mp_drop(x);
917 xfree(b);
918 return (rc);
919}
920
921static PyObject *meth__p1sig_encode(PyObject *me,
922 PyObject *arg, PyObject *kw)
923{
924 pkcs1 p1;
925 char *m, *ep;
926 int msz, epsz;
927 unsigned long nbits;
928 PyObject *rc = 0;
929 octet *b = 0;
930 size_t sz;
931 mp *x;
932 char *kwlist[] = { "msg", "nbits", "ep", "rng", 0 };
933
934 p1.r = &rand_global; ep = 0; epsz = 0;
935 if (!PyArg_ParseTupleAndKeywords(arg, kw, "s#O&|s#O&:encode", kwlist,
936 &m, &msz, convulong, &nbits,
937 &ep, &epsz, convgrand, &p1.r))
938 goto end;
939 sz = (nbits + 7)/8;
940 p1.ep = ep; p1.epsz = epsz;
941 if (epsz + msz + 11 > sz) VALERR("buffer underflow");
942 b = xmalloc(sz);
943 x = pkcs1_sigencode(MP_NEW, m, msz, b, sz, nbits, &p1);
944 rc = mp_pywrap(x);
945end:
946 xfree(b);
947 return (rc);
948}
949
950static PyObject *meth__p1sig_decode(PyObject *me,
951 PyObject *arg, PyObject *kw)
952{
953 pkcs1 p1;
954 char *ep;
955 int epsz;
956 unsigned long nbits;
957 int n;
958 PyObject *hukairz;
959 PyObject *rc = 0;
960 octet *b = 0;
961 size_t sz;
962 mp *x = 0;
963 char *kwlist[] = { "msg", "sig", "nbits", "ep", "rng", 0 };
964
965 p1.r = &rand_global; ep = 0; epsz = 0;
966 if (!PyArg_ParseTupleAndKeywords(arg, kw, "OO&O&|s#O&:decode", kwlist,
967 &hukairz, convmp, &x, convulong, &nbits,
968 &ep, &epsz, convgrand, &p1.r))
969 goto end;
970 sz = (nbits + 7)/8;
971 p1.ep = ep; p1.epsz = epsz;
972 if (epsz + 10 > sz) VALERR("buffer underflow");
973 b = xmalloc(sz);
974 if ((n = pkcs1_sigdecode(x, 0, 0, b, sz, nbits, &p1)) < 0)
975 VALERR("verification failed");
976 rc = bytestring_pywrap(b, n);
977end:
978 mp_drop(x);
979 xfree(b);
980 return (rc);
981}
982
983static PyObject *meth__oaep_encode(PyObject *me,
984 PyObject *arg, PyObject *kw)
985{
986 oaep o;
987 char *m, *ep;
988 int msz, epsz;
989 unsigned long nbits;
990 PyObject *rc = 0;
991 octet *b = 0;
992 size_t sz;
993 mp *x;
994 char *kwlist[] = { "msg", "nbits", "mgf", "hash", "ep", "rng", 0 };
995
996 o.r = &rand_global; o.cc = &sha_mgf; o.ch = &sha; ep = 0; epsz = 0;
997 if (!PyArg_ParseTupleAndKeywords(arg, kw, "s#O&|O&O&s#O&:encode", kwlist,
998 &m, &msz, convulong, &nbits,
999 convgccipher, &o.cc,
1000 convgchash, &o.ch,
1001 &ep, &epsz,
1002 convgrand, &o.r))
1003 goto end;
1004 sz = (nbits + 7)/8;
1005 o.ep = ep; o.epsz = epsz;
1006 if (2 * o.ch->hashsz + 2 + msz > sz) VALERR("buffer underflow");
1007 b = xmalloc(sz);
1008 x = oaep_encode(MP_NEW, m, msz, b, sz, nbits, &o);
1009 rc = mp_pywrap(x);
1010end:
1011 xfree(b);
1012 return (rc);
1013}
1014
1015static PyObject *meth__oaep_decode(PyObject *me,
1016 PyObject *arg, PyObject *kw)
1017{
1018 oaep o;
1019 char *ep;
1020 int epsz;
1021 unsigned long nbits;
1022 int n;
1023 PyObject *rc = 0;
1024 octet *b = 0;
1025 size_t sz;
1026 mp *x = 0;
1027 char *kwlist[] = { "ct", "nbits", "mgf", "hash", "ep", "rng", 0 };
1028
1029 o.r = &rand_global; o.cc = &sha_mgf; o.ch = &sha; ep = 0; epsz = 0;
1030 if (!PyArg_ParseTupleAndKeywords(arg, kw, "O&O&|O&O&s#O&:decode", kwlist,
1031 convmp, &x, convulong, &nbits,
1032 convgccipher, &o.cc,
1033 convgchash, &o.ch,
1034 &ep, &epsz,
1035 convgrand, &o.r))
1036 goto end;
1037 sz = (nbits + 7)/8;
1038 o.ep = ep; o.epsz = epsz;
1039 if (2 * o.ch->hashsz > sz) VALERR("buffer underflow");
1040 b = xmalloc(sz);
1041 if ((n = oaep_decode(x, b, sz, nbits, &o)) < 0)
1042 VALERR("decryption failed");
1043 rc = bytestring_pywrap(b, n);
1044end:
1045 mp_drop(x);
1046 xfree(b);
1047 return (rc);
1048}
1049
1050static PyObject *meth__pss_encode(PyObject *me,
1051 PyObject *arg, PyObject *kw)
1052{
1053 pss p;
1054 char *m;
1055 int msz;
1056 unsigned long nbits;
1057 PyObject *rc = 0;
1058 octet *b = 0;
1059 size_t sz;
1060 mp *x = 0;
1061 char *kwlist[] = { "msg", "nbits", "mgf", "hash", "saltsz", "rng", 0 };
1062
1063 p.cc = &sha_mgf; p.ch = &sha; p.r = &rand_global; p.ssz = (size_t)-1;
1064 if (!PyArg_ParseTupleAndKeywords(arg, kw, "s#O&|O&O&O&O&:encode", kwlist,
1065 &m, &msz, convulong, &nbits,
1066 convgccipher, &p.cc,
1067 convgchash, &p.ch,
1068 convszt, &p.ssz,
1069 convgrand, &p.r))
1070 goto end;
1071 sz = (nbits + 7)/8;
1072 if (p.ssz == (size_t)-1) p.ssz = p.ch->hashsz;
1073 if (p.ch->hashsz + p.ssz + 2 > sz) VALERR("buffer underflow");
1074 b = xmalloc(sz);
1075 x = pss_encode(MP_NEW, m, msz, b, sz, nbits, &p);
1076 rc = mp_pywrap(x);
1077end:
1078 xfree(b);
1079 return (rc);
1080}
1081
1082static PyObject *meth__pss_decode(PyObject *me,
1083 PyObject *arg, PyObject *kw)
1084{
1085 pss p;
1086 char *m;
1087 int msz;
1088 unsigned long nbits;
1089 PyObject *rc = 0;
1090 octet *b = 0;
1091 size_t sz;
1092 int n;
1093 mp *x = 0;
1094 char *kwlist[] =
1095 { "msg", "sig", "nbits", "mgf", "hash", "saltsz", "rng", 0 };
1096
1097 p.cc = &sha_mgf; p.ch = &sha; p.r = &rand_global; p.ssz = (size_t)-1;
1098 if (!PyArg_ParseTupleAndKeywords(arg, kw, "s#O&O&|O&O&O&O&:decode", kwlist,
1099 &m, &msz, convmp, &x, convulong, &nbits,
1100 convgccipher, &p.cc,
1101 convgchash, &p.ch,
1102 convszt, &p.ssz,
1103 convgrand, &p.r))
1104 goto end;
1105 sz = (nbits + 7)/8;
1106 if (p.ssz == (size_t)-1) p.ssz = p.ch->hashsz;
1107 if (p.ch->hashsz + p.ssz + 2 > sz) VALERR("buffer underflow");
1108 b = xmalloc(sz);
1109 if ((n = pss_decode(x, m, msz, b, sz, nbits, &p)) < 0)
1110 VALERR("verification failed");
1111 rc = Py_None; Py_INCREF(rc);
1112end:
1113 mp_drop(x);
1114 xfree(b);
1115 return (rc);
1116}
1117
1118/*----- Global stuff ------------------------------------------------------*/
1119
1120static PyMethodDef methods[] = {
1121#define METHNAME(name) meth_##name
1122 KWMETH(_p1crypt_encode, 0)
1123 KWMETH(_p1crypt_decode, 0)
1124 KWMETH(_p1sig_encode, 0)
1125 KWMETH(_p1sig_decode, 0)
1126 KWMETH(_oaep_encode, 0)
1127 KWMETH(_oaep_decode, 0)
1128 KWMETH(_pss_encode, 0)
1129 KWMETH(_pss_decode, 0)
1130 KWMETH(_RSAPriv_generate, "\
1131generate(NBITS, [event = pgen_nullev, rng = rand, nsteps = 0]) -> R")
1132#undef METHNAME
1133 { 0 }
1134};
1135
1136void pubkey_pyinit(void)
1137{
1138 INITTYPE(dsapub, root);
1139 INITTYPE(dsapriv, dsapub);
1140 INITTYPE(kcdsapub, root);
1141 INITTYPE(kcdsapriv, kcdsapub);
1142 INITTYPE(rsapub, root);
1143 INITTYPE(rsapriv, rsapub);
1144 addmethods(methods);
1145}
1146
1147void pubkey_pyinsert(PyObject *mod)
1148{
1149 INSERT("DSAPub", dsapub_pytype);
1150 INSERT("DSAPriv", dsapriv_pytype);
1151 INSERT("KCDSAPub", kcdsapub_pytype);
1152 INSERT("KCDSAPriv", kcdsapriv_pytype);
1153 INSERT("RSAPub", rsapub_pytype);
1154 INSERT("RSAPriv", rsapriv_pytype);
1155}
1156
1157/*----- That's all, folks -------------------------------------------------*/
Catacomb cryptographic library -- Python bindings