ffi 1.9.21-x64-mingw32 → 1.9.22-x64-mingw32

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

Potentially problematic release.


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

Files changed (551) hide show
  1. checksums.yaml +4 -4
  2. data/.gitignore +22 -0
  3. data/.gitmodules +3 -0
  4. data/.travis.yml +52 -0
  5. data/.yardopts +5 -0
  6. data/Gemfile +15 -0
  7. data/{spec/ffi/LICENSE.SPECS → LICENSE.SPECS} +1 -1
  8. data/README.md +1 -1
  9. data/Rakefile +28 -3
  10. data/appveyor.yml +22 -0
  11. data/ffi.gemspec +14 -1
  12. data/lib/2.0/ffi_c.so +0 -0
  13. data/lib/2.1/ffi_c.so +0 -0
  14. data/lib/2.2/ffi_c.so +0 -0
  15. data/lib/2.3/ffi_c.so +0 -0
  16. data/lib/2.4/ffi_c.so +0 -0
  17. data/lib/2.5/ffi_c.so +0 -0
  18. data/lib/ffi/library.rb +1 -1
  19. data/lib/ffi/version.rb +1 -1
  20. data/samples/getlogin.rb +8 -0
  21. data/samples/getpid.rb +8 -0
  22. data/samples/gettimeofday.rb +18 -0
  23. data/samples/hello.rb +7 -0
  24. data/samples/inotify.rb +60 -0
  25. data/samples/pty.rb +76 -0
  26. data/samples/qsort.rb +21 -0
  27. data/samples/sample_helper.rb +6 -0
  28. metadata +17 -526
  29. data/ext/ffi_c/AbstractMemory.c +0 -1109
  30. data/ext/ffi_c/AbstractMemory.h +0 -175
  31. data/ext/ffi_c/ArrayType.c +0 -162
  32. data/ext/ffi_c/ArrayType.h +0 -59
  33. data/ext/ffi_c/Buffer.c +0 -365
  34. data/ext/ffi_c/Call.c +0 -517
  35. data/ext/ffi_c/Call.h +0 -110
  36. data/ext/ffi_c/ClosurePool.c +0 -283
  37. data/ext/ffi_c/ClosurePool.h +0 -57
  38. data/ext/ffi_c/DataConverter.c +0 -91
  39. data/ext/ffi_c/DynamicLibrary.c +0 -339
  40. data/ext/ffi_c/DynamicLibrary.h +0 -98
  41. data/ext/ffi_c/Function.c +0 -998
  42. data/ext/ffi_c/Function.h +0 -87
  43. data/ext/ffi_c/FunctionInfo.c +0 -271
  44. data/ext/ffi_c/LastError.c +0 -184
  45. data/ext/ffi_c/LastError.h +0 -47
  46. data/ext/ffi_c/LongDouble.c +0 -63
  47. data/ext/ffi_c/LongDouble.h +0 -51
  48. data/ext/ffi_c/MappedType.c +0 -168
  49. data/ext/ffi_c/MappedType.h +0 -59
  50. data/ext/ffi_c/MemoryPointer.c +0 -197
  51. data/ext/ffi_c/MemoryPointer.h +0 -53
  52. data/ext/ffi_c/MethodHandle.c +0 -358
  53. data/ext/ffi_c/MethodHandle.h +0 -55
  54. data/ext/ffi_c/Platform.c +0 -129
  55. data/ext/ffi_c/Platform.h +0 -45
  56. data/ext/ffi_c/Pointer.c +0 -508
  57. data/ext/ffi_c/Pointer.h +0 -63
  58. data/ext/ffi_c/Struct.c +0 -829
  59. data/ext/ffi_c/Struct.h +0 -106
  60. data/ext/ffi_c/StructByReference.c +0 -190
  61. data/ext/ffi_c/StructByReference.h +0 -50
  62. data/ext/ffi_c/StructByValue.c +0 -150
  63. data/ext/ffi_c/StructByValue.h +0 -55
  64. data/ext/ffi_c/StructLayout.c +0 -698
  65. data/ext/ffi_c/Thread.c +0 -352
  66. data/ext/ffi_c/Thread.h +0 -95
  67. data/ext/ffi_c/Type.c +0 -397
  68. data/ext/ffi_c/Type.h +0 -62
  69. data/ext/ffi_c/Types.c +0 -139
  70. data/ext/ffi_c/Types.h +0 -89
  71. data/ext/ffi_c/Variadic.c +0 -304
  72. data/ext/ffi_c/compat.h +0 -78
  73. data/ext/ffi_c/extconf.rb +0 -71
  74. data/ext/ffi_c/ffi.c +0 -98
  75. data/ext/ffi_c/libffi.bsd.mk +0 -40
  76. data/ext/ffi_c/libffi.darwin.mk +0 -105
  77. data/ext/ffi_c/libffi.gnu.mk +0 -32
  78. data/ext/ffi_c/libffi.mk +0 -18
  79. data/ext/ffi_c/libffi.vc.mk +0 -26
  80. data/ext/ffi_c/libffi.vc64.mk +0 -26
  81. data/ext/ffi_c/libffi/ChangeLog.libffi +0 -584
  82. data/ext/ffi_c/libffi/ChangeLog.libffi-3.1 +0 -6000
  83. data/ext/ffi_c/libffi/ChangeLog.libgcj +0 -40
  84. data/ext/ffi_c/libffi/ChangeLog.v1 +0 -764
  85. data/ext/ffi_c/libffi/LICENSE +0 -21
  86. data/ext/ffi_c/libffi/Makefile.am +0 -205
  87. data/ext/ffi_c/libffi/Makefile.in +0 -1805
  88. data/ext/ffi_c/libffi/README +0 -454
  89. data/ext/ffi_c/libffi/acinclude.m4 +0 -473
  90. data/ext/ffi_c/libffi/aclocal.m4 +0 -2134
  91. data/ext/ffi_c/libffi/autogen.sh +0 -2
  92. data/ext/ffi_c/libffi/autom4te.cache/output.0 +0 -21972
  93. data/ext/ffi_c/libffi/autom4te.cache/output.1 +0 -21972
  94. data/ext/ffi_c/libffi/autom4te.cache/output.2 +0 -21972
  95. data/ext/ffi_c/libffi/autom4te.cache/output.3 +0 -21972
  96. data/ext/ffi_c/libffi/autom4te.cache/requests +0 -331
  97. data/ext/ffi_c/libffi/autom4te.cache/traces.0 +0 -4010
  98. data/ext/ffi_c/libffi/autom4te.cache/traces.1 +0 -1005
  99. data/ext/ffi_c/libffi/autom4te.cache/traces.2 +0 -4010
  100. data/ext/ffi_c/libffi/autom4te.cache/traces.3 +0 -4010
  101. data/ext/ffi_c/libffi/compile +0 -347
  102. data/ext/ffi_c/libffi/config.guess +0 -1462
  103. data/ext/ffi_c/libffi/config.sub +0 -1825
  104. data/ext/ffi_c/libffi/configure +0 -21972
  105. data/ext/ffi_c/libffi/configure.ac +0 -388
  106. data/ext/ffi_c/libffi/configure.host +0 -272
  107. data/ext/ffi_c/libffi/depcomp +0 -791
  108. data/ext/ffi_c/libffi/doc/Makefile.am +0 -3
  109. data/ext/ffi_c/libffi/doc/Makefile.in +0 -811
  110. data/ext/ffi_c/libffi/doc/libffi.texi +0 -985
  111. data/ext/ffi_c/libffi/doc/mdate-sh +0 -228
  112. data/ext/ffi_c/libffi/doc/texinfo.tex +0 -10079
  113. data/ext/ffi_c/libffi/doc/version.texi +0 -4
  114. data/ext/ffi_c/libffi/fficonfig.h.in +0 -210
  115. data/ext/ffi_c/libffi/fficonfig.h.in~ +0 -210
  116. data/ext/ffi_c/libffi/generate-darwin-source-and-headers.py +0 -207
  117. data/ext/ffi_c/libffi/include/Makefile.am +0 -9
  118. data/ext/ffi_c/libffi/include/Makefile.in +0 -604
  119. data/ext/ffi_c/libffi/include/ffi.h.in +0 -484
  120. data/ext/ffi_c/libffi/include/ffi_cfi.h +0 -55
  121. data/ext/ffi_c/libffi/include/ffi_common.h +0 -147
  122. data/ext/ffi_c/libffi/install-sh +0 -508
  123. data/ext/ffi_c/libffi/libffi.map.in +0 -80
  124. data/ext/ffi_c/libffi/libffi.pc.in +0 -11
  125. data/ext/ffi_c/libffi/libffi.xcodeproj/project.pbxproj +0 -637
  126. data/ext/ffi_c/libffi/libtool-ldflags +0 -106
  127. data/ext/ffi_c/libffi/libtool-version +0 -29
  128. data/ext/ffi_c/libffi/ltmain.sh +0 -11156
  129. data/ext/ffi_c/libffi/m4/asmcfi.m4 +0 -13
  130. data/ext/ffi_c/libffi/m4/ax_append_flag.m4 +0 -69
  131. data/ext/ffi_c/libffi/m4/ax_cc_maxopt.m4 +0 -181
  132. data/ext/ffi_c/libffi/m4/ax_cflags_warn_all.m4 +0 -122
  133. data/ext/ffi_c/libffi/m4/ax_check_compile_flag.m4 +0 -72
  134. data/ext/ffi_c/libffi/m4/ax_compiler_vendor.m4 +0 -84
  135. data/ext/ffi_c/libffi/m4/ax_configure_args.m4 +0 -70
  136. data/ext/ffi_c/libffi/m4/ax_enable_builddir.m4 +0 -301
  137. data/ext/ffi_c/libffi/m4/ax_gcc_archflag.m4 +0 -225
  138. data/ext/ffi_c/libffi/m4/ax_gcc_x86_cpuid.m4 +0 -79
  139. data/ext/ffi_c/libffi/m4/libtool.m4 +0 -8387
  140. data/ext/ffi_c/libffi/m4/ltoptions.m4 +0 -437
  141. data/ext/ffi_c/libffi/m4/ltsugar.m4 +0 -124
  142. data/ext/ffi_c/libffi/m4/ltversion.m4 +0 -23
  143. data/ext/ffi_c/libffi/m4/lt~obsolete.m4 +0 -99
  144. data/ext/ffi_c/libffi/man/Makefile.am +0 -8
  145. data/ext/ffi_c/libffi/man/Makefile.in +0 -558
  146. data/ext/ffi_c/libffi/man/ffi.3 +0 -41
  147. data/ext/ffi_c/libffi/man/ffi_call.3 +0 -103
  148. data/ext/ffi_c/libffi/man/ffi_prep_cif.3 +0 -68
  149. data/ext/ffi_c/libffi/man/ffi_prep_cif_var.3 +0 -73
  150. data/ext/ffi_c/libffi/missing +0 -215
  151. data/ext/ffi_c/libffi/msvcc.sh +0 -260
  152. data/ext/ffi_c/libffi/src/aarch64/ffi.c +0 -941
  153. data/ext/ffi_c/libffi/src/aarch64/ffitarget.h +0 -81
  154. data/ext/ffi_c/libffi/src/aarch64/internal.h +0 -67
  155. data/ext/ffi_c/libffi/src/aarch64/sysv.S +0 -438
  156. data/ext/ffi_c/libffi/src/alpha/ffi.c +0 -521
  157. data/ext/ffi_c/libffi/src/alpha/ffitarget.h +0 -57
  158. data/ext/ffi_c/libffi/src/alpha/internal.h +0 -23
  159. data/ext/ffi_c/libffi/src/alpha/osf.S +0 -282
  160. data/ext/ffi_c/libffi/src/arc/arcompact.S +0 -135
  161. data/ext/ffi_c/libffi/src/arc/ffi.c +0 -266
  162. data/ext/ffi_c/libffi/src/arc/ffitarget.h +0 -53
  163. data/ext/ffi_c/libffi/src/arm/ffi.c +0 -808
  164. data/ext/ffi_c/libffi/src/arm/ffitarget.h +0 -82
  165. data/ext/ffi_c/libffi/src/arm/internal.h +0 -7
  166. data/ext/ffi_c/libffi/src/arm/sysv.S +0 -383
  167. data/ext/ffi_c/libffi/src/avr32/ffi.c +0 -423
  168. data/ext/ffi_c/libffi/src/avr32/ffitarget.h +0 -55
  169. data/ext/ffi_c/libffi/src/avr32/sysv.S +0 -208
  170. data/ext/ffi_c/libffi/src/bfin/ffi.c +0 -196
  171. data/ext/ffi_c/libffi/src/bfin/ffitarget.h +0 -43
  172. data/ext/ffi_c/libffi/src/bfin/sysv.S +0 -179
  173. data/ext/ffi_c/libffi/src/closures.c +0 -890
  174. data/ext/ffi_c/libffi/src/cris/ffi.c +0 -386
  175. data/ext/ffi_c/libffi/src/cris/ffitarget.h +0 -56
  176. data/ext/ffi_c/libffi/src/cris/sysv.S +0 -215
  177. data/ext/ffi_c/libffi/src/debug.c +0 -64
  178. data/ext/ffi_c/libffi/src/dlmalloc.c +0 -5166
  179. data/ext/ffi_c/libffi/src/frv/eabi.S +0 -128
  180. data/ext/ffi_c/libffi/src/frv/ffi.c +0 -292
  181. data/ext/ffi_c/libffi/src/frv/ffitarget.h +0 -62
  182. data/ext/ffi_c/libffi/src/ia64/ffi.c +0 -586
  183. data/ext/ffi_c/libffi/src/ia64/ffitarget.h +0 -55
  184. data/ext/ffi_c/libffi/src/ia64/ia64_flags.h +0 -40
  185. data/ext/ffi_c/libffi/src/ia64/unix.S +0 -560
  186. data/ext/ffi_c/libffi/src/java_raw_api.c +0 -374
  187. data/ext/ffi_c/libffi/src/m32r/ffi.c +0 -232
  188. data/ext/ffi_c/libffi/src/m32r/ffitarget.h +0 -53
  189. data/ext/ffi_c/libffi/src/m32r/sysv.S +0 -121
  190. data/ext/ffi_c/libffi/src/m68k/ffi.c +0 -362
  191. data/ext/ffi_c/libffi/src/m68k/ffitarget.h +0 -54
  192. data/ext/ffi_c/libffi/src/m68k/sysv.S +0 -357
  193. data/ext/ffi_c/libffi/src/m88k/ffi.c +0 -400
  194. data/ext/ffi_c/libffi/src/m88k/ffitarget.h +0 -49
  195. data/ext/ffi_c/libffi/src/m88k/obsd.S +0 -209
  196. data/ext/ffi_c/libffi/src/metag/ffi.c +0 -330
  197. data/ext/ffi_c/libffi/src/metag/ffitarget.h +0 -53
  198. data/ext/ffi_c/libffi/src/metag/sysv.S +0 -311
  199. data/ext/ffi_c/libffi/src/microblaze/ffi.c +0 -321
  200. data/ext/ffi_c/libffi/src/microblaze/ffitarget.h +0 -53
  201. data/ext/ffi_c/libffi/src/microblaze/sysv.S +0 -302
  202. data/ext/ffi_c/libffi/src/mips/ffi.c +0 -1105
  203. data/ext/ffi_c/libffi/src/mips/ffitarget.h +0 -249
  204. data/ext/ffi_c/libffi/src/mips/n32.S +0 -661
  205. data/ext/ffi_c/libffi/src/mips/o32.S +0 -502
  206. data/ext/ffi_c/libffi/src/moxie/eabi.S +0 -101
  207. data/ext/ffi_c/libffi/src/moxie/ffi.c +0 -272
  208. data/ext/ffi_c/libffi/src/moxie/ffitarget.h +0 -52
  209. data/ext/ffi_c/libffi/src/nios2/ffi.c +0 -304
  210. data/ext/ffi_c/libffi/src/nios2/ffitarget.h +0 -52
  211. data/ext/ffi_c/libffi/src/nios2/sysv.S +0 -136
  212. data/ext/ffi_c/libffi/src/or1k/ffi.c +0 -328
  213. data/ext/ffi_c/libffi/src/or1k/ffitarget.h +0 -58
  214. data/ext/ffi_c/libffi/src/or1k/sysv.S +0 -107
  215. data/ext/ffi_c/libffi/src/pa/ffi.c +0 -719
  216. data/ext/ffi_c/libffi/src/pa/ffitarget.h +0 -85
  217. data/ext/ffi_c/libffi/src/pa/hpux32.S +0 -368
  218. data/ext/ffi_c/libffi/src/pa/linux.S +0 -357
  219. data/ext/ffi_c/libffi/src/powerpc/aix.S +0 -328
  220. data/ext/ffi_c/libffi/src/powerpc/aix_closure.S +0 -447
  221. data/ext/ffi_c/libffi/src/powerpc/asm.h +0 -125
  222. data/ext/ffi_c/libffi/src/powerpc/darwin.S +0 -378
  223. data/ext/ffi_c/libffi/src/powerpc/darwin_closure.S +0 -571
  224. data/ext/ffi_c/libffi/src/powerpc/ffi.c +0 -173
  225. data/ext/ffi_c/libffi/src/powerpc/ffi_darwin.c +0 -1359
  226. data/ext/ffi_c/libffi/src/powerpc/ffi_linux64.c +0 -945
  227. data/ext/ffi_c/libffi/src/powerpc/ffi_powerpc.h +0 -94
  228. data/ext/ffi_c/libffi/src/powerpc/ffi_sysv.c +0 -923
  229. data/ext/ffi_c/libffi/src/powerpc/ffitarget.h +0 -195
  230. data/ext/ffi_c/libffi/src/powerpc/linux64.S +0 -228
  231. data/ext/ffi_c/libffi/src/powerpc/linux64_closure.S +0 -488
  232. data/ext/ffi_c/libffi/src/powerpc/ppc_closure.S +0 -397
  233. data/ext/ffi_c/libffi/src/powerpc/sysv.S +0 -175
  234. data/ext/ffi_c/libffi/src/prep_cif.c +0 -261
  235. data/ext/ffi_c/libffi/src/raw_api.c +0 -267
  236. data/ext/ffi_c/libffi/src/s390/ffi.c +0 -756
  237. data/ext/ffi_c/libffi/src/s390/ffitarget.h +0 -70
  238. data/ext/ffi_c/libffi/src/s390/internal.h +0 -11
  239. data/ext/ffi_c/libffi/src/s390/sysv.S +0 -325
  240. data/ext/ffi_c/libffi/src/sh/ffi.c +0 -717
  241. data/ext/ffi_c/libffi/src/sh/ffitarget.h +0 -54
  242. data/ext/ffi_c/libffi/src/sh/sysv.S +0 -850
  243. data/ext/ffi_c/libffi/src/sh64/ffi.c +0 -469
  244. data/ext/ffi_c/libffi/src/sh64/ffitarget.h +0 -58
  245. data/ext/ffi_c/libffi/src/sh64/sysv.S +0 -539
  246. data/ext/ffi_c/libffi/src/sparc/ffi.c +0 -468
  247. data/ext/ffi_c/libffi/src/sparc/ffi64.c +0 -608
  248. data/ext/ffi_c/libffi/src/sparc/ffitarget.h +0 -81
  249. data/ext/ffi_c/libffi/src/sparc/internal.h +0 -26
  250. data/ext/ffi_c/libffi/src/sparc/v8.S +0 -443
  251. data/ext/ffi_c/libffi/src/sparc/v9.S +0 -440
  252. data/ext/ffi_c/libffi/src/tile/ffi.c +0 -355
  253. data/ext/ffi_c/libffi/src/tile/ffitarget.h +0 -65
  254. data/ext/ffi_c/libffi/src/tile/tile.S +0 -360
  255. data/ext/ffi_c/libffi/src/types.c +0 -106
  256. data/ext/ffi_c/libffi/src/vax/elfbsd.S +0 -195
  257. data/ext/ffi_c/libffi/src/vax/ffi.c +0 -276
  258. data/ext/ffi_c/libffi/src/vax/ffitarget.h +0 -49
  259. data/ext/ffi_c/libffi/src/x86/asmnames.h +0 -30
  260. data/ext/ffi_c/libffi/src/x86/ffi.c +0 -733
  261. data/ext/ffi_c/libffi/src/x86/ffi64.c +0 -857
  262. data/ext/ffi_c/libffi/src/x86/ffitarget.h +0 -141
  263. data/ext/ffi_c/libffi/src/x86/ffiw64.c +0 -287
  264. data/ext/ffi_c/libffi/src/x86/internal.h +0 -29
  265. data/ext/ffi_c/libffi/src/x86/internal64.h +0 -22
  266. data/ext/ffi_c/libffi/src/x86/sysv.S +0 -1043
  267. data/ext/ffi_c/libffi/src/x86/unix64.S +0 -525
  268. data/ext/ffi_c/libffi/src/x86/win64.S +0 -232
  269. data/ext/ffi_c/libffi/src/x86/win64_intel.S +0 -237
  270. data/ext/ffi_c/libffi/src/xtensa/ffi.c +0 -298
  271. data/ext/ffi_c/libffi/src/xtensa/ffitarget.h +0 -53
  272. data/ext/ffi_c/libffi/src/xtensa/sysv.S +0 -253
  273. data/ext/ffi_c/libffi/stamp-h.in +0 -1
  274. data/ext/ffi_c/libffi/testsuite/Makefile.am +0 -85
  275. data/ext/ffi_c/libffi/testsuite/Makefile.in +0 -607
  276. data/ext/ffi_c/libffi/testsuite/config/default.exp +0 -1
  277. data/ext/ffi_c/libffi/testsuite/lib/libffi.exp +0 -445
  278. data/ext/ffi_c/libffi/testsuite/lib/target-libpath.exp +0 -283
  279. data/ext/ffi_c/libffi/testsuite/lib/wrapper.exp +0 -45
  280. data/ext/ffi_c/libffi/testsuite/libffi.call/align_mixed.c +0 -46
  281. data/ext/ffi_c/libffi/testsuite/libffi.call/call.exp +0 -30
  282. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn0.c +0 -89
  283. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn1.c +0 -81
  284. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn2.c +0 -81
  285. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn3.c +0 -82
  286. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn4.c +0 -89
  287. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn5.c +0 -92
  288. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn6.c +0 -90
  289. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_loc_fn0.c +0 -95
  290. data/ext/ffi_c/libffi/testsuite/libffi.call/closure_simple.c +0 -55
  291. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_12byte.c +0 -94
  292. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_16byte.c +0 -95
  293. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_18byte.c +0 -96
  294. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_19byte.c +0 -102
  295. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_1_1byte.c +0 -89
  296. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_20byte.c +0 -91
  297. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_20byte1.c +0 -93
  298. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_24byte.c +0 -113
  299. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_2byte.c +0 -90
  300. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3_1byte.c +0 -95
  301. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3byte1.c +0 -90
  302. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3byte2.c +0 -90
  303. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_4_1byte.c +0 -98
  304. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_4byte.c +0 -90
  305. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_5_1_byte.c +0 -109
  306. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_5byte.c +0 -98
  307. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_64byte.c +0 -124
  308. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_6_1_byte.c +0 -113
  309. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_6byte.c +0 -99
  310. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_7_1_byte.c +0 -117
  311. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_7byte.c +0 -97
  312. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_8byte.c +0 -88
  313. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_9byte1.c +0 -90
  314. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_9byte2.c +0 -91
  315. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_double.c +0 -93
  316. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_float.c +0 -91
  317. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_longdouble.c +0 -92
  318. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_longdouble_split.c +0 -132
  319. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_longdouble_split2.c +0 -115
  320. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_pointer.c +0 -95
  321. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint16.c +0 -91
  322. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint32.c +0 -91
  323. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint64.c +0 -92
  324. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint16.c +0 -91
  325. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint32.c +0 -91
  326. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint64.c +0 -93
  327. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_dbls_struct.c +0 -66
  328. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_double.c +0 -43
  329. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_double_va.c +0 -61
  330. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_float.c +0 -42
  331. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_longdouble.c +0 -105
  332. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_longdouble_va.c +0 -61
  333. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_many_mixed_args.c +0 -70
  334. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_many_mixed_float_double.c +0 -55
  335. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_schar.c +0 -74
  336. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_sshort.c +0 -74
  337. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_sshortchar.c +0 -86
  338. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_uchar.c +0 -91
  339. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_ushort.c +0 -74
  340. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_ushortchar.c +0 -86
  341. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_pointer.c +0 -74
  342. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_pointer_stack.c +0 -142
  343. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_schar.c +0 -44
  344. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_sint.c +0 -42
  345. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_sshort.c +0 -42
  346. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_struct_va1.c +0 -114
  347. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_uchar.c +0 -42
  348. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_uchar_va.c +0 -44
  349. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_uint.c +0 -43
  350. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_uint_va.c +0 -45
  351. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ulong_va.c +0 -45
  352. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ulonglong.c +0 -47
  353. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ushort.c +0 -43
  354. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ushort_va.c +0 -44
  355. data/ext/ffi_c/libffi/testsuite/libffi.call/err_bad_abi.c +0 -36
  356. data/ext/ffi_c/libffi/testsuite/libffi.call/err_bad_typedef.c +0 -26
  357. data/ext/ffi_c/libffi/testsuite/libffi.call/ffitest.h +0 -136
  358. data/ext/ffi_c/libffi/testsuite/libffi.call/float.c +0 -59
  359. data/ext/ffi_c/libffi/testsuite/libffi.call/float1.c +0 -60
  360. data/ext/ffi_c/libffi/testsuite/libffi.call/float2.c +0 -60
  361. data/ext/ffi_c/libffi/testsuite/libffi.call/float3.c +0 -74
  362. data/ext/ffi_c/libffi/testsuite/libffi.call/float4.c +0 -62
  363. data/ext/ffi_c/libffi/testsuite/libffi.call/float_va.c +0 -107
  364. data/ext/ffi_c/libffi/testsuite/libffi.call/huge_struct.c +0 -341
  365. data/ext/ffi_c/libffi/testsuite/libffi.call/many.c +0 -59
  366. data/ext/ffi_c/libffi/testsuite/libffi.call/many2.c +0 -57
  367. data/ext/ffi_c/libffi/testsuite/libffi.call/many_double.c +0 -70
  368. data/ext/ffi_c/libffi/testsuite/libffi.call/many_mixed.c +0 -78
  369. data/ext/ffi_c/libffi/testsuite/libffi.call/negint.c +0 -52
  370. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct.c +0 -152
  371. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct1.c +0 -161
  372. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct10.c +0 -133
  373. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct11.c +0 -121
  374. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct2.c +0 -110
  375. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct3.c +0 -111
  376. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct4.c +0 -111
  377. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct5.c +0 -112
  378. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct6.c +0 -131
  379. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct7.c +0 -111
  380. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct8.c +0 -131
  381. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct9.c +0 -131
  382. data/ext/ffi_c/libffi/testsuite/libffi.call/offsets.c +0 -46
  383. data/ext/ffi_c/libffi/testsuite/libffi.call/pr1172638.c +0 -127
  384. data/ext/ffi_c/libffi/testsuite/libffi.call/problem1.c +0 -90
  385. data/ext/ffi_c/libffi/testsuite/libffi.call/promotion.c +0 -59
  386. data/ext/ffi_c/libffi/testsuite/libffi.call/pyobjc-tc.c +0 -114
  387. data/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl.c +0 -36
  388. data/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl1.c +0 -43
  389. data/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl2.c +0 -42
  390. data/ext/ffi_c/libffi/testsuite/libffi.call/return_fl.c +0 -35
  391. data/ext/ffi_c/libffi/testsuite/libffi.call/return_fl1.c +0 -36
  392. data/ext/ffi_c/libffi/testsuite/libffi.call/return_fl2.c +0 -49
  393. data/ext/ffi_c/libffi/testsuite/libffi.call/return_fl3.c +0 -42
  394. data/ext/ffi_c/libffi/testsuite/libffi.call/return_ldl.c +0 -34
  395. data/ext/ffi_c/libffi/testsuite/libffi.call/return_ll.c +0 -41
  396. data/ext/ffi_c/libffi/testsuite/libffi.call/return_ll1.c +0 -43
  397. data/ext/ffi_c/libffi/testsuite/libffi.call/return_sc.c +0 -36
  398. data/ext/ffi_c/libffi/testsuite/libffi.call/return_sl.c +0 -38
  399. data/ext/ffi_c/libffi/testsuite/libffi.call/return_uc.c +0 -38
  400. data/ext/ffi_c/libffi/testsuite/libffi.call/return_ul.c +0 -38
  401. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_large.c +0 -145
  402. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_large2.c +0 -148
  403. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_medium.c +0 -124
  404. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_medium2.c +0 -125
  405. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen.c +0 -44
  406. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen2.c +0 -49
  407. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen3.c +0 -49
  408. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen4.c +0 -55
  409. data/ext/ffi_c/libffi/testsuite/libffi.call/struct1.c +0 -67
  410. data/ext/ffi_c/libffi/testsuite/libffi.call/struct2.c +0 -67
  411. data/ext/ffi_c/libffi/testsuite/libffi.call/struct3.c +0 -60
  412. data/ext/ffi_c/libffi/testsuite/libffi.call/struct4.c +0 -64
  413. data/ext/ffi_c/libffi/testsuite/libffi.call/struct5.c +0 -66
  414. data/ext/ffi_c/libffi/testsuite/libffi.call/struct6.c +0 -64
  415. data/ext/ffi_c/libffi/testsuite/libffi.call/struct7.c +0 -74
  416. data/ext/ffi_c/libffi/testsuite/libffi.call/struct8.c +0 -81
  417. data/ext/ffi_c/libffi/testsuite/libffi.call/struct9.c +0 -68
  418. data/ext/ffi_c/libffi/testsuite/libffi.call/testclosure.c +0 -70
  419. data/ext/ffi_c/libffi/testsuite/libffi.call/uninitialized.c +0 -61
  420. data/ext/ffi_c/libffi/testsuite/libffi.call/unwindtest.cc +0 -117
  421. data/ext/ffi_c/libffi/testsuite/libffi.call/unwindtest_ffi_call.cc +0 -54
  422. data/ext/ffi_c/libffi/testsuite/libffi.call/va_1.c +0 -196
  423. data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct1.c +0 -121
  424. data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct2.c +0 -123
  425. data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct3.c +0 -125
  426. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex.inc +0 -91
  427. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_double.c +0 -10
  428. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_float.c +0 -10
  429. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_longdouble.c +0 -10
  430. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex.inc +0 -42
  431. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_double.c +0 -10
  432. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_float.c +0 -10
  433. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_longdouble.c +0 -10
  434. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct.inc +0 -71
  435. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_double.c +0 -10
  436. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_float.c +0 -10
  437. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_longdouble.c +0 -10
  438. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va.inc +0 -80
  439. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_double.c +0 -10
  440. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_float.c +0 -16
  441. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_longdouble.c +0 -10
  442. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex.exp +0 -36
  443. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex.inc +0 -51
  444. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_double.inc +0 -7
  445. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_float.inc +0 -7
  446. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_longdouble.inc +0 -7
  447. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_double.c +0 -10
  448. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_float.c +0 -10
  449. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_int.c +0 -86
  450. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_longdouble.c +0 -10
  451. data/ext/ffi_c/libffi/testsuite/libffi.complex/ffitest.h +0 -1
  452. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex.inc +0 -78
  453. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_double.c +0 -10
  454. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_float.c +0 -10
  455. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_longdouble.c +0 -10
  456. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex.inc +0 -37
  457. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1.inc +0 -41
  458. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_double.c +0 -10
  459. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_float.c +0 -10
  460. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_longdouble.c +0 -10
  461. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2.inc +0 -44
  462. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_double.c +0 -10
  463. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_float.c +0 -10
  464. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_longdouble.c +0 -10
  465. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_double.c +0 -10
  466. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_float.c +0 -10
  467. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_longdouble.c +0 -10
  468. data/ext/ffi_c/libffi/testsuite/libffi.go/aa-direct.c +0 -34
  469. data/ext/ffi_c/libffi/testsuite/libffi.go/closure1.c +0 -28
  470. data/ext/ffi_c/libffi/testsuite/libffi.go/ffitest.h +0 -1
  471. data/ext/ffi_c/libffi/testsuite/libffi.go/go.exp +0 -36
  472. data/ext/ffi_c/libffi/testsuite/libffi.go/static-chain.h +0 -19
  473. data/ext/ffi_c/rbffi.h +0 -57
  474. data/ext/ffi_c/rbffi_endian.h +0 -59
  475. data/ext/ffi_c/win32/stdbool.h +0 -8
  476. data/ext/ffi_c/win32/stdint.h +0 -201
  477. data/gen/Rakefile +0 -30
  478. data/libtest/Benchmark.c +0 -52
  479. data/libtest/BoolTest.c +0 -34
  480. data/libtest/BufferTest.c +0 -31
  481. data/libtest/ClosureTest.c +0 -205
  482. data/libtest/EnumTest.c +0 -51
  483. data/libtest/FunctionTest.c +0 -70
  484. data/libtest/GNUmakefile +0 -149
  485. data/libtest/GlobalVariable.c +0 -62
  486. data/libtest/LastErrorTest.c +0 -21
  487. data/libtest/NumberTest.c +0 -132
  488. data/libtest/PointerTest.c +0 -63
  489. data/libtest/ReferenceTest.c +0 -23
  490. data/libtest/StringTest.c +0 -34
  491. data/libtest/StructTest.c +0 -243
  492. data/libtest/UnionTest.c +0 -43
  493. data/libtest/VariadicTest.c +0 -99
  494. data/spec/ffi/async_callback_spec.rb +0 -35
  495. data/spec/ffi/bitmask_spec.rb +0 -575
  496. data/spec/ffi/bool_spec.rb +0 -32
  497. data/spec/ffi/buffer_spec.rb +0 -279
  498. data/spec/ffi/callback_spec.rb +0 -773
  499. data/spec/ffi/custom_param_type.rb +0 -37
  500. data/spec/ffi/custom_type_spec.rb +0 -74
  501. data/spec/ffi/dup_spec.rb +0 -52
  502. data/spec/ffi/embed-test/ext/Makefile +0 -242
  503. data/spec/ffi/enum_spec.rb +0 -423
  504. data/spec/ffi/errno_spec.rb +0 -20
  505. data/spec/ffi/ffi_spec.rb +0 -28
  506. data/spec/ffi/fixtures/Benchmark.c +0 -52
  507. data/spec/ffi/fixtures/BitmaskTest.c +0 -51
  508. data/spec/ffi/fixtures/BoolTest.c +0 -34
  509. data/spec/ffi/fixtures/BufferTest.c +0 -31
  510. data/spec/ffi/fixtures/ClosureTest.c +0 -205
  511. data/spec/ffi/fixtures/EnumTest.c +0 -51
  512. data/spec/ffi/fixtures/FunctionTest.c +0 -142
  513. data/spec/ffi/fixtures/GNUmakefile +0 -149
  514. data/spec/ffi/fixtures/GlobalVariable.c +0 -62
  515. data/spec/ffi/fixtures/LastErrorTest.c +0 -21
  516. data/spec/ffi/fixtures/NumberTest.c +0 -132
  517. data/spec/ffi/fixtures/PipeHelper.h +0 -21
  518. data/spec/ffi/fixtures/PipeHelperPosix.c +0 -41
  519. data/spec/ffi/fixtures/PipeHelperWindows.c +0 -72
  520. data/spec/ffi/fixtures/PointerTest.c +0 -63
  521. data/spec/ffi/fixtures/ReferenceTest.c +0 -23
  522. data/spec/ffi/fixtures/StringTest.c +0 -34
  523. data/spec/ffi/fixtures/StructTest.c +0 -243
  524. data/spec/ffi/fixtures/UnionTest.c +0 -43
  525. data/spec/ffi/fixtures/VariadicTest.c +0 -99
  526. data/spec/ffi/fixtures/classes.rb +0 -438
  527. data/spec/ffi/function_spec.rb +0 -97
  528. data/spec/ffi/io_spec.rb +0 -16
  529. data/spec/ffi/library_spec.rb +0 -286
  530. data/spec/ffi/long_double.rb +0 -30
  531. data/spec/ffi/managed_struct_spec.rb +0 -68
  532. data/spec/ffi/memorypointer_spec.rb +0 -78
  533. data/spec/ffi/number_spec.rb +0 -247
  534. data/spec/ffi/platform_spec.rb +0 -114
  535. data/spec/ffi/pointer_spec.rb +0 -285
  536. data/spec/ffi/rbx/attach_function_spec.rb +0 -34
  537. data/spec/ffi/rbx/memory_pointer_spec.rb +0 -198
  538. data/spec/ffi/rbx/spec_helper.rb +0 -6
  539. data/spec/ffi/rbx/struct_spec.rb +0 -18
  540. data/spec/ffi/spec_helper.rb +0 -93
  541. data/spec/ffi/string_spec.rb +0 -118
  542. data/spec/ffi/strptr_spec.rb +0 -50
  543. data/spec/ffi/struct_by_ref_spec.rb +0 -43
  544. data/spec/ffi/struct_callback_spec.rb +0 -69
  545. data/spec/ffi/struct_initialize_spec.rb +0 -35
  546. data/spec/ffi/struct_packed_spec.rb +0 -50
  547. data/spec/ffi/struct_spec.rb +0 -882
  548. data/spec/ffi/typedef_spec.rb +0 -91
  549. data/spec/ffi/union_spec.rb +0 -67
  550. data/spec/ffi/variadic_spec.rb +0 -132
  551. data/spec/spec.opts +0 -4
