factbase 0.15.0 → 0.15.1

data/test/factbase/test_accum.rb

@@ -1,74 +0,0 @@
-# frozen_string_literal: true
-
-# SPDX-FileCopyrightText: Copyright (c) 2024-2025 Yegor Bugayenko
-# SPDX-License-Identifier: MIT
-
-require_relative '../test__helper'
-require_relative '../../lib/factbase'
-require_relative '../../lib/factbase/accum'
-require_relative '../../lib/factbase/fact'
-
-def global_function_for_this_test_only(foo)
-  raise foo
-end
-
-# Accum test.
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024-2025 Yegor Bugayenko
-# License:: MIT
-class TestAccum < Factbase::Test
-  def test_holds_props
-    map = {}
-    f = Factbase::Fact.new(map)
-    props = {}
-    a = Factbase::Accum.new(f, props, false)
-    a.foo = 42
-    assert_raises(StandardError) { f.foo }
-    assert_equal(42, a.foo)
-    assert_equal([42], props['foo'])
-  end
-
-  def test_fetches_without_conflict_with_global_name
-    t = Factbase::Accum.new(
-      Factbase::Fact.new({ 'global_function_for_this_test_only' => [2] }),
-      {}, true
-    )
-    assert_equal(2, t.global_function_for_this_test_only)
-  end
-
-  def test_passes_props
-    map = {}
-    f = Factbase::Fact.new(map)
-    props = {}
-    a = Factbase::Accum.new(f, props, true)
-    a.foo = 42
-    assert_equal(42, f.foo)
-    assert_equal(42, a.foo)
-    assert_equal([42], props['foo'])
-  end
-
-  def test_appends_props
-    map = {}
-    f = Factbase::Fact.new(map)
-    f.foo = 42
-    props = {}
-    a = Factbase::Accum.new(f, props, false)
-    a.foo = 55
-    assert_equal(2, a['foo'].size)
-  end
-
-  def test_empties
-    f = Factbase::Fact.new({})
-    a = Factbase::Accum.new(f, {}, false)
-    assert_nil(a['foo'])
-  end
-
-  def test_prints_to_string
-    map = {}
-    f = Factbase::Fact.new(map)
-    props = {}
-    a = Factbase::Accum.new(f, props, true)
-    a.foo = 42
-    assert_equal('[ foo: [42] ]', f.to_s)
-  end
-end

data/test/factbase/test_churn.rb

@@ -1,41 +0,0 @@
-# frozen_string_literal: true
-
-# SPDX-FileCopyrightText: Copyright (c) 2024-2025 Yegor Bugayenko
-# SPDX-License-Identifier: MIT
-
-require_relative '../test__helper'
-require 'loog'
-require_relative '../../lib/factbase'
-require_relative '../../lib/factbase/churn'
-
-# Test.
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024-2025 Yegor Bugayenko
-# License:: MIT
-class TestChurn < Factbase::Test
-  def test_appends
-    c = Factbase::Churn.new
-    c.append(1, 2, 3)
-    assert_equal('1i/2d/3a', c.to_s)
-    assert_equal(6, c.to_i)
-  end
-
-  def test_checks_for_zero
-    c = Factbase::Churn.new
-    assert_predicate(c, :zero?)
-  end
-
-  def test_makes_a_duplicate
-    c = Factbase::Churn.new
-    assert_predicate(c.dup, :zero?)
-  end
-
-  def test_concatenates_with_other
-    c1 = Factbase::Churn.new
-    c1.append(1, 6, 3)
-    c2 = Factbase::Churn.new
-    c2.append(3, 2, 46)
-    c3 = c1 + c2
-    assert_equal('4i/8d/49a', c3.to_s)
-  end
-end

data/test/factbase/test_fact.rb

