0
|
1 /*
|
|
2
|
|
3 Package: dyncall
|
|
4 Library: test
|
|
5 File: test/callback_suite/env.c
|
|
6 Description:
|
|
7 License:
|
|
8
|
281
|
9 Copyright (c) 2011-2018 Daniel Adler <dadler@uni-goettingen.de>,
|
0
|
10 Tassilo Philipp <tphilipp@potion-studios.com>
|
|
11
|
|
12 Permission to use, copy, modify, and distribute this software for any
|
|
13 purpose with or without fee is hereby granted, provided that the above
|
|
14 copyright notice and this permission notice appear in all copies.
|
|
15
|
|
16 THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
|
17 WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
|
18 MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
|
19 ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
|
20 WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
|
21 ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
|
22 OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
|
23
|
|
24 */
|
|
25
|
|
26 #include <assert.h>
|
487
|
27 #include <stdint.h>
|
0
|
28 #include "dyncall_signature.h"
|
|
29 #include "env.h"
|
|
30
|
|
31 DCValueSet ValueMatrix[CONFIG_MAXARGS];
|
|
32
|
487
|
33 static DCValueSet K = {
|
|
34 .B = DC_TRUE,
|
|
35 .c = 13,
|
|
36 .C = 19,
|
|
37 .s = -23,
|
|
38 .S = 41,
|
|
39 .i = 134,
|
|
40 .I = 257,
|
|
41 .j = -12357,
|
|
42 .J = 356,
|
|
43 .l = -1234556687721LL,
|
|
44 .L = 23564634576581ULL,
|
|
45 .f = 1.20432545f,
|
|
46 .d = 1.0123456,
|
|
47 .p = (void*)0x1020345
|
|
48 };
|
0
|
49
|
|
50 void GetReferenceArg(DCValue* output, char ch, int pos)
|
|
51 {
|
|
52 output->L = 0xCAFEBABEDEADC0DELL;
|
|
53 pos = pos + 2;
|
|
54 switch(ch) {
|
487
|
55 case DC_SIGCHAR_BOOL: output->B = ((pos*K.i) & 1) ? DC_TRUE : DC_FALSE ; break;
|
|
56 case DC_SIGCHAR_CHAR: output->c = pos * K.c; break;
|
|
57 case DC_SIGCHAR_UCHAR: output->C = pos * K.C; break;
|
|
58 case DC_SIGCHAR_SHORT: output->s = pos * K.s; break;
|
|
59 case DC_SIGCHAR_USHORT: output->S = pos * K.S; break;
|
|
60 case DC_SIGCHAR_INT: output->i = pos * K.i; break;
|
|
61 case DC_SIGCHAR_UINT: output->I = pos * K.I; break;
|
|
62 case DC_SIGCHAR_LONG: output->j = pos * K.j; break;
|
|
63 case DC_SIGCHAR_ULONG: output->J = pos * K.J; break;
|
|
64 case DC_SIGCHAR_LONGLONG: output->l = pos * K.l; break;
|
|
65 case DC_SIGCHAR_ULONGLONG:output->L = pos * K.L; break;
|
|
66 case DC_SIGCHAR_FLOAT: output->f = (float)pos * K.f; break;
|
|
67 case DC_SIGCHAR_DOUBLE: output->d = (double)pos * K.d; break;
|
|
68 case DC_SIGCHAR_POINTER: output->p = (DCpointer)(pos * (intptr_t)K.p); break;
|
0
|
69 default: assert(0);
|
|
70 }
|
|
71 }
|
|
72
|
|
73 void GetReferenceResult(DCValue* output, char ch)
|
|
74 {
|
|
75 GetReferenceArg(output, ch, -1);
|
|
76 }
|
|
77
|
|
78 void InitEnv()
|
|
79 {
|
|
80 int pos;
|
|
81 for(pos = 0 ;pos < CONFIG_MAXARGS ;++pos) {
|
|
82 DCValue ref;
|
|
83 GetReferenceArg( &ref, DC_SIGCHAR_BOOL , pos); ValueMatrix[pos].B = ref.B;
|
|
84 GetReferenceArg( &ref, DC_SIGCHAR_CHAR , pos); ValueMatrix[pos].c = ref.c;
|
|
85 GetReferenceArg( &ref, DC_SIGCHAR_UCHAR , pos); ValueMatrix[pos].C = ref.C;
|
|
86 GetReferenceArg( &ref, DC_SIGCHAR_SHORT , pos); ValueMatrix[pos].s = ref.s;
|
|
87 GetReferenceArg( &ref, DC_SIGCHAR_USHORT , pos); ValueMatrix[pos].S = ref.S;
|
|
88 GetReferenceArg( &ref, DC_SIGCHAR_INT , pos); ValueMatrix[pos].i = ref.i;
|
|
89 GetReferenceArg( &ref, DC_SIGCHAR_UINT , pos); ValueMatrix[pos].I = ref.I;
|
|
90 GetReferenceArg( &ref, DC_SIGCHAR_LONG , pos); ValueMatrix[pos].j = ref.j;
|
|
91 GetReferenceArg( &ref, DC_SIGCHAR_ULONG , pos); ValueMatrix[pos].J = ref.J;
|
|
92 GetReferenceArg( &ref, DC_SIGCHAR_LONGLONG , pos); ValueMatrix[pos].l = ref.l;
|
|
93 GetReferenceArg( &ref, DC_SIGCHAR_ULONGLONG, pos); ValueMatrix[pos].L = ref.L;
|
|
94 GetReferenceArg( &ref, DC_SIGCHAR_FLOAT , pos); ValueMatrix[pos].f = ref.f;
|
|
95 GetReferenceArg( &ref, DC_SIGCHAR_DOUBLE , pos); ValueMatrix[pos].d = ref.d;
|
|
96 GetReferenceArg( &ref, DC_SIGCHAR_POINTER , pos); ValueMatrix[pos].p = ref.p;
|
|
97 }
|
|
98 }
|
|
99
|
|
100 /* Global Options. */
|
|
101 int OptionVerbose = 0;
|
|
102
|