rtld_start.S revision 1.12 1 /* $NetBSD: rtld_start.S,v 1.12 2002/10/31 20:23:25 matt Exp $ */
2
3 /*-
4 * Copyright (C) 1998 Tsubai Masanari
5 * Portions copyright 2002 Charles M. Hannum <root (at) ihack.net>
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. The name of the author may not be used to endorse or promote products
17 * derived from this software without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
28 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 */
30
31 #include <machine/asm.h>
32
33 .globl _rtld_start
34 .globl _rtld
35
36 .text
37
38 _rtld_start:
39 stwu %r1,-48(%r1)
40 stw %r3,12(%r1) # argc
41 stw %r4,16(%r1) # argv
42 stw %r5,20(%r1) # envp
43 /* stw %r6,24(%r1) # obj (always 0) */
44 /* stw %r7,28(%r1) # cleanup (always 0) */
45 stw %r8,32(%r1) # ps_strings
46
47 bl _GLOBAL_OFFSET_TABLE_@local-4
48 mflr %r31 # r31 = (real) GOT
49 lwz %r30,_GLOBAL_OFFSET_TABLE_@got(31)
50 # the linker thought GOT were ...
51 lwz %r3,_DYNAMIC@got(%r31)
52
53 subf %r4,%r30,%r31 # r4 = relocbase
54 add %r3,%r3,%r4 # r3 = &_DYNAMIC
55 bl _rtld_relocate_nonplt_self@plt
56
57 subf 4,30,31 # r4 = relocbase
58 lwz %r3,16(%r1)
59 addi %r3,%r3,-12 # sp = &argv[-3] /* XXX */
60 bl _rtld@plt # _start = _rtld(sp, relocbase)
61 mtlr %r3
62
63 lwz %r3,12(%r1) # argc
64 lwz %r4,16(%r1) # argv
65 lwz %r5,20(%r1) # envp
66 lwz %r6,-8(%r4) # obj = sp[1] (== argv[-2])
67 lwz %r7,-12(%r4) # cleanup = sp[0] (== argv[-3])
68 lwz %r8,32(%r1) # ps_strings
69
70 addi %r1,%r1,48
71 blrl # _start(argc, argv, envp, obj, cleanup, ps_strings)
72
73 li %r0,1 # _exit()
74 sc
75
76
77 .globl _rtld_bind_start
78 .globl _rtld_bind
79
80 _rtld_bind_start:
81 stwu %r1,-160(%r1)
82
83 stw %r0,20(%r1)
84 mflr %r0
85 stw %r0,16(%r1) # save lr
86 mfcr %r0
87 stw %r0,12(%r1) # save cr
88 stmw %r3,24(%r1) # save r3-r31
89
90 mr %r3,%r12 # obj
91 mr %r4,%r11 # reloff
92 bl _rtld_bind@plt # _rtld_bind(obj, reloff)
93 mtctr %r3
94
95 lmw %r3,24(%r1) # load r3-r31
96 lwz %r0,12(%r1) # restore cr
97 mtcr %r0
98 lwz %r0,16(%r1) # restore lr
99 mtlr %r0
100 lwz %r0,20(%r1)
101
102 addi %r1,%r1,160
103 bctr
104
105 .globl _rtld_powerpc_pltcall
106 .globl _rtld_powerpc_pltresolve
107
108 _rtld_powerpc_pltcall:
109 slwi %r11,%r11,2
110 addis %r11,%r11,0 # addis 11,11,jmptab@ha
111 lwz %r11,0(%r11) # lwz 11,jmptab@l(11)
112 mtctr %r11
113 bctr
114
115 _rtld_powerpc_pltresolve:
116 lis %r12,0 # lis 12,_rtld_bind_start@ha
117 addi %r12,%r12,0 # addi 12,12,_rtld_bind_start@l
118 mtctr %r12
119 lis %r12,0 # lis 12,obj@ha
120 addi %r12,%r12,0 # addi 12,12,obj@l
121 bctr
122