@@ -1,108 +0,0 @@
-# frozen_string_literal: true
-
-# SPDX-FileCopyrightText: Copyright (c) 2024-2025 Yegor Bugayenko
-# SPDX-License-Identifier: MIT
-
-require_relative '../test__helper'
-require_relative '../../lib/factbase'
-require_relative '../../lib/factbase/fact'
-
-# Fact test.
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024-2025 Yegor Bugayenko
-# License:: MIT
-class TestFact < Factbase::Test
-  def test_injects_data_correctly
-    map = {}
-    f = Factbase::Fact.new(map)
-    f.foo_bar = 1
-    f.bar = 2
-    f.bar = 3
-    assert_equal(2, map.size)
-    assert_equal([1], map['foo_bar'])
-    assert_equal([2, 3], map['bar'])
-  end
-
-  def test_simple_resetting
-    map = {}
-    f = Factbase::Fact.new(map)
-    f.foo = 42
-    assert_equal(42, f.foo, f.to_s)
-    f.foo = 256
-    assert_equal(42, f.foo, f.to_s)
-    assert_equal([42, 256], f['foo'], f.to_s)
-  end
-
-  def test_keeps_values_unique
-    map = {}
-    f = Factbase::Fact.new(map)
-    f.foo = 42
-    f.foo = 'Hello'
-    assert_equal(2, map['foo'].size)
-    f.foo = 42
-    assert_equal(2, map['foo'].size)
-  end
-
-  def test_fails_when_empty
-    f = Factbase::Fact.new({})
-    assert_raises(StandardError) do
-      f.something
-    end
-  end
-
-  def test_fails_when_setting_nil
-    f = Factbase::Fact.new({})
-    assert_raises(StandardError) do
-      f.foo = nil
-    end
-  end
-
-  def test_fails_when_setting_empty
-    f = Factbase::Fact.new({})
-    assert_raises(StandardError) do
-      f.foo = ''
-    end
-  end
-
-  def test_fails_when_not_found
-    f = Factbase::Fact.new({})
-    f.first = 42
-    assert_raises(StandardError) do
-      f.second
-    end
-  end
-
-  def test_set_by_name
-    f = Factbase::Fact.new({})
-    f.send(:_foo_bar=, 42)
-    assert_equal(42, f._foo_bar, f.to_s)
-  end
-
-  def test_set_twice_same_value
-    map = {}
-    f = Factbase::Fact.new(map)
-    f.foo = 42
-    f.foo = 42
-    assert_equal([42], map['foo'])
-  end
-
-  def test_time_in_utc
-    f = Factbase::Fact.new({})
-    t = Time.now
-    f.foo = t
-    assert_equal(t.utc, f.foo)
-    assert_equal(t.utc.to_s, f.foo.to_s)
-  end
-
-  def test_some_names_are_prohibited
-    f = Factbase::Fact.new({})
-    assert_raises(StandardError) { f.to_s = 42 }
-    assert_raises(StandardError) { f.class = 42 }
-  end
-
-  def test_get_all_properties
-    f = Factbase::Fact.new({})
-    f.foo = 42
-    assert_includes(f.all_properties, 'foo')
-  end
-end

data/test/factbase/test_fact_as_yaml.rb

