remogatto-ffi 0.5.0

Sign up to get free protection for your applications and to get access to all the features.
Files changed (324) hide show
  1. data/LICENSE +51 -0
  2. data/README.rdoc +69 -0
  3. data/Rakefile +144 -0
  4. data/ext/ffi_c/AbstractMemory.c +489 -0
  5. data/ext/ffi_c/AbstractMemory.h +160 -0
  6. data/ext/ffi_c/ArrayType.c +129 -0
  7. data/ext/ffi_c/ArrayType.h +58 -0
  8. data/ext/ffi_c/AutoPointer.c +61 -0
  9. data/ext/ffi_c/AutoPointer.h +18 -0
  10. data/ext/ffi_c/Buffer.c +187 -0
  11. data/ext/ffi_c/Call.c +431 -0
  12. data/ext/ffi_c/Call.h +77 -0
  13. data/ext/ffi_c/DynamicLibrary.c +216 -0
  14. data/ext/ffi_c/DynamicLibrary.h +22 -0
  15. data/ext/ffi_c/Function.c +498 -0
  16. data/ext/ffi_c/Function.h +73 -0
  17. data/ext/ffi_c/FunctionInfo.c +213 -0
  18. data/ext/ffi_c/LastError.c +159 -0
  19. data/ext/ffi_c/LastError.h +18 -0
  20. data/ext/ffi_c/MemoryPointer.c +178 -0
  21. data/ext/ffi_c/MemoryPointer.h +20 -0
  22. data/ext/ffi_c/MethodHandle.c +356 -0
  23. data/ext/ffi_c/MethodHandle.h +53 -0
  24. data/ext/ffi_c/Platform.c +59 -0
  25. data/ext/ffi_c/Platform.h +16 -0
  26. data/ext/ffi_c/Pointer.c +217 -0
  27. data/ext/ffi_c/Pointer.h +49 -0
  28. data/ext/ffi_c/Struct.c +770 -0
  29. data/ext/ffi_c/Struct.h +80 -0
  30. data/ext/ffi_c/StructByValue.c +140 -0
  31. data/ext/ffi_c/StructByValue.h +53 -0
  32. data/ext/ffi_c/StructLayout.c +450 -0
  33. data/ext/ffi_c/Type.c +329 -0
  34. data/ext/ffi_c/Type.h +57 -0
  35. data/ext/ffi_c/Types.c +103 -0
  36. data/ext/ffi_c/Types.h +85 -0
  37. data/ext/ffi_c/Variadic.c +260 -0
  38. data/ext/ffi_c/compat.h +72 -0
  39. data/ext/ffi_c/endian.h +40 -0
  40. data/ext/ffi_c/extconf.rb +34 -0
  41. data/ext/ffi_c/ffi.c +80 -0
  42. data/ext/ffi_c/libffi.bsd.mk +34 -0
  43. data/ext/ffi_c/libffi.darwin.mk +75 -0
  44. data/ext/ffi_c/libffi.gnu.mk +29 -0
  45. data/ext/ffi_c/libffi.mk +13 -0
  46. data/ext/ffi_c/libffi/ChangeLog +3243 -0
  47. data/ext/ffi_c/libffi/ChangeLog.libffi +347 -0
  48. data/ext/ffi_c/libffi/ChangeLog.libgcj +40 -0
  49. data/ext/ffi_c/libffi/ChangeLog.v1 +764 -0
  50. data/ext/ffi_c/libffi/LICENSE +21 -0
  51. data/ext/ffi_c/libffi/Makefile.am +177 -0
  52. data/ext/ffi_c/libffi/Makefile.in +1640 -0
  53. data/ext/ffi_c/libffi/README +328 -0
  54. data/ext/ffi_c/libffi/TODO +1 -0
  55. data/ext/ffi_c/libffi/acinclude.m4 +92 -0
  56. data/ext/ffi_c/libffi/aclocal.m4 +7516 -0
  57. data/ext/ffi_c/libffi/compile +142 -0
  58. data/ext/ffi_c/libffi/config.guess +1516 -0
  59. data/ext/ffi_c/libffi/config.sub +1626 -0
  60. data/ext/ffi_c/libffi/configure +24414 -0
  61. data/ext/ffi_c/libffi/configure.ac +365 -0
  62. data/ext/ffi_c/libffi/configure.host +11 -0
  63. data/ext/ffi_c/libffi/depcomp +584 -0
  64. data/ext/ffi_c/libffi/doc/libffi.info +533 -0
  65. data/ext/ffi_c/libffi/doc/libffi.texi +541 -0
  66. data/ext/ffi_c/libffi/doc/stamp-vti +4 -0
  67. data/ext/ffi_c/libffi/doc/version.texi +4 -0
  68. data/ext/ffi_c/libffi/fficonfig.h.in +160 -0
  69. data/ext/ffi_c/libffi/include/Makefile.am +9 -0
  70. data/ext/ffi_c/libffi/include/Makefile.in +422 -0
  71. data/ext/ffi_c/libffi/include/ffi.h.in +393 -0
  72. data/ext/ffi_c/libffi/include/ffi_common.h +98 -0
  73. data/ext/ffi_c/libffi/install-sh +323 -0
  74. data/ext/ffi_c/libffi/libffi.pc.in +10 -0
  75. data/ext/ffi_c/libffi/libtool-version +29 -0
  76. data/ext/ffi_c/libffi/ltcf-c.sh +861 -0
  77. data/ext/ffi_c/libffi/ltcf-cxx.sh +1069 -0
  78. data/ext/ffi_c/libffi/ltcf-gcj.sh +700 -0
  79. data/ext/ffi_c/libffi/ltconfig +2862 -0
  80. data/ext/ffi_c/libffi/ltmain.sh +6930 -0
  81. data/ext/ffi_c/libffi/man/Makefile.am +8 -0
  82. data/ext/ffi_c/libffi/man/Makefile.in +395 -0
  83. data/ext/ffi_c/libffi/man/ffi.3 +31 -0
  84. data/ext/ffi_c/libffi/man/ffi_call.3 +103 -0
  85. data/ext/ffi_c/libffi/man/ffi_prep_cif.3 +66 -0
  86. data/ext/ffi_c/libffi/mdate-sh +201 -0
  87. data/ext/ffi_c/libffi/missing +353 -0
  88. data/ext/ffi_c/libffi/mkinstalldirs +158 -0
  89. data/ext/ffi_c/libffi/src/alpha/ffi.c +284 -0
  90. data/ext/ffi_c/libffi/src/alpha/ffitarget.h +48 -0
  91. data/ext/ffi_c/libffi/src/alpha/osf.S +366 -0
  92. data/ext/ffi_c/libffi/src/arm/ffi.c +309 -0
  93. data/ext/ffi_c/libffi/src/arm/ffitarget.h +49 -0
  94. data/ext/ffi_c/libffi/src/arm/sysv.S +299 -0
  95. data/ext/ffi_c/libffi/src/closures.c +596 -0
  96. data/ext/ffi_c/libffi/src/cris/ffi.c +383 -0
  97. data/ext/ffi_c/libffi/src/cris/ffitarget.h +51 -0
  98. data/ext/ffi_c/libffi/src/cris/sysv.S +215 -0
  99. data/ext/ffi_c/libffi/src/debug.c +59 -0
  100. data/ext/ffi_c/libffi/src/dlmalloc.c +5099 -0
  101. data/ext/ffi_c/libffi/src/frv/eabi.S +128 -0
  102. data/ext/ffi_c/libffi/src/frv/ffi.c +292 -0
  103. data/ext/ffi_c/libffi/src/frv/ffitarget.h +61 -0
  104. data/ext/ffi_c/libffi/src/ia64/ffi.c +580 -0
  105. data/ext/ffi_c/libffi/src/ia64/ffitarget.h +50 -0
  106. data/ext/ffi_c/libffi/src/ia64/ia64_flags.h +40 -0
  107. data/ext/ffi_c/libffi/src/ia64/unix.S +560 -0
  108. data/ext/ffi_c/libffi/src/java_raw_api.c +359 -0
  109. data/ext/ffi_c/libffi/src/m32r/ffi.c +232 -0
  110. data/ext/ffi_c/libffi/src/m32r/ffitarget.h +48 -0
  111. data/ext/ffi_c/libffi/src/m32r/sysv.S +121 -0
  112. data/ext/ffi_c/libffi/src/m68k/ffi.c +278 -0
  113. data/ext/ffi_c/libffi/src/m68k/ffitarget.h +49 -0
  114. data/ext/ffi_c/libffi/src/m68k/sysv.S +234 -0
  115. data/ext/ffi_c/libffi/src/mips/ffi.c +926 -0
  116. data/ext/ffi_c/libffi/src/mips/ffitarget.h +202 -0
  117. data/ext/ffi_c/libffi/src/mips/n32.S +534 -0
  118. data/ext/ffi_c/libffi/src/mips/o32.S +381 -0
  119. data/ext/ffi_c/libffi/src/pa/ffi.c +709 -0
  120. data/ext/ffi_c/libffi/src/pa/ffitarget.h +77 -0
  121. data/ext/ffi_c/libffi/src/pa/hpux32.S +368 -0
  122. data/ext/ffi_c/libffi/src/pa/linux.S +357 -0
  123. data/ext/ffi_c/libffi/src/powerpc/aix.S +225 -0
  124. data/ext/ffi_c/libffi/src/powerpc/aix_closure.S +247 -0
  125. data/ext/ffi_c/libffi/src/powerpc/asm.h +125 -0
  126. data/ext/ffi_c/libffi/src/powerpc/darwin.S +245 -0
  127. data/ext/ffi_c/libffi/src/powerpc/darwin_closure.S +317 -0
  128. data/ext/ffi_c/libffi/src/powerpc/ffi.c +1429 -0
  129. data/ext/ffi_c/libffi/src/powerpc/ffi_darwin.c +800 -0
  130. data/ext/ffi_c/libffi/src/powerpc/ffitarget.h +118 -0
  131. data/ext/ffi_c/libffi/src/powerpc/linux64.S +187 -0
  132. data/ext/ffi_c/libffi/src/powerpc/linux64_closure.S +236 -0
  133. data/ext/ffi_c/libffi/src/powerpc/ppc_closure.S +327 -0
  134. data/ext/ffi_c/libffi/src/powerpc/sysv.S +230 -0
  135. data/ext/ffi_c/libffi/src/prep_cif.c +174 -0
  136. data/ext/ffi_c/libffi/src/raw_api.c +254 -0
  137. data/ext/ffi_c/libffi/src/s390/ffi.c +780 -0
  138. data/ext/ffi_c/libffi/src/s390/ffitarget.h +60 -0
  139. data/ext/ffi_c/libffi/src/s390/sysv.S +434 -0
  140. data/ext/ffi_c/libffi/src/sh/ffi.c +716 -0
  141. data/ext/ffi_c/libffi/src/sh/ffitarget.h +49 -0
  142. data/ext/ffi_c/libffi/src/sh/sysv.S +850 -0
  143. data/ext/ffi_c/libffi/src/sh64/ffi.c +453 -0
  144. data/ext/ffi_c/libffi/src/sh64/ffitarget.h +53 -0
  145. data/ext/ffi_c/libffi/src/sh64/sysv.S +530 -0
  146. data/ext/ffi_c/libffi/src/sparc/ffi.c +610 -0
  147. data/ext/ffi_c/libffi/src/sparc/ffitarget.h +66 -0
  148. data/ext/ffi_c/libffi/src/sparc/v8.S +272 -0
  149. data/ext/ffi_c/libffi/src/sparc/v9.S +307 -0
  150. data/ext/ffi_c/libffi/src/types.c +77 -0
  151. data/ext/ffi_c/libffi/src/x86/darwin.S +443 -0
  152. data/ext/ffi_c/libffi/src/x86/darwin64.S +416 -0
  153. data/ext/ffi_c/libffi/src/x86/ffi.c +475 -0
  154. data/ext/ffi_c/libffi/src/x86/ffi64.c +572 -0
  155. data/ext/ffi_c/libffi/src/x86/ffitarget.h +90 -0
  156. data/ext/ffi_c/libffi/src/x86/freebsd.S +458 -0
  157. data/ext/ffi_c/libffi/src/x86/sysv.S +437 -0
  158. data/ext/ffi_c/libffi/src/x86/unix64.S +418 -0
  159. data/ext/ffi_c/libffi/src/x86/win32.S +391 -0
  160. data/ext/ffi_c/libffi/testsuite/Makefile.am +71 -0
  161. data/ext/ffi_c/libffi/testsuite/Makefile.in +447 -0
  162. data/ext/ffi_c/libffi/testsuite/config/default.exp +1 -0
  163. data/ext/ffi_c/libffi/testsuite/lib/libffi-dg.exp +289 -0
  164. data/ext/ffi_c/libffi/testsuite/lib/target-libpath.exp +263 -0
  165. data/ext/ffi_c/libffi/testsuite/lib/wrapper.exp +45 -0
  166. data/ext/ffi_c/libffi/testsuite/libffi.call/call.exp +36 -0
  167. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn0.c +97 -0
  168. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn1.c +89 -0
  169. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn2.c +89 -0
  170. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn3.c +90 -0
  171. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn4.c +97 -0
  172. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn5.c +99 -0
  173. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn6.c +98 -0
  174. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_stdcall.c +72 -0
  175. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_12byte.c +102 -0
  176. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_16byte.c +103 -0
  177. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_18byte.c +104 -0
  178. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_19byte.c +110 -0
  179. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_1_1byte.c +97 -0
  180. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_20byte.c +99 -0
  181. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_20byte1.c +101 -0
  182. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_24byte.c +121 -0
  183. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_2byte.c +98 -0
  184. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3_1byte.c +103 -0
  185. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3byte1.c +98 -0
  186. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3byte2.c +98 -0
  187. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_4_1byte.c +106 -0
  188. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_4byte.c +98 -0
  189. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_5_1_byte.c +117 -0
  190. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_5byte.c +106 -0
  191. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_64byte.c +132 -0
  192. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_6_1_byte.c +121 -0
  193. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_6byte.c +107 -0
  194. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_7_1_byte.c +125 -0
  195. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_7byte.c +105 -0
  196. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_8byte.c +96 -0
  197. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_9byte1.c +98 -0
  198. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_9byte2.c +99 -0
  199. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_double.c +101 -0
  200. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_float.c +99 -0
  201. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_longdouble.c +100 -0
  202. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_pointer.c +101 -0
  203. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint16.c +99 -0
  204. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint32.c +99 -0
  205. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint64.c +99 -0
  206. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint16.c +99 -0
  207. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint32.c +99 -0
  208. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint64.c +100 -0
  209. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_double.c +51 -0
  210. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_float.c +51 -0
  211. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_schar.c +82 -0
  212. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_sshort.c +82 -0
  213. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_sshortchar.c +94 -0
  214. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_uchar.c +99 -0
  215. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_ushort.c +82 -0
  216. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_ushortchar.c +94 -0
  217. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_schar.c +52 -0
  218. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_sint.c +50 -0
  219. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_sshort.c +50 -0
  220. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_uchar.c +50 -0
  221. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_uint.c +51 -0
  222. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ulonglong.c +54 -0
  223. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ushort.c +51 -0
  224. data/ext/ffi_c/libffi/testsuite/libffi.call/ffitest.h +86 -0
  225. data/ext/ffi_c/libffi/testsuite/libffi.call/float.c +59 -0
  226. data/ext/ffi_c/libffi/testsuite/libffi.call/float1.c +58 -0
  227. data/ext/ffi_c/libffi/testsuite/libffi.call/float2.c +57 -0
  228. data/ext/ffi_c/libffi/testsuite/libffi.call/float3.c +72 -0
  229. data/ext/ffi_c/libffi/testsuite/libffi.call/float4.c +62 -0
  230. data/ext/ffi_c/libffi/testsuite/libffi.call/many.c +69 -0
  231. data/ext/ffi_c/libffi/testsuite/libffi.call/many_win32.c +63 -0
  232. data/ext/ffi_c/libffi/testsuite/libffi.call/negint.c +53 -0
  233. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct.c +160 -0
  234. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct1.c +169 -0
  235. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct10.c +141 -0
  236. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct2.c +118 -0
  237. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct3.c +119 -0
  238. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct4.c +119 -0
  239. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct5.c +120 -0
  240. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct6.c +139 -0
  241. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct7.c +119 -0
  242. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct8.c +139 -0
  243. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct9.c +139 -0
  244. data/ext/ffi_c/libffi/testsuite/libffi.call/problem1.c +98 -0
  245. data/ext/ffi_c/libffi/testsuite/libffi.call/promotion.c +59 -0
  246. data/ext/ffi_c/libffi/testsuite/libffi.call/pyobjc-tc.c +114 -0
  247. data/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl.c +35 -0
  248. data/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl1.c +43 -0
  249. data/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl2.c +42 -0
  250. data/ext/ffi_c/libffi/testsuite/libffi.call/return_fl.c +35 -0
  251. data/ext/ffi_c/libffi/testsuite/libffi.call/return_fl1.c +36 -0
  252. data/ext/ffi_c/libffi/testsuite/libffi.call/return_fl2.c +49 -0
  253. data/ext/ffi_c/libffi/testsuite/libffi.call/return_fl3.c +42 -0
  254. data/ext/ffi_c/libffi/testsuite/libffi.call/return_ldl.c +34 -0
  255. data/ext/ffi_c/libffi/testsuite/libffi.call/return_ll.c +41 -0
  256. data/ext/ffi_c/libffi/testsuite/libffi.call/return_ll1.c +42 -0
  257. data/ext/ffi_c/libffi/testsuite/libffi.call/return_sc.c +36 -0
  258. data/ext/ffi_c/libffi/testsuite/libffi.call/return_sl.c +38 -0
  259. data/ext/ffi_c/libffi/testsuite/libffi.call/return_uc.c +38 -0
  260. data/ext/ffi_c/libffi/testsuite/libffi.call/return_ul.c +38 -0
  261. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen.c +44 -0
  262. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen_win32.c +44 -0
  263. data/ext/ffi_c/libffi/testsuite/libffi.call/struct1.c +65 -0
  264. data/ext/ffi_c/libffi/testsuite/libffi.call/struct2.c +67 -0
  265. data/ext/ffi_c/libffi/testsuite/libffi.call/struct3.c +59 -0
  266. data/ext/ffi_c/libffi/testsuite/libffi.call/struct4.c +63 -0
  267. data/ext/ffi_c/libffi/testsuite/libffi.call/struct5.c +65 -0
  268. data/ext/ffi_c/libffi/testsuite/libffi.call/struct6.c +64 -0
  269. data/ext/ffi_c/libffi/testsuite/libffi.call/struct7.c +74 -0
  270. data/ext/ffi_c/libffi/testsuite/libffi.call/struct8.c +80 -0
  271. data/ext/ffi_c/libffi/testsuite/libffi.call/struct9.c +67 -0
  272. data/ext/ffi_c/libffi/testsuite/libffi.special/ffitestcxx.h +86 -0
  273. data/ext/ffi_c/libffi/testsuite/libffi.special/special.exp +38 -0
  274. data/ext/ffi_c/libffi/testsuite/libffi.special/unwindtest.cc +123 -0
  275. data/ext/ffi_c/libffi/testsuite/libffi.special/unwindtest_ffi_call.cc +53 -0
  276. data/ext/ffi_c/libffi/texinfo.tex +7482 -0
  277. data/ext/ffi_c/rbffi.h +26 -0
  278. data/gen/Rakefile +12 -0
  279. data/lib/ffi.rb +11 -0
  280. data/lib/ffi/autopointer.rb +61 -0
  281. data/lib/ffi/buffer.rb +0 -0
  282. data/lib/ffi/callback.rb +10 -0
  283. data/lib/ffi/enum.rb +78 -0
  284. data/lib/ffi/errno.rb +8 -0
  285. data/lib/ffi/ffi.rb +99 -0
  286. data/lib/ffi/io.rb +21 -0
  287. data/lib/ffi/library.rb +218 -0
  288. data/lib/ffi/managedstruct.rb +55 -0
  289. data/lib/ffi/memorypointer.rb +73 -0
  290. data/lib/ffi/platform.rb +78 -0
  291. data/lib/ffi/pointer.rb +119 -0
  292. data/lib/ffi/struct.rb +164 -0
  293. data/lib/ffi/tools/const_generator.rb +177 -0
  294. data/lib/ffi/tools/generator.rb +58 -0
  295. data/lib/ffi/tools/generator_task.rb +35 -0
  296. data/lib/ffi/tools/struct_generator.rb +194 -0
  297. data/lib/ffi/tools/types_generator.rb +123 -0
  298. data/lib/ffi/types.rb +153 -0
  299. data/lib/ffi/union.rb +12 -0
  300. data/lib/ffi/variadic.rb +25 -0
  301. data/spec/ffi/bool_spec.rb +24 -0
  302. data/spec/ffi/buffer_spec.rb +202 -0
  303. data/spec/ffi/callback_spec.rb +591 -0
  304. data/spec/ffi/enum_spec.rb +164 -0
  305. data/spec/ffi/errno_spec.rb +13 -0
  306. data/spec/ffi/function_spec.rb +47 -0
  307. data/spec/ffi/library_spec.rb +144 -0
  308. data/spec/ffi/managed_struct_spec.rb +56 -0
  309. data/spec/ffi/number_spec.rb +231 -0
  310. data/spec/ffi/pointer_spec.rb +195 -0
  311. data/spec/ffi/rbx/attach_function_spec.rb +27 -0
  312. data/spec/ffi/rbx/memory_pointer_spec.rb +102 -0
  313. data/spec/ffi/rbx/spec_helper.rb +1 -0
  314. data/spec/ffi/rbx/struct_spec.rb +13 -0
  315. data/spec/ffi/spec_helper.rb +17 -0
  316. data/spec/ffi/string_spec.rb +103 -0
  317. data/spec/ffi/struct_callback_spec.rb +62 -0
  318. data/spec/ffi/struct_initialize_spec.rb +30 -0
  319. data/spec/ffi/struct_spec.rb +529 -0
  320. data/spec/ffi/typedef_spec.rb +48 -0
  321. data/spec/ffi/union_spec.rb +60 -0
  322. data/spec/ffi/variadic_spec.rb +84 -0
  323. data/spec/spec.opts +4 -0
  324. metadata +432 -0
