| /openssl/crypto/chacha/asm/ |
| H A D | chacha-armv8-sve.pl | 966 my ($mnemonic, $isize, $const)=@_;
970 if ($mnemonic eq "lsr" || $mnemonic eq "xar") {
981 if ($mnemonic eq "lsr") {
988 my ($mnemonic,$arg)=@_;
999 if (($mnemonic eq "lsl") || ($mnemonic eq "lsr")) {
1013 if (($mnemonic eq "add") || ($mnemonic =~ /zip./) || ($mnemonic =~ /uzp./) ) {
1031 my ($mnemonic,,$arg)=@_;
1065 if (($mnemonic eq "lsl") || ($mnemonic eq "lsr")) {
1075 if ($mnemonic eq "sel") {
1077 } elsif ($mnemonic eq "mov") {
[all …]
|
| /openssl/crypto/sm3/asm/ |
| H A D | sm3-armv8.pl | 234 my ($mnemonic,$arg)=@_;
239 $sm3partopcode{$mnemonic}|$1|($2<<5)|($3<<16),
240 $mnemonic,$arg;
244 my ($mnemonic,$arg)=@_;
249 $sm3ss1opcode{$mnemonic}|$1|($2<<5)|($3<<16)|($4<<10),
250 $mnemonic,$arg;
254 my ($mnemonic,$arg)=@_;
259 $sm3ttopcode{$mnemonic}|$1|($2<<5)|($3<<16)|($4<<12),
260 $mnemonic,$arg;
|
| /openssl/crypto/perlasm/ |
| H A D | arm-xlate.pl | 182 my $mnemonic = $2;
184 if ($mnemonic =~ m/([^\.]+)\.([^\.]+)/) {
187 $opcode = eval("\$$mnemonic");
194 } elsif ($mnemonic) {
195 $line = $c.$mnemonic;
|
| H A D | sparcv9_modes.pl | 1405 my ($mnemonic,$rs1,$rs2,$rd)=@_;
1415 if ($opf=$visopf{$mnemonic}) {
1435 my ($mnemonic,$rs1,$rs2,$rd)=@_;
1447 if ($opf=$visopf{$mnemonic}) {
1462 my ($mnemonic,$rs1,$rs2,$rs3,$rd)=@_;
1497 my ($mnemonic,$rs1,$rs2,$rd)=@_;
1550 my ($mnemonic,$rs1,$rs2,$rd)=@_;
1577 my ($mnemonic,$rs,$rd)=@_;
1586 $ref = "$mnemonic\t$rs,$rd";
1608 my ($mnemonic)=shift;
[all …]
|
| H A D | ppc-xlate.pl | 188 my $mnemonic = shift;
194 " ${mnemonic}${f} " . join(",", @out);
426 my $mnemonic = $2;
428 my $opcode = eval("\$$mnemonic");
431 elsif ($mnemonic) { $line = $c.$mnemonic.$f."\t".$line; }
|
| H A D | x86_64-xlate.pl | 293 sub mnemonic { subroutine
359 die if ($opcode->mnemonic() ne "mov");
360 $opcode->mnemonic("lea");
420 my $mnemonic = $self->{opcode}->mnemonic();
422 ($mnemonic =~ /^v?mov([qd])$/) && ($sz=$1) ||
423 ($mnemonic =~ /^v?pinsr([qdwb])$/) && ($sz=$1) ||
424 ($mnemonic =~ /^vpbroadcast([qdwb])$/) && ($sz=$1) ||
425 ($mnemonic =~ /^v(?!perm)[a-z]+[fi]128$/) && ($sz="x");
575 if ($nasm && $self->{opcode}->mnemonic()=~m/^j(?![re]cxz)/) {
1398 my $asm = eval("\$".$opcode->mnemonic());
[all …]
|
| /openssl/crypto/sha/asm/ |
| H A D | sha1-sparcv9.pl | 384 my ($mnemonic,$rs1,$rs2,$rd)=@_;
389 $ref = "$mnemonic\t$rs1,$rs2,$rd";
391 if ($opf=$visopf{$mnemonic}) {
410 my ($mnemonic,$rs1,$rs2,$rd)=@_;
412 my $ref="$mnemonic\t$rs1,$rs2,$rd";
|
| H A D | sha512-armv8.pl | 843 my ($mnemonic,$arg)=@_;
848 $opcode{$mnemonic}|$1|($2<<5)|($3<<16),
849 $mnemonic,$arg;
858 my ($mnemonic,$arg)=@_;
863 $opcode{$mnemonic}|$1|($2<<5)|($3<<16),
864 $mnemonic,$arg;
|
| H A D | sha1-armv8.pl | 339 my ($mnemonic,$arg)=@_;
344 $opcode{$mnemonic}|$1|($2<<5)|($3<<16),
345 $mnemonic,$arg;
|
| H A D | sha1-sparcv9a.pl | 557 my ($mnemonic,$rs1,$rs2,$rd)=@_;
565 $ref = "$mnemonic\t$rs1,$rs2,$rd";
567 if ($opf=$visopf{$mnemonic}) {
586 my ($mnemonic,$rs1,$rs2,$rd)=@_;
588 my $ref="$mnemonic\t$rs1,$rs2,$rd";
|
| H A D | sha512-sparcv9.pl | 810 my ($mnemonic,$rs1,$rs2,$rd)=@_;
815 $ref = "$mnemonic\t$rs1,$rs2,$rd";
817 if ($opf=$visopf{$mnemonic}) {
836 my ($mnemonic,$rs1,$rs2,$rd)=@_;
838 my $ref="$mnemonic\t$rs1,$rs2,$rd";
|
| H A D | keccak1600-armv4.pl | 1616 my ($mnemonic,$half,$reg,$ea) = @_;
1617 my $op = $mnemonic eq "ldr" ? \%ldr : \%str;
1624 "#endif", $mnemonic,$reg,$ea;
1630 "#endif", $mnemonic,$reg,$ea,
1631 $mnemonic,$$op{reg},$reg,$$op{ea};
|
| H A D | sha1-armv4-large.pl | 721 my ($mnemonic,$arg)=@_;
724 my $word = $opcode{$mnemonic}|(($1&7)<<13)|(($1&8)<<19)
736 $mnemonic,$arg;
|
| H A D | sha256-armv4.pl | 714 my ($mnemonic,$arg)=@_;
717 my $word = $opcode{$mnemonic}|(($1&7)<<13)|(($1&8)<<19)
726 $mnemonic,$arg;
|
| H A D | keccak1600-armv8.pl | 860 my ($mnemonic,$arg)=@_;
865 $opcode{$mnemonic}|$1|($2<<5)|($3<<16)|(eval($4)<<10),
866 $mnemonic,$arg;
|
| H A D | sha512-parisc.pl | 767 my ($mnemonic,$mod,$args)=@_;
768 my $opcode = eval("\$$mnemonic");
770 ref($opcode) eq 'CODE' ? &$opcode($mod,$args) : "\t$mnemonic$mod\t$args";
|
| /openssl/crypto/aes/asm/ |
| H A D | aesfx-sparcv9.pl | 1140 my ($mnemonic,$rs1,$rs2,$rd)=@_;
1148 $ref = "$mnemonic\t$rs1,$rs2,$rd";
1150 if ($opf=$visopf{$mnemonic}) {
1170 my ($mnemonic,$rs1,$rs2,$rd)=@_;
1177 $ref = "$mnemonic\t$rs1,$rs2,$rd";
1179 if ($opf=$visopf{$mnemonic}) {
1194 my ($mnemonic,$rs1,$rs2,$rd)=@_;
1202 $ref = "$mnemonic\t$rs1,$rs2,$rd";
1204 if (defined($opf=$aesopf{$mnemonic})) {
1227 my ($mnemonic,$rs1,$rs2,$rs3,$rd)=@_;
[all …]
|
| /openssl/crypto/md5/asm/ |
| H A D | md5-sparcv9.pl | 390 my ($mnemonic,$rs1,$rs2,$rd)=@_;
395 $ref = "$mnemonic\t$rs1,$rs2,$rd";
397 if ($opf=$visopf{$mnemonic}) {
416 my ($mnemonic,$rs1,$rs2,$rd)=@_;
418 my $ref="$mnemonic\t$rs1,$rs2,$rd";
|
| /openssl/crypto/bn/asm/ |
| H A D | vis3-mont.pl | 353 my ($mnemonic,$rs1,$rs2,$rd)=@_;
360 $ref = "$mnemonic\t$rs1,$rs2,$rd";
362 if ($opf=$visopf{$mnemonic}) {
|
| H A D | parisc-mont.pl | 983 my ($mnemonic,$mod,$args)=@_;
984 my $opcode = eval("\$$mnemonic");
986 ref($opcode) eq 'CODE' ? &$opcode($mod,$args) : "\t$mnemonic$mod\t$args";
|
| /openssl/crypto/modes/asm/ |
| H A D | ghash-sparcv9.pl | 549 my ($mnemonic,$rs1,$rs2,$rd)=@_;
557 $ref = "$mnemonic\t$rs1,$rs2,$rd";
559 if ($opf=$visopf{$mnemonic}) {
|
| H A D | ghash-parisc.pl | 724 my ($mnemonic,$mod,$args)=@_;
725 my $opcode = eval("\$$mnemonic");
727 ref($opcode) eq 'CODE' ? &$opcode($mod,$args) : "\t$mnemonic$mod\t$args";
|
| H A D | ghashv8-armx.pl | 860 my ($mnemonic,$arg)=@_;
866 $word |= 0x00010001 if ($mnemonic =~ "2");
873 $mnemonic,$arg;
|
| /openssl/crypto/poly1305/asm/ |
| H A D | poly1305-sparcv9.pl | 1057 my ($mnemonic,$rs1,$rs2,$rd)=@_;
1064 $ref = "$mnemonic\t$rs1,$rs2,$rd";
1066 if ($opf=$visopf{$mnemonic}) {
1081 my ($mnemonic,$rs1,$rs2,$rs3,$rd)=@_;
1088 $ref = "$mnemonic\t$rs1,$rs2,$rs3,$rd";
1090 if ($opf=$fmaopf{$mnemonic}) {
|
| /openssl/crypto/sm4/asm/ |
| H A D | sm4-armv8.pl | 610 my ($mnemonic,$arg)=@_;
615 $opcode{$mnemonic}|$1|($2<<5)|($3<<16),
616 $mnemonic,$arg;
|