@@ -1,77 +0,0 @@
-# frozen_string_literal: true
-
-# SPDX-FileCopyrightText: Copyright (c) 2024-2025 Yegor Bugayenko
-# SPDX-License-Identifier: MIT
-
-require 'yaml'
-require_relative '../../lib/factbase'
-require_relative '../../lib/factbase/fact_as_yaml'
-require_relative '../test__helper'
-
-# Test.
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024-2025 Yegor Bugayenko
-# License:: MIT
-class TestFactAsYaml < Factbase::Test
-  def test_prints_exactly
-    fb = Factbase.new
-    f = fb.insert
-    f._id = 1
-    f.foo = 42
-    f.foo = 33
-    f.bar = 'hello, world! how are you?'
-    assert_equal(
-      "_id: [1]\n" \
-      "bar: [\"hello, world! how are you?\"]\n" \
-      'foo: [42, 33]',
-      Factbase::FactAsYaml.new(f).to_s
-    )
-  end
-
-  def test_simple_rendering
-    fb = Factbase.new
-    f = fb.insert
-    f._id = 1
-    f.foo = 42
-    f.bar = 'hello'
-    yaml_str = Factbase::FactAsYaml.new(f).to_s
-    yaml = YAML.load(yaml_str)
-    assert_equal(1, yaml['_id'][0])
-    assert_equal('hello', yaml['bar'][0])
-    assert_equal(42, yaml['foo'][0])
-  end
-
-  def test_multiple_values
-    fb = Factbase.new
-    f = fb.insert
-    f.foo = 42
-    f.foo = 256
-    f.foo = 512
-    yaml_str = Factbase::FactAsYaml.new(f).to_s
-    yaml = YAML.load(yaml_str)
-    assert_equal([42, 256, 512], yaml['foo'])
-  end
-
-  def test_sorted_keys
-    fb = Factbase.new
-    f = fb.insert
-    f.c = 3
-    f.a = 1
-    f.b = 2
-    yaml_str = Factbase::FactAsYaml.new(f).to_s
-    assert_operator(yaml_str.index('a:'), :<, yaml_str.index('b:'))
-    assert_operator(yaml_str.index('b:'), :<, yaml_str.index('c:'))
-  end
-
-  def test_usage_example_from_issue
-    fb = Factbase.new
-    f = fb.insert
-    f._id = 1
-    f.name = 'test'
-    f = fb.query('(eq _id 1)').each.to_a.first
-    yaml_str = Factbase::FactAsYaml.new(f).to_s
-    assert(yaml_str)
-    assert_includes(yaml_str, '_id')
-    assert_includes(yaml_str, 'name')
-  end
-end

data/test/factbase/test_flatten.rb

@@ -1,28 +0,0 @@
-# frozen_string_literal: true
-
-# SPDX-FileCopyrightText: Copyright (c) 2024-2025 Yegor Bugayenko
-# SPDX-License-Identifier: MIT
-
-require_relative '../test__helper'
-require_relative '../../lib/factbase'
-require_relative '../../lib/factbase/flatten'
-
-# Test.
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024-2025 Yegor Bugayenko
-# License:: MIT
-class TestFlatten < Factbase::Test
-  def test_mapping
-    maps = [{ 'b' => [42], 'i' => 1 }, { 'a' => 33, 'i' => 0 }, { 'c' => %w[hey you], 'i' => 2 }]
-    to = Factbase::Flatten.new(maps, 'i').it
-    assert_equal(33, to[0]['a'])
-    assert_equal(42, to[1]['b'])
-    assert_equal(2, to[2]['c'].size)
-  end
-
-  def test_without_sorter
-    maps = [{ 'b' => [42], 'i' => [44] }, { 'a' => 33 }]
-    to = Factbase::Flatten.new(maps, 'i').it
-    assert_equal(33, to[0]['a'])
-  end
-end

data/test/factbase/test_impatient.rb

