annotate dyncallback/dyncall_callback_arm32.c @ 606:85b7a117b807

- more statics in test code (this is partly needed on an experimental freebsd sparc64 build where the elf cleanup code crashes for some reason ... it's probably that experimental build, but a good change to do regardless)
author Tassilo Philipp
date Wed, 21 Sep 2022 15:20:58 +0200
parents 71c884e610f0
children
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: 142
diff changeset
5 File: dyncallback/dyncall_callback_arm32.c
170cde9e2a83 - arm arm/thumb cleanup, sharing more files, directly
cslag
parents: 142
diff changeset
6 Description: Callback - 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
533
71c884e610f0 - integration of patches from Raphael Luba, Thekla, Inc.:
Tassilo Philipp
parents: 465
diff changeset
9 Copyright (c) 2007-2022 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
152
d48a8b8d2ef9 - integrated all headers containing DCCallback definition into the translation units used (arm64 already avoided this pointless header, so following that style)
cslag
parents: 143
diff changeset
27 #include "dyncall_callback.h"
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
28 #include "dyncall_alloc_wx.h"
152
d48a8b8d2ef9 - integrated all headers containing DCCallback definition into the translation units used (arm64 already avoided this pointless header, so following that style)
cslag
parents: 143
diff changeset
29 #include "dyncall_thunk.h"
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
30
533
71c884e610f0 - integration of patches from Raphael Luba, Thekla, Inc.:
Tassilo Philipp
parents: 465
diff changeset
31
152
d48a8b8d2ef9 - integrated all headers containing DCCallback definition into the translation units used (arm64 already avoided this pointless header, so following that style)
cslag
parents: 143
diff changeset
32 /* Callback symbol. */
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
33 extern void dcCallbackThunkEntry();
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
34
152
d48a8b8d2ef9 - integrated all headers containing DCCallback definition into the translation units used (arm64 already avoided this pointless header, so following that style)
cslag
parents: 143
diff changeset
35 struct DCCallback
d48a8b8d2ef9 - integrated all headers containing DCCallback definition into the translation units used (arm64 already avoided this pointless header, so following that style)
cslag
parents: 143
diff changeset
36 {
465
e2899b4ff713 - // -> /* */, mainly for consistency (but also for a few obscure compilers)
Tassilo Philipp
parents: 281
diff changeset
37 DCThunk thunk; /* offset 0 */
e2899b4ff713 - // -> /* */, mainly for consistency (but also for a few obscure compilers)
Tassilo Philipp
parents: 281
diff changeset
38 DCCallbackHandler* handler; /* offset 12 */
e2899b4ff713 - // -> /* */, mainly for consistency (but also for a few obscure compilers)
Tassilo Philipp
parents: 281
diff changeset
39 void* userdata; /* offset 16 */
152
d48a8b8d2ef9 - integrated all headers containing DCCallback definition into the translation units used (arm64 already avoided this pointless header, so following that style)
cslag
parents: 143
diff changeset
40 };
d48a8b8d2ef9 - integrated all headers containing DCCallback definition into the translation units used (arm64 already avoided this pointless header, so following that style)
cslag
parents: 143
diff changeset
41
d48a8b8d2ef9 - integrated all headers containing DCCallback definition into the translation units used (arm64 already avoided this pointless header, so following that style)
cslag
parents: 143
diff changeset
42
533
71c884e610f0 - integration of patches from Raphael Luba, Thekla, Inc.:
Tassilo Philipp
parents: 465
diff changeset
43 void dcbInitCallback2(DCCallback* pcb, const DCsigchar* signature, DCCallbackHandler* handler, void* userdata, DCaggr *const * aggrs)
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
44 {
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
45 pcb->handler = handler;
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
46 pcb->userdata = userdata;
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
47 }
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
48
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
49
533
71c884e610f0 - integration of patches from Raphael Luba, Thekla, Inc.:
Tassilo Philipp
parents: 465
diff changeset
50 DCCallback* dcbNewCallback2(const DCsigchar* signature, DCCallbackHandler* handler, void* userdata, DCaggr *const * aggrs)
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
51 {
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
52 DCCallback* pcb;
533
71c884e610f0 - integration of patches from Raphael Luba, Thekla, Inc.:
Tassilo Philipp
parents: 465
diff changeset
53 int err = dcAllocWX(sizeof(DCCallback), (void**)&pcb);
202
030fbb70aa1b - changed allocwx code:
Tassilo Philipp
parents: 152
diff changeset
54 if(err)
030fbb70aa1b - changed allocwx code:
Tassilo Philipp
parents: 152
diff changeset
55 return NULL;
030fbb70aa1b - changed allocwx code:
Tassilo Philipp
parents: 152
diff changeset
56
533
71c884e610f0 - integration of patches from Raphael Luba, Thekla, Inc.:
Tassilo Philipp
parents: 465
diff changeset
57 dcbInitCallback2(pcb, signature, handler, userdata, aggrs);
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
58 dcbInitThunk(&pcb->thunk, dcCallbackThunkEntry);
202
030fbb70aa1b - changed allocwx code:
Tassilo Philipp
parents: 152
diff changeset
59
030fbb70aa1b - changed allocwx code:
Tassilo Philipp
parents: 152
diff changeset
60 err = dcInitExecWX(pcb, sizeof(DCCallback));
030fbb70aa1b - changed allocwx code:
Tassilo Philipp
parents: 152
diff changeset
61 if(err) {
030fbb70aa1b - changed allocwx code:
Tassilo Philipp
parents: 152
diff changeset
62 dcFreeWX(pcb, sizeof(DCCallback));
030fbb70aa1b - changed allocwx code:
Tassilo Philipp
parents: 152
diff changeset
63 return NULL;
030fbb70aa1b - changed allocwx code:
Tassilo Philipp
parents: 152
diff changeset
64 }
030fbb70aa1b - changed allocwx code:
Tassilo Philipp
parents: 152
diff changeset
65
0
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
66 return pcb;
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
67 }
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
68