rtld_start64.S revision 1.2.8.2
1 1.2.8.2 tls /* $NetBSD: rtld_start64.S,v 1.2.8.2 2014/08/20 00:02:22 tls Exp $ */ 2 1.2.8.2 tls 3 1.2.8.2 tls /*- 4 1.2.8.2 tls * Copyright (C) 1998 Tsubai Masanari 5 1.2.8.2 tls * Portions copyright 2002 Charles M. Hannum <root (at) ihack.net> 6 1.2.8.2 tls * All rights reserved. 7 1.2.8.2 tls * 8 1.2.8.2 tls * Redistribution and use in source and binary forms, with or without 9 1.2.8.2 tls * modification, are permitted provided that the following conditions 10 1.2.8.2 tls * are met: 11 1.2.8.2 tls * 1. Redistributions of source code must retain the above copyright 12 1.2.8.2 tls * notice, this list of conditions and the following disclaimer. 13 1.2.8.2 tls * 2. Redistributions in binary form must reproduce the above copyright 14 1.2.8.2 tls * notice, this list of conditions and the following disclaimer in the 15 1.2.8.2 tls * documentation and/or other materials provided with the distribution. 16 1.2.8.2 tls * 3. The name of the author may not be used to endorse or promote products 17 1.2.8.2 tls * derived from this software without specific prior written permission. 18 1.2.8.2 tls * 19 1.2.8.2 tls * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 20 1.2.8.2 tls * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 21 1.2.8.2 tls * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 22 1.2.8.2 tls * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 23 1.2.8.2 tls * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 24 1.2.8.2 tls * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 25 1.2.8.2 tls * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 26 1.2.8.2 tls * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 27 1.2.8.2 tls * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 28 1.2.8.2 tls * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 29 1.2.8.2 tls */ 30 1.2.8.2 tls 31 1.2.8.2 tls #include <machine/asm.h> 32 1.2.8.2 tls 33 1.2.8.2 tls .globl _rtld_relocate_nonplt_self 34 1.2.8.2 tls .globl _rtld 35 1.2.8.2 tls 36 1.2.8.2 tls .text 37 1.2.8.2 tls ENTRY_NOPROFILE(_rtld_start) 38 1.2.8.2 tls mr %r23,%r3 // argc 39 1.2.8.2 tls mr %r24,%r4 // argv 40 1.2.8.2 tls mr %r25,%r5 // envp 41 1.2.8.2 tls /* mr %r26,%r6 // obj (always 0) */ 42 1.2.8.2 tls /* mr %r27,%r7 // cleanup (always 0) */ 43 1.2.8.2 tls mr %r28,%r8 // ps_strings 44 1.2.8.2 tls li %r0,0 45 1.2.8.2 tls stdu %r0,-64(%r1) // terminate stack chain 46 1.2.8.2 tls std %r2,40(%r1) // save TOC 47 1.2.8.2 tls std %r0,16(%r1) // ditto 48 1.2.8.2 tls 49 1.2.8.2 tls bcl 20,31,1f 50 1.2.8.2 tls 1: mflr %r30 51 1.2.8.2 tls ld %r3,0(%r2) // TOC[0] = &TOC 52 1.2.8.2 tls sub %r29,%r2,%r3 // compute relocbase 53 1.2.8.2 tls 54 1.2.8.2 tls addis %r3,%r3,_DYNAMIC-1b@ha // get _DYNAMIC actual address 55 1.2.8.2 tls addi %r3,%r3,_DYNAMIC-1b@l 56 1.2.8.2 tls mr %r4,%r29 // r4 = relocbase 57 1.2.8.2 tls CALL(_rtld_relocate_nonplt_self) 58 1.2.8.2 tls 59 1.2.8.2 tls addi %r3,%r1,48 // sp = <local variable space> 60 1.2.8.2 tls mr %r4,%r29 // r4 = relocbase 61 1.2.8.2 tls CALL(_rtld) // _start = _rtld(sp, relocbase) 62 1.2.8.2 tls 63 1.2.8.2 tls ld %r0,0(%r3) // func address 64 1.2.8.2 tls ld %r2,8(%r3) // TOC address 65 1.2.8.2 tls ld %r11,16(%r3) // environment pointer 66 1.2.8.2 tls mtctr %r0 // so we can call it. 67 1.2.8.2 tls 68 1.2.8.2 tls mr %r3,%r23 // argc 69 1.2.8.2 tls mr %r4,%r24 // argv 70 1.2.8.2 tls mr %r5,%r25 // envp 71 1.2.8.2 tls ld %r6,56(%r1) // obj = <localvar>[1] 72 1.2.8.2 tls ld %r7,48(%r1) // cleanup = <localvar>[0] 73 1.2.8.2 tls mr %r8,%r28 // ps_strings 74 1.2.8.2 tls 75 1.2.8.2 tls bctrl // _start(argc, argv, envp, obj, cleanup, ps_strings) 76 1.2.8.2 tls nop 77 1.2.8.2 tls 78 1.2.8.2 tls li %r0,1 // _exit() 79 1.2.8.2 tls sc 80 1.2.8.2 tls END(_rtld_start) 81 1.2.8.2 tls 82 1.2.8.2 tls .globl _rtld_bind 83 1.2.8.2 tls 84 1.2.8.2 tls /* 85 1.2.8.2 tls * %r0 has the index of the rela, %r12 has a pointer to the plt entry. 86 1.2.8.2 tls */ 87 1.2.8.2 tls ENTRY_NOPROFILE(_rtld_bind_start) 88 1.2.8.2 tls std %r3,-72(%r1) // save argument register 89 1.2.8.2 tls std %r4,-64(%r1) // save argument register 90 1.2.8.2 tls std %r5,-56(%r1) // save argument register 91 1.2.8.2 tls std %r6,-48(%r1) // save argument register 92 1.2.8.2 tls std %r7,-40(%r1) // save argument register 93 1.2.8.2 tls std %r8,-32(%r1) // save argument register 94 1.2.8.2 tls std %r9,-24(%r1) // save argument register 95 1.2.8.2 tls std %r10,-16(%r1) // save argument register 96 1.2.8.2 tls std %r31,-8(%r1) // save register 97 1.2.8.2 tls stdu %r1,-(48+80)(%r1) // create back chain 98 1.2.8.2 tls mflr %r10 99 1.2.8.2 tls std %r10,16(%r1) // save LR 100 1.2.8.2 tls mfcr %r9 101 1.2.8.2 tls std %r9,8(%r1) // save CR to be safe 102 1.2.8.2 tls 103 1.2.8.2 tls mr %r31, %r12 // save this across bind call 104 1.2.8.2 tls mr %r3, %r11 // obj 105 1.2.8.2 tls mr %r4, %r0 // reloff 106 1.2.8.2 tls 107 1.2.8.2 tls CALL(_rtld_bind) // _rtld_bind(obj, reloff) 108 1.2.8.2 tls 109 1.2.8.2 tls mtctr %r3 110 1.2.8.2 tls mr %r12,%r31 // restore r12 111 1.2.8.2 tls 112 1.2.8.2 tls ld %r0,8(%r1) // get saved CR 113 1.2.8.2 tls mtcr %r0 // restore it 114 1.2.8.2 tls ld %r0,16(%r1) // get saved LR 115 1.2.8.2 tls mtlr %r0 // restore it 116 1.2.8.2 tls 117 1.2.8.2 tls addi %r1,%r1,(48+80) // adjust stack 118 1.2.8.2 tls ld %r3,-72(%r1) // restore argument register 119 1.2.8.2 tls ld %r4,-64(%r1) // restore argument register 120 1.2.8.2 tls ld %r5,-56(%r1) // restore argument register 121 1.2.8.2 tls ld %r6,-48(%r1) // restore argument register 122 1.2.8.2 tls ld %r7,-40(%r1) // restore argument register 123 1.2.8.2 tls ld %r8,-32(%r1) // restore argument register 124 1.2.8.2 tls ld %r9,-24(%r1) // restore argument register 125 1.2.8.2 tls ld %r10,-16(%r1) // restore argument register 126 1.2.8.2 tls ld %r31,-8(%r1) // restore register 127 1.2.8.2 tls bctr 128 1.2.8.2 tls END(_rtld_bind_start) 129
Indexes created Mon Oct 27 20:09:55 GMT 2025