gir_ffi 0.15.3 → 0.15.4

data/test/integration/generated_secret_test.rb

@@ -1,14 +0,0 @@
-# frozen_string_literal: true
-
-require "gir_ffi_test_helper"
-
-GirFFI.setup :Secret
-
-describe "The generated Secret module" do
-  describe "Secret::Schema" do
-    it "has a working constructor" do
-      instance = Secret::Schema.new("foo", :none, "bar" => :string)
-      _(instance).must_be_instance_of Secret::Schema
-    end
-  end
-end

data/test/integration/generated_utility_test.rb

@@ -1,174 +0,0 @@
-# frozen_string_literal: true
-
-require "gir_ffi_test_helper"
-
-GirFFI.setup :Utility
-
-describe Utility do
-  describe "Utility::Buffer" do
-    let(:instance) { Utility::Buffer.new }
-
-    it "has a writable field data" do
-      _(instance.data).must_equal FFI::Pointer::NULL
-      instance.data = FFI::Pointer.new 54_321
-      _(instance.data).must_equal FFI::Pointer.new 54_321
-    end
-
-    it "has a writable field length" do
-      _(instance.length).must_equal 0
-      instance.length = 42
-      _(instance.length).must_equal 42
-    end
-  end
-
-  describe "Utility::Byte" do
-    let(:instance) { Utility::Byte.new }
-
-    it "has a writable field value" do
-      _(instance.value).must_equal 0
-      instance.value = 42
-      _(instance.value).must_equal 42
-    end
-
-    it "has a writable field first_nibble" do
-      skip "This field is not exposed in the GIR"
-      instance.value = 0xAB
-      _(instance.first_nibble).must_equal 0xA
-      instance.first_nibble = 0x4
-      _(instance.value).must_equal 0x4B
-    end
-
-    it "has a writable field second_nibble" do
-      skip "This field is not exposed in the GIR"
-      instance.value = 0xAB
-      _(instance.second_nibble).must_equal 0xB
-      instance.second_nibble = 0x4
-      _(instance.value).must_equal 0xA4
-    end
-  end
-
-  describe "Utility::EnumType" do
-    it "has the member :a" do
-      _(Utility::EnumType[:a]).must_equal 0
-    end
-
-    it "has the member :b" do
-      _(Utility::EnumType[:b]).must_equal 1
-    end
-
-    it "has the member :c" do
-      _(Utility::EnumType[:c]).must_equal 2
-    end
-  end
-
-  describe "Utility::FlagType" do
-    it "has the member :a" do
-      _(Utility::FlagType[:a]).must_equal 1
-    end
-
-    it "has the member :b" do
-      _(Utility::FlagType[:b]).must_equal 2
-    end
-
-    it "has the member :c" do
-      _(Utility::FlagType[:c]).must_equal 4
-    end
-  end
-
-  describe "Utility::Object" do
-    let(:instance) { Utility::Object.new }
-
-    it "has a working method #watch_dir" do
-      # This method doesn't actually do anything
-      instance.watch_dir("/") {}
-      pass
-    end
-  end
-
-  describe "Utility::Struct" do
-    let(:instance) { Utility::Struct.new }
-
-    it "has a writable field field" do
-      _(instance.field).must_equal 0
-      instance.field = 42
-      _(instance.field).must_equal 42
-    end
-
-    it "has a writable field bitfield1" do
-      skip "Bitfield bit width is not implemented yet"
-      _(instance.bitfield1).must_equal 0
-      instance.bitfield1 = 15
-      _(instance.bitfield1).must_equal 7
-    end
-
-    it "has a writable field bitfield2" do
-      skip "Bitfield bit width is not implemented yet"
-      _(instance.bitfield2).must_equal 0
-      instance.bitfield2 = 15
-      _(instance.bitfield2).must_equal 3
-    end
-
-    it "has a writable field data" do
-      _(instance.data.to_a).must_equal [0] * 16
-    end
-  end
-
-  describe "Utility::TaggedValue" do
-    let(:instance) { Utility::TaggedValue.new }
-
-    it "has a writable field tag" do
-      _(instance.tag).must_equal 0
-      instance.tag = 42
-      _(instance.tag).must_equal 42
-    end
-
-    it "has a writable field v_pointer" do
-      skip "This field is not exposed in the GIR"
-      _(instance.v_pointer).must_equal FFI::Pointer::NULL
-      instance.v_pointer = FFI::Pointer.new(4321)
-      _(instance.v_pointer).must_equal FFI::Pointer.new(4321)
-    end
-
-    it "has a writable field v_real" do
-      skip "This field is not exposed in the GIR"
-      _(instance.v_real).must_equal 0.0
-      instance.v_real = 42.23
-      _(instance.v_real).must_equal 42.23
-    end
-
-    it "has a writable field v_integer" do
-      skip "This field is not exposed in the GIR"
-      _(instance.v_integer).must_equal 0
-      instance.v_integer = 42
-      _(instance.v_integer).must_equal 42
-    end
-  end
-
-  describe "Utility::Union" do
-    let(:instance) { Utility::Union.new }
-
-    it "has a writable field pointer" do
-      _(instance.pointer).must_be_nil
-      instance.pointer = "hello 42"
-      _(instance.pointer).must_equal "hello 42"
-    end
-
-    it "has a writable field integer" do
-      _(instance.integer).must_equal 0
-      instance.integer = 42
-      _(instance.integer).must_equal 42
-    end
-
-    it "has a writable field real" do
-      _(instance.real).must_equal 0.0
-      instance.real = 42.23
-      _(instance.real).must_equal 42.23
-    end
-  end
-
-  it "has a working function #dir_foreach" do
-    # This method doesn't actually do anything
-    result = Utility.dir_foreach("/") {}
-    _(result).must_be_nil
-  end
-end

