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
|
.text
.align 32, 0x90
.globl __gmpn_modexact_1_odd
.def __gmpn_modexact_1_odd
.scl 2
.type 32
.endef
__gmpn_modexact_1_odd:
push %rdi
push %rsi
mov %rcx, %rdi
mov %rdx, %rsi
mov %r8, %rdx
mov $0, %ecx
jmp Lent
.globl __gmpn_modexact_1c_odd
.def __gmpn_modexact_1c_odd
.scl 2
.type 32
.endef
__gmpn_modexact_1c_odd:
push %rdi
push %rsi
mov %rcx, %rdi
mov %rdx, %rsi
mov %r8, %rdx
mov %r9, %rcx
Lent:
mov %rdx, %r8
shr %edx
lea __gmp_binvert_limb_table(%rip), %r9
and $127, %edx
mov %rcx, %r10
movzbl (%r9,%rdx), %edx
mov (%rdi), %rax
lea (%rdi,%rsi,8), %r11
mov %r8, %rdi
lea (%rdx,%rdx), %ecx
imul %edx, %edx
neg %rsi
imul %edi, %edx
sub %edx, %ecx
lea (%rcx,%rcx), %edx
imul %ecx, %ecx
imul %edi, %ecx
sub %ecx, %edx
xor %ecx, %ecx
lea (%rdx,%rdx), %r9
imul %rdx, %rdx
imul %r8, %rdx
sub %rdx, %r9
mov %r10, %rdx
inc %rsi
jz Lone
.align 16, 0x90
Ltop:
sub %rdx, %rax
adc $0, %rcx
imul %r9, %rax
mul %r8
mov (%r11,%rsi,8), %rax
sub %rcx, %rax
setc %cl
inc %rsi
jnz Ltop
Lone:
sub %rdx, %rax
adc $0, %rcx
imul %r9, %rax
mul %r8
lea (%rcx,%rdx), %rax
pop %rsi
pop %rdi
ret
|
