123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288 |
- /*
- * Special support for eabi and SVR4
- *
- * Copyright (C) 1995-2022 Free Software Foundation, Inc.
- * Written By Michael Meissner
- *
- * This file is free software; you can redistribute it and/or modify it
- * under the terms of the GNU General Public License as published by the
- * Free Software Foundation; either version 3, or (at your option) any
- * later version.
- *
- * This file is distributed in the hope that it will be useful, but
- * WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- * General Public License for more details.
- *
- * Under Section 7 of GPL version 3, you are granted additional
- * permissions described in the GCC Runtime Library Exception, version
- * 3.1, as published by the Free Software Foundation.
- *
- * You should have received a copy of the GNU General Public License and
- * a copy of the GCC Runtime Library Exception along with this program;
- * see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
- * <http://www.gnu.org/licenses/>.
- */
- /* Do any initializations needed for the eabi environment */
- .section ".text"
- #include "ppc-asm.h"
- #ifndef __powerpc64__
- .section ".got2","aw"
- .align 2
- .LCTOC1 = . /* +32768 */
- /* Table of addresses */
- .Ltable = .-.LCTOC1
- .long .LCTOC1 /* address we are really at */
- .Lsda = .-.LCTOC1
- .long _SDA_BASE_ /* address of the first small data area */
- .Lsdas = .-.LCTOC1
- .long __SDATA_START__ /* start of .sdata/.sbss section */
- .Lsdae = .-.LCTOC1
- .long __SBSS_END__ /* end of .sdata/.sbss section */
- .Lsda2 = .-.LCTOC1
- .long _SDA2_BASE_ /* address of the second small data area */
- .Lsda2s = .-.LCTOC1
- .long __SDATA2_START__ /* start of .sdata2/.sbss2 section */
- .Lsda2e = .-.LCTOC1
- .long __SBSS2_END__ /* end of .sdata2/.sbss2 section */
- #ifdef _RELOCATABLE
- .Lgots = .-.LCTOC1
- .long __GOT_START__ /* Global offset table start */
- .Lgotm1 = .-.LCTOC1
- .long _GLOBAL_OFFSET_TABLE_-4 /* end of GOT ptrs before BLCL + 3 reserved words */
- .Lgotm2 = .-.LCTOC1
- .long _GLOBAL_OFFSET_TABLE_+12 /* start of GOT ptrs after BLCL + 3 reserved words */
- .Lgote = .-.LCTOC1
- .long __GOT_END__ /* Global offset table end */
- .Lgot2s = .-.LCTOC1
- .long __GOT2_START__ /* -mrelocatable GOT pointers start */
- .Lgot2e = .-.LCTOC1
- .long __GOT2_END__ /* -mrelocatable GOT pointers end */
- .Lfixups = .-.LCTOC1
- .long __FIXUP_START__ /* start of .fixup section */
- .Lfixupe = .-.LCTOC1
- .long __FIXUP_END__ /* end of .fixup section */
- .Lctors = .-.LCTOC1
- .long __CTOR_LIST__ /* start of .ctor section */
- .Lctore = .-.LCTOC1
- .long __CTOR_END__ /* end of .ctor section */
- .Ldtors = .-.LCTOC1
- .long __DTOR_LIST__ /* start of .dtor section */
- .Ldtore = .-.LCTOC1
- .long __DTOR_END__ /* end of .dtor section */
- .Lexcepts = .-.LCTOC1
- .long __EXCEPT_START__ /* start of .gcc_except_table section */
- .Lexcepte = .-.LCTOC1
- .long __EXCEPT_END__ /* end of .gcc_except_table section */
- .Linit = .-.LCTOC1
- .long .Linit_p /* address of variable to say we've been called */
- .text
- .align 2
- .Lptr:
- .long .LCTOC1-.Laddr /* PC relative pointer to .got2 */
- #endif
- .data
- .align 2
- .Linit_p:
- .long 0
- .text
- FUNC_START(__eabi)
- /* Eliminate -mrelocatable code if not -mrelocatable, so that this file can
- be assembled with other assemblers than GAS. */
- #ifndef _RELOCATABLE
- addis 10,0,.Linit_p@ha /* init flag */
- addis 11,0,.LCTOC1@ha /* load address of .LCTOC1 */
- lwz 9,.Linit_p@l(10) /* init flag */
- addi 11,11,.LCTOC1@l
- cmplwi 2,9,0 /* init flag != 0? */
- bnelr 2 /* return now, if we've been called already */
- stw 1,.Linit_p@l(10) /* store a nonzero value in the done flag */
- #else /* -mrelocatable */
- mflr 0
- bl .Laddr /* get current address */
- .Laddr:
- mflr 12 /* real address of .Laddr */
- lwz 11,(.Lptr-.Laddr)(12) /* linker generated address of .LCTOC1 */
- add 11,11,12 /* correct to real pointer */
- lwz 12,.Ltable(11) /* get linker's idea of where .Laddr is */
- lwz 10,.Linit(11) /* address of init flag */
- subf. 12,12,11 /* calculate difference */
- lwzx 9,10,12 /* done flag */
- cmplwi 2,9,0 /* init flag != 0? */
- mtlr 0 /* restore in case branch was taken */
- bnelr 2 /* return now, if we've been called already */
- stwx 1,10,12 /* store a nonzero value in the done flag */
- beq+ 0,.Lsdata /* skip if we don't need to relocate */
- /* We need to relocate the .got2 pointers. */
- lwz 3,.Lgot2s(11) /* GOT2 pointers start */
- lwz 4,.Lgot2e(11) /* GOT2 pointers end */
- add 3,12,3 /* adjust pointers */
- add 4,12,4
- bl FUNC_NAME(__eabi_convert) /* convert pointers in .got2 section */
- /* Fixup the .ctor section for static constructors */
- lwz 3,.Lctors(11) /* constructors pointers start */
- lwz 4,.Lctore(11) /* constructors pointers end */
- bl FUNC_NAME(__eabi_convert) /* convert constructors */
- /* Fixup the .dtor section for static destructors */
- lwz 3,.Ldtors(11) /* destructors pointers start */
- lwz 4,.Ldtore(11) /* destructors pointers end */
- bl FUNC_NAME(__eabi_convert) /* convert destructors */
- /* Fixup the .gcc_except_table section for G++ exceptions */
- lwz 3,.Lexcepts(11) /* exception table pointers start */
- lwz 4,.Lexcepte(11) /* exception table pointers end */
- bl FUNC_NAME(__eabi_convert) /* convert exceptions */
- /* Fixup the addresses in the GOT below _GLOBAL_OFFSET_TABLE_-4 */
- lwz 3,.Lgots(11) /* GOT table pointers start */
- lwz 4,.Lgotm1(11) /* GOT table pointers below _GLOBAL_OFFSET_TABLE-4 */
- bl FUNC_NAME(__eabi_convert) /* convert lower GOT */
- /* Fixup the addresses in the GOT above _GLOBAL_OFFSET_TABLE_+12 */
- lwz 3,.Lgotm2(11) /* GOT table pointers above _GLOBAL_OFFSET_TABLE+12 */
- lwz 4,.Lgote(11) /* GOT table pointers end */
- bl FUNC_NAME(__eabi_convert) /* convert lower GOT */
- /* Fixup any user initialized pointers now (the compiler drops pointers to */
- /* each of the relocs that it does in the .fixup section). */
- .Lfix:
- lwz 3,.Lfixups(11) /* fixup pointers start */
- lwz 4,.Lfixupe(11) /* fixup pointers end */
- bl FUNC_NAME(__eabi_uconvert) /* convert user initialized pointers */
- .Lsdata:
- mtlr 0 /* restore link register */
- #endif /* _RELOCATABLE */
- /* Only load up register 13 if there is a .sdata and/or .sbss section */
- lwz 3,.Lsdas(11) /* start of .sdata/.sbss section */
- lwz 4,.Lsdae(11) /* end of .sdata/.sbss section */
- cmpw 1,3,4 /* .sdata/.sbss section non-empty? */
- beq- 1,.Lsda2l /* skip loading r13 */
- lwz 13,.Lsda(11) /* load r13 with _SDA_BASE_ address */
- /* Only load up register 2 if there is a .sdata2 and/or .sbss2 section */
- .Lsda2l:
- lwz 3,.Lsda2s(11) /* start of .sdata/.sbss section */
- lwz 4,.Lsda2e(11) /* end of .sdata/.sbss section */
- cmpw 1,3,4 /* .sdata/.sbss section non-empty? */
- beq+ 1,.Ldone /* skip loading r2 */
- lwz 2,.Lsda2(11) /* load r2 with _SDA2_BASE_ address */
- /* Done adjusting pointers, return by way of doing the C++ global constructors. */
- .Ldone:
- b FUNC_NAME(__init) /* do any C++ global constructors (which returns to caller) */
- FUNC_END(__eabi)
- /* Special subroutine to convert a bunch of pointers directly.
- r0 has original link register
- r3 has low pointer to convert
- r4 has high pointer to convert
- r5 .. r10 are scratch registers
- r11 has the address of .LCTOC1 in it.
- r12 has the value to add to each pointer
- r13 .. r31 are unchanged */
- #ifdef _RELOCATABLE
- FUNC_START(__eabi_convert)
- cmplw 1,3,4 /* any pointers to convert? */
- subf 5,3,4 /* calculate number of words to convert */
- bclr 4,4 /* return if no pointers */
- srawi 5,5,2
- addi 3,3,-4 /* start-4 for use with lwzu */
- mtctr 5
- .Lcvt:
- lwzu 6,4(3) /* pointer to convert */
- cmpwi 0,6,0
- beq- .Lcvt2 /* if pointer is null, don't convert */
- add 6,6,12 /* convert pointer */
- stw 6,0(3)
- .Lcvt2:
- bdnz+ .Lcvt
- blr
- FUNC_END(__eabi_convert)
- /* Special subroutine to convert the pointers the user has initialized. The
- compiler has placed the address of the initialized pointer into the .fixup
- section.
- r0 has original link register
- r3 has low pointer to convert
- r4 has high pointer to convert
- r5 .. r10 are scratch registers
- r11 has the address of .LCTOC1 in it.
- r12 has the value to add to each pointer
- r13 .. r31 are unchanged */
-
- FUNC_START(__eabi_uconvert)
- cmplw 1,3,4 /* any pointers to convert? */
- subf 5,3,4 /* calculate number of words to convert */
- bclr 4,4 /* return if no pointers */
- srawi 5,5,2
- addi 3,3,-4 /* start-4 for use with lwzu */
- mtctr 5
- .Lucvt:
- lwzu 6,4(3) /* next pointer to pointer to convert */
- add 6,6,12 /* adjust pointer */
- lwz 7,0(6) /* get the pointer it points to */
- stw 6,0(3) /* store adjusted pointer */
- add 7,7,12 /* adjust */
- stw 7,0(6)
- bdnz+ .Lucvt
- blr
- FUNC_END(__eabi_uconvert)
- #endif
- #endif
|