annotate dyncallback/dyncall_thunk_arm32.c @ 357:d982a00c2177

- PPC64 asm syntax fix, specifying explicitly comparison mode for cmpi (newer toolchains complain, older ones took optional field of instruction which happened to be same value)
author Tassilo Philipp
date Tue, 25 Feb 2020 18:16:13 +0100
parents f5577f6bf97a
children beb15f1065e6
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
143
170cde9e2a83 - arm arm/thumb cleanup, sharing more files, directly
cslag
parents: 38
diff changeset
5 File: dyncallback/dyncall_thunk_arm32.c
170cde9e2a83 - arm arm/thumb cleanup, sharing more files, directly
cslag
parents: 38
diff changeset
6 Description: Thunk - Implementation for ARM32 (ARM and THUMB mode)
0
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
281
f5577f6bf97a - file header cleanups for release
Tassilo Philipp
parents: 143
diff changeset
9 Copyright (c) 2007-2018 Daniel Adler <dadler@uni-goettingen.de>,
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
10 Tassilo Philipp <tphilipp@potion-studios.com>
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 */
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
25
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
26
143
170cde9e2a83 - arm arm/thumb cleanup, sharing more files, directly
cslag
parents: 38
diff changeset
27 /* Since we can mix ARM and THUMB assembly, this works for both modes */
170cde9e2a83 - arm arm/thumb cleanup, sharing more files, directly
cslag
parents: 38
diff changeset
28
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
29 #include "dyncall_thunk.h"
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
30
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
31 void dcbInitThunk(DCThunk* p, void (*entry)())
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
32 {
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
33 /*
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
34 # ARM32 (ARM mode) thunk code:
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
35 .code 32
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
36 sub %r12, %r15, #8
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
37 ldr %r15, [%r15, #-4]
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
38 */
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
39
38
fb416abb2059 - armhf callback support (not all working, yet)
cslag
parents: 0
diff changeset
40 /* This code stores a ptr to DCCallback in r12 (equals ptr to thunk, */
fb416abb2059 - armhf callback support (not all working, yet)
cslag
parents: 0
diff changeset
41 /* which is PC (r15) minus 8, as PC points to current instruction+8. */
fb416abb2059 - armhf callback support (not all working, yet)
cslag
parents: 0
diff changeset
42 /* Then it loads the callback 'entry' into PC. The -4 is needed, also bc */
fb416abb2059 - armhf callback support (not all working, yet)
cslag
parents: 0
diff changeset
43 /* of the PC pointing ahead. */
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
44 p->code[0] = 0xe24fc008UL; /* sub %r12, %r15, #8 */
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
45 p->code[1] = 0xe51ff004UL; /* ldr %r15, [%r15, #-4] */
38
fb416abb2059 - armhf callback support (not all working, yet)
cslag
parents: 0
diff changeset
46 p->entry = entry;
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
47 }