5 Author: Pekka Riikonen <priikone@silcnet.org>
7 Copyright (C) 2005 - 2006 Pekka Riikonen
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; version 2 of the License.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
20 #include "silccrypto.h"
23 void silc_mp_init(SilcMPInt *mp)
28 void silc_mp_uninit(SilcMPInt *mp)
33 size_t silc_mp_size(SilcMPInt *mp)
35 return fp_unsigned_bin_size(mp);
38 size_t silc_mp_sizeinbase(SilcMPInt *mp, int base)
41 fp_radix_size(mp, base, &size);
47 void silc_mp_set(SilcMPInt *dst, SilcMPInt *src)
52 void silc_mp_set_ui(SilcMPInt *dst, SilcUInt32 ui)
57 void silc_mp_set_si(SilcMPInt *dst, SilcInt32 si)
62 void silc_mp_set_str(SilcMPInt *dst, const char *str, int base)
64 fp_read_radix(dst, str, base);
67 SilcUInt32 silc_mp_get_ui(SilcMPInt *mp)
70 return tmp->used > 0 ? tmp->dp[0] : 0;
73 char *silc_mp_get_str(char *str, SilcMPInt *mp, int base)
75 if (fp_toradix(mp, str, base) != MP_OKAY)
80 void silc_mp_add(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
82 fp_add(mp1, mp2, dst);
85 void silc_mp_add_ui(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 ui)
87 mp_add_d(mp1, (mp_digit)ui, dst);
90 void silc_mp_sub(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
92 fp_sub(mp1, mp2, dst);
95 void silc_mp_sub_ui(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 ui)
97 fp_sub_d(mp1, (mp_digit)ui, dst);
100 void silc_mp_mul(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
102 fp_mul(mp1, mp2, dst);
105 void silc_mp_mul_ui(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 ui)
107 fp_mul_d(mp1, (mp_digit)ui, dst);
110 void silc_mp_mul_2exp(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 exp)
112 fp_mul_2d(mp1, exp, dst);
115 void silc_mp_sqrt(SilcMPInt *dst, SilcMPInt *src)
120 void silc_mp_div(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
122 fp_div(mp1, mp2, dst, NULL);
125 void silc_mp_div_ui(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 ui)
127 fp_div_d(mp1, (mp_digit)ui, dst, NULL);
130 void silc_mp_div_qr(SilcMPInt *q, SilcMPInt *r, SilcMPInt *mp1,
133 fp_div(mp1, mp2, q, r);
136 void silc_mp_div_2exp(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 exp)
138 fp_div_2d(mp1, exp, dst, NULL);
141 void silc_mp_div_2exp_qr(SilcMPInt *q, SilcMPInt *r, SilcMPInt *mp1,
144 fp_div_2d(mp1, exp, q, r);
147 void silc_mp_mod(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
149 fp_mod(mp1, mp2, dst);
152 void silc_mp_mod_ui(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 ui)
155 fp_mod_d(mp1, ui, &d);
156 silc_mp_set_ui(dst, d);
159 void silc_mp_mod_2exp(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 ui)
161 fp_mod_2d(mp1, ui, dst);
164 void silc_mp_pow(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *exp)
166 SILC_NOT_IMPLEMENTED("silc_mp_pow");
170 void silc_mp_pow_ui(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 exp)
172 SILC_NOT_IMPLEMENTED("silc_mp_pow_ui");
176 void silc_mp_pow_mod(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *exp,
179 fp_exptmod(mp1, exp, mod, dst);
182 void silc_mp_pow_mod_ui(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 exp,
187 silc_mp_set_ui(&tmp, exp);
188 silc_mp_pow_mod(dst, mp1, &tmp, mod);
189 silc_mp_uninit(&tmp);
192 void silc_mp_gcd(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
194 fp_gcd(mp1, mp2, dst);
197 void silc_mp_gcdext(SilcMPInt *g, SilcMPInt *s, SilcMPInt *t, SilcMPInt *mp1,
200 SILC_NOT_IMPLEMENTED("silc_mp_gcdext");
204 int silc_mp_cmp(SilcMPInt *mp1, SilcMPInt *mp2)
206 return fp_cmp(mp1, mp2);
209 int silc_mp_cmp_si(SilcMPInt *mp1, SilcInt32 si)
211 return fp_cmp_d(mp1, si);
214 int silc_mp_cmp_ui(SilcMPInt *mp1, SilcUInt32 ui)
216 return fp_cmp_d(mp1, ui);
219 void silc_mp_abs(SilcMPInt *dst, SilcMPInt *src)
224 void silc_mp_neg(SilcMPInt *dst, SilcMPInt *src)
229 void silc_mp_and(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
231 SILC_NOT_IMPLEMENTED("silc_mp_and");
235 void silc_mp_or(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
237 SILC_NOT_IMPLEMENTED("silc_mp_or");
241 void silc_mp_xor(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
243 SILC_NOT_IMPLEMENTED("silc_mp_xor");