1/*	$NetBSD: rtld_start.S,v 1.3 2001/12/14 21:33:59 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,%rdi		# stack pointer arg to _rtld
47	pushq	%rbx			# save ps_strings
48
49	call	_rtld@PLT		# _rtld(sp)
50
51	popq	%rbx			# %rbx = ps_strings
52	popq	%rdx			# %rdx = cleanup
53	popq	%rcx			# %rcx = obj_main
54	jmp	*%rax
55
56	.align	4
57	.globl	_rtld_bind_start
58	.type	_rtld_bind_start,@function
59_rtld_bind_start:	# (obj, reloff)
60	pushfq				# save caller-saved registers
61	pushq	%rax
62	pushq	%rcx
63	pushq	%rdx
64	pushq	%rsi
65	pushq	%rdi
66	pushq	%r8
67	pushq	%r9
68	pushq	%r10
69	pushq	%r11
70
71	movq	80(%rsp),%rdi
72	movq	88(%rsp),%rsi
73	movq	%rsi,%r11		# multiply by sizeof (Elf64_Rela) (24)
74	shlq	$3,%r11
75	shlq	$4,%rsi			# 16 * index + 8 * index = 24 * index
76	addq	%r11,%rsi
77
78	call	_rtld_bind@PLT		# call the binder
79	movq	%rax,88(%rsp)		# store function in obj
80
81	popq	%r11
82	popq	%r10
83	popq	%r9
84	popq	%r8
85	popq	%rdi
86	popq	%rsi
87	popq	%rdx
88	popq	%rcx
89	popq	%rax
90	popfq
91
92	leaq	8(%rsp),%rsp
93
94	ret
95