annotate dyncall/dyncall_callvm_x64.h @ 366:ad5f9803f52f

- removal of some unnecessary headers that only contained internally used forward declarations, so no need to have them
author Tassilo Philipp
date Wed, 15 Apr 2020 14:57:23 +0200
parents f5577f6bf97a
children 71c884e610f0
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: dyncall
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
5 File: dyncall/dyncall_callvm_x64.h
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
6 Description:
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: 84
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
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
27
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
28 /*
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
29
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
30 dyncall callvm for x64 architecture
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
31
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
32 SUPPORTED CALLING CONVENTIONS
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
33 MS Windows x64 calling convention, AMD64 SystemV ABI
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
34
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
35 REVISION
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
36 2007/12/11 initial
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
37
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
38 */
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
39
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
40
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
41 #ifndef DYNCALL_CALLVM_X64_H
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
42 #define DYNCALL_CALLVM_X64_H
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
43
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
44 #include "dyncall_macros.h"
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
45 #include "dyncall_callvm.h"
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
46 #include "dyncall_vector.h"
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 #if defined(DC_WINDOWS)
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
50
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
51 typedef long long int64; /* llp64 */
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
52
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
53 #define numIntRegs 4
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
54 #define numFloatRegs 4
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
55 #define DCRegCount_x64 DCRegCount_x64_u
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
56 #define DCRegData_x64 DCRegData_x64_u
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
57
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
58 #elif defined(DC_UNIX)
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
59
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
60 typedef long int64; /* lp64 */
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
61
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
62 #define numIntRegs 6
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
63 #define numFloatRegs 8
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
64 #define DCRegCount_x64 DCRegCount_x64_s
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
65 #define DCRegData_x64 DCRegData_x64_s
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
66
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
67 #else
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
68
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
69 #error Unsupported OS.
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
70
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
71 #endif
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
72
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
73 typedef union
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
74 {
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
75 int i;
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
76 int f;
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
77 } DCRegCount_x64_u;
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
78
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
79 typedef struct
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
80 {
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
81 int i;
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
82 int f;
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
83 } DCRegCount_x64_s;
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
84
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
85 typedef union
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
86 {
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
87 int64 i[numIntRegs ];
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
88 double f[numFloatRegs];
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
89 } DCRegData_x64_u;
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
90
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
91 typedef struct
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
92 {
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
93 int64 i[numIntRegs ];
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
94 double f[numFloatRegs];
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
95 } DCRegData_x64_s;
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
96
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
97
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
98 typedef struct
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
99 {
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
100 DCCallVM mInterface; /* This CallVM interface. */
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
101 DCpointer mpCallFunc; /* Function to call. */
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
102 DCRegCount_x64 mRegCount; /* Number of int/sse registers used for parameter passing. */
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
103 DCRegData_x64 mRegData; /* Parameters to be passed via registers. */
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
104 DCVecHead mVecHead; /* Parameters to be pushed onto stack. */
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
105 } DCCallVM_x64;
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
106
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
107 #endif /* DYNCALL_CALLVM_X64_H */
3e629dc19168 initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
108