/* This file is basically amd64-51/fe25519_mul.s. */ #include "fe51_namespace.h" #include "consts_namespace.h" # qhasm: int64 rp # qhasm: int64 xp # qhasm: int64 yp # qhasm: input rp # qhasm: input xp # qhasm: input yp # qhasm: int64 r0 # qhasm: int64 r1 # qhasm: int64 r2 # qhasm: int64 r3 # qhasm: int64 r4 # qhasm: int64 c1 # qhasm: int64 c2 # qhasm: int64 c3 # qhasm: int64 c4 # qhasm: int64 c5 # qhasm: int64 c6 # qhasm: int64 c7 # qhasm: caller c1 # qhasm: caller c2 # qhasm: caller c3 # qhasm: caller c4 # qhasm: caller c5 # qhasm: caller c6 # qhasm: caller c7 # qhasm: stack64 c1_stack # qhasm: stack64 c2_stack # qhasm: stack64 c3_stack # qhasm: stack64 c4_stack # qhasm: stack64 c5_stack # qhasm: stack64 c6_stack # qhasm: stack64 c7_stack # qhasm: stack64 x119_stack # qhasm: stack64 x219_stack # qhasm: stack64 x319_stack # qhasm: stack64 x419_stack # qhasm: stack64 rp_stack # qhasm: int64 mulr01 # qhasm: int64 mulr11 # qhasm: int64 mulr21 # qhasm: int64 mulr31 # qhasm: int64 mulr41 # qhasm: int64 mulrax # qhasm: int64 mulrdx # qhasm: int64 mult # qhasm: int64 mulredmask # qhasm: stack64 mulx219_stack # qhasm: stack64 mulx319_stack # qhasm: stack64 mulx419_stack # qhasm: enter fe51_mul .text .p2align 5 .globl _fe51_mul .globl fe51_mul _fe51_mul: fe51_mul: mov %rsp,%r11 and $31,%r11 add $96,%r11 sub %r11,%rsp # qhasm: c1_stack = c1 # asm 1: movq c1_stack=stack64#1 # asm 2: movq c1_stack=0(%rsp) movq %r11,0(%rsp) # qhasm: c2_stack = c2 # asm 1: movq c2_stack=stack64#2 # asm 2: movq c2_stack=8(%rsp) movq %r12,8(%rsp) # qhasm: c3_stack = c3 # asm 1: movq c3_stack=stack64#3 # asm 2: movq c3_stack=16(%rsp) movq %r13,16(%rsp) # qhasm: c4_stack = c4 # asm 1: movq c4_stack=stack64#4 # asm 2: movq c4_stack=24(%rsp) movq %r14,24(%rsp) # qhasm: c5_stack = c5 # asm 1: movq c5_stack=stack64#5 # asm 2: movq c5_stack=32(%rsp) movq %r15,32(%rsp) # qhasm: c6_stack = c6 # asm 1: movq c6_stack=stack64#6 # asm 2: movq c6_stack=40(%rsp) movq %rbx,40(%rsp) # qhasm: c7_stack = c7 # asm 1: movq c7_stack=stack64#7 # asm 2: movq c7_stack=48(%rsp) movq %rbp,48(%rsp) # qhasm: rp_stack = rp # asm 1: movq rp_stack=stack64#8 # asm 2: movq rp_stack=56(%rsp) movq %rdi,56(%rsp) # qhasm: yp = yp # asm 1: mov yp=int64#4 # asm 2: mov yp=%rcx mov %rdx,%rcx # qhasm: mulrax = *(uint64 *)(xp + 24) # asm 1: movq 24(mulrax=int64#3 # asm 2: movq 24(mulrax=%rdx movq 24(%rsi),%rdx # qhasm: mulrax *= 19 # asm 1: imulq $19,mulrax=int64#7 # asm 2: imulq $19,mulrax=%rax imulq $19,%rdx,%rax # qhasm: mulx319_stack = mulrax # asm 1: movq mulx319_stack=stack64#9 # asm 2: movq mulx319_stack=64(%rsp) movq %rax,64(%rsp) # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 16) # asm 1: mulq 16(r0=int64#5 # asm 2: mov r0=%r8 mov %rax,%r8 # qhasm: mulr01 = mulrdx # asm 1: mov mulr01=int64#6 # asm 2: mov mulr01=%r9 mov %rdx,%r9 # qhasm: mulrax = *(uint64 *)(xp + 32) # asm 1: movq 32(mulrax=int64#3 # asm 2: movq 32(mulrax=%rdx movq 32(%rsi),%rdx # qhasm: mulrax *= 19 # asm 1: imulq $19,mulrax=int64#7 # asm 2: imulq $19,mulrax=%rax imulq $19,%rdx,%rax # qhasm: mulx419_stack = mulrax # asm 1: movq mulx419_stack=stack64#10 # asm 2: movq mulx419_stack=72(%rsp) movq %rax,72(%rsp) # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 8) # asm 1: mulq 8(mulrax=int64#7 # asm 2: movq 0(mulrax=%rax movq 0(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 0) # asm 1: mulq 0(mulrax=int64#7 # asm 2: movq 0(mulrax=%rax movq 0(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 8) # asm 1: mulq 8(r1=int64#8 # asm 2: mov r1=%r10 mov %rax,%r10 # qhasm: mulr11 = mulrdx # asm 1: mov mulr11=int64#9 # asm 2: mov mulr11=%r11 mov %rdx,%r11 # qhasm: mulrax = *(uint64 *)(xp + 0) # asm 1: movq 0(mulrax=int64#7 # asm 2: movq 0(mulrax=%rax movq 0(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 16) # asm 1: mulq 16(r2=int64#10 # asm 2: mov r2=%r12 mov %rax,%r12 # qhasm: mulr21 = mulrdx # asm 1: mov mulr21=int64#11 # asm 2: mov mulr21=%r13 mov %rdx,%r13 # qhasm: mulrax = *(uint64 *)(xp + 0) # asm 1: movq 0(mulrax=int64#7 # asm 2: movq 0(mulrax=%rax movq 0(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 24) # asm 1: mulq 24(r3=int64#12 # asm 2: mov r3=%r14 mov %rax,%r14 # qhasm: mulr31 = mulrdx # asm 1: mov mulr31=int64#13 # asm 2: mov mulr31=%r15 mov %rdx,%r15 # qhasm: mulrax = *(uint64 *)(xp + 0) # asm 1: movq 0(mulrax=int64#7 # asm 2: movq 0(mulrax=%rax movq 0(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 32) # asm 1: mulq 32(r4=int64#14 # asm 2: mov r4=%rbx mov %rax,%rbx # qhasm: mulr41 = mulrdx # asm 1: mov mulr41=int64#15 # asm 2: mov mulr41=%rbp mov %rdx,%rbp # qhasm: mulrax = *(uint64 *)(xp + 8) # asm 1: movq 8(mulrax=int64#7 # asm 2: movq 8(mulrax=%rax movq 8(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 0) # asm 1: mulq 0(mulrax=int64#7 # asm 2: movq 8(mulrax=%rax movq 8(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 8) # asm 1: mulq 8(mulrax=int64#7 # asm 2: movq 8(mulrax=%rax movq 8(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 16) # asm 1: mulq 16(mulrax=int64#7 # asm 2: movq 8(mulrax=%rax movq 8(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 24) # asm 1: mulq 24(mulrax=int64#3 # asm 2: movq 8(mulrax=%rdx movq 8(%rsi),%rdx # qhasm: mulrax *= 19 # asm 1: imulq $19,mulrax=int64#7 # asm 2: imulq $19,mulrax=%rax imulq $19,%rdx,%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 32) # asm 1: mulq 32(mulrax=int64#7 # asm 2: movq 16(mulrax=%rax movq 16(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 0) # asm 1: mulq 0(mulrax=int64#7 # asm 2: movq 16(mulrax=%rax movq 16(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 8) # asm 1: mulq 8(mulrax=int64#7 # asm 2: movq 16(mulrax=%rax movq 16(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 16) # asm 1: mulq 16(mulrax=int64#3 # asm 2: movq 16(mulrax=%rdx movq 16(%rsi),%rdx # qhasm: mulrax *= 19 # asm 1: imulq $19,mulrax=int64#7 # asm 2: imulq $19,mulrax=%rax imulq $19,%rdx,%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 24) # asm 1: mulq 24(mulrax=int64#3 # asm 2: movq 16(mulrax=%rdx movq 16(%rsi),%rdx # qhasm: mulrax *= 19 # asm 1: imulq $19,mulrax=int64#7 # asm 2: imulq $19,mulrax=%rax imulq $19,%rdx,%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 32) # asm 1: mulq 32(mulrax=int64#7 # asm 2: movq 24(mulrax=%rax movq 24(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 0) # asm 1: mulq 0(mulrax=int64#7 # asm 2: movq 24(mulrax=%rax movq 24(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 8) # asm 1: mulq 8(mulrax=int64#7 # asm 2: movq mulrax=%rax movq 64(%rsp),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 24) # asm 1: mulq 24(mulrax=int64#7 # asm 2: movq mulrax=%rax movq 64(%rsp),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 32) # asm 1: mulq 32(mulrax=int64#7 # asm 2: movq 32(mulrax=%rax movq 32(%rsi),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 0) # asm 1: mulq 0(mulrax=int64#7 # asm 2: movq mulrax=%rax movq 72(%rsp),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 16) # asm 1: mulq 16(mulrax=int64#7 # asm 2: movq mulrax=%rax movq 72(%rsp),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 24) # asm 1: mulq 24(mulrax=int64#7 # asm 2: movq mulrax=%rax movq 72(%rsp),%rax # qhasm: (uint128) mulrdx mulrax = mulrax * *(uint64 *)(yp + 32) # asm 1: mulq 32(mulredmask=int64#2 # asm 2: movq REDMASK51,>mulredmask=%rsi movq REDMASK51(%rip),%rsi # qhasm: mulr01 = (mulr01.r0) << 13 # asm 1: shld $13,mulr41=int64#3 # asm 2: imulq $19,mulr41=%rdx imulq $19,%rbp,%rdx # qhasm: r0 += mulr41 # asm 1: add mult=int64#3 # asm 2: mov mult=%rdx mov %r8,%rdx # qhasm: (uint64) mult >>= 51 # asm 1: shr $51,r1=int64#4 # asm 2: mov r1=%rcx mov %rdx,%rcx # qhasm: (uint64) mult >>= 51 # asm 1: shr $51,r2=int64#6 # asm 2: mov r2=%r9 mov %rdx,%r9 # qhasm: (uint64) mult >>= 51 # asm 1: shr $51,r3=int64#7 # asm 2: mov r3=%rax mov %rdx,%rax # qhasm: (uint64) mult >>= 51 # asm 1: shr $51,r4=int64#8 # asm 2: mov r4=%r10 mov %rdx,%r10 # qhasm: (uint64) mult >>= 51 # asm 1: shr $51,mult=int64#3 # asm 2: imulq $19,mult=%rdx imulq $19,%rdx,%rdx # qhasm: r0 += mult # asm 1: add c1=int64#9 # asm 2: movq c1=%r11 movq 0(%rsp),%r11 # qhasm: c2 =c2_stack # asm 1: movq c2=int64#10 # asm 2: movq c2=%r12 movq 8(%rsp),%r12 # qhasm: c3 =c3_stack # asm 1: movq c3=int64#11 # asm 2: movq c3=%r13 movq 16(%rsp),%r13 # qhasm: c4 =c4_stack # asm 1: movq c4=int64#12 # asm 2: movq c4=%r14 movq 24(%rsp),%r14 # qhasm: c5 =c5_stack # asm 1: movq c5=int64#13 # asm 2: movq c5=%r15 movq 32(%rsp),%r15 # qhasm: c6 =c6_stack # asm 1: movq c6=int64#14 # asm 2: movq c6=%rbx movq 40(%rsp),%rbx # qhasm: c7 =c7_stack # asm 1: movq c7=int64#15 # asm 2: movq c7=%rbp movq 48(%rsp),%rbp # qhasm: leave add %r11,%rsp mov %rdi,%rax mov %rsi,%rdx ret