ffi 1.1.5 → 1.15.5
Sign up to get free protection for your applications and to get access to all the features.
- checksums.yaml +7 -0
- data/CHANGELOG.md +338 -0
- data/COPYING +49 -0
- data/Gemfile +14 -0
- data/LICENSE +21 -11
- data/LICENSE.SPECS +22 -0
- data/README.md +136 -0
- data/Rakefile +149 -154
- data/ext/ffi_c/AbstractMemory.c +133 -57
- data/ext/ffi_c/AbstractMemory.h +21 -12
- data/ext/ffi_c/ArrayType.c +27 -14
- data/ext/ffi_c/ArrayType.h +21 -12
- data/ext/ffi_c/Buffer.c +29 -25
- data/ext/ffi_c/Call.c +154 -125
- data/ext/ffi_c/Call.h +43 -20
- data/ext/ffi_c/ClosurePool.c +100 -42
- data/ext/ffi_c/ClosurePool.h +24 -13
- data/ext/ffi_c/DynamicLibrary.c +47 -28
- data/ext/ffi_c/DynamicLibrary.h +70 -12
- data/ext/ffi_c/Function.c +119 -167
- data/ext/ffi_c/Function.h +23 -19
- data/ext/ffi_c/FunctionInfo.c +55 -25
- data/ext/ffi_c/LastError.c +70 -21
- data/ext/ffi_c/LastError.h +21 -12
- data/ext/ffi_c/LongDouble.c +15 -9
- data/ext/ffi_c/LongDouble.h +21 -16
- data/ext/ffi_c/MappedType.c +22 -15
- data/ext/ffi_c/MappedType.h +21 -12
- data/ext/ffi_c/MemoryPointer.c +58 -33
- data/ext/ffi_c/MemoryPointer.h +22 -19
- data/ext/ffi_c/MethodHandle.c +49 -50
- data/ext/ffi_c/MethodHandle.h +24 -14
- data/ext/ffi_c/Platform.c +28 -62
- data/ext/ffi_c/Platform.h +21 -12
- data/ext/ffi_c/Pointer.c +63 -46
- data/ext/ffi_c/Pointer.h +22 -19
- data/ext/ffi_c/Struct.c +198 -80
- data/ext/ffi_c/Struct.h +33 -18
- data/ext/ffi_c/StructByValue.c +23 -20
- data/ext/ffi_c/StructByValue.h +21 -12
- data/ext/ffi_c/StructLayout.c +184 -39
- data/ext/ffi_c/Thread.c +73 -270
- data/ext/ffi_c/Thread.h +32 -35
- data/ext/ffi_c/Type.c +26 -32
- data/ext/ffi_c/Type.h +24 -10
- data/ext/ffi_c/Types.c +28 -20
- data/ext/ffi_c/Types.h +25 -16
- data/ext/ffi_c/Variadic.c +78 -39
- data/ext/ffi_c/compat.h +25 -17
- data/ext/ffi_c/extconf.rb +68 -31
- data/ext/ffi_c/ffi.c +27 -20
- data/ext/ffi_c/libffi/.appveyor.yml +66 -0
- data/ext/ffi_c/libffi/.gitattributes +4 -0
- data/ext/ffi_c/libffi/.github/issue_template.md +10 -0
- data/ext/ffi_c/libffi/.gitignore +38 -0
- data/ext/ffi_c/libffi/.travis/ar-lib +270 -0
- data/ext/ffi_c/libffi/.travis/bfin-sim.exp +58 -0
- data/ext/ffi_c/libffi/.travis/build-cross-in-container.sh +14 -0
- data/ext/ffi_c/libffi/.travis/build-in-container.sh +12 -0
- data/ext/ffi_c/libffi/.travis/build.sh +142 -0
- data/ext/ffi_c/libffi/.travis/compile +351 -0
- data/ext/ffi_c/libffi/.travis/install.sh +71 -0
- data/ext/ffi_c/libffi/.travis/m32r-sim.exp +58 -0
- data/ext/ffi_c/libffi/.travis/moxie-sim.exp +60 -0
- data/ext/ffi_c/libffi/.travis/or1k-sim.exp +58 -0
- data/ext/ffi_c/libffi/.travis/powerpc-eabisim.exp +58 -0
- data/ext/ffi_c/libffi/.travis/site.exp +27 -0
- data/ext/ffi_c/libffi/.travis/wine-sim.exp +55 -0
- data/ext/ffi_c/libffi/.travis.yml +83 -0
- data/ext/ffi_c/libffi/{ChangeLog → ChangeLog.old} +6366 -3559
- data/ext/ffi_c/libffi/LICENSE +1 -1
- data/ext/ffi_c/libffi/LICENSE-BUILDTOOLS +353 -0
- data/ext/ffi_c/libffi/Makefile.am +123 -169
- data/ext/ffi_c/libffi/Makefile.in +1243 -1003
- data/ext/ffi_c/libffi/README.md +486 -0
- data/ext/ffi_c/libffi/acinclude.m4 +387 -0
- data/ext/ffi_c/libffi/autogen.sh +2 -0
- data/ext/ffi_c/libffi/config.guess +690 -504
- data/ext/ffi_c/libffi/config.sub +1353 -1207
- data/ext/ffi_c/libffi/configure +7308 -2449
- data/ext/ffi_c/libffi/configure.ac +178 -259
- data/ext/ffi_c/libffi/configure.host +311 -4
- data/ext/ffi_c/libffi/doc/Makefile.am +3 -0
- data/ext/ffi_c/libffi/doc/Makefile.in +815 -0
- data/ext/ffi_c/libffi/doc/libffi.texi +455 -58
- data/ext/ffi_c/libffi/doc/version.texi +4 -4
- data/ext/ffi_c/libffi/fficonfig.h.in +37 -13
- data/ext/ffi_c/libffi/generate-darwin-source-and-headers.py +201 -0
- data/ext/ffi_c/libffi/include/Makefile.am +3 -3
- data/ext/ffi_c/libffi/include/Makefile.in +196 -75
- data/ext/ffi_c/libffi/include/ffi.h.in +163 -67
- data/ext/ffi_c/libffi/include/ffi_cfi.h +55 -0
- data/ext/ffi_c/libffi/include/ffi_common.h +39 -12
- data/ext/ffi_c/libffi/install-sh +207 -209
- data/ext/ffi_c/libffi/libffi.map.in +76 -0
- data/ext/ffi_c/libffi/libffi.pc.in +3 -2
- data/ext/ffi_c/libffi/libffi.xcodeproj/project.pbxproj +997 -0
- data/ext/ffi_c/libffi/libtool-ldflags +106 -0
- data/ext/ffi_c/libffi/libtool-version +1 -1
- data/ext/ffi_c/libffi/ltmain.sh +3641 -2026
- data/ext/ffi_c/libffi/m4/asmcfi.m4 +13 -0
- data/ext/ffi_c/libffi/m4/ax_append_flag.m4 +50 -0
- data/ext/ffi_c/libffi/m4/ax_cc_maxopt.m4 +32 -14
- data/ext/ffi_c/libffi/m4/ax_cflags_warn_all.m4 +33 -106
- data/ext/ffi_c/libffi/m4/ax_check_compile_flag.m4 +53 -0
- data/ext/ffi_c/libffi/m4/ax_compiler_vendor.m4 +38 -13
- data/ext/ffi_c/libffi/m4/ax_configure_args.m4 +8 -29
- data/ext/ffi_c/libffi/m4/ax_enable_builddir.m4 +11 -9
- data/ext/ffi_c/libffi/m4/ax_gcc_archflag.m4 +104 -52
- data/ext/ffi_c/libffi/m4/ax_gcc_x86_cpuid.m4 +18 -8
- data/ext/ffi_c/libffi/m4/ax_require_defined.m4 +37 -0
- data/ext/ffi_c/libffi/make_sunver.pl +333 -0
- data/ext/ffi_c/libffi/man/Makefile.am +2 -2
- data/ext/ffi_c/libffi/man/Makefile.in +151 -55
- data/ext/ffi_c/libffi/man/ffi.3 +10 -0
- data/ext/ffi_c/libffi/man/ffi_prep_cif.3 +6 -4
- data/ext/ffi_c/libffi/man/ffi_prep_cif_var.3 +73 -0
- data/ext/ffi_c/libffi/missing +153 -314
- data/ext/ffi_c/libffi/msvc_build/aarch64/Ffi_staticLib.sln +33 -0
- data/ext/ffi_c/libffi/msvc_build/aarch64/Ffi_staticLib.vcxproj +130 -0
- data/ext/ffi_c/libffi/msvc_build/aarch64/Ffi_staticLib.vcxproj.filters +57 -0
- data/ext/ffi_c/libffi/msvc_build/aarch64/Ffi_staticLib.vcxproj.user +4 -0
- data/ext/ffi_c/libffi/{include/ffi.h.vc64 → msvc_build/aarch64/aarch64_include/ffi.h} +151 -67
- data/ext/ffi_c/libffi/msvc_build/aarch64/aarch64_include/fficonfig.h +219 -0
- data/ext/ffi_c/libffi/msvcc.sh +176 -20
- data/ext/ffi_c/libffi/src/aarch64/ffi.c +1025 -0
- data/ext/ffi_c/libffi/src/aarch64/ffitarget.h +97 -0
- data/ext/ffi_c/libffi/src/aarch64/internal.h +68 -0
- data/ext/ffi_c/libffi/src/aarch64/sysv.S +451 -0
- data/ext/ffi_c/libffi/src/aarch64/win64_armasm.S +506 -0
- data/ext/ffi_c/libffi/src/alpha/ffi.c +335 -98
- data/ext/ffi_c/libffi/src/alpha/ffitarget.h +10 -1
- data/ext/ffi_c/libffi/src/alpha/internal.h +23 -0
- data/ext/ffi_c/libffi/src/alpha/osf.S +161 -266
- data/ext/ffi_c/libffi/src/arc/arcompact.S +135 -0
- data/ext/ffi_c/libffi/src/arc/ffi.c +266 -0
- data/ext/ffi_c/libffi/src/arc/ffitarget.h +53 -0
- data/ext/ffi_c/libffi/src/arm/ffi.c +663 -515
- data/ext/ffi_c/libffi/src/arm/ffitarget.h +32 -8
- data/ext/ffi_c/libffi/src/arm/internal.h +7 -0
- data/ext/ffi_c/libffi/src/arm/sysv.S +305 -417
- data/ext/ffi_c/libffi/src/arm/sysv_msvc_arm32.S +311 -0
- data/ext/ffi_c/libffi/src/avr32/ffitarget.h +6 -1
- data/ext/ffi_c/libffi/src/bfin/ffi.c +196 -0
- data/ext/ffi_c/libffi/src/bfin/ffitarget.h +43 -0
- data/ext/ffi_c/libffi/src/bfin/sysv.S +179 -0
- data/ext/ffi_c/libffi/src/closures.c +465 -59
- data/ext/ffi_c/libffi/src/cris/ffi.c +10 -7
- data/ext/ffi_c/libffi/src/cris/ffitarget.h +6 -1
- data/ext/ffi_c/libffi/src/csky/ffi.c +395 -0
- data/ext/ffi_c/libffi/src/csky/ffitarget.h +63 -0
- data/ext/ffi_c/libffi/src/csky/sysv.S +371 -0
- data/ext/ffi_c/libffi/src/debug.c +6 -1
- data/ext/ffi_c/libffi/src/dlmalloc.c +17 -12
- data/ext/ffi_c/libffi/src/frv/ffi.c +2 -2
- data/ext/ffi_c/libffi/src/frv/ffitarget.h +6 -1
- data/ext/ffi_c/libffi/src/ia64/ffi.c +35 -13
- data/ext/ffi_c/libffi/src/ia64/ffitarget.h +8 -2
- data/ext/ffi_c/libffi/src/ia64/unix.S +8 -1
- data/ext/ffi_c/libffi/src/java_raw_api.c +23 -5
- data/ext/ffi_c/libffi/src/kvx/asm.h +5 -0
- data/ext/ffi_c/libffi/src/kvx/ffi.c +273 -0
- data/ext/ffi_c/libffi/src/kvx/ffitarget.h +75 -0
- data/ext/ffi_c/libffi/src/kvx/sysv.S +127 -0
- data/ext/ffi_c/libffi/src/m32r/ffi.c +1 -1
- data/ext/ffi_c/libffi/src/m32r/ffitarget.h +6 -1
- data/ext/ffi_c/libffi/src/m68k/ffi.c +87 -13
- data/ext/ffi_c/libffi/src/m68k/ffitarget.h +6 -1
- data/ext/ffi_c/libffi/src/m68k/sysv.S +119 -32
- data/ext/ffi_c/libffi/src/m88k/ffi.c +400 -0
- data/ext/ffi_c/libffi/src/m88k/ffitarget.h +49 -0
- data/ext/ffi_c/libffi/src/m88k/obsd.S +209 -0
- data/ext/ffi_c/libffi/src/metag/ffi.c +330 -0
- data/ext/ffi_c/libffi/{fficonfig.hw → src/metag/ffitarget.h} +22 -26
- data/ext/ffi_c/libffi/src/metag/sysv.S +311 -0
- data/ext/ffi_c/libffi/src/microblaze/ffi.c +321 -0
- data/ext/ffi_c/libffi/src/microblaze/ffitarget.h +53 -0
- data/ext/ffi_c/libffi/src/microblaze/sysv.S +302 -0
- data/ext/ffi_c/libffi/src/mips/ffi.c +135 -37
- data/ext/ffi_c/libffi/src/mips/ffitarget.h +16 -14
- data/ext/ffi_c/libffi/src/mips/n32.S +128 -56
- data/ext/ffi_c/libffi/src/mips/o32.S +150 -27
- data/ext/ffi_c/libffi/src/moxie/eabi.S +55 -82
- data/ext/ffi_c/libffi/src/moxie/ffi.c +55 -46
- data/ext/ffi_c/libffi/src/moxie/ffitarget.h +52 -0
- data/ext/ffi_c/libffi/src/nios2/ffi.c +304 -0
- data/ext/ffi_c/libffi/src/nios2/ffitarget.h +52 -0
- data/ext/ffi_c/libffi/src/nios2/sysv.S +136 -0
- data/ext/ffi_c/libffi/src/or1k/ffi.c +328 -0
- data/ext/ffi_c/libffi/src/or1k/ffitarget.h +58 -0
- data/ext/ffi_c/libffi/src/or1k/sysv.S +107 -0
- data/ext/ffi_c/libffi/src/pa/ffi.c +46 -91
- data/ext/ffi_c/libffi/src/pa/ffitarget.h +9 -7
- data/ext/ffi_c/libffi/src/pa/hpux32.S +4 -2
- data/ext/ffi_c/libffi/src/pa/linux.S +27 -4
- data/ext/ffi_c/libffi/src/powerpc/aix.S +245 -7
- data/ext/ffi_c/libffi/src/powerpc/aix_closure.S +253 -4
- data/ext/ffi_c/libffi/src/powerpc/asm.h +2 -2
- data/ext/ffi_c/libffi/src/powerpc/darwin.S +2 -7
- data/ext/ffi_c/libffi/src/powerpc/darwin_closure.S +22 -26
- data/ext/ffi_c/libffi/src/powerpc/ffi.c +105 -1378
- data/ext/ffi_c/libffi/src/powerpc/ffi_darwin.c +123 -30
- data/ext/ffi_c/libffi/src/powerpc/ffi_linux64.c +1153 -0
- data/ext/ffi_c/libffi/src/powerpc/ffi_powerpc.h +105 -0
- data/ext/ffi_c/libffi/src/powerpc/ffi_sysv.c +923 -0
- data/ext/ffi_c/libffi/src/powerpc/ffitarget.h +110 -45
- data/ext/ffi_c/libffi/src/powerpc/linux64.S +189 -85
- data/ext/ffi_c/libffi/src/powerpc/linux64_closure.S +436 -108
- data/ext/ffi_c/libffi/src/powerpc/ppc_closure.S +138 -68
- data/ext/ffi_c/libffi/src/powerpc/sysv.S +73 -119
- data/ext/ffi_c/libffi/src/prep_cif.c +111 -25
- data/ext/ffi_c/libffi/src/raw_api.c +18 -5
- data/ext/ffi_c/libffi/src/riscv/ffi.c +481 -0
- data/ext/ffi_c/libffi/src/riscv/ffitarget.h +69 -0
- data/ext/ffi_c/libffi/src/riscv/sysv.S +293 -0
- data/ext/ffi_c/libffi/src/s390/ffi.c +294 -318
- data/ext/ffi_c/libffi/src/s390/ffitarget.h +9 -1
- data/ext/ffi_c/libffi/src/s390/internal.h +11 -0
- data/ext/ffi_c/libffi/src/s390/sysv.S +257 -366
- data/ext/ffi_c/libffi/src/sh/ffi.c +4 -3
- data/ext/ffi_c/libffi/src/sh/ffitarget.h +6 -1
- data/ext/ffi_c/libffi/src/sh64/ffi.c +3 -2
- data/ext/ffi_c/libffi/src/sh64/ffitarget.h +6 -1
- data/ext/ffi_c/libffi/src/sparc/ffi.c +326 -527
- data/ext/ffi_c/libffi/src/sparc/ffi64.c +608 -0
- data/ext/ffi_c/libffi/src/sparc/ffitarget.h +20 -7
- data/ext/ffi_c/libffi/src/sparc/internal.h +26 -0
- data/ext/ffi_c/libffi/src/sparc/v8.S +364 -234
- data/ext/ffi_c/libffi/src/sparc/v9.S +340 -207
- data/ext/ffi_c/libffi/src/tile/ffi.c +355 -0
- data/ext/ffi_c/libffi/src/tile/ffitarget.h +65 -0
- data/ext/ffi_c/libffi/src/tile/tile.S +360 -0
- data/ext/ffi_c/libffi/src/types.c +46 -15
- data/ext/ffi_c/libffi/src/vax/elfbsd.S +195 -0
- data/ext/ffi_c/libffi/src/vax/ffi.c +276 -0
- data/ext/ffi_c/libffi/src/vax/ffitarget.h +49 -0
- data/ext/ffi_c/libffi/src/x86/asmnames.h +30 -0
- data/ext/ffi_c/libffi/src/x86/ffi.c +624 -498
- data/ext/ffi_c/libffi/src/x86/ffi64.c +379 -119
- data/ext/ffi_c/libffi/src/x86/ffitarget.h +74 -35
- data/ext/ffi_c/libffi/src/x86/ffiw64.c +318 -0
- data/ext/ffi_c/libffi/src/x86/internal.h +29 -0
- data/ext/ffi_c/libffi/src/x86/internal64.h +22 -0
- data/ext/ffi_c/libffi/src/x86/sysv.S +1070 -400
- data/ext/ffi_c/libffi/src/x86/sysv_intel.S +995 -0
- data/ext/ffi_c/libffi/src/x86/unix64.S +494 -299
- data/ext/ffi_c/libffi/src/x86/win64.S +231 -458
- data/ext/ffi_c/libffi/src/x86/win64_intel.S +238 -0
- data/ext/ffi_c/libffi/src/xtensa/ffi.c +298 -0
- data/ext/ffi_c/libffi/src/xtensa/ffitarget.h +53 -0
- data/ext/ffi_c/libffi/src/xtensa/sysv.S +258 -0
- data/ext/ffi_c/libffi/stamp-h.in +1 -0
- data/ext/ffi_c/libffi/testsuite/Makefile.am +115 -73
- data/ext/ffi_c/libffi/testsuite/Makefile.in +262 -114
- data/ext/ffi_c/libffi/testsuite/lib/libffi.exp +334 -24
- data/ext/ffi_c/libffi/testsuite/lib/target-libpath.exp +21 -1
- data/ext/ffi_c/libffi/testsuite/libffi.bhaible/Makefile +28 -0
- data/ext/ffi_c/libffi/testsuite/libffi.bhaible/README +78 -0
- data/ext/ffi_c/libffi/testsuite/libffi.bhaible/alignof.h +50 -0
- data/ext/ffi_c/libffi/testsuite/libffi.bhaible/bhaible.exp +63 -0
- data/ext/ffi_c/libffi/testsuite/libffi.bhaible/test-call.c +1745 -0
- data/ext/ffi_c/libffi/testsuite/libffi.bhaible/test-callback.c +2885 -0
- data/ext/ffi_c/libffi/testsuite/libffi.bhaible/testcases.c +743 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/align_mixed.c +46 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/align_stdcall.c +46 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/call.exp +28 -6
- data/ext/ffi_c/libffi/testsuite/libffi.call/err_bad_typedef.c +2 -2
- data/ext/ffi_c/libffi/testsuite/libffi.call/ffitest.h +25 -40
- data/ext/ffi_c/libffi/testsuite/libffi.call/float1.c +3 -1
- data/ext/ffi_c/libffi/testsuite/libffi.call/float2.c +15 -12
- data/ext/ffi_c/libffi/testsuite/libffi.call/float3.c +4 -2
- data/ext/ffi_c/libffi/testsuite/libffi.call/float_va.c +107 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/many.c +6 -16
- data/ext/ffi_c/libffi/testsuite/libffi.call/many2.c +57 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/many_double.c +70 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/many_mixed.c +78 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/negint.c +0 -1
- data/ext/ffi_c/libffi/testsuite/libffi.call/offsets.c +46 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/pr1172638.c +127 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl.c +1 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/return_ldl.c +1 -1
- data/ext/ffi_c/libffi/testsuite/libffi.call/return_sc.c +1 -1
- data/ext/ffi_c/libffi/testsuite/libffi.call/return_uc.c +1 -1
- data/ext/ffi_c/libffi/testsuite/libffi.call/strlen.c +2 -2
- data/ext/ffi_c/libffi/testsuite/libffi.call/strlen2.c +49 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/strlen3.c +49 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/strlen4.c +55 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/struct1.c +9 -7
- data/ext/ffi_c/libffi/testsuite/libffi.call/struct10.c +57 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/struct2.c +7 -7
- data/ext/ffi_c/libffi/testsuite/libffi.call/struct3.c +7 -6
- data/ext/ffi_c/libffi/testsuite/libffi.call/struct4.c +9 -8
- data/ext/ffi_c/libffi/testsuite/libffi.call/struct5.c +9 -8
- data/ext/ffi_c/libffi/testsuite/libffi.call/struct6.c +9 -9
- data/ext/ffi_c/libffi/testsuite/libffi.call/struct7.c +9 -9
- data/ext/ffi_c/libffi/testsuite/libffi.call/struct8.c +9 -8
- data/ext/ffi_c/libffi/testsuite/libffi.call/struct9.c +9 -8
- data/ext/ffi_c/libffi/testsuite/libffi.call/uninitialized.c +61 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/va_1.c +196 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct1.c +121 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct2.c +123 -0
- data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct3.c +125 -0
- data/ext/ffi_c/libffi/testsuite/libffi.closures/closure.exp +67 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/closure_fn0.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/closure_fn1.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/closure_fn2.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/closure_fn3.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/closure_fn4.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/closure_fn5.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/closure_fn6.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/closure_loc_fn0.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call/closure_stdcall.c → libffi.closures/closure_simple.c} +7 -16
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_12byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_16byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_18byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_19byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_1_1byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_20byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_20byte1.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_24byte.c +5 -5
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_2byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_3_1byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_3byte1.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_3byte2.c +4 -4
- data/ext/ffi_c/libffi/testsuite/libffi.closures/cls_3float.c +95 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_4_1byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_4byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_5_1_byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_5byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_64byte.c +5 -5
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_6_1_byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_6byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_7_1_byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_7byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_8byte.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_9byte1.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_9byte2.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_align_double.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_align_float.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_align_longdouble.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_align_longdouble_split.c +4 -6
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_align_longdouble_split2.c +4 -6
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_align_pointer.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_align_sint16.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_align_sint32.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_align_sint64.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_align_uint16.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_align_uint32.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_align_uint64.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_dbls_struct.c +4 -4
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_double.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_double_va.c +10 -9
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_float.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_longdouble.c +3 -3
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_longdouble_va.c +10 -9
- data/ext/ffi_c/libffi/testsuite/libffi.closures/cls_many_mixed_args.c +70 -0
- data/ext/ffi_c/libffi/testsuite/libffi.closures/cls_many_mixed_float_double.c +55 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_multi_schar.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_multi_sshort.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_multi_sshortchar.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_multi_uchar.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_multi_ushort.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_multi_ushortchar.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_pointer.c +1 -1
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_pointer_stack.c +11 -9
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_schar.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_sint.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_sshort.c +0 -0
- data/ext/ffi_c/libffi/testsuite/libffi.closures/cls_struct_va1.c +114 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_uchar.c +0 -0
- data/ext/ffi_c/libffi/testsuite/libffi.closures/cls_uchar_va.c +44 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_uint.c +0 -0
- data/ext/ffi_c/libffi/testsuite/libffi.closures/cls_uint_va.c +45 -0
- data/ext/ffi_c/libffi/testsuite/libffi.closures/cls_ulong_va.c +45 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_ulonglong.c +5 -5
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/cls_ushort.c +0 -0
- data/ext/ffi_c/libffi/testsuite/libffi.closures/cls_ushort_va.c +44 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/err_bad_abi.c +0 -0
- data/ext/ffi_c/libffi/testsuite/libffi.closures/ffitest.h +138 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/huge_struct.c +20 -19
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/nested_struct.c +6 -6
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/nested_struct1.c +8 -8
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/nested_struct10.c +7 -6
- data/ext/ffi_c/libffi/testsuite/libffi.closures/nested_struct11.c +121 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/nested_struct2.c +5 -5
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/nested_struct3.c +5 -5
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/nested_struct4.c +5 -5
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/nested_struct5.c +5 -5
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/nested_struct6.c +6 -6
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/nested_struct7.c +5 -5
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/nested_struct8.c +6 -6
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/nested_struct9.c +6 -6
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/problem1.c +0 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/stret_large.c +7 -7
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/stret_large2.c +7 -7
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/stret_medium.c +5 -5
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/stret_medium2.c +5 -5
- data/ext/ffi_c/libffi/testsuite/{libffi.call → libffi.closures}/testclosure.c +2 -2
- data/ext/ffi_c/libffi/testsuite/{libffi.special → libffi.closures}/unwindtest.cc +3 -10
- data/ext/ffi_c/libffi/testsuite/{libffi.special → libffi.closures}/unwindtest_ffi_call.cc +3 -2
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex.inc +91 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_double.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_float.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_longdouble.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex.inc +42 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_double.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_float.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_longdouble.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct.inc +71 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_double.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_float.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_longdouble.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va.inc +80 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_double.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_float.c +16 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_longdouble.c +10 -0
- data/ext/ffi_c/libffi/testsuite/{libffi.special/special.exp → libffi.complex/complex.exp} +9 -8
- data/ext/ffi_c/libffi/testsuite/libffi.complex/complex.inc +51 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_double.inc +7 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_float.inc +7 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_longdouble.inc +7 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_double.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_float.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_int.c +86 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_longdouble.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/ffitest.h +1 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex.inc +78 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_double.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_float.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_longdouble.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex.inc +37 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1.inc +41 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_double.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_float.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_longdouble.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2.inc +44 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_double.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_float.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_longdouble.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_double.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_float.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_longdouble.c +10 -0
- data/ext/ffi_c/libffi/testsuite/libffi.go/aa-direct.c +34 -0
- data/ext/ffi_c/libffi/testsuite/libffi.go/closure1.c +28 -0
- data/ext/ffi_c/libffi/testsuite/libffi.go/ffitest.h +1 -0
- data/ext/ffi_c/libffi/testsuite/libffi.go/go.exp +36 -0
- data/ext/ffi_c/libffi/testsuite/libffi.go/static-chain.h +19 -0
- data/ext/ffi_c/libffi.bsd.mk +12 -6
- data/ext/ffi_c/libffi.darwin.mk +21 -9
- data/ext/ffi_c/libffi.gnu.mk +3 -2
- data/ext/ffi_c/libffi.mk +11 -6
- data/ext/ffi_c/libffi.vc.mk +1 -1
- data/ext/ffi_c/libffi.vc64.mk +1 -1
- data/ext/ffi_c/rbffi.h +22 -14
- data/ext/ffi_c/rbffi_endian.h +11 -2
- data/ffi.gemspec +42 -0
- data/lib/ffi/abstract_memory.rb +44 -0
- data/lib/ffi/autopointer.rb +70 -50
- data/lib/ffi/data_converter.rb +67 -0
- data/lib/ffi/enum.rb +159 -24
- data/lib/ffi/errno.rb +21 -11
- data/lib/ffi/ffi.rb +25 -11
- data/lib/ffi/io.rb +24 -14
- data/lib/ffi/library.rb +174 -67
- data/lib/ffi/managedstruct.rb +63 -34
- data/lib/ffi/platform/aarch64-darwin/types.conf +130 -0
- data/lib/ffi/platform/aarch64-freebsd/types.conf +128 -0
- data/lib/ffi/platform/aarch64-freebsd12/types.conf +181 -0
- data/lib/ffi/platform/aarch64-linux/types.conf +104 -0
- data/lib/ffi/platform/aarch64-openbsd/types.conf +134 -0
- data/lib/ffi/platform/arm-freebsd/types.conf +152 -0
- data/lib/ffi/platform/arm-freebsd12/types.conf +152 -0
- data/lib/ffi/platform/arm-linux/types.conf +110 -82
- data/lib/ffi/platform/i386-cygwin/types.conf +3 -0
- data/lib/ffi/platform/i386-darwin/types.conf +63 -63
- data/lib/ffi/platform/i386-freebsd/types.conf +89 -89
- data/lib/ffi/platform/i386-freebsd12/types.conf +152 -0
- data/lib/ffi/platform/{i486-gnu → i386-gnu}/types.conf +84 -84
- data/lib/ffi/platform/i386-linux/types.conf +77 -77
- data/lib/ffi/platform/i386-netbsd/types.conf +87 -87
- data/lib/ffi/platform/i386-openbsd/types.conf +89 -87
- data/lib/ffi/platform/i386-solaris/types.conf +96 -96
- data/lib/ffi/platform/i386-windows/types.conf +43 -96
- data/lib/ffi/platform/ia64-linux/types.conf +79 -79
- data/lib/ffi/platform/mips-linux/types.conf +79 -79
- data/lib/ffi/platform/mips64-linux/types.conf +104 -0
- data/lib/ffi/platform/mips64el-linux/types.conf +104 -0
- data/lib/ffi/platform/mipsel-linux/types.conf +79 -79
- data/lib/ffi/platform/mipsisa32r6-linux/types.conf +102 -0
- data/lib/ffi/platform/mipsisa32r6el-linux/types.conf +102 -0
- data/lib/ffi/platform/mipsisa64r6-linux/types.conf +104 -0
- data/lib/ffi/platform/mipsisa64r6el-linux/types.conf +104 -0
- data/lib/ffi/platform/powerpc-aix/types.conf +155 -155
- data/lib/ffi/platform/powerpc-darwin/types.conf +63 -63
- data/lib/ffi/platform/powerpc-linux/types.conf +108 -78
- data/lib/ffi/platform/powerpc-openbsd/types.conf +156 -0
- data/lib/ffi/platform/powerpc64-linux/types.conf +104 -0
- data/lib/ffi/platform/powerpc64le-linux/types.conf +100 -0
- data/lib/ffi/platform/riscv64-linux/types.conf +104 -0
- data/lib/ffi/platform/s390-linux/types.conf +79 -79
- data/lib/ffi/platform/s390x-linux/types.conf +79 -79
- data/lib/ffi/platform/sparc-linux/types.conf +79 -79
- data/lib/ffi/platform/sparc-solaris/types.conf +103 -103
- data/lib/ffi/platform/sparc64-linux/types.conf +102 -0
- data/lib/ffi/platform/sparcv9-openbsd/types.conf +156 -0
- data/lib/ffi/platform/sparcv9-solaris/types.conf +103 -103
- data/lib/ffi/platform/x86_64-cygwin/types.conf +3 -0
- data/lib/ffi/platform/x86_64-darwin/types.conf +93 -63
- data/lib/ffi/platform/x86_64-dragonflybsd/types.conf +130 -0
- data/lib/ffi/platform/x86_64-freebsd/types.conf +90 -88
- data/lib/ffi/platform/x86_64-freebsd12/types.conf +158 -0
- data/lib/ffi/platform/x86_64-haiku/types.conf +117 -0
- data/lib/ffi/platform/x86_64-linux/types.conf +107 -77
- data/lib/ffi/platform/x86_64-msys/types.conf +119 -0
- data/lib/ffi/platform/x86_64-netbsd/types.conf +89 -87
- data/lib/ffi/platform/x86_64-openbsd/types.conf +100 -92
- data/lib/ffi/platform/x86_64-solaris/types.conf +96 -96
- data/lib/ffi/platform/x86_64-windows/types.conf +52 -0
- data/lib/ffi/platform.rb +81 -26
- data/lib/ffi/pointer.rb +72 -27
- data/lib/ffi/struct.rb +99 -66
- data/lib/ffi/struct_by_reference.rb +72 -0
- data/lib/ffi/struct_layout.rb +96 -0
- data/lib/ffi/struct_layout_builder.rb +82 -17
- data/lib/ffi/tools/const_generator.rb +11 -8
- data/lib/ffi/tools/generator.rb +48 -1
- data/lib/ffi/tools/generator_task.rb +13 -16
- data/lib/ffi/tools/struct_generator.rb +6 -5
- data/lib/ffi/tools/types_generator.rb +14 -10
- data/lib/ffi/types.rb +31 -14
- data/lib/ffi/union.rb +23 -12
- data/lib/ffi/variadic.rb +25 -21
- data/lib/ffi/version.rb +3 -0
- data/lib/ffi.rb +20 -8
- data/rakelib/ffi_gem_helper.rb +65 -0
- data/samples/getlogin.rb +8 -0
- data/samples/getpid.rb +8 -0
- data/samples/gettimeofday.rb +18 -0
- data/samples/hello.rb +8 -0
- data/samples/inotify.rb +60 -0
- data/samples/pty.rb +75 -0
- data/samples/qsort.rb +20 -0
- metadata +413 -263
- data/History.txt +0 -1
- data/README.rdoc +0 -102
- data/ext/ffi_c/DataConverter.c +0 -91
- data/ext/ffi_c/Ffi_c.iml +0 -12
- data/ext/ffi_c/StructByReference.c +0 -158
- data/ext/ffi_c/StructByReference.h +0 -50
- data/ext/ffi_c/libffi/ChangeLog.libffi +0 -584
- data/ext/ffi_c/libffi/ChangeLog.libgcj +0 -40
- data/ext/ffi_c/libffi/ChangeLog.v1 +0 -764
- data/ext/ffi_c/libffi/Makefile.vc +0 -141
- data/ext/ffi_c/libffi/Makefile.vc64 +0 -141
- data/ext/ffi_c/libffi/README +0 -342
- data/ext/ffi_c/libffi/aclocal.m4 +0 -1873
- data/ext/ffi_c/libffi/build-ios.sh +0 -67
- data/ext/ffi_c/libffi/compile +0 -143
- data/ext/ffi_c/libffi/depcomp +0 -630
- data/ext/ffi_c/libffi/doc/libffi.info +0 -593
- data/ext/ffi_c/libffi/doc/stamp-vti +0 -4
- data/ext/ffi_c/libffi/include/ffi.h.vc +0 -427
- data/ext/ffi_c/libffi/m4/ax_check_compiler_flags.m4 +0 -76
- data/ext/ffi_c/libffi/m4/libtool.m4 +0 -7831
- data/ext/ffi_c/libffi/m4/ltoptions.m4 +0 -369
- data/ext/ffi_c/libffi/m4/ltsugar.m4 +0 -123
- data/ext/ffi_c/libffi/m4/ltversion.m4 +0 -23
- data/ext/ffi_c/libffi/m4/lt~obsolete.m4 +0 -98
- data/ext/ffi_c/libffi/mdate-sh +0 -201
- data/ext/ffi_c/libffi/src/arm/gentramp.sh +0 -118
- data/ext/ffi_c/libffi/src/arm/trampoline.S +0 -4450
- data/ext/ffi_c/libffi/src/x86/darwin.S +0 -444
- data/ext/ffi_c/libffi/src/x86/darwin64.S +0 -416
- data/ext/ffi_c/libffi/src/x86/freebsd.S +0 -458
- data/ext/ffi_c/libffi/src/x86/win32.S +0 -1065
- data/ext/ffi_c/libffi/testsuite/lib/libffi-dg.exp +0 -300
- data/ext/ffi_c/libffi/testsuite/libffi.call/many_win32.c +0 -63
- data/ext/ffi_c/libffi/testsuite/libffi.call/strlen_win32.c +0 -44
- data/ext/ffi_c/libffi/testsuite/libffi.special/ffitestcxx.h +0 -96
- data/ext/ffi_c/libffi/texinfo.tex +0 -7210
- data/ext/ffi_c/win32/stdint.h +0 -199
- data/gen/Rakefile +0 -30
- data/gen/log +0 -1
- data/lib/Lib.iml +0 -13
- data/spec/ffi/Ffi.iml +0 -12
- data/spec/ffi/async_callback_spec.rb +0 -46
- data/spec/ffi/bool_spec.rb +0 -40
- data/spec/ffi/buffer_spec.rb +0 -215
- data/spec/ffi/callback_spec.rb +0 -668
- data/spec/ffi/custom_param_type.rb +0 -47
- data/spec/ffi/custom_type_spec.rb +0 -85
- data/spec/ffi/dup_spec.rb +0 -65
- data/spec/ffi/enum_spec.rb +0 -227
- data/spec/ffi/errno_spec.rb +0 -29
- data/spec/ffi/ffi_spec.rb +0 -40
- data/spec/ffi/function_spec.rb +0 -87
- data/spec/ffi/library_spec.rb +0 -208
- data/spec/ffi/long_double.rb +0 -41
- data/spec/ffi/managed_struct_spec.rb +0 -72
- data/spec/ffi/number_spec.rb +0 -247
- data/spec/ffi/pointer_spec.rb +0 -214
- data/spec/ffi/rbx/attach_function_spec.rb +0 -28
- data/spec/ffi/rbx/memory_pointer_spec.rb +0 -115
- data/spec/ffi/rbx/spec_helper.rb +0 -1
- data/spec/ffi/rbx/struct_spec.rb +0 -13
- data/spec/ffi/spec_helper.rb +0 -35
- data/spec/ffi/string_spec.rb +0 -119
- data/spec/ffi/strptr_spec.rb +0 -61
- data/spec/ffi/struct_callback_spec.rb +0 -80
- data/spec/ffi/struct_initialize_spec.rb +0 -46
- data/spec/ffi/struct_packed_spec.rb +0 -62
- data/spec/ffi/struct_spec.rb +0 -719
- data/spec/ffi/typedef_spec.rb +0 -89
- data/spec/ffi/union_spec.rb +0 -76
- data/spec/ffi/variadic_spec.rb +0 -103
- data/spec/spec.opts +0 -4
- data/tasks/ann.rake +0 -80
- data/tasks/extension.rake +0 -32
- data/tasks/gem.rake +0 -199
- data/tasks/git.rake +0 -41
- data/tasks/notes.rake +0 -27
- data/tasks/post_load.rake +0 -34
- data/tasks/rdoc.rake +0 -50
- data/tasks/rubyforge.rake +0 -55
- data/tasks/setup.rb +0 -301
- data/tasks/spec.rake +0 -54
- data/tasks/svn.rake +0 -47
- data/tasks/test.rake +0 -40
- data/tasks/yard.rake +0 -11
@@ -0,0 +1,1025 @@
|
|
1
|
+
/* Copyright (c) 2009, 2010, 2011, 2012 ARM Ltd.
|
2
|
+
|
3
|
+
Permission is hereby granted, free of charge, to any person obtaining
|
4
|
+
a copy of this software and associated documentation files (the
|
5
|
+
``Software''), to deal in the Software without restriction, including
|
6
|
+
without limitation the rights to use, copy, modify, merge, publish,
|
7
|
+
distribute, sublicense, and/or sell copies of the Software, and to
|
8
|
+
permit persons to whom the Software is furnished to do so, subject to
|
9
|
+
the following conditions:
|
10
|
+
|
11
|
+
The above copyright notice and this permission notice shall be
|
12
|
+
included in all copies or substantial portions of the Software.
|
13
|
+
|
14
|
+
THE SOFTWARE IS PROVIDED ``AS IS'', WITHOUT WARRANTY OF ANY KIND,
|
15
|
+
EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
16
|
+
MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
|
17
|
+
IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
18
|
+
CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
|
19
|
+
TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
|
20
|
+
SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */
|
21
|
+
|
22
|
+
#if defined(__aarch64__) || defined(__arm64__)|| defined (_M_ARM64)
|
23
|
+
#include <stdio.h>
|
24
|
+
#include <stdlib.h>
|
25
|
+
#include <stdint.h>
|
26
|
+
#include <fficonfig.h>
|
27
|
+
#include <ffi.h>
|
28
|
+
#include <ffi_common.h>
|
29
|
+
#include "internal.h"
|
30
|
+
#ifdef _WIN32
|
31
|
+
#include <windows.h> /* FlushInstructionCache */
|
32
|
+
#endif
|
33
|
+
|
34
|
+
/* Force FFI_TYPE_LONGDOUBLE to be different than FFI_TYPE_DOUBLE;
|
35
|
+
all further uses in this file will refer to the 128-bit type. */
|
36
|
+
#if FFI_TYPE_DOUBLE != FFI_TYPE_LONGDOUBLE
|
37
|
+
# if FFI_TYPE_LONGDOUBLE != 4
|
38
|
+
# error FFI_TYPE_LONGDOUBLE out of date
|
39
|
+
# endif
|
40
|
+
#else
|
41
|
+
# undef FFI_TYPE_LONGDOUBLE
|
42
|
+
# define FFI_TYPE_LONGDOUBLE 4
|
43
|
+
#endif
|
44
|
+
|
45
|
+
union _d
|
46
|
+
{
|
47
|
+
UINT64 d;
|
48
|
+
UINT32 s[2];
|
49
|
+
};
|
50
|
+
|
51
|
+
struct _v
|
52
|
+
{
|
53
|
+
union _d d[2] __attribute__((aligned(16)));
|
54
|
+
};
|
55
|
+
|
56
|
+
struct call_context
|
57
|
+
{
|
58
|
+
struct _v v[N_V_ARG_REG];
|
59
|
+
UINT64 x[N_X_ARG_REG];
|
60
|
+
};
|
61
|
+
|
62
|
+
#if FFI_EXEC_TRAMPOLINE_TABLE
|
63
|
+
|
64
|
+
#ifdef __MACH__
|
65
|
+
#ifdef HAVE_PTRAUTH
|
66
|
+
#include <ptrauth.h>
|
67
|
+
#endif
|
68
|
+
#include <mach/vm_param.h>
|
69
|
+
#endif
|
70
|
+
|
71
|
+
#else
|
72
|
+
|
73
|
+
#if defined (__clang__) && defined (__APPLE__)
|
74
|
+
extern void sys_icache_invalidate (void *start, size_t len);
|
75
|
+
#endif
|
76
|
+
|
77
|
+
static inline void
|
78
|
+
ffi_clear_cache (void *start, void *end)
|
79
|
+
{
|
80
|
+
#if defined (__clang__) && defined (__APPLE__)
|
81
|
+
sys_icache_invalidate (start, (char *)end - (char *)start);
|
82
|
+
#elif defined (__GNUC__)
|
83
|
+
__builtin___clear_cache (start, end);
|
84
|
+
#elif defined (_WIN32)
|
85
|
+
FlushInstructionCache(GetCurrentProcess(), start, (char*)end - (char*)start);
|
86
|
+
#else
|
87
|
+
#error "Missing builtin to flush instruction cache"
|
88
|
+
#endif
|
89
|
+
}
|
90
|
+
|
91
|
+
#endif
|
92
|
+
|
93
|
+
/* A subroutine of is_vfp_type. Given a structure type, return the type code
|
94
|
+
of the first non-structure element. Recurse for structure elements.
|
95
|
+
Return -1 if the structure is in fact empty, i.e. no nested elements. */
|
96
|
+
|
97
|
+
static int
|
98
|
+
is_hfa0 (const ffi_type *ty)
|
99
|
+
{
|
100
|
+
ffi_type **elements = ty->elements;
|
101
|
+
int i, ret = -1;
|
102
|
+
|
103
|
+
if (elements != NULL)
|
104
|
+
for (i = 0; elements[i]; ++i)
|
105
|
+
{
|
106
|
+
ret = elements[i]->type;
|
107
|
+
if (ret == FFI_TYPE_STRUCT || ret == FFI_TYPE_COMPLEX)
|
108
|
+
{
|
109
|
+
ret = is_hfa0 (elements[i]);
|
110
|
+
if (ret < 0)
|
111
|
+
continue;
|
112
|
+
}
|
113
|
+
break;
|
114
|
+
}
|
115
|
+
|
116
|
+
return ret;
|
117
|
+
}
|
118
|
+
|
119
|
+
/* A subroutine of is_vfp_type. Given a structure type, return true if all
|
120
|
+
of the non-structure elements are the same as CANDIDATE. */
|
121
|
+
|
122
|
+
static int
|
123
|
+
is_hfa1 (const ffi_type *ty, int candidate)
|
124
|
+
{
|
125
|
+
ffi_type **elements = ty->elements;
|
126
|
+
int i;
|
127
|
+
|
128
|
+
if (elements != NULL)
|
129
|
+
for (i = 0; elements[i]; ++i)
|
130
|
+
{
|
131
|
+
int t = elements[i]->type;
|
132
|
+
if (t == FFI_TYPE_STRUCT || t == FFI_TYPE_COMPLEX)
|
133
|
+
{
|
134
|
+
if (!is_hfa1 (elements[i], candidate))
|
135
|
+
return 0;
|
136
|
+
}
|
137
|
+
else if (t != candidate)
|
138
|
+
return 0;
|
139
|
+
}
|
140
|
+
|
141
|
+
return 1;
|
142
|
+
}
|
143
|
+
|
144
|
+
/* Determine if TY may be allocated to the FP registers. This is both an
|
145
|
+
fp scalar type as well as an homogenous floating point aggregate (HFA).
|
146
|
+
That is, a structure consisting of 1 to 4 members of all the same type,
|
147
|
+
where that type is an fp scalar.
|
148
|
+
|
149
|
+
Returns non-zero iff TY is an HFA. The result is the AARCH64_RET_*
|
150
|
+
constant for the type. */
|
151
|
+
|
152
|
+
static int
|
153
|
+
is_vfp_type (const ffi_type *ty)
|
154
|
+
{
|
155
|
+
ffi_type **elements;
|
156
|
+
int candidate, i;
|
157
|
+
size_t size, ele_count;
|
158
|
+
|
159
|
+
/* Quickest tests first. */
|
160
|
+
candidate = ty->type;
|
161
|
+
switch (candidate)
|
162
|
+
{
|
163
|
+
default:
|
164
|
+
return 0;
|
165
|
+
case FFI_TYPE_FLOAT:
|
166
|
+
case FFI_TYPE_DOUBLE:
|
167
|
+
case FFI_TYPE_LONGDOUBLE:
|
168
|
+
ele_count = 1;
|
169
|
+
goto done;
|
170
|
+
case FFI_TYPE_COMPLEX:
|
171
|
+
candidate = ty->elements[0]->type;
|
172
|
+
switch (candidate)
|
173
|
+
{
|
174
|
+
case FFI_TYPE_FLOAT:
|
175
|
+
case FFI_TYPE_DOUBLE:
|
176
|
+
case FFI_TYPE_LONGDOUBLE:
|
177
|
+
ele_count = 2;
|
178
|
+
goto done;
|
179
|
+
}
|
180
|
+
return 0;
|
181
|
+
case FFI_TYPE_STRUCT:
|
182
|
+
break;
|
183
|
+
}
|
184
|
+
|
185
|
+
/* No HFA types are smaller than 4 bytes, or larger than 64 bytes. */
|
186
|
+
size = ty->size;
|
187
|
+
if (size < 4 || size > 64)
|
188
|
+
return 0;
|
189
|
+
|
190
|
+
/* Find the type of the first non-structure member. */
|
191
|
+
elements = ty->elements;
|
192
|
+
candidate = elements[0]->type;
|
193
|
+
if (candidate == FFI_TYPE_STRUCT || candidate == FFI_TYPE_COMPLEX)
|
194
|
+
{
|
195
|
+
for (i = 0; ; ++i)
|
196
|
+
{
|
197
|
+
candidate = is_hfa0 (elements[i]);
|
198
|
+
if (candidate >= 0)
|
199
|
+
break;
|
200
|
+
}
|
201
|
+
}
|
202
|
+
|
203
|
+
/* If the first member is not a floating point type, it's not an HFA.
|
204
|
+
Also quickly re-check the size of the structure. */
|
205
|
+
switch (candidate)
|
206
|
+
{
|
207
|
+
case FFI_TYPE_FLOAT:
|
208
|
+
ele_count = size / sizeof(float);
|
209
|
+
if (size != ele_count * sizeof(float))
|
210
|
+
return 0;
|
211
|
+
break;
|
212
|
+
case FFI_TYPE_DOUBLE:
|
213
|
+
ele_count = size / sizeof(double);
|
214
|
+
if (size != ele_count * sizeof(double))
|
215
|
+
return 0;
|
216
|
+
break;
|
217
|
+
case FFI_TYPE_LONGDOUBLE:
|
218
|
+
ele_count = size / sizeof(long double);
|
219
|
+
if (size != ele_count * sizeof(long double))
|
220
|
+
return 0;
|
221
|
+
break;
|
222
|
+
default:
|
223
|
+
return 0;
|
224
|
+
}
|
225
|
+
if (ele_count > 4)
|
226
|
+
return 0;
|
227
|
+
|
228
|
+
/* Finally, make sure that all scalar elements are the same type. */
|
229
|
+
for (i = 0; elements[i]; ++i)
|
230
|
+
{
|
231
|
+
int t = elements[i]->type;
|
232
|
+
if (t == FFI_TYPE_STRUCT || t == FFI_TYPE_COMPLEX)
|
233
|
+
{
|
234
|
+
if (!is_hfa1 (elements[i], candidate))
|
235
|
+
return 0;
|
236
|
+
}
|
237
|
+
else if (t != candidate)
|
238
|
+
return 0;
|
239
|
+
}
|
240
|
+
|
241
|
+
/* All tests succeeded. Encode the result. */
|
242
|
+
done:
|
243
|
+
return candidate * 4 + (4 - (int)ele_count);
|
244
|
+
}
|
245
|
+
|
246
|
+
/* Representation of the procedure call argument marshalling
|
247
|
+
state.
|
248
|
+
|
249
|
+
The terse state variable names match the names used in the AARCH64
|
250
|
+
PCS. */
|
251
|
+
|
252
|
+
struct arg_state
|
253
|
+
{
|
254
|
+
unsigned ngrn; /* Next general-purpose register number. */
|
255
|
+
unsigned nsrn; /* Next vector register number. */
|
256
|
+
size_t nsaa; /* Next stack offset. */
|
257
|
+
|
258
|
+
#if defined (__APPLE__)
|
259
|
+
unsigned allocating_variadic;
|
260
|
+
#endif
|
261
|
+
};
|
262
|
+
|
263
|
+
/* Initialize a procedure call argument marshalling state. */
|
264
|
+
static void
|
265
|
+
arg_init (struct arg_state *state)
|
266
|
+
{
|
267
|
+
state->ngrn = 0;
|
268
|
+
state->nsrn = 0;
|
269
|
+
state->nsaa = 0;
|
270
|
+
#if defined (__APPLE__)
|
271
|
+
state->allocating_variadic = 0;
|
272
|
+
#endif
|
273
|
+
}
|
274
|
+
|
275
|
+
/* Allocate an aligned slot on the stack and return a pointer to it. */
|
276
|
+
static void *
|
277
|
+
allocate_to_stack (struct arg_state *state, void *stack,
|
278
|
+
size_t alignment, size_t size)
|
279
|
+
{
|
280
|
+
size_t nsaa = state->nsaa;
|
281
|
+
|
282
|
+
/* Round up the NSAA to the larger of 8 or the natural
|
283
|
+
alignment of the argument's type. */
|
284
|
+
#if defined (__APPLE__)
|
285
|
+
if (state->allocating_variadic && alignment < 8)
|
286
|
+
alignment = 8;
|
287
|
+
#else
|
288
|
+
if (alignment < 8)
|
289
|
+
alignment = 8;
|
290
|
+
#endif
|
291
|
+
|
292
|
+
nsaa = FFI_ALIGN (nsaa, alignment);
|
293
|
+
state->nsaa = nsaa + size;
|
294
|
+
|
295
|
+
return (char *)stack + nsaa;
|
296
|
+
}
|
297
|
+
|
298
|
+
static ffi_arg
|
299
|
+
extend_integer_type (void *source, int type)
|
300
|
+
{
|
301
|
+
switch (type)
|
302
|
+
{
|
303
|
+
case FFI_TYPE_UINT8:
|
304
|
+
return *(UINT8 *) source;
|
305
|
+
case FFI_TYPE_SINT8:
|
306
|
+
return *(SINT8 *) source;
|
307
|
+
case FFI_TYPE_UINT16:
|
308
|
+
return *(UINT16 *) source;
|
309
|
+
case FFI_TYPE_SINT16:
|
310
|
+
return *(SINT16 *) source;
|
311
|
+
case FFI_TYPE_UINT32:
|
312
|
+
return *(UINT32 *) source;
|
313
|
+
case FFI_TYPE_INT:
|
314
|
+
case FFI_TYPE_SINT32:
|
315
|
+
return *(SINT32 *) source;
|
316
|
+
case FFI_TYPE_UINT64:
|
317
|
+
case FFI_TYPE_SINT64:
|
318
|
+
return *(UINT64 *) source;
|
319
|
+
break;
|
320
|
+
case FFI_TYPE_POINTER:
|
321
|
+
return *(uintptr_t *) source;
|
322
|
+
default:
|
323
|
+
abort();
|
324
|
+
}
|
325
|
+
}
|
326
|
+
|
327
|
+
#if defined(_MSC_VER)
|
328
|
+
void extend_hfa_type (void *dest, void *src, int h);
|
329
|
+
#else
|
330
|
+
static void
|
331
|
+
extend_hfa_type (void *dest, void *src, int h)
|
332
|
+
{
|
333
|
+
ssize_t f = h - AARCH64_RET_S4;
|
334
|
+
void *x0;
|
335
|
+
|
336
|
+
asm volatile (
|
337
|
+
"adr %0, 0f\n"
|
338
|
+
" add %0, %0, %1\n"
|
339
|
+
" br %0\n"
|
340
|
+
"0: ldp s16, s17, [%3]\n" /* S4 */
|
341
|
+
" ldp s18, s19, [%3, #8]\n"
|
342
|
+
" b 4f\n"
|
343
|
+
" ldp s16, s17, [%3]\n" /* S3 */
|
344
|
+
" ldr s18, [%3, #8]\n"
|
345
|
+
" b 3f\n"
|
346
|
+
" ldp s16, s17, [%3]\n" /* S2 */
|
347
|
+
" b 2f\n"
|
348
|
+
" nop\n"
|
349
|
+
" ldr s16, [%3]\n" /* S1 */
|
350
|
+
" b 1f\n"
|
351
|
+
" nop\n"
|
352
|
+
" ldp d16, d17, [%3]\n" /* D4 */
|
353
|
+
" ldp d18, d19, [%3, #16]\n"
|
354
|
+
" b 4f\n"
|
355
|
+
" ldp d16, d17, [%3]\n" /* D3 */
|
356
|
+
" ldr d18, [%3, #16]\n"
|
357
|
+
" b 3f\n"
|
358
|
+
" ldp d16, d17, [%3]\n" /* D2 */
|
359
|
+
" b 2f\n"
|
360
|
+
" nop\n"
|
361
|
+
" ldr d16, [%3]\n" /* D1 */
|
362
|
+
" b 1f\n"
|
363
|
+
" nop\n"
|
364
|
+
" ldp q16, q17, [%3]\n" /* Q4 */
|
365
|
+
" ldp q18, q19, [%3, #32]\n"
|
366
|
+
" b 4f\n"
|
367
|
+
" ldp q16, q17, [%3]\n" /* Q3 */
|
368
|
+
" ldr q18, [%3, #32]\n"
|
369
|
+
" b 3f\n"
|
370
|
+
" ldp q16, q17, [%3]\n" /* Q2 */
|
371
|
+
" b 2f\n"
|
372
|
+
" nop\n"
|
373
|
+
" ldr q16, [%3]\n" /* Q1 */
|
374
|
+
" b 1f\n"
|
375
|
+
"4: str q19, [%2, #48]\n"
|
376
|
+
"3: str q18, [%2, #32]\n"
|
377
|
+
"2: str q17, [%2, #16]\n"
|
378
|
+
"1: str q16, [%2]"
|
379
|
+
: "=&r"(x0)
|
380
|
+
: "r"(f * 12), "r"(dest), "r"(src)
|
381
|
+
: "memory", "v16", "v17", "v18", "v19");
|
382
|
+
}
|
383
|
+
#endif
|
384
|
+
|
385
|
+
#if defined(_MSC_VER)
|
386
|
+
void* compress_hfa_type (void *dest, void *src, int h);
|
387
|
+
#else
|
388
|
+
static void *
|
389
|
+
compress_hfa_type (void *dest, void *reg, int h)
|
390
|
+
{
|
391
|
+
switch (h)
|
392
|
+
{
|
393
|
+
case AARCH64_RET_S1:
|
394
|
+
if (dest == reg)
|
395
|
+
{
|
396
|
+
#ifdef __AARCH64EB__
|
397
|
+
dest += 12;
|
398
|
+
#endif
|
399
|
+
}
|
400
|
+
else
|
401
|
+
*(float *)dest = *(float *)reg;
|
402
|
+
break;
|
403
|
+
case AARCH64_RET_S2:
|
404
|
+
asm ("ldp q16, q17, [%1]\n\t"
|
405
|
+
"st2 { v16.s, v17.s }[0], [%0]"
|
406
|
+
: : "r"(dest), "r"(reg) : "memory", "v16", "v17");
|
407
|
+
break;
|
408
|
+
case AARCH64_RET_S3:
|
409
|
+
asm ("ldp q16, q17, [%1]\n\t"
|
410
|
+
"ldr q18, [%1, #32]\n\t"
|
411
|
+
"st3 { v16.s, v17.s, v18.s }[0], [%0]"
|
412
|
+
: : "r"(dest), "r"(reg) : "memory", "v16", "v17", "v18");
|
413
|
+
break;
|
414
|
+
case AARCH64_RET_S4:
|
415
|
+
asm ("ldp q16, q17, [%1]\n\t"
|
416
|
+
"ldp q18, q19, [%1, #32]\n\t"
|
417
|
+
"st4 { v16.s, v17.s, v18.s, v19.s }[0], [%0]"
|
418
|
+
: : "r"(dest), "r"(reg) : "memory", "v16", "v17", "v18", "v19");
|
419
|
+
break;
|
420
|
+
|
421
|
+
case AARCH64_RET_D1:
|
422
|
+
if (dest == reg)
|
423
|
+
{
|
424
|
+
#ifdef __AARCH64EB__
|
425
|
+
dest += 8;
|
426
|
+
#endif
|
427
|
+
}
|
428
|
+
else
|
429
|
+
*(double *)dest = *(double *)reg;
|
430
|
+
break;
|
431
|
+
case AARCH64_RET_D2:
|
432
|
+
asm ("ldp q16, q17, [%1]\n\t"
|
433
|
+
"st2 { v16.d, v17.d }[0], [%0]"
|
434
|
+
: : "r"(dest), "r"(reg) : "memory", "v16", "v17");
|
435
|
+
break;
|
436
|
+
case AARCH64_RET_D3:
|
437
|
+
asm ("ldp q16, q17, [%1]\n\t"
|
438
|
+
"ldr q18, [%1, #32]\n\t"
|
439
|
+
"st3 { v16.d, v17.d, v18.d }[0], [%0]"
|
440
|
+
: : "r"(dest), "r"(reg) : "memory", "v16", "v17", "v18");
|
441
|
+
break;
|
442
|
+
case AARCH64_RET_D4:
|
443
|
+
asm ("ldp q16, q17, [%1]\n\t"
|
444
|
+
"ldp q18, q19, [%1, #32]\n\t"
|
445
|
+
"st4 { v16.d, v17.d, v18.d, v19.d }[0], [%0]"
|
446
|
+
: : "r"(dest), "r"(reg) : "memory", "v16", "v17", "v18", "v19");
|
447
|
+
break;
|
448
|
+
|
449
|
+
default:
|
450
|
+
if (dest != reg)
|
451
|
+
return memcpy (dest, reg, 16 * (4 - (h & 3)));
|
452
|
+
break;
|
453
|
+
}
|
454
|
+
return dest;
|
455
|
+
}
|
456
|
+
#endif
|
457
|
+
|
458
|
+
/* Either allocate an appropriate register for the argument type, or if
|
459
|
+
none are available, allocate a stack slot and return a pointer
|
460
|
+
to the allocated space. */
|
461
|
+
|
462
|
+
static void *
|
463
|
+
allocate_int_to_reg_or_stack (struct call_context *context,
|
464
|
+
struct arg_state *state,
|
465
|
+
void *stack, size_t size)
|
466
|
+
{
|
467
|
+
if (state->ngrn < N_X_ARG_REG)
|
468
|
+
return &context->x[state->ngrn++];
|
469
|
+
|
470
|
+
state->ngrn = N_X_ARG_REG;
|
471
|
+
return allocate_to_stack (state, stack, size, size);
|
472
|
+
}
|
473
|
+
|
474
|
+
ffi_status FFI_HIDDEN
|
475
|
+
ffi_prep_cif_machdep (ffi_cif *cif)
|
476
|
+
{
|
477
|
+
ffi_type *rtype = cif->rtype;
|
478
|
+
size_t bytes = cif->bytes;
|
479
|
+
int flags, i, n;
|
480
|
+
|
481
|
+
switch (rtype->type)
|
482
|
+
{
|
483
|
+
case FFI_TYPE_VOID:
|
484
|
+
flags = AARCH64_RET_VOID;
|
485
|
+
break;
|
486
|
+
case FFI_TYPE_UINT8:
|
487
|
+
flags = AARCH64_RET_UINT8;
|
488
|
+
break;
|
489
|
+
case FFI_TYPE_UINT16:
|
490
|
+
flags = AARCH64_RET_UINT16;
|
491
|
+
break;
|
492
|
+
case FFI_TYPE_UINT32:
|
493
|
+
flags = AARCH64_RET_UINT32;
|
494
|
+
break;
|
495
|
+
case FFI_TYPE_SINT8:
|
496
|
+
flags = AARCH64_RET_SINT8;
|
497
|
+
break;
|
498
|
+
case FFI_TYPE_SINT16:
|
499
|
+
flags = AARCH64_RET_SINT16;
|
500
|
+
break;
|
501
|
+
case FFI_TYPE_INT:
|
502
|
+
case FFI_TYPE_SINT32:
|
503
|
+
flags = AARCH64_RET_SINT32;
|
504
|
+
break;
|
505
|
+
case FFI_TYPE_SINT64:
|
506
|
+
case FFI_TYPE_UINT64:
|
507
|
+
flags = AARCH64_RET_INT64;
|
508
|
+
break;
|
509
|
+
case FFI_TYPE_POINTER:
|
510
|
+
flags = (sizeof(void *) == 4 ? AARCH64_RET_UINT32 : AARCH64_RET_INT64);
|
511
|
+
break;
|
512
|
+
|
513
|
+
case FFI_TYPE_FLOAT:
|
514
|
+
case FFI_TYPE_DOUBLE:
|
515
|
+
case FFI_TYPE_LONGDOUBLE:
|
516
|
+
case FFI_TYPE_STRUCT:
|
517
|
+
case FFI_TYPE_COMPLEX:
|
518
|
+
flags = is_vfp_type (rtype);
|
519
|
+
if (flags == 0)
|
520
|
+
{
|
521
|
+
size_t s = rtype->size;
|
522
|
+
if (s > 16)
|
523
|
+
{
|
524
|
+
flags = AARCH64_RET_VOID | AARCH64_RET_IN_MEM;
|
525
|
+
bytes += 8;
|
526
|
+
}
|
527
|
+
else if (s == 16)
|
528
|
+
flags = AARCH64_RET_INT128;
|
529
|
+
else if (s == 8)
|
530
|
+
flags = AARCH64_RET_INT64;
|
531
|
+
else
|
532
|
+
flags = AARCH64_RET_INT128 | AARCH64_RET_NEED_COPY;
|
533
|
+
}
|
534
|
+
break;
|
535
|
+
|
536
|
+
default:
|
537
|
+
abort();
|
538
|
+
}
|
539
|
+
|
540
|
+
for (i = 0, n = cif->nargs; i < n; i++)
|
541
|
+
if (is_vfp_type (cif->arg_types[i]))
|
542
|
+
{
|
543
|
+
flags |= AARCH64_FLAG_ARG_V;
|
544
|
+
break;
|
545
|
+
}
|
546
|
+
|
547
|
+
/* Round the stack up to a multiple of the stack alignment requirement. */
|
548
|
+
cif->bytes = (unsigned) FFI_ALIGN(bytes, 16);
|
549
|
+
cif->flags = flags;
|
550
|
+
#if defined (__APPLE__)
|
551
|
+
cif->aarch64_nfixedargs = 0;
|
552
|
+
#endif
|
553
|
+
|
554
|
+
return FFI_OK;
|
555
|
+
}
|
556
|
+
|
557
|
+
#if defined (__APPLE__)
|
558
|
+
/* Perform Apple-specific cif processing for variadic calls */
|
559
|
+
ffi_status FFI_HIDDEN
|
560
|
+
ffi_prep_cif_machdep_var(ffi_cif *cif, unsigned int nfixedargs,
|
561
|
+
unsigned int ntotalargs)
|
562
|
+
{
|
563
|
+
ffi_status status = ffi_prep_cif_machdep (cif);
|
564
|
+
cif->aarch64_nfixedargs = nfixedargs;
|
565
|
+
return status;
|
566
|
+
}
|
567
|
+
#else
|
568
|
+
ffi_status FFI_HIDDEN
|
569
|
+
ffi_prep_cif_machdep_var(ffi_cif *cif, unsigned int nfixedargs, unsigned int ntotalargs)
|
570
|
+
{
|
571
|
+
ffi_status status = ffi_prep_cif_machdep (cif);
|
572
|
+
cif->flags |= AARCH64_FLAG_VARARG;
|
573
|
+
return status;
|
574
|
+
}
|
575
|
+
#endif /* __APPLE__ */
|
576
|
+
|
577
|
+
extern void ffi_call_SYSV (struct call_context *context, void *frame,
|
578
|
+
void (*fn)(void), void *rvalue, int flags,
|
579
|
+
void *closure) FFI_HIDDEN;
|
580
|
+
|
581
|
+
/* Call a function with the provided arguments and capture the return
|
582
|
+
value. */
|
583
|
+
static void
|
584
|
+
ffi_call_int (ffi_cif *cif, void (*fn)(void), void *orig_rvalue,
|
585
|
+
void **avalue, void *closure)
|
586
|
+
{
|
587
|
+
struct call_context *context;
|
588
|
+
void *stack, *frame, *rvalue;
|
589
|
+
struct arg_state state;
|
590
|
+
size_t stack_bytes, rtype_size, rsize;
|
591
|
+
int i, nargs, flags, isvariadic = 0;
|
592
|
+
ffi_type *rtype;
|
593
|
+
|
594
|
+
flags = cif->flags;
|
595
|
+
rtype = cif->rtype;
|
596
|
+
rtype_size = rtype->size;
|
597
|
+
stack_bytes = cif->bytes;
|
598
|
+
|
599
|
+
if (flags & AARCH64_FLAG_VARARG)
|
600
|
+
{
|
601
|
+
isvariadic = 1;
|
602
|
+
flags &= ~AARCH64_FLAG_VARARG;
|
603
|
+
}
|
604
|
+
|
605
|
+
/* If the target function returns a structure via hidden pointer,
|
606
|
+
then we cannot allow a null rvalue. Otherwise, mash a null
|
607
|
+
rvalue to void return type. */
|
608
|
+
rsize = 0;
|
609
|
+
if (flags & AARCH64_RET_IN_MEM)
|
610
|
+
{
|
611
|
+
if (orig_rvalue == NULL)
|
612
|
+
rsize = rtype_size;
|
613
|
+
}
|
614
|
+
else if (orig_rvalue == NULL)
|
615
|
+
flags &= AARCH64_FLAG_ARG_V;
|
616
|
+
else if (flags & AARCH64_RET_NEED_COPY)
|
617
|
+
rsize = 16;
|
618
|
+
|
619
|
+
/* Allocate consectutive stack for everything we'll need. */
|
620
|
+
context = alloca (sizeof(struct call_context) + stack_bytes + 32 + rsize);
|
621
|
+
stack = context + 1;
|
622
|
+
frame = (void*)((uintptr_t)stack + (uintptr_t)stack_bytes);
|
623
|
+
rvalue = (rsize ? (void*)((uintptr_t)frame + 32) : orig_rvalue);
|
624
|
+
|
625
|
+
arg_init (&state);
|
626
|
+
for (i = 0, nargs = cif->nargs; i < nargs; i++)
|
627
|
+
{
|
628
|
+
ffi_type *ty = cif->arg_types[i];
|
629
|
+
size_t s = ty->size;
|
630
|
+
void *a = avalue[i];
|
631
|
+
int h, t;
|
632
|
+
|
633
|
+
t = ty->type;
|
634
|
+
switch (t)
|
635
|
+
{
|
636
|
+
case FFI_TYPE_VOID:
|
637
|
+
FFI_ASSERT (0);
|
638
|
+
break;
|
639
|
+
|
640
|
+
/* If the argument is a basic type the argument is allocated to an
|
641
|
+
appropriate register, or if none are available, to the stack. */
|
642
|
+
case FFI_TYPE_INT:
|
643
|
+
case FFI_TYPE_UINT8:
|
644
|
+
case FFI_TYPE_SINT8:
|
645
|
+
case FFI_TYPE_UINT16:
|
646
|
+
case FFI_TYPE_SINT16:
|
647
|
+
case FFI_TYPE_UINT32:
|
648
|
+
case FFI_TYPE_SINT32:
|
649
|
+
case FFI_TYPE_UINT64:
|
650
|
+
case FFI_TYPE_SINT64:
|
651
|
+
case FFI_TYPE_POINTER:
|
652
|
+
do_pointer:
|
653
|
+
{
|
654
|
+
ffi_arg ext = extend_integer_type (a, t);
|
655
|
+
if (state.ngrn < N_X_ARG_REG)
|
656
|
+
context->x[state.ngrn++] = ext;
|
657
|
+
else
|
658
|
+
{
|
659
|
+
void *d = allocate_to_stack (&state, stack, ty->alignment, s);
|
660
|
+
state.ngrn = N_X_ARG_REG;
|
661
|
+
/* Note that the default abi extends each argument
|
662
|
+
to a full 64-bit slot, while the iOS abi allocates
|
663
|
+
only enough space. */
|
664
|
+
#ifdef __APPLE__
|
665
|
+
memcpy(d, a, s);
|
666
|
+
#else
|
667
|
+
*(ffi_arg *)d = ext;
|
668
|
+
#endif
|
669
|
+
}
|
670
|
+
}
|
671
|
+
break;
|
672
|
+
|
673
|
+
case FFI_TYPE_FLOAT:
|
674
|
+
case FFI_TYPE_DOUBLE:
|
675
|
+
case FFI_TYPE_LONGDOUBLE:
|
676
|
+
case FFI_TYPE_STRUCT:
|
677
|
+
case FFI_TYPE_COMPLEX:
|
678
|
+
{
|
679
|
+
void *dest;
|
680
|
+
|
681
|
+
h = is_vfp_type (ty);
|
682
|
+
if (h)
|
683
|
+
{
|
684
|
+
int elems = 4 - (h & 3);
|
685
|
+
if (cif->abi == FFI_WIN64 && isvariadic)
|
686
|
+
{
|
687
|
+
if (state.ngrn + elems <= N_X_ARG_REG)
|
688
|
+
{
|
689
|
+
dest = &context->x[state.ngrn];
|
690
|
+
state.ngrn += elems;
|
691
|
+
extend_hfa_type(dest, a, h);
|
692
|
+
break;
|
693
|
+
}
|
694
|
+
state.nsrn = N_X_ARG_REG;
|
695
|
+
dest = allocate_to_stack(&state, stack, ty->alignment, s);
|
696
|
+
}
|
697
|
+
else
|
698
|
+
{
|
699
|
+
if (state.nsrn + elems <= N_V_ARG_REG)
|
700
|
+
{
|
701
|
+
dest = &context->v[state.nsrn];
|
702
|
+
state.nsrn += elems;
|
703
|
+
extend_hfa_type (dest, a, h);
|
704
|
+
break;
|
705
|
+
}
|
706
|
+
state.nsrn = N_V_ARG_REG;
|
707
|
+
dest = allocate_to_stack (&state, stack, ty->alignment, s);
|
708
|
+
}
|
709
|
+
}
|
710
|
+
else if (s > 16)
|
711
|
+
{
|
712
|
+
/* If the argument is a composite type that is larger than 16
|
713
|
+
bytes, then the argument has been copied to memory, and
|
714
|
+
the argument is replaced by a pointer to the copy. */
|
715
|
+
a = &avalue[i];
|
716
|
+
t = FFI_TYPE_POINTER;
|
717
|
+
s = sizeof (void *);
|
718
|
+
goto do_pointer;
|
719
|
+
}
|
720
|
+
else
|
721
|
+
{
|
722
|
+
size_t n = (s + 7) / 8;
|
723
|
+
if (state.ngrn + n <= N_X_ARG_REG)
|
724
|
+
{
|
725
|
+
/* If the argument is a composite type and the size in
|
726
|
+
double-words is not more than the number of available
|
727
|
+
X registers, then the argument is copied into
|
728
|
+
consecutive X registers. */
|
729
|
+
dest = &context->x[state.ngrn];
|
730
|
+
state.ngrn += (unsigned int)n;
|
731
|
+
}
|
732
|
+
else
|
733
|
+
{
|
734
|
+
/* Otherwise, there are insufficient X registers. Further
|
735
|
+
X register allocations are prevented, the NSAA is
|
736
|
+
adjusted and the argument is copied to memory at the
|
737
|
+
adjusted NSAA. */
|
738
|
+
state.ngrn = N_X_ARG_REG;
|
739
|
+
dest = allocate_to_stack (&state, stack, ty->alignment, s);
|
740
|
+
}
|
741
|
+
}
|
742
|
+
memcpy (dest, a, s);
|
743
|
+
}
|
744
|
+
break;
|
745
|
+
|
746
|
+
default:
|
747
|
+
abort();
|
748
|
+
}
|
749
|
+
|
750
|
+
#if defined (__APPLE__)
|
751
|
+
if (i + 1 == cif->aarch64_nfixedargs)
|
752
|
+
{
|
753
|
+
state.ngrn = N_X_ARG_REG;
|
754
|
+
state.nsrn = N_V_ARG_REG;
|
755
|
+
state.allocating_variadic = 1;
|
756
|
+
}
|
757
|
+
#endif
|
758
|
+
}
|
759
|
+
|
760
|
+
ffi_call_SYSV (context, frame, fn, rvalue, flags, closure);
|
761
|
+
|
762
|
+
if (flags & AARCH64_RET_NEED_COPY)
|
763
|
+
memcpy (orig_rvalue, rvalue, rtype_size);
|
764
|
+
}
|
765
|
+
|
766
|
+
void
|
767
|
+
ffi_call (ffi_cif *cif, void (*fn) (void), void *rvalue, void **avalue)
|
768
|
+
{
|
769
|
+
ffi_call_int (cif, fn, rvalue, avalue, NULL);
|
770
|
+
}
|
771
|
+
|
772
|
+
#ifdef FFI_GO_CLOSURES
|
773
|
+
void
|
774
|
+
ffi_call_go (ffi_cif *cif, void (*fn) (void), void *rvalue,
|
775
|
+
void **avalue, void *closure)
|
776
|
+
{
|
777
|
+
ffi_call_int (cif, fn, rvalue, avalue, closure);
|
778
|
+
}
|
779
|
+
#endif /* FFI_GO_CLOSURES */
|
780
|
+
|
781
|
+
/* Build a trampoline. */
|
782
|
+
|
783
|
+
extern void ffi_closure_SYSV (void) FFI_HIDDEN;
|
784
|
+
extern void ffi_closure_SYSV_V (void) FFI_HIDDEN;
|
785
|
+
|
786
|
+
ffi_status
|
787
|
+
ffi_prep_closure_loc (ffi_closure *closure,
|
788
|
+
ffi_cif* cif,
|
789
|
+
void (*fun)(ffi_cif*,void*,void**,void*),
|
790
|
+
void *user_data,
|
791
|
+
void *codeloc)
|
792
|
+
{
|
793
|
+
if (cif->abi != FFI_SYSV)
|
794
|
+
return FFI_BAD_ABI;
|
795
|
+
|
796
|
+
void (*start)(void);
|
797
|
+
|
798
|
+
if (cif->flags & AARCH64_FLAG_ARG_V)
|
799
|
+
start = ffi_closure_SYSV_V;
|
800
|
+
else
|
801
|
+
start = ffi_closure_SYSV;
|
802
|
+
|
803
|
+
#if FFI_EXEC_TRAMPOLINE_TABLE
|
804
|
+
#ifdef __MACH__
|
805
|
+
#ifdef HAVE_PTRAUTH
|
806
|
+
codeloc = ptrauth_strip (codeloc, ptrauth_key_asia);
|
807
|
+
#endif
|
808
|
+
void **config = (void **)((uint8_t *)codeloc - PAGE_MAX_SIZE);
|
809
|
+
config[0] = closure;
|
810
|
+
config[1] = start;
|
811
|
+
#endif
|
812
|
+
#else
|
813
|
+
static const unsigned char trampoline[16] = {
|
814
|
+
0x90, 0x00, 0x00, 0x58, /* ldr x16, tramp+16 */
|
815
|
+
0xf1, 0xff, 0xff, 0x10, /* adr x17, tramp+0 */
|
816
|
+
0x00, 0x02, 0x1f, 0xd6 /* br x16 */
|
817
|
+
};
|
818
|
+
char *tramp = closure->tramp;
|
819
|
+
|
820
|
+
memcpy (tramp, trampoline, sizeof(trampoline));
|
821
|
+
|
822
|
+
*(UINT64 *)(tramp + 16) = (uintptr_t)start;
|
823
|
+
|
824
|
+
ffi_clear_cache(tramp, tramp + FFI_TRAMPOLINE_SIZE);
|
825
|
+
|
826
|
+
/* Also flush the cache for code mapping. */
|
827
|
+
#ifdef _WIN32
|
828
|
+
// Not using dlmalloc.c for Windows ARM64 builds
|
829
|
+
// so calling ffi_data_to_code_pointer() isn't necessary
|
830
|
+
unsigned char *tramp_code = tramp;
|
831
|
+
#else
|
832
|
+
unsigned char *tramp_code = ffi_data_to_code_pointer (tramp);
|
833
|
+
#endif
|
834
|
+
ffi_clear_cache (tramp_code, tramp_code + FFI_TRAMPOLINE_SIZE);
|
835
|
+
#endif
|
836
|
+
|
837
|
+
closure->cif = cif;
|
838
|
+
closure->fun = fun;
|
839
|
+
closure->user_data = user_data;
|
840
|
+
|
841
|
+
return FFI_OK;
|
842
|
+
}
|
843
|
+
|
844
|
+
#ifdef FFI_GO_CLOSURES
|
845
|
+
extern void ffi_go_closure_SYSV (void) FFI_HIDDEN;
|
846
|
+
extern void ffi_go_closure_SYSV_V (void) FFI_HIDDEN;
|
847
|
+
|
848
|
+
ffi_status
|
849
|
+
ffi_prep_go_closure (ffi_go_closure *closure, ffi_cif* cif,
|
850
|
+
void (*fun)(ffi_cif*,void*,void**,void*))
|
851
|
+
{
|
852
|
+
void (*start)(void);
|
853
|
+
|
854
|
+
if (cif->abi != FFI_SYSV)
|
855
|
+
return FFI_BAD_ABI;
|
856
|
+
|
857
|
+
if (cif->flags & AARCH64_FLAG_ARG_V)
|
858
|
+
start = ffi_go_closure_SYSV_V;
|
859
|
+
else
|
860
|
+
start = ffi_go_closure_SYSV;
|
861
|
+
|
862
|
+
closure->tramp = start;
|
863
|
+
closure->cif = cif;
|
864
|
+
closure->fun = fun;
|
865
|
+
|
866
|
+
return FFI_OK;
|
867
|
+
}
|
868
|
+
#endif /* FFI_GO_CLOSURES */
|
869
|
+
|
870
|
+
/* Primary handler to setup and invoke a function within a closure.
|
871
|
+
|
872
|
+
A closure when invoked enters via the assembler wrapper
|
873
|
+
ffi_closure_SYSV(). The wrapper allocates a call context on the
|
874
|
+
stack, saves the interesting registers (from the perspective of
|
875
|
+
the calling convention) into the context then passes control to
|
876
|
+
ffi_closure_SYSV_inner() passing the saved context and a pointer to
|
877
|
+
the stack at the point ffi_closure_SYSV() was invoked.
|
878
|
+
|
879
|
+
On the return path the assembler wrapper will reload call context
|
880
|
+
registers.
|
881
|
+
|
882
|
+
ffi_closure_SYSV_inner() marshalls the call context into ffi value
|
883
|
+
descriptors, invokes the wrapped function, then marshalls the return
|
884
|
+
value back into the call context. */
|
885
|
+
|
886
|
+
int FFI_HIDDEN
|
887
|
+
ffi_closure_SYSV_inner (ffi_cif *cif,
|
888
|
+
void (*fun)(ffi_cif*,void*,void**,void*),
|
889
|
+
void *user_data,
|
890
|
+
struct call_context *context,
|
891
|
+
void *stack, void *rvalue, void *struct_rvalue)
|
892
|
+
{
|
893
|
+
void **avalue = (void**) alloca (cif->nargs * sizeof (void*));
|
894
|
+
int i, h, nargs, flags;
|
895
|
+
struct arg_state state;
|
896
|
+
|
897
|
+
arg_init (&state);
|
898
|
+
|
899
|
+
for (i = 0, nargs = cif->nargs; i < nargs; i++)
|
900
|
+
{
|
901
|
+
ffi_type *ty = cif->arg_types[i];
|
902
|
+
int t = ty->type;
|
903
|
+
size_t n, s = ty->size;
|
904
|
+
|
905
|
+
switch (t)
|
906
|
+
{
|
907
|
+
case FFI_TYPE_VOID:
|
908
|
+
FFI_ASSERT (0);
|
909
|
+
break;
|
910
|
+
|
911
|
+
case FFI_TYPE_INT:
|
912
|
+
case FFI_TYPE_UINT8:
|
913
|
+
case FFI_TYPE_SINT8:
|
914
|
+
case FFI_TYPE_UINT16:
|
915
|
+
case FFI_TYPE_SINT16:
|
916
|
+
case FFI_TYPE_UINT32:
|
917
|
+
case FFI_TYPE_SINT32:
|
918
|
+
case FFI_TYPE_UINT64:
|
919
|
+
case FFI_TYPE_SINT64:
|
920
|
+
case FFI_TYPE_POINTER:
|
921
|
+
avalue[i] = allocate_int_to_reg_or_stack (context, &state, stack, s);
|
922
|
+
break;
|
923
|
+
|
924
|
+
case FFI_TYPE_FLOAT:
|
925
|
+
case FFI_TYPE_DOUBLE:
|
926
|
+
case FFI_TYPE_LONGDOUBLE:
|
927
|
+
case FFI_TYPE_STRUCT:
|
928
|
+
case FFI_TYPE_COMPLEX:
|
929
|
+
h = is_vfp_type (ty);
|
930
|
+
if (h)
|
931
|
+
{
|
932
|
+
n = 4 - (h & 3);
|
933
|
+
#ifdef _WIN32 /* for handling armasm calling convention */
|
934
|
+
if (cif->is_variadic)
|
935
|
+
{
|
936
|
+
if (state.ngrn + n <= N_X_ARG_REG)
|
937
|
+
{
|
938
|
+
void *reg = &context->x[state.ngrn];
|
939
|
+
state.ngrn += (unsigned int)n;
|
940
|
+
|
941
|
+
/* Eeek! We need a pointer to the structure, however the
|
942
|
+
homogeneous float elements are being passed in individual
|
943
|
+
registers, therefore for float and double the structure
|
944
|
+
is not represented as a contiguous sequence of bytes in
|
945
|
+
our saved register context. We don't need the original
|
946
|
+
contents of the register storage, so we reformat the
|
947
|
+
structure into the same memory. */
|
948
|
+
avalue[i] = compress_hfa_type(reg, reg, h);
|
949
|
+
}
|
950
|
+
else
|
951
|
+
{
|
952
|
+
state.ngrn = N_X_ARG_REG;
|
953
|
+
state.nsrn = N_V_ARG_REG;
|
954
|
+
avalue[i] = allocate_to_stack(&state, stack,
|
955
|
+
ty->alignment, s);
|
956
|
+
}
|
957
|
+
}
|
958
|
+
else
|
959
|
+
{
|
960
|
+
#endif /* for handling armasm calling convention */
|
961
|
+
if (state.nsrn + n <= N_V_ARG_REG)
|
962
|
+
{
|
963
|
+
void *reg = &context->v[state.nsrn];
|
964
|
+
state.nsrn += (unsigned int)n;
|
965
|
+
avalue[i] = compress_hfa_type(reg, reg, h);
|
966
|
+
}
|
967
|
+
else
|
968
|
+
{
|
969
|
+
state.nsrn = N_V_ARG_REG;
|
970
|
+
avalue[i] = allocate_to_stack(&state, stack,
|
971
|
+
ty->alignment, s);
|
972
|
+
}
|
973
|
+
#ifdef _WIN32 /* for handling armasm calling convention */
|
974
|
+
}
|
975
|
+
#endif /* for handling armasm calling convention */
|
976
|
+
}
|
977
|
+
else if (s > 16)
|
978
|
+
{
|
979
|
+
/* Replace Composite type of size greater than 16 with a
|
980
|
+
pointer. */
|
981
|
+
avalue[i] = *(void **)
|
982
|
+
allocate_int_to_reg_or_stack (context, &state, stack,
|
983
|
+
sizeof (void *));
|
984
|
+
}
|
985
|
+
else
|
986
|
+
{
|
987
|
+
n = (s + 7) / 8;
|
988
|
+
if (state.ngrn + n <= N_X_ARG_REG)
|
989
|
+
{
|
990
|
+
avalue[i] = &context->x[state.ngrn];
|
991
|
+
state.ngrn += (unsigned int)n;
|
992
|
+
}
|
993
|
+
else
|
994
|
+
{
|
995
|
+
state.ngrn = N_X_ARG_REG;
|
996
|
+
avalue[i] = allocate_to_stack(&state, stack,
|
997
|
+
ty->alignment, s);
|
998
|
+
}
|
999
|
+
}
|
1000
|
+
break;
|
1001
|
+
|
1002
|
+
default:
|
1003
|
+
abort();
|
1004
|
+
}
|
1005
|
+
|
1006
|
+
#if defined (__APPLE__)
|
1007
|
+
if (i + 1 == cif->aarch64_nfixedargs)
|
1008
|
+
{
|
1009
|
+
state.ngrn = N_X_ARG_REG;
|
1010
|
+
state.nsrn = N_V_ARG_REG;
|
1011
|
+
state.allocating_variadic = 1;
|
1012
|
+
}
|
1013
|
+
#endif
|
1014
|
+
}
|
1015
|
+
|
1016
|
+
flags = cif->flags;
|
1017
|
+
if (flags & AARCH64_RET_IN_MEM)
|
1018
|
+
rvalue = struct_rvalue;
|
1019
|
+
|
1020
|
+
fun (cif, rvalue, avalue, user_data);
|
1021
|
+
|
1022
|
+
return flags;
|
1023
|
+
}
|
1024
|
+
|
1025
|
+
#endif /* (__aarch64__) || defined(__arm64__)|| defined (_M_ARM64)*/
|