|
Packit |
5c3484 |
dnl X86 mpn_cnd_add_n, mpn_cnd_sub_n
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
dnl Copyright 2013 Free Software Foundation, Inc.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
dnl This file is part of the GNU MP Library.
|
|
Packit |
5c3484 |
dnl
|
|
Packit |
5c3484 |
dnl The GNU MP Library is free software; you can redistribute it and/or modify
|
|
Packit |
5c3484 |
dnl it under the terms of either:
|
|
Packit |
5c3484 |
dnl
|
|
Packit |
5c3484 |
dnl * the GNU Lesser General Public License as published by the Free
|
|
Packit |
5c3484 |
dnl Software Foundation; either version 3 of the License, or (at your
|
|
Packit |
5c3484 |
dnl option) any later version.
|
|
Packit |
5c3484 |
dnl
|
|
Packit |
5c3484 |
dnl or
|
|
Packit |
5c3484 |
dnl
|
|
Packit |
5c3484 |
dnl * the GNU General Public License as published by the Free Software
|
|
Packit |
5c3484 |
dnl Foundation; either version 2 of the License, or (at your option) any
|
|
Packit |
5c3484 |
dnl later version.
|
|
Packit |
5c3484 |
dnl
|
|
Packit |
5c3484 |
dnl or both in parallel, as here.
|
|
Packit |
5c3484 |
dnl
|
|
Packit |
5c3484 |
dnl The GNU MP Library is distributed in the hope that it will be useful, but
|
|
Packit |
5c3484 |
dnl WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
|
|
Packit |
5c3484 |
dnl or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
Packit |
5c3484 |
dnl for more details.
|
|
Packit |
5c3484 |
dnl
|
|
Packit |
5c3484 |
dnl You should have received copies of the GNU General Public License and the
|
|
Packit |
5c3484 |
dnl GNU Lesser General Public License along with the GNU MP Library. If not,
|
|
Packit |
5c3484 |
dnl see https://www.gnu.org/licenses/.
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
include(`../config.m4')
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
C cycles/limb
|
|
Packit |
5c3484 |
C P5 ?
|
|
Packit |
5c3484 |
C P6 model 0-8,10-12 ?
|
|
Packit |
5c3484 |
C P6 model 9 (Banias) ?
|
|
Packit |
5c3484 |
C P6 model 13 (Dothan) 5.4
|
|
Packit |
5c3484 |
C P4 model 0-1 (Willamette) ?
|
|
Packit |
5c3484 |
C P4 model 2 (Northwood) 14.5
|
|
Packit |
5c3484 |
C P4 model 3-4 (Prescott) 21
|
|
Packit |
5c3484 |
C Intel atom 11
|
|
Packit |
5c3484 |
C AMD K6 ?
|
|
Packit |
5c3484 |
C AMD K7 3.4
|
|
Packit |
5c3484 |
C AMD K8 ?
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
define(`rp', `%edi')
|
|
Packit |
5c3484 |
define(`up', `%esi')
|
|
Packit |
5c3484 |
define(`vp', `%ebp')
|
|
Packit |
5c3484 |
define(`n', `%ecx')
|
|
Packit |
5c3484 |
define(`cnd', `20(%esp)')
|
|
Packit |
5c3484 |
define(`cy', `%edx')
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
ifdef(`OPERATION_cnd_add_n', `
|
|
Packit |
5c3484 |
define(ADDSUB, add)
|
|
Packit |
5c3484 |
define(ADCSBB, adc)
|
|
Packit |
5c3484 |
define(func, mpn_cnd_add_n)')
|
|
Packit |
5c3484 |
ifdef(`OPERATION_cnd_sub_n', `
|
|
Packit |
5c3484 |
define(ADDSUB, sub)
|
|
Packit |
5c3484 |
define(ADCSBB, sbb)
|
|
Packit |
5c3484 |
define(func, mpn_cnd_sub_n)')
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
MULFUNC_PROLOGUE(mpn_cnd_add_n mpn_cnd_sub_n)
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
ASM_START()
|
|
Packit |
5c3484 |
TEXT
|
|
Packit |
5c3484 |
ALIGN(16)
|
|
Packit |
5c3484 |
PROLOGUE(func)
|
|
Packit |
5c3484 |
add $-16, %esp
|
|
Packit |
5c3484 |
mov %ebp, (%esp)
|
|
Packit |
5c3484 |
mov %ebx, 4(%esp)
|
|
Packit |
5c3484 |
mov %esi, 8(%esp)
|
|
Packit |
5c3484 |
mov %edi, 12(%esp)
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
C make cnd into a full mask
|
|
Packit |
5c3484 |
mov cnd, %eax
|
|
Packit |
5c3484 |
neg %eax
|
|
Packit |
5c3484 |
sbb %eax, %eax
|
|
Packit |
5c3484 |
mov %eax, cnd
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
C load parameters into registers
|
|
Packit |
5c3484 |
mov 24(%esp), rp
|
|
Packit |
5c3484 |
mov 28(%esp), up
|
|
Packit |
5c3484 |
mov 32(%esp), vp
|
|
Packit |
5c3484 |
mov 36(%esp), n
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
mov (vp), %eax
|
|
Packit |
5c3484 |
mov (up), %ebx
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
C put operand pointers just beyond their last limb
|
|
Packit |
5c3484 |
lea (vp,n,4), vp
|
|
Packit |
5c3484 |
lea (up,n,4), up
|
|
Packit |
5c3484 |
lea -4(rp,n,4), rp
|
|
Packit |
5c3484 |
neg n
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
and cnd, %eax
|
|
Packit |
5c3484 |
ADDSUB %eax, %ebx
|
|
Packit |
5c3484 |
sbb cy, cy
|
|
Packit |
5c3484 |
inc n
|
|
Packit |
5c3484 |
je L(end)
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
ALIGN(16)
|
|
Packit |
5c3484 |
L(top): mov (vp,n,4), %eax
|
|
Packit |
5c3484 |
and cnd, %eax
|
|
Packit |
5c3484 |
mov %ebx, (rp,n,4)
|
|
Packit |
5c3484 |
mov (up,n,4), %ebx
|
|
Packit |
5c3484 |
add cy, cy
|
|
Packit |
5c3484 |
ADCSBB %eax, %ebx
|
|
Packit |
5c3484 |
sbb cy, cy
|
|
Packit |
5c3484 |
inc n
|
|
Packit |
5c3484 |
jne L(top)
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
L(end): mov %ebx, (rp)
|
|
Packit |
5c3484 |
xor %eax, %eax
|
|
Packit |
5c3484 |
sub cy, %eax
|
|
Packit |
5c3484 |
|
|
Packit |
5c3484 |
mov (%esp), %ebp
|
|
Packit |
5c3484 |
mov 4(%esp), %ebx
|
|
Packit |
5c3484 |
mov 8(%esp), %esi
|
|
Packit |
5c3484 |
mov 12(%esp), %edi
|
|
Packit |
5c3484 |
add $16, %esp
|
|
Packit |
5c3484 |
ret
|
|
Packit |
5c3484 |
EPILOGUE()
|
|
Packit |
5c3484 |
ASM_END()
|