data/test/integration/generated_warnlib_test.rb

@@ -1,45 +0,0 @@
-# frozen_string_literal: true
-
-require "gir_ffi_test_helper"
-
-GirFFI.setup :WarnLib
-
-describe "The generated WarnLib module" do
-  describe "WarnLib::Whatever" do
-    let(:derived_klass) do
-      Object.const_set("DerivedClass#{Sequence.next}", Class.new(GObject::Object))
-    end
-
-    before do
-      @result = nil
-      derived_klass.class_eval { include WarnLib::Whatever }
-      GirFFI.define_type derived_klass do |info|
-        info.install_vfunc_implementation :do_boo,
-                                          proc { |_obj, x, _y| @result = "boo#{x}" }
-        info.install_vfunc_implementation :do_moo,
-                                          proc { |_obj, x, _y| @result = "moo#{x}" }
-      end
-    end
-
-    let(:instance) { derived_klass.new }
-
-    it "has a working method #do_boo" do
-      instance.do_boo 42, nil
-      _(@result).must_equal "boo42"
-    end
-
-    it "has a working method #do_moo" do
-      instance.do_moo 23, nil
-      _(@result).must_equal "moo23"
-    end
-  end
-
-  it "has a working function #throw_unpaired" do
-    _(proc { WarnLib.throw_unpaired }).must_raise GirFFI::GLibError
-  end
-
-  it "has a working function #unpaired_error_quark" do
-    result = WarnLib.unpaired_error_quark
-    _(GLib.quark_to_string(result)).must_equal "warnlib-unpaired-error"
-  end
-end

data/test/integration/method_lookup_test.rb

@@ -1,34 +0,0 @@
-# frozen_string_literal: true
-
-require "gir_ffi_test_helper"
-
-# Tests how methods are looked up and generated on first use.
-describe "Looking up methods" do
-  before do
-    save_module :Regress
-    GirFFI.setup :Regress
-  end
-
-  describe "an instance method" do
-    it "is found from a subclass" do
-      assert_defines_instance_method Regress::TestObj, :forced_method
-      refute_defines_instance_method Regress::TestSubObj, :forced_method
-
-      sub_object = Regress::TestSubObj.new
-      sub_object.forced_method
-    end
-  end
-
-  describe "a class method" do
-    it "is found from a subclass" do
-      assert_defines_singleton_method Regress::TestObj, :static_method
-      refute_defines_singleton_method Regress::TestSubObj, :static_method
-
-      Regress::TestSubObj.static_method 42
-    end
-  end
-
-  after do
-    restore_module :Regress
-  end
-end

data/test/introspection_test_helper.rb