@@ -0,0 +1,66 @@
1
+ /* -----------------------------------------------------------------*-C-*-
2
+ ffitarget.h - Copyright (c) 1996-2003 Red Hat, Inc.
3
+ Target configuration macros for SPARC.
4
+
5
+ Permission is hereby granted, free of charge, to any person obtaining
6
+ a copy of this software and associated documentation files (the
7
+ ``Software''), to deal in the Software without restriction, including
8
+ without limitation the rights to use, copy, modify, merge, publish,
9
+ distribute, sublicense, and/or sell copies of the Software, and to
10
+ permit persons to whom the Software is furnished to do so, subject to
11
+ the following conditions:
12
+
13
+ The above copyright notice and this permission notice shall be included
14
+ in all copies or substantial portions of the Software.
15
+
16
+ THE SOFTWARE IS PROVIDED ``AS IS'', WITHOUT WARRANTY OF ANY KIND,
17
+ EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
18
+ MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
19
+ NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
20
+ HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
21
+ WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
22
+ OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
23
+ DEALINGS IN THE SOFTWARE.
24
+
25
+ ----------------------------------------------------------------------- */
26
+
27
+ #ifndef LIBFFI_TARGET_H
28
+ #define LIBFFI_TARGET_H
29
+
30
+ /* ---- System specific configurations ----------------------------------- */
31
+
32
+ #if defined(__arch64__) || defined(__sparcv9)
33
+ #define SPARC64
34
+ #endif
35
+
36
+ #ifndef LIBFFI_ASM
37
+ typedef unsigned long ffi_arg;
38
+ typedef signed long ffi_sarg;
39
+
40
+ typedef enum ffi_abi {
41
+ FFI_FIRST_ABI = 0,
42
+ FFI_V8,
43
+ FFI_V8PLUS,
44
+ FFI_V9,
45
+ #ifdef SPARC64
46
+ FFI_DEFAULT_ABI = FFI_V9,
47
+ #else
48
+ FFI_DEFAULT_ABI = FFI_V8,
49
+ #endif
50
+ FFI_LAST_ABI = FFI_DEFAULT_ABI + 1
51
+ } ffi_abi;
52
+ #endif
53
+
54
+ /* ---- Definitions for closures ----------------------------------------- */
55
+
56
+ #define FFI_CLOSURES 1
57
+ #define FFI_NATIVE_RAW_API 0
58
+
59
+ #ifdef SPARC64
60
+ #define FFI_TRAMPOLINE_SIZE 24
61
+ #else
62
+ #define FFI_TRAMPOLINE_SIZE 16
63
+ #endif
64
+
65
+ #endif
66
+
@@ -0,0 +1,272 @@
1
+ /* -----------------------------------------------------------------------
2
+ v8.S - Copyright (c) 1996, 1997, 2003, 2004, 2008 Red Hat, Inc.
3
+
4
+ SPARC 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
+ #define LIBFFI_ASM
28
+ #include <fficonfig.h>
29
+ #include <ffi.h>
30
+
31
+ #define STACKFRAME 96 /* Minimum stack framesize for SPARC */
32
+ #define ARGS (64+4) /* Offset of register area in frame */
33
+
34
+ .text
35
+ .align 8
36
+ .globl ffi_call_v8
37
+ .globl _ffi_call_v8
38
+
39
+ ffi_call_v8:
40
+ _ffi_call_v8:
41
+ .LLFB1:
42
+ save %sp, -STACKFRAME, %sp
43
+ .LLCFI0:
44
+
45
+ sub %sp, %i2, %sp ! alloca() space in stack for frame to set up
46
+ add %sp, STACKFRAME, %l0 ! %l0 has start of
47
+ ! frame to set up
48
+
49
+ mov %l0, %o0 ! call routine to set up frame
50
+ call %i0
51
+ mov %i1, %o1 ! (delay)
52
+
53
+ ld [%l0+ARGS], %o0 ! call foreign function
54
+ ld [%l0+ARGS+4], %o1
55
+ ld [%l0+ARGS+8], %o2
56
+ ld [%l0+ARGS+12], %o3
57
+ ld [%l0+ARGS+16], %o4
58
+ ld [%l0+ARGS+20], %o5
59
+ call %i5
60
+ mov %l0, %sp ! (delay) switch to frame
61
+ nop ! STRUCT returning functions skip 12 instead of 8 bytes
62
+
63
+ ! If the return value pointer is NULL, assume no return value.
64
+ tst %i4
65
+ bz done
66
+ nop
67
+
68
+ cmp %i3, FFI_TYPE_INT
69
+ be,a done
70
+ st %o0, [%i4] ! (delay)
71
+
72
+ cmp %i3, FFI_TYPE_FLOAT
73
+ be,a done
74
+ st %f0, [%i4+0] ! (delay)
75
+
76
+ cmp %i3, FFI_TYPE_SINT64
77
+ be longlong
78
+
79
+ cmp %i3, FFI_TYPE_DOUBLE
80
+ bne done
81
+ nop
82
+ st %f0, [%i4+0]
83
+ st %f1, [%i4+4]
84
+
85
+ done:
86
+ ret
87
+ restore
88
+
89
+ longlong:
90
+ st %o0, [%i4+0]
91
+ st %o1, [%i4+4]
92
+ ret
93
+ restore
94
+ .LLFE1:
95
+
96
+ .ffi_call_v8_end:
97
+ .size ffi_call_v8,.ffi_call_v8_end-ffi_call_v8
98
+
99
+
100
+ #undef STACKFRAME
101
+ #define STACKFRAME 104 /* 16*4 register window +
102
+ 1*4 struct return +
103
+ 6*4 args backing store +
104
+ 3*4 locals */
105
+
106
+ /* ffi_closure_v8(...)
107
+
108
+ Receives the closure argument in %g2. */
109
+
110
+ .text
111
+ .align 8
112
+ .globl ffi_closure_v8
113
+
114
+ ffi_closure_v8:
115
+ #ifdef HAVE_AS_REGISTER_PSEUDO_OP
116
+ .register %g2, #scratch
117
+ #endif
118
+ .LLFB2:
119
+ ! Reserve frame space for all arguments in case
120
+ ! we need to align them on a 8-byte boundary.
121
+ ld [%g2+FFI_TRAMPOLINE_SIZE], %g1
122
+ ld [%g1+4], %g1
123
+ sll %g1, 3, %g1
124
+ add %g1, STACKFRAME, %g1
125
+ ! %g1 == STACKFRAME + 8*nargs
126
+ neg %g1
127
+ save %sp, %g1, %sp
128
+ .LLCFI1:
129
+
130
+ ! Store all of the potential argument registers in va_list format.
131
+ st %i0, [%fp+68+0]
132
+ st %i1, [%fp+68+4]
133
+ st %i2, [%fp+68+8]
134
+ st %i3, [%fp+68+12]
135
+ st %i4, [%fp+68+16]
136
+ st %i5, [%fp+68+20]
137
+
138
+ ! Call ffi_closure_sparc_inner to do the bulk of the work.
139
+ mov %g2, %o0
140
+ add %fp, -8, %o1
141
+ add %fp, 64, %o2
142
+ call ffi_closure_sparc_inner_v8
143
+ add %fp, -16, %o3
144
+
145
+ ! Load up the return value in the proper type.
146
+ ! See ffi_prep_cif_machdep for the list of cases.
147
+ cmp %o0, FFI_TYPE_VOID
148
+ be done1
149
+
150
+ cmp %o0, FFI_TYPE_INT
151
+ be integer
152
+
153
+ cmp %o0, FFI_TYPE_FLOAT
154
+ be,a done1
155
+ ld [%fp-8], %f0
156
+
157
+ cmp %o0, FFI_TYPE_DOUBLE
158
+ be,a done1
159
+ ldd [%fp-8], %f0
160
+
161
+ #if FFI_TYPE_LONGDOUBLE != FFI_TYPE_DOUBLE
162
+ cmp %o0, FFI_TYPE_LONGDOUBLE
163
+ be done2
164
+ #endif
165
+
166
+ cmp %o0, FFI_TYPE_STRUCT
167
+ be done2
168
+
169
+ ! FFI_TYPE_SINT64
170
+ ! FFI_TYPE_UINT64
171
+ ld [%fp-4], %i1
172
+
173
+ integer:
174
+ ld [%fp-8], %i0
175
+
176
+ done1:
177
+ jmp %i7+8
178
+ restore
179
+ done2:
180
+ ! Skip 'unimp'.
181
+ jmp %i7+12
182
+ restore
183
+ .LLFE2:
184
+
185
+ .ffi_closure_v8_end:
186
+ .size ffi_closure_v8,.ffi_closure_v8_end-ffi_closure_v8
187
+
188
+ #ifdef SPARC64
189
+ #define WS 8
190
+ #define nword xword
191
+ #define uanword uaxword
192
+ #else
193
+ #define WS 4
194
+ #define nword long
195
+ #define uanword uaword
196
+ #endif
197
+
198
+ #ifdef HAVE_RO_EH_FRAME
199
+ .section ".eh_frame",#alloc
200
+ #else
201
+ .section ".eh_frame",#alloc,#write
202
+ #endif
203
+ .LLframe1:
204
+ .uaword .LLECIE1-.LLSCIE1 ! Length of Common Information Entry
205
+ .LLSCIE1:
206
+ .uaword 0x0 ! CIE Identifier Tag
207
+ .byte 0x1 ! CIE Version
208
+ .ascii "zR\0" ! CIE Augmentation
209
+ .byte 0x1 ! uleb128 0x1; CIE Code Alignment Factor
210
+ .byte 0x80-WS ! sleb128 -WS; CIE Data Alignment Factor
211
+ .byte 0xf ! CIE RA Column
212
+ .byte 0x1 ! uleb128 0x1; Augmentation size
213
+ #ifdef HAVE_AS_SPARC_UA_PCREL
214
+ .byte 0x1b ! FDE Encoding (pcrel sdata4)
215
+ #else
216
+ .byte 0x50 ! FDE Encoding (aligned absolute)
217
+ #endif
218
+ .byte 0xc ! DW_CFA_def_cfa
219
+ .byte 0xe ! uleb128 0xe
220
+ .byte 0x0 ! uleb128 0x0
221
+ .align WS
222
+ .LLECIE1:
223
+ .LLSFDE1:
224
+ .uaword .LLEFDE1-.LLASFDE1 ! FDE Length
225
+ .LLASFDE1:
226
+ .uaword .LLASFDE1-.LLframe1 ! FDE CIE offset
227
+ #ifdef HAVE_AS_SPARC_UA_PCREL
228
+ .uaword %r_disp32(.LLFB1)
229
+ .uaword .LLFE1-.LLFB1 ! FDE address range
230
+ #else
231
+ .align WS
232
+ .nword .LLFB1
233
+ .uanword .LLFE1-.LLFB1 ! FDE address range
234
+ #endif
235
+ .byte 0x0 ! uleb128 0x0; Augmentation size
236
+ .byte 0x4 ! DW_CFA_advance_loc4
237
+ .uaword .LLCFI0-.LLFB1
238
+ .byte 0xd ! DW_CFA_def_cfa_register
239
+ .byte 0x1e ! uleb128 0x1e
240
+ .byte 0x2d ! DW_CFA_GNU_window_save
241
+ .byte 0x9 ! DW_CFA_register
242
+ .byte 0xf ! uleb128 0xf
243
+ .byte 0x1f ! uleb128 0x1f
244
+ .align WS
245
+ .LLEFDE1:
246
+ .LLSFDE2:
247
+ .uaword .LLEFDE2-.LLASFDE2 ! FDE Length
248
+ .LLASFDE2:
249
+ .uaword .LLASFDE2-.LLframe1 ! FDE CIE offset
250
+ #ifdef HAVE_AS_SPARC_UA_PCREL
251
+ .uaword %r_disp32(.LLFB2)
252
+ .uaword .LLFE2-.LLFB2 ! FDE address range
253
+ #else
254
+ .align WS
255
+ .nword .LLFB2
256
+ .uanword .LLFE2-.LLFB2 ! FDE address range
257
+ #endif
258
+ .byte 0x0 ! uleb128 0x0; Augmentation size
259
+ .byte 0x4 ! DW_CFA_advance_loc4
260
+ .uaword .LLCFI1-.LLFB2
261
+ .byte 0xd ! DW_CFA_def_cfa_register
262
+ .byte 0x1e ! uleb128 0x1e
263
+ .byte 0x2d ! DW_CFA_GNU_window_save
264
+ .byte 0x9 ! DW_CFA_register
265
+ .byte 0xf ! uleb128 0xf
266
+ .byte 0x1f ! uleb128 0x1f
267
+ .align WS
268
+ .LLEFDE2:
269
+
270
+ #if defined __ELF__ && defined __linux__
271
+ .section .note.GNU-stack,"",@progbits
272
+ #endif
@@ -0,0 +1,307 @@
1
+ /* -----------------------------------------------------------------------
2
+ v9.S - Copyright (c) 2000, 2003, 2004, 2008 Red Hat, Inc.
3
+
4
+ SPARC 64-bit 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
+ #define LIBFFI_ASM
28
+ #include <fficonfig.h>
29
+ #include <ffi.h>
30
+
31
+ #ifdef SPARC64
32
+ /* Only compile this in for 64bit builds, because otherwise the object file
33
+ will have inproper architecture due to used instructions. */
34
+
35
+ #define STACKFRAME 128 /* Minimum stack framesize for SPARC */
36
+ #define STACK_BIAS 2047
37
+ #define ARGS (128) /* Offset of register area in frame */
38
+
39
+ .text
40
+ .align 8
41
+ .globl ffi_call_v9
42
+ .globl _ffi_call_v9
43
+
44
+ ffi_call_v9:
45
+ _ffi_call_v9:
46
+ .LLFB1:
47
+ save %sp, -STACKFRAME, %sp
48
+ .LLCFI0:
49
+
50
+ sub %sp, %i2, %sp ! alloca() space in stack for frame to set up
51
+ add %sp, STACKFRAME+STACK_BIAS, %l0 ! %l0 has start of
52
+ ! frame to set up
53
+
54
+ mov %l0, %o0 ! call routine to set up frame
55
+ call %i0
56
+ mov %i1, %o1 ! (delay)
57
+ brz,pt %o0, 1f
58
+ ldx [%l0+ARGS], %o0 ! call foreign function
59
+
60
+ ldd [%l0+ARGS], %f0
61
+ ldd [%l0+ARGS+8], %f2
62
+ ldd [%l0+ARGS+16], %f4
63
+ ldd [%l0+ARGS+24], %f6
64
+ ldd [%l0+ARGS+32], %f8
65
+ ldd [%l0+ARGS+40], %f10
66
+ ldd [%l0+ARGS+48], %f12
67
+ ldd [%l0+ARGS+56], %f14
68
+ ldd [%l0+ARGS+64], %f16
69
+ ldd [%l0+ARGS+72], %f18
70
+ ldd [%l0+ARGS+80], %f20
71
+ ldd [%l0+ARGS+88], %f22
72
+ ldd [%l0+ARGS+96], %f24
73
+ ldd [%l0+ARGS+104], %f26
74
+ ldd [%l0+ARGS+112], %f28
75
+ ldd [%l0+ARGS+120], %f30
76
+
77
+ 1: ldx [%l0+ARGS+8], %o1
78
+ ldx [%l0+ARGS+16], %o2
79
+ ldx [%l0+ARGS+24], %o3
80
+ ldx [%l0+ARGS+32], %o4
81
+ ldx [%l0+ARGS+40], %o5
82
+ call %i5
83
+ sub %l0, STACK_BIAS, %sp ! (delay) switch to frame
84
+
85
+ ! If the return value pointer is NULL, assume no return value.
86
+ brz,pn %i4, done
87
+ nop
88
+
89
+ cmp %i3, FFI_TYPE_INT
90
+ be,a,pt %icc, done
91
+ stx %o0, [%i4+0] ! (delay)
92
+
93
+ cmp %i3, FFI_TYPE_FLOAT
94
+ be,a,pn %icc, done
95
+ st %f0, [%i4+0] ! (delay)
96
+
97
+ cmp %i3, FFI_TYPE_DOUBLE
98
+ be,a,pn %icc, done
99
+ std %f0, [%i4+0] ! (delay)
100
+
101
+ cmp %i3, FFI_TYPE_STRUCT
102
+ be,pn %icc, dostruct
103
+
104
+ cmp %i3, FFI_TYPE_LONGDOUBLE
105
+ bne,pt %icc, done
106
+ nop
107
+ std %f0, [%i4+0]
108
+ std %f2, [%i4+8]
109
+
110
+ done: ret
111
+ restore
112
+
113
+ dostruct:
114
+ /* This will not work correctly for unions. */
115
+ stx %o0, [%i4+0]
116
+ stx %o1, [%i4+8]
117
+ stx %o2, [%i4+16]
118
+ stx %o3, [%i4+24]
119
+ std %f0, [%i4+32]
120
+ std %f2, [%i4+40]
121
+ std %f4, [%i4+48]
122
+ std %f6, [%i4+56]
123
+ ret
124
+ restore
125
+ .LLFE1:
126
+
127
+ .ffi_call_v9_end:
128
+ .size ffi_call_v9,.ffi_call_v9_end-ffi_call_v9
129
+
130
+
131
+ #undef STACKFRAME
132
+ #define STACKFRAME 336 /* 16*8 register window +
133
+ 6*8 args backing store +
134
+ 20*8 locals */
135
+ #define FP %fp+STACK_BIAS
136
+
137
+ /* ffi_closure_v9(...)
138
+
139
+ Receives the closure argument in %g1. */
140
+
141
+ .text
142
+ .align 8
143
+ .globl ffi_closure_v9
144
+
145
+ ffi_closure_v9:
146
+ .LLFB2:
147
+ save %sp, -STACKFRAME, %sp
148
+ .LLCFI1:
149
+
150
+ ! Store all of the potential argument registers in va_list format.
151
+ stx %i0, [FP+128+0]
152
+ stx %i1, [FP+128+8]
153
+ stx %i2, [FP+128+16]
154
+ stx %i3, [FP+128+24]
155
+ stx %i4, [FP+128+32]
156
+ stx %i5, [FP+128+40]
157
+
158
+ ! Store possible floating point argument registers too.
159
+ std %f0, [FP-128]
160
+ std %f2, [FP-120]
161
+ std %f4, [FP-112]
162
+ std %f6, [FP-104]
163
+ std %f8, [FP-96]
164
+ std %f10, [FP-88]
165
+ std %f12, [FP-80]
166
+ std %f14, [FP-72]
167
+ std %f16, [FP-64]
168
+ std %f18, [FP-56]
169
+ std %f20, [FP-48]
170
+ std %f22, [FP-40]
171
+ std %f24, [FP-32]
172
+ std %f26, [FP-24]
173
+ std %f28, [FP-16]
174
+ std %f30, [FP-8]
175
+
176
+ ! Call ffi_closure_sparc_inner to do the bulk of the work.
177
+ mov %g1, %o0
178
+ add %fp, STACK_BIAS-160, %o1
179
+ add %fp, STACK_BIAS+128, %o2
180
+ call ffi_closure_sparc_inner_v9
181
+ add %fp, STACK_BIAS-128, %o3
182
+
183
+ ! Load up the return value in the proper type.
184
+ ! See ffi_prep_cif_machdep for the list of cases.
185
+ cmp %o0, FFI_TYPE_VOID
186
+ be,pn %icc, done1
187
+
188
+ cmp %o0, FFI_TYPE_INT
189
+ be,pn %icc, integer
190
+
191
+ cmp %o0, FFI_TYPE_FLOAT
192
+ be,a,pn %icc, done1
193
+ ld [FP-160], %f0
194
+
195
+ cmp %o0, FFI_TYPE_DOUBLE
196
+ be,a,pn %icc, done1
197
+ ldd [FP-160], %f0
198
+
199
+ #if FFI_TYPE_LONGDOUBLE != FFI_TYPE_DOUBLE
200
+ cmp %o0, FFI_TYPE_LONGDOUBLE
201
+ be,a,pn %icc, longdouble1
202
+ ldd [FP-160], %f0
203
+ #endif
204
+
205
+ ! FFI_TYPE_STRUCT
206
+ ldx [FP-152], %i1
207
+ ldx [FP-144], %i2
208
+ ldx [FP-136], %i3
209
+ ldd [FP-160], %f0
210
+ ldd [FP-152], %f2
211
+ ldd [FP-144], %f4
212
+ ldd [FP-136], %f6
213
+
214
+ integer:
215
+ ldx [FP-160], %i0
216
+
217
+ done1:
218
+ ret
219
+ restore
220
+
221
+ #if FFI_TYPE_LONGDOUBLE != FFI_TYPE_DOUBLE
222
+ longdouble1:
223
+ ldd [FP-152], %f2
224
+ ret
225
+ restore
226
+ #endif
227
+ .LLFE2:
228
+
229
+ .ffi_closure_v9_end:
230
+ .size ffi_closure_v9,.ffi_closure_v9_end-ffi_closure_v9
231
+
232
+ #ifdef HAVE_RO_EH_FRAME
233
+ .section ".eh_frame",#alloc
234
+ #else
235
+ .section ".eh_frame",#alloc,#write
236
+ #endif
237
+ .LLframe1:
238
+ .uaword .LLECIE1-.LLSCIE1 ! Length of Common Information Entry
239
+ .LLSCIE1:
240
+ .uaword 0x0 ! CIE Identifier Tag
241
+ .byte 0x1 ! CIE Version
242
+ .ascii "zR\0" ! CIE Augmentation
243
+ .byte 0x1 ! uleb128 0x1; CIE Code Alignment Factor
244
+ .byte 0x78 ! sleb128 -8; CIE Data Alignment Factor
245
+ .byte 0xf ! CIE RA Column
246
+ .byte 0x1 ! uleb128 0x1; Augmentation size
247
+ #ifdef HAVE_AS_SPARC_UA_PCREL
248
+ .byte 0x1b ! FDE Encoding (pcrel sdata4)
249
+ #else
250
+ .byte 0x50 ! FDE Encoding (aligned absolute)
251
+ #endif
252
+ .byte 0xc ! DW_CFA_def_cfa
253
+ .byte 0xe ! uleb128 0xe
254
+ .byte 0xff,0xf ! uleb128 0x7ff
255
+ .align 8
256
+ .LLECIE1:
257
+ .LLSFDE1:
258
+ .uaword .LLEFDE1-.LLASFDE1 ! FDE Length
259
+ .LLASFDE1:
260
+ .uaword .LLASFDE1-.LLframe1 ! FDE CIE offset
261
+ #ifdef HAVE_AS_SPARC_UA_PCREL
262
+ .uaword %r_disp32(.LLFB1)
263
+ .uaword .LLFE1-.LLFB1 ! FDE address range
264
+ #else
265
+ .align 8
266
+ .xword .LLFB1
267
+ .uaxword .LLFE1-.LLFB1 ! FDE address range
268
+ #endif
269
+ .byte 0x0 ! uleb128 0x0; Augmentation size
270
+ .byte 0x4 ! DW_CFA_advance_loc4
271
+ .uaword .LLCFI0-.LLFB1
272
+ .byte 0xd ! DW_CFA_def_cfa_register
273
+ .byte 0x1e ! uleb128 0x1e
274
+ .byte 0x2d ! DW_CFA_GNU_window_save
275
+ .byte 0x9 ! DW_CFA_register
276
+ .byte 0xf ! uleb128 0xf
277
+ .byte 0x1f ! uleb128 0x1f
278
+ .align 8
279
+ .LLEFDE1:
280
+ .LLSFDE2:
281
+ .uaword .LLEFDE2-.LLASFDE2 ! FDE Length
282
+ .LLASFDE2:
283
+ .uaword .LLASFDE2-.LLframe1 ! FDE CIE offset
284
+ #ifdef HAVE_AS_SPARC_UA_PCREL
285
+ .uaword %r_disp32(.LLFB2)
286
+ .uaword .LLFE2-.LLFB2 ! FDE address range
287
+ #else
288
+ .align 8
289
+ .xword .LLFB2
290
+ .uaxword .LLFE2-.LLFB2 ! FDE address range
291
+ #endif
292
+ .byte 0x0 ! uleb128 0x0; Augmentation size
293
+ .byte 0x4 ! DW_CFA_advance_loc4
294
+ .uaword .LLCFI1-.LLFB2
295
+ .byte 0xd ! DW_CFA_def_cfa_register
296
+ .byte 0x1e ! uleb128 0x1e
297
+ .byte 0x2d ! DW_CFA_GNU_window_save
298
+ .byte 0x9 ! DW_CFA_register
299
+ .byte 0xf ! uleb128 0xf
300
+ .byte 0x1f ! uleb128 0x1f
301
+ .align 8
302
+ .LLEFDE2:
303
+ #endif
304
+
305
+ #ifdef __linux__
306
+ .section .note.GNU-stack,"",@progbits
307
+ #endif