ffi 1.11.1

Sign up to get free protection for your applications and to get access to all the features.
Files changed (530) hide show
  1. checksums.yaml +7 -0
  2. data/.gitignore +25 -0
  3. data/.gitmodules +4 -0
  4. data/.travis.yml +42 -0
  5. data/.yardopts +5 -0
  6. data/CHANGELOG.md +131 -0
  7. data/COPYING +49 -0
  8. data/Gemfile +15 -0
  9. data/LICENSE +24 -0
  10. data/LICENSE.SPECS +22 -0
  11. data/README.md +115 -0
  12. data/Rakefile +195 -0
  13. data/appveyor.yml +27 -0
  14. data/ext/ffi_c/AbstractMemory.c +1109 -0
  15. data/ext/ffi_c/AbstractMemory.h +175 -0
  16. data/ext/ffi_c/ArrayType.c +162 -0
  17. data/ext/ffi_c/ArrayType.h +59 -0
  18. data/ext/ffi_c/Buffer.c +365 -0
  19. data/ext/ffi_c/Call.c +503 -0
  20. data/ext/ffi_c/Call.h +107 -0
  21. data/ext/ffi_c/ClosurePool.c +283 -0
  22. data/ext/ffi_c/ClosurePool.h +57 -0
  23. data/ext/ffi_c/DynamicLibrary.c +339 -0
  24. data/ext/ffi_c/DynamicLibrary.h +98 -0
  25. data/ext/ffi_c/Function.c +917 -0
  26. data/ext/ffi_c/Function.h +87 -0
  27. data/ext/ffi_c/FunctionInfo.c +271 -0
  28. data/ext/ffi_c/LastError.c +229 -0
  29. data/ext/ffi_c/LastError.h +47 -0
  30. data/ext/ffi_c/LongDouble.c +63 -0
  31. data/ext/ffi_c/LongDouble.h +51 -0
  32. data/ext/ffi_c/MappedType.c +168 -0
  33. data/ext/ffi_c/MappedType.h +59 -0
  34. data/ext/ffi_c/MemoryPointer.c +197 -0
  35. data/ext/ffi_c/MemoryPointer.h +53 -0
  36. data/ext/ffi_c/MethodHandle.c +358 -0
  37. data/ext/ffi_c/MethodHandle.h +55 -0
  38. data/ext/ffi_c/Platform.c +82 -0
  39. data/ext/ffi_c/Platform.h +45 -0
  40. data/ext/ffi_c/Pointer.c +508 -0
  41. data/ext/ffi_c/Pointer.h +63 -0
  42. data/ext/ffi_c/Struct.c +829 -0
  43. data/ext/ffi_c/Struct.h +106 -0
  44. data/ext/ffi_c/StructByValue.c +150 -0
  45. data/ext/ffi_c/StructByValue.h +55 -0
  46. data/ext/ffi_c/StructLayout.c +698 -0
  47. data/ext/ffi_c/Thread.c +137 -0
  48. data/ext/ffi_c/Thread.h +84 -0
  49. data/ext/ffi_c/Type.c +379 -0
  50. data/ext/ffi_c/Type.h +61 -0
  51. data/ext/ffi_c/Types.c +139 -0
  52. data/ext/ffi_c/Types.h +89 -0
  53. data/ext/ffi_c/Variadic.c +298 -0
  54. data/ext/ffi_c/compat.h +78 -0
  55. data/ext/ffi_c/extconf.rb +86 -0
  56. data/ext/ffi_c/ffi.c +93 -0
  57. data/ext/ffi_c/libffi.bsd.mk +40 -0
  58. data/ext/ffi_c/libffi.darwin.mk +105 -0
  59. data/ext/ffi_c/libffi.gnu.mk +32 -0
  60. data/ext/ffi_c/libffi.mk +18 -0
  61. data/ext/ffi_c/libffi.vc.mk +26 -0
  62. data/ext/ffi_c/libffi.vc64.mk +26 -0
  63. data/ext/ffi_c/libffi/.appveyor.yml +50 -0
  64. data/ext/ffi_c/libffi/.github/issue_template.md +10 -0
  65. data/ext/ffi_c/libffi/.gitignore +38 -0
  66. data/ext/ffi_c/libffi/.travis.yml +34 -0
  67. data/ext/ffi_c/libffi/.travis/ar-lib +270 -0
  68. data/ext/ffi_c/libffi/.travis/build.sh +34 -0
  69. data/ext/ffi_c/libffi/.travis/compile +351 -0
  70. data/ext/ffi_c/libffi/.travis/install.sh +22 -0
  71. data/ext/ffi_c/libffi/.travis/moxie-sim.exp +60 -0
  72. data/ext/ffi_c/libffi/.travis/site.exp +18 -0
  73. data/ext/ffi_c/libffi/ChangeLog.libffi +584 -0
  74. data/ext/ffi_c/libffi/ChangeLog.libffi-3.1 +6000 -0
  75. data/ext/ffi_c/libffi/ChangeLog.libgcj +40 -0
  76. data/ext/ffi_c/libffi/ChangeLog.v1 +764 -0
  77. data/ext/ffi_c/libffi/LICENSE +21 -0
  78. data/ext/ffi_c/libffi/LICENSE-BUILDTOOLS +352 -0
  79. data/ext/ffi_c/libffi/Makefile.am +166 -0
  80. data/ext/ffi_c/libffi/README.md +461 -0
  81. data/ext/ffi_c/libffi/acinclude.m4 +479 -0
  82. data/ext/ffi_c/libffi/autogen.sh +2 -0
  83. data/ext/ffi_c/libffi/config.guess +1466 -0
  84. data/ext/ffi_c/libffi/config.sub +1836 -0
  85. data/ext/ffi_c/libffi/configure.ac +394 -0
  86. data/ext/ffi_c/libffi/configure.host +289 -0
  87. data/ext/ffi_c/libffi/generate-darwin-source-and-headers.py +203 -0
  88. data/ext/ffi_c/libffi/include/Makefile.am +9 -0
  89. data/ext/ffi_c/libffi/include/ffi.h.in +511 -0
  90. data/ext/ffi_c/libffi/include/ffi_cfi.h +55 -0
  91. data/ext/ffi_c/libffi/include/ffi_common.h +149 -0
  92. data/ext/ffi_c/libffi/libffi.map.in +80 -0
  93. data/ext/ffi_c/libffi/libffi.pc.in +11 -0
  94. data/ext/ffi_c/libffi/libffi.xcodeproj/project.pbxproj +1043 -0
  95. data/ext/ffi_c/libffi/libtool-version +29 -0
  96. data/ext/ffi_c/libffi/m4/asmcfi.m4 +13 -0
  97. data/ext/ffi_c/libffi/m4/ax_append_flag.m4 +71 -0
  98. data/ext/ffi_c/libffi/m4/ax_cc_maxopt.m4 +194 -0
  99. data/ext/ffi_c/libffi/m4/ax_cflags_warn_all.m4 +122 -0
  100. data/ext/ffi_c/libffi/m4/ax_check_compile_flag.m4 +74 -0
  101. data/ext/ffi_c/libffi/m4/ax_compiler_vendor.m4 +87 -0
  102. data/ext/ffi_c/libffi/m4/ax_configure_args.m4 +70 -0
  103. data/ext/ffi_c/libffi/m4/ax_enable_builddir.m4 +302 -0
  104. data/ext/ffi_c/libffi/m4/ax_gcc_archflag.m4 +263 -0
  105. data/ext/ffi_c/libffi/m4/ax_gcc_x86_cpuid.m4 +89 -0
  106. data/ext/ffi_c/libffi/m4/ax_require_defined.m4 +37 -0
  107. data/ext/ffi_c/libffi/man/Makefile.am +8 -0
  108. data/ext/ffi_c/libffi/man/ffi.3 +41 -0
  109. data/ext/ffi_c/libffi/man/ffi_call.3 +103 -0
  110. data/ext/ffi_c/libffi/man/ffi_prep_cif.3 +68 -0
  111. data/ext/ffi_c/libffi/man/ffi_prep_cif_var.3 +73 -0
  112. data/ext/ffi_c/libffi/msvcc.sh +328 -0
  113. data/ext/ffi_c/libffi/src/aarch64/ffi.c +941 -0
  114. data/ext/ffi_c/libffi/src/aarch64/ffitarget.h +81 -0
  115. data/ext/ffi_c/libffi/src/aarch64/internal.h +67 -0
  116. data/ext/ffi_c/libffi/src/aarch64/sysv.S +438 -0
  117. data/ext/ffi_c/libffi/src/alpha/ffi.c +521 -0
  118. data/ext/ffi_c/libffi/src/alpha/ffitarget.h +57 -0
  119. data/ext/ffi_c/libffi/src/alpha/internal.h +23 -0
  120. data/ext/ffi_c/libffi/src/alpha/osf.S +282 -0
  121. data/ext/ffi_c/libffi/src/arc/arcompact.S +135 -0
  122. data/ext/ffi_c/libffi/src/arc/ffi.c +266 -0
  123. data/ext/ffi_c/libffi/src/arc/ffitarget.h +53 -0
  124. data/ext/ffi_c/libffi/src/arm/ffi.c +819 -0
  125. data/ext/ffi_c/libffi/src/arm/ffitarget.h +82 -0
  126. data/ext/ffi_c/libffi/src/arm/internal.h +7 -0
  127. data/ext/ffi_c/libffi/src/arm/sysv.S +383 -0
  128. data/ext/ffi_c/libffi/src/avr32/ffi.c +423 -0
  129. data/ext/ffi_c/libffi/src/avr32/ffitarget.h +55 -0
  130. data/ext/ffi_c/libffi/src/avr32/sysv.S +208 -0
  131. data/ext/ffi_c/libffi/src/bfin/ffi.c +196 -0
  132. data/ext/ffi_c/libffi/src/bfin/ffitarget.h +43 -0
  133. data/ext/ffi_c/libffi/src/bfin/sysv.S +179 -0
  134. data/ext/ffi_c/libffi/src/closures.c +966 -0
  135. data/ext/ffi_c/libffi/src/cris/ffi.c +386 -0
  136. data/ext/ffi_c/libffi/src/cris/ffitarget.h +56 -0
  137. data/ext/ffi_c/libffi/src/cris/sysv.S +215 -0
  138. data/ext/ffi_c/libffi/src/debug.c +64 -0
  139. data/ext/ffi_c/libffi/src/dlmalloc.c +5166 -0
  140. data/ext/ffi_c/libffi/src/frv/eabi.S +128 -0
  141. data/ext/ffi_c/libffi/src/frv/ffi.c +292 -0
  142. data/ext/ffi_c/libffi/src/frv/ffitarget.h +62 -0
  143. data/ext/ffi_c/libffi/src/ia64/ffi.c +604 -0
  144. data/ext/ffi_c/libffi/src/ia64/ffitarget.h +56 -0
  145. data/ext/ffi_c/libffi/src/ia64/ia64_flags.h +40 -0
  146. data/ext/ffi_c/libffi/src/ia64/unix.S +567 -0
  147. data/ext/ffi_c/libffi/src/java_raw_api.c +374 -0
  148. data/ext/ffi_c/libffi/src/m32r/ffi.c +232 -0
  149. data/ext/ffi_c/libffi/src/m32r/ffitarget.h +53 -0
  150. data/ext/ffi_c/libffi/src/m32r/sysv.S +121 -0
  151. data/ext/ffi_c/libffi/src/m68k/ffi.c +362 -0
  152. data/ext/ffi_c/libffi/src/m68k/ffitarget.h +54 -0
  153. data/ext/ffi_c/libffi/src/m68k/sysv.S +357 -0
  154. data/ext/ffi_c/libffi/src/m88k/ffi.c +400 -0
  155. data/ext/ffi_c/libffi/src/m88k/ffitarget.h +49 -0
  156. data/ext/ffi_c/libffi/src/m88k/obsd.S +209 -0
  157. data/ext/ffi_c/libffi/src/metag/ffi.c +330 -0
  158. data/ext/ffi_c/libffi/src/metag/ffitarget.h +53 -0
  159. data/ext/ffi_c/libffi/src/metag/sysv.S +311 -0
  160. data/ext/ffi_c/libffi/src/microblaze/ffi.c +321 -0
  161. data/ext/ffi_c/libffi/src/microblaze/ffitarget.h +53 -0
  162. data/ext/ffi_c/libffi/src/microblaze/sysv.S +302 -0
  163. data/ext/ffi_c/libffi/src/mips/ffi.c +1130 -0
  164. data/ext/ffi_c/libffi/src/mips/ffitarget.h +244 -0
  165. data/ext/ffi_c/libffi/src/mips/n32.S +663 -0
  166. data/ext/ffi_c/libffi/src/mips/o32.S +502 -0
  167. data/ext/ffi_c/libffi/src/moxie/eabi.S +101 -0
  168. data/ext/ffi_c/libffi/src/moxie/ffi.c +285 -0
  169. data/ext/ffi_c/libffi/src/moxie/ffitarget.h +52 -0
  170. data/ext/ffi_c/libffi/src/nios2/ffi.c +304 -0
  171. data/ext/ffi_c/libffi/src/nios2/ffitarget.h +52 -0
  172. data/ext/ffi_c/libffi/src/nios2/sysv.S +136 -0
  173. data/ext/ffi_c/libffi/src/or1k/ffi.c +328 -0
  174. data/ext/ffi_c/libffi/src/or1k/ffitarget.h +58 -0
  175. data/ext/ffi_c/libffi/src/or1k/sysv.S +107 -0
  176. data/ext/ffi_c/libffi/src/pa/ffi.c +719 -0
  177. data/ext/ffi_c/libffi/src/pa/ffitarget.h +85 -0
  178. data/ext/ffi_c/libffi/src/pa/hpux32.S +368 -0
  179. data/ext/ffi_c/libffi/src/pa/linux.S +357 -0
  180. data/ext/ffi_c/libffi/src/powerpc/aix.S +566 -0
  181. data/ext/ffi_c/libffi/src/powerpc/aix_closure.S +694 -0
  182. data/ext/ffi_c/libffi/src/powerpc/asm.h +125 -0
  183. data/ext/ffi_c/libffi/src/powerpc/darwin.S +378 -0
  184. data/ext/ffi_c/libffi/src/powerpc/darwin_closure.S +571 -0
  185. data/ext/ffi_c/libffi/src/powerpc/ffi.c +173 -0
  186. data/ext/ffi_c/libffi/src/powerpc/ffi_darwin.c +1440 -0
  187. data/ext/ffi_c/libffi/src/powerpc/ffi_linux64.c +974 -0
  188. data/ext/ffi_c/libffi/src/powerpc/ffi_powerpc.h +94 -0
  189. data/ext/ffi_c/libffi/src/powerpc/ffi_sysv.c +923 -0
  190. data/ext/ffi_c/libffi/src/powerpc/ffitarget.h +198 -0
  191. data/ext/ffi_c/libffi/src/powerpc/linux64.S +228 -0
  192. data/ext/ffi_c/libffi/src/powerpc/linux64_closure.S +488 -0
  193. data/ext/ffi_c/libffi/src/powerpc/ppc_closure.S +397 -0
  194. data/ext/ffi_c/libffi/src/powerpc/sysv.S +175 -0
  195. data/ext/ffi_c/libffi/src/prep_cif.c +261 -0
  196. data/ext/ffi_c/libffi/src/raw_api.c +267 -0
  197. data/ext/ffi_c/libffi/src/riscv/ffi.c +481 -0
  198. data/ext/ffi_c/libffi/src/riscv/ffitarget.h +69 -0
  199. data/ext/ffi_c/libffi/src/riscv/sysv.S +293 -0
  200. data/ext/ffi_c/libffi/src/s390/ffi.c +756 -0
  201. data/ext/ffi_c/libffi/src/s390/ffitarget.h +70 -0
  202. data/ext/ffi_c/libffi/src/s390/internal.h +11 -0
  203. data/ext/ffi_c/libffi/src/s390/sysv.S +325 -0
  204. data/ext/ffi_c/libffi/src/sh/ffi.c +717 -0
  205. data/ext/ffi_c/libffi/src/sh/ffitarget.h +54 -0
  206. data/ext/ffi_c/libffi/src/sh/sysv.S +850 -0
  207. data/ext/ffi_c/libffi/src/sh64/ffi.c +469 -0
  208. data/ext/ffi_c/libffi/src/sh64/ffitarget.h +58 -0
  209. data/ext/ffi_c/libffi/src/sh64/sysv.S +539 -0
  210. data/ext/ffi_c/libffi/src/sparc/ffi.c +468 -0
  211. data/ext/ffi_c/libffi/src/sparc/ffi64.c +608 -0
  212. data/ext/ffi_c/libffi/src/sparc/ffitarget.h +81 -0
  213. data/ext/ffi_c/libffi/src/sparc/internal.h +26 -0
  214. data/ext/ffi_c/libffi/src/sparc/v8.S +443 -0
  215. data/ext/ffi_c/libffi/src/sparc/v9.S +440 -0
  216. data/ext/ffi_c/libffi/src/tile/ffi.c +355 -0
  217. data/ext/ffi_c/libffi/src/tile/ffitarget.h +65 -0
  218. data/ext/ffi_c/libffi/src/tile/tile.S +360 -0
  219. data/ext/ffi_c/libffi/src/types.c +108 -0
  220. data/ext/ffi_c/libffi/src/vax/elfbsd.S +195 -0
  221. data/ext/ffi_c/libffi/src/vax/ffi.c +276 -0
  222. data/ext/ffi_c/libffi/src/vax/ffitarget.h +49 -0
  223. data/ext/ffi_c/libffi/src/x86/asmnames.h +30 -0
  224. data/ext/ffi_c/libffi/src/x86/ffi.c +754 -0
  225. data/ext/ffi_c/libffi/src/x86/ffi64.c +884 -0
  226. data/ext/ffi_c/libffi/src/x86/ffitarget.h +147 -0
  227. data/ext/ffi_c/libffi/src/x86/ffiw64.c +308 -0
  228. data/ext/ffi_c/libffi/src/x86/internal.h +29 -0
  229. data/ext/ffi_c/libffi/src/x86/internal64.h +22 -0
  230. data/ext/ffi_c/libffi/src/x86/sysv.S +1129 -0
  231. data/ext/ffi_c/libffi/src/x86/unix64.S +566 -0
  232. data/ext/ffi_c/libffi/src/x86/win64.S +232 -0
  233. data/ext/ffi_c/libffi/src/x86/win64_intel.S +237 -0
  234. data/ext/ffi_c/libffi/src/xtensa/ffi.c +298 -0
  235. data/ext/ffi_c/libffi/src/xtensa/ffitarget.h +53 -0
  236. data/ext/ffi_c/libffi/src/xtensa/sysv.S +258 -0
  237. data/ext/ffi_c/libffi/stamp-h.in +1 -0
  238. data/ext/ffi_c/libffi/testsuite/Makefile.am +117 -0
  239. data/ext/ffi_c/libffi/testsuite/config/default.exp +1 -0
  240. data/ext/ffi_c/libffi/testsuite/lib/libffi.exp +636 -0
  241. data/ext/ffi_c/libffi/testsuite/lib/target-libpath.exp +283 -0
  242. data/ext/ffi_c/libffi/testsuite/lib/wrapper.exp +45 -0
  243. data/ext/ffi_c/libffi/testsuite/libffi.bhaible/Makefile +28 -0
  244. data/ext/ffi_c/libffi/testsuite/libffi.bhaible/README +78 -0
  245. data/ext/ffi_c/libffi/testsuite/libffi.bhaible/alignof.h +50 -0
  246. data/ext/ffi_c/libffi/testsuite/libffi.bhaible/bhaible.exp +58 -0
  247. data/ext/ffi_c/libffi/testsuite/libffi.bhaible/test-call.c +1745 -0
  248. data/ext/ffi_c/libffi/testsuite/libffi.bhaible/test-callback.c +2885 -0
  249. data/ext/ffi_c/libffi/testsuite/libffi.bhaible/testcases.c +743 -0
  250. data/ext/ffi_c/libffi/testsuite/libffi.call/align_mixed.c +46 -0
  251. data/ext/ffi_c/libffi/testsuite/libffi.call/align_stdcall.c +46 -0
  252. data/ext/ffi_c/libffi/testsuite/libffi.call/call.exp +43 -0
  253. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn0.c +89 -0
  254. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn1.c +81 -0
  255. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn2.c +81 -0
  256. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn3.c +82 -0
  257. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn4.c +89 -0
  258. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn5.c +92 -0
  259. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn6.c +90 -0
  260. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_loc_fn0.c +95 -0
  261. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_simple.c +55 -0
  262. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_12byte.c +94 -0
  263. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_16byte.c +95 -0
  264. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_18byte.c +96 -0
  265. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_19byte.c +102 -0
  266. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_1_1byte.c +89 -0
  267. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_20byte.c +91 -0
  268. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_20byte1.c +93 -0
  269. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_24byte.c +113 -0
  270. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_2byte.c +90 -0
  271. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3_1byte.c +95 -0
  272. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3byte1.c +90 -0
  273. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3byte2.c +90 -0
  274. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3float.c +95 -0
  275. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_4_1byte.c +98 -0
  276. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_4byte.c +90 -0
  277. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_5_1_byte.c +109 -0
  278. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_5byte.c +98 -0
  279. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_64byte.c +124 -0
  280. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_6_1_byte.c +113 -0
  281. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_6byte.c +99 -0
  282. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_7_1_byte.c +117 -0
  283. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_7byte.c +97 -0
  284. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_8byte.c +88 -0
  285. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_9byte1.c +90 -0
  286. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_9byte2.c +91 -0
  287. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_double.c +93 -0
  288. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_float.c +91 -0
  289. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_longdouble.c +92 -0
  290. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_longdouble_split.c +132 -0
  291. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_longdouble_split2.c +115 -0
  292. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_pointer.c +95 -0
  293. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint16.c +91 -0
  294. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint32.c +91 -0
  295. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint64.c +92 -0
  296. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint16.c +91 -0
  297. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint32.c +91 -0
  298. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint64.c +93 -0
  299. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_dbls_struct.c +66 -0
  300. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_double.c +43 -0
  301. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_double_va.c +61 -0
  302. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_float.c +42 -0
  303. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_longdouble.c +105 -0
  304. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_longdouble_va.c +61 -0
  305. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_many_mixed_args.c +70 -0
  306. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_many_mixed_float_double.c +55 -0
  307. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_schar.c +74 -0
  308. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_sshort.c +74 -0
  309. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_sshortchar.c +86 -0
  310. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_uchar.c +91 -0
  311. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_ushort.c +74 -0
  312. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_ushortchar.c +86 -0
  313. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_pointer.c +74 -0
  314. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_pointer_stack.c +142 -0
  315. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_schar.c +44 -0
  316. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_sint.c +42 -0
  317. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_sshort.c +42 -0
  318. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_struct_va1.c +114 -0
  319. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_uchar.c +42 -0
  320. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_uchar_va.c +44 -0
  321. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_uint.c +43 -0
  322. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_uint_va.c +45 -0
  323. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ulong_va.c +45 -0
  324. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ulonglong.c +47 -0
  325. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ushort.c +43 -0
  326. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ushort_va.c +44 -0
  327. data/ext/ffi_c/libffi/testsuite/libffi.call/err_bad_abi.c +36 -0
  328. data/ext/ffi_c/libffi/testsuite/libffi.call/err_bad_typedef.c +26 -0
  329. data/ext/ffi_c/libffi/testsuite/libffi.call/ffitest.h +138 -0
  330. data/ext/ffi_c/libffi/testsuite/libffi.call/float.c +59 -0
  331. data/ext/ffi_c/libffi/testsuite/libffi.call/float1.c +60 -0
  332. data/ext/ffi_c/libffi/testsuite/libffi.call/float2.c +60 -0
  333. data/ext/ffi_c/libffi/testsuite/libffi.call/float3.c +74 -0
  334. data/ext/ffi_c/libffi/testsuite/libffi.call/float4.c +62 -0
  335. data/ext/ffi_c/libffi/testsuite/libffi.call/float_va.c +107 -0
  336. data/ext/ffi_c/libffi/testsuite/libffi.call/huge_struct.c +341 -0
  337. data/ext/ffi_c/libffi/testsuite/libffi.call/many.c +59 -0
  338. data/ext/ffi_c/libffi/testsuite/libffi.call/many2.c +57 -0
  339. data/ext/ffi_c/libffi/testsuite/libffi.call/many_double.c +70 -0
  340. data/ext/ffi_c/libffi/testsuite/libffi.call/many_mixed.c +78 -0
  341. data/ext/ffi_c/libffi/testsuite/libffi.call/negint.c +52 -0
  342. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct.c +152 -0
  343. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct1.c +161 -0
  344. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct10.c +134 -0
  345. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct11.c +121 -0
  346. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct2.c +110 -0
  347. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct3.c +111 -0
  348. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct4.c +111 -0
  349. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct5.c +112 -0
  350. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct6.c +131 -0
  351. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct7.c +111 -0
  352. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct8.c +131 -0
  353. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct9.c +131 -0
  354. data/ext/ffi_c/libffi/testsuite/libffi.call/offsets.c +46 -0
  355. data/ext/ffi_c/libffi/testsuite/libffi.call/pr1172638.c +127 -0
  356. data/ext/ffi_c/libffi/testsuite/libffi.call/problem1.c +90 -0
  357. data/ext/ffi_c/libffi/testsuite/libffi.call/promotion.c +59 -0
  358. data/ext/ffi_c/libffi/testsuite/libffi.call/pyobjc-tc.c +114 -0
  359. data/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl.c +36 -0
  360. data/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl1.c +43 -0
  361. data/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl2.c +42 -0
  362. data/ext/ffi_c/libffi/testsuite/libffi.call/return_fl.c +35 -0
  363. data/ext/ffi_c/libffi/testsuite/libffi.call/return_fl1.c +36 -0
  364. data/ext/ffi_c/libffi/testsuite/libffi.call/return_fl2.c +49 -0
  365. data/ext/ffi_c/libffi/testsuite/libffi.call/return_fl3.c +42 -0
  366. data/ext/ffi_c/libffi/testsuite/libffi.call/return_ldl.c +34 -0
  367. data/ext/ffi_c/libffi/testsuite/libffi.call/return_ll.c +41 -0
  368. data/ext/ffi_c/libffi/testsuite/libffi.call/return_ll1.c +43 -0
  369. data/ext/ffi_c/libffi/testsuite/libffi.call/return_sc.c +36 -0
  370. data/ext/ffi_c/libffi/testsuite/libffi.call/return_sl.c +38 -0
  371. data/ext/ffi_c/libffi/testsuite/libffi.call/return_uc.c +38 -0
  372. data/ext/ffi_c/libffi/testsuite/libffi.call/return_ul.c +38 -0
  373. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_large.c +145 -0
  374. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_large2.c +148 -0
  375. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_medium.c +124 -0
  376. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_medium2.c +125 -0
  377. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen.c +44 -0
  378. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen2.c +49 -0
  379. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen3.c +49 -0
  380. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen4.c +55 -0
  381. data/ext/ffi_c/libffi/testsuite/libffi.call/struct1.c +67 -0
  382. data/ext/ffi_c/libffi/testsuite/libffi.call/struct10.c +57 -0
  383. data/ext/ffi_c/libffi/testsuite/libffi.call/struct2.c +67 -0
  384. data/ext/ffi_c/libffi/testsuite/libffi.call/struct3.c +60 -0
  385. data/ext/ffi_c/libffi/testsuite/libffi.call/struct4.c +64 -0
  386. data/ext/ffi_c/libffi/testsuite/libffi.call/struct5.c +66 -0
  387. data/ext/ffi_c/libffi/testsuite/libffi.call/struct6.c +64 -0
  388. data/ext/ffi_c/libffi/testsuite/libffi.call/struct7.c +74 -0
  389. data/ext/ffi_c/libffi/testsuite/libffi.call/struct8.c +81 -0
  390. data/ext/ffi_c/libffi/testsuite/libffi.call/struct9.c +68 -0
  391. data/ext/ffi_c/libffi/testsuite/libffi.call/testclosure.c +70 -0
  392. data/ext/ffi_c/libffi/testsuite/libffi.call/uninitialized.c +61 -0
  393. data/ext/ffi_c/libffi/testsuite/libffi.call/unwindtest.cc +117 -0
  394. data/ext/ffi_c/libffi/testsuite/libffi.call/unwindtest_ffi_call.cc +54 -0
  395. data/ext/ffi_c/libffi/testsuite/libffi.call/va_1.c +196 -0
  396. data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct1.c +121 -0
  397. data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct2.c +123 -0
  398. data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct3.c +125 -0
  399. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex.inc +91 -0
  400. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_double.c +10 -0
  401. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_float.c +10 -0
  402. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_longdouble.c +10 -0
  403. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex.inc +42 -0
  404. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_double.c +10 -0
  405. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_float.c +10 -0
  406. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_longdouble.c +10 -0
  407. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct.inc +71 -0
  408. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_double.c +10 -0
  409. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_float.c +10 -0
  410. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_longdouble.c +10 -0
  411. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va.inc +80 -0
  412. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_double.c +10 -0
  413. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_float.c +16 -0
  414. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_longdouble.c +10 -0
  415. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex.exp +36 -0
  416. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex.inc +51 -0
  417. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_double.inc +7 -0
  418. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_float.inc +7 -0
  419. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_longdouble.inc +7 -0
  420. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_double.c +10 -0
  421. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_float.c +10 -0
  422. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_int.c +86 -0
  423. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_longdouble.c +10 -0
  424. data/ext/ffi_c/libffi/testsuite/libffi.complex/ffitest.h +1 -0
  425. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex.inc +78 -0
  426. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_double.c +10 -0
  427. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_float.c +10 -0
  428. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_longdouble.c +10 -0
  429. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex.inc +37 -0
  430. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1.inc +41 -0
  431. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_double.c +10 -0
  432. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_float.c +10 -0
  433. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_longdouble.c +10 -0
  434. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2.inc +44 -0
  435. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_double.c +10 -0
  436. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_float.c +10 -0
  437. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_longdouble.c +10 -0
  438. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_double.c +10 -0
  439. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_float.c +10 -0
  440. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_longdouble.c +10 -0
  441. data/ext/ffi_c/libffi/testsuite/libffi.go/aa-direct.c +34 -0
  442. data/ext/ffi_c/libffi/testsuite/libffi.go/closure1.c +28 -0
  443. data/ext/ffi_c/libffi/testsuite/libffi.go/ffitest.h +1 -0
  444. data/ext/ffi_c/libffi/testsuite/libffi.go/go.exp +36 -0
  445. data/ext/ffi_c/libffi/testsuite/libffi.go/static-chain.h +19 -0
  446. data/ext/ffi_c/rbffi.h +55 -0
  447. data/ext/ffi_c/rbffi_endian.h +59 -0
  448. data/ext/ffi_c/win32/stdbool.h +8 -0
  449. data/ext/ffi_c/win32/stdint.h +201 -0
  450. data/ffi.gemspec +43 -0
  451. data/lib/ffi.rb +20 -0
  452. data/lib/ffi/autopointer.rb +203 -0
  453. data/lib/ffi/buffer.rb +4 -0
  454. data/lib/ffi/callback.rb +4 -0
  455. data/lib/ffi/data_converter.rb +67 -0
  456. data/lib/ffi/enum.rb +296 -0
  457. data/lib/ffi/errno.rb +43 -0
  458. data/lib/ffi/ffi.rb +45 -0
  459. data/lib/ffi/io.rb +62 -0
  460. data/lib/ffi/library.rb +588 -0
  461. data/lib/ffi/managedstruct.rb +84 -0
  462. data/lib/ffi/memorypointer.rb +1 -0
  463. data/lib/ffi/platform.rb +172 -0
  464. data/lib/ffi/platform/aarch64-freebsd/types.conf +128 -0
  465. data/lib/ffi/platform/aarch64-freebsd12/types.conf +128 -0
  466. data/lib/ffi/platform/aarch64-linux/types.conf +104 -0
  467. data/lib/ffi/platform/arm-freebsd/types.conf +152 -0
  468. data/lib/ffi/platform/arm-freebsd12/types.conf +152 -0
  469. data/lib/ffi/platform/arm-linux/types.conf +104 -0
  470. data/lib/ffi/platform/i386-cygwin/types.conf +3 -0
  471. data/lib/ffi/platform/i386-darwin/types.conf +100 -0
  472. data/lib/ffi/platform/i386-freebsd/types.conf +152 -0
  473. data/lib/ffi/platform/i386-freebsd12/types.conf +152 -0
  474. data/lib/ffi/platform/i386-gnu/types.conf +107 -0
  475. data/lib/ffi/platform/i386-linux/types.conf +103 -0
  476. data/lib/ffi/platform/i386-netbsd/types.conf +126 -0
  477. data/lib/ffi/platform/i386-openbsd/types.conf +128 -0
  478. data/lib/ffi/platform/i386-solaris/types.conf +122 -0
  479. data/lib/ffi/platform/i386-windows/types.conf +105 -0
  480. data/lib/ffi/platform/ia64-linux/types.conf +104 -0
  481. data/lib/ffi/platform/mips-linux/types.conf +102 -0
  482. data/lib/ffi/platform/mips64-linux/types.conf +104 -0
  483. data/lib/ffi/platform/mips64el-linux/types.conf +104 -0
  484. data/lib/ffi/platform/mipsel-linux/types.conf +102 -0
  485. data/lib/ffi/platform/mipsisa32r6-linux/types.conf +102 -0
  486. data/lib/ffi/platform/mipsisa32r6el-linux/types.conf +102 -0
  487. data/lib/ffi/platform/mipsisa64r6-linux/types.conf +104 -0
  488. data/lib/ffi/platform/mipsisa64r6el-linux/types.conf +104 -0
  489. data/lib/ffi/platform/powerpc-aix/types.conf +180 -0
  490. data/lib/ffi/platform/powerpc-darwin/types.conf +100 -0
  491. data/lib/ffi/platform/powerpc-linux/types.conf +100 -0
  492. data/lib/ffi/platform/powerpc64-linux/types.conf +104 -0
  493. data/lib/ffi/platform/s390-linux/types.conf +102 -0
  494. data/lib/ffi/platform/s390x-linux/types.conf +102 -0
  495. data/lib/ffi/platform/sparc-linux/types.conf +102 -0
  496. data/lib/ffi/platform/sparc-solaris/types.conf +128 -0
  497. data/lib/ffi/platform/sparc64-linux/types.conf +102 -0
  498. data/lib/ffi/platform/sparcv9-solaris/types.conf +128 -0
  499. data/lib/ffi/platform/x86_64-cygwin/types.conf +3 -0
  500. data/lib/ffi/platform/x86_64-darwin/types.conf +126 -0
  501. data/lib/ffi/platform/x86_64-freebsd/types.conf +128 -0
  502. data/lib/ffi/platform/x86_64-freebsd12/types.conf +128 -0
  503. data/lib/ffi/platform/x86_64-linux/types.conf +102 -0
  504. data/lib/ffi/platform/x86_64-netbsd/types.conf +128 -0
  505. data/lib/ffi/platform/x86_64-openbsd/types.conf +134 -0
  506. data/lib/ffi/platform/x86_64-solaris/types.conf +122 -0
  507. data/lib/ffi/platform/x86_64-windows/types.conf +120 -0
  508. data/lib/ffi/pointer.rb +160 -0
  509. data/lib/ffi/struct.rb +311 -0
  510. data/lib/ffi/struct_by_reference.rb +72 -0
  511. data/lib/ffi/struct_layout.rb +96 -0
  512. data/lib/ffi/struct_layout_builder.rb +227 -0
  513. data/lib/ffi/tools/const_generator.rb +230 -0
  514. data/lib/ffi/tools/generator.rb +105 -0
  515. data/lib/ffi/tools/generator_task.rb +32 -0
  516. data/lib/ffi/tools/struct_generator.rb +194 -0
  517. data/lib/ffi/tools/types_generator.rb +134 -0
  518. data/lib/ffi/types.rb +194 -0
  519. data/lib/ffi/union.rb +43 -0
  520. data/lib/ffi/variadic.rb +78 -0
  521. data/lib/ffi/version.rb +3 -0
  522. data/samples/getlogin.rb +8 -0
  523. data/samples/getpid.rb +8 -0
  524. data/samples/gettimeofday.rb +18 -0
  525. data/samples/hello.rb +7 -0
  526. data/samples/inotify.rb +60 -0
  527. data/samples/pty.rb +76 -0
  528. data/samples/qsort.rb +21 -0
  529. data/samples/sample_helper.rb +6 -0
  530. metadata +663 -0
