ObjFW  Diff

Differences From Artifact [294c10a12e]:

To Artifact [5d0fa55414]:


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
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

-
-
-
+

















-
-





-
-
+
+

-
-
+
+


-
+

-
-
+
+


-
-
-
+
+
+


-
-
+
+

-
-
-
-
+
+
+
+


-
-
-
-
-
-
-
+
+
+
+
+
+
+

-
-
-
-
+
+
+
+

-
-
-
-
+
+
+
+


-
-
-
+
+
+

-
+


-
+

-
-
-
+
+
+

-
+




-
-
+
+

-
-
+
+


-
+

-
-
+
+


-
-
-
+
+
+


-
-
+
+

-
-
-
-
+
+
+
+


-
-
-
-
-
-
-
+
+
+
+
+
+
+

-
-
-
-
+
+
+
+

-
-
-
-
+
+
+
+


-
-
-
+
+
+

-
+


-
+

-
-
-
+
+
+

-
+




-
-
+
+

-
-
+
+


-
+

-
-
+
+


-
-
-
+
+
+



-
+







/*
 * Copyright (c) 2008, 2009, 2010, 2011, 2012, 2013, 2014, 2015, 2016, 2017,
 *               2018, 2019, 2020
 *   Jonathan Schleifer <js@nil.im>
 * Copyright (c) 2008-2021 Jonathan Schleifer <js@nil.im>
 *
 * All rights reserved.
 *
 * This file is part of ObjFW. It may be distributed under the terms of the
 * Q Public License 1.0, which can be found in the file LICENSE.QPL included in
 * the packaging of this file.
 *
 * Alternatively, it may be distributed under the terms of the GNU General
 * Public License, either version 2 or 3, which can be found in the file
 * LICENSE.GPLv2 or LICENSE.GPLv3 respectively included in the packaging of this
 * file.
 */

#include "config.h"

#include "platform.h"

.intel_syntax noprefix

.globl of_forward
.globl of_forward_stret

.section .text
of_forward:
	push	ebp
	mov	ebp, esp
	pushl	%ebp
	movl	%esp, %ebp

	push	ebx
	sub	esp, 20
	pushl	%ebx
	subl	$20, %esp

	call	get_eip
	add	ebx, offset _GLOBAL_OFFSET_TABLE_
	addl	$_GLOBAL_OFFSET_TABLE_, %ebx

	mov	eax, [ebp+8]
	mov	[esp], eax
	movl	8(%ebp), %eax
	movl	%eax, (%esp)
	call	object_getClass@PLT

	mov	[esp], eax
	lea	eax, [ebx+sel_forwardingTargetForSelector_@GOTOFF]
	mov	[esp+4], eax
	movl	%eax, (%esp)
	leal	sel_forwardingTargetForSelector_@GOTOFF(%ebx), %eax
	movl	%eax, 4(%esp)
	call	class_respondsToSelector@PLT

	test	eax, eax
	jz	short 0f
	testl	%eax, %eax
	jz	0f

	mov	eax, [ebp+8]
	mov	[esp], eax
	lea	eax, [ebx+sel_forwardingTargetForSelector_@GOTOFF]
	mov	[esp+4], eax
	movl	8(%ebp), %eax
	movl	%eax, (%esp)
	leal	sel_forwardingTargetForSelector_@GOTOFF(%ebx), %eax
	movl	%eax, 4(%esp)
	call	objc_msg_lookup@PLT

	mov	edx, [ebp+8]
	mov	[esp], edx
	lea	edx, [ebx+sel_forwardingTargetForSelector_@GOTOFF]
	mov	[esp+4], edx
	mov	edx, [ebp+12]
	mov	[esp+8], edx
	call	eax
	movl	8(%ebp), %edx
	movl	%edx, (%esp)
	leal	sel_forwardingTargetForSelector_@GOTOFF(%ebx), %edx
	movl	%edx, 4(%esp)
	movl	12(%ebp), %edx
	movl	%edx, 8(%esp)
	call	*%eax

	test	eax, eax
	jz	short 0f
	cmp	eax, [ebp+8]
	je	short 0f
	testl	%eax, %eax
	jz	0f
	cmpl	8(%ebp), %eax
	je	0f

	mov	[ebp+8], eax
	mov	[esp], eax
	mov	eax, [ebp+12]
	mov	[esp+4], eax
	movl	%eax, 8(%ebp)
	movl	%eax, (%esp)
	movl	12(%ebp), %eax
	movl	%eax, 4(%esp)
	call	objc_msg_lookup@PLT

	add	esp, 20
	pop	ebx
	pop	ebp
	addl	$20, %esp
	popl	%ebx
	popl	%ebp

	jmp	eax
	jmp	*%eax

