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