minilab 1.1.0-x86-mswin32-60
Sign up to get free protection for your applications and to get access to all the features.
- data/CHANGES +8 -0
- data/LICENSE +19 -0
- data/README +105 -0
- data/Rakefile +83 -0
- data/config/environment.rb +23 -0
- data/config/objects.yml +23 -0
- data/lib/analog_io.rb +23 -0
- data/lib/connection_state.rb +13 -0
- data/lib/digital_auxport_io.rb +34 -0
- data/lib/digital_configuration.rb +53 -0
- data/lib/digital_port_io.rb +39 -0
- data/lib/library_translator.rb +46 -0
- data/lib/minilab.rb +130 -0
- data/lib/minilab_constants.rb +20 -0
- data/lib/minilab_context.rb +14 -0
- data/lib/minilab_hardware.rb +112 -0
- data/lib/minilab_wrapper.rb +12 -0
- data/test/system/analog_input.test +3 -0
- data/test/system/analog_output.test +37 -0
- data/test/system/digital_port_input.test +5 -0
- data/test/system/digital_port_output.test +39 -0
- data/test/system/digital_port_read_byte.test +26 -0
- data/test/system/digital_screw_terminals_input.test +2 -0
- data/test/system/digital_screw_terminals_output.test +11 -0
- data/test/system/minilab_driver.rb +83 -0
- data/test/test_helper.rb +15 -0
- data/test/unit/analog_io_test.rb +54 -0
- data/test/unit/connection_state_test.rb +18 -0
- data/test/unit/digital_auxport_io_test.rb +102 -0
- data/test/unit/digital_configuration_test.rb +100 -0
- data/test/unit/digital_port_io_test.rb +67 -0
- data/test/unit/library_translator_test.rb +98 -0
- data/test/unit/minilab_context_test.rb +23 -0
- data/test/unit/minilab_hardware_test.rb +33 -0
- data/test/unit/minilab_test.rb +115 -0
- data/test/unit/minilab_wrapper_test.rb +24 -0
- data/vendor/behaviors/lib/behaviors.rb +50 -0
- data/vendor/behaviors/tasks/behaviors_tasks.rake +140 -0
- data/vendor/behaviors/test/behaviors_tasks_test.rb +71 -0
- data/vendor/behaviors/test/behaviors_test.rb +50 -0
- data/vendor/behaviors/test/tasks_test/Rakefile +16 -0
- data/vendor/behaviors/test/tasks_test/doc/behaviors.html +55 -0
- data/vendor/behaviors/test/tasks_test/lib/user.rb +2 -0
- data/vendor/behaviors/test/tasks_test/test/user_test.rb +17 -0
- data/vendor/constructor-1.0.2/History.txt +11 -0
- data/vendor/constructor-1.0.2/Manifest.txt +6 -0
- data/vendor/constructor-1.0.2/README.txt +77 -0
- data/vendor/constructor-1.0.2/Rakefile +33 -0
- data/vendor/constructor-1.0.2/lib/constructor.rb +119 -0
- data/vendor/constructor-1.0.2/specs/constructor_spec.rb +345 -0
- data/vendor/diy-1.1.1/History.txt +23 -0
- data/vendor/diy-1.1.1/Manifest.txt +88 -0
- data/vendor/diy-1.1.1/README.txt +220 -0
- data/vendor/diy-1.1.1/Rakefile +29 -0
- data/vendor/diy-1.1.1/TODO.txt +9 -0
- data/vendor/diy-1.1.1/homepage/Notes.txt +27 -0
- data/vendor/diy-1.1.1/homepage/Rakefile +14 -0
- data/vendor/diy-1.1.1/homepage/diy_example.png +0 -0
- data/vendor/diy-1.1.1/homepage/index.erb +36 -0
- data/vendor/diy-1.1.1/homepage/index.html +45 -0
- data/vendor/diy-1.1.1/homepage/objects_yml.png +0 -0
- data/vendor/diy-1.1.1/homepage/page_header.graffle +0 -0
- data/vendor/diy-1.1.1/homepage/page_header.html +9 -0
- data/vendor/diy-1.1.1/homepage/page_header.png +0 -0
- data/vendor/diy-1.1.1/lib/diy.rb +365 -0
- data/vendor/diy-1.1.1/sample_code/car.rb +7 -0
- data/vendor/diy-1.1.1/sample_code/chassis.rb +5 -0
- data/vendor/diy-1.1.1/sample_code/diy_example.rb +26 -0
- data/vendor/diy-1.1.1/sample_code/engine.rb +5 -0
- data/vendor/diy-1.1.1/sample_code/objects.yml +10 -0
- data/vendor/diy-1.1.1/test/constructor.rb +119 -0
- data/vendor/diy-1.1.1/test/diy_test.rb +604 -0
- data/vendor/diy-1.1.1/test/files/broken_construction.yml +7 -0
- data/vendor/diy-1.1.1/test/files/cat/cat.rb +3 -0
- data/vendor/diy-1.1.1/test/files/cat/extra_conflict.yml +5 -0
- data/vendor/diy-1.1.1/test/files/cat/heritage.rb +2 -0
- data/vendor/diy-1.1.1/test/files/cat/needs_input.yml +3 -0
- data/vendor/diy-1.1.1/test/files/cat/the_cat_lineage.rb +1 -0
- data/vendor/diy-1.1.1/test/files/dog/dog_model.rb +3 -0
- data/vendor/diy-1.1.1/test/files/dog/dog_presenter.rb +3 -0
- data/vendor/diy-1.1.1/test/files/dog/dog_view.rb +2 -0
- data/vendor/diy-1.1.1/test/files/dog/file_resolver.rb +2 -0
- data/vendor/diy-1.1.1/test/files/dog/other_thing.rb +2 -0
- data/vendor/diy-1.1.1/test/files/dog/simple.yml +11 -0
- data/vendor/diy-1.1.1/test/files/donkey/foo.rb +8 -0
- data/vendor/diy-1.1.1/test/files/donkey/foo/bar/qux.rb +7 -0
- data/vendor/diy-1.1.1/test/files/fud/objects.yml +13 -0
- data/vendor/diy-1.1.1/test/files/fud/toy.rb +14 -0
- data/vendor/diy-1.1.1/test/files/functions/invalid_method.yml +5 -0
- data/vendor/diy-1.1.1/test/files/functions/method_extractor.rb +3 -0
- data/vendor/diy-1.1.1/test/files/functions/nonsingleton_objects.yml +6 -0
- data/vendor/diy-1.1.1/test/files/functions/objects.yml +11 -0
- data/vendor/diy-1.1.1/test/files/functions/thing.rb +3 -0
- data/vendor/diy-1.1.1/test/files/functions/thing_builder.rb +21 -0
- data/vendor/diy-1.1.1/test/files/functions/things_builder.rb +3 -0
- data/vendor/diy-1.1.1/test/files/gnu/objects.yml +14 -0
- data/vendor/diy-1.1.1/test/files/gnu/thinger.rb +7 -0
- data/vendor/diy-1.1.1/test/files/goat/base.rb +8 -0
- data/vendor/diy-1.1.1/test/files/goat/can.rb +6 -0
- data/vendor/diy-1.1.1/test/files/goat/goat.rb +6 -0
- data/vendor/diy-1.1.1/test/files/goat/objects.yml +12 -0
- data/vendor/diy-1.1.1/test/files/goat/paper.rb +6 -0
- data/vendor/diy-1.1.1/test/files/goat/plane.rb +7 -0
- data/vendor/diy-1.1.1/test/files/goat/shirt.rb +6 -0
- data/vendor/diy-1.1.1/test/files/goat/wings.rb +8 -0
- data/vendor/diy-1.1.1/test/files/horse/holder_thing.rb +3 -0
- data/vendor/diy-1.1.1/test/files/horse/objects.yml +7 -0
- data/vendor/diy-1.1.1/test/files/namespace/animal/bird.rb +5 -0
- data/vendor/diy-1.1.1/test/files/namespace/animal/cat.rb +5 -0
- data/vendor/diy-1.1.1/test/files/namespace/animal/reptile/hardshell/turtle.rb +8 -0
- data/vendor/diy-1.1.1/test/files/namespace/animal/reptile/lizard.rb +7 -0
- data/vendor/diy-1.1.1/test/files/namespace/bad_module_specified.yml +8 -0
- data/vendor/diy-1.1.1/test/files/namespace/class_name_combine.yml +8 -0
- data/vendor/diy-1.1.1/test/files/namespace/hello.txt +1 -0
- data/vendor/diy-1.1.1/test/files/namespace/no_module_specified.yml +8 -0
- data/vendor/diy-1.1.1/test/files/namespace/objects.yml +21 -0
- data/vendor/diy-1.1.1/test/files/namespace/road.rb +2 -0
- data/vendor/diy-1.1.1/test/files/namespace/sky.rb +2 -0
- data/vendor/diy-1.1.1/test/files/namespace/subcontext.yml +22 -0
- data/vendor/diy-1.1.1/test/files/non_singleton/air.rb +2 -0
- data/vendor/diy-1.1.1/test/files/non_singleton/fat_cat.rb +3 -0
- data/vendor/diy-1.1.1/test/files/non_singleton/objects.yml +19 -0
- data/vendor/diy-1.1.1/test/files/non_singleton/pig.rb +3 -0
- data/vendor/diy-1.1.1/test/files/non_singleton/thread_spinner.rb +3 -0
- data/vendor/diy-1.1.1/test/files/non_singleton/tick.rb +3 -0
- data/vendor/diy-1.1.1/test/files/non_singleton/yard.rb +2 -0
- data/vendor/diy-1.1.1/test/files/yak/core_model.rb +3 -0
- data/vendor/diy-1.1.1/test/files/yak/core_presenter.rb +3 -0
- data/vendor/diy-1.1.1/test/files/yak/core_view.rb +1 -0
- data/vendor/diy-1.1.1/test/files/yak/data_source.rb +1 -0
- data/vendor/diy-1.1.1/test/files/yak/fringe_model.rb +3 -0
- data/vendor/diy-1.1.1/test/files/yak/fringe_presenter.rb +3 -0
- data/vendor/diy-1.1.1/test/files/yak/fringe_view.rb +1 -0
- data/vendor/diy-1.1.1/test/files/yak/giant_squid.rb +3 -0
- data/vendor/diy-1.1.1/test/files/yak/krill.rb +2 -0
- data/vendor/diy-1.1.1/test/files/yak/my_objects.yml +21 -0
- data/vendor/diy-1.1.1/test/files/yak/sub_sub_context_test.yml +27 -0
- data/vendor/diy-1.1.1/test/test_helper.rb +39 -0
- data/vendor/ffi-0.4.0-x86-mswin32/LICENSE +51 -0
- data/vendor/ffi-0.4.0-x86-mswin32/Rakefile +142 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/AbstractMemory.c +412 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/AbstractMemory.h +68 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/AutoPointer.c +60 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/AutoPointer.h +18 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/Buffer.c +171 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/Callback.c +374 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/Callback.h +47 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/DynamicLibrary.c +213 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/DynamicLibrary.h +22 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/Invoker.c +962 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/LastError.c +135 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/LastError.h +18 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/MemoryPointer.c +156 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/MemoryPointer.h +20 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/NullPointer.c +143 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/Platform.c +59 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/Platform.h +16 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/Pointer.c +164 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/Pointer.h +25 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/Struct.c +477 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/Struct.h +26 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/Type.c +230 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/Type.h +28 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/Types.c +118 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/Types.h +54 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/compat.h +22 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/endian.h +40 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/extconf.rb +31 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/ffi.c +76 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi.bsd.mk +34 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi.darwin.mk +75 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi.gnu.mk +29 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi.mk +13 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/ChangeLog +3243 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/ChangeLog.libffi +347 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/ChangeLog.libgcj +40 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/ChangeLog.v1 +764 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/LICENSE +21 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/Makefile.am +177 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/Makefile.in +1640 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/README +328 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/TODO +1 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/acinclude.m4 +92 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/aclocal.m4 +7516 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/compile +142 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/config.guess +1516 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/config.sub +1626 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/configure +24414 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/configure.ac +365 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/configure.host +11 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/depcomp +584 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/doc/libffi.info +533 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/doc/libffi.texi +541 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/doc/stamp-vti +4 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/doc/version.texi +4 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/fficonfig.h.in +160 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/include/Makefile.am +9 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/include/Makefile.in +422 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/include/ffi.h.in +393 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/include/ffi_common.h +98 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/install-sh +323 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/libffi.pc.in +10 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/libtool-version +29 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/ltcf-c.sh +861 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/ltcf-cxx.sh +1069 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/ltcf-gcj.sh +700 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/ltconfig +2862 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/ltmain.sh +6930 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/man/Makefile.am +8 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/man/Makefile.in +395 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/man/ffi.3 +31 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/man/ffi_call.3 +103 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/man/ffi_prep_cif.3 +66 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/mdate-sh +201 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/missing +353 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/mkinstalldirs +158 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/alpha/ffi.c +284 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/alpha/ffitarget.h +48 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/alpha/osf.S +366 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/arm/ffi.c +309 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/arm/ffitarget.h +49 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/arm/sysv.S +299 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/closures.c +596 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/cris/ffi.c +383 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/cris/ffitarget.h +51 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/cris/sysv.S +215 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/debug.c +59 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/dlmalloc.c +5099 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/frv/eabi.S +128 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/frv/ffi.c +292 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/frv/ffitarget.h +61 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/ia64/ffi.c +580 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/ia64/ffitarget.h +50 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/ia64/ia64_flags.h +40 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/ia64/unix.S +560 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/java_raw_api.c +359 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/m32r/ffi.c +232 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/m32r/ffitarget.h +48 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/m32r/sysv.S +121 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/m68k/ffi.c +278 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/m68k/ffitarget.h +49 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/m68k/sysv.S +234 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/mips/ffi.c +926 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/mips/ffitarget.h +202 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/mips/n32.S +534 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/mips/o32.S +381 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/pa/ffi.c +709 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/pa/ffitarget.h +77 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/pa/hpux32.S +368 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/pa/linux.S +357 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/powerpc/aix.S +225 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/powerpc/aix_closure.S +247 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/powerpc/asm.h +125 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/powerpc/darwin.S +245 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/powerpc/darwin_closure.S +317 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/powerpc/ffi.c +1429 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/powerpc/ffi_darwin.c +800 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/powerpc/ffitarget.h +118 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/powerpc/linux64.S +187 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/powerpc/linux64_closure.S +236 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/powerpc/ppc_closure.S +327 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/powerpc/sysv.S +230 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/prep_cif.c +174 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/raw_api.c +254 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/s390/ffi.c +780 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/s390/ffitarget.h +60 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/s390/sysv.S +434 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/sh/ffi.c +716 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/sh/ffitarget.h +49 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/sh/sysv.S +850 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/sh64/ffi.c +453 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/sh64/ffitarget.h +53 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/sh64/sysv.S +530 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/sparc/ffi.c +610 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/sparc/ffitarget.h +66 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/sparc/v8.S +272 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/sparc/v9.S +307 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/types.c +77 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/x86/darwin.S +443 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/x86/darwin64.S +416 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/x86/ffi.c +475 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/x86/ffi64.c +572 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/x86/ffitarget.h +90 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/x86/freebsd.S +458 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/x86/sysv.S +437 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/x86/unix64.S +418 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/src/x86/win32.S +391 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/Makefile.am +71 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/Makefile.in +447 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/config/default.exp +1 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/lib/libffi-dg.exp +289 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/lib/target-libpath.exp +263 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/lib/wrapper.exp +45 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/call.exp +36 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn0.c +97 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn1.c +89 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn2.c +89 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn3.c +90 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn4.c +97 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn5.c +99 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/closure_fn6.c +98 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/closure_stdcall.c +72 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_12byte.c +102 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_16byte.c +103 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_18byte.c +104 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_19byte.c +110 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_1_1byte.c +97 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_20byte.c +99 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_20byte1.c +101 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_24byte.c +121 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_2byte.c +98 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_3_1byte.c +103 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_3byte1.c +98 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_3byte2.c +98 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_4_1byte.c +106 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_4byte.c +98 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_5_1_byte.c +117 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_5byte.c +106 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_64byte.c +132 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_6_1_byte.c +121 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_6byte.c +107 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_7_1_byte.c +125 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_7byte.c +105 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_8byte.c +96 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_9byte1.c +98 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_9byte2.c +99 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_double.c +101 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_float.c +99 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_longdouble.c +100 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_pointer.c +101 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint16.c +99 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint32.c +99 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint64.c +99 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint16.c +99 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint32.c +99 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint64.c +100 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_double.c +51 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_float.c +51 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_schar.c +82 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_sshort.c +82 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_sshortchar.c +94 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_uchar.c +99 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_ushort.c +82 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_multi_ushortchar.c +94 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_schar.c +52 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_sint.c +50 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_sshort.c +50 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_uchar.c +50 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_uint.c +51 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_ulonglong.c +54 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/cls_ushort.c +51 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/ffitest.h +86 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/float.c +59 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/float1.c +58 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/float2.c +57 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/float3.c +72 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/float4.c +62 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/many.c +69 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/many_win32.c +63 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/negint.c +53 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct.c +160 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct1.c +169 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct10.c +141 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct2.c +118 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct3.c +119 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct4.c +119 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct5.c +120 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct6.c +139 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct7.c +119 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct8.c +139 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct9.c +139 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/problem1.c +98 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/promotion.c +59 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/pyobjc-tc.c +114 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl.c +35 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl1.c +43 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl2.c +42 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/return_fl.c +35 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/return_fl1.c +36 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/return_fl2.c +49 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/return_fl3.c +42 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/return_ldl.c +34 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/return_ll.c +41 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/return_ll1.c +42 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/return_sc.c +36 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/return_sl.c +38 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/return_uc.c +38 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/return_ul.c +38 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/strlen.c +44 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/strlen_win32.c +44 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/struct1.c +65 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/struct2.c +67 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/struct3.c +59 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/struct4.c +63 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/struct5.c +65 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/struct6.c +64 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/struct7.c +74 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/struct8.c +80 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.call/struct9.c +67 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.special/ffitestcxx.h +86 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.special/special.exp +38 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.special/unwindtest.cc +123 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/testsuite/libffi.special/unwindtest_ffi_call.cc +53 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/libffi/texinfo.tex +7482 -0
- data/vendor/ffi-0.4.0-x86-mswin32/ext/ffi_c/rbffi.h +23 -0
- data/vendor/ffi-0.4.0-x86-mswin32/gen/Rakefile +12 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/1.8/ffi_c.so +0 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/1.9/ffi_c.so +0 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi.rb +11 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/autopointer.rb +61 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/buffer.rb +0 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/callback.rb +10 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/enum.rb +78 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/errno.rb +8 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/ffi.rb +96 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/io.rb +21 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/library.rb +243 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/managedstruct.rb +55 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/memorypointer.rb +73 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/platform.rb +78 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/pointer.rb +119 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/struct.rb +354 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/tools/const_generator.rb +177 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/tools/generator.rb +58 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/tools/generator_task.rb +35 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/tools/struct_generator.rb +194 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/tools/types_generator.rb +123 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/types.rb +153 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/union.rb +17 -0
- data/vendor/ffi-0.4.0-x86-mswin32/lib/ffi/variadic.rb +30 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/bool_spec.rb +24 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/buffer_spec.rb +196 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/callback_spec.rb +560 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/enum_spec.rb +164 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/errno_spec.rb +13 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/library_spec.rb +144 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/managed_struct_spec.rb +56 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/number_spec.rb +231 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/pointer_spec.rb +195 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/rbx/attach_function_spec.rb +27 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/rbx/memory_pointer_spec.rb +102 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/rbx/spec_helper.rb +1 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/rbx/struct_spec.rb +13 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/spec_helper.rb +17 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/string_spec.rb +103 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/struct_callback_spec.rb +41 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/struct_initialize_spec.rb +30 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/struct_spec.rb +476 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/typedef_spec.rb +48 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/union_spec.rb +60 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/ffi/variadic_spec.rb +84 -0
- data/vendor/ffi-0.4.0-x86-mswin32/spec/spec.opts +4 -0
- data/vendor/hardmock-1.3.7/CHANGES +78 -0
- data/vendor/hardmock-1.3.7/LICENSE +7 -0
- data/vendor/hardmock-1.3.7/README +70 -0
- data/vendor/hardmock-1.3.7/Rakefile +8 -0
- data/vendor/hardmock-1.3.7/config/environment.rb +12 -0
- data/vendor/hardmock-1.3.7/lib/assert_error.rb +23 -0
- data/vendor/hardmock-1.3.7/lib/extend_test_unit.rb +14 -0
- data/vendor/hardmock-1.3.7/lib/hardmock.rb +86 -0
- data/vendor/hardmock-1.3.7/lib/hardmock/errors.rb +22 -0
- data/vendor/hardmock-1.3.7/lib/hardmock/expectation.rb +229 -0
- data/vendor/hardmock-1.3.7/lib/hardmock/expectation_builder.rb +9 -0
- data/vendor/hardmock-1.3.7/lib/hardmock/expector.rb +26 -0
- data/vendor/hardmock-1.3.7/lib/hardmock/method_cleanout.rb +33 -0
- data/vendor/hardmock-1.3.7/lib/hardmock/mock.rb +180 -0
- data/vendor/hardmock-1.3.7/lib/hardmock/mock_control.rb +53 -0
- data/vendor/hardmock-1.3.7/lib/hardmock/stubbing.rb +210 -0
- data/vendor/hardmock-1.3.7/lib/hardmock/trapper.rb +31 -0
- data/vendor/hardmock-1.3.7/lib/hardmock/utils.rb +9 -0
- data/vendor/hardmock-1.3.7/lib/test_unit_before_after.rb +169 -0
- data/vendor/hardmock-1.3.7/rake_tasks/test.rake +22 -0
- data/vendor/hardmock-1.3.7/test/functional/assert_error_test.rb +52 -0
- data/vendor/hardmock-1.3.7/test/functional/auto_verify_test.rb +178 -0
- data/vendor/hardmock-1.3.7/test/functional/direct_mock_usage_test.rb +396 -0
- data/vendor/hardmock-1.3.7/test/functional/hardmock_test.rb +434 -0
- data/vendor/hardmock-1.3.7/test/functional/stubbing_test.rb +479 -0
- data/vendor/hardmock-1.3.7/test/test_helper.rb +43 -0
- data/vendor/hardmock-1.3.7/test/unit/expectation_builder_test.rb +19 -0
- data/vendor/hardmock-1.3.7/test/unit/expectation_test.rb +372 -0
- data/vendor/hardmock-1.3.7/test/unit/expector_test.rb +57 -0
- data/vendor/hardmock-1.3.7/test/unit/method_cleanout_test.rb +36 -0
- data/vendor/hardmock-1.3.7/test/unit/mock_control_test.rb +175 -0
- data/vendor/hardmock-1.3.7/test/unit/mock_test.rb +279 -0
- data/vendor/hardmock-1.3.7/test/unit/test_unit_before_after_test.rb +452 -0
- data/vendor/hardmock-1.3.7/test/unit/trapper_test.rb +62 -0
- data/vendor/hardmock-1.3.7/test/unit/verify_error_test.rb +40 -0
- data/vendor/mcc/cbw32.dll +0 -0
- data/vendor/systir/systir.rb +403 -0
- data/vendor/systir/test/unit/ui/xml/testrunner.rb +192 -0
- data/vendor/systir/test/unit/ui/xml/xmltestrunner.xslt +109 -0
- metadata +561 -0
@@ -0,0 +1,381 @@
|
|
1
|
+
/* -----------------------------------------------------------------------
|
2
|
+
o32.S - Copyright (c) 1996, 1998, 2005 Red Hat, Inc.
|
3
|
+
|
4
|
+
MIPS Foreign Function Interface
|
5
|
+
|
6
|
+
Permission is hereby granted, free of charge, to any person obtaining
|
7
|
+
a copy of this software and associated documentation files (the
|
8
|
+
``Software''), to deal in the Software without restriction, including
|
9
|
+
without limitation the rights to use, copy, modify, merge, publish,
|
10
|
+
distribute, sublicense, and/or sell copies of the Software, and to
|
11
|
+
permit persons to whom the Software is furnished to do so, subject to
|
12
|
+
the following conditions:
|
13
|
+
|
14
|
+
The above copyright notice and this permission notice shall be included
|
15
|
+
in all copies or substantial portions of the Software.
|
16
|
+
|
17
|
+
THE SOFTWARE IS PROVIDED ``AS IS'', WITHOUT WARRANTY OF ANY KIND, EXPRESS
|
18
|
+
OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
19
|
+
MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
|
20
|
+
IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR
|
21
|
+
ANY CLAIM, DAMAGES OR
|
22
|
+
OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
|
23
|
+
ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
|
24
|
+
OTHER DEALINGS IN THE SOFTWARE.
|
25
|
+
----------------------------------------------------------------------- */
|
26
|
+
|
27
|
+
#define LIBFFI_ASM
|
28
|
+
#include <fficonfig.h>
|
29
|
+
#include <ffi.h>
|
30
|
+
|
31
|
+
/* Only build this code if we are compiling for o32 */
|
32
|
+
|
33
|
+
#if defined(FFI_MIPS_O32)
|
34
|
+
|
35
|
+
#define callback a0
|
36
|
+
#define bytes a2
|
37
|
+
#define flags a3
|
38
|
+
|
39
|
+
#define SIZEOF_FRAME (4 * FFI_SIZEOF_ARG + 2 * FFI_SIZEOF_ARG)
|
40
|
+
#define A3_OFF (SIZEOF_FRAME + 3 * FFI_SIZEOF_ARG)
|
41
|
+
#define FP_OFF (SIZEOF_FRAME - 2 * FFI_SIZEOF_ARG)
|
42
|
+
#define RA_OFF (SIZEOF_FRAME - 1 * FFI_SIZEOF_ARG)
|
43
|
+
|
44
|
+
.abicalls
|
45
|
+
.text
|
46
|
+
.align 2
|
47
|
+
.globl ffi_call_O32
|
48
|
+
.ent ffi_call_O32
|
49
|
+
ffi_call_O32:
|
50
|
+
$LFB0:
|
51
|
+
# Prologue
|
52
|
+
SUBU $sp, SIZEOF_FRAME # Frame size
|
53
|
+
$LCFI0:
|
54
|
+
REG_S $fp, FP_OFF($sp) # Save frame pointer
|
55
|
+
$LCFI1:
|
56
|
+
REG_S ra, RA_OFF($sp) # Save return address
|
57
|
+
$LCFI2:
|
58
|
+
move $fp, $sp
|
59
|
+
|
60
|
+
$LCFI3:
|
61
|
+
move t9, callback # callback function pointer
|
62
|
+
REG_S flags, A3_OFF($fp) # flags
|
63
|
+
|
64
|
+
# Allocate at least 4 words in the argstack
|
65
|
+
LI v0, 4 * FFI_SIZEOF_ARG
|
66
|
+
blt bytes, v0, sixteen
|
67
|
+
|
68
|
+
ADDU v0, bytes, 7 # make sure it is aligned
|
69
|
+
and v0, -8 # to an 8 byte boundry
|
70
|
+
|
71
|
+
sixteen:
|
72
|
+
SUBU $sp, v0 # move the stack pointer to reflect the
|
73
|
+
# arg space
|
74
|
+
|
75
|
+
ADDU a0, $sp, 4 * FFI_SIZEOF_ARG
|
76
|
+
|
77
|
+
jalr t9
|
78
|
+
|
79
|
+
REG_L t0, A3_OFF($fp) # load the flags word
|
80
|
+
SRL t2, t0, 4 # shift our arg info
|
81
|
+
and t0, ((1<<4)-1) # mask out the return type
|
82
|
+
|
83
|
+
ADDU $sp, 4 * FFI_SIZEOF_ARG # adjust $sp to new args
|
84
|
+
|
85
|
+
bnez t0, pass_d # make it quick for int
|
86
|
+
REG_L a0, 0*FFI_SIZEOF_ARG($sp) # just go ahead and load the
|
87
|
+
REG_L a1, 1*FFI_SIZEOF_ARG($sp) # four regs.
|
88
|
+
REG_L a2, 2*FFI_SIZEOF_ARG($sp)
|
89
|
+
REG_L a3, 3*FFI_SIZEOF_ARG($sp)
|
90
|
+
b call_it
|
91
|
+
|
92
|
+
pass_d:
|
93
|
+
bne t0, FFI_ARGS_D, pass_f
|
94
|
+
l.d $f12, 0*FFI_SIZEOF_ARG($sp) # load $fp regs from args
|
95
|
+
REG_L a2, 2*FFI_SIZEOF_ARG($sp) # passing a double
|
96
|
+
REG_L a3, 3*FFI_SIZEOF_ARG($sp)
|
97
|
+
b call_it
|
98
|
+
|
99
|
+
pass_f:
|
100
|
+
bne t0, FFI_ARGS_F, pass_d_d
|
101
|
+
l.s $f12, 0*FFI_SIZEOF_ARG($sp) # load $fp regs from args
|
102
|
+
REG_L a1, 1*FFI_SIZEOF_ARG($sp) # passing a float
|
103
|
+
REG_L a2, 2*FFI_SIZEOF_ARG($sp)
|
104
|
+
REG_L a3, 3*FFI_SIZEOF_ARG($sp)
|
105
|
+
b call_it
|
106
|
+
|
107
|
+
pass_d_d:
|
108
|
+
bne t0, FFI_ARGS_DD, pass_f_f
|
109
|
+
l.d $f12, 0*FFI_SIZEOF_ARG($sp) # load $fp regs from args
|
110
|
+
l.d $f14, 2*FFI_SIZEOF_ARG($sp) # passing two doubles
|
111
|
+
b call_it
|
112
|
+
|
113
|
+
pass_f_f:
|
114
|
+
bne t0, FFI_ARGS_FF, pass_d_f
|
115
|
+
l.s $f12, 0*FFI_SIZEOF_ARG($sp) # load $fp regs from args
|
116
|
+
l.s $f14, 1*FFI_SIZEOF_ARG($sp) # passing two floats
|
117
|
+
REG_L a2, 2*FFI_SIZEOF_ARG($sp)
|
118
|
+
REG_L a3, 3*FFI_SIZEOF_ARG($sp)
|
119
|
+
b call_it
|
120
|
+
|
121
|
+
pass_d_f:
|
122
|
+
bne t0, FFI_ARGS_DF, pass_f_d
|
123
|
+
l.d $f12, 0*FFI_SIZEOF_ARG($sp) # load $fp regs from args
|
124
|
+
l.s $f14, 2*FFI_SIZEOF_ARG($sp) # passing double and float
|
125
|
+
REG_L a3, 3*FFI_SIZEOF_ARG($sp)
|
126
|
+
b call_it
|
127
|
+
|
128
|
+
pass_f_d:
|
129
|
+
# assume that the only other combination must be float then double
|
130
|
+
# bne t0, FFI_ARGS_F_D, call_it
|
131
|
+
l.s $f12, 0*FFI_SIZEOF_ARG($sp) # load $fp regs from args
|
132
|
+
l.d $f14, 2*FFI_SIZEOF_ARG($sp) # passing double and float
|
133
|
+
|
134
|
+
call_it:
|
135
|
+
# Load the function pointer
|
136
|
+
REG_L t9, SIZEOF_FRAME + 5*FFI_SIZEOF_ARG($fp)
|
137
|
+
|
138
|
+
# If the return value pointer is NULL, assume no return value.
|
139
|
+
REG_L t1, SIZEOF_FRAME + 4*FFI_SIZEOF_ARG($fp)
|
140
|
+
beqz t1, noretval
|
141
|
+
|
142
|
+
bne t2, FFI_TYPE_INT, retlonglong
|
143
|
+
jalr t9
|
144
|
+
REG_L t0, SIZEOF_FRAME + 4*FFI_SIZEOF_ARG($fp)
|
145
|
+
REG_S v0, 0(t0)
|
146
|
+
b epilogue
|
147
|
+
|
148
|
+
retlonglong:
|
149
|
+
# Really any 64-bit int, signed or not.
|
150
|
+
bne t2, FFI_TYPE_UINT64, retfloat
|
151
|
+
jalr t9
|
152
|
+
REG_L t0, SIZEOF_FRAME + 4*FFI_SIZEOF_ARG($fp)
|
153
|
+
REG_S v1, 4(t0)
|
154
|
+
REG_S v0, 0(t0)
|
155
|
+
b epilogue
|
156
|
+
|
157
|
+
retfloat:
|
158
|
+
bne t2, FFI_TYPE_FLOAT, retdouble
|
159
|
+
jalr t9
|
160
|
+
REG_L t0, SIZEOF_FRAME + 4*FFI_SIZEOF_ARG($fp)
|
161
|
+
s.s $f0, 0(t0)
|
162
|
+
b epilogue
|
163
|
+
|
164
|
+
retdouble:
|
165
|
+
bne t2, FFI_TYPE_DOUBLE, noretval
|
166
|
+
jalr t9
|
167
|
+
REG_L t0, SIZEOF_FRAME + 4*FFI_SIZEOF_ARG($fp)
|
168
|
+
s.d $f0, 0(t0)
|
169
|
+
b epilogue
|
170
|
+
|
171
|
+
noretval:
|
172
|
+
jalr t9
|
173
|
+
|
174
|
+
# Epilogue
|
175
|
+
epilogue:
|
176
|
+
move $sp, $fp
|
177
|
+
REG_L $fp, FP_OFF($sp) # Restore frame pointer
|
178
|
+
REG_L ra, RA_OFF($sp) # Restore return address
|
179
|
+
ADDU $sp, SIZEOF_FRAME # Fix stack pointer
|
180
|
+
j ra
|
181
|
+
|
182
|
+
$LFE0:
|
183
|
+
.end ffi_call_O32
|
184
|
+
|
185
|
+
|
186
|
+
/* ffi_closure_O32. Expects address of the passed-in ffi_closure
|
187
|
+
in t4 ($12). Stores any arguments passed in registers onto the
|
188
|
+
stack, then calls ffi_closure_mips_inner_O32, which
|
189
|
+
then decodes them.
|
190
|
+
|
191
|
+
Stack layout:
|
192
|
+
|
193
|
+
3 - a3 save
|
194
|
+
2 - a2 save
|
195
|
+
1 - a1 save
|
196
|
+
0 - a0 save, original sp
|
197
|
+
-1 - ra save
|
198
|
+
-2 - fp save
|
199
|
+
-3 - $16 (s0) save
|
200
|
+
-4 - cprestore
|
201
|
+
-5 - return value high (v1)
|
202
|
+
-6 - return value low (v0)
|
203
|
+
-7 - f14 (le high, be low)
|
204
|
+
-8 - f14 (le low, be high)
|
205
|
+
-9 - f12 (le high, be low)
|
206
|
+
-10 - f12 (le low, be high)
|
207
|
+
-11 - Called function a3 save
|
208
|
+
-12 - Called function a2 save
|
209
|
+
-13 - Called function a1 save
|
210
|
+
-14 - Called function a0 save, our sp and fp point here
|
211
|
+
*/
|
212
|
+
|
213
|
+
#define SIZEOF_FRAME2 (14 * FFI_SIZEOF_ARG)
|
214
|
+
#define A3_OFF2 (SIZEOF_FRAME2 + 3 * FFI_SIZEOF_ARG)
|
215
|
+
#define A2_OFF2 (SIZEOF_FRAME2 + 2 * FFI_SIZEOF_ARG)
|
216
|
+
#define A1_OFF2 (SIZEOF_FRAME2 + 1 * FFI_SIZEOF_ARG)
|
217
|
+
#define A0_OFF2 (SIZEOF_FRAME2 + 0 * FFI_SIZEOF_ARG)
|
218
|
+
#define RA_OFF2 (SIZEOF_FRAME2 - 1 * FFI_SIZEOF_ARG)
|
219
|
+
#define FP_OFF2 (SIZEOF_FRAME2 - 2 * FFI_SIZEOF_ARG)
|
220
|
+
#define S0_OFF2 (SIZEOF_FRAME2 - 3 * FFI_SIZEOF_ARG)
|
221
|
+
#define GP_OFF2 (SIZEOF_FRAME2 - 4 * FFI_SIZEOF_ARG)
|
222
|
+
#define V1_OFF2 (SIZEOF_FRAME2 - 5 * FFI_SIZEOF_ARG)
|
223
|
+
#define V0_OFF2 (SIZEOF_FRAME2 - 6 * FFI_SIZEOF_ARG)
|
224
|
+
#define FA_1_1_OFF2 (SIZEOF_FRAME2 - 7 * FFI_SIZEOF_ARG)
|
225
|
+
#define FA_1_0_OFF2 (SIZEOF_FRAME2 - 8 * FFI_SIZEOF_ARG)
|
226
|
+
#define FA_0_1_OFF2 (SIZEOF_FRAME2 - 9 * FFI_SIZEOF_ARG)
|
227
|
+
#define FA_0_0_OFF2 (SIZEOF_FRAME2 - 10 * FFI_SIZEOF_ARG)
|
228
|
+
|
229
|
+
.text
|
230
|
+
.align 2
|
231
|
+
.globl ffi_closure_O32
|
232
|
+
.ent ffi_closure_O32
|
233
|
+
ffi_closure_O32:
|
234
|
+
$LFB1:
|
235
|
+
# Prologue
|
236
|
+
.frame $fp, SIZEOF_FRAME2, ra
|
237
|
+
.set noreorder
|
238
|
+
.cpload t9
|
239
|
+
.set reorder
|
240
|
+
SUBU $sp, SIZEOF_FRAME2
|
241
|
+
.cprestore GP_OFF2
|
242
|
+
$LCFI4:
|
243
|
+
REG_S $16, S0_OFF2($sp) # Save s0
|
244
|
+
REG_S $fp, FP_OFF2($sp) # Save frame pointer
|
245
|
+
REG_S ra, RA_OFF2($sp) # Save return address
|
246
|
+
$LCFI6:
|
247
|
+
move $fp, $sp
|
248
|
+
|
249
|
+
$LCFI7:
|
250
|
+
# Store all possible argument registers. If there are more than
|
251
|
+
# four arguments, then they are stored above where we put a3.
|
252
|
+
REG_S a0, A0_OFF2($fp)
|
253
|
+
REG_S a1, A1_OFF2($fp)
|
254
|
+
REG_S a2, A2_OFF2($fp)
|
255
|
+
REG_S a3, A3_OFF2($fp)
|
256
|
+
|
257
|
+
# Load ABI enum to s0
|
258
|
+
REG_L $16, 20($12) # cif pointer follows tramp.
|
259
|
+
REG_L $16, 0($16) # abi is first member.
|
260
|
+
|
261
|
+
li $13, 1 # FFI_O32
|
262
|
+
bne $16, $13, 1f # Skip fp save if FFI_O32_SOFT_FLOAT
|
263
|
+
|
264
|
+
# Store all possible float/double registers.
|
265
|
+
s.d $f12, FA_0_0_OFF2($fp)
|
266
|
+
s.d $f14, FA_1_0_OFF2($fp)
|
267
|
+
1:
|
268
|
+
# Call ffi_closure_mips_inner_O32 to do the work.
|
269
|
+
la t9, ffi_closure_mips_inner_O32
|
270
|
+
move a0, $12 # Pointer to the ffi_closure
|
271
|
+
addu a1, $fp, V0_OFF2
|
272
|
+
addu a2, $fp, A0_OFF2
|
273
|
+
addu a3, $fp, FA_0_0_OFF2
|
274
|
+
jalr t9
|
275
|
+
|
276
|
+
# Load the return value into the appropriate register.
|
277
|
+
move $8, $2
|
278
|
+
li $9, FFI_TYPE_VOID
|
279
|
+
beq $8, $9, closure_done
|
280
|
+
|
281
|
+
li $13, 1 # FFI_O32
|
282
|
+
bne $16, $13, 1f # Skip fp restore if FFI_O32_SOFT_FLOAT
|
283
|
+
|
284
|
+
li $9, FFI_TYPE_FLOAT
|
285
|
+
l.s $f0, V0_OFF2($fp)
|
286
|
+
beq $8, $9, closure_done
|
287
|
+
|
288
|
+
li $9, FFI_TYPE_DOUBLE
|
289
|
+
l.d $f0, V0_OFF2($fp)
|
290
|
+
beq $8, $9, closure_done
|
291
|
+
1:
|
292
|
+
REG_L $3, V1_OFF2($fp)
|
293
|
+
REG_L $2, V0_OFF2($fp)
|
294
|
+
|
295
|
+
closure_done:
|
296
|
+
# Epilogue
|
297
|
+
move $sp, $fp
|
298
|
+
REG_L $16, S0_OFF2($sp) # Restore s0
|
299
|
+
REG_L $fp, FP_OFF2($sp) # Restore frame pointer
|
300
|
+
REG_L ra, RA_OFF2($sp) # Restore return address
|
301
|
+
ADDU $sp, SIZEOF_FRAME2
|
302
|
+
j ra
|
303
|
+
$LFE1:
|
304
|
+
.end ffi_closure_O32
|
305
|
+
|
306
|
+
/* DWARF-2 unwind info. */
|
307
|
+
|
308
|
+
.section .eh_frame,"a",@progbits
|
309
|
+
$Lframe0:
|
310
|
+
.4byte $LECIE0-$LSCIE0 # Length of Common Information Entry
|
311
|
+
$LSCIE0:
|
312
|
+
.4byte 0x0 # CIE Identifier Tag
|
313
|
+
.byte 0x1 # CIE Version
|
314
|
+
.ascii "zR\0" # CIE Augmentation
|
315
|
+
.uleb128 0x1 # CIE Code Alignment Factor
|
316
|
+
.sleb128 4 # CIE Data Alignment Factor
|
317
|
+
.byte 0x1f # CIE RA Column
|
318
|
+
.uleb128 0x1 # Augmentation size
|
319
|
+
.byte 0x00 # FDE Encoding (absptr)
|
320
|
+
.byte 0xc # DW_CFA_def_cfa
|
321
|
+
.uleb128 0x1d
|
322
|
+
.uleb128 0x0
|
323
|
+
.align 2
|
324
|
+
$LECIE0:
|
325
|
+
$LSFDE0:
|
326
|
+
.4byte $LEFDE0-$LASFDE0 # FDE Length
|
327
|
+
$LASFDE0:
|
328
|
+
.4byte $LASFDE0-$Lframe0 # FDE CIE offset
|
329
|
+
.4byte $LFB0 # FDE initial location
|
330
|
+
.4byte $LFE0-$LFB0 # FDE address range
|
331
|
+
.uleb128 0x0 # Augmentation size
|
332
|
+
.byte 0x4 # DW_CFA_advance_loc4
|
333
|
+
.4byte $LCFI0-$LFB0
|
334
|
+
.byte 0xe # DW_CFA_def_cfa_offset
|
335
|
+
.uleb128 0x18
|
336
|
+
.byte 0x4 # DW_CFA_advance_loc4
|
337
|
+
.4byte $LCFI2-$LCFI0
|
338
|
+
.byte 0x11 # DW_CFA_offset_extended_sf
|
339
|
+
.uleb128 0x1e # $fp
|
340
|
+
.sleb128 -2 # SIZEOF_FRAME2 - 2*FFI_SIZEOF_ARG($sp)
|
341
|
+
.byte 0x11 # DW_CFA_offset_extended_sf
|
342
|
+
.uleb128 0x1f # $ra
|
343
|
+
.sleb128 -1 # SIZEOF_FRAME2 - 1*FFI_SIZEOF_ARG($sp)
|
344
|
+
.byte 0x4 # DW_CFA_advance_loc4
|
345
|
+
.4byte $LCFI3-$LCFI2
|
346
|
+
.byte 0xc # DW_CFA_def_cfa
|
347
|
+
.uleb128 0x1e
|
348
|
+
.uleb128 0x18
|
349
|
+
.align 2
|
350
|
+
$LEFDE0:
|
351
|
+
$LSFDE1:
|
352
|
+
.4byte $LEFDE1-$LASFDE1 # FDE Length
|
353
|
+
$LASFDE1:
|
354
|
+
.4byte $LASFDE1-$Lframe0 # FDE CIE offset
|
355
|
+
.4byte $LFB1 # FDE initial location
|
356
|
+
.4byte $LFE1-$LFB1 # FDE address range
|
357
|
+
.uleb128 0x0 # Augmentation size
|
358
|
+
.byte 0x4 # DW_CFA_advance_loc4
|
359
|
+
.4byte $LCFI4-$LFB1
|
360
|
+
.byte 0xe # DW_CFA_def_cfa_offset
|
361
|
+
.uleb128 0x38
|
362
|
+
.byte 0x4 # DW_CFA_advance_loc4
|
363
|
+
.4byte $LCFI6-$LCFI4
|
364
|
+
.byte 0x11 # DW_CFA_offset_extended_sf
|
365
|
+
.uleb128 0x10 # $16
|
366
|
+
.sleb128 -3 # SIZEOF_FRAME2 - 3*FFI_SIZEOF_ARG($sp)
|
367
|
+
.byte 0x11 # DW_CFA_offset_extended_sf
|
368
|
+
.uleb128 0x1e # $fp
|
369
|
+
.sleb128 -2 # SIZEOF_FRAME2 - 2*FFI_SIZEOF_ARG($sp)
|
370
|
+
.byte 0x11 # DW_CFA_offset_extended_sf
|
371
|
+
.uleb128 0x1f # $ra
|
372
|
+
.sleb128 -1 # SIZEOF_FRAME2 - 1*FFI_SIZEOF_ARG($sp)
|
373
|
+
.byte 0x4 # DW_CFA_advance_loc4
|
374
|
+
.4byte $LCFI7-$LCFI6
|
375
|
+
.byte 0xc # DW_CFA_def_cfa
|
376
|
+
.uleb128 0x1e
|
377
|
+
.uleb128 0x38
|
378
|
+
.align 2
|
379
|
+
$LEFDE1:
|
380
|
+
|
381
|
+
#endif
|
@@ -0,0 +1,709 @@
|
|
1
|
+
/* -----------------------------------------------------------------------
|
2
|
+
ffi.c - (c) 2003-2004 Randolph Chung <tausq@debian.org>
|
3
|
+
(c) 2008 Red Hat, Inc.
|
4
|
+
|
5
|
+
HPPA Foreign Function Interface
|
6
|
+
HP-UX PA ABI support (c) 2006 Free Software Foundation, Inc.
|
7
|
+
|
8
|
+
Permission is hereby granted, free of charge, to any person obtaining
|
9
|
+
a copy of this software and associated documentation files (the
|
10
|
+
``Software''), to deal in the Software without restriction, including
|
11
|
+
without limitation the rights to use, copy, modify, merge, publish,
|
12
|
+
distribute, sublicense, and/or sell copies of the Software, and to
|
13
|
+
permit persons to whom the Software is furnished to do so, subject to
|
14
|
+
the following conditions:
|
15
|
+
|
16
|
+
The above copyright notice and this permission notice shall be included
|
17
|
+
in all copies or substantial portions of the Software.
|
18
|
+
|
19
|
+
THE SOFTWARE IS PROVIDED ``AS IS'', WITHOUT WARRANTY OF ANY KIND,
|
20
|
+
EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
21
|
+
MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
|
22
|
+
NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
|
23
|
+
HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
|
24
|
+
WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
25
|
+
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
|
26
|
+
DEALINGS IN THE SOFTWARE.
|
27
|
+
----------------------------------------------------------------------- */
|
28
|
+
|
29
|
+
#include <ffi.h>
|
30
|
+
#include <ffi_common.h>
|
31
|
+
|
32
|
+
#include <stdlib.h>
|
33
|
+
#include <stdio.h>
|
34
|
+
|
35
|
+
#define ROUND_UP(v, a) (((size_t)(v) + (a) - 1) & ~((a) - 1))
|
36
|
+
|
37
|
+
#define MIN_STACK_SIZE 64
|
38
|
+
#define FIRST_ARG_SLOT 9
|
39
|
+
#define DEBUG_LEVEL 0
|
40
|
+
|
41
|
+
#define fldw(addr, fpreg) \
|
42
|
+
__asm__ volatile ("fldw 0(%0), %%" #fpreg "L" : : "r"(addr) : #fpreg)
|
43
|
+
#define fstw(fpreg, addr) \
|
44
|
+
__asm__ volatile ("fstw %%" #fpreg "L, 0(%0)" : : "r"(addr))
|
45
|
+
#define fldd(addr, fpreg) \
|
46
|
+
__asm__ volatile ("fldd 0(%0), %%" #fpreg : : "r"(addr) : #fpreg)
|
47
|
+
#define fstd(fpreg, addr) \
|
48
|
+
__asm__ volatile ("fstd %%" #fpreg "L, 0(%0)" : : "r"(addr))
|
49
|
+
|
50
|
+
#define debug(lvl, x...) do { if (lvl <= DEBUG_LEVEL) { printf(x); } } while (0)
|
51
|
+
|
52
|
+
static inline int ffi_struct_type(ffi_type *t)
|
53
|
+
{
|
54
|
+
size_t sz = t->size;
|
55
|
+
|
56
|
+
/* Small structure results are passed in registers,
|
57
|
+
larger ones are passed by pointer. Note that
|
58
|
+
small structures of size 2, 4 and 8 differ from
|
59
|
+
the corresponding integer types in that they have
|
60
|
+
different alignment requirements. */
|
61
|
+
|
62
|
+
if (sz <= 1)
|
63
|
+
return FFI_TYPE_UINT8;
|
64
|
+
else if (sz == 2)
|
65
|
+
return FFI_TYPE_SMALL_STRUCT2;
|
66
|
+
else if (sz == 3)
|
67
|
+
return FFI_TYPE_SMALL_STRUCT3;
|
68
|
+
else if (sz == 4)
|
69
|
+
return FFI_TYPE_SMALL_STRUCT4;
|
70
|
+
else if (sz == 5)
|
71
|
+
return FFI_TYPE_SMALL_STRUCT5;
|
72
|
+
else if (sz == 6)
|
73
|
+
return FFI_TYPE_SMALL_STRUCT6;
|
74
|
+
else if (sz == 7)
|
75
|
+
return FFI_TYPE_SMALL_STRUCT7;
|
76
|
+
else if (sz <= 8)
|
77
|
+
return FFI_TYPE_SMALL_STRUCT8;
|
78
|
+
else
|
79
|
+
return FFI_TYPE_STRUCT; /* else, we pass it by pointer. */
|
80
|
+
}
|
81
|
+
|
82
|
+
/* PA has a downward growing stack, which looks like this:
|
83
|
+
|
84
|
+
Offset
|
85
|
+
[ Variable args ]
|
86
|
+
SP = (4*(n+9)) arg word N
|
87
|
+
...
|
88
|
+
SP-52 arg word 4
|
89
|
+
[ Fixed args ]
|
90
|
+
SP-48 arg word 3
|
91
|
+
SP-44 arg word 2
|
92
|
+
SP-40 arg word 1
|
93
|
+
SP-36 arg word 0
|
94
|
+
[ Frame marker ]
|
95
|
+
...
|
96
|
+
SP-20 RP
|
97
|
+
SP-4 previous SP
|
98
|
+
|
99
|
+
The first four argument words on the stack are reserved for use by
|
100
|
+
the callee. Instead, the general and floating registers replace
|
101
|
+
the first four argument slots. Non FP arguments are passed solely
|
102
|
+
in the general registers. FP arguments are passed in both general
|
103
|
+
and floating registers when using libffi.
|
104
|
+
|
105
|
+
Non-FP 32-bit args are passed in gr26, gr25, gr24 and gr23.
|
106
|
+
Non-FP 64-bit args are passed in register pairs, starting
|
107
|
+
on an odd numbered register (i.e. r25+r26 and r23+r24).
|
108
|
+
FP 32-bit arguments are passed in fr4L, fr5L, fr6L and fr7L.
|
109
|
+
FP 64-bit arguments are passed in fr5 and fr7.
|
110
|
+
|
111
|
+
The registers are allocated in the same manner as stack slots.
|
112
|
+
This allows the callee to save its arguments on the stack if
|
113
|
+
necessary:
|
114
|
+
|
115
|
+
arg word 3 -> gr23 or fr7L
|
116
|
+
arg word 2 -> gr24 or fr6L or fr7R
|
117
|
+
arg word 1 -> gr25 or fr5L
|
118
|
+
arg word 0 -> gr26 or fr4L or fr5R
|
119
|
+
|
120
|
+
Note that fr4R and fr6R are never used for arguments (i.e.,
|
121
|
+
doubles are not passed in fr4 or fr6).
|
122
|
+
|
123
|
+
The rest of the arguments are passed on the stack starting at SP-52,
|
124
|
+
but 64-bit arguments need to be aligned to an 8-byte boundary
|
125
|
+
|
126
|
+
This means we can have holes either in the register allocation,
|
127
|
+
or in the stack. */
|
128
|
+
|
129
|
+
/* ffi_prep_args is called by the assembly routine once stack space
|
130
|
+
has been allocated for the function's arguments
|
131
|
+
|
132
|
+
The following code will put everything into the stack frame
|
133
|
+
(which was allocated by the asm routine), and on return
|
134
|
+
the asm routine will load the arguments that should be
|
135
|
+
passed by register into the appropriate registers
|
136
|
+
|
137
|
+
NOTE: We load floating point args in this function... that means we
|
138
|
+
assume gcc will not mess with fp regs in here. */
|
139
|
+
|
140
|
+
void ffi_prep_args_pa32(UINT32 *stack, extended_cif *ecif, unsigned bytes)
|
141
|
+
{
|
142
|
+
register unsigned int i;
|
143
|
+
register ffi_type **p_arg;
|
144
|
+
register void **p_argv;
|
145
|
+
unsigned int slot = FIRST_ARG_SLOT;
|
146
|
+
char *dest_cpy;
|
147
|
+
size_t len;
|
148
|
+
|
149
|
+
debug(1, "%s: stack = %p, ecif = %p, bytes = %u\n", __FUNCTION__, stack,
|
150
|
+
ecif, bytes);
|
151
|
+
|
152
|
+
p_arg = ecif->cif->arg_types;
|
153
|
+
p_argv = ecif->avalue;
|
154
|
+
|
155
|
+
for (i = 0; i < ecif->cif->nargs; i++)
|
156
|
+
{
|
157
|
+
int type = (*p_arg)->type;
|
158
|
+
|
159
|
+
switch (type)
|
160
|
+
{
|
161
|
+
case FFI_TYPE_SINT8:
|
162
|
+
*(SINT32 *)(stack - slot) = *(SINT8 *)(*p_argv);
|
163
|
+
break;
|
164
|
+
|
165
|
+
case FFI_TYPE_UINT8:
|
166
|
+
*(UINT32 *)(stack - slot) = *(UINT8 *)(*p_argv);
|
167
|
+
break;
|
168
|
+
|
169
|
+
case FFI_TYPE_SINT16:
|
170
|
+
*(SINT32 *)(stack - slot) = *(SINT16 *)(*p_argv);
|
171
|
+
break;
|
172
|
+
|
173
|
+
case FFI_TYPE_UINT16:
|
174
|
+
*(UINT32 *)(stack - slot) = *(UINT16 *)(*p_argv);
|
175
|
+
break;
|
176
|
+
|
177
|
+
case FFI_TYPE_UINT32:
|
178
|
+
case FFI_TYPE_SINT32:
|
179
|
+
case FFI_TYPE_POINTER:
|
180
|
+
debug(3, "Storing UINT32 %u in slot %u\n", *(UINT32 *)(*p_argv),
|
181
|
+
slot);
|
182
|
+
*(UINT32 *)(stack - slot) = *(UINT32 *)(*p_argv);
|
183
|
+
break;
|
184
|
+
|
185
|
+
case FFI_TYPE_UINT64:
|
186
|
+
case FFI_TYPE_SINT64:
|
187
|
+
/* Align slot for 64-bit type. */
|
188
|
+
slot += (slot & 1) ? 1 : 2;
|
189
|
+
*(UINT64 *)(stack - slot) = *(UINT64 *)(*p_argv);
|
190
|
+
break;
|
191
|
+
|
192
|
+
case FFI_TYPE_FLOAT:
|
193
|
+
/* First 4 args go in fr4L - fr7L. */
|
194
|
+
debug(3, "Storing UINT32(float) in slot %u\n", slot);
|
195
|
+
*(UINT32 *)(stack - slot) = *(UINT32 *)(*p_argv);
|
196
|
+
switch (slot - FIRST_ARG_SLOT)
|
197
|
+
{
|
198
|
+
/* First 4 args go in fr4L - fr7L. */
|
199
|
+
case 0: fldw(stack - slot, fr4); break;
|
200
|
+
case 1: fldw(stack - slot, fr5); break;
|
201
|
+
case 2: fldw(stack - slot, fr6); break;
|
202
|
+
case 3: fldw(stack - slot, fr7); break;
|
203
|
+
}
|
204
|
+
break;
|
205
|
+
|
206
|
+
case FFI_TYPE_DOUBLE:
|
207
|
+
/* Align slot for 64-bit type. */
|
208
|
+
slot += (slot & 1) ? 1 : 2;
|
209
|
+
debug(3, "Storing UINT64(double) at slot %u\n", slot);
|
210
|
+
*(UINT64 *)(stack - slot) = *(UINT64 *)(*p_argv);
|
211
|
+
switch (slot - FIRST_ARG_SLOT)
|
212
|
+
{
|
213
|
+
/* First 2 args go in fr5, fr7. */
|
214
|
+
case 1: fldd(stack - slot, fr5); break;
|
215
|
+
case 3: fldd(stack - slot, fr7); break;
|
216
|
+
}
|
217
|
+
break;
|
218
|
+
|
219
|
+
#ifdef PA_HPUX
|
220
|
+
case FFI_TYPE_LONGDOUBLE:
|
221
|
+
/* Long doubles are passed in the same manner as structures
|
222
|
+
larger than 8 bytes. */
|
223
|
+
*(UINT32 *)(stack - slot) = (UINT32)(*p_argv);
|
224
|
+
break;
|
225
|
+
#endif
|
226
|
+
|
227
|
+
case FFI_TYPE_STRUCT:
|
228
|
+
|
229
|
+
/* Structs smaller or equal than 4 bytes are passed in one
|
230
|
+
register. Structs smaller or equal 8 bytes are passed in two
|
231
|
+
registers. Larger structures are passed by pointer. */
|
232
|
+
|
233
|
+
len = (*p_arg)->size;
|
234
|
+
if (len <= 4)
|
235
|
+
{
|
236
|
+
dest_cpy = (char *)(stack - slot) + 4 - len;
|
237
|
+
memcpy(dest_cpy, (char *)*p_argv, len);
|
238
|
+
}
|
239
|
+
else if (len <= 8)
|
240
|
+
{
|
241
|
+
slot += (slot & 1) ? 1 : 2;
|
242
|
+
dest_cpy = (char *)(stack - slot) + 8 - len;
|
243
|
+
memcpy(dest_cpy, (char *)*p_argv, len);
|
244
|
+
}
|
245
|
+
else
|
246
|
+
*(UINT32 *)(stack - slot) = (UINT32)(*p_argv);
|
247
|
+
break;
|
248
|
+
|
249
|
+
default:
|
250
|
+
FFI_ASSERT(0);
|
251
|
+
}
|
252
|
+
|
253
|
+
slot++;
|
254
|
+
p_arg++;
|
255
|
+
p_argv++;
|
256
|
+
}
|
257
|
+
|
258
|
+
/* Make sure we didn't mess up and scribble on the stack. */
|
259
|
+
{
|
260
|
+
unsigned int n;
|
261
|
+
|
262
|
+
debug(5, "Stack setup:\n");
|
263
|
+
for (n = 0; n < (bytes + 3) / 4; n++)
|
264
|
+
{
|
265
|
+
if ((n%4) == 0) { debug(5, "\n%08x: ", (unsigned int)(stack - n)); }
|
266
|
+
debug(5, "%08x ", *(stack - n));
|
267
|
+
}
|
268
|
+
debug(5, "\n");
|
269
|
+
}
|
270
|
+
|
271
|
+
FFI_ASSERT(slot * 4 <= bytes);
|
272
|
+
|
273
|
+
return;
|
274
|
+
}
|
275
|
+
|
276
|
+
static void ffi_size_stack_pa32(ffi_cif *cif)
|
277
|
+
{
|
278
|
+
ffi_type **ptr;
|
279
|
+
int i;
|
280
|
+
int z = 0; /* # stack slots */
|
281
|
+
|
282
|
+
for (ptr = cif->arg_types, i = 0; i < cif->nargs; ptr++, i++)
|
283
|
+
{
|
284
|
+
int type = (*ptr)->type;
|
285
|
+
|
286
|
+
switch (type)
|
287
|
+
{
|
288
|
+
case FFI_TYPE_DOUBLE:
|
289
|
+
case FFI_TYPE_UINT64:
|
290
|
+
case FFI_TYPE_SINT64:
|
291
|
+
z += 2 + (z & 1); /* must start on even regs, so we may waste one */
|
292
|
+
break;
|
293
|
+
|
294
|
+
#ifdef PA_HPUX
|
295
|
+
case FFI_TYPE_LONGDOUBLE:
|
296
|
+
#endif
|
297
|
+
case FFI_TYPE_STRUCT:
|
298
|
+
z += 1; /* pass by ptr, callee will copy */
|
299
|
+
break;
|
300
|
+
|
301
|
+
default: /* <= 32-bit values */
|
302
|
+
z++;
|
303
|
+
}
|
304
|
+
}
|
305
|
+
|
306
|
+
/* We can fit up to 6 args in the default 64-byte stack frame,
|
307
|
+
if we need more, we need more stack. */
|
308
|
+
if (z <= 6)
|
309
|
+
cif->bytes = MIN_STACK_SIZE; /* min stack size */
|
310
|
+
else
|
311
|
+
cif->bytes = 64 + ROUND_UP((z - 6) * sizeof(UINT32), MIN_STACK_SIZE);
|
312
|
+
|
313
|
+
debug(3, "Calculated stack size is %u bytes\n", cif->bytes);
|
314
|
+
}
|
315
|
+
|
316
|
+
/* Perform machine dependent cif processing. */
|
317
|
+
ffi_status ffi_prep_cif_machdep(ffi_cif *cif)
|
318
|
+
{
|
319
|
+
/* Set the return type flag */
|
320
|
+
switch (cif->rtype->type)
|
321
|
+
{
|
322
|
+
case FFI_TYPE_VOID:
|
323
|
+
case FFI_TYPE_FLOAT:
|
324
|
+
case FFI_TYPE_DOUBLE:
|
325
|
+
cif->flags = (unsigned) cif->rtype->type;
|
326
|
+
break;
|
327
|
+
|
328
|
+
#ifdef PA_HPUX
|
329
|
+
case FFI_TYPE_LONGDOUBLE:
|
330
|
+
/* Long doubles are treated like a structure. */
|
331
|
+
cif->flags = FFI_TYPE_STRUCT;
|
332
|
+
break;
|
333
|
+
#endif
|
334
|
+
|
335
|
+
case FFI_TYPE_STRUCT:
|
336
|
+
/* For the return type we have to check the size of the structures.
|
337
|
+
If the size is smaller or equal 4 bytes, the result is given back
|
338
|
+
in one register. If the size is smaller or equal 8 bytes than we
|
339
|
+
return the result in two registers. But if the size is bigger than
|
340
|
+
8 bytes, we work with pointers. */
|
341
|
+
cif->flags = ffi_struct_type(cif->rtype);
|
342
|
+
break;
|
343
|
+
|
344
|
+
case FFI_TYPE_UINT64:
|
345
|
+
case FFI_TYPE_SINT64:
|
346
|
+
cif->flags = FFI_TYPE_UINT64;
|
347
|
+
break;
|
348
|
+
|
349
|
+
default:
|
350
|
+
cif->flags = FFI_TYPE_INT;
|
351
|
+
break;
|
352
|
+
}
|
353
|
+
|
354
|
+
/* Lucky us, because of the unique PA ABI we get to do our
|
355
|
+
own stack sizing. */
|
356
|
+
switch (cif->abi)
|
357
|
+
{
|
358
|
+
case FFI_PA32:
|
359
|
+
ffi_size_stack_pa32(cif);
|
360
|
+
break;
|
361
|
+
|
362
|
+
default:
|
363
|
+
FFI_ASSERT(0);
|
364
|
+
break;
|
365
|
+
}
|
366
|
+
|
367
|
+
return FFI_OK;
|
368
|
+
}
|
369
|
+
|
370
|
+
extern void ffi_call_pa32(void (*)(UINT32 *, extended_cif *, unsigned),
|
371
|
+
extended_cif *, unsigned, unsigned, unsigned *,
|
372
|
+
void (*fn)(void));
|
373
|
+
|
374
|
+
void ffi_call(ffi_cif *cif, void (*fn)(void), void *rvalue, void **avalue)
|
375
|
+
{
|
376
|
+
extended_cif ecif;
|
377
|
+
|
378
|
+
ecif.cif = cif;
|
379
|
+
ecif.avalue = avalue;
|
380
|
+
|
381
|
+
/* If the return value is a struct and we don't have a return
|
382
|
+
value address then we need to make one. */
|
383
|
+
|
384
|
+
if (rvalue == NULL
|
385
|
+
#ifdef PA_HPUX
|
386
|
+
&& (cif->rtype->type == FFI_TYPE_STRUCT
|
387
|
+
|| cif->rtype->type == FFI_TYPE_LONGDOUBLE))
|
388
|
+
#else
|
389
|
+
&& cif->rtype->type == FFI_TYPE_STRUCT)
|
390
|
+
#endif
|
391
|
+
{
|
392
|
+
ecif.rvalue = alloca(cif->rtype->size);
|
393
|
+
}
|
394
|
+
else
|
395
|
+
ecif.rvalue = rvalue;
|
396
|
+
|
397
|
+
|
398
|
+
switch (cif->abi)
|
399
|
+
{
|
400
|
+
case FFI_PA32:
|
401
|
+
debug(3, "Calling ffi_call_pa32: ecif=%p, bytes=%u, flags=%u, rvalue=%p, fn=%p\n", &ecif, cif->bytes, cif->flags, ecif.rvalue, (void *)fn);
|
402
|
+
ffi_call_pa32(ffi_prep_args_pa32, &ecif, cif->bytes,
|
403
|
+
cif->flags, ecif.rvalue, fn);
|
404
|
+
break;
|
405
|
+
|
406
|
+
default:
|
407
|
+
FFI_ASSERT(0);
|
408
|
+
break;
|
409
|
+
}
|
410
|
+
}
|
411
|
+
|
412
|
+
#if FFI_CLOSURES
|
413
|
+
/* This is more-or-less an inverse of ffi_call -- we have arguments on
|
414
|
+
the stack, and we need to fill them into a cif structure and invoke
|
415
|
+
the user function. This really ought to be in asm to make sure
|
416
|
+
the compiler doesn't do things we don't expect. */
|
417
|
+
ffi_status ffi_closure_inner_pa32(ffi_closure *closure, UINT32 *stack)
|
418
|
+
{
|
419
|
+
ffi_cif *cif;
|
420
|
+
void **avalue;
|
421
|
+
void *rvalue;
|
422
|
+
UINT32 ret[2]; /* function can return up to 64-bits in registers */
|
423
|
+
ffi_type **p_arg;
|
424
|
+
char *tmp;
|
425
|
+
int i, avn;
|
426
|
+
unsigned int slot = FIRST_ARG_SLOT;
|
427
|
+
register UINT32 r28 asm("r28");
|
428
|
+
|
429
|
+
cif = closure->cif;
|
430
|
+
|
431
|
+
/* If returning via structure, callee will write to our pointer. */
|
432
|
+
if (cif->flags == FFI_TYPE_STRUCT)
|
433
|
+
rvalue = (void *)r28;
|
434
|
+
else
|
435
|
+
rvalue = &ret[0];
|
436
|
+
|
437
|
+
avalue = (void **)alloca(cif->nargs * FFI_SIZEOF_ARG);
|
438
|
+
avn = cif->nargs;
|
439
|
+
p_arg = cif->arg_types;
|
440
|
+
|
441
|
+
for (i = 0; i < avn; i++)
|
442
|
+
{
|
443
|
+
int type = (*p_arg)->type;
|
444
|
+
|
445
|
+
switch (type)
|
446
|
+
{
|
447
|
+
case FFI_TYPE_SINT8:
|
448
|
+
case FFI_TYPE_UINT8:
|
449
|
+
case FFI_TYPE_SINT16:
|
450
|
+
case FFI_TYPE_UINT16:
|
451
|
+
case FFI_TYPE_SINT32:
|
452
|
+
case FFI_TYPE_UINT32:
|
453
|
+
case FFI_TYPE_POINTER:
|
454
|
+
avalue[i] = (char *)(stack - slot) + sizeof(UINT32) - (*p_arg)->size;
|
455
|
+
break;
|
456
|
+
|
457
|
+
case FFI_TYPE_SINT64:
|
458
|
+
case FFI_TYPE_UINT64:
|
459
|
+
slot += (slot & 1) ? 1 : 2;
|
460
|
+
avalue[i] = (void *)(stack - slot);
|
461
|
+
break;
|
462
|
+
|
463
|
+
case FFI_TYPE_FLOAT:
|
464
|
+
#ifdef PA_LINUX
|
465
|
+
/* The closure call is indirect. In Linux, floating point
|
466
|
+
arguments in indirect calls with a prototype are passed
|
467
|
+
in the floating point registers instead of the general
|
468
|
+
registers. So, we need to replace what was previously
|
469
|
+
stored in the current slot with the value in the
|
470
|
+
corresponding floating point register. */
|
471
|
+
switch (slot - FIRST_ARG_SLOT)
|
472
|
+
{
|
473
|
+
case 0: fstw(fr4, (void *)(stack - slot)); break;
|
474
|
+
case 1: fstw(fr5, (void *)(stack - slot)); break;
|
475
|
+
case 2: fstw(fr6, (void *)(stack - slot)); break;
|
476
|
+
case 3: fstw(fr7, (void *)(stack - slot)); break;
|
477
|
+
}
|
478
|
+
#endif
|
479
|
+
avalue[i] = (void *)(stack - slot);
|
480
|
+
break;
|
481
|
+
|
482
|
+
case FFI_TYPE_DOUBLE:
|
483
|
+
slot += (slot & 1) ? 1 : 2;
|
484
|
+
#ifdef PA_LINUX
|
485
|
+
/* See previous comment for FFI_TYPE_FLOAT. */
|
486
|
+
switch (slot - FIRST_ARG_SLOT)
|
487
|
+
{
|
488
|
+
case 1: fstd(fr5, (void *)(stack - slot)); break;
|
489
|
+
case 3: fstd(fr7, (void *)(stack - slot)); break;
|
490
|
+
}
|
491
|
+
#endif
|
492
|
+
avalue[i] = (void *)(stack - slot);
|
493
|
+
break;
|
494
|
+
|
495
|
+
case FFI_TYPE_STRUCT:
|
496
|
+
/* Structs smaller or equal than 4 bytes are passed in one
|
497
|
+
register. Structs smaller or equal 8 bytes are passed in two
|
498
|
+
registers. Larger structures are passed by pointer. */
|
499
|
+
if((*p_arg)->size <= 4)
|
500
|
+
{
|
501
|
+
avalue[i] = (void *)(stack - slot) + sizeof(UINT32) -
|
502
|
+
(*p_arg)->size;
|
503
|
+
}
|
504
|
+
else if ((*p_arg)->size <= 8)
|
505
|
+
{
|
506
|
+
slot += (slot & 1) ? 1 : 2;
|
507
|
+
avalue[i] = (void *)(stack - slot) + sizeof(UINT64) -
|
508
|
+
(*p_arg)->size;
|
509
|
+
}
|
510
|
+
else
|
511
|
+
avalue[i] = (void *) *(stack - slot);
|
512
|
+
break;
|
513
|
+
|
514
|
+
default:
|
515
|
+
FFI_ASSERT(0);
|
516
|
+
}
|
517
|
+
|
518
|
+
slot++;
|
519
|
+
p_arg++;
|
520
|
+
}
|
521
|
+
|
522
|
+
/* Invoke the closure. */
|
523
|
+
(closure->fun) (cif, rvalue, avalue, closure->user_data);
|
524
|
+
|
525
|
+
debug(3, "after calling function, ret[0] = %08x, ret[1] = %08x\n", ret[0],
|
526
|
+
ret[1]);
|
527
|
+
|
528
|
+
/* Store the result using the lower 2 bytes of the flags. */
|
529
|
+
switch (cif->flags)
|
530
|
+
{
|
531
|
+
case FFI_TYPE_UINT8:
|
532
|
+
*(stack - FIRST_ARG_SLOT) = (UINT8)(ret[0] >> 24);
|
533
|
+
break;
|
534
|
+
case FFI_TYPE_SINT8:
|
535
|
+
*(stack - FIRST_ARG_SLOT) = (SINT8)(ret[0] >> 24);
|
536
|
+
break;
|
537
|
+
case FFI_TYPE_UINT16:
|
538
|
+
*(stack - FIRST_ARG_SLOT) = (UINT16)(ret[0] >> 16);
|
539
|
+
break;
|
540
|
+
case FFI_TYPE_SINT16:
|
541
|
+
*(stack - FIRST_ARG_SLOT) = (SINT16)(ret[0] >> 16);
|
542
|
+
break;
|
543
|
+
case FFI_TYPE_INT:
|
544
|
+
case FFI_TYPE_SINT32:
|
545
|
+
case FFI_TYPE_UINT32:
|
546
|
+
*(stack - FIRST_ARG_SLOT) = ret[0];
|
547
|
+
break;
|
548
|
+
case FFI_TYPE_SINT64:
|
549
|
+
case FFI_TYPE_UINT64:
|
550
|
+
*(stack - FIRST_ARG_SLOT) = ret[0];
|
551
|
+
*(stack - FIRST_ARG_SLOT - 1) = ret[1];
|
552
|
+
break;
|
553
|
+
|
554
|
+
case FFI_TYPE_DOUBLE:
|
555
|
+
fldd(rvalue, fr4);
|
556
|
+
break;
|
557
|
+
|
558
|
+
case FFI_TYPE_FLOAT:
|
559
|
+
fldw(rvalue, fr4);
|
560
|
+
break;
|
561
|
+
|
562
|
+
case FFI_TYPE_STRUCT:
|
563
|
+
/* Don't need a return value, done by caller. */
|
564
|
+
break;
|
565
|
+
|
566
|
+
case FFI_TYPE_SMALL_STRUCT2:
|
567
|
+
case FFI_TYPE_SMALL_STRUCT3:
|
568
|
+
case FFI_TYPE_SMALL_STRUCT4:
|
569
|
+
tmp = (void*)(stack - FIRST_ARG_SLOT);
|
570
|
+
tmp += 4 - cif->rtype->size;
|
571
|
+
memcpy((void*)tmp, &ret[0], cif->rtype->size);
|
572
|
+
break;
|
573
|
+
|
574
|
+
case FFI_TYPE_SMALL_STRUCT5:
|
575
|
+
case FFI_TYPE_SMALL_STRUCT6:
|
576
|
+
case FFI_TYPE_SMALL_STRUCT7:
|
577
|
+
case FFI_TYPE_SMALL_STRUCT8:
|
578
|
+
{
|
579
|
+
unsigned int ret2[2];
|
580
|
+
int off;
|
581
|
+
|
582
|
+
/* Right justify ret[0] and ret[1] */
|
583
|
+
switch (cif->flags)
|
584
|
+
{
|
585
|
+
case FFI_TYPE_SMALL_STRUCT5: off = 3; break;
|
586
|
+
case FFI_TYPE_SMALL_STRUCT6: off = 2; break;
|
587
|
+
case FFI_TYPE_SMALL_STRUCT7: off = 1; break;
|
588
|
+
default: off = 0; break;
|
589
|
+
}
|
590
|
+
|
591
|
+
memset (ret2, 0, sizeof (ret2));
|
592
|
+
memcpy ((char *)ret2 + off, ret, 8 - off);
|
593
|
+
|
594
|
+
*(stack - FIRST_ARG_SLOT) = ret2[0];
|
595
|
+
*(stack - FIRST_ARG_SLOT - 1) = ret2[1];
|
596
|
+
}
|
597
|
+
break;
|
598
|
+
|
599
|
+
case FFI_TYPE_POINTER:
|
600
|
+
case FFI_TYPE_VOID:
|
601
|
+
break;
|
602
|
+
|
603
|
+
default:
|
604
|
+
debug(0, "assert with cif->flags: %d\n",cif->flags);
|
605
|
+
FFI_ASSERT(0);
|
606
|
+
break;
|
607
|
+
}
|
608
|
+
return FFI_OK;
|
609
|
+
}
|
610
|
+
|
611
|
+
/* Fill in a closure to refer to the specified fun and user_data.
|
612
|
+
cif specifies the argument and result types for fun.
|
613
|
+
The cif must already be prep'ed. */
|
614
|
+
|
615
|
+
extern void ffi_closure_pa32(void);
|
616
|
+
|
617
|
+
ffi_status
|
618
|
+
ffi_prep_closure_loc (ffi_closure* closure,
|
619
|
+
ffi_cif* cif,
|
620
|
+
void (*fun)(ffi_cif*,void*,void**,void*),
|
621
|
+
void *user_data,
|
622
|
+
void *codeloc)
|
623
|
+
{
|
624
|
+
UINT32 *tramp = (UINT32 *)(closure->tramp);
|
625
|
+
#ifdef PA_HPUX
|
626
|
+
UINT32 *tmp;
|
627
|
+
#endif
|
628
|
+
|
629
|
+
FFI_ASSERT (cif->abi == FFI_PA32);
|
630
|
+
|
631
|
+
/* Make a small trampoline that will branch to our
|
632
|
+
handler function. Use PC-relative addressing. */
|
633
|
+
|
634
|
+
#ifdef PA_LINUX
|
635
|
+
tramp[0] = 0xeaa00000; /* b,l .+8,%r21 ; %r21 <- pc+8 */
|
636
|
+
tramp[1] = 0xd6a01c1e; /* depi 0,31,2,%r21 ; mask priv bits */
|
637
|
+
tramp[2] = 0x4aa10028; /* ldw 20(%r21),%r1 ; load plabel */
|
638
|
+
tramp[3] = 0x36b53ff1; /* ldo -8(%r21),%r21 ; get closure addr */
|
639
|
+
tramp[4] = 0x0c201096; /* ldw 0(%r1),%r22 ; address of handler */
|
640
|
+
tramp[5] = 0xeac0c000; /* bv%r0(%r22) ; branch to handler */
|
641
|
+
tramp[6] = 0x0c281093; /* ldw 4(%r1),%r19 ; GP of handler */
|
642
|
+
tramp[7] = ((UINT32)(ffi_closure_pa32) & ~2);
|
643
|
+
|
644
|
+
/* Flush d/icache -- have to flush up 2 two lines because of
|
645
|
+
alignment. */
|
646
|
+
__asm__ volatile(
|
647
|
+
"fdc 0(%0)\n\t"
|
648
|
+
"fdc %1(%0)\n\t"
|
649
|
+
"fic 0(%%sr4, %0)\n\t"
|
650
|
+
"fic %1(%%sr4, %0)\n\t"
|
651
|
+
"sync\n\t"
|
652
|
+
"nop\n\t"
|
653
|
+
"nop\n\t"
|
654
|
+
"nop\n\t"
|
655
|
+
"nop\n\t"
|
656
|
+
"nop\n\t"
|
657
|
+
"nop\n\t"
|
658
|
+
"nop\n"
|
659
|
+
:
|
660
|
+
: "r"((unsigned long)tramp & ~31),
|
661
|
+
"r"(32 /* stride */)
|
662
|
+
: "memory");
|
663
|
+
#endif
|
664
|
+
|
665
|
+
#ifdef PA_HPUX
|
666
|
+
tramp[0] = 0xeaa00000; /* b,l .+8,%r21 ; %r21 <- pc+8 */
|
667
|
+
tramp[1] = 0xd6a01c1e; /* depi 0,31,2,%r21 ; mask priv bits */
|
668
|
+
tramp[2] = 0x4aa10038; /* ldw 28(%r21),%r1 ; load plabel */
|
669
|
+
tramp[3] = 0x36b53ff1; /* ldo -8(%r21),%r21 ; get closure addr */
|
670
|
+
tramp[4] = 0x0c201096; /* ldw 0(%r1),%r22 ; address of handler */
|
671
|
+
tramp[5] = 0x02c010b4; /* ldsid (%r22),%r20 ; load space id */
|
672
|
+
tramp[6] = 0x00141820; /* mtsp %r20,%sr0 ; into %sr0 */
|
673
|
+
tramp[7] = 0xe2c00000; /* be 0(%sr0,%r22) ; branch to handler */
|
674
|
+
tramp[8] = 0x0c281093; /* ldw 4(%r1),%r19 ; GP of handler */
|
675
|
+
tramp[9] = ((UINT32)(ffi_closure_pa32) & ~2);
|
676
|
+
|
677
|
+
/* Flush d/icache -- have to flush three lines because of alignment. */
|
678
|
+
__asm__ volatile(
|
679
|
+
"copy %1,%0\n\t"
|
680
|
+
"fdc,m %2(%0)\n\t"
|
681
|
+
"fdc,m %2(%0)\n\t"
|
682
|
+
"fdc,m %2(%0)\n\t"
|
683
|
+
"ldsid (%1),%0\n\t"
|
684
|
+
"mtsp %0,%%sr0\n\t"
|
685
|
+
"copy %1,%0\n\t"
|
686
|
+
"fic,m %2(%%sr0,%0)\n\t"
|
687
|
+
"fic,m %2(%%sr0,%0)\n\t"
|
688
|
+
"fic,m %2(%%sr0,%0)\n\t"
|
689
|
+
"sync\n\t"
|
690
|
+
"nop\n\t"
|
691
|
+
"nop\n\t"
|
692
|
+
"nop\n\t"
|
693
|
+
"nop\n\t"
|
694
|
+
"nop\n\t"
|
695
|
+
"nop\n\t"
|
696
|
+
"nop\n"
|
697
|
+
: "=&r" ((unsigned long)tmp)
|
698
|
+
: "r" ((unsigned long)tramp & ~31),
|
699
|
+
"r" (32/* stride */)
|
700
|
+
: "memory");
|
701
|
+
#endif
|
702
|
+
|
703
|
+
closure->cif = cif;
|
704
|
+
closure->user_data = user_data;
|
705
|
+
closure->fun = fun;
|
706
|
+
|
707
|
+
return FFI_OK;
|
708
|
+
}
|
709
|
+
#endif
|