ObjFW  Check-in [3aa93c594f]

Overview
Comment:Add objc_msg_lookup_stret for x86/ELF.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 3aa93c594f34d6eb5df38f0a0b8b0abd358c3e85d07e7862c7c69b3b07b5c16a
User & Date: js on 2013-07-28 01:06:51
Other Links: manifest | tags
Context
2013-07-28
01:12
Add of_forward_stret for x86/ELF. check-in: 0379a04a1b user: js tags: trunk
01:06
Add objc_msg_lookup_stret for x86/ELF. check-in: 3aa93c594f user: js tags: trunk
2013-07-27
17:38
Fix a typo. check-in: 405731e798 user: js tags: trunk
Changes

Modified src/runtime/lookup-asm-x86-elf.S from [18adc64486] to [687ef6e3ff].

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

.globl objc_msg_lookup
.globl objc_msg_lookup_stret
.globl objc_msg_lookup_super
.globl objc_msg_lookup_super_stret

.section .text
objc_msg_lookup:
objc_msg_lookup: /* FIXME */
	movl	4(%esp), %edx
	testl	%edx, %edx
	jz	ret_nil

	movl	(%edx), %edx
	movl	32(%edx), %edx

lookup:

	movl	8(%esp), %eax

#ifdef OF_SELUID24
	movzbl	2(%eax), %ecx
	movl	(%edx,%ecx,4), %edx
#endif
	movzbl	1(%eax), %ecx
	movl	(%edx,%ecx,4), %edx
	movzbl	(%eax), %ecx
	movl	(%edx,%ecx,4), %eax

	testl	%eax, %eax
	jz	forward

	ret

ret_nil:
	call	get_eip
.L2:
	addl	$nil_method-.L2, %eax
	ret

forward:
	call	get_eip
.L1:

	addl	$objc_not_found_handler-.L1, %eax
	jmp	*%eax

get_eip:
	movl	(%esp), %eax
	ret
.type objc_msg_lookup, %function
.size objc_msg_lookup, .-objc_msg_lookup


objc_msg_lookup_super:
objc_msg_lookup_super_stret: /* FIXME */

	movl	4(%esp), %edx
	cmpl	$0, (%edx)
	je	ret_nil

	movl	4(%edx), %edx
	movl	32(%edx), %edx
	jmp	lookup






.type objc_msg_lookup_super, %function
.size objc_msg_lookup_super, .-objc_msg_lookup_super







nil_method:
	movl	4(%esp), %eax
	ret





#ifdef __linux__
.section .note.GNU-stack, "", %progbits
#endif







|
|







<
>












|



<
<
<
<
<
<
|

<
>
|


<
<
<
|
|
>

|
<
>






|
>
>
>
>
>
>
|
|
>
>
>
>
>
>




>
>
>
>




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

.globl objc_msg_lookup
.globl objc_msg_lookup_stret
.globl objc_msg_lookup_super
.globl objc_msg_lookup_super_stret

.section .text
.macro generate_lookup name not_found_handler
\name:
	movl	4(%esp), %edx
	testl	%edx, %edx
	jz	ret_nil

	movl	(%edx), %edx
	movl	32(%edx), %edx


.main_\name:
	movl	8(%esp), %eax

#ifdef OF_SELUID24
	movzbl	2(%eax), %ecx
	movl	(%edx,%ecx,4), %edx
#endif
	movzbl	1(%eax), %ecx
	movl	(%edx,%ecx,4), %edx
	movzbl	(%eax), %ecx
	movl	(%edx,%ecx,4), %eax

	testl	%eax, %eax
	jz	.forward_\name

	ret







.forward_\name:
	call	get_eip

.forward_L0_\name:
	addl	$\not_found_handler-.forward_L0_\name, %eax
	jmp	*%eax




.type \name, %function
.size \name, .-\name
.endm

.macro generate_lookup_super name lookup

\name:
	movl	4(%esp), %edx
	cmpl	$0, (%edx)
	je	ret_nil

	movl	4(%edx), %edx
	movl	32(%edx), %edx
	jmp	.main_\lookup
.type \name, %function
.size \name, .-\name
.endm

generate_lookup objc_msg_lookup objc_not_found_handler
generate_lookup objc_msg_lookup_stret objc_not_found_handler_stret
generate_lookup_super objc_msg_lookup_super objc_msg_lookup
generate_lookup_super objc_msg_lookup_super_stret objc_msg_lookup_stret

ret_nil:
	call	get_eip
.L0:
	addl	$nil_method-.L0, %eax
	ret

nil_method:
	movl	4(%esp), %eax
	ret

get_eip:
	movl	(%esp), %eax
	ret

#ifdef __linux__
.section .note.GNU-stack, "", %progbits
#endif