0:
	lea	eax, [ebx+of_method_not_found@GOTOFF]
	leal	of_method_not_found@GOTOFF(%ebx), %eax

	add	esp, 20
	pop	ebx
	pop	ebp
	addl	$20, %esp
	popl	%ebx
	popl	%ebp

	jmp	eax
	jmp	*%eax
.type of_forward, %function
.size of_forward, .-of_forward

of_forward_stret:
	push	ebp
	mov	ebp, esp
	pushl	%ebp
	movl	%esp, %ebp

	push	ebx
	sub	esp, 20
	pushl	%ebx
	subl	$20, %esp

	call	get_eip
	add	ebx, offset _GLOBAL_OFFSET_TABLE_
	addl	$_GLOBAL_OFFSET_TABLE_, %ebx

	mov	eax, [ebp+12]
	mov	[esp], eax
	movl	12(%ebp), %eax
	movl	%eax, (%esp)
	call	object_getClass@PLT

	mov	[esp], eax
	lea	eax, [ebx+sel_forwardingTargetForSelector_@GOTOFF]
	mov	[esp+4], eax
	movl	%eax, (%esp)
	leal	sel_forwardingTargetForSelector_@GOTOFF(%ebx), %eax
	movl	%eax, 4(%esp)
	call	class_respondsToSelector@PLT

	test	eax, eax
	jz	short 0f
	testl	%eax, %eax
	jz	0f

	mov	eax, [ebp+12]
	mov	[esp], eax
	lea	eax, [ebx+sel_forwardingTargetForSelector_@GOTOFF]
	mov	[esp+4], eax
	movl	12(%ebp), %eax
	movl	%eax, (%esp)
	leal	sel_forwardingTargetForSelector_@GOTOFF(%ebx), %eax
	movl	%eax, 4(%esp)
	call	objc_msg_lookup@PLT

	mov	edx, [ebp+12]
	mov	[esp], edx
	lea	edx, [ebx+sel_forwardingTargetForSelector_@GOTOFF]
	mov	[esp+4], edx
	mov	edx, [ebp+16]
	mov	[esp+8], edx
	call	eax
	movl	12(%ebp), %edx
	movl	%edx, (%esp)
	leal	sel_forwardingTargetForSelector_@GOTOFF(%ebx), %edx
	movl	%edx, 4(%esp)
	movl	16(%ebp), %edx
	movl	%edx, 8(%esp)
	call	*%eax

	test	eax, eax
	jz	short 0f
	cmp	eax, [ebp+12]
	je	short 0f
	testl	%eax, %eax
	jz	0f
	cmpl	12(%ebp), %eax
	je	0f

	mov	[ebp+12], eax
	mov	[esp], eax
	mov	eax, [ebp+16]
	mov	[esp+4], eax
	movl	%eax, 12(%ebp)
	movl	%eax, (%esp)
	movl	16(%ebp), %eax
	movl	%eax, 4(%esp)
	call	objc_msg_lookup_stret@PLT

	add	esp, 20
	pop	ebx
	pop	ebp
	addl	$20, %esp
	popl	%ebx
	popl	%ebp

	jmp	eax
	jmp	*%eax

0:
	lea	eax, [ebx+of_method_not_found_stret@GOTOFF]
	leal	of_method_not_found_stret@GOTOFF(%ebx), %eax

	add	esp, 20
	pop	ebx
	pop	ebp
	addl	$20, %esp
	popl	%ebx
	popl	%ebp

	jmp	eax
	jmp	*%eax
.type of_forward_stret, %function
.size of_forward_stret, .-of_forward_stret

init:
	push	ebp
	mov	ebp, esp
	pushl	%ebp
	movl	%esp, %ebp

	push	ebx
	sub	esp, 4
	pushl	%ebx
	subl	$4, %esp

	call	get_eip
	add	ebx, offset _GLOBAL_OFFSET_TABLE_
	addl	$_GLOBAL_OFFSET_TABLE_, %ebx

	lea	eax, [ebx+module@GOTOFF]
	mov	[esp], eax
	leal	module@GOTOFF(%ebx), %eax
	movl	%eax, (%esp)
	call	__objc_exec_class@PLT

	add	esp, 4
	pop	ebx
	pop	ebp
	addl	$4, %esp
	popl	%ebx
	popl	%ebp
	ret

get_eip:
	mov	ebx, [esp]
	movl	(%esp), %ebx
	ret

#ifdef OF_SOLARIS
.section .init_array, "aw"
#else
.section .ctors, "aw", %progbits
#endif