summaryrefslogtreecommitdiff
path: root/fpcsrc/rtl/openbsd/x86_64/dllprt0.as
blob: 67cb09564830b1af72b0834b8113527b4c28b5ab (plain)
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
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
	.section ".note.openbsd.ident", "a"
	.p2align 2
	.long	8
	.long	4
	.long	1
	.ascii "OpenBSD\0"
	.long	0
	.previous
	.file	"crt0.c"
	.globl	__progname
	.section	.rodata
.LC0:
	.string	""
	.section	.data.rel.local,"aw",@progbits
	.align 8
	.type	__progname, @object
	.size	__progname, 8
__progname:
	.quad	.LC0
#APP
	 .text				
	.align	8			
	.globl	__start			
	.globl	_start			
_start:					
__start:				
	movq	%rbx,%r9		
	movq	%rcx,%r8		
	movq	%rdx,%rcx		
	movq	(%rsp),%rdi		
	leaq	16(%rsp,%rdi,8),%rdx	
	leaq	8(%rsp),%rsi		
	subq	$8,%rsp			
	andq	$~15,%rsp		
	addq	$8,%rsp			
	jmp	___start		
#NO_APP
	.text
	.globl	___start
	.type	___start, @function
___start:
.LFB9:
	pushq	%rbp
.LCFI0:
	movq	%rsp, %rbp
.LCFI1:
	subq	$64, %rsp
.LCFI2:
	movl	%edi, -20(%rbp)
	movq	%rsi, -32(%rbp)
	movq	%rdx, -40(%rbp)
	movq	%rcx, -48(%rbp)
	movq	%r8, -56(%rbp)
	movq	%r9, -64(%rbp)
	movq	environ@GOTPCREL(%rip), %rdx
	movq	-40(%rbp), %rax
	movq	%rax, (%rdx)
	movq	operatingsystem_parameter_envp@GOTPCREL(%rip), %rdx
	movq	-40(%rbp), %rax
	movq	%rax, (%rdx)
	movl	-20(%rbp), %eax
	movslq	%eax,%rdx
	movq	operatingsystem_parameter_argc@GOTPCREL(%rip), %rax
	movq	%rdx, (%rax)
	movq	operatingsystem_parameter_argv@GOTPCREL(%rip), %rdx
	movq	-32(%rbp), %rax
	movq	%rax, (%rdx)
	movq	-32(%rbp), %rax
	movq	(%rax), %rax
	movq	%rax, -8(%rbp)
	cmpq	$0, -8(%rbp)
	je	.L2
	movq	-8(%rbp), %rdi
	movl	$47, %esi
	call	_strrchr
	movq	%rax, %rdx
	movq	__progname@GOTPCREL(%rip), %rax
	movq	%rdx, (%rax)
	movq	__progname@GOTPCREL(%rip), %rax
	movq	(%rax), %rax
	testq	%rax, %rax
	jne	.L4
	movq	__progname@GOTPCREL(%rip), %rdx
	movq	-8(%rbp), %rax
	movq	%rax, (%rdx)
	jmp	.L6
.L4:
	movq	__progname@GOTPCREL(%rip), %rax
	movq	(%rax), %rax
	leaq	1(%rax), %rdx
	movq	__progname@GOTPCREL(%rip), %rax
	movq	%rdx, (%rax)
.L6:
	movq	__progname_storage@GOTPCREL(%rip), %rax
	movq	%rax, -16(%rbp)
	jmp	.L7
.L8:
	movq	__progname@GOTPCREL(%rip), %rax
	movq	(%rax), %rcx
	movzbl	(%rcx), %edx
	movq	-16(%rbp), %rax
	movb	%dl, (%rax)
	addq	$1, -16(%rbp)
	leaq	1(%rcx), %rdx
	movq	__progname@GOTPCREL(%rip), %rax
	movq	%rdx, (%rax)
.L7:
	movq	__progname@GOTPCREL(%rip), %rax
	movq	(%rax), %rax
	movzbl	(%rax), %eax
	testb	%al, %al
	je	.L9
	movq	__progname_storage@GOTPCREL(%rip), %rax
	leaq	255(%rax), %rax
	cmpq	%rax, -16(%rbp)
	jb	.L8
