annotate dyncallback/dyncall_callback_arm64.S @ 533:71c884e610f0

- integration of patches from Raphael Luba, Thekla, Inc.: * integration of aggregate-by-value (struct, union) support patch for x64 (win and sysv) * windows/x64 asm additions to specify how stack unwinds (help for debuggers, exception handling, etc.) * see Changelog for details - new calling convention modes for thiscalls (platform agnostic, was specific before) * new signature character for platform agnostic thiscalls ('*' / DC_SIGCHAR_CC_THISCALL) - dcCallF(), dcVCallF(), dcArgF() and dcVArgF(): * added support for aggregates-by-value (wasn't part of patch) * change that those functions don't implicitly call dcReset() anymore, which was unflexible (breaking change) - added macros to feature test implementation for aggregate-by-value and syscall support - changed libdyncall_s.lib and libdyncallback_s.lib order in callback test makefiles, as some toolchains are picky about order - doc: * man page updates to describe aggregate interface * manual overview changes to highlight platforms with aggregate-by-value support - test/plain: replaced tests w/ old/stale sctruct interface with new aggregate one
author Tassilo Philipp
date Thu, 21 Apr 2022 13:35:47 +0200
parents 451299d50c1a
children cab0031c6691
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
1 /*
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
2
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
3 Package: dyncall
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
4 Library: dyncallback
15
03c516772c65 - consistency in filenames that have cpp logic .s -> .S
cslag
parents: 0
diff changeset
5 File: dyncallback/dyncall_callback_arm64.S
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
6 Description: Callback Thunk - Implementation for ARM64 / ARMv8 / AAPCS64
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
7 License:
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
8
371
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
9 Copyright (c) 2015-2020 Daniel Adler <dadler@uni-goettingen.de>,
281
f5577f6bf97a - file header cleanups for release
Tassilo Philipp
parents: 15
diff changeset
10 Tassilo Philipp <tphilipp@potion-studios.com>
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
11
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
12 Permission to use, copy, modify, and distribute this software for any
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
13 purpose with or without fee is hereby granted, provided that the above
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
14 copyright notice and this permission notice appear in all copies.
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
15
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
16 THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
17 WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
18 MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
19 ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
20 WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
21 ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
22 OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
23
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
24 */
371
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
25
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
26 #include "../portasm/portasm-arm64.S"
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
27 BEGIN_ASM
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
28
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
29 // struct DCCallback
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
30 // type off size
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
31 // ---------|------|------
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
32 // DCThunk | 0 | 32
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
33 // handler | 32 | 8
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
34 // userdata | 40 | 8
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
35
371
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
36 TEXTAREA
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
37
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
38 GLOBAL_C(dcCallbackThunkEntry)
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
39 ENTRY_C(dcCallbackThunkEntry)
371
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
40 ALIGN(4)
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
41
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
42 // input:
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
43 // x9: DCCallback* pcb
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
44 // x0..x7 ?? GP regs
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
45 // d0..d7 ?? FP/SIMD regs
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
46 // sp... ?? arguments on stack
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
47 //
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
48 // locals:
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
49 // type off size
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
50 // ---------|------|------
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
51 // Frame 0 16
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
52 // DCArgs 16 168
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
53 // DCValue 184 16
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
54 //
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
55 // size 200
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
56 // aligned 208
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
57 //
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
58
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
59 // locals:
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
60 // x10: sp
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
61 // x11: DCArgs* args
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
62
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
63 mov x10, sp
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
64 stp x29, x30, [sp, #-208 ]!
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
65 mov x29, sp
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
66
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
67 add x11, x29 , #16
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
68
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
69 // save integer registers
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
70
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
71 stp x0, x1, [x11, #0 ]
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
72 stp x2, x3, [x11, #16]
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
73 stp x4, x5, [x11, #32]
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
74 stp x6, x7, [x11, #48]
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
75
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
76 stp d0, d1, [x11, #64]
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
77 stp d2, d3, [x11, #80]
371
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
78 stp d4, d5, [x11, #96]
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
79 stp d6, d7, [x11, #112]
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
80
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
81 eor x12, x12, x12
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
82 stp x10,x12,[x11, #128] // sp=sp, i=0, f=0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
83
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
84 str x12, [x11, #144] // s=0, reserved=0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
85
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
86
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
87 // call handler:
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
88 // args:
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
89 // x0: DCCallback* pcb
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
90 // x1: DCArgs* args
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
91 // x2: DCValue* result
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
92 // x3: void* userdata
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
93
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
94 mov x0 , x9
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
95 add x1 , x29 , #16
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
96 add x2 , x29 , #184
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
97 ldr x3 , [x9 , #40]
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
98
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
99 ldr x11, [x9 , #32]
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
100 blr x11
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
101
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
102 and w0, w0, #255
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
103 cmp w0, 'f'
371
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
104 b.eq LABELUSE(retf)
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
105 cmp w0, 'd'
371
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
106 b.eq LABELUSE(retf)
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
107
371
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
108 LABELDEF(reti)
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
109 ldr x0, [x29, #184]
371
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
110 b LABELUSE(ret)
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
111 LABELDEF(retf)
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
112 ldr d0, [x29, #184]
371
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
113 LABELDEF(ret)
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
114 ldp x29, x30, [sp], #208
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
115 ret
371
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
116
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
117
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
118 END_PROC
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
119 END_ASM
451299d50c1a - windows arm64 support (dyncall, dyncallback, cmake support for armasm64), thanks Bernhard Urban-Forster!
Tassilo Philipp
parents: 281
diff changeset
120