@@ -1,176 +0,0 @@
-# frozen_string_literal: true
-
-# SPDX-FileCopyrightText: Copyright (c) 2024-2025 Yegor Bugayenko
-# SPDX-License-Identifier: MIT
-
-require_relative '../test__helper'
-require_relative '../../lib/factbase'
-require_relative '../../lib/factbase/query'
-require_relative '../../lib/factbase/impatient'
-
-# Test.
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024-2025 Yegor Bugayenko
-# License:: MIT
-class TestImpatient < Factbase::Test
-  class SlowFactbase < Factbase
-    class SlowQuery < Factbase::Query
-      def one(fb = @fb, params = {})
-        sleep 0.2
-        super
-      end
-    end
-
-    def query(term, maps = nil)
-      maps ||= @maps
-      term = to_term(term) if term.is_a?(String)
-      SlowQuery.new(maps, term, self)
-    end
-  end
-
-  class SlowDeleteFactbase < Factbase
-    class SlowQuery < Factbase::Query
-      def delete!(fb = @fb)
-        sleep 0.2
-        super
-      end
-    end
-
-    def query(term, maps = nil)
-      maps ||= @maps
-      term = to_term(term) if term.is_a?(String)
-      SlowQuery.new(maps, term, self)
-    end
-  end
-
-  class SlowEnoughFactbase < Factbase
-    class SlowQuery < Factbase::Query
-      def one(fb = @fb, params = {})
-        sleep 1.5
-        super
-      end
-    end
-
-    def query(term, maps = nil)
-      maps ||= @maps
-      term = to_term(term) if term.is_a?(String)
-      SlowQuery.new(maps, term, self)
-    end
-  end
-
-  def test_simple_query
-    fb = Factbase::Impatient.new(Factbase.new)
-    fb.insert
-    fb.insert.bar = 3
-    found = 0
-    fb.query('(exists bar)').each do |f|
-      assert_predicate(f.bar, :positive?)
-      f.foo = 42
-      assert_equal(42, f.foo)
-      found += 1
-    end
-    assert_equal(1, found)
-    assert_equal(2, fb.size)
-  end
-
-  def test_query_one
-    fb = Factbase::Impatient.new(Factbase.new)
-    fb.insert
-    fb.insert.bar = 42
-    assert_equal(1, fb.query('(agg (exists bar) (count))').one)
-    assert_equal([42], fb.query('(agg (exists bar) (first bar))').one)
-  end
-
-  def test_query_one_timeout
-    slow = SlowFactbase.new
-    10_000.times do
-      slow.insert.value = rand(1000)
-    end
-    fb = Factbase::Impatient.new(slow, timeout: 0.01)
-    ex =
-      assert_raises(StandardError) do
-        fb.query('(agg (min value))').one
-      end
-    assert_includes(ex.message, 'timed out after')
-  end
-
-  def test_delete_timeout
-    slow = SlowDeleteFactbase.new
-    1000.times do |i|
-      slow.insert.value = i
-    end
-    fb = Factbase::Impatient.new(slow, timeout: 0.01)
-    ex =
-      assert_raises(StandardError) do
-        fb.query('(gt value 500)').delete!
-      end
-    assert_includes(ex.message, 'timed out after')
-  end
-
-  def test_with_txn
-    fb = Factbase::Impatient.new(Factbase.new)
-    assert(
-      fb.txn do |fbt|
-        fbt.insert.foo = 42
-      end
-    )
-    assert_equal(1, fb.size)
-  end
-
-  def test_returns_int
-    fb = Factbase.new
-    fb.insert
-    fb.insert
-    assert_equal(2, Factbase::Impatient.new(fb).query('(always)').each(&:to_s))
-  end
-
-  def test_returns_int_when_empty
-    fb = Factbase.new
-    assert_equal(0, Factbase::Impatient.new(fb).query('(always)').each(&:to_s))
-  end
-
-  def test_returns_to_s_correctly
-    fb = Factbase.new
-    q = '(always)'
-    assert_equal(q, fb.query(q).to_s)
-  end
-
-  def test_enumerator_support
-    fb = Factbase::Impatient.new(Factbase.new)
-    assert_equal(0, fb.query('(always)').each.to_a.size)
-    fb.insert
-    assert_equal(1, fb.query('(always)').each.to_a.size)
-  end
-
-  def test_query_completes_before_timeout
-    fb = Factbase::Impatient.new(Factbase.new, timeout: 1)
-    100.times do |i|
-      fb.insert.index = i
-    end
-    count = 0
-    fb.query('(always)').each do |f|
-      count += 1
-      assert_equal(count - 1, f.index)
-    end
-    assert_equal(100, count)
-  end
-
-  def test_custom_timeout
-    slow = SlowEnoughFactbase.new
-    slow.insert.value = 42
-    fb = Factbase::Impatient.new(slow, timeout: 2)
-    start = Time.now
-    result = fb.query('(agg (eq value 42) (first value))').one
-    elapsed = Time.now - start
-    assert_operator(elapsed, :>=, 1.5)
-    assert_equal([42], result)
-  end
-
-  def test_nil_factbase_raises
-    ex =
-      assert_raises(StandardError) do
-        Factbase::Impatient.new(nil)
-      end
-    assert_equal('The "fb" is nil', ex.message)
-  end
-end

