ffi 1.9.18 → 1.9.21

Sign up to get free protection for your applications and to get access to all the features.

Potentially problematic release.


This version of ffi might be problematic. Click here for more details.

Files changed (366) hide show
  1. checksums.yaml +4 -4
  2. data/README.md +3 -2
  3. data/Rakefile +14 -3
  4. data/ext/ffi_c/AbstractMemory.c +6 -1
  5. data/ext/ffi_c/Platform.c +10 -2
  6. data/ext/ffi_c/extconf.rb +7 -2
  7. data/ext/ffi_c/libffi.bsd.mk +9 -3
  8. data/ext/ffi_c/libffi.darwin.mk +14 -4
  9. data/ext/ffi_c/libffi.gnu.mk +2 -1
  10. data/ext/ffi_c/libffi.mk +9 -4
  11. data/ext/ffi_c/libffi/ChangeLog.libffi +2 -2
  12. data/ext/ffi_c/libffi/{ChangeLog → ChangeLog.libffi-3.1} +1402 -2
  13. data/ext/ffi_c/libffi/ChangeLog.v1 +1 -1
  14. data/ext/ffi_c/libffi/LICENSE +1 -1
  15. data/ext/ffi_c/libffi/Makefile.am +166 -157
  16. data/ext/ffi_c/libffi/README +164 -52
  17. data/ext/ffi_c/libffi/acinclude.m4 +381 -0
  18. data/ext/ffi_c/libffi/autogen.sh +2 -0
  19. data/ext/ffi_c/libffi/configure.ac +148 -256
  20. data/ext/ffi_c/libffi/configure.host +265 -4
  21. data/ext/ffi_c/libffi/doc/Makefile.am +3 -0
  22. data/ext/ffi_c/libffi/doc/libffi.texi +430 -45
  23. data/ext/ffi_c/libffi/doc/version.texi +4 -4
  24. data/ext/ffi_c/libffi/generate-darwin-source-and-headers.py +207 -0
  25. data/ext/ffi_c/libffi/include/Makefile.am +3 -3
  26. data/ext/ffi_c/libffi/include/ffi.h.in +107 -50
  27. data/ext/ffi_c/libffi/include/ffi_cfi.h +55 -0
  28. data/ext/ffi_c/libffi/include/ffi_common.h +32 -11
  29. data/ext/ffi_c/libffi/libffi.map.in +80 -0
  30. data/ext/ffi_c/libffi/libffi.pc.in +3 -2
  31. data/ext/ffi_c/libffi/libffi.xcodeproj/project.pbxproj +637 -0
  32. data/ext/ffi_c/libffi/libtool-ldflags +106 -0
  33. data/ext/ffi_c/libffi/libtool-version +1 -1
  34. data/ext/ffi_c/libffi/m4/asmcfi.m4 +13 -0
  35. data/ext/ffi_c/libffi/m4/ax_append_flag.m4 +69 -0
  36. data/ext/ffi_c/libffi/m4/ax_cc_maxopt.m4 +13 -8
  37. data/ext/ffi_c/libffi/m4/ax_cflags_warn_all.m4 +31 -104
  38. data/ext/ffi_c/libffi/m4/{ax_check_compiler_flags.m4 → ax_check_compile_flag.m4} +30 -34
  39. data/ext/ffi_c/libffi/m4/ax_compiler_vendor.m4 +32 -11
  40. data/ext/ffi_c/libffi/m4/ax_enable_builddir.m4 +6 -5
  41. data/ext/ffi_c/libffi/m4/ax_gcc_archflag.m4 +31 -21
  42. data/ext/ffi_c/libffi/man/Makefile.am +2 -2
  43. data/ext/ffi_c/libffi/man/ffi.3 +10 -0
  44. data/ext/ffi_c/libffi/man/ffi_prep_cif.3 +6 -4
  45. data/ext/ffi_c/libffi/man/ffi_prep_cif_var.3 +73 -0
  46. data/ext/ffi_c/libffi/msvcc.sh +72 -9
  47. data/ext/ffi_c/libffi/src/aarch64/ffi.c +941 -0
  48. data/ext/ffi_c/libffi/src/aarch64/ffitarget.h +81 -0
  49. data/ext/ffi_c/libffi/src/aarch64/internal.h +67 -0
  50. data/ext/ffi_c/libffi/src/aarch64/sysv.S +438 -0
  51. data/ext/ffi_c/libffi/src/alpha/ffi.c +335 -98
  52. data/ext/ffi_c/libffi/src/alpha/ffitarget.h +10 -1
  53. data/ext/ffi_c/libffi/src/alpha/internal.h +23 -0
  54. data/ext/ffi_c/libffi/src/alpha/osf.S +161 -266
  55. data/ext/ffi_c/libffi/src/arc/arcompact.S +135 -0
  56. data/ext/ffi_c/libffi/src/arc/ffi.c +266 -0
  57. data/ext/ffi_c/libffi/src/arc/ffitarget.h +53 -0
  58. data/ext/ffi_c/libffi/src/arm/ffi.c +597 -517
  59. data/ext/ffi_c/libffi/src/arm/ffitarget.h +24 -7
  60. data/ext/ffi_c/libffi/src/arm/internal.h +7 -0
  61. data/ext/ffi_c/libffi/src/arm/sysv.S +303 -417
  62. data/ext/ffi_c/libffi/src/avr32/ffitarget.h +6 -1
  63. data/ext/ffi_c/libffi/src/bfin/ffi.c +196 -0
  64. data/ext/ffi_c/libffi/src/bfin/ffitarget.h +43 -0
  65. data/ext/ffi_c/libffi/src/bfin/sysv.S +179 -0
  66. data/ext/ffi_c/libffi/src/closures.c +319 -44
  67. data/ext/ffi_c/libffi/src/cris/ffi.c +10 -7
  68. data/ext/ffi_c/libffi/src/cris/ffitarget.h +6 -1
  69. data/ext/ffi_c/libffi/src/debug.c +6 -1
  70. data/ext/ffi_c/libffi/src/dlmalloc.c +16 -11
  71. data/ext/ffi_c/libffi/src/frv/ffi.c +1 -1
  72. data/ext/ffi_c/libffi/src/frv/ffitarget.h +6 -1
  73. data/ext/ffi_c/libffi/src/ia64/ffi.c +11 -7
  74. data/ext/ffi_c/libffi/src/ia64/ffitarget.h +6 -1
  75. data/ext/ffi_c/libffi/src/java_raw_api.c +23 -5
  76. data/ext/ffi_c/libffi/src/m32r/ffi.c +1 -1
  77. data/ext/ffi_c/libffi/src/m32r/ffitarget.h +6 -1
  78. data/ext/ffi_c/libffi/src/m68k/ffi.c +87 -13
  79. data/ext/ffi_c/libffi/src/m68k/ffitarget.h +6 -1
  80. data/ext/ffi_c/libffi/src/m68k/sysv.S +119 -32
  81. data/ext/ffi_c/libffi/src/m88k/ffi.c +400 -0
  82. data/ext/ffi_c/libffi/src/m88k/ffitarget.h +49 -0
  83. data/ext/ffi_c/libffi/src/m88k/obsd.S +209 -0
  84. data/ext/ffi_c/libffi/src/metag/ffi.c +330 -0
  85. data/ext/ffi_c/libffi/{fficonfig.hw → src/metag/ffitarget.h} +22 -26
  86. data/ext/ffi_c/libffi/src/metag/sysv.S +311 -0
  87. data/ext/ffi_c/libffi/src/microblaze/ffi.c +321 -0
  88. data/ext/ffi_c/libffi/src/microblaze/ffitarget.h +53 -0
  89. data/ext/ffi_c/libffi/src/microblaze/sysv.S +302 -0
  90. data/ext/ffi_c/libffi/src/mips/ffi.c +95 -28
  91. data/ext/ffi_c/libffi/src/mips/ffitarget.h +9 -2
  92. data/ext/ffi_c/libffi/src/mips/n32.S +126 -56
  93. data/ext/ffi_c/libffi/src/mips/o32.S +148 -27
  94. data/ext/ffi_c/libffi/src/moxie/eabi.S +55 -82
  95. data/ext/ffi_c/libffi/src/moxie/ffi.c +40 -44
  96. data/ext/ffi_c/libffi/src/moxie/ffitarget.h +52 -0
  97. data/ext/ffi_c/libffi/src/nios2/ffi.c +304 -0
  98. data/ext/ffi_c/libffi/src/nios2/ffitarget.h +52 -0
  99. data/ext/ffi_c/libffi/src/nios2/sysv.S +136 -0
  100. data/ext/ffi_c/libffi/src/or1k/ffi.c +328 -0
  101. data/ext/ffi_c/libffi/src/or1k/ffitarget.h +58 -0
  102. data/ext/ffi_c/libffi/src/or1k/sysv.S +107 -0
  103. data/ext/ffi_c/libffi/src/pa/ffitarget.h +8 -1
  104. data/ext/ffi_c/libffi/src/powerpc/aix.S +6 -6
  105. data/ext/ffi_c/libffi/src/powerpc/aix_closure.S +3 -1
  106. data/ext/ffi_c/libffi/src/powerpc/asm.h +2 -2
  107. data/ext/ffi_c/libffi/src/powerpc/darwin.S +2 -7
  108. data/ext/ffi_c/libffi/src/powerpc/darwin_closure.S +22 -26
  109. data/ext/ffi_c/libffi/src/powerpc/ffi.c +103 -1378
  110. data/ext/ffi_c/libffi/src/powerpc/ffi_darwin.c +25 -25
  111. data/ext/ffi_c/libffi/src/powerpc/ffi_linux64.c +945 -0
  112. data/ext/ffi_c/libffi/src/powerpc/ffi_powerpc.h +94 -0
  113. data/ext/ffi_c/libffi/src/powerpc/ffi_sysv.c +923 -0
  114. data/ext/ffi_c/libffi/src/powerpc/ffitarget.h +100 -44
  115. data/ext/ffi_c/libffi/src/powerpc/linux64.S +100 -59
  116. data/ext/ffi_c/libffi/src/powerpc/linux64_closure.S +360 -108
  117. data/ext/ffi_c/libffi/src/powerpc/ppc_closure.S +138 -68
  118. data/ext/ffi_c/libffi/src/powerpc/sysv.S +68 -112
  119. data/ext/ffi_c/libffi/src/prep_cif.c +108 -24
  120. data/ext/ffi_c/libffi/src/raw_api.c +18 -5
  121. data/ext/ffi_c/libffi/src/s390/ffi.c +294 -318
  122. data/ext/ffi_c/libffi/src/s390/ffitarget.h +9 -1
  123. data/ext/ffi_c/libffi/src/s390/internal.h +11 -0
  124. data/ext/ffi_c/libffi/src/s390/sysv.S +257 -366
  125. data/ext/ffi_c/libffi/src/sh/ffi.c +4 -3
  126. data/ext/ffi_c/libffi/src/sh/ffitarget.h +6 -1
  127. data/ext/ffi_c/libffi/src/sh64/ffi.c +3 -2
  128. data/ext/ffi_c/libffi/src/sh64/ffitarget.h +6 -1
  129. data/ext/ffi_c/libffi/src/sparc/ffi.c +326 -527
  130. data/ext/ffi_c/libffi/src/sparc/ffi64.c +608 -0
  131. data/ext/ffi_c/libffi/src/sparc/ffitarget.h +20 -7
  132. data/ext/ffi_c/libffi/src/sparc/internal.h +26 -0
  133. data/ext/ffi_c/libffi/src/sparc/v8.S +364 -234
  134. data/ext/ffi_c/libffi/src/sparc/v9.S +340 -207
  135. data/ext/ffi_c/libffi/src/tile/ffi.c +355 -0
  136. data/ext/ffi_c/libffi/src/tile/ffitarget.h +65 -0
  137. data/ext/ffi_c/libffi/src/tile/tile.S +360 -0
  138. data/ext/ffi_c/libffi/src/types.c +43 -14
  139. data/ext/ffi_c/libffi/src/vax/elfbsd.S +195 -0
  140. data/ext/ffi_c/libffi/src/vax/ffi.c +276 -0
  141. data/ext/ffi_c/libffi/src/vax/ffitarget.h +49 -0
  142. data/ext/ffi_c/libffi/src/x86/asmnames.h +30 -0
  143. data/ext/ffi_c/libffi/src/x86/ffi.c +589 -500
  144. data/ext/ffi_c/libffi/src/x86/ffi64.c +338 -116
  145. data/ext/ffi_c/libffi/src/x86/ffitarget.h +55 -35
  146. data/ext/ffi_c/libffi/src/x86/ffiw64.c +287 -0
  147. data/ext/ffi_c/libffi/src/x86/internal.h +29 -0
  148. data/ext/ffi_c/libffi/src/x86/internal64.h +22 -0
  149. data/ext/ffi_c/libffi/src/x86/sysv.S +975 -400
  150. data/ext/ffi_c/libffi/src/x86/unix64.S +398 -299
  151. data/ext/ffi_c/libffi/src/x86/win64.S +222 -458
  152. data/ext/ffi_c/libffi/src/x86/win64_intel.S +237 -0
  153. data/ext/ffi_c/libffi/src/xtensa/ffi.c +298 -0
  154. data/ext/ffi_c/libffi/src/xtensa/ffitarget.h +53 -0
  155. data/ext/ffi_c/libffi/src/xtensa/sysv.S +253 -0
  156. data/ext/ffi_c/libffi/stamp-h.in +1 -0
  157. data/ext/ffi_c/libffi/testsuite/Makefile.am +78 -73
  158. data/ext/ffi_c/libffi/testsuite/lib/libffi.exp +120 -25
  159. data/ext/ffi_c/libffi/testsuite/lib/target-libpath.exp +21 -1
  160. data/ext/ffi_c/libffi/testsuite/libffi.call/align_mixed.c +46 -0
  161. data/ext/ffi_c/libffi/testsuite/libffi.call/call.exp +4 -6
  162. data/ext/ffi_c/libffi/testsuite/libffi.call/{closure_stdcall.c → closure_simple.c} +7 -16
  163. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_12byte.c +4 -4
  164. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_16byte.c +4 -4
  165. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_18byte.c +4 -4
  166. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_19byte.c +4 -4
  167. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_1_1byte.c +4 -4
  168. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_20byte.c +4 -4
  169. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_20byte1.c +4 -4
  170. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_24byte.c +5 -5
  171. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_2byte.c +4 -4
  172. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3_1byte.c +4 -4
  173. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3byte1.c +4 -4
  174. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3byte2.c +4 -4
  175. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_4_1byte.c +4 -4
  176. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_4byte.c +4 -4
  177. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_5_1_byte.c +4 -4
  178. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_5byte.c +4 -4
  179. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_64byte.c +5 -5
  180. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_6_1_byte.c +4 -4
  181. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_6byte.c +4 -4
  182. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_7_1_byte.c +4 -4
  183. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_7byte.c +4 -4
  184. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_8byte.c +4 -4
  185. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_9byte1.c +4 -4
  186. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_9byte2.c +4 -4
  187. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_double.c +4 -4
  188. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_float.c +4 -4
  189. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_longdouble.c +4 -4
  190. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_longdouble_split.c +4 -6
  191. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_longdouble_split2.c +4 -6
  192. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_pointer.c +4 -4
  193. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint16.c +4 -4
  194. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint32.c +4 -4
  195. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint64.c +4 -4
  196. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint16.c +4 -4
  197. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint32.c +4 -4
  198. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint64.c +4 -4
  199. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_dbls_struct.c +4 -4
  200. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_double_va.c +10 -9
  201. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_longdouble.c +3 -3
  202. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_longdouble_va.c +10 -9
  203. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_many_mixed_args.c +70 -0
  204. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_many_mixed_float_double.c +55 -0
  205. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_pointer.c +1 -1
  206. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_pointer_stack.c +11 -9
  207. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_struct_va1.c +114 -0
  208. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_uchar_va.c +44 -0
  209. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_uint_va.c +45 -0
  210. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ulong_va.c +45 -0
  211. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ulonglong.c +5 -5
  212. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ushort_va.c +44 -0
  213. data/ext/ffi_c/libffi/testsuite/libffi.call/err_bad_typedef.c +2 -2
  214. data/ext/ffi_c/libffi/testsuite/libffi.call/ffitest.h +23 -40
  215. data/ext/ffi_c/libffi/testsuite/libffi.call/float1.c +3 -1
  216. data/ext/ffi_c/libffi/testsuite/libffi.call/float2.c +6 -4
  217. data/ext/ffi_c/libffi/testsuite/libffi.call/float3.c +4 -2
  218. data/ext/ffi_c/libffi/testsuite/libffi.call/float_va.c +107 -0
  219. data/ext/ffi_c/libffi/testsuite/libffi.call/huge_struct.c +18 -19
  220. data/ext/ffi_c/libffi/testsuite/libffi.call/many.c +6 -16
  221. data/ext/ffi_c/libffi/testsuite/libffi.call/many2.c +57 -0
  222. data/ext/ffi_c/libffi/testsuite/libffi.call/many_double.c +70 -0
  223. data/ext/ffi_c/libffi/testsuite/libffi.call/many_mixed.c +78 -0
  224. data/ext/ffi_c/libffi/testsuite/libffi.call/negint.c +0 -1
  225. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct.c +6 -6
  226. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct1.c +8 -8
  227. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct10.c +6 -6
  228. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct11.c +121 -0
  229. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct2.c +5 -5
  230. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct3.c +5 -5
  231. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct4.c +5 -5
  232. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct5.c +5 -5
  233. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct6.c +6 -6
  234. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct7.c +5 -5
  235. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct8.c +6 -6
  236. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct9.c +6 -6
  237. data/ext/ffi_c/libffi/testsuite/libffi.call/offsets.c +46 -0
  238. data/ext/ffi_c/libffi/testsuite/libffi.call/pr1172638.c +127 -0
  239. data/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl.c +1 -0
  240. data/ext/ffi_c/libffi/testsuite/libffi.call/return_ldl.c +1 -1
  241. data/ext/ffi_c/libffi/testsuite/libffi.call/return_sc.c +1 -1
  242. data/ext/ffi_c/libffi/testsuite/libffi.call/return_uc.c +1 -1
  243. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_large.c +7 -7
  244. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_large2.c +7 -7
  245. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_medium.c +5 -5
  246. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_medium2.c +5 -5
  247. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen.c +2 -2
  248. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen2.c +49 -0
  249. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen3.c +49 -0
  250. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen4.c +55 -0
  251. data/ext/ffi_c/libffi/testsuite/libffi.call/struct1.c +9 -7
  252. data/ext/ffi_c/libffi/testsuite/libffi.call/struct2.c +7 -7
  253. data/ext/ffi_c/libffi/testsuite/libffi.call/struct3.c +7 -6
  254. data/ext/ffi_c/libffi/testsuite/libffi.call/struct4.c +9 -8
  255. data/ext/ffi_c/libffi/testsuite/libffi.call/struct5.c +9 -8
  256. data/ext/ffi_c/libffi/testsuite/libffi.call/struct6.c +9 -9
  257. data/ext/ffi_c/libffi/testsuite/libffi.call/struct7.c +9 -9
  258. data/ext/ffi_c/libffi/testsuite/libffi.call/struct8.c +9 -8
  259. data/ext/ffi_c/libffi/testsuite/libffi.call/struct9.c +9 -8
  260. data/ext/ffi_c/libffi/testsuite/libffi.call/testclosure.c +2 -2
  261. data/ext/ffi_c/libffi/testsuite/libffi.call/uninitialized.c +61 -0
  262. data/ext/ffi_c/libffi/testsuite/{libffi.special → libffi.call}/unwindtest.cc +3 -10
  263. data/ext/ffi_c/libffi/testsuite/{libffi.special → libffi.call}/unwindtest_ffi_call.cc +2 -1
  264. data/ext/ffi_c/libffi/testsuite/libffi.call/va_1.c +196 -0
  265. data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct1.c +121 -0
  266. data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct2.c +123 -0
  267. data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct3.c +125 -0
  268. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex.inc +91 -0
  269. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_double.c +10 -0
  270. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_float.c +10 -0
  271. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_longdouble.c +10 -0
  272. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex.inc +42 -0
  273. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_double.c +10 -0
  274. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_float.c +10 -0
  275. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_longdouble.c +10 -0
  276. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct.inc +71 -0
  277. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_double.c +10 -0
  278. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_float.c +10 -0
  279. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_longdouble.c +10 -0
  280. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va.inc +80 -0
  281. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_double.c +10 -0
  282. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_float.c +16 -0
  283. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_longdouble.c +10 -0
  284. data/ext/ffi_c/libffi/testsuite/{libffi.special/special.exp → libffi.complex/complex.exp} +9 -8
  285. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex.inc +51 -0
  286. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_double.inc +7 -0
  287. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_float.inc +7 -0
  288. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_longdouble.inc +7 -0
  289. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_double.c +10 -0
  290. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_float.c +10 -0
  291. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_int.c +86 -0
  292. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_longdouble.c +10 -0
  293. data/ext/ffi_c/libffi/testsuite/libffi.complex/ffitest.h +1 -0
  294. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex.inc +78 -0
  295. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_double.c +10 -0
  296. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_float.c +10 -0
  297. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_longdouble.c +10 -0
  298. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex.inc +37 -0
  299. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1.inc +41 -0
  300. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_double.c +10 -0
  301. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_float.c +10 -0
  302. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_longdouble.c +10 -0
  303. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2.inc +44 -0
  304. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_double.c +10 -0
  305. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_float.c +10 -0
  306. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_longdouble.c +10 -0
  307. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_double.c +10 -0
  308. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_float.c +10 -0
  309. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_longdouble.c +10 -0
  310. data/ext/ffi_c/libffi/testsuite/libffi.go/aa-direct.c +34 -0
  311. data/ext/ffi_c/libffi/testsuite/libffi.go/closure1.c +28 -0
  312. data/ext/ffi_c/libffi/testsuite/libffi.go/ffitest.h +1 -0
  313. data/ext/ffi_c/libffi/testsuite/libffi.go/go.exp +36 -0
  314. data/ext/ffi_c/libffi/testsuite/libffi.go/static-chain.h +19 -0
  315. data/ffi.gemspec +2 -2
  316. data/lib/ffi/enum.rb +124 -0
  317. data/lib/ffi/library.rb +65 -13
  318. data/lib/ffi/platform.rb +7 -2
  319. data/lib/ffi/platform/sparc64-linux/types.conf +102 -0
  320. data/lib/ffi/platform/x86_64-windows/types.conf +113 -20
  321. data/lib/ffi/pointer.rb +1 -0
  322. data/lib/ffi/struct.rb +0 -2
  323. data/lib/ffi/version.rb +1 -1
  324. data/spec/ffi/bitmask_spec.rb +575 -0
  325. data/spec/ffi/fixtures/BitmaskTest.c +51 -0
  326. data/spec/ffi/rbx/memory_pointer_spec.rb +4 -0
  327. data/spec/ffi/struct_spec.rb +0 -4
  328. metadata +143 -51
  329. data/ext/ffi_c/libffi/Makefile.in +0 -1820
  330. data/ext/ffi_c/libffi/Makefile.vc +0 -141
  331. data/ext/ffi_c/libffi/Makefile.vc64 +0 -141
  332. data/ext/ffi_c/libffi/aclocal.m4 +0 -1873
  333. data/ext/ffi_c/libffi/build-ios.sh +0 -67
  334. data/ext/ffi_c/libffi/compile +0 -143
  335. data/ext/ffi_c/libffi/config.guess +0 -1501
  336. data/ext/ffi_c/libffi/config.sub +0 -1705
  337. data/ext/ffi_c/libffi/configure +0 -17191
  338. data/ext/ffi_c/libffi/depcomp +0 -630
  339. data/ext/ffi_c/libffi/doc/libffi.info +0 -593
  340. data/ext/ffi_c/libffi/doc/stamp-vti +0 -4
  341. data/ext/ffi_c/libffi/fficonfig.h.in +0 -199
  342. data/ext/ffi_c/libffi/include/Makefile.in +0 -487
  343. data/ext/ffi_c/libffi/include/ffi.h.vc +0 -427
  344. data/ext/ffi_c/libffi/include/ffi.h.vc64 +0 -427
  345. data/ext/ffi_c/libffi/install-sh +0 -520
  346. data/ext/ffi_c/libffi/ltmain.sh +0 -9636
  347. data/ext/ffi_c/libffi/m4/libtool.m4 +0 -7831
  348. data/ext/ffi_c/libffi/m4/ltoptions.m4 +0 -369
  349. data/ext/ffi_c/libffi/m4/ltsugar.m4 +0 -123
  350. data/ext/ffi_c/libffi/m4/ltversion.m4 +0 -23
  351. data/ext/ffi_c/libffi/m4/lt~obsolete.m4 +0 -98
  352. data/ext/ffi_c/libffi/man/Makefile.in +0 -466
  353. data/ext/ffi_c/libffi/mdate-sh +0 -201
  354. data/ext/ffi_c/libffi/missing +0 -376
  355. data/ext/ffi_c/libffi/src/arm/gentramp.sh +0 -118
  356. data/ext/ffi_c/libffi/src/arm/trampoline.S +0 -4450
  357. data/ext/ffi_c/libffi/src/x86/darwin.S +0 -444
  358. data/ext/ffi_c/libffi/src/x86/darwin64.S +0 -416
  359. data/ext/ffi_c/libffi/src/x86/freebsd.S +0 -458
  360. data/ext/ffi_c/libffi/src/x86/win32.S +0 -1065
  361. data/ext/ffi_c/libffi/testsuite/Makefile.in +0 -500
  362. data/ext/ffi_c/libffi/testsuite/lib/libffi-dg.exp +0 -300
  363. data/ext/ffi_c/libffi/testsuite/libffi.call/many_win32.c +0 -63
  364. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen_win32.c +0 -44
  365. data/ext/ffi_c/libffi/testsuite/libffi.special/ffitestcxx.h +0 -96
  366. data/ext/ffi_c/libffi/texinfo.tex +0 -7210
