5 Author: Pekka Riikonen <priikone@silcnet.org>
7 Copyright (C) 2001 - 2005 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)
38 size_t silc_mp_sizeinbase(SilcMPInt *mp, int base)
40 return mpz_sizeinbase(mp, base);
43 void silc_mp_set(SilcMPInt *dst, SilcMPInt *src)
48 void silc_mp_set_ui(SilcMPInt *dst, SilcUInt32 ui)
53 void silc_mp_set_si(SilcMPInt *dst, SilcInt32 si)
58 void silc_mp_set_str(SilcMPInt *dst, const char *str, int base)
60 mpz_set_str(dst, str, base);
63 SilcUInt32 silc_mp_get_ui(SilcMPInt *mp)
65 return (SilcUInt32)mpz_get_ui(mp);
68 char *silc_mp_get_str(char *str, SilcMPInt *mp, int base)
70 return mpz_get_str(str, base, mp);
73 void silc_mp_add(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
75 mpz_add(dst, mp1, mp2);
78 void silc_mp_add_ui(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 ui)
80 mpz_add_ui(dst, mp1, ui);
83 void silc_mp_sub(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
85 mpz_sub(dst, mp1, mp2);
88 void silc_mp_sub_ui(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 ui)
90 mpz_sub_ui(dst, mp1, ui);
93 void silc_mp_mul(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
95 mpz_mul(dst, mp1, mp2);
98 void silc_mp_mul_ui(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 ui)
100 mpz_mul_ui(dst, mp1, ui);
103 void silc_mp_mul_2exp(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 exp)
105 mpz_mul_2exp(dst, mp1, exp);
108 void silc_mp_sqrt(SilcMPInt *dst, SilcMPInt *src)
113 void silc_mp_div(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
115 mpz_div(dst, mp1, mp2);
118 void silc_mp_div_ui(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 ui)
120 mpz_div_ui(dst, mp1, ui);
123 void silc_mp_div_qr(SilcMPInt *q, SilcMPInt *r, SilcMPInt *mp1,
127 mpz_fdiv_qr(q, r, mp1, mp2);
129 mpz_div(q, mp1, mp2);
131 mpz_mod(r, mp1, mp2);
134 void silc_mp_div_2exp(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 exp)
136 mpz_fdiv_q_2exp(dst, mp1, exp);
139 void silc_mp_div_2exp_qr(SilcMPInt *q, SilcMPInt *r, SilcMPInt *mp1,
143 mpz_fdiv_q_2exp(q, mp1, exp);
145 mpz_fdiv_r_2exp(r, mp1, exp);
148 void silc_mp_mod(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
150 mpz_mod(dst, mp1, mp2);
153 void silc_mp_mod_ui(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 ui)
155 mpz_mod_ui(dst, mp1, ui);
158 void silc_mp_mod_2exp(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 ui)
160 mpz_mod_2exp(dst, mp1, ui);
163 void silc_mp_pow(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *exp)
165 SilcUInt32 uiexp = mpz_get_ui(exp);
166 mpz_pow_ui(dst, mp1, uiexp);
169 void silc_mp_pow_ui(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 exp)
171 mpz_pow_ui(dst, mp1, exp);
174 void silc_mp_pow_mod(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *exp,
177 mpz_powm(dst, mp1, exp, mod);
180 void silc_mp_pow_mod_ui(SilcMPInt *dst, SilcMPInt *mp1, SilcUInt32 exp,
183 mpz_powm_ui(dst, mp1, exp, mod);
186 void silc_mp_gcd(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
188 mpz_gcd(dst, mp1, mp2);
191 void silc_mp_gcdext(SilcMPInt *g, SilcMPInt *s, SilcMPInt *t, SilcMPInt *mp1,
194 mpz_gcdext(g, s, t, mp1, mp2);
197 int silc_mp_cmp(SilcMPInt *mp1, SilcMPInt *mp2)
199 return mpz_cmp(mp1, mp2);
202 int silc_mp_cmp_si(SilcMPInt *mp1, SilcInt32 si)
204 return mpz_cmp_si(mp1, si);
207 int silc_mp_cmp_ui(SilcMPInt *mp1, SilcUInt32 ui)
209 return mpz_cmp_ui(mp1, ui);
212 void silc_mp_abs(SilcMPInt *dst, SilcMPInt *src)
217 void silc_mp_neg(SilcMPInt *dst, SilcMPInt *src)
222 void silc_mp_and(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
224 mpz_and(dst, mp1, mp2);
227 void silc_mp_or(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
229 mpz_ior(dst, mp1, mp2);
232 void silc_mp_xor(SilcMPInt *dst, SilcMPInt *mp1, SilcMPInt *mp2)
234 mpz_xor(dst, mp1, mp2);