data/test/factbase/test_inv.rb

@@ -1,44 +0,0 @@
-# frozen_string_literal: true
-
-# SPDX-FileCopyrightText: Copyright (c) 2024-2025 Yegor Bugayenko
-# SPDX-License-Identifier: MIT
-
-require_relative '../test__helper'
-require 'loog'
-require_relative '../../lib/factbase'
-require_relative '../../lib/factbase/inv'
-require_relative '../../lib/factbase/pre'
-
-# Test.
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024-2025 Yegor Bugayenko
-# License:: MIT
-class TestInv < Factbase::Test
-  def test_simple_checking
-    fb =
-      Factbase::Inv.new(Factbase.new) do |p, v|
-        raise 'oops' if v.is_a?(String) && p == 'b'
-      end
-    f = fb.insert
-    f.a = 42
-    assert_raises(StandardError) do
-      f.b = 'here we should crash'
-    end
-    f.c = 256
-    assert_equal(42, f.a)
-    assert_equal(1, fb.query('(always)').each.to_a.size)
-  end
-
-  def test_pre_and_inv
-    fb =
-      Factbase::Inv.new(Factbase.new) do |p, v|
-        raise 'oops' if v.is_a?(String) && p == 'b'
-      end
-    fb =
-      Factbase::Pre.new(fb) do |f|
-        f.id = 42
-      end
-    f = fb.insert
-    assert_equal(42, f.id)
-  end
-end

data/test/factbase/test_logged.rb

