rtld_start.S revision 1.7 1 /* $NetBSD: rtld_start.S,v 1.7 2008/04/28 20:23:03 martin Exp $ */
2
3 /*-
4 * Copyright (c) 2001, 2002 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Marcus Comstedt.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 #include <machine/asm.h>
33
34 .text
35 .align 2
36 .globl .rtld_start
37 .type .rtld_start,@function
38
39 .rtld_start:
40 mova 2f,r0
41 mov.l @r0,r2
42 add r0,r2 /* GOT */
43 mov.l @(4,r0),r4 /* _DYNAMIC@GOTOFF */
44 add r2,r4 /* _DYNAMIC */
45 mov.l @(12,r0),r1 /* _rtld_relocate_nonplt_self offset */
46 mov.l @(8,r0),r0 /* _DYNAMIC@GOT */
47 mov r4,r5
48 mov.l @(r0,r2),r0 /* where linker thinks _DYNAMIC is */
49 sub r0,r5 /* compute relocation base */
50 bsrf r1 /* _rtld_relocate_nonplt_self(dynp, relocbase) */
51 mov.l r5,@-r15 /* save relocbase */
52
53 4:
54 mov.l @r15+,r5 /* restore relocbase */
55 add #-8,r15 /* room for values returned by _rtld */
56 mov r15,r4
57 mov.l 1f,r0
58 bsrf r0 /* _rtld(sp, relocbase) */
59 mov.l r9,@-r15 /* save ps_strings */
60 3:
61 mov.l @r15+,r9 /* restore ps_strings */
62
63 mov.l @r15+,r7 /* from _rtld: exit procedure */
64 mov.l @r15+,r8 /* from _rtld: main object */
65
66 mov.l @r15,r4 /* restore argc */
67
68 mov r15,r5 /* restore argv */
69 add #4,r5
70
71 mov r4,r6 /* restore envp */
72 shll2 r6
73 add r15,r6
74 jmp @r0 /* entry point returned by _rtld */
75 add #8,r6
76 .align 2
77 1: .long _rtld-3b
78 2: .long _GLOBAL_OFFSET_TABLE_
79 .long _DYNAMIC@GOTOFF
80 .long _DYNAMIC@GOT
81 .long _rtld_relocate_nonplt_self-4b
82 .size .rtld_start,.-.rtld_start
83
84 .align 2
85 .globl _rtld_bind_start
86 .type _rtld_bind_start,@function
87 _rtld_bind_start: /* r0 = obj, r1 = reloff */
88 mov.l r2,@-r15 /* save registers */
89 mov.l r3,@-r15
90 mov.l r4,@-r15
91 mov.l r5,@-r15
92 mov.l r6,@-r15
93 mov.l r7,@-r15
94 sts.l mach,@-r15
95 sts.l macl,@-r15
96 sts.l pr,@-r15
97
98 mov r0,r4 /* copy of obj */
99 mov.l 2f,r0
100 bsrf r0 /* call the binder */
101 mov r1,r5 /* copy of reloff */
102 4:
103 lds.l @r15+,pr /* restore registers */
104 lds.l @r15+,macl
105 lds.l @r15+,mach
106 mov.l @r15+,r7
107 mov.l @r15+,r6
108 mov.l @r15+,r5
109 mov.l @r15+,r4
110 mov.l @r15+,r3
111 jmp @r0
112 mov.l @r15+,r2
113 .align 2
114 2: .long _rtld_bind-4b
115 .size _rtld_bind_start,.-_rtld_bind_start
116
117 .end
118