@@ -1,94 +0,0 @@
-# frozen_string_literal: true
-
-require "base_test_helper"
-
-require "ffi-gobject_introspection"
-
-GObjectIntrospection::IRepository
-  .prepend_search_path File.join(File.dirname(__FILE__), "lib")
-
-module LocalSharedLibrary
-  def shared_library(namespace)
-    case namespace
-    when "Everything", "GIMarshallingTests", "Regress", "Utility", "WarnLib"
-      File.join(File.dirname(__FILE__), "lib", "lib#{namespace.downcase}.so")
-    else
-      super
-    end
-  end
-end
-
-GObjectIntrospection::IRepository.prepend LocalSharedLibrary
-
-module IntrospectionTestExtensions
-  class << self
-    attr_accessor :version
-  end
-
-  def get_introspection_data(namespace, name)
-    gir = GObjectIntrospection::IRepository.default
-    gir.require namespace, nil
-    gir.find_by_name namespace, name
-  end
-
-  def get_field_introspection_data(namespace, klass, name)
-    get_introspection_data(namespace, klass).find_field name
-  end
-
-  def get_method_introspection_data(namespace, klass, name)
-    get_introspection_data(namespace, klass).find_method name
-  end
-
-  def get_property_introspection_data(namespace, klass, name)
-    get_introspection_data(namespace, klass).find_property name
-  end
-
-  def get_signal_introspection_data(namespace, klass, name)
-    get_introspection_data(namespace, klass).find_signal name
-  end
-
-  def get_vfunc_introspection_data(namespace, klass, name)
-    get_introspection_data(namespace, klass).find_vfunc name
-  end
-
-  def skip_below(introduction_version)
-    unless LATEST_VERSION >= introduction_version
-      raise "Version #{introduction_version} is too new and would always be skipped"
-    end
-
-    skip "Introduced in #{introduction_version}" if introduction_version > version
-  end
-
-  def version
-    IntrospectionTestExtensions.version ||= calculate_version
-  end
-
-  VERSION_GUARDS = {
-    "1.61.1"  => %w(Regress TestObj emit_sig_with_error),
-    "1.59.4"  => %w(Regress test_array_struct_in_none),
-    "1.58.3"  => %w(Regress TestReferenceCounters),
-    "1.57.2"  => %w(Regress TestInterface emit_signal),
-    "1.55.2"  => %w(Regress FOO_FLAGS_SECOND_AND_THIRD),
-    "1.53.4"  => %w(Regress TestObj name_conflict),
-    "1.49.1"  => %w(Regress AnonymousUnionAndStruct),
-    "1.47.92" => %w(Regress get_variant),
-    "1.47.1"  => %w(Regress test_noptr_callback)
-  }.freeze
-
-  LATEST_VERSION = VERSION_GUARDS.keys.first
-
-  def calculate_version
-    VERSION_GUARDS.each do |version, (namespace, klass, methodname)|
-      result = if methodname
-                 get_method_introspection_data(namespace, klass, methodname)
-               else
-                 get_introspection_data(namespace, klass)
-               end
-      return version if result
-    end
-
-    "1.46.0" # Minimum supported version
-  end
-end
-
-Minitest::Test.include IntrospectionTestExtensions

data/test/lib/Makefile.am