@@ -1,6 +1,7 @@
1
1
  /* -----------------------------------------------------------------*-C-*-
2
- ffitarget.h - Copyright (c) 1996-2003, 2010 Red Hat, Inc.
3
- Copyright (C) 2008 Free Software Foundation, Inc.
2
+ ffitarget.h - Copyright (c) 2012, 2014 Anthony Green
3
+ Copyright (c) 1996-2003, 2010 Red Hat, Inc.
4
+ Copyright (C) 2008 Free Software Foundation, Inc.
4
5
 
5
6
  Target configuration macros for x86 and x86-64.
6
7
 
@@ -29,6 +30,10 @@
29
30
  #ifndef LIBFFI_TARGET_H
30
31
  #define LIBFFI_TARGET_H
31
32
 
33
+ #ifndef LIBFFI_H
34
+ #error "Please do not include ffitarget.h directly into your source. Use ffi.h instead."
35
+ #endif
36
+
32
37
  /* ---- System specific configurations ----------------------------------- */
33
38
 
34
39
  /* For code common to all platforms on x86 and x86_64. */
@@ -44,6 +49,11 @@
44
49
  #define USE_BUILTIN_FFS 0 /* not yet implemented in mingw-64 */
45
50
  #endif
46
51
 
52
+ #define FFI_TARGET_SPECIFIC_STACK_SPACE_ALLOCATION
53
+ #ifndef _MSC_VER
54
+ #define FFI_TARGET_HAS_COMPLEX_TYPE
55
+ #endif
56
+
47
57
  /* ---- Generic type definitions ----------------------------------------- */
