1/*	$NetBSD: rtld_start.S,v 1.5 2002/11/24 18:16:45 fvdl Exp $	*/
2
3/*
4 * Copyright (c) 2001 Wasabi Systems, Inc.
5 * All rights reserved.
6 *
7 * Written by Frank van der Linden for Wasabi Systems, Inc.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 *    notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 *    notice, this list of conditions and the following disclaimer in the
16 *    documentation and/or other materials provided with the distribution.
17 * 3. All advertising materials mentioning features or use of this software
18 *    must display the following acknowledgement:
19 *      This product includes software developed for the NetBSD Project by
20 *      Wasabi Systems, Inc.
21 * 4. The name of Wasabi Systems, Inc. may not be used to endorse
22 *    or promote products derived from this software without specific prior
23 *    written permission.
24 *
25 * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
26 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
27 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
28 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL WASABI SYSTEMS, INC
29 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
30 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
31 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
32 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
33 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
34 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
35 * POSSIBILITY OF SUCH DAMAGE.
36 */
37
38#include <machine/asm.h>
39
40	.text
41	.align	16
42	.globl	.rtld_start
43	.type	.rtld_start,@function
44.rtld_start:
45	subq	$16,%rsp		# make room of obj_main and exit proc
46	movq	%rsp,%r12		# stack pointer arg to _rtld
47	pushq	%rbx			# save ps_strings
48
49	leaq	_GLOBAL_OFFSET_TABLE_(%rip),%rbx
50	movq	_GLOBAL_OFFSET_TABLE_@GOTPCREL(%rip),%rdx
51	subq	%rdx,%rbx		# %rbx = relocbase
52
53	movq	_DYNAMIC@GOTPCREL(%rip),%rdi
54	addq	%rbx,%rdi
55	movq	%rbx,%rsi
56	call	_rtld_relocate_nonplt_self@PLT
57
58	movq	%r12,%rdi
59	movq	%rbx,%rsi
60
61	call	_rtld@PLT		# _rtld(sp, relocbase)
62
63	popq	%rbx			# %rbx = ps_strings
64	popq	%rdx			# %rdx = cleanup
65	popq	%rcx			# %rcx = obj_main
66	jmp	*%rax
67
68	.align	4
69	.globl	_rtld_bind_start
70	.type	_rtld_bind_start,@function
71_rtld_bind_start:	# (obj, reloff)
72	pushfq				# save caller-saved registers
73	pushq	%rax
74	pushq	%rcx
75	pushq	%rdx
76	pushq	%rsi
77	pushq	%rdi
78	pushq	%r8
79	pushq	%r9
80	pushq	%r10
81	pushq	%r11
82
83	movq	80(%rsp),%rdi
84	movq	88(%rsp),%rsi
85
86	call	_rtld_bind@PLT		# call the binder
87	movq	%rax,88(%rsp)		# store function in obj
88
89	popq	%r11
90	popq	%r10
91	popq	%r9
92	popq	%r8
93	popq	%rdi
94	popq	%rsi
95	popq	%rdx
96	popq	%rcx
97	popq	%rax
98	popfq
99
100	leaq	8(%rsp),%rsp
101
102	ret
103