Lines Matching +full:in0 +full:- +full:in1
2 # Copyright 2010-2020 The OpenSSL Project Authors. All Rights Reserved.
19 # The module implements "4-bit" GCM GHASH function and underlying
20 # single multiplication operation in GF(2^128). "4-bit" means that it
21 # uses 256 bytes per-key table [+128 bytes shared table]. Streamed
24 # code. To anchor to something else sha1-ia64.pl module processes one
35 # But occasionally you prove yourself wrong:-) I figured out a way to
46 for (@ARGV) { $ADDP="add" if (/[\+DD|\-mlp]64/); }
48 for (@ARGV) { $big_endian=1 if (/\-DB_ENDIAN/);
49 $big_endian=0 if (/\-DL_ENDIAN/); }
58 # in scalable manner;-) Naturally assuming data in L1 cache...
65 { .mfi; (p18) ld8 Hlo=[Hi[1]],-8
73 { .mmi; ($p16) ld1 in[0]=[inp],-1
79 { .mfi; (p18) ld8 Hlo=[Hi[1]],-8
87 { .mmi; (p16) ld1 xi[0]=[Xi],-1
116 $ADDP Xi=15,in0 // &Xi[15]
118 { .mii; $ADDP Htbl=8,in1 // &Htbl[0].lo
127 { .mib; ld1 xi[2]=[Xi],-1 // Xi[15]
129 brp.loop.imp .Loop1,.Lend1-16};;
130 { .mmi; ld1 xi[1]=[Xi],-1 // Xi[14]
139 add rem_4bitp=rem_4bit#-gcm_gmult_4bit#,rem_4bitp
145 { .mib; xor Zhi=Zhi,Hhi };; // modulo-scheduling artefact
161 $Xip="in0";
162 $Htbl="in1";
207 " add sp=-512,sp",
212 { .mmi; $sum 1<<1 // go big-endian
217 add $len=-17,$len };;
256 add $rem_8bit=rem_8bit#-gcm_ghash_4bit#,$rem_8bit
269 { .mmi; ld1 $in=[$inp],-1 //(p16) *inp--
270 ld1 $xi[0]=[$Xip],-1 //(p16) *Xi--
276 { .mmi; ld1 $xi[0]=[$Xip],-1 //(p16) *Xi--
278 { .mii; ld1 $in=[$inp],-1 //(p16) *inp--
280 and $xi[1]=-16,$xi[1] };; //(p17) nhi=xi&0xf0
292 ld8 $rem[0]=[$Btbl],-256 //(p18) Htable[nhi].lo,&Hshr4[nhi].lo
299 ld1 $in=[$inp],-1 } //(p16) *inp--
302 and $xi[1]=-16,$xi[1] };; //(p17) nhi=xi&0xf0
304 ld1 $xi[0]=[$Xip],-1 //(p16) *Xi--
316 ld8 $rem[0]=[$Btbl],-256 //(p18) Htable[nhi].lo,&Hshr4[nhi].lo
328 ld1 $in=[$inp],-1 //(p16) *inp--
332 and $xi[1]=-16,$xi[1] };; //(p17) nhi=xi&0xf0
334 ld1 $xi[0]=[$Xip],-1 //(p16) *Xi--
345 ld8 $rem[0]=[$Btbl],-256 //(p18) Htable[nhi].lo,&Hshr4[nhi].lo
360 and $xi[1]=-16,$xi[1] };; //(p17) nhi=xi&0xf0
397 (p6) ld1 $in=[$inp],-1 //[p16] *inp--
401 { .mmi; st8 [$Xip]=$Zlo,-8
405 (p6) ld1 $in=[$inp],-1 //[p16] *inp--
409 (p6) and $xi[0]=-16,$xi[0] //[p17] nhi=xi&0xf0
413 { .mib; $rum 1<<1 // return to little-endian