@@ -1,155 +0,0 @@
-# frozen_string_literal: true
-
-# SPDX-FileCopyrightText: Copyright (c) 2024-2025 Yegor Bugayenko
-# SPDX-License-Identifier: MIT
-
-require_relative '../test__helper'
-require 'loog'
-require_relative '../../lib/factbase'
-require_relative '../../lib/factbase/logged'
-require_relative '../../lib/factbase/cached/cached_factbase'
-
-# Test.
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024-2025 Yegor Bugayenko
-# License:: MIT
-class TestLogged < Factbase::Test
-  def test_simple_setting
-    fb = Factbase::Logged.new(Factbase.new, Loog::NULL)
-    fb.insert
-    fb.insert.bar = 3
-    found = 0
-    fb.query('(exists bar)').each do |f|
-      assert_predicate(f.bar, :positive?)
-      f.foo = 42
-      assert_equal(42, f.foo)
-      found += 1
-    end
-    assert_equal(1, found)
-    assert_equal(2, fb.size)
-  end
-
-  def test_reading_one
-    fb = Factbase::Logged.new(Factbase.new, Loog::NULL)
-    fb.insert
-    fb.insert.bar = 42
-    assert_equal(1, fb.query('(agg (exists bar) (count))').one)
-    assert_equal([42], fb.query('(agg (exists bar) (first bar))').one)
-  end
-
-  def test_avoid_inner_logging
-    buf = Loog::Buffer.new
-    fb = Factbase.new
-    fb.insert
-    fb.insert.bar = 42
-    fb = Factbase::Logged.new(Factbase::CachedFactbase.new(fb), buf)
-    fb.query('(agg (exists bar) (count))').one
-    fb.query('(join "foo<=bar" (exists bar))').each.to_a
-    refute_includes(buf.to_s, '\'(count)\'')
-    refute_includes(buf.to_s, '\'(exists bar)\'')
-  end
-
-  def test_with_txn
-    log = Loog::Buffer.new
-    fb = Factbase::Logged.new(Factbase.new, log)
-    assert(
-      fb.txn do |fbt|
-        fbt.insert.foo = 42
-      end
-    )
-    assert_equal(1, fb.size)
-    assert_includes(log.to_s, 'touched', log)
-  end
-
-  def test_with_slow_txn
-    log = Loog::Buffer.new
-    fb = Factbase::Logged.new(Factbase.new, log, time_tolerate: 0.1)
-    fb.txn { sleep 0.4 }
-    assert_includes(log.to_s, '(slow!)', log)
-  end
-
-  def test_with_txn_rollback
-    log = Loog::Buffer.new
-    fb = Factbase::Logged.new(Factbase.new, log)
-    assert_equal(0, fb.txn { raise Factbase::Rollback })
-    assert_equal(0, fb.size)
-    assert_includes(log.to_s, 'rolled back', log)
-    refute_includes(log.to_s, 'didn\'t touch', log)
-  end
-
-  def test_with_modifying_txn
-    log = Loog::Buffer.new
-    fb = Factbase::Logged.new(Factbase.new, log)
-    fb.insert.foo = 1
-    assert_equal(0, fb.txn { |fbt| fbt.query('(always)').each.to_a }.to_i, log)
-    assert_equal(1, fb.txn { |fbt| fbt.query('(always)').each.to_a[0].foo = 42 }.to_i)
-    assert_includes(log.to_s, 'touched', log)
-  end
-
-  def test_with_empty_txn
-    log = Loog::Buffer.new
-    fb = Factbase::Logged.new(Factbase.new, log)
-    assert_equal(0, fb.txn { |fbt| fbt.query('(always)').each.to_a }.to_i)
-    assert_includes(log.to_s, 'touched', log)
-  end
-
-  def test_returns_int
-    fb = Factbase.new
-    fb.insert
-    fb.insert
-    assert_equal(2, Factbase::Logged.new(fb, Loog::NULL).query('(always)').each(&:to_s))
-  end
-
-  def test_returns_int_when_empty
-    fb = Factbase.new
-    assert_equal(0, Factbase::Logged.new(fb, Loog::NULL).query('(always)').each(&:to_s))
-  end
-
-  def test_returns_to_s_correctly
-    fb = Factbase.new
-    q = '(always)'
-    assert_equal(q, fb.query(q).to_s)
-  end
-
-  def test_logs_when_enumerator
-    fb = Factbase::Logged.new(Factbase.new, Loog::NULL)
-    assert_equal(0, fb.query('(always)').each.to_a.size)
-    fb.insert
-    assert_equal(1, fb.query('(always)').each.to_a.size)
-  end
-
-  def test_proper_logging
-    log = Loog::Buffer.new
-    fb = Factbase::Logged.new(Factbase.new, log)
-    fb.insert
-    fb.insert.bar = 3
-    fb.insert
-    fb.insert.str =
-      "Он поскорей звонит. Вбегает
-      К нему слуга француз Гильо,
-      Халат и туфли предлагает
-      И подает ему белье.
-      Спешит Онегин одеваться,
-      Слуге велит приготовляться
-      С ним вместе ехать и с собой
-      Взять также ящик боевой.
-      Готовы санки беговые.
-      Он сел, на мельницу летит.
-      Примчались. Он слуге велит
-      Лепажа стволы роковые
-      Нести за ним, а лошадям
-      Отъехать в поле к двум дубкам."
-    fb.query('(exists bar)').each(&:to_s)
-    fb.query('(not (exists bar))').delete!
-    [
-      'Inserted new fact #1',
-      'Inserted new fact #2',
-      'Set \'bar\' to 3 (Integer)',
-      'Set \'str\' to "Он поскорей звонит. Вбегает\n   ... Отъехать в поле к двум дубкам." (String)',
-      'Found 1/4 fact(s) by \'(exists bar)\'',
-      'Deleted 3 fact(s) out of 4 by \'(not (exists bar))\''
-    ].each do |s|
-      assert_includes(log.to_s, s, "#{log}\n")
-    end
-  end
-end