0
+ − 1 /*
+ − 2
+ − 3 Package: dyncall
+ − 4 Library: test
+ − 5 File: test/ellipsis/ellipsis.cc
+ − 6 Description:
+ − 7 License:
+ − 8
281
+ − 9 Copyright (c) 2007-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
+ − 27
+ − 28 #include "config.h"
+ − 29 #include "../../dyncall/dyncall.h"
+ − 30 #include "../../dyncall/dyncall_value.h"
+ − 31
+ − 32
+ − 33 #if defined(__SUNPRO_CC) || defined(__ANDROID__)
+ − 34 #include <stdarg.h>
+ − 35 #else
+ − 36 #include <cstdarg>
+ − 37 #endif
+ − 38
+ − 39 DCValue mValue[NARGS];
+ − 40
+ − 41 void clearValues() { for(int i = 0;i<NARGS;++i) mValue[i].L = 0xCAFEBABEDEADC0DEULL; }
+ − 42
+ − 43 template<typename T> void g(T value, int pos);
+ − 44
+ − 45 template<> void g(DCchar value, int pos) { mValue[pos].c = value; }
+ − 46 template<> void g(DCshort value, int pos) { mValue[pos].s = value; }
+ − 47 template<> void g(DCint value, int pos) { mValue[pos].i = value; }
50
+ − 48 template<> void g(DClong value, int pos) { mValue[pos].j = value; }
+ − 49 template<> void g(DClonglong value, int pos) { mValue[pos].l = value; }
0
+ − 50 template<> void g(DCfloat value, int pos) { mValue[pos].f = value; }
+ − 51 template<> void g(DCdouble value, int pos) { mValue[pos].d = value; }
+ − 52 template<> void g(DCpointer value, int pos) { mValue[pos].p = value; }
+ − 53
+ − 54 DCValue* getArg(int pos) { return &mValue[pos]; }
+ − 55
+ − 56 int gID;
+ − 57 int getId() { return gID; }
+ − 58
+ − 59 extern "C" {
+ − 60
+ − 61 #define VF0(id,S) void S () {gID=id;}
+ − 62 #define VF1(id,A1,S) void S (A1 a1) {gID=id;g<A1>(a1,0);}
+ − 63 #define VF2(id,A1,A2,S) void S (A1 a1, ...) {va_list l;va_start(l,a1);gID=id;g<A1>(a1,0);g<A2>(va_arg(l,A2),1);va_end(l);}
+ − 64 #define VF3(id,A1,A2,A3,S) void S (A1 a1, ...) {va_list l;va_start(l,a1);gID=id;g<A1>(a1,0);g<A2>(va_arg(l,A2),1);g<A3>(va_arg(l,A3),2);va_end(l);}
+ − 65 #define VF4(id,A1,A2,A3,A4,S) void S (A1 a1, ...) {va_list l;va_start(l,a1);gID=id;g<A1>(a1,0);g<A2>(va_arg(l,A2),1);g<A3>(va_arg(l,A3),2);g<A4>(va_arg(l,A4),3);va_end(l);}
+ − 66 #define VF5(id,A1,A2,A3,A4,A5,S) void S (A1 a1, ...) {va_list l;va_start(l,a1);gID=id;g<A1>(a1,0);g<A2>(va_arg(l,A2),1);g<A3>(va_arg(l,A3),2);g<A4>(va_arg(l,A4),3);g<A5>(va_arg(l,A5),4);va_end(l);}
+ − 67 #define VF6(id,A1,A2,A3,A4,A5,A6,S) void S (A1 a1, ...) {va_list l;va_start(l,a1);gID=id;g<A1>(a1,0);g<A2>(va_arg(l,A2),1);g<A3>(va_arg(l,A3),2);g<A4>(va_arg(l,A4),3);g<A5>(va_arg(l,A5),4);g<A6>(va_arg(l,A6),5);va_end(l);}
+ − 68 #define VF7(id,A1,A2,A3,A4,A5,A6,A7,S) void S (A1 a1, ...) {va_list l;va_start(l,a1);gID=id;g<A1>(a1,0);g<A2>(va_arg(l,A2),1);g<A3>(va_arg(l,A3),2);g<A4>(va_arg(l,A4),3);g<A5>(va_arg(l,A5),4);g<A6>(va_arg(l,A6),5);g<A7>(va_arg(l,A7),6);va_end(l);}
+ − 69 #define VF8(id,A1,A2,A3,A4,A5,A6,A7,A8,S) void S (A1 a1, ...) {va_list l;va_start(l,a1);gID=id;g<A1>(a1,0);g<A2>(va_arg(l,A2),1);g<A3>(a3,2);g<A4>(a4,3);g<A5>(a5,4);g<A6>(a6,5);g<A7>(a7,6);g<A8>(a8,7);va_end(l);}
+ − 70 #define VF9(id,A1,A2,A3,A4,A5,A6,A7,A8,A9,S) void S (A1 a1, ...) {va_list l;va_start(l,a1);gID=id;g<A1>(a1,0);g<A2>(va_arg(l,A2),1);g<A3>(a3,2);g<A4>(a4,3);g<A5>(a5,4);g<A6>(a6,5);g<A7>(a7,6);g<A8>(a8,7);g<A9>(a9,8);va_end(l);}
+ − 71 #define VF10(id,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,S) void S (A1 a1, ...) {va_list l;va_start(l,a1);gID=id;g<A1>(a1,0);g<A2>(va_arg(l,A2),1);g<A3>(a3,2);g<A4>(a4,3);g<A5>(a5,4);g<A6>(a6,5);g<A7>(a7,6);g<A8>(a8,7);g<A9>(a9,8);g<A10>(a10,9);va_end(l);}
+ − 72
+ − 73 #include "case.h"
+ − 74
+ − 75 }
+ − 76
+ − 77 #undef VF0
+ − 78 #undef VF1
+ − 79 #undef VF2
+ − 80 #undef VF3
+ − 81 #undef VF4
+ − 82 #undef VF5
+ − 83 #undef VF6
+ − 84 #undef VF7
+ − 85 #undef VF8
+ − 86 #undef VF9
+ − 87 #undef VF10
+ − 88
+ − 89 #define VF0(id,S) (void*)S,
+ − 90 #define VF1(id,A1,S) (void*)S,
+ − 91 #define VF2(id,A1,A2,S) (void*)S,
+ − 92 #define VF3(id,A1,A2,A3,S) (void*)S,
+ − 93 #define VF4(id,A1,A2,A3,A4,S) (void*)S,
+ − 94 #define VF5(id,A1,A2,A3,A4,A5,S) (void*)S,
+ − 95 #define VF6(id,A1,A2,A3,A4,A5,A6,S) (void*)S,
+ − 96 #define VF7(id,A1,A2,A3,A4,A5,A6,A7,S) (void*)S,
+ − 97 #define VF8(id,A1,A2,A3,A4,A5,A6,A7,A8,S) (void*)S,
+ − 98 #define VF9(id,A1,A2,A3,A4,A5,A6,A7,A8,A9,S) (void*)S,
+ − 99 #define VF10(id,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,S) (void*)S,
+ − 100
+ − 101 DCpointer gFuncTable[] = {
+ − 102 #include "case.h"
+ − 103 };
+ − 104
+ − 105 DCpointer getFunc(int x) {
+ − 106 return gFuncTable[x];
+ − 107 }