@@ -1,94 +0,0 @@
1
- /* -----------------------------------------------------------------------
2
- ffi_powerpc.h - Copyright (C) 2013 IBM
3
- Copyright (C) 2011 Anthony Green
4
- Copyright (C) 2011 Kyle Moffett
5
- Copyright (C) 2008 Red Hat, Inc
6
- Copyright (C) 2007, 2008 Free Software Foundation, Inc
7
- Copyright (c) 1998 Geoffrey Keating
8
-
9
- PowerPC Foreign Function Interface
10
-
11
- Permission is hereby granted, free of charge, to any person obtaining
12
- a copy of this software and associated documentation files (the
13
- ``Software''), to deal in the Software without restriction, including
14
- without limitation the rights to use, copy, modify, merge, publish,
15
- distribute, sublicense, and/or sell copies of the Software, and to
16
- permit persons to whom the Software is furnished to do so, subject to
17
- the following conditions:
18
-
19
- The above copyright notice and this permission notice shall be included
20
- in all copies or substantial portions of the Software.
21
-
22
- THE SOFTWARE IS PROVIDED ``AS IS'', WITHOUT WARRANTY OF ANY KIND, EXPRESS
23
- OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
24
- MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
25
- IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY CLAIM, DAMAGES OR
26
- OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
27
- ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
28
- OTHER DEALINGS IN THE SOFTWARE.
29
- ----------------------------------------------------------------------- */
30
-
31
- enum {
32
- /* The assembly depends on these exact flags. */
33
- /* These go in cr7 */
34
- FLAG_RETURNS_SMST = 1 << (31-31), /* Used for FFI_SYSV small structs. */
35
- FLAG_RETURNS_NOTHING = 1 << (31-30),
36
- FLAG_RETURNS_FP = 1 << (31-29),
37
- FLAG_RETURNS_64BITS = 1 << (31-28),
38
-
39
- /* This goes in cr6 */
40
- FLAG_RETURNS_128BITS = 1 << (31-27),
41
-
42
- FLAG_COMPAT = 1 << (31- 8), /* Not used by assembly */
43
-
44
- /* These go in cr1 */
45
- FLAG_ARG_NEEDS_COPY = 1 << (31- 7), /* Used by sysv code */
46
- FLAG_ARG_NEEDS_PSAVE = FLAG_ARG_NEEDS_COPY, /* Used by linux64 code */
47
- FLAG_FP_ARGUMENTS = 1 << (31- 6), /* cr1.eq; specified by ABI */
48
- FLAG_4_GPR_ARGUMENTS = 1 << (31- 5),
49
- FLAG_RETVAL_REFERENCE = 1 << (31- 4)
50
- };
51
-
52
- typedef union
53
- {
54
- float f;
55
- double d;
56
- } ffi_dblfl;
57
-
58
- void FFI_HIDDEN ffi_closure_SYSV (void);
59
- void FFI_HIDDEN ffi_go_closure_sysv (void);
60
- void FFI_HIDDEN ffi_call_SYSV(extended_cif *, void (*)(void), void *,
61
- unsigned, void *, int);
62
-
63
- void FFI_HIDDEN ffi_prep_types_sysv (ffi_abi);
64
- ffi_status FFI_HIDDEN ffi_prep_cif_sysv (ffi_cif *);
65
- ffi_status FFI_HIDDEN ffi_prep_closure_loc_sysv (ffi_closure *,
66
- ffi_cif *,
67
- void (*) (ffi_cif *, void *,
68
- void **, void *),
69
- void *, void *);
70
- int FFI_HIDDEN ffi_closure_helper_SYSV (ffi_cif *,
71
- void (*) (ffi_cif *, void *,
72
- void **, void *),
73
- void *, void *, unsigned long *,
74
- ffi_dblfl *, unsigned long *);
75
-
76
- void FFI_HIDDEN ffi_call_LINUX64(extended_cif *, void (*) (void), void *,
77
- unsigned long, void *, long);
78
- void FFI_HIDDEN ffi_closure_LINUX64 (void);
79
- void FFI_HIDDEN ffi_go_closure_linux64 (void);
80
-
81
- void FFI_HIDDEN ffi_prep_types_linux64 (ffi_abi);
82
- ffi_status FFI_HIDDEN ffi_prep_cif_linux64 (ffi_cif *);
83
- ffi_status FFI_HIDDEN ffi_prep_cif_linux64_var (ffi_cif *, unsigned int,
84
- unsigned int);
85
- void FFI_HIDDEN ffi_prep_args64 (extended_cif *, unsigned long *const);
86
- ffi_status FFI_HIDDEN ffi_prep_closure_loc_linux64 (ffi_closure *, ffi_cif *,
87
- void (*) (ffi_cif *, void *,
88
- void **, void *),
89
- void *, void *);
90
- int FFI_HIDDEN ffi_closure_helper_LINUX64 (ffi_cif *,
91
- void (*) (ffi_cif *, void *,
92
- void **, void *),
93
- void *, void *,
94
- unsigned long *, ffi_dblfl *);
@@ -1,923 +0,0 @@
1
- /* -----------------------------------------------------------------------
2
- ffi_sysv.c - Copyright (C) 2013 IBM
3
- Copyright (C) 2011 Anthony Green
4
- Copyright (C) 2011 Kyle Moffett
5
- Copyright (C) 2008 Red Hat, Inc
6
- Copyright (C) 2007, 2008 Free Software Foundation, Inc
7
- Copyright (c) 1998 Geoffrey Keating
8
-
9
- PowerPC Foreign Function Interface
10
-
11
- Permission is hereby granted, free of charge, to any person obtaining
12
- a copy of this software and associated documentation files (the
13
- ``Software''), to deal in the Software without restriction, including
14
- without limitation the rights to use, copy, modify, merge, publish,
15
- distribute, sublicense, and/or sell copies of the Software, and to
16
- permit persons to whom the Software is furnished to do so, subject to
17
- the following conditions:
18
-
19
- The above copyright notice and this permission notice shall be included
20
- in all copies or substantial portions of the Software.
21
-
22
- THE SOFTWARE IS PROVIDED ``AS IS'', WITHOUT WARRANTY OF ANY KIND, EXPRESS
23
- OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
24
- MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
25
- IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY CLAIM, DAMAGES OR
26
- OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
27
- ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
28
- OTHER DEALINGS IN THE SOFTWARE.
29
- ----------------------------------------------------------------------- */
30
-
31
- #include "ffi.h"
32
-
33
- #ifndef POWERPC64
34
- #include "ffi_common.h"
35
- #include "ffi_powerpc.h"
36
-
37
-
38
- /* About the SYSV ABI. */
39
- #define ASM_NEEDS_REGISTERS 6
40
- #define NUM_GPR_ARG_REGISTERS 8
41
- #define NUM_FPR_ARG_REGISTERS 8
42
-
43
-
44
- #if HAVE_LONG_DOUBLE_VARIANT && FFI_TYPE_LONGDOUBLE != FFI_TYPE_DOUBLE
45
- /* Adjust size of ffi_type_longdouble. */
46
- void FFI_HIDDEN
47
- ffi_prep_types_sysv (ffi_abi abi)
48
- {
49
- if ((abi & (FFI_SYSV | FFI_SYSV_LONG_DOUBLE_128)) == FFI_SYSV)
50
- {
51
- ffi_type_longdouble.size = 8;
52
- ffi_type_longdouble.alignment = 8;
53
- }
54
- else
55
- {
56
- ffi_type_longdouble.size = 16;
57
- ffi_type_longdouble.alignment = 16;
58
- }
59
- }
60
- #endif
61
-
62
- /* Transform long double, double and float to other types as per abi. */
63
- static int
64
- translate_float (int abi, int type)
65
- {
66
- #if FFI_TYPE_LONGDOUBLE != FFI_TYPE_DOUBLE
67
- if (type == FFI_TYPE_LONGDOUBLE
68
- && (abi & FFI_SYSV_LONG_DOUBLE_128) == 0)
69
- type = FFI_TYPE_DOUBLE;
70
- #endif
71
- if ((abi & FFI_SYSV_SOFT_FLOAT) != 0)
72
- {
73
- if (type == FFI_TYPE_FLOAT)
74
- type = FFI_TYPE_UINT32;
75
- else if (type == FFI_TYPE_DOUBLE)
76
- type = FFI_TYPE_UINT64;
77
- #if FFI_TYPE_LONGDOUBLE != FFI_TYPE_DOUBLE
78
- else if (type == FFI_TYPE_LONGDOUBLE)
79
- type = FFI_TYPE_UINT128;
80
- }
81
- else if ((abi & FFI_SYSV_IBM_LONG_DOUBLE) == 0)
82
- {
83
- if (type == FFI_TYPE_LONGDOUBLE)
84
- type = FFI_TYPE_STRUCT;
85
- #endif
86
- }
87
- return type;
88
- }
89
-
90
- /* Perform machine dependent cif processing */
91
- static ffi_status
92
- ffi_prep_cif_sysv_core (ffi_cif *cif)
93
- {
94
- ffi_type **ptr;
95
- unsigned bytes;
96
- unsigned i, fpr_count = 0, gpr_count = 0, stack_count = 0;
97
- unsigned flags = cif->flags;
98
- unsigned struct_copy_size = 0;
99
- unsigned type = cif->rtype->type;
100
- unsigned size = cif->rtype->size;
101
-
102
- /* The machine-independent calculation of cif->bytes doesn't work
103
- for us. Redo the calculation. */
104
-
105
- /* Space for the frame pointer, callee's LR, and the asm's temp regs. */
106
- bytes = (2 + ASM_NEEDS_REGISTERS) * sizeof (int);
107
-
108
- /* Space for the GPR registers. */
109
- bytes += NUM_GPR_ARG_REGISTERS * sizeof (int);
110
-
111
- /* Return value handling. The rules for SYSV are as follows:
112
- - 32-bit (or less) integer values are returned in gpr3;
113
- - Structures of size <= 4 bytes also returned in gpr3;
114
- - 64-bit integer values and structures between 5 and 8 bytes are returned
115
- in gpr3 and gpr4;
116
- - Larger structures are allocated space and a pointer is passed as
117
- the first argument.
118
- - Single/double FP values are returned in fpr1;
119
- - long doubles (if not equivalent to double) are returned in
120
- fpr1,fpr2 for Linux and as for large structs for SysV. */
121
-
122
- type = translate_float (cif->abi, type);
123
-
124
- switch (type)
125
- {
126
- #if FFI_TYPE_LONGDOUBLE != FFI_TYPE_DOUBLE
127
- case FFI_TYPE_LONGDOUBLE:
128
- flags |= FLAG_RETURNS_128BITS;
129
- /* Fall through. */
130
- #endif
131
- case FFI_TYPE_DOUBLE:
132
- flags |= FLAG_RETURNS_64BITS;
133
- /* Fall through. */
134
- case FFI_TYPE_FLOAT:
135
- flags |= FLAG_RETURNS_FP;
136
- #ifdef __NO_FPRS__
137
- return FFI_BAD_ABI;
138
- #endif
139
- break;
140
-
141
- case FFI_TYPE_UINT128:
142
- flags |= FLAG_RETURNS_128BITS;
143
- /* Fall through. */
144
- case FFI_TYPE_UINT64:
145
- case FFI_TYPE_SINT64:
146
- flags |= FLAG_RETURNS_64BITS;
147
- break;
148
-
149
- case FFI_TYPE_STRUCT:
150
- /* The final SYSV ABI says that structures smaller or equal 8 bytes
151
- are returned in r3/r4. A draft ABI used by linux instead
152
- returns them in memory. */
153
- if ((cif->abi & FFI_SYSV_STRUCT_RET) != 0 && size <= 8)
154
- {
155
- flags |= FLAG_RETURNS_SMST;
156
- break;
157
- }
158
- gpr_count++;
159
- flags |= FLAG_RETVAL_REFERENCE;
160
- /* Fall through. */
161
- case FFI_TYPE_VOID:
162
- flags |= FLAG_RETURNS_NOTHING;
163
- break;
164
-
165
- default:
166
- /* Returns 32-bit integer, or similar. Nothing to do here. */
167
- break;
168
- }
169
-
170
- /* The first NUM_GPR_ARG_REGISTERS words of integer arguments, and the
171
- first NUM_FPR_ARG_REGISTERS fp arguments, go in registers; the rest
172
- goes on the stack. Structures and long doubles (if not equivalent
173
- to double) are passed as a pointer to a copy of the structure.
174
- Stuff on the stack needs to keep proper alignment. */
175
- for (ptr = cif->arg_types, i = cif->nargs; i > 0; i--, ptr++)
176
- {
177
- unsigned short typenum = (*ptr)->type;
178
-
179
- typenum = translate_float (cif->abi, typenum);
180
-
181
- switch (typenum)
182
- {
183
- #if FFI_TYPE_LONGDOUBLE != FFI_TYPE_DOUBLE
184
- case FFI_TYPE_LONGDOUBLE:
185
- if (fpr_count >= NUM_FPR_ARG_REGISTERS - 1)
186
- {
187
- fpr_count = NUM_FPR_ARG_REGISTERS;
188
- /* 8-byte align long doubles. */
189
- stack_count += stack_count & 1;
190
- stack_count += 4;
191
- }
192
- else
193
- fpr_count += 2;
194
- #ifdef __NO_FPRS__
195
- return FFI_BAD_ABI;
196
- #endif
197
- break;
198
- #endif
199
-
200
- case FFI_TYPE_DOUBLE:
201
- if (fpr_count >= NUM_FPR_ARG_REGISTERS)
202
- {
203
- /* 8-byte align doubles. */
204
- stack_count += stack_count & 1;
205
- stack_count += 2;
206
- }
207
- else
208
- fpr_count += 1;
209
- #ifdef __NO_FPRS__
210
- return FFI_BAD_ABI;
211
- #endif
212
- break;
213
-
214
- case FFI_TYPE_FLOAT:
215
- if (fpr_count >= NUM_FPR_ARG_REGISTERS)
216
- /* Yes, we don't follow the ABI, but neither does gcc. */
217
- stack_count += 1;
218
- else
219
- fpr_count += 1;
220
- #ifdef __NO_FPRS__
221
- return FFI_BAD_ABI;
222
- #endif
223
- break;
224
-
225
- case FFI_TYPE_UINT128:
226
- /* A long double in FFI_LINUX_SOFT_FLOAT can use only a set
227
- of four consecutive gprs. If we do not have enough, we
228
- have to adjust the gpr_count value. */
229
- if (gpr_count >= NUM_GPR_ARG_REGISTERS - 3)
230
- gpr_count = NUM_GPR_ARG_REGISTERS;
231
- if (gpr_count >= NUM_GPR_ARG_REGISTERS)
232
- stack_count += 4;
233
- else
234
- gpr_count += 4;
235
- break;
236
-
237
- case FFI_TYPE_UINT64:
238
- case FFI_TYPE_SINT64:
239
- /* 'long long' arguments are passed as two words, but
240
- either both words must fit in registers or both go
241
- on the stack. If they go on the stack, they must
242
- be 8-byte-aligned.
243
-
244
- Also, only certain register pairs can be used for
245
- passing long long int -- specifically (r3,r4), (r5,r6),
246
- (r7,r8), (r9,r10). */
247
- gpr_count += gpr_count & 1;
248
- if (gpr_count >= NUM_GPR_ARG_REGISTERS)
249
- {
250
- stack_count += stack_count & 1;
251
- stack_count += 2;
252
- }
253
- else
254
- gpr_count += 2;
255
- break;
256
-
257
- case FFI_TYPE_STRUCT:
258
- /* We must allocate space for a copy of these to enforce
259
- pass-by-value. Pad the space up to a multiple of 16
260
- bytes (the maximum alignment required for anything under
261
- the SYSV ABI). */
262
- struct_copy_size += ((*ptr)->size + 15) & ~0xF;
263
- /* Fall through (allocate space for the pointer). */
264
-
265
- case FFI_TYPE_POINTER:
266
- case FFI_TYPE_INT:
267
- case FFI_TYPE_UINT32:
268
- case FFI_TYPE_SINT32:
269
- case FFI_TYPE_UINT16:
270
- case FFI_TYPE_SINT16:
271
- case FFI_TYPE_UINT8:
272
- case FFI_TYPE_SINT8:
273
- /* Everything else is passed as a 4-byte word in a GPR, either
274
- the object itself or a pointer to it. */
275
- if (gpr_count >= NUM_GPR_ARG_REGISTERS)
276
- stack_count += 1;
277
- else
278
- gpr_count += 1;
279
- break;
280
-
281
- default:
282
- FFI_ASSERT (0);
283
- }
284
- }
285
-
286
- if (fpr_count != 0)
287
- flags |= FLAG_FP_ARGUMENTS;
288
- if (gpr_count > 4)
289
- flags |= FLAG_4_GPR_ARGUMENTS;
290
- if (struct_copy_size != 0)
291
- flags |= FLAG_ARG_NEEDS_COPY;
292
-
293
- /* Space for the FPR registers, if needed. */
294
- if (fpr_count != 0)
295
- bytes += NUM_FPR_ARG_REGISTERS * sizeof (double);
296
-
297
- /* Stack space. */
298
- bytes += stack_count * sizeof (int);
299
-
300
- /* The stack space allocated needs to be a multiple of 16 bytes. */
301
- bytes = (bytes + 15) & ~0xF;
302
-
303
- /* Add in the space for the copied structures. */
304
- bytes += struct_copy_size;
305
-
306
- cif->flags = flags;
307
- cif->bytes = bytes;
308
-
309
- return FFI_OK;
310
- }
311
-
312
- ffi_status FFI_HIDDEN
313
- ffi_prep_cif_sysv (ffi_cif *cif)
314
- {
315
- if ((cif->abi & FFI_SYSV) == 0)
316
- {
317
- /* This call is from old code. Translate to new ABI values. */
318
- cif->flags |= FLAG_COMPAT;
319
- switch (cif->abi)
320
- {
321
- default:
322
- return FFI_BAD_ABI;
323
-
324
- case FFI_COMPAT_SYSV:
325
- cif->abi = FFI_SYSV | FFI_SYSV_STRUCT_RET | FFI_SYSV_LONG_DOUBLE_128;
326
- break;
327
-
328
- case FFI_COMPAT_GCC_SYSV:
329
- cif->abi = FFI_SYSV | FFI_SYSV_LONG_DOUBLE_128;
330
- break;
331
-
332
- case FFI_COMPAT_LINUX:
333
- cif->abi = (FFI_SYSV | FFI_SYSV_IBM_LONG_DOUBLE
334
- | FFI_SYSV_LONG_DOUBLE_128);
335
- break;
336
-
337
- case FFI_COMPAT_LINUX_SOFT_FLOAT:
338
- cif->abi = (FFI_SYSV | FFI_SYSV_SOFT_FLOAT | FFI_SYSV_IBM_LONG_DOUBLE
339
- | FFI_SYSV_LONG_DOUBLE_128);
340
- break;
341
- }
342
- }
343
- return ffi_prep_cif_sysv_core (cif);
344
- }
345
-
346
- /* ffi_prep_args_SYSV is called by the assembly routine once stack space
347
- has been allocated for the function's arguments.
348
-
349
- The stack layout we want looks like this:
350
-
351
- | Return address from ffi_call_SYSV 4bytes | higher addresses
352
- |--------------------------------------------|
353
- | Previous backchain pointer 4 | stack pointer here
354
- |--------------------------------------------|<+ <<< on entry to
355
- | Saved r28-r31 4*4 | | ffi_call_SYSV
356
- |--------------------------------------------| |
357
- | GPR registers r3-r10 8*4 | | ffi_call_SYSV
358
- |--------------------------------------------| |
359
- | FPR registers f1-f8 (optional) 8*8 | |
360
- |--------------------------------------------| | stack |
361
- | Space for copied structures | | grows |
362
- |--------------------------------------------| | down V
363
- | Parameters that didn't fit in registers | |
364
- |--------------------------------------------| | lower addresses
365
- | Space for callee's LR 4 | |
366
- |--------------------------------------------| | stack pointer here
367
- | Current backchain pointer 4 |-/ during
368
- |--------------------------------------------| <<< ffi_call_SYSV
369
-
370
- */
371
-
372
- void FFI_HIDDEN
373
- ffi_prep_args_SYSV (extended_cif *ecif, unsigned *const stack)
374
- {
375
- const unsigned bytes = ecif->cif->bytes;
376
- const unsigned flags = ecif->cif->flags;
377
-
378
- typedef union
379
- {
380
- char *c;
381
- unsigned *u;
382
- long long *ll;
383
- float *f;
384
- double *d;
385
- } valp;
386
-
387
- /* 'stacktop' points at the previous backchain pointer. */
388
- valp stacktop;
389
-
390
- /* 'gpr_base' points at the space for gpr3, and grows upwards as
391
- we use GPR registers. */
392
- valp gpr_base;
393
- valp gpr_end;
394
-
395
- #ifndef __NO_FPRS__
396
- /* 'fpr_base' points at the space for fpr1, and grows upwards as
397
- we use FPR registers. */
398
- valp fpr_base;
399
- valp fpr_end;
400
- #endif
401
-
402
- /* 'copy_space' grows down as we put structures in it. It should
403
- stay 16-byte aligned. */
404
- valp copy_space;
405
-
406
- /* 'next_arg' grows up as we put parameters in it. */
407
- valp next_arg;
408
-
409
- int i;
410
- ffi_type **ptr;
411
- #ifndef __NO_FPRS__
412
- double double_tmp;
413
- #endif
414
- union
415
- {
416
- void **v;
417
- char **c;
418
- signed char **sc;
419
- unsigned char **uc;
420
- signed short **ss;
421
- unsigned short **us;
422
- unsigned int **ui;
423
- long long **ll;
424
- float **f;
425
- double **d;
426
- } p_argv;
427
- size_t struct_copy_size;
428
- unsigned gprvalue;
429
-
430
- stacktop.c = (char *) stack + bytes;
431
- gpr_end.u = stacktop.u - ASM_NEEDS_REGISTERS;
432
- gpr_base.u = gpr_end.u - NUM_GPR_ARG_REGISTERS;
433
- #ifndef __NO_FPRS__
434
- fpr_end.d = gpr_base.d;
435
- fpr_base.d = fpr_end.d - NUM_FPR_ARG_REGISTERS;
436
- copy_space.c = ((flags & FLAG_FP_ARGUMENTS) ? fpr_base.c : gpr_base.c);
437
- #else
438
- copy_space.c = gpr_base.c;
439
- #endif
440
- next_arg.u = stack + 2;
441
-
442
- /* Check that everything starts aligned properly. */
443
- FFI_ASSERT (((unsigned long) (char *) stack & 0xF) == 0);
444
- FFI_ASSERT (((unsigned long) copy_space.c & 0xF) == 0);
445
- FFI_ASSERT (((unsigned long) stacktop.c & 0xF) == 0);
446
- FFI_ASSERT ((bytes & 0xF) == 0);
447
- FFI_ASSERT (copy_space.c >= next_arg.c);
448
-
449
- /* Deal with return values that are actually pass-by-reference. */
450
- if (flags & FLAG_RETVAL_REFERENCE)
451
- *gpr_base.u++ = (unsigned) (char *) ecif->rvalue;
452
-
453
- /* Now for the arguments. */
454
- p_argv.v = ecif->avalue;
455
- for (ptr = ecif->cif->arg_types, i = ecif->cif->nargs;
456
- i > 0;
457
- i--, ptr++, p_argv.v++)
458
- {
459
- unsigned int typenum = (*ptr)->type;
460
-
461
- typenum = translate_float (ecif->cif->abi, typenum);
462
-
463
- /* Now test the translated value */
464
- switch (typenum)
465
- {
466
- #ifndef __NO_FPRS__
467
- # if FFI_TYPE_LONGDOUBLE != FFI_TYPE_DOUBLE
468
- case FFI_TYPE_LONGDOUBLE:
469
- double_tmp = (*p_argv.d)[0];
470
-
471
- if (fpr_base.d >= fpr_end.d - 1)
472
- {
473
- fpr_base.d = fpr_end.d;
474
- if (((next_arg.u - stack) & 1) != 0)
475
- next_arg.u += 1;
476
- *next_arg.d = double_tmp;
477
- next_arg.u += 2;
478
- double_tmp = (*p_argv.d)[1];
479
- *next_arg.d = double_tmp;
480
- next_arg.u += 2;
481
- }
482
- else
483
- {
484
- *fpr_base.d++ = double_tmp;
485
- double_tmp = (*p_argv.d)[1];
486
- *fpr_base.d++ = double_tmp;
487
- }
488
- FFI_ASSERT (flags & FLAG_FP_ARGUMENTS);
489
- break;
490
- # endif
491
- case FFI_TYPE_DOUBLE:
492
- double_tmp = **p_argv.d;
493
-
494
- if (fpr_base.d >= fpr_end.d)
495
- {
496
- if (((next_arg.u - stack) & 1) != 0)
497
- next_arg.u += 1;
498
- *next_arg.d = double_tmp;
499
- next_arg.u += 2;
500
- }
501
- else
502
- *fpr_base.d++ = double_tmp;
503
- FFI_ASSERT (flags & FLAG_FP_ARGUMENTS);
504
- break;
505
-
506
- case FFI_TYPE_FLOAT:
507
- double_tmp = **p_argv.f;
508
- if (fpr_base.d >= fpr_end.d)
509
- {
510
- *next_arg.f = (float) double_tmp;
511
- next_arg.u += 1;
512
- }
513
- else
514
- *fpr_base.d++ = double_tmp;
515
- FFI_ASSERT (flags & FLAG_FP_ARGUMENTS);
516
- break;
517
- #endif /* have FPRs */
518
-
519
- case FFI_TYPE_UINT128:
520
- /* The soft float ABI for long doubles works like this, a long double
521
- is passed in four consecutive GPRs if available. A maximum of 2
522
- long doubles can be passed in gprs. If we do not have 4 GPRs
523
- left, the long double is passed on the stack, 4-byte aligned. */
524
- if (gpr_base.u >= gpr_end.u - 3)
525
- {
526
- unsigned int ii;
527
- gpr_base.u = gpr_end.u;
528
- for (ii = 0; ii < 4; ii++)
529
- {
530
- unsigned int int_tmp = (*p_argv.ui)[ii];
531
- *next_arg.u++ = int_tmp;
532
- }
533
- }
534
- else
535
- {
536
- unsigned int ii;
537
- for (ii = 0; ii < 4; ii++)
538
- {
539
- unsigned int int_tmp = (*p_argv.ui)[ii];
540
- *gpr_base.u++ = int_tmp;
541
- }
542
- }
543
- break;
544
-
545
- case FFI_TYPE_UINT64:
546
- case FFI_TYPE_SINT64:
547
- if (gpr_base.u >= gpr_end.u - 1)
548
- {
549
- gpr_base.u = gpr_end.u;
550
- if (((next_arg.u - stack) & 1) != 0)
551
- next_arg.u++;
552
- *next_arg.ll = **p_argv.ll;
553
- next_arg.u += 2;
554
- }
555
- else
556
- {
557
- /* The abi states only certain register pairs can be
558
- used for passing long long int specifically (r3,r4),
559
- (r5,r6), (r7,r8), (r9,r10). If next arg is long long
560
- but not correct starting register of pair then skip
561
- until the proper starting register. */
562
- if (((gpr_end.u - gpr_base.u) & 1) != 0)
563
- gpr_base.u++;
564
- *gpr_base.ll++ = **p_argv.ll;
565
- }
566
- break;
567
-
568
- case FFI_TYPE_STRUCT:
569
- struct_copy_size = ((*ptr)->size + 15) & ~0xF;
570
- copy_space.c -= struct_copy_size;
571
- memcpy (copy_space.c, *p_argv.c, (*ptr)->size);
572
-
573
- gprvalue = (unsigned long) copy_space.c;
574
-
575
- FFI_ASSERT (copy_space.c > next_arg.c);
576
- FFI_ASSERT (flags & FLAG_ARG_NEEDS_COPY);
577
- goto putgpr;
578
-
579
- case FFI_TYPE_UINT8:
580
- gprvalue = **p_argv.uc;
581
- goto putgpr;
582
- case FFI_TYPE_SINT8:
583
- gprvalue = **p_argv.sc;
584
- goto putgpr;
585
- case FFI_TYPE_UINT16:
586
- gprvalue = **p_argv.us;
587
- goto putgpr;
588
- case FFI_TYPE_SINT16:
589
- gprvalue = **p_argv.ss;
590
- goto putgpr;
591
-
592
- case FFI_TYPE_INT:
593
- case FFI_TYPE_UINT32:
594
- case FFI_TYPE_SINT32:
595
- case FFI_TYPE_POINTER:
596
-
597
- gprvalue = **p_argv.ui;
598
-
599
- putgpr:
600
- if (gpr_base.u >= gpr_end.u)
601
- *next_arg.u++ = gprvalue;
602
- else
603
- *gpr_base.u++ = gprvalue;
604
- break;
605
- }
606
- }
607
-
608
- /* Check that we didn't overrun the stack... */
609
- FFI_ASSERT (copy_space.c >= next_arg.c);
610
- FFI_ASSERT (gpr_base.u <= gpr_end.u);
611
- #ifndef __NO_FPRS__
612
- FFI_ASSERT (fpr_base.u <= fpr_end.u);
613
- #endif
614
- FFI_ASSERT (((flags & FLAG_4_GPR_ARGUMENTS) != 0)
615
- == (gpr_end.u - gpr_base.u < 4));
616
- }
617
-
618
- #define MIN_CACHE_LINE_SIZE 8
619
-
620
- static void
621
- flush_icache (char *wraddr, char *xaddr, int size)
622
- {
623
- int i;
624
- for (i = 0; i < size; i += MIN_CACHE_LINE_SIZE)
625
- __asm__ volatile ("icbi 0,%0;" "dcbf 0,%1;"
626
- : : "r" (xaddr + i), "r" (wraddr + i) : "memory");
627
- __asm__ volatile ("icbi 0,%0;" "dcbf 0,%1;" "sync;" "isync;"
628
- : : "r"(xaddr + size - 1), "r"(wraddr + size - 1)
629
- : "memory");
630
- }
631
-
632
- ffi_status FFI_HIDDEN
633
- ffi_prep_closure_loc_sysv (ffi_closure *closure,
634
- ffi_cif *cif,
635
- void (*fun) (ffi_cif *, void *, void **, void *),
636
- void *user_data,
637
- void *codeloc)
638
- {
639
- unsigned int *tramp;
640
-
641
- if (cif->abi < FFI_SYSV || cif->abi >= FFI_LAST_ABI)
642
- return FFI_BAD_ABI;
643
-
644
- tramp = (unsigned int *) &closure->tramp[0];
645
- tramp[0] = 0x7c0802a6; /* mflr r0 */
646
- tramp[1] = 0x429f0005; /* bcl 20,31,.+4 */
647
- tramp[2] = 0x7d6802a6; /* mflr r11 */
648
- tramp[3] = 0x7c0803a6; /* mtlr r0 */
649
- tramp[4] = 0x800b0018; /* lwz r0,24(r11) */
650
- tramp[5] = 0x816b001c; /* lwz r11,28(r11) */
651
- tramp[6] = 0x7c0903a6; /* mtctr r0 */
652
- tramp[7] = 0x4e800420; /* bctr */
653
- *(void **) &tramp[8] = (void *) ffi_closure_SYSV; /* function */
654
- *(void **) &tramp[9] = codeloc; /* context */
655
-
656
- /* Flush the icache. */
657
- flush_icache ((char *)tramp, (char *)codeloc, 8 * 4);
658
-
659
- closure->cif = cif;
660
- closure->fun = fun;
661
- closure->user_data = user_data;
662
-
663
- return FFI_OK;
664
- }
665
-
666
- /* Basically the trampoline invokes ffi_closure_SYSV, and on
667
- entry, r11 holds the address of the closure.
668
- After storing the registers that could possibly contain
669
- parameters to be passed into the stack frame and setting
670
- up space for a return value, ffi_closure_SYSV invokes the
671
- following helper function to do most of the work. */
672
-
673
- int
674
- ffi_closure_helper_SYSV (ffi_cif *cif,
675
- void (*fun) (ffi_cif *, void *, void **, void *),
676
- void *user_data,
677
- void *rvalue,
678
- unsigned long *pgr,
679
- ffi_dblfl *pfr,
680
- unsigned long *pst)
681
- {
682
- /* rvalue is the pointer to space for return value in closure assembly */
683
- /* pgr is the pointer to where r3-r10 are stored in ffi_closure_SYSV */
684
- /* pfr is the pointer to where f1-f8 are stored in ffi_closure_SYSV */
685
- /* pst is the pointer to outgoing parameter stack in original caller */
686
-
687
- void ** avalue;
688
- ffi_type ** arg_types;
689
- long i, avn;
690
- #ifndef __NO_FPRS__
691
- long nf = 0; /* number of floating registers already used */
692
- #endif
693
- long ng = 0; /* number of general registers already used */
694
-
695
- unsigned size = cif->rtype->size;
696
- unsigned short rtypenum = cif->rtype->type;
697
-
698
- avalue = alloca (cif->nargs * sizeof (void *));
699
-
700
- /* First translate for softfloat/nonlinux */
701
- rtypenum = translate_float (cif->abi, rtypenum);
702
-
703
- /* Copy the caller's structure return value address so that the closure
704
- returns the data directly to the caller.
705
- For FFI_SYSV the result is passed in r3/r4 if the struct size is less
706
- or equal 8 bytes. */
707
- if (rtypenum == FFI_TYPE_STRUCT
708
- && !((cif->abi & FFI_SYSV_STRUCT_RET) != 0 && size <= 8))
709
- {
710
- rvalue = (void *) *pgr;
711
- ng++;
712
- pgr++;
713
- }
714
-
715
- i = 0;
716
- avn = cif->nargs;
717
- arg_types = cif->arg_types;
718
-
719
- /* Grab the addresses of the arguments from the stack frame. */
720
- while (i < avn) {
721
- unsigned short typenum = arg_types[i]->type;
722
-
723
- /* We may need to handle some values depending on ABI. */
724
- typenum = translate_float (cif->abi, typenum);
725
-
726
- switch (typenum)
727
- {
728
- #ifndef __NO_FPRS__
729
- case FFI_TYPE_FLOAT:
730
- /* Unfortunately float values are stored as doubles
731
- in the ffi_closure_SYSV code (since we don't check
732
- the type in that routine). */
733
- if (nf < NUM_FPR_ARG_REGISTERS)
734
- {
735
- /* FIXME? here we are really changing the values
736
- stored in the original calling routines outgoing
737
- parameter stack. This is probably a really
738
- naughty thing to do but... */
739
- double temp = pfr->d;
740
- pfr->f = (float) temp;
741
- avalue[i] = pfr;
742
- nf++;
743
- pfr++;
744
- }
745
- else
746
- {
747
- avalue[i] = pst;
748
- pst += 1;
749
- }
750
- break;
751
-
752
- case FFI_TYPE_DOUBLE:
753
- if (nf < NUM_FPR_ARG_REGISTERS)
754
- {
755
- avalue[i] = pfr;
756
- nf++;
757
- pfr++;
758
- }
759
- else
760
- {
761
- if (((long) pst) & 4)
762
- pst++;
763
- avalue[i] = pst;
764
- pst += 2;
765
- }
766
- break;
767
-
768
- # if FFI_TYPE_LONGDOUBLE != FFI_TYPE_DOUBLE
769
- case FFI_TYPE_LONGDOUBLE:
770
- if (nf < NUM_FPR_ARG_REGISTERS - 1)
771
- {
772
- avalue[i] = pfr;
773
- pfr += 2;
774
- nf += 2;
775
- }
776
- else
777
- {
778
- if (((long) pst) & 4)
779
- pst++;
780
- avalue[i] = pst;
781
- pst += 4;
782
- nf = 8;
783
- }
784
- break;
785
- # endif
786
- #endif
787
-
788
- case FFI_TYPE_UINT128:
789
- /* Test if for the whole long double, 4 gprs are available.
790
- otherwise the stuff ends up on the stack. */
791
- if (ng < NUM_GPR_ARG_REGISTERS - 3)
792
- {
793
- avalue[i] = pgr;
794
- pgr += 4;
795
- ng += 4;
796
- }
797
- else
798
- {
799
- avalue[i] = pst;
800
- pst += 4;
801
- ng = 8+4;
802
- }
803
- break;
804
-
805
- case FFI_TYPE_SINT8:
806
- case FFI_TYPE_UINT8:
807
- #ifndef __LITTLE_ENDIAN__
808
- if (ng < NUM_GPR_ARG_REGISTERS)
809
- {
810
- avalue[i] = (char *) pgr + 3;
811
- ng++;
812
- pgr++;
813
- }
814
- else
815
- {
816
- avalue[i] = (char *) pst + 3;
817
- pst++;
818
- }
819
- break;
820
- #endif
821
-
822
- case FFI_TYPE_SINT16:
823
- case FFI_TYPE_UINT16:
824
- #ifndef __LITTLE_ENDIAN__
825
- if (ng < NUM_GPR_ARG_REGISTERS)
826
- {
827
- avalue[i] = (char *) pgr + 2;
828
- ng++;
829
- pgr++;
830
- }
831
- else
832
- {
833
- avalue[i] = (char *) pst + 2;
834
- pst++;
835
- }
836
- break;
837
- #endif
838
-
839
- case FFI_TYPE_SINT32:
840
- case FFI_TYPE_UINT32:
841
- case FFI_TYPE_POINTER:
842
- if (ng < NUM_GPR_ARG_REGISTERS)
843
- {
844
- avalue[i] = pgr;
845
- ng++;
846
- pgr++;
847
- }
848
- else
849
- {
850
- avalue[i] = pst;
851
- pst++;
852
- }
853
- break;
854
-
855
- case FFI_TYPE_STRUCT:
856
- /* Structs are passed by reference. The address will appear in a
857
- gpr if it is one of the first 8 arguments. */
858
- if (ng < NUM_GPR_ARG_REGISTERS)
859
- {
860
- avalue[i] = (void *) *pgr;
861
- ng++;
862
- pgr++;
863
- }
864
- else
865
- {
866
- avalue[i] = (void *) *pst;
867
- pst++;
868
- }
869
- break;
870
-
871
- case FFI_TYPE_SINT64:
872
- case FFI_TYPE_UINT64:
873
- /* Passing long long ints are complex, they must
874
- be passed in suitable register pairs such as
875
- (r3,r4) or (r5,r6) or (r6,r7), or (r7,r8) or (r9,r10)
876
- and if the entire pair aren't available then the outgoing
877
- parameter stack is used for both but an alignment of 8
878
- must will be kept. So we must either look in pgr
879
- or pst to find the correct address for this type
880
- of parameter. */
881
- if (ng < NUM_GPR_ARG_REGISTERS - 1)
882
- {
883
- if (ng & 1)
884
- {
885
- /* skip r4, r6, r8 as starting points */
886
- ng++;
887
- pgr++;
888
- }
889
- avalue[i] = pgr;
890
- ng += 2;
891
- pgr += 2;
892
- }
893
- else
894
- {
895
- if (((long) pst) & 4)
896
- pst++;
897
- avalue[i] = pst;
898
- pst += 2;
899
- ng = NUM_GPR_ARG_REGISTERS;
900
- }
901
- break;
902
-
903
- default:
904
- FFI_ASSERT (0);
905
- }
906
-
907
- i++;
908
- }
909
-
910
- (*fun) (cif, rvalue, avalue, user_data);
911
-
912
- /* Tell ffi_closure_SYSV how to perform return type promotions.
913
- Because the FFI_SYSV ABI returns the structures <= 8 bytes in
914
- r3/r4 we have to tell ffi_closure_SYSV how to treat them. We
915
- combine the base type FFI_SYSV_TYPE_SMALL_STRUCT with the size of
916
- the struct less one. We never have a struct with size zero.
917
- See the comment in ffitarget.h about ordering. */
918
- if (rtypenum == FFI_TYPE_STRUCT
919
- && (cif->abi & FFI_SYSV_STRUCT_RET) != 0 && size <= 8)
920
- return FFI_SYSV_TYPE_SMALL_STRUCT - 1 + size;
921
- return rtypenum;
922
- }
923
- #endif