1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
|
/* $OpenBSD: ldasm.S,v 1.10 2006/05/03 16:10:52 drahn Exp $ */
/*
* Copyright (c) 2002 Dale Rahn
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
* OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*
*/
#define DL_DATA_SIZE (16*4)
#include <sys/syscall.h>
#include <machine/asm.h>
.text
.align 4
.globl _dl_start
.type _dl_start,@function
_dl_start:
movl %esp,%eax # save stack pointer for _rtld
pushl %ebx # save ps_strings
subl $DL_DATA_SIZE,%esp # allocate dl_data
pushl $0 # push 0 for dynamicp (unused on i386)
movl %esp,%ebx
movl %ebx,%edi # save dl_data arg for dl_boot
pushl %ebx # push dl_data for dl_boot_bind
mov %eax, %esi # save stack for dl_boot
pushl %eax # load saved SP for dl_boot_bind
call _dl_boot_bind@PLT # _dl_boot_bind(sp,dl_data)
pushl %edi # push saved dl_data
movl %edi,%ebp
movl (7*4)(%ebp),%eax
pushl %eax # push loff from dl_data
movl %esi,%ebp
movl $4,%eax
imull 0(%ebp),%eax
addl $8,%eax
addl %ebp,%eax
push %eax # push envp
leal 4(%ebp),%eax
push %eax # push argv
call _dl_boot@PLT # _dl_boot(argv,envp,loff,dl_data)
addl $5*4,%esp # pop args
addl $DL_DATA_SIZE,%esp # return dl_data
popl %ebx # %ebx = ps_strings - XXXDSR
popl %edx # %edx = cleanup - XXXDSR
popl %ecx # %ecx = obj_main - XXXDSR
jmp *%eax
/* copied from lib/libc/arch/i386/SYS.h - XXX */
#define __DO_SYSCALL(x) \
movl $__CONCAT(SYS_, x),%eax; \
int $0x80
#define DL_SYSCALL(n) DL_SYSCALL2(n,n)
#define DL_SYSCALL2(n,c) \
.section ".text" ;\
.align 4 ;\
.global __CONCAT(_dl_,n) ;\
.type __CONCAT(_dl_,n)%function ;\
__CONCAT(_dl_,n): ;\
__DO_SYSCALL(c) ;\
jb .L_cerr ;\
ret
DL_SYSCALL(close)
.section ".text"
.align 4
.global _dl_exit
.type _dl_exit,@function
_dl_exit:
mov $SYS_exit, %eax
int $0x80
ret
DL_SYSCALL(issetugid)
DL_SYSCALL2(_syscall,__syscall)
DL_SYSCALL(munmap)
DL_SYSCALL(mprotect)
DL_SYSCALL(open)
DL_SYSCALL(read)
DL_SYSCALL(write)
DL_SYSCALL(stat)
DL_SYSCALL(fstat)
DL_SYSCALL(fcntl)
DL_SYSCALL(gettimeofday)
DL_SYSCALL2(sysctl,__sysctl)
DL_SYSCALL(getdirentries)
.L_cerr:
/* error: result = -errno; - handled here. */
neg %eax
ret
/* _dl_sigprocmask: does not handle NULL new set */
.section ".text"
.align 4
.global _dl_sigprocmask
.type _dl_sigprocmask,@function
_dl_sigprocmask:
movl 8(%esp), %ecx
movl (%ecx),%ecx
movl %ecx,8(%esp) # to new mask arg
mov $SYS_sigprocmask, %eax
int $0x80
jb 1f /* error: result = -errno */
movl 12(%esp),%ecx # fetch old mask requested
testl %ecx,%ecx # test if old mask requested
jz 2f
movl %eax,(%ecx) # store old mask
xorl %eax,%eax
2: ret
1: /* error: result = -errno; - handled here. */
neg %eax
ret
.align 4
.global _dl_bind_start
.type _dl_bind_start,@function
_dl_bind_start:
pushf # save registers
pushl %eax
pushl %ecx
pushl %edx
pushl %ebx
pushl %ebp
pushl %esi
pushl %edi
pushl %ds
pushl %es
pushl 44(%esp) # Copy of reloff
pushl 44(%esp) # Copy of obj
call _dl_bind@PLT # Call the binder
addl $8,%esp # pop binder args
movl %eax,44(%esp) # Store function to be called in obj
popl %es # restore registers
popl %ds
popl %edi
popl %esi
popl %ebp
popl %ebx
popl %edx
popl %ecx
popl %eax
popf
leal 4(%esp),%esp # Discard reloff, do not change eflags
ret
|
