ObjFW  Check-in [f727480860]

Overview
Comment:Add objc_msg_lookup_stret for ARM/ELF.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: f727480860d44a6f3da23eb3f0355a92ffa06c3dd6581393ed3211c82ff763fc
User & Date: js on 2013-07-28 15:28:49
Other Links: manifest | tags
Context
2013-07-28
15:29
Add of_forward_stret for ARM/ELF. check-in: 2b1b0f8b59 user: js tags: trunk
15:28
Add objc_msg_lookup_stret for ARM/ELF. check-in: f727480860 user: js tags: trunk
01:12
Add of_forward_stret for x86/ELF. check-in: 0379a04a1b user: js tags: trunk
Changes

Modified src/runtime/lookup-asm-arm-elf.S from [031638809a] to [79afacfbeb].

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







-
-
+
+






-
+










-
+



-
-
-
-
-
-
+
+
+

-
+
-
+







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









.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_stret: /* FIXME */
.macro generate_lookup name not_found_handler
\name:
	cmp	r0, #0
	beq	ret_nil

	ldr	r2, [r0, #0]
	ldr	r2, [r2, #32]

lookup:
.main_\name:
#ifdef OF_SELUID24
	ldrb	r3, [r1, #2]
	ldr	r2, [r2, r3, lsl #2]
#endif
	ldrb	r3, [r1, #1]
	ldr	r2, [r2, r3, lsl #2]
	ldrb	r3, [r1, #0]
	ldr	r2, [r2, r3, lsl #2]

	cmp	r2, #0
	beq	objc_not_found_handler(PLT)
	beq	\not_found_handler(PLT)

	mov	r0, r2
	bx	lr

ret_nil:
	adr	r0, nil_method
	bx	lr
.type objc_msg_lookup, %function
.size objc_msg_lookup, .-objc_msg_lookup
.type \name, %function
.size \name, .-\name
.endm

objc_msg_lookup_super:
.macro generate_lookup_super name lookup
objc_msg_lookup_super_stret: /* FIXME */
\name:
	ldr	r2, [r0, #0]
	cmp	r0, #0
	beq	ret_nil

	ldr	r2, [r0, #4]
	ldr	r2, [r2, #32]

	b	lookup
.type objc_msg_lookup_super, %function
.size objc_msg_lookup_super, .-objc_msg_lookup_super
	b	.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:
	adr	r0, nil_method
	bx	lr

nil_method:
	mov	r0, #0
	bx	lr

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