1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
|
# tclTomMath.decls --
#
# This file contains the declarations for the functions in
# 'libtommath' that are contained within the Tcl library.
# This file is used to generate the 'tclTomMathDecls.h' and
# 'tclTomMathStub.c' files.
#
# If you edit this file, advance the revision number (and the epoch
# if the new stubs are not backward compatible) in tclTomMathDecls.h
#
# Copyright (c) 2005 by Kevin B. Kenny. All rights reserved.
#
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
library tcl
# Define the unsupported generic interfaces.
interface tclTomMath
# hooks {tclTomMathInt}
# Declare each of the functions in the Tcl tommath interface
declare 0 generic {
int TclBN_epoch(void)
}
declare 1 generic {
int TclBN_revision(void)
}
declare 2 generic {
int TclBN_mp_add(mp_int *a, mp_int *b, mp_int *c)
}
declare 3 generic {
int TclBN_mp_add_d(mp_int *a, mp_digit b, mp_int *c)
}
declare 4 generic {
int TclBN_mp_and(mp_int *a, mp_int *b, mp_int *c)
}
declare 5 generic {
void TclBN_mp_clamp(mp_int *a)
}
declare 6 generic {
void TclBN_mp_clear(mp_int *a)
}
declare 7 generic {
void TclBN_mp_clear_multi(mp_int *a, ...)
}
declare 8 generic {
int TclBN_mp_cmp(mp_int *a, mp_int *b)
}
declare 9 generic {
int TclBN_mp_cmp_d(mp_int *a, mp_digit b)
}
declare 10 generic {
int TclBN_mp_cmp_mag(mp_int *a, mp_int *b)
}
declare 11 generic {
int TclBN_mp_copy(mp_int *a, mp_int *b)
}
declare 12 generic {
int TclBN_mp_count_bits(mp_int *a)
}
declare 13 generic {
int TclBN_mp_div(mp_int *a, mp_int *b, mp_int *q, mp_int *r)
}
declare 14 generic {
int TclBN_mp_div_d(mp_int *a, mp_digit b, mp_int *q, mp_digit *r)
}
declare 15 generic {
int TclBN_mp_div_2(mp_int *a, mp_int *q)
}
declare 16 generic {
int TclBN_mp_div_2d(mp_int *a, int b, mp_int *q, mp_int *r)
}
declare 17 generic {
int TclBN_mp_div_3(mp_int *a, mp_int *q, mp_digit *r)
}
declare 18 generic {
void TclBN_mp_exch(mp_int *a, mp_int *b)
}
declare 19 generic {
int TclBN_mp_expt_d(mp_int *a, mp_digit b, mp_int *c)
}
declare 20 generic {
int TclBN_mp_grow(mp_int *a, int size)
}
declare 21 generic {
int TclBN_mp_init(mp_int *a)
}
declare 22 generic {
int TclBN_mp_init_copy(mp_int *a, mp_int *b)
}
declare 23 generic {
int TclBN_mp_init_multi(mp_int *a, ...)
}
declare 24 generic {
int TclBN_mp_init_set(mp_int *a, mp_digit b)
}
declare 25 generic {
int TclBN_mp_init_size(mp_int *a, int size)
}
declare 26 generic {
int TclBN_mp_lshd(mp_int *a, int shift)
}
declare 27 generic {
int TclBN_mp_mod(mp_int *a, mp_int *b, mp_int *r)
}
declare 28 generic {
int TclBN_mp_mod_2d(mp_int *a, int b, mp_int *r)
}
declare 29 generic {
int TclBN_mp_mul(mp_int *a, mp_int *b, mp_int *p)
}
declare 30 generic {
int TclBN_mp_mul_d(mp_int *a, mp_digit b, mp_int *p)
}
declare 31 generic {
int TclBN_mp_mul_2(mp_int *a, mp_int *p)
}
declare 32 generic {
int TclBN_mp_mul_2d(mp_int *a, int d, mp_int *p)
}
declare 33 generic {
int TclBN_mp_neg(mp_int *a, mp_int *b)
}
declare 34 generic {
int TclBN_mp_or(mp_int *a, mp_int *b, mp_int *c)
}
declare 35 generic {
int TclBN_mp_radix_size(mp_int *a, int radix, int *size)
}
declare 36 generic {
int TclBN_mp_read_radix(mp_int *a, const char *str, int radix)
}
declare 37 generic {
void TclBN_mp_rshd(mp_int *a, int shift)
}
declare 38 generic {
int TclBN_mp_shrink(mp_int *a)
}
declare 39 generic {
void TclBN_mp_set(mp_int *a, mp_digit b)
}
declare 40 generic {
int TclBN_mp_sqr(mp_int *a, mp_int *b)
}
declare 41 generic {
int TclBN_mp_sqrt(mp_int *a, mp_int *b)
}
declare 42 generic {
int TclBN_mp_sub(mp_int *a, mp_int *b, mp_int *c)
}
declare 43 generic {
int TclBN_mp_sub_d(mp_int *a, mp_digit b, mp_int *c)
}
declare 44 generic {
int TclBN_mp_to_unsigned_bin(mp_int *a, unsigned char *b)
}
declare 45 generic {
int TclBN_mp_to_unsigned_bin_n(mp_int *a, unsigned char *b,
unsigned long *outlen)
}
declare 46 generic {
int TclBN_mp_toradix_n(mp_int *a, char *str, int radix, int maxlen)
}
declare 47 generic {
int TclBN_mp_unsigned_bin_size(mp_int *a)
}
declare 48 generic {
int TclBN_mp_xor(mp_int *a, mp_int *b, mp_int *c)
}
declare 49 generic {
void TclBN_mp_zero(mp_int *a)
}
# internal routines to libtommath - should not be called but must be
# exported to accommodate the "tommath" extension
declare 50 generic {
void TclBN_reverse(unsigned char *s, int len)
}
declare 51 generic {
int TclBN_fast_s_mp_mul_digs(mp_int *a, mp_int *b, mp_int *c, int digs)
}
declare 52 generic {
int TclBN_fast_s_mp_sqr(mp_int *a, mp_int *b)
}
declare 53 generic {
int TclBN_mp_karatsuba_mul(mp_int *a, mp_int *b, mp_int *c)
}
declare 54 generic {
int TclBN_mp_karatsuba_sqr(mp_int *a, mp_int *b)
}
declare 55 generic {
int TclBN_mp_toom_mul(mp_int *a, mp_int *b, mp_int *c)
}
declare 56 generic {
int TclBN_mp_toom_sqr(mp_int *a, mp_int *b)
}
declare 57 generic {
int TclBN_s_mp_add(mp_int *a, mp_int *b, mp_int *c)
}
declare 58 generic {
int TclBN_s_mp_mul_digs(mp_int *a, mp_int *b, mp_int *c, int digs)
}
declare 59 generic {
int TclBN_s_mp_sqr(mp_int *a, mp_int *b)
}
declare 60 generic {
int TclBN_s_mp_sub(mp_int *a, mp_int *b, mp_int *c)
}
declare 61 {
int TclBN_mp_init_set_int(mp_int *a, unsigned long i)
}
declare 62 {
int TclBN_mp_set_int(mp_int *a, unsigned long i)
}
declare 63 {
int TclBN_mp_cnt_lsb(mp_int *a)
}
|
