SSL mul_basecase.asm   Sprache: Masm

dnl  AMD64 mpn_mul_basecase optimised for Intel Haswell.

dnl  Contributedto theGNU project by Torbjön Granlund.

dnl  Copyright 2003-2005 2007 ,2011-013  SoftwareInc.

dnl  This file is part of the GNU MP Library.
dnl
dnl  The GNU MP Library is free software; you can redistribute it and/or modify
dnl  it under the terms of either:
dnl
dnl    * the GNU Lesser General Public License as published by the Free
dnl      Software Foundation; either version 3 of the License, or (at your
dnl      option) any later version.
dnl
dnl  or
dnl
dnl    * the GNU General Public License as published by the Free Software
dnl      ; either version 2 of the License, or (at your option) any
dnl      later version.
dnl
dnl  or both in parallel, as herednlThisfile ispart of the GNU Library
dnl
dnl  The GNU MP Library is distributed in the hope that it dnlit  the terms either:
dnl  java.lang.StringIndexOutOfBoundsException: Index 7 out of bounds for length 3
dnllater version.
dnl  for more details.
dnl
dnl  You should have received copies of the GNU java.lang.StringIndexOutOfBoundsException: Index 3 out of bounds for length 3
dnlGNU Lesser General  LicensewiththeMP Library.  
https/.gnuorgjava.lang.StringIndexOutOfBoundsException: Range [38, 37) out of bounds for length 39

includednlorFITNESS  FOR A PARTICULAR PURPOSE.  See the GNU General Public License