.L9:
	movq	-16(%rbp), %rax
	movb	$0, (%rax)
	movq	__progname@GOTPCREL(%rip), %rdx
	movq	__progname_storage@GOTPCREL(%rip), %rax
	movq	%rax, (%rdx)
.L2:
	movl	$0, %eax
	call	__init@PLT
	movq	environ@GOTPCREL(%rip), %rax
	movq	(%rax), %rdx
	movq	-32(%rbp), %rsi
	movl	-20(%rbp), %edi
	movl	$0, %eax
	call	main@PLT
	# movl	%eax, %edi
	# call	exit
	jmp 	_haltproc@PLT
        .p2align 2,0x90

.globl _haltproc
.type _haltproc,@function

_haltproc:
           movq $1,%rax
           movzwq operatingsystem_result(%rip),%rbx
           pushq   %rbx
           call .Lactualsyscall
           addq  $8,%rsp
           jmp   _haltproc

.Lactualsyscall:
         int $0x80
         jb .LErrorcode
         xor %rbx,%rbx
         ret
.LErrorcode:
	movl	%eax, %edi



	call	exit@PLT
.LFE9:
	.size	___start, .-___start
	.type	_strrchr, @function
_strrchr:
.LFB10:
	pushq	%rbp
.LCFI3:
	movq	%rsp, %rbp
.LCFI4:
	movq	%rdi, -24(%rbp)
	movb	%sil, -25(%rbp)
	movq	$0, -8(%rbp)
.L13:
	movq	-24(%rbp), %rdx
	movzbl	(%rdx), %eax
	cmpb	-25(%rbp), %al
	jne	.L14
	movq	-24(%rbp), %rax
	movq	%rax, -8(%rbp)
.L14:
	movq	-24(%rbp), %rdx
	movzbl	(%rdx), %eax
	testb	%al, %al
	jne	.L16
	movq	-8(%rbp), %rax
	movq	%rax, -16(%rbp)
	jmp	.L12
.L16:
	addq	$1, -24(%rbp)
	jmp	.L13
.L12:
	movq	-16(%rbp), %rax
	leave
	ret
.LFE10:
	.size	_strrchr, .-_strrchr
	.comm	environ,8,8
	.comm	operatingsystem_parameter_envp,8,8
	.comm	operatingsystem_parameter_argc,8,8
	.comm	operatingsystem_parameter_argv,8,8
	.comm	__progname_storage,256,32
	.section	.eh_frame,"a",@progbits
.Lframe1:
	.long	.LECIE1-.LSCIE1
.LSCIE1:
	.long	0x0
	.byte	0x1
	.string	"zR"
	.uleb128 0x1
	.sleb128 -8
	.byte	0x10
	.uleb128 0x1
	.byte	0x1b
	.byte	0xc
	.uleb128 0x7
	.uleb128 0x8
	.byte	0x90
	.uleb128 0x1
	.align 8
.LECIE1:
.LSFDE1:
	.long	.LEFDE1-.LASFDE1
.LASFDE1:
	.long	.LASFDE1-.Lframe1
	.long	.LFB9-.
	.long	.LFE9-.LFB9
	.uleb128 0x0
	.byte	0x4
	.long	.LCFI0-.LFB9
	.byte	0xe
	.uleb128 0x10
	.byte	0x86
	.uleb128 0x2
	.byte	0x4
	.long	.LCFI1-.LCFI0
	.byte	0xd
	.uleb128 0x6
	.align 8
.LEFDE1:
.LSFDE3:
	.long	.LEFDE3-.LASFDE3
.LASFDE3:
	.long	.LASFDE3-.Lframe1
	.long	.LFB10-.
	.long	.LFE10-.LFB10
	.uleb128 0x0
	.byte	0x4
	.long	.LCFI3-.LFB10
	.byte	0xe
	.uleb128 0x10
	.byte	0x86
	.uleb128 0x2
	.byte	0x4
	.long	.LCFI4-.LCFI3
	.byte	0xd
	.uleb128 0x6
	.align 8
.LEFDE3:
	.ident	"GCC: (GNU) 4.2.1 20070719 "