@@ -1,110 +0,0 @@
-ACLOCAL_AMFLAGS = -I m4
-AUTOMAKE_OPTIONS = 1.7
-
-# We need to build a shared library, which can be dlopened
-# it does not work with noinst_LTLIBRARIES
-testlib_LTLIBRARIES = \
-	libeverything.la \
-	libgimarshallingtests.la libregress.la libutility.la libwarnlib.la
-
-testlibdir = $(prefix)/unused
-GI_TESTDIR = $(GI_DATADIR)/tests
-install-testlibLTLIBRARIES: # prevent it from being installed
-
-libeverything_la_SOURCES = $(GI_DATADIR)/tests/everything.c $(GI_DATADIR)/tests/everything.h
-libeverything_la_CFLAGS = $(GLIB_CFLAGS)
-libeverything_la_LDFLAGS = -module -avoid-version
-
-libgimarshallingtests_la_SOURCES = $(GI_DATADIR)/tests/gimarshallingtests.c $(GI_DATADIR)/tests/gimarshallingtests.h
-libgimarshallingtests_la_CFLAGS = $(GIO_CFLAGS)
-libgimarshallingtests_la_LDFLAGS = -module -avoid-version
-
-libregress_la_SOURCES = $(GI_TESTDIR)/regress.c $(GI_TESTDIR)/regress.h
-
-if HAVE_EXTRA_TEST_FILES
-libregress_la_SOURCES += \
-	$(GI_TESTDIR)/annotation.c $(GI_TESTDIR)/annotation.h \
-	$(GI_TESTDIR)/foo.c $(GI_TESTDIR)/foo.h \
-	$(GI_TESTDIR)/drawable.c $(GI_TESTDIR)/drawable.h
-endif
-
-libregress_la_CFLAGS = $(GIO_CFLAGS) $(CAIRO_CFLAGS)
-libregress_la_LDFLAGS = -module -avoid-version $(GIO_LIBS) $(CAIRO_LIBS)
-
-if HAVE_EXTRA_TEST_FILES
-libutility_la_SOURCES = $(GI_DATADIR)/tests/utility.c $(GI_DATADIR)/tests/utility.h
-libutility_la_CFLAGS = $(GLIB_CFLAGS)
-libutility_la_LDFLAGS = -module -avoid-version
-
-libwarnlib_la_SOURCES = $(GI_DATADIR)/tests/warnlib.c $(GI_DATADIR)/tests/warnlib.h
-libwarnlib_la_CFLAGS = $(GIO_CFLAGS)
-libwarnlib_la_LDFLAGS = -module -avoid-version
-endif
-
-GIRS = Everything-1.0.gir GIMarshallingTests-1.0.gir Regress-1.0.gir
-
-Everything-1.0.gir: libeverything.la
-	$(AM_V_GEN) g-ir-scanner --include=GLib-2.0 \
-	--namespace=$(@:-1.0.gir=) --nsversion=1.0 \
-	--warn-all --warn-error \
-	--library=$< --libtool="$(top_builddir)/libtool" \
-	--output $@ $(libeverything_la_SOURCES)
-Everything-1.0.typelib: Everything-1.0.gir
-	$(AM_V_GEN) g-ir-compiler $< -o $@
-
-GIMarshallingTests-1.0.gir: libgimarshallingtests.la
-	$(AM_V_GEN) g-ir-scanner --include=Gio-2.0 \
-	--namespace=GIMarshallingTests --nsversion=1.0 \
-	--symbol-prefix=gi_marshalling_tests \
-	--warn-all --warn-error \
-	--library=libgimarshallingtests.la \
-	--libtool="$(top_builddir)/libtool" \
-	--output $@ \
-	$(libgimarshallingtests_la_SOURCES)
-GIMarshallingTests-1.0.typelib: GIMarshallingTests-1.0.gir
-	$(AM_V_GEN) g-ir-compiler $< -o $@
-
-regress_SCANNER_INCLUDES= --include=cairo-1.0 --include=Gio-2.0
-
-Regress-1.0.gir: libregress.la
-	$(AM_V_GEN) g-ir-scanner $(regress_SCANNER_INCLUDES) \
-	--namespace=Regress --nsversion=1.0 --pkg=cairo-gobject \
-	--warn-all --warn-error \
-	--library=libregress.la \
-	--libtool="$(top_builddir)/libtool" \
-	--output $@ \
-	$(libregress_la_SOURCES)
-Regress-1.0.typelib: Regress-1.0.gir
-	$(AM_V_GEN) g-ir-compiler --includedir=. $< -o $@
-
-if HAVE_EXTRA_TEST_FILES
-
-GIRS += Utility-1.0.gir WarnLib-1.0.gir
-Regress-1.0.gir: Utility-1.0.gir
-regress_SCANNER_INCLUDES += --include-uninstalled=Utility-1.0.gir
-
-Utility-1.0.gir: libutility.la
-	$(AM_V_GEN) g-ir-scanner --include=GLib-2.0 --include=GObject-2.0 \
-	--namespace=$(@:-1.0.gir=) --nsversion=1.0 \
-	--warn-all --warn-error \
-	--library=$< --libtool="$(top_builddir)/libtool" \
-	--output $@ $(libutility_la_SOURCES)
-Utility-1.0.typelib: Utility-1.0.gir
-	$(AM_V_GEN) g-ir-compiler $< -o $@
-
-WarnLib-1.0.gir: libwarnlib.la
-	$(AM_V_GEN) g-ir-scanner --include=Gio-2.0 \
-	--namespace=$(@:-1.0.gir=) --nsversion=1.0 \
-	--symbol-prefix=warnlib \
-	--warn-all \
-	--library=$< --libtool="$(top_builddir)/libtool" \
-	--output $@ $(libwarnlib_la_SOURCES)
-WarnLib-1.0.typelib: WarnLib-1.0.gir
-	$(AM_V_GEN) g-ir-compiler $< -o $@
-
-endif
-
-.la.so:
-	test -L $@ || $(LN_S) .libs/$@ $@
-
-all: $(testlib_LTLIBRARIES:.la=.so) $(GIRS:.gir=.typelib)