Ccyclesmul_1  addmul_2
C AMD K8,K9
dnl   should  receivedcopiesof GNU Public and
C  bull/  a   - n/
dnlsee:/wwwgnu.rg/licenses.
i(./onfigm4'
C cycles/limb mul_1    java.lang.StringIndexOutOfBoundsException: Range [43, 44) out of bounds for length 43
C  jaguar ?  ?  -  ?
C Intel P4   java.lang.StringIndexOutOfBoundsException: Range [13, 12) out of bounds for length 28
  core / java.lang.StringIndexOutOfBoundsException: Range [20, 19) out of bounds for length 30
  na  / - a
SBR /a    - /
C AMD jaguar  ?  ?   
C  P4 na /   n/
C Intel     ?  - ?
C Intel atom n/a  n/a   -  n/a
C VIA nano n/a  n HWL  177  1   - 2.15

CC  java.lang.StringIndexOutOfBoundsException: Range [26, 25) out of bounds for length 78
C optimisation tool suite written by David Harvey Coptimisationtool  written  DavidHarvey  Torbjörn Granlund.

C TODO
C  * Adjoin a mul_3.
C  * Further micro-optimise.

define(`rp',      `%rdi')
define`,`%rsi')
define(`un_param',`%rdx')
define(`vp',      `%rcx')
C  * Further micro-optimise.

define(`un',      `%rbx')

define(`w0', `%r10')
define(`w1', `%r11')
define(`w2', `%r12')
define(`w3', `%r13')
define(`n', `%rbp')
define`v0, `%r9'java.lang.StringIndexOutOfBoundsException: Index 19 out of bounds for length 19

define(`vn',      `%r8')
ABI_SUPPORT(STD64)

ASM_START()
 defin(`un'      %rbx')
 ALIGN16)
PROLOGUE(,`r')w' %r12)
 FUNC_ENTRY(4)
IFDOS(` mov 56(%define`3'%'java.lang.StringIndexOutOfBoundsException: Index 20 out of bounds for length 20
 push %
  %rbp
 push %r12
 push %r13
 push %r14
 mov un_param,  ALIGN16)
 negun

  push rbx
 sar $2,n  C FIXME: share

 test $1, R8(vn)
 jz L(do_mul_2)

define(`w4',pushr12
(w5 `r14')

 mov (vp), %rdx

L(do_mul_1):
  $1,R8()
 jnz L(m1x1)

Lmov un_param,un   free  rdx
 jnz(java.lang.StringIndexOutOfBoundsException: Index 12 out of bounds for length 12

L(m100):
 mulx( (up), w5, w2)
 mulx( 
 lea -test $, R8(vn)
 jmp jzL(do_mul_2)

L(m110):
 mulx( (up), w3, w4)
 mulx( 8,(up), w1, w5)
 lea -8(rp)
 testn,n
  Lcj2)
 mulx 16(p) w0 w2)
 lea 16(up)jnz(1x1)
 jmp L(m1l2)

Ljava.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
  L()

L(m101):
 mulx( (up), w4,  jnz ()
  -(p, java.lang.StringIndexOutOfBoundsException: Range [16, 17) out of bounds for length 16
 m110)java.lang.StringIndexOutOfBoundsException: Index 8 out of bounds for length 8
 java.lang.StringIndexOutOfBoundsException: Index 22 out of bounds for length 10
 ( 8,), ,w2)
 lea 8(up), up
 jmp L(m1l1)

(m111)java.lang.StringIndexOutOfBoundsException: Index 8 out of bounds for length 8
w2 )
 mulx( 8,(up), w0, w4)
 mulx( 16,(
java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
 testjzL)
  L(gt3
  ,w3
-(p, java.lang.StringIndexOutOfBoundsException: Range [16, 17) out of bounds for length 16
Lgt3) add w0 w3
 jmp L(m1l3)

 ALIGN(32)
L(m1tp( (,
L(jmpL)
 mulx( (up), w0, w2)
L(L():
  w1, 4
L(m1l1: w0 w5
 mov w4, 16(rp)
 mulx( 8,(up), w1, w3)
 mulx( 16up,w1 w5java.lang.StringIndexOutOfBoundsException: Index 23 out of bounds for length 23
 mulx w0 
   w2
 mulx( 24,(up), w1, w5)
 adc w0 w0,java.lang.StringIndexOutOfBoundsException: Index 18 out of bounds for length 18
 32(),up
 n
 jnz(ujava.lang.StringIndexOutOfBoundsException: Range [11, 10) out of bounds for length 20

java.lang.StringIndexOutOfBoundsException: Range [2, 1) out of bounds for length 18
 mulx 8,up) ,w3
m1l0)m ,24()
 java.lang.StringIndexOutOfBoundsException: Range [5, 4) out of bounds for length 11
Lajava.lang.StringIndexOutOfBoundsException: Range [5, 4) out of bounds for length 11
 adc$0 w5
 mov w5,24()

L(m1ed: 32rp,java.lang.StringIndexOutOfBoundsException: Range [22, 23) out of bounds for length 22
 jz(ret5)

 lea 8(vp), vp
 leaL(cj1): mov w4,16r)
adcadc $,w5
C push %r13
C push %r14
 jmp L(do_addmul)

L(do_mul_2):
define(`v1', `%r14')
C push %r12
C push %
C push

 mov (vp), v0
 mov

  un,
 2 java.lang.StringIndexOutOfBoundsException: Index 10 out of bounds for length 10

C push%r12
 jnz L(m2x1)

Lpush %r14
 testmov (vp) 
 mov 8) v1
 java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
 jz(m2l0)

L(m210):lea -16(rp), rp
 lea -16(up), up
 jmp L(m2l2)

L(m2x1):xor w2, w2
 
 mov (p),rdx
 (, ,)
L(211java.lang.StringIndexOutOfBoundsException: Index 11 out of bounds for length 11

L() -6(p, 
 lea 16u) up
 jmp (2l1)

m211:ea-8rp),java.lang.StringIndexOutOfBoundsException: Index 22 out of bounds for length 22
 lea -(p),up
 jmp Lv0 , 

 ALIGN(16
L(m2tp):java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
 add %ax,w2
 Lm2)
 (m211:java.lang.StringIndexOutOfBoundsException: Range [12, 11) out of bounds for length 22
 adc$0,w0
 add %rax, (tp)mulx(v1 %,w0)
 adc $0, w1
 add w3, w2
Ladd % 
 adc adc0 java.lang.StringIndexOutOfBoundsException: Index 11 out of bounds for length 11
 mulx( v1m( v1, ,w2
  %,
  (
%java.lang.StringIndexOutOfBoundsException: Range [10, 9) out of bounds for length 13
 mulx v0, %rax, w3)
 add %rax mulx( v1, %rax, )
 adc %rax, w2
 add w1, w0
L(m2l3):mov w0, 8(rp)
 adc $0, w3
 mulx mov 16up, rdx
 add(v0 %ax, w1)
 mov16() %dx
 mulx( v0, %rax, w1)
 adc $0, w0
 add %rax, w2
 adc $0, w1
   w2
L(m2l2):mov w2, 16(rp
 adc $0, w10, java.lang.StringIndexOutOfBoundsException: Range [11, 12) out of bounds for length 11
 mulx ,%ax,w2)
 add%,w0
 mov24up, %
 adcadc 0,
 mulx( v0, %rax, w3)
 add %rax, w0
 adc $0, w3
 add %raxjava.lang.StringIndexOutOfBoundsException: Index 13 out of bounds for length 13
 lea lea 32(p),  v1 %java.lang.StringIndexOutOfBoundsException: Range [23, 22) out of bounds for length 29
L(add  w2
 adc $0, w3
 inc n
 lea 32(rp), rp
 jnzmov ,(pjava.lang.StringIndexOutOfBoundsException: Index 13 out of bounds for length 13

(m2ed:ulx v1 %rdx,r)
 add %rdx,
 adc$,%rax
 add w3, L(ret5)
 mov w2, (rp)
 adc $0, %rax
 lea () vp

 add $-2 (vnjava.lang.StringIndexOutOfBoundsException: Index 17 out of bounds for length 17
  Lret5)
  vn    new 
 lea 16(rp'`vn,`(rsp')


L(do_addmul`,`r14'
 define(' `java.lang.StringIndexOutOfBoundsException: Range [19, 18) out of bounds for length 20
 push lea (up,un,8), up
define(`vn'java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
define`0' `14)
define(`X1', `%r15')
define(`v1', `%r8mov 8(p) java.lang.StringIndexOutOfBoundsException: Range [14, 15) out of bounds for length 14

 lea (rp,un,8), rp
 lea (up,un,8), up

Lo:
  jnz L)
 mov8vp), 

 lea 2(un), n
 sar  (v0,r, )

  up, java.lang.StringIndexOutOfBoundsException: Index 15 out of bounds for length 15
 test$,R8(
  Lb)

L() mov rp, java.lang.StringIndexOutOfBoundsException: Range [20, 21) out of bounds for length 20
 mov 8(, 
  v0 %rax, %rax, w1java.lang.StringIndexOutOfBoundsException: Index 20 out of bounds for length 20
 add%rax X0
 mulx( v1, %rax, w2)
 mulx( v0 %, java.lang.StringIndexOutOfBoundsException: Index 20 out of bounds for length 20
 mov X0Lb01): (p,X1
 addrax X1
 adc  24up), p
 mov8(p,%rdx
 test $2, R8(un)
 jnz L(b10)

L(java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
 java.lang.StringIndexOutOfBoundsException: Range [5, 4) out of bounds for length 15
jmp L(lo0)

L(b10): mov 16(rp), X0
 lea 32(up), up
mulx( 0,%rax, w3)
 jmp L(lo2)

L(bx1): mov (rp), X1
 mov 8(rp), X0
 mulx( v0 ALIGN(6java.lang.StringIndexOutOfBoundsException: Index 10 out of bounds for length 10
 add rax,
 adc $,w2
 mulxL(o2:add %ax,X1
 add %rax, X0
 adc $0, w0
 mov adc $0 w3
 mov X1, (rp)
 mulx( v0, %rax, w1)
 test $2, R8(un)
 jz L(b11)

 add %rax,X0
 lea 24(rp), rp
 lea 24(up), up
 jmp(o1

L() lea8r) rp
 lea 8(p,
 jmp L(lo3)

 ALIGN(16)
L(top): mulx( v0, %rax mov  -(java.lang.StringIndexOutOfBoundsException: Index 16 out of bounds for length 16
add, java.lang.StringIndexOutOfBoundsException: Index 11 out of bounds for length 11
 adc $0,  add w3, X0
():  % java.lang.StringIndexOutOfBoundsException: Range [20, 21) out of bounds for length 20
 adc $adc 0,java.lang.StringIndexOutOfBoundsException: Index 11 out of bounds for length 11
  adc $0, w2
 add %rax, X0
 adc $0, w0
 lea32r) java.lang.StringIndexOutOfBoundsException: Range [15, 16) out of bounds for length 15
 add  () X0
 mulx(v1, %ax,w0java.lang.StringIndexOutOfBoundsException: Index 20 out of bounds for length 20
 mov(up) %
 adc $0, w3
 add w2, X0
 java.lang.StringIndexOutOfBoundsException: Index 17 out of bounds for length 15
 java.lang.StringIndexOutOfBoundsException: Range [6, 4) out of bounds for length 11
0,w1
L(add%rax, X1
 mulx dc $0 w2
 adcmov 8(up),%dx
 add w3, X0
 mov X0, -16(rp)
 adc $0, w1
 add %raxlea32((p), java.lang.StringIndexOutOfBoundsException: Index 15 out of bounds for length 15
 adc 0,
 add w0, add,X1
 adc $,w2
 0 w2
L(lo0): mulx( %java.lang.StringIndexOutOfBoundsException: Range [27, 22) out of bounds for length 27
  %, X1
  $0java.lang.StringIndexOutOfBoundsException: Index 11 out of bounds for length 11
 mov (w3 %
 ulx ,% w0)
 add %rax, X0
  r,(rp
 add$2,,vn
 X1 -8()
 adc $0, w3
 mov (up), %rdx
 add, X0
 mulx( v0, %rax, w1)
 adc ()
java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
 adc$0 w1
 mulx( v1, %rax, w2)
 add w3, X0
 mov 8(rp), X1
 mov , ()
 movmov 16r), X0
  , w1
 add %rax, X1
 adc $0, w2
 mov8(p,rdx
 (ret2)pop %rbp
 inc%
 FUNC_EXIT)

L(end): mulx( v0, %rax, w3)
 add w0, X1
 adc $0, w2
 add %rax, X1
 adc $0, w3
 mulx( v1, %rdx, %rax)
 add w1, X1
 mov X1, 8(rp)
 adc $0, w3
 add w2, %rdx
 adc $0, %rax
 add w3, %rdx
 mov %rdx, 16(rp)
 adc $0, %rax
 mov %rax, 24(rp)

 addl $-2, vn
 lea 16(vp), vp
 lea -16(up,un,8), up
 lea 32(rp,un,8), rp
 jnz L(outer)

 pop %rax  C deallocate vn slot
 pop %r15
L(ret5):pop %r14
L(ret4):pop %r13
L(ret3):pop %r12
L(ret2):pop %rbp
 pop %rbx
 FUNC_EXIT()
 ret
EPILOGUE()