@@ -0,0 +1,198 @@
1
+ /* -----------------------------------------------------------------*-C-*-
2
+ ffitarget.h - Copyright (c) 2012 Anthony Green
3
+ Copyright (C) 2007, 2008, 2010 Free Software Foundation, Inc
4
+ Copyright (c) 1996-2003 Red Hat, Inc.
5
+
6
+ Target configuration macros for PowerPC.
7
+
8
+ Permission is hereby granted, free of charge, to any person obtaining
9
+ a copy of this software and associated documentation files (the
10
+ ``Software''), to deal in the Software without restriction, including
11
+ without limitation the rights to use, copy, modify, merge, publish,
12
+ distribute, sublicense, and/or sell copies of the Software, and to
13
+ permit persons to whom the Software is furnished to do so, subject to
14
+ the following conditions:
15
+
16
+ The above copyright notice and this permission notice shall be included
17
+ in all copies or substantial portions of the Software.
18
+
19
+ THE SOFTWARE IS PROVIDED ``AS IS'', WITHOUT WARRANTY OF ANY KIND,
20
+ EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
21
+ MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
22
+ NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
23
+ HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
24
+ WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
25
+ OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
26
+ DEALINGS IN THE SOFTWARE.
27
+
28
+ ----------------------------------------------------------------------- */
29
+
30
+ #ifndef LIBFFI_TARGET_H
31
+ #define LIBFFI_TARGET_H
32
+
33
+ #ifndef LIBFFI_H
34
+ #error "Please do not include ffitarget.h directly into your source. Use ffi.h instead."
35
+ #endif
36
+
37
+ /* ---- System specific configurations ----------------------------------- */
38
+
39
+ #if defined (POWERPC) && defined (__powerpc64__) /* linux64 */
40
+ #ifndef POWERPC64
41
+ #define POWERPC64
42
+ #endif
43
+ #elif defined (POWERPC_DARWIN) && defined (__ppc64__) /* Darwin64 */
44
+ #ifndef POWERPC64
45
+ #define POWERPC64
46
+ #endif
47
+ #ifndef POWERPC_DARWIN64
48
+ #define POWERPC_DARWIN64
49
+ #endif
50
+ #elif defined (POWERPC_AIX) && defined (__64BIT__) /* AIX64 */
51
+ #ifndef POWERPC64
52
+ #define POWERPC64
53
+ #endif
54
+ #endif
55
+
56
+ #ifndef LIBFFI_ASM
57
+ typedef unsigned long ffi_arg;
58
+ typedef signed long ffi_sarg;
59
+
60
+ typedef enum ffi_abi {
61
+ FFI_FIRST_ABI = 0,
62
+
63
+ #if defined (POWERPC_AIX)
64
+ FFI_AIX,
65
+ FFI_DARWIN,
66
+ FFI_DEFAULT_ABI = FFI_AIX,
67
+ FFI_LAST_ABI
68
+
69
+ #elif defined (POWERPC_DARWIN)
70
+ FFI_AIX,
71
+ FFI_DARWIN,
72
+ FFI_DEFAULT_ABI = FFI_DARWIN,
73
+ FFI_LAST_ABI
74
+
75
+ #else
76
+ /* The FFI_COMPAT values are used by old code. Since libffi may be
77
+ a shared library we have to support old values for backwards
78
+ compatibility. */
79
+ FFI_COMPAT_SYSV,
80
+ FFI_COMPAT_GCC_SYSV,
81
+ FFI_COMPAT_LINUX64,
82
+ FFI_COMPAT_LINUX,
83
+ FFI_COMPAT_LINUX_SOFT_FLOAT,
84
+
85
+ # if defined (POWERPC64)
86
+ /* This bit, always set in new code, must not be set in any of the
87
+ old FFI_COMPAT values that might be used for 64-bit linux. We
88
+ only need worry about FFI_COMPAT_LINUX64, but to be safe avoid
89
+ all old values. */
90
+ FFI_LINUX = 8,
91
+ /* This and following bits can reuse FFI_COMPAT values. */
92
+ FFI_LINUX_STRUCT_ALIGN = 1,
93
+ FFI_LINUX_LONG_DOUBLE_128 = 2,
94
+ FFI_DEFAULT_ABI = (FFI_LINUX
95
+ # ifdef __STRUCT_PARM_ALIGN__
96
+ | FFI_LINUX_STRUCT_ALIGN
97
+ # endif
98
+ # ifdef __LONG_DOUBLE_128__
99
+ | FFI_LINUX_LONG_DOUBLE_128
100
+ # endif
101
+ ),
102
+ FFI_LAST_ABI = 12
103
+
104
+ # else
105
+ /* This bit, always set in new code, must not be set in any of the
106
+ old FFI_COMPAT values that might be used for 32-bit linux/sysv/bsd. */
107
+ FFI_SYSV = 8,
108
+ /* This and following bits can reuse FFI_COMPAT values. */
109
+ FFI_SYSV_SOFT_FLOAT = 1,
110
+ FFI_SYSV_STRUCT_RET = 2,
111
+ FFI_SYSV_IBM_LONG_DOUBLE = 4,
112
+ FFI_SYSV_LONG_DOUBLE_128 = 16,
113
+
114
+ FFI_DEFAULT_ABI = (FFI_SYSV
115
+ # ifdef __NO_FPRS__
116
+ | FFI_SYSV_SOFT_FLOAT
117
+ # endif
118
+ # if (defined (__SVR4_STRUCT_RETURN) \
119
+ || defined (POWERPC_FREEBSD) && !defined (__AIX_STRUCT_RETURN))
120
+ | FFI_SYSV_STRUCT_RET
121
+ # endif
122
+ # if __LDBL_MANT_DIG__ == 106
123
+ | FFI_SYSV_IBM_LONG_DOUBLE
124
+ # endif
125
+ # ifdef __LONG_DOUBLE_128__
126
+ | FFI_SYSV_LONG_DOUBLE_128
127
+ # endif
128
+ ),
129
+ FFI_LAST_ABI = 32
130
+ # endif
131
+ #endif
132
+
133
+ } ffi_abi;
134
+ #endif
135
+
136
+ /* ---- Definitions for closures ----------------------------------------- */
137
+
138
+ #define FFI_CLOSURES 1
139
+ #define FFI_NATIVE_RAW_API 0
140
+ #if defined (POWERPC) || defined (POWERPC_FREEBSD)
141
+ # define FFI_GO_CLOSURES 1
142
+ # define FFI_TARGET_SPECIFIC_VARIADIC 1
143
+ # define FFI_EXTRA_CIF_FIELDS unsigned nfixedargs
144
+ #endif
145
+ #if defined (POWERPC_AIX)
146
+ # define FFI_GO_CLOSURES 1
147
+ #endif
148
+
149
+ /* ppc_closure.S and linux64_closure.S expect this. */
150
+ #define FFI_PPC_TYPE_LAST FFI_TYPE_POINTER
151
+
152
+ /* We define additional types below. If generic types are added that
153
+ must be supported by powerpc libffi then it is likely that
154
+ FFI_PPC_TYPE_LAST needs increasing *and* the jump tables in
155
+ ppc_closure.S and linux64_closure.S be extended. */
156
+
157
+ #if !(FFI_TYPE_LAST == FFI_PPC_TYPE_LAST \
158
+ || (FFI_TYPE_LAST == FFI_TYPE_COMPLEX \
159
+ && !defined FFI_TARGET_HAS_COMPLEX_TYPE))
160
+ # error "You likely have a broken powerpc libffi"
161
+ #endif
162
+
163
+ /* Needed for soft-float long-double-128 support. */
164
+ #define FFI_TYPE_UINT128 (FFI_PPC_TYPE_LAST + 1)
165
+
166
+ /* Needed for FFI_SYSV small structure returns. */
167
+ #define FFI_SYSV_TYPE_SMALL_STRUCT (FFI_PPC_TYPE_LAST + 2)
168
+
169
+ /* Used by ELFv2 for homogenous structure returns. */
170
+ #define FFI_V2_TYPE_FLOAT_HOMOG (FFI_PPC_TYPE_LAST + 1)
171
+ #define FFI_V2_TYPE_DOUBLE_HOMOG (FFI_PPC_TYPE_LAST + 2)
172
+ #define FFI_V2_TYPE_SMALL_STRUCT (FFI_PPC_TYPE_LAST + 3)
173
+
174
+ #if _CALL_ELF == 2
175
+ # define FFI_TRAMPOLINE_SIZE 32
176
+ #else
177
+ # if defined(POWERPC64) || defined(POWERPC_AIX)
178
+ # if defined(POWERPC_DARWIN64)
179
+ # define FFI_TRAMPOLINE_SIZE 48
180
+ # else
181
+ # define FFI_TRAMPOLINE_SIZE 24
182
+ # endif
183
+ # else /* POWERPC || POWERPC_AIX */
184
+ # define FFI_TRAMPOLINE_SIZE 40
185
+ # endif
186
+ #endif
187
+
188
+ #ifndef LIBFFI_ASM
189
+ #if defined(POWERPC_DARWIN) || defined(POWERPC_AIX)
190
+ struct ffi_aix_trampoline_struct {
191
+ void * code_pointer; /* Pointer to ffi_closure_ASM */
192
+ void * toc; /* TOC */
193
+ void * static_chain; /* Pointer to closure */
194
+ };
195
+ #endif
196
+ #endif
197
+
198
+ #endif
@@ -0,0 +1,228 @@
1
+ /* -----------------------------------------------------------------------
2
+ sysv.h - Copyright (c) 2003 Jakub Jelinek <jakub@redhat.com>
3
+ Copyright (c) 2008 Red Hat, Inc.
4
+
5
+ PowerPC64 Assembly glue.
6
+
7
+ Permission is hereby granted, free of charge, to any person obtaining
8
+ a copy of this software and associated documentation files (the
9
+ ``Software''), to deal in the Software without restriction, including
10
+ without limitation the rights to use, copy, modify, merge, publish,
11
+ distribute, sublicense, and/or sell copies of the Software, and to
12
+ permit persons to whom the Software is furnished to do so, subject to
13
+ the following conditions:
14
+
15
+ The above copyright notice and this permission notice shall be included
16
+ in all copies or substantial portions of the Software.
17
+
18
+ THE SOFTWARE IS PROVIDED ``AS IS'', WITHOUT WARRANTY OF ANY KIND,
19
+ EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
20
+ MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
21
+ NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
22
+ HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
23
+ WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
24
+ OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
25
+ DEALINGS IN THE SOFTWARE.
26
+ ----------------------------------------------------------------------- */
27
+
28
+ #define LIBFFI_ASM
29
+ #include <fficonfig.h>
30
+ #include <ffi.h>
31
+
32
+ #ifdef POWERPC64
33
+ .hidden ffi_call_LINUX64
34
+ .globl ffi_call_LINUX64
35
+ .text
36
+ .cfi_startproc
37
+ # if _CALL_ELF == 2
38
+ ffi_call_LINUX64:
39
+ addis %r2, %r12, .TOC.-ffi_call_LINUX64@ha
40
+ addi %r2, %r2, .TOC.-ffi_call_LINUX64@l
41
+ .localentry ffi_call_LINUX64, . - ffi_call_LINUX64
42
+ # else
43
+ .section ".opd","aw"
44
+ .align 3
45
+ ffi_call_LINUX64:
46
+ # ifdef _CALL_LINUX
47
+ .quad .L.ffi_call_LINUX64,.TOC.@tocbase,0
48
+ .type ffi_call_LINUX64,@function
49
+ .text
50
+ .L.ffi_call_LINUX64:
51
+ # else
52
+ .hidden .ffi_call_LINUX64
53
+ .globl .ffi_call_LINUX64
54
+ .quad .ffi_call_LINUX64,.TOC.@tocbase,0
55
+ .size ffi_call_LINUX64,24
56
+ .type .ffi_call_LINUX64,@function
57
+ .text
58
+ .ffi_call_LINUX64:
59
+ # endif
60
+ # endif
61
+ mflr %r0
62
+ std %r28, -32(%r1)
63
+ std %r29, -24(%r1)
64
+ std %r30, -16(%r1)
65
+ std %r31, -8(%r1)
66
+ std %r7, 8(%r1) /* closure, saved in cr field. */
67
+ std %r0, 16(%r1)
68
+
69
+ mr %r28, %r1 /* our AP. */
70
+ .cfi_def_cfa_register 28
71
+ .cfi_offset 65, 16
72
+ .cfi_offset 31, -8
73
+ .cfi_offset 30, -16
74
+ .cfi_offset 29, -24
75
+ .cfi_offset 28, -32
76
+
77
+ stdux %r1, %r1, %r8
78
+ mr %r31, %r6 /* flags, */
79
+ mr %r30, %r5 /* rvalue, */
80
+ mr %r29, %r4 /* function address. */
81
+ /* Save toc pointer, not for the ffi_prep_args64 call, but for the later
82
+ bctrl function call. */
83
+ # if _CALL_ELF == 2
84
+ std %r2, 24(%r1)
85
+ # else
86
+ std %r2, 40(%r1)
87
+ # endif
88
+
89
+ /* Call ffi_prep_args64. */
90
+ mr %r4, %r1
91
+ # if defined _CALL_LINUX || _CALL_ELF == 2
92
+ bl ffi_prep_args64
93
+ # else
94
+ bl .ffi_prep_args64
95
+ # endif
96
+
97
+ # if _CALL_ELF == 2
98
+ mr %r12, %r29
99
+ # else
100
+ ld %r12, 0(%r29)
101
+ ld %r2, 8(%r29)
102
+ # endif
103
+ /* Now do the call. */
104
+ /* Set up cr1 with bits 4-7 of the flags. */
105
+ mtcrf 0x40, %r31
106
+
107
+ /* Get the address to call into CTR. */
108
+ mtctr %r12
109
+ /* Load all those argument registers. */
110
+ ld %r3, -32-(8*8)(%r28)
111
+ ld %r4, -32-(7*8)(%r28)
112
+ ld %r5, -32-(6*8)(%r28)
113
+ ld %r6, -32-(5*8)(%r28)
114
+ bf- 5, 1f
115
+ ld %r7, -32-(4*8)(%r28)
116
+ ld %r8, -32-(3*8)(%r28)
117
+ ld %r9, -32-(2*8)(%r28)
118
+ ld %r10, -32-(1*8)(%r28)
119
+ 1:
120
+
121
+ /* Load all the FP registers. */
122
+ bf- 6, 2f
123
+ lfd %f1, -32-(21*8)(%r28)
124
+ lfd %f2, -32-(20*8)(%r28)
125
+ lfd %f3, -32-(19*8)(%r28)
126
+ lfd %f4, -32-(18*8)(%r28)
127
+ lfd %f5, -32-(17*8)(%r28)
128
+ lfd %f6, -32-(16*8)(%r28)
129
+ lfd %f7, -32-(15*8)(%r28)
130
+ lfd %f8, -32-(14*8)(%r28)
131
+ lfd %f9, -32-(13*8)(%r28)
132
+ lfd %f10, -32-(12*8)(%r28)
133
+ lfd %f11, -32-(11*8)(%r28)
134
+ lfd %f12, -32-(10*8)(%r28)
135
+ lfd %f13, -32-(9*8)(%r28)
136
+ 2:
137
+
138
+ /* Make the call. */
139
+ ld %r11, 8(%r28)
140
+ bctrl
141
+
142
+ /* This must follow the call immediately, the unwinder
143
+ uses this to find out if r2 has been saved or not. */
144
+ # if _CALL_ELF == 2
145
+ ld %r2, 24(%r1)
146
+ # else
147
+ ld %r2, 40(%r1)
148
+ # endif
149
+
150
+ /* Now, deal with the return value. */
151
+ mtcrf 0x01, %r31
152
+ bt 31, .Lstruct_return_value
153
+ bt 30, .Ldone_return_value
154
+ bt 29, .Lfp_return_value
155
+ std %r3, 0(%r30)
156
+ /* Fall through... */
157
+
158
+ .Ldone_return_value:
159
+ /* Restore the registers we used and return. */
160
+ mr %r1, %r28
161
+ .cfi_def_cfa_register 1
162
+ ld %r0, 16(%r28)
163
+ ld %r28, -32(%r28)
164
+ mtlr %r0
165
+ ld %r29, -24(%r1)
166
+ ld %r30, -16(%r1)
167
+ ld %r31, -8(%r1)
168
+ blr
169
+
170
+ .Lfp_return_value:
171
+ .cfi_def_cfa_register 28
172
+ bf 28, .Lfloat_return_value
173
+ stfd %f1, 0(%r30)
174
+ mtcrf 0x02, %r31 /* cr6 */
175
+ bf 27, .Ldone_return_value
176
+ stfd %f2, 8(%r30)
177
+ b .Ldone_return_value
178
+ .Lfloat_return_value:
179
+ stfs %f1, 0(%r30)
180
+ b .Ldone_return_value
181
+
182
+ .Lstruct_return_value:
183
+ bf 29, .Lsmall_struct
184
+ bf 28, .Lfloat_homog_return_value
185
+ stfd %f1, 0(%r30)
186
+ stfd %f2, 8(%r30)
187
+ stfd %f3, 16(%r30)
188
+ stfd %f4, 24(%r30)
189
+ stfd %f5, 32(%r30)
190
+ stfd %f6, 40(%r30)
191
+ stfd %f7, 48(%r30)
192
+ stfd %f8, 56(%r30)
193
+ b .Ldone_return_value
194
+
195
+ .Lfloat_homog_return_value:
196
+ stfs %f1, 0(%r30)
197
+ stfs %f2, 4(%r30)
198
+ stfs %f3, 8(%r30)
199
+ stfs %f4, 12(%r30)
200
+ stfs %f5, 16(%r30)
201
+ stfs %f6, 20(%r30)
202
+ stfs %f7, 24(%r30)
203
+ stfs %f8, 28(%r30)
204
+ b .Ldone_return_value
205
+
206
+ .Lsmall_struct:
207
+ std %r3, 0(%r30)
208
+ std %r4, 8(%r30)
209
+ b .Ldone_return_value
210
+
211
+ .cfi_endproc
212
+ # if _CALL_ELF == 2
213
+ .size ffi_call_LINUX64,.-ffi_call_LINUX64
214
+ # else
215
+ # ifdef _CALL_LINUX
216
+ .size ffi_call_LINUX64,.-.L.ffi_call_LINUX64
217
+ # else
218
+ .long 0
219
+ .byte 0,12,0,1,128,4,0,0
220
+ .size .ffi_call_LINUX64,.-.ffi_call_LINUX64
221
+ # endif
222
+ # endif
223
+
224
+ #endif
225
+
226
+ #if (defined __ELF__ && defined __linux__) || _CALL_ELF == 2
227
+ .section .note.GNU-stack,"",@progbits
228
+ #endif
@@ -0,0 +1,488 @@
1
+ /* -----------------------------------------------------------------------
2
+ sysv.h - Copyright (c) 2003 Jakub Jelinek <jakub@redhat.com>
3
+ Copyright (c) 2008 Red Hat, Inc.
4
+
5
+ PowerPC64 Assembly glue.
6
+
7
+ Permission is hereby granted, free of charge, to any person obtaining
8
+ a copy of this software and associated documentation files (the
9
+ ``Software''), to deal in the Software without restriction, including
10
+ without limitation the rights to use, copy, modify, merge, publish,
11
+ distribute, sublicense, and/or sell copies of the Software, and to
12
+ permit persons to whom the Software is furnished to do so, subject to
13
+ the following conditions:
14
+
15
+ The above copyright notice and this permission notice shall be included
16
+ in all copies or substantial portions of the Software.
17
+
18
+ THE SOFTWARE IS PROVIDED ``AS IS'', WITHOUT WARRANTY OF ANY KIND,
19
+ EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
20
+ MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
21
+ NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
22
+ HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
23
+ WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
24
+ OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
25
+ DEALINGS IN THE SOFTWARE.
26
+ ----------------------------------------------------------------------- */
27
+ #define LIBFFI_ASM
28
+ #include <fficonfig.h>
29
+ #include <ffi.h>
30
+
31
+ .file "linux64_closure.S"
32
+
33
+ #ifdef POWERPC64
34
+ FFI_HIDDEN (ffi_closure_LINUX64)
35
+ .globl ffi_closure_LINUX64
36
+ .text
37
+ .cfi_startproc
38
+ # if _CALL_ELF == 2
39
+ ffi_closure_LINUX64:
40
+ addis %r2, %r12, .TOC.-ffi_closure_LINUX64@ha
41
+ addi %r2, %r2, .TOC.-ffi_closure_LINUX64@l
42
+ .localentry ffi_closure_LINUX64, . - ffi_closure_LINUX64
43
+ # else
44
+ .section ".opd","aw"
45
+ .align 3
46
+ ffi_closure_LINUX64:
47
+ # ifdef _CALL_LINUX
48
+ .quad .L.ffi_closure_LINUX64,.TOC.@tocbase,0
49
+ .type ffi_closure_LINUX64,@function
50
+ .text
51
+ .L.ffi_closure_LINUX64:
52
+ # else
53
+ FFI_HIDDEN (.ffi_closure_LINUX64)
54
+ .globl .ffi_closure_LINUX64
55
+ .quad .ffi_closure_LINUX64,.TOC.@tocbase,0
56
+ .size ffi_closure_LINUX64,24
57
+ .type .ffi_closure_LINUX64,@function
58
+ .text
59
+ .ffi_closure_LINUX64:
60
+ # endif
61
+ # endif
62
+
63
+ # if _CALL_ELF == 2
64
+ # 32 byte special reg save area + 64 byte parm save area
65
+ # + 64 byte retval area + 13*8 fpr save area + round to 16
66
+ # define STACKFRAME 272
67
+ # define PARMSAVE 32
68
+ # define RETVAL PARMSAVE+64
69
+ # else
70
+ # 48 bytes special reg save area + 64 bytes parm save area
71
+ # + 16 bytes retval area + 13*8 bytes fpr save area + round to 16
72
+ # define STACKFRAME 240
73
+ # define PARMSAVE 48
74
+ # define RETVAL PARMSAVE+64
75
+ # endif
76
+
77
+ # if _CALL_ELF == 2
78
+ ld %r12, FFI_TRAMPOLINE_SIZE(%r11) # closure->cif
79
+ mflr %r0
80
+ lwz %r12, 28(%r12) # cif->flags
81
+ mtcrf 0x40, %r12
82
+ addi %r12, %r1, PARMSAVE
83
+ bt 7, 0f
84
+ # Our caller has not allocated a parameter save area.
85
+ # We need to allocate one here and use it to pass gprs to
86
+ # ffi_closure_helper_LINUX64.
87
+ addi %r12, %r1, -STACKFRAME+PARMSAVE
88
+ 0:
89
+ # Save general regs into parm save area
90
+ std %r3, 0(%r12)
91
+ std %r4, 8(%r12)
92
+ std %r5, 16(%r12)
93
+ std %r6, 24(%r12)
94
+ std %r7, 32(%r12)
95
+ std %r8, 40(%r12)
96
+ std %r9, 48(%r12)
97
+ std %r10, 56(%r12)
98
+
99
+ # load up the pointer to the parm save area
100
+ mr %r7, %r12
101
+ # else
102
+ # copy r2 to r11 and load TOC into r2
103
+ mr %r11, %r2
104
+ ld %r2, 16(%r2)
105
+
106
+ mflr %r0
107
+ # Save general regs into parm save area
108
+ # This is the parameter save area set up by our caller.
109
+ std %r3, PARMSAVE+0(%r1)
110
+ std %r4, PARMSAVE+8(%r1)
111
+ std %r5, PARMSAVE+16(%r1)
112
+ std %r6, PARMSAVE+24(%r1)
113
+ std %r7, PARMSAVE+32(%r1)
114
+ std %r8, PARMSAVE+40(%r1)
115
+ std %r9, PARMSAVE+48(%r1)
116
+ std %r10, PARMSAVE+56(%r1)
117
+
118
+ # load up the pointer to the parm save area
119
+ addi %r7, %r1, PARMSAVE
120
+ # endif
121
+ std %r0, 16(%r1)
122
+
123
+ # closure->cif
124
+ ld %r3, FFI_TRAMPOLINE_SIZE(%r11)
125
+ # closure->fun
126
+ ld %r4, FFI_TRAMPOLINE_SIZE+8(%r11)
127
+ # closure->user_data
128
+ ld %r5, FFI_TRAMPOLINE_SIZE+16(%r11)
129
+
130
+ .Ldoclosure:
131
+ # next save fpr 1 to fpr 13
132
+ stfd %f1, -104+(0*8)(%r1)
133
+ stfd %f2, -104+(1*8)(%r1)
134
+ stfd %f3, -104+(2*8)(%r1)
135
+ stfd %f4, -104+(3*8)(%r1)
136
+ stfd %f5, -104+(4*8)(%r1)
137
+ stfd %f6, -104+(5*8)(%r1)
138
+ stfd %f7, -104+(6*8)(%r1)
139
+ stfd %f8, -104+(7*8)(%r1)
140
+ stfd %f9, -104+(8*8)(%r1)
141
+ stfd %f10, -104+(9*8)(%r1)
142
+ stfd %f11, -104+(10*8)(%r1)
143
+ stfd %f12, -104+(11*8)(%r1)
144
+ stfd %f13, -104+(12*8)(%r1)
145
+
146
+ # load up the pointer to the saved fpr registers */
147
+ addi %r8, %r1, -104
148
+
149
+ # load up the pointer to the result storage
150
+ addi %r6, %r1, -STACKFRAME+RETVAL
151
+
152
+ stdu %r1, -STACKFRAME(%r1)
153
+ .cfi_def_cfa_offset STACKFRAME
154
+ .cfi_offset 65, 16
155
+
156
+ # make the call
157
+ # if defined _CALL_LINUX || _CALL_ELF == 2
158
+ bl ffi_closure_helper_LINUX64
159
+ # else
160
+ bl .ffi_closure_helper_LINUX64
161
+ # endif
162
+ .Lret:
163
+
164
+ # now r3 contains the return type
165
+ # so use it to look up in a table
166
+ # so we know how to deal with each type
167
+
168
+ # look up the proper starting point in table
169
+ # by using return type as offset
170
+ ld %r0, STACKFRAME+16(%r1)
171
+ cmpldi %r3, FFI_V2_TYPE_SMALL_STRUCT
172
+ bge .Lsmall
173
+ mflr %r4 # move address of .Lret to r4
174
+ sldi %r3, %r3, 4 # now multiply return type by 16
175
+ addi %r4, %r4, .Lret_type0 - .Lret
176
+ add %r3, %r3, %r4 # add contents of table to table address
177
+ mtctr %r3
178
+ bctr # jump to it
179
+
180
+ # Each of the ret_typeX code fragments has to be exactly 16 bytes long
181
+ # (4 instructions). For cache effectiveness we align to a 16 byte boundary
182
+ # first.
183
+ .align 4
184
+
185
+ .Lret_type0:
186
+ # case FFI_TYPE_VOID
187
+ mtlr %r0
188
+ addi %r1, %r1, STACKFRAME
189
+ .cfi_def_cfa_offset 0
190
+ blr
191
+ .cfi_def_cfa_offset STACKFRAME
192
+ nop
193
+ # case FFI_TYPE_INT
194
+ # ifdef __LITTLE_ENDIAN__
195
+ lwa %r3, RETVAL+0(%r1)
196
+ # else
197
+ lwa %r3, RETVAL+4(%r1)
198
+ # endif
199
+ mtlr %r0
200
+ addi %r1, %r1, STACKFRAME
201
+ .cfi_def_cfa_offset 0
202
+ blr
203
+ .cfi_def_cfa_offset STACKFRAME
204
+ # case FFI_TYPE_FLOAT
205
+ lfs %f1, RETVAL+0(%r1)
206
+ mtlr %r0
207
+ addi %r1, %r1, STACKFRAME
208
+ .cfi_def_cfa_offset 0
209
+ blr
210
+ .cfi_def_cfa_offset STACKFRAME
211
+ # case FFI_TYPE_DOUBLE
212
+ lfd %f1, RETVAL+0(%r1)
213
+ mtlr %r0
214
+ addi %r1, %r1, STACKFRAME
215
+ .cfi_def_cfa_offset 0
216
+ blr
217
+ .cfi_def_cfa_offset STACKFRAME
218
+ # case FFI_TYPE_LONGDOUBLE
219
+ lfd %f1, RETVAL+0(%r1)
220
+ mtlr %r0
221
+ lfd %f2, RETVAL+8(%r1)
222
+ b .Lfinish
223
+ # case FFI_TYPE_UINT8
224
+ # ifdef __LITTLE_ENDIAN__
225
+ lbz %r3, RETVAL+0(%r1)
226
+ # else
227
+ lbz %r3, RETVAL+7(%r1)
228
+ # endif
229
+ mtlr %r0
230
+ addi %r1, %r1, STACKFRAME
231
+ .cfi_def_cfa_offset 0
232
+ blr
233
+ .cfi_def_cfa_offset STACKFRAME
234
+ # case FFI_TYPE_SINT8
235
+ # ifdef __LITTLE_ENDIAN__
236
+ lbz %r3, RETVAL+0(%r1)
237
+ # else
238
+ lbz %r3, RETVAL+7(%r1)
239
+ # endif
240
+ extsb %r3,%r3
241
+ mtlr %r0
242
+ b .Lfinish
243
+ # case FFI_TYPE_UINT16
244
+ # ifdef __LITTLE_ENDIAN__
245
+ lhz %r3, RETVAL+0(%r1)
246
+ # else
247
+ lhz %r3, RETVAL+6(%r1)
248
+ # endif
249
+ mtlr %r0
250
+ .Lfinish:
251
+ addi %r1, %r1, STACKFRAME
252
+ .cfi_def_cfa_offset 0
253
+ blr
254
+ .cfi_def_cfa_offset STACKFRAME
255
+ # case FFI_TYPE_SINT16
256
+ # ifdef __LITTLE_ENDIAN__
257
+ lha %r3, RETVAL+0(%r1)
258
+ # else
259
+ lha %r3, RETVAL+6(%r1)
260
+ # endif
261
+ mtlr %r0
262
+ addi %r1, %r1, STACKFRAME
263
+ .cfi_def_cfa_offset 0
264
+ blr
265
+ .cfi_def_cfa_offset STACKFRAME
266
+ # case FFI_TYPE_UINT32
267
+ # ifdef __LITTLE_ENDIAN__
268
+ lwz %r3, RETVAL+0(%r1)
269
+ # else
270
+ lwz %r3, RETVAL+4(%r1)
271
+ # endif
272
+ mtlr %r0
273
+ addi %r1, %r1, STACKFRAME
274
+ .cfi_def_cfa_offset 0
275
+ blr
276
+ .cfi_def_cfa_offset STACKFRAME
277
+ # case FFI_TYPE_SINT32
278
+ # ifdef __LITTLE_ENDIAN__
279
+ lwa %r3, RETVAL+0(%r1)
280
+ # else
281
+ lwa %r3, RETVAL+4(%r1)
282
+ # endif
283
+ mtlr %r0
284
+ addi %r1, %r1, STACKFRAME
285
+ .cfi_def_cfa_offset 0
286
+ blr
287
+ .cfi_def_cfa_offset STACKFRAME
288
+ # case FFI_TYPE_UINT64
289
+ ld %r3, RETVAL+0(%r1)
290
+ mtlr %r0
291
+ addi %r1, %r1, STACKFRAME
292
+ .cfi_def_cfa_offset 0
293
+ blr
294
+ .cfi_def_cfa_offset STACKFRAME
295
+ # case FFI_TYPE_SINT64
296
+ ld %r3, RETVAL+0(%r1)
297
+ mtlr %r0
298
+ addi %r1, %r1, STACKFRAME
299
+ .cfi_def_cfa_offset 0
300
+ blr
301
+ .cfi_def_cfa_offset STACKFRAME
302
+ # case FFI_TYPE_STRUCT
303
+ mtlr %r0
304
+ addi %r1, %r1, STACKFRAME
305
+ .cfi_def_cfa_offset 0
306
+ blr
307
+ .cfi_def_cfa_offset STACKFRAME
308
+ nop
309
+ # case FFI_TYPE_POINTER
310
+ ld %r3, RETVAL+0(%r1)
311
+ mtlr %r0
312
+ addi %r1, %r1, STACKFRAME
313
+ .cfi_def_cfa_offset 0
314
+ blr
315
+ .cfi_def_cfa_offset STACKFRAME
316
+ # case FFI_V2_TYPE_FLOAT_HOMOG
317
+ lfs %f1, RETVAL+0(%r1)
318
+ lfs %f2, RETVAL+4(%r1)
319
+ lfs %f3, RETVAL+8(%r1)
320
+ b .Lmorefloat
321
+ # case FFI_V2_TYPE_DOUBLE_HOMOG
322
+ lfd %f1, RETVAL+0(%r1)
323
+ lfd %f2, RETVAL+8(%r1)
324
+ lfd %f3, RETVAL+16(%r1)
325
+ lfd %f4, RETVAL+24(%r1)
326
+ mtlr %r0
327
+ lfd %f5, RETVAL+32(%r1)
328
+ lfd %f6, RETVAL+40(%r1)
329
+ lfd %f7, RETVAL+48(%r1)
330
+ lfd %f8, RETVAL+56(%r1)
331
+ addi %r1, %r1, STACKFRAME
332
+ .cfi_def_cfa_offset 0
333
+ blr
334
+ .cfi_def_cfa_offset STACKFRAME
335
+ .Lmorefloat:
336
+ lfs %f4, RETVAL+12(%r1)
337
+ mtlr %r0
338
+ lfs %f5, RETVAL+16(%r1)
339
+ lfs %f6, RETVAL+20(%r1)
340
+ lfs %f7, RETVAL+24(%r1)
341
+ lfs %f8, RETVAL+28(%r1)
342
+ addi %r1, %r1, STACKFRAME
343
+ .cfi_def_cfa_offset 0
344
+ blr
345
+ .cfi_def_cfa_offset STACKFRAME
346
+ .Lsmall:
347
+ # ifdef __LITTLE_ENDIAN__
348
+ ld %r3,RETVAL+0(%r1)
349
+ mtlr %r0
350
+ ld %r4,RETVAL+8(%r1)
351
+ addi %r1, %r1, STACKFRAME
352
+ .cfi_def_cfa_offset 0
353
+ blr
354
+ # else
355
+ # A struct smaller than a dword is returned in the low bits of r3
356
+ # ie. right justified. Larger structs are passed left justified
357
+ # in r3 and r4. The return value area on the stack will have
358
+ # the structs as they are usually stored in memory.
359
+ cmpldi %r3, FFI_V2_TYPE_SMALL_STRUCT + 7 # size 8 bytes?
360
+ neg %r5, %r3
361
+ ld %r3,RETVAL+0(%r1)
362
+ blt .Lsmalldown
363
+ mtlr %r0
364
+ ld %r4,RETVAL+8(%r1)
365
+ addi %r1, %r1, STACKFRAME
366
+ .cfi_def_cfa_offset 0
367
+ blr
368
+ .cfi_def_cfa_offset STACKFRAME
369
+ .Lsmalldown:
370
+ addi %r5, %r5, FFI_V2_TYPE_SMALL_STRUCT + 7
371
+ mtlr %r0
372
+ sldi %r5, %r5, 3
373
+ addi %r1, %r1, STACKFRAME
374
+ .cfi_def_cfa_offset 0
375
+ srd %r3, %r3, %r5
376
+ blr
377
+ # endif
378
+
379
+ .cfi_endproc
380
+ # if _CALL_ELF == 2
381
+ .size ffi_closure_LINUX64,.-ffi_closure_LINUX64
382
+ # else
383
+ # ifdef _CALL_LINUX
384
+ .size ffi_closure_LINUX64,.-.L.ffi_closure_LINUX64
385
+ # else
386
+ .long 0
387
+ .byte 0,12,0,1,128,0,0,0
388
+ .size .ffi_closure_LINUX64,.-.ffi_closure_LINUX64
389
+ # endif
390
+ # endif
391
+
392
+
393
+ FFI_HIDDEN (ffi_go_closure_linux64)
394
+ .globl ffi_go_closure_linux64
395
+ .text
396
+ .cfi_startproc
397
+ # if _CALL_ELF == 2
398
+ ffi_go_closure_linux64:
399
+ addis %r2, %r12, .TOC.-ffi_go_closure_linux64@ha
400
+ addi %r2, %r2, .TOC.-ffi_go_closure_linux64@l
401
+ .localentry ffi_go_closure_linux64, . - ffi_go_closure_linux64
402
+ # else
403
+ .section ".opd","aw"
404
+ .align 3
405
+ ffi_go_closure_linux64:
406
+ # ifdef _CALL_LINUX
407
+ .quad .L.ffi_go_closure_linux64,.TOC.@tocbase,0
408
+ .type ffi_go_closure_linux64,@function
409
+ .text
410
+ .L.ffi_go_closure_linux64:
411
+ # else
412
+ FFI_HIDDEN (.ffi_go_closure_linux64)
413
+ .globl .ffi_go_closure_linux64
414
+ .quad .ffi_go_closure_linux64,.TOC.@tocbase,0
415
+ .size ffi_go_closure_linux64,24
416
+ .type .ffi_go_closure_linux64,@function
417
+ .text
418
+ .ffi_go_closure_linux64:
419
+ # endif
420
+ # endif
421
+
422
+ # if _CALL_ELF == 2
423
+ ld %r12, 8(%r11) # closure->cif
424
+ mflr %r0
425
+ lwz %r12, 28(%r12) # cif->flags
426
+ mtcrf 0x40, %r12
427
+ addi %r12, %r1, PARMSAVE
428
+ bt 7, 0f
429
+ # Our caller has not allocated a parameter save area.
430
+ # We need to allocate one here and use it to pass gprs to
431
+ # ffi_closure_helper_LINUX64.
432
+ addi %r12, %r1, -STACKFRAME+PARMSAVE
433
+ 0:
434
+ # Save general regs into parm save area
435
+ std %r3, 0(%r12)
436
+ std %r4, 8(%r12)
437
+ std %r5, 16(%r12)
438
+ std %r6, 24(%r12)
439
+ std %r7, 32(%r12)
440
+ std %r8, 40(%r12)
441
+ std %r9, 48(%r12)
442
+ std %r10, 56(%r12)
443
+
444
+ # load up the pointer to the parm save area
445
+ mr %r7, %r12
446
+ # else
447
+ mflr %r0
448
+ # Save general regs into parm save area
449
+ # This is the parameter save area set up by our caller.
450
+ std %r3, PARMSAVE+0(%r1)
451
+ std %r4, PARMSAVE+8(%r1)
452
+ std %r5, PARMSAVE+16(%r1)
453
+ std %r6, PARMSAVE+24(%r1)
454
+ std %r7, PARMSAVE+32(%r1)
455
+ std %r8, PARMSAVE+40(%r1)
456
+ std %r9, PARMSAVE+48(%r1)
457
+ std %r10, PARMSAVE+56(%r1)
458
+
459
+ # load up the pointer to the parm save area
460
+ addi %r7, %r1, PARMSAVE
461
+ # endif
462
+ std %r0, 16(%r1)
463
+
464
+ # closure->cif
465
+ ld %r3, 8(%r11)
466
+ # closure->fun
467
+ ld %r4, 16(%r11)
468
+ # user_data
469
+ mr %r5, %r11
470
+ b .Ldoclosure
471
+
472
+ .cfi_endproc
473
+ # if _CALL_ELF == 2
474
+ .size ffi_go_closure_linux64,.-ffi_go_closure_linux64
475
+ # else
476
+ # ifdef _CALL_LINUX
477
+ .size ffi_go_closure_linux64,.-.L.ffi_go_closure_linux64
478
+ # else
479
+ .long 0
480
+ .byte 0,12,0,1,128,0,0,0
481
+ .size .ffi_go_closure_linux64,.-.ffi_go_closure_linux64
482
+ # endif
483
+ # endif
484
+ #endif
485
+
486
+ #if (defined __ELF__ && defined __linux__) || _CALL_ELF == 2
487
+ .section .note.GNU-stack,"",@progbits
488
+ #endif