48
58
 
49
59
  #ifndef LIBFFI_ASM
@@ -56,36 +66,54 @@ typedef unsigned long long ffi_arg;
56
66
  typedef long long ffi_sarg;
57
67
  #endif
58
68
  #else
69
+ #if defined __x86_64__ && defined __ILP32__
70
+ #define FFI_SIZEOF_ARG 8
71
+ #define FFI_SIZEOF_JAVA_RAW 4
72
+ typedef unsigned long long ffi_arg;
73
+ typedef long long ffi_sarg;
74
+ #else
59
75
  typedef unsigned long ffi_arg;
60
76
  typedef signed long ffi_sarg;
61
77
  #endif
78
+ #endif
62
79
 
63
80
  typedef enum ffi_abi {
81
+ #if defined(X86_WIN64)
64
82
  FFI_FIRST_ABI = 0,
65
-
66
- /* ---- Intel x86 Win32 ---------- */
67
- #ifdef X86_WIN32
68
- FFI_SYSV,
69
- FFI_STDCALL,
83
+ FFI_WIN64,
70
84
  FFI_LAST_ABI,
71
- /* TODO: Add fastcall support for the sake of completeness */
72
- FFI_DEFAULT_ABI = FFI_SYSV
85
+ FFI_DEFAULT_ABI = FFI_WIN64
73
86
 
74
- #elif defined(X86_WIN64)
87
+ #elif defined(X86_64) || (defined (__x86_64__) && defined (X86_DARWIN))
88
+ FFI_FIRST_ABI = 1,
89
+ FFI_UNIX64,
75
90
  FFI_WIN64,
91
+ FFI_EFI64 = FFI_WIN64,
76
92
  FFI_LAST_ABI,
77
- FFI_DEFAULT_ABI = FFI_WIN64
93
+ FFI_DEFAULT_ABI = FFI_UNIX64
78
94
 
95
+ #elif defined(X86_WIN32)
96
+ FFI_FIRST_ABI = 0,
97
+ FFI_SYSV = 1,
98
+ FFI_STDCALL = 2,
99
+ FFI_THISCALL = 3,
100
+ FFI_FASTCALL = 4,
101
+ FFI_MS_CDECL = 5,
102
+ FFI_PASCAL = 6,
103
+ FFI_REGISTER = 7,
104
+ FFI_LAST_ABI,
105
+ FFI_DEFAULT_ABI = FFI_MS_CDECL
79
106
  #else
80
- /* ---- Intel x86 and AMD x86-64 - */
81
- FFI_SYSV,
82
- FFI_UNIX64, /* Unix variants all use the same ABI for x86-64 */
107
+ FFI_FIRST_ABI = 0,
108
+ FFI_SYSV = 1,
109
+ FFI_THISCALL = 3,
110
+ FFI_FASTCALL = 4,
111
+ FFI_STDCALL = 5,
112
+ FFI_PASCAL = 6,
113
+ FFI_REGISTER = 7,
114
+ FFI_MS_CDECL = 8,
83
115
  FFI_LAST_ABI,
84
- #if defined(__i386__) || defined(__i386)
85
116
  FFI_DEFAULT_ABI = FFI_SYSV
86
- #else
87
- FFI_DEFAULT_ABI = FFI_UNIX64
88
- #endif
89
117
  #endif
90
118
  } ffi_abi;
