PPC assembly pack: add .size directives. (d6019e16) · Commits · CYBER - Cyber Security / TS 103 523 MSP / TLMSP / TLMSP OpenSSL

crypto/aes/asm/aes-ppc.pl

+2 −0

Original line number	Diff line number	Diff line
		@@ -471,6 +471,7 @@ Lenc_done:
		.long 0
		.byte 0,12,4,1,0x80,18,3,0
		.long 0
		.size .AES_encrypt,.-.AES_encrypt

		.align 5
		Lppc_AES_encrypt:
		@@ -904,6 +905,7 @@ Ldec_done:
		.long 0
		.byte 0,12,4,1,0x80,18,3,0
		.long 0
		.size .AES_decrypt,.-.AES_decrypt

		.align 5
		Lppc_AES_decrypt:

crypto/bn/asm/ppc-mont.pl

+1 −0

Original line number	Diff line number	Diff line
		@@ -325,6 +325,7 @@ Lcopy: ; copy or in-place refresh
		.long 0
		.byte 0,12,4,0,0x80,12,6,0
		.long 0
		.size .bn_mul_mont_int,.-.bn_mul_mont_int

		.asciz "Montgomery Multiplication for PPC, CRYPTOGAMS by <appro\@openssl.org>"
		___

crypto/bn/asm/ppc.pl

+10 −0

Original line number	Diff line number	Diff line
		@@ -392,6 +392,7 @@ $data=<<EOF;
		.long 0
		.byte 0,12,0x14,0,0,0,2,0
		.long 0
		.size .bn_sqr_comba4,.-.bn_sqr_comba4

		#
		# NOTE: The following label name should be changed to
		@@ -819,6 +820,7 @@ $data=<<EOF;
		.long 0
		.byte 0,12,0x14,0,0,0,2,0
		.long 0
		.size .bn_sqr_comba8,.-.bn_sqr_comba8

		#
		# NOTE: The following label name should be changed to
		@@ -972,6 +974,7 @@ $data=<<EOF;
		.long 0
		.byte 0,12,0x14,0,0,0,3,0
		.long 0
		.size .bn_mul_comba4,.-.bn_mul_comba4

		#
		# NOTE: The following label name should be changed to
		@@ -1510,6 +1513,7 @@ $data=<<EOF;
		.long 0
		.byte 0,12,0x14,0,0,0,3,0
		.long 0
		.size .bn_mul_comba8,.-.bn_mul_comba8

		#
		# NOTE: The following label name should be changed to
		@@ -1560,6 +1564,7 @@ Lppcasm_sub_adios:
		.long 0
		.byte 0,12,0x14,0,0,0,4,0
		.long 0
		.size .bn_sub_words,.-.bn_sub_words

		#
		# NOTE: The following label name should be changed to
		@@ -1605,6 +1610,7 @@ Lppcasm_add_adios:
		.long 0
		.byte 0,12,0x14,0,0,0,4,0
		.long 0
		.size .bn_add_words,.-.bn_add_words

		#
		# NOTE: The following label name should be changed to
		@@ -1720,6 +1726,7 @@ Lppcasm_div9:
		.long 0
		.byte 0,12,0x14,0,0,0,3,0
		.long 0
		.size .bn_div_words,.-.bn_div_words

		#
		# NOTE: The following label name should be changed to
		@@ -1761,6 +1768,7 @@ Lppcasm_sqr_adios:
		.long 0
		.byte 0,12,0x14,0,0,0,3,0
		.long 0
		.size .bn_sqr_words,.-.bn_sqr_words

		#
		# NOTE: The following label name should be changed to
		@@ -1866,6 +1874,7 @@ Lppcasm_mw_OVER:
		.long 0
		.byte 0,12,0x14,0,0,0,4,0
		.long 0
		.size bn_mul_words,.-bn_mul_words

		#
		# NOTE: The following label name should be changed to
		@@ -1991,6 +2000,7 @@ Lppcasm_maw_adios:
		.long 0
		.byte 0,12,0x14,0,0,0,4,0
		.long 0
		.size .bn_mul_add_words,.-.bn_mul_add_words
		.align 4
		EOF
		$data =~ s/\`([^\`]*)\`/eval $1/gem;

crypto/bn/asm/ppc64-mont.pl

+1 −0

Original line number	Diff line number	Diff line
		@@ -1079,6 +1079,7 @@ $code.=<<___;
		.long 0
		.byte 0,12,4,0,0x8c,10,6,0
		.long 0
		.size .$fname,.-.$fname

		.asciz "Montgomery Multiplication for PPC64, CRYPTOGAMS by <appro\@openssl.org>"
		___

crypto/perlasm/ppc-xlate.pl

+5 −3

Original line number	Diff line number	Diff line
		@@ -37,7 +37,6 @@ my $globl = sub {
		$ret .= ".align 3\n";
		$ret .= "$name:\n";
		$ret .= ".quad .$name,.TOC.\@tocbase,0\n";
		$ret .= ".size $name,24\n";
		$ret .= ".previous\n";

		$name = ".$name";
		@@ -62,9 +61,12 @@ my $machine = sub {
		".machine $arch";
		};
		my $size = sub {
		if ($flavour =~ /linux.*32/)
		if ($flavour =~ /linux/)
		{ shift;
		".size " . join(",",@_);
		my $name = shift; $name =~ s\|^[\.\_]\|\|;
		my $ret = ".size $name,.-".($flavour=~/64/?".":"").$name;
		$ret .= "\n.size .$name,.-.$name" if ($flavour=~/64/);
		$ret;
		}
		else
		{ ""; }