Remove AIX toc data after every function. NFC
authormiod <miod@openbsd.org>
Thu, 2 Feb 2023 20:12:05 +0000 (20:12 +0000)
committermiod <miod@openbsd.org>
Thu, 2 Feb 2023 20:12:05 +0000 (20:12 +0000)
lib/libcrypto/aes/asm/aes-ppc.pl
lib/libcrypto/bn/asm/ppc-mont.pl
lib/libcrypto/bn/asm/ppc.pl
lib/libcrypto/sha/asm/sha1-ppc.pl
lib/libcrypto/sha/asm/sha512-ppc.pl

index 91a46f6..bc93603 100644 (file)
@@ -118,9 +118,7 @@ LAES_Te:
        addi    $Tbl0,$Tbl0,`128-8`
        mtlr    r0
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,0,0
-       .space  `64-9*4`
+       .space  `64-12*4`
 LAES_Td:
        mflr    r0
        bcl     20,31,\$+4
@@ -128,9 +126,7 @@ LAES_Td:
        addi    $Tbl0,$Tbl0,`128-64-8+2048+256`
        mtlr    r0
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,0,0
-       .space  `128-64-9*4`
+       .space  `128-64-12*4`
 ___
 &_data_word(
        0xc66363a5, 0xf87c7c84, 0xee777799, 0xf67b7b8d,
@@ -472,9 +468,6 @@ Lenc_done:
        mtlr    r0
        addi    $sp,$sp,$FRAME
        blr
-       .long   0
-       .byte   0,12,4,1,0x80,18,3,0
-       .long   0
 
 .align 5
 Lppc_AES_encrypt:
@@ -617,8 +610,6 @@ Lenc_loop:
        xor     $s2,$s2,$t2
        xor     $s3,$s3,$t3
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,0,0
 
 .align 4
 Lppc_AES_encrypt_compact:
@@ -762,8 +753,6 @@ Lenc_compact_done:
        xor     $s2,$s2,$t2
        xor     $s3,$s3,$t3
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,0,0
 
 .globl .AES_decrypt
 .align 7
@@ -906,9 +895,6 @@ Ldec_done:
        mtlr    r0
        addi    $sp,$sp,$FRAME
        blr
-       .long   0
-       .byte   0,12,4,1,0x80,18,3,0
-       .long   0
 
 .align 5
 Lppc_AES_decrypt:
@@ -1051,8 +1037,6 @@ Ldec_loop:
        xor     $s2,$s2,$t2
        xor     $s3,$s3,$t3
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,0,0
 
 .align 4
 Lppc_AES_decrypt_compact:
@@ -1353,11 +1337,6 @@ Ldec_compact_done:
        xor     $s2,$s2,$t2
        xor     $s3,$s3,$t3
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,0,0
-
-.asciz "AES for PPC, CRYPTOGAMS by <appro\@openssl.org>"
-.align 7
 ___
 
 $code =~ s/\`([^\`]*)\`/eval $1/gem;
index f9b6992..2933436 100644 (file)
@@ -322,11 +322,6 @@ Lcopy:                             ; copy or in-place refresh
        $POP    r31,`-1*$SIZE_T`($tj)
        mr      $sp,$tj
        blr
-       .long   0
-       .byte   0,12,4,0,0x80,12,6,0
-       .long   0
-
-.asciz  "Montgomery Multiplication for PPC, CRYPTOGAMS by <appro\@openssl.org>"
 ___
 
 $code =~ s/\`([^\`]*)\`/eval $1/gem;
index 34e38d8..c9b7f94 100644 (file)
@@ -389,9 +389,6 @@ $data=<<EOF;
        $ST             r9,`6*$BNSZ`(r3)        #r[6]=c1
        $ST             r10,`7*$BNSZ`(r3)       #r[7]=c2
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,2,0
-       .long   0
 
 #
 #      NOTE:   The following label name should be changed to
@@ -816,9 +813,6 @@ $data=<<EOF;
 
 
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,2,0
-       .long   0
 
 #
 #      NOTE:   The following label name should be changed to
@@ -969,9 +963,6 @@ $data=<<EOF;
        $ST     r10,`6*$BNSZ`(r3)       #r[6]=c1
        $ST     r11,`7*$BNSZ`(r3)       #r[7]=c2
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,3,0
-       .long   0
 
 #
 #      NOTE:   The following label name should be changed to
@@ -1507,9 +1498,6 @@ $data=<<EOF;
        $ST     r12,`14*$BNSZ`(r3)      #r[14]=c3;
        $ST     r10,`15*$BNSZ`(r3)      #r[15]=c1;
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,3,0
-       .long   0
 
 #
 #      NOTE:   The following label name should be changed to
@@ -1557,9 +1545,6 @@ Lppcasm_sub_adios:
        subfze  r3,r0           # if carry bit is set then r3 = 0 else -1
        andi.   r3,r3,1         # keep only last bit.
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,4,0
-       .long   0
 
 #
 #      NOTE:   The following label name should be changed to
@@ -1602,9 +1587,6 @@ Lppcasm_add_mainloop:
 Lppcasm_add_adios:     
        addze   r3,r0                   #return carry bit.
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,4,0
-       .long   0
 
 #
 #      NOTE:   The following label name should be changed to
@@ -1717,9 +1699,6 @@ Lppcasm_div8:
 Lppcasm_div9:
        or      r3,r8,r0
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,3,0
-       .long   0
 
 #
 #      NOTE:   The following label name should be changed to
@@ -1758,9 +1737,6 @@ Lppcasm_sqr_mainloop:
        bdnz-   Lppcasm_sqr_mainloop
 Lppcasm_sqr_adios:     
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,3,0
-       .long   0
 
 #
 #      NOTE:   The following label name should be changed to
@@ -1863,9 +1839,6 @@ Lppcasm_mw_REM:
 Lppcasm_mw_OVER:       
        addi    r3,r12,0
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,4,0
-       .long   0
 
 #
 #      NOTE:   The following label name should be changed to
@@ -1988,9 +1961,6 @@ Lppcasm_maw_leftover:
 Lppcasm_maw_adios:     
        addi    r3,r12,0
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,4,0
-       .long   0
        .align  4
 EOF
 $data =~ s/\`([^\`]*)\`/eval $1/gem;
index 2140dd2..85342b6 100755 (executable)
@@ -262,9 +262,6 @@ Ldone:
        mtlr    r0
        addi    $sp,$sp,$FRAME
        blr
-       .long   0
-       .byte   0,12,4,1,0x80,18,3,0
-       .long   0
 ___
 
 # This is private block function, which uses tailored calling
@@ -314,11 +311,6 @@ $code.=<<___;
        addi    $inp,$inp,`16*4`
        bdnz-   Lsha1_block_private
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,0,0
-___
-$code.=<<___;
-.asciz "SHA1 block transform for PPC, CRYPTOGAMS by <appro\@fy.chalmers.se>"
 ___
 
 $code =~ s/\`([^\`]*)\`/eval $1/gem;
index b564929..1f02cfd 100755 (executable)
@@ -309,9 +309,6 @@ Ldone:
        mtlr    r0
        addi    $sp,$sp,$FRAME
        blr
-       .long   0
-       .byte   0,12,4,1,0x80,18,3,0
-       .long   0
 
 .align 4
 Lsha2_block_private:
@@ -378,8 +375,6 @@ $code.=<<___;
        $ST     $H,`7*$SZ`($ctx)
        bne     Lsha2_block_private
        blr
-       .long   0
-       .byte   0,12,0x14,0,0,0,0,0
        .rodata
 Ltable:
 ___