91
119
  #endif
@@ -93,28 +121,20 @@ typedef enum ffi_abi {
93
121
  /* ---- Definitions for closures ----------------------------------------- */
94
122
 
95
123
  #define FFI_CLOSURES 1
124
+ #define FFI_GO_CLOSURES 1
125
+
96
126
  #define FFI_TYPE_SMALL_STRUCT_1B (FFI_TYPE_LAST + 1)
97
127
  #define FFI_TYPE_SMALL_STRUCT_2B (FFI_TYPE_LAST + 2)
98
128
  #define FFI_TYPE_SMALL_STRUCT_4B (FFI_TYPE_LAST + 3)
129
+ #define FFI_TYPE_MS_STRUCT (FFI_TYPE_LAST + 4)
99
130
 
100
- #if defined (X86_64) || (defined (__x86_64__) && defined (X86_DARWIN))
101
- #define FFI_TRAMPOLINE_SIZE 24
102
- #define FFI_NATIVE_RAW_API 0
103
- #else
104
- #ifdef X86_WIN32
105
- #define FFI_TRAMPOLINE_SIZE 13
106
- #else
107
- #ifdef X86_WIN64
108
- #define FFI_TRAMPOLINE_SIZE 29
109
- #define FFI_NATIVE_RAW_API 0
110
- #define FFI_NO_RAW_API 1
131
+ #if defined (X86_64) || defined(X86_WIN64) \
132
+ || (defined (__x86_64__) && defined (X86_DARWIN))
133
+ # define FFI_TRAMPOLINE_SIZE 24
134
+ # define FFI_NATIVE_RAW_API 0
111
135
  #else
112
- #define FFI_TRAMPOLINE_SIZE 10
113
- #endif
114
- #endif
115
- #ifndef X86_WIN64
116
- #define FFI_NATIVE_RAW_API 1 /* x86 has native raw api support */
117
- #endif
136
+ # define FFI_TRAMPOLINE_SIZE 12
137
+ # define FFI_NATIVE_RAW_API 1 /* x86 has native raw api support */
118
138
  #endif
119
139
 
120
140
  #endif
@@ -0,0 +1,287 @@
1
+ /* -----------------------------------------------------------------------
2
+ ffiw64.c - Copyright (c) 2014 Red Hat, Inc.
3
+
4
+ x86 win64 Foreign Function Interface
5
+
6
+ Permission is hereby granted, free of charge, to any person obtaining
7
+ a copy of this software and associated documentation files (the
8
+ ``Software''), to deal in the Software without restriction, including
9
+ without limitation the rights to use, copy, modify, merge, publish,
10
+ distribute, sublicense, and/or sell copies of the Software, and to
11
+ permit persons to whom the Software is furnished to do so, subject to
12
+ the following conditions:
13
+
14
+ The above copyright notice and this permission notice shall be included
15
+ in all copies or substantial portions of the Software.
16
+
17
+ THE SOFTWARE IS PROVIDED ``AS IS'', WITHOUT WARRANTY OF ANY KIND,
18
+ EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
19
+ MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
20
+ NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
21
+ HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
22
+ WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
23
+ OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
24
+ DEALINGS IN THE SOFTWARE.
25
+ ----------------------------------------------------------------------- */
26
+
27
+ #include <ffi.h>
28
+ #include <ffi_common.h>
29
+ #include <stdlib.h>
30
+ #include <stdint.h>
31
+
32
+ #ifdef X86_WIN64
33
+ #define EFI64(name) name
34
+ #else
35
+ #define EFI64(name) name##_efi64
36
+ #endif
37
+
38
+ struct win64_call_frame
39
+ {
40
+ UINT64 rbp; /* 0 */
41
+ UINT64 retaddr; /* 8 */
42
+ UINT64 fn; /* 16 */
43
+ UINT64 flags; /* 24 */
44
+ UINT64 rvalue; /* 32 */
45
+ };
46
+
47
+ extern void ffi_call_win64 (void *stack, struct win64_call_frame *,
48
+ void *closure) FFI_HIDDEN;
49
+
50
+ ffi_status
51
+ EFI64(ffi_prep_cif_machdep)(ffi_cif *cif)
52
+ {
53
+ int flags, n;
54
+
55
+ if (cif->abi != FFI_WIN64)
56
+ return FFI_BAD_ABI;
57
+
58
+ flags = cif->rtype->type;
59
+ switch (flags)
60
+ {
61
+ default:
62
+ break;
63
+ case FFI_TYPE_LONGDOUBLE:
64
+ flags = FFI_TYPE_STRUCT;
65
+ break;
66
+ case FFI_TYPE_COMPLEX:
67
+ flags = FFI_TYPE_STRUCT;
68
+ /* FALLTHRU */
69
+ case FFI_TYPE_STRUCT:
70
+ switch (cif->rtype->size)
71
+ {
72
+ case 8:
73
+ flags = FFI_TYPE_UINT64;
74
+ break;
75
+ case 4:
76
+ flags = FFI_TYPE_SMALL_STRUCT_4B;
77
+ break;
78
+ case 2:
79
+ flags = FFI_TYPE_SMALL_STRUCT_2B;
80
+ break;
81
+ case 1:
82
+ flags = FFI_TYPE_SMALL_STRUCT_1B;
83
+ break;
84
+ }
85
+ break;
86
+ }
87
+ cif->flags = flags;
88
+
89
+ /* Each argument either fits in a register, an 8 byte slot, or is
90
+ passed by reference with the pointer in the 8 byte slot. */
91
+ n = cif->nargs;
92
+ n += (flags == FFI_TYPE_STRUCT);
93
+ if (n < 4)
94
+ n = 4;
95
+ cif->bytes = n * 8;
96
+
97
+ return FFI_OK;
98
+ }
99
+
100
+ static void
101
+ ffi_call_int (ffi_cif *cif, void (*fn)(void), void *rvalue,
102
+ void **avalue, void *closure)
103
+ {
104
+ int i, j, n, flags;
105
+ UINT64 *stack;
106
+ size_t rsize;
107
+ struct win64_call_frame *frame;
108
+
109
+ FFI_ASSERT(cif->abi == FFI_WIN64);
110
+
111
+ flags = cif->flags;
112
+ rsize = 0;
113
+
114
+ /* If we have no return value for a structure, we need to create one.
115
+ Otherwise we can ignore the return type entirely. */
116
+ if (rvalue == NULL)
117
+ {
118
+ if (flags == FFI_TYPE_STRUCT)
119
+ rsize = cif->rtype->size;
120
+ else
121
+ flags = FFI_TYPE_VOID;
122
+ }
123
+
124
+ stack = alloca(cif->bytes + sizeof(struct win64_call_frame) + rsize);
125
+ frame = (struct win64_call_frame *)((char *)stack + cif->bytes);
126
+ if (rsize)
127
+ rvalue = frame + 1;
128
+
129
+ frame->fn = (uintptr_t)fn;
130
+ frame->flags = flags;
131
+ frame->rvalue = (uintptr_t)rvalue;
132
+
133
+ j = 0;
134
+ if (flags == FFI_TYPE_STRUCT)
135
+ {
136
+ stack[0] = (uintptr_t)rvalue;
137
+ j = 1;
138
+ }
139
+
140
+ for (i = 0, n = cif->nargs; i < n; ++i, ++j)
141
+ {
142
+ switch (cif->arg_types[i]->size)
143
+ {
144
+ case 8:
145
+ stack[j] = *(UINT64 *)avalue[i];
146
+ break;
147
+ case 4:
148
+ stack[j] = *(UINT32 *)avalue[i];
149
+ break;
150
+ case 2:
151
+ stack[j] = *(UINT16 *)avalue[i];
152
+ break;
153
+ case 1:
154
+ stack[j] = *(UINT8 *)avalue[i];
155
+ break;
156
+ default:
157
+ stack[j] = (uintptr_t)avalue[i];
158
+ break;
159
+ }
160
+ }
161
+
162
+ ffi_call_win64 (stack, frame, closure);
163
+ }
164
+
165
+ void
166
+ EFI64(ffi_call)(ffi_cif *cif, void (*fn)(void), void *rvalue, void **avalue)
167
+ {
168
+ ffi_call_int (cif, fn, rvalue, avalue, NULL);
169
+ }
170
+
171
+ void
172
+ EFI64(ffi_call_go)(ffi_cif *cif, void (*fn)(void), void *rvalue,
173
+ void **avalue, void *closure)
174
+ {
175
+ ffi_call_int (cif, fn, rvalue, avalue, closure);
176
+ }
177
+
178
+
179
+ extern void ffi_closure_win64(void) FFI_HIDDEN;
180
+ extern void ffi_go_closure_win64(void) FFI_HIDDEN;
181
+
182
+ ffi_status
183
+ EFI64(ffi_prep_closure_loc)(ffi_closure* closure,
184
+ ffi_cif* cif,
185
+ void (*fun)(ffi_cif*, void*, void**, void*),
186
+ void *user_data,
187
+ void *codeloc)
188
+ {
189
+ static const unsigned char trampoline[16] = {
190
+ /* leaq -0x7(%rip),%r10 # 0x0 */
191
+ 0x4c, 0x8d, 0x15, 0xf9, 0xff, 0xff, 0xff,
192
+ /* jmpq *0x3(%rip) # 0x10 */
193
+ 0xff, 0x25, 0x03, 0x00, 0x00, 0x00,
194
+ /* nopl (%rax) */
195
+ 0x0f, 0x1f, 0x00
196
+ };
197
+ char *tramp = closure->tramp;
198
+
199
+ if (cif->abi != FFI_WIN64)
200
+ return FFI_BAD_ABI;
201
+
202
+ memcpy (tramp, trampoline, sizeof(trampoline));
203
+ *(UINT64 *)(tramp + 16) = (uintptr_t)ffi_closure_win64;
204
+
205
+ closure->cif = cif;
206
+ closure->fun = fun;
207
+ closure->user_data = user_data;
208
+
209
+ return FFI_OK;
210
+ }
211
+
212
+ ffi_status
213
+ EFI64(ffi_prep_go_closure)(ffi_go_closure* closure, ffi_cif* cif,
214
+ void (*fun)(ffi_cif*, void*, void**, void*))
215
+ {
216
+ if (cif->abi != FFI_WIN64)
217
+ return FFI_BAD_ABI;
218
+
219
+ closure->tramp = ffi_go_closure_win64;
220
+ closure->cif = cif;
221
+ closure->fun = fun;
222
+
223
+ return FFI_OK;
224
+ }
225
+
226
+ struct win64_closure_frame
227
+ {
228
+ UINT64 rvalue[2];
229
+ UINT64 fargs[4];
230
+ UINT64 retaddr;
231
+ UINT64 args[];
232
+ };
233
+
234
+ /* Force the inner function to use the MS ABI. When compiling on win64
235
+ this is a nop. When compiling on unix, this simplifies the assembly,
236
+ and places the burden of saving the extra call-saved registers on
237
+ the compiler. */
238
+ int FFI_HIDDEN __attribute__((ms_abi))
239
+ ffi_closure_win64_inner(ffi_cif *cif,
240
+ void (*fun)(ffi_cif*, void*, void**, void*),
241
+ void *user_data,
242
+ struct win64_closure_frame *frame)
243
+ {
244
+ void **avalue;
245
+ void *rvalue;
246
+ int i, n, nreg, flags;
247
+
248
+ avalue = alloca(cif->nargs * sizeof(void *));
249
+ rvalue = frame->rvalue;
250
+ nreg = 0;
251
+
252
+ /* When returning a structure, the address is in the first argument.
253
+ We must also be prepared to return the same address in eax, so
254
+ install that address in the frame and pretend we return a pointer. */
255
+ flags = cif->flags;
256
+ if (flags == FFI_TYPE_STRUCT)
257
+ {
258
+ rvalue = (void *)(uintptr_t)frame->args[0];
259
+ frame->rvalue[0] = frame->args[0];
260
+ nreg = 1;
261
+ }
262
+
263
+ for (i = 0, n = cif->nargs; i < n; ++i, ++nreg)
264
+ {
265
+ size_t size = cif->arg_types[i]->size;
266
+ size_t type = cif->arg_types[i]->type;
267
+ void *a;
268
+
269
+ if (type == FFI_TYPE_DOUBLE || type == FFI_TYPE_FLOAT)
270
+ {
271
+ if (nreg < 4)
272
+ a = &frame->fargs[nreg];
273
+ else
274
+ a = &frame->args[nreg];
275
+ }
276
+ else if (size == 1 || size == 2 || size == 4 || size == 8)
277
+ a = &frame->args[nreg];
278
+ else
279
+ a = (void *)(uintptr_t)frame->args[nreg];
280
+
281
+ avalue[i] = a;
282
+ }
283
+
284
+ /* Invoke the closure. */
285
+ fun (cif, rvalue, avalue, user_data);
286
+ return flags;
287
+ }
@@ -0,0 +1,29 @@
1
+ #define X86_RET_FLOAT 0
2
+ #define X86_RET_DOUBLE 1
3
+ #define X86_RET_LDOUBLE 2
4
+ #define X86_RET_SINT8 3
5
+ #define X86_RET_SINT16 4
6
+ #define X86_RET_UINT8 5
7
+ #define X86_RET_UINT16 6
8
+ #define X86_RET_INT64 7
9
+ #define X86_RET_INT32 8
10
+ #define X86_RET_VOID 9
11
+ #define X86_RET_STRUCTPOP 10
12
+ #define X86_RET_STRUCTARG 11
13
+ #define X86_RET_STRUCT_1B 12
14
+ #define X86_RET_STRUCT_2B 13
15
+ #define X86_RET_UNUSED14 14
16
+ #define X86_RET_UNUSED15 15
17
+
18
+ #define X86_RET_TYPE_MASK 15
19
+ #define X86_RET_POP_SHIFT 4
20
+
21
+ #define R_EAX 0
22
+ #define R_EDX 1
23
+ #define R_ECX 2
24
+
25
+ #ifdef __PCC__
26
+ # define HAVE_FASTCALL 0
27
+ #else
28
+ # define HAVE_FASTCALL 1
29
+ #endif