1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
|
# -*- coding: utf-8 -*-
require_relative 'error'
require_relative 'struct'
Plugin.create(:spell) do
defevent :search_spell, prototype: [Pluggaloid::COLLECT, Symbol, [Diva::Model], Hash]
defdsl :defspell do |spell_name, *constraint, condition: nil, &block|
beh = Plugin::Spell::Spell.new(spell_name.to_sym,
Set.new(constraint).freeze,
condition,
block)
if !respond_to?(spell_name)
defdsl spell_name do |*models|
spell(spell_name, *models)
end
defdsl :"#{spell_name}?" do |*models|
spell?(spell_name, *models)
end
end
filter_search_spell do |yielder, name, models, optional|
yielder << beh if beh.name == name.to_sym && beh.match(models, optional)
[yielder, name, models, optional]
end
end
defdsl :spell do |name, *models|
optional = {}.freeze
models = models.compact
*models, optional = models unless models.last.is_a?(Diva::Model)
Delayer::Deferred.new.next {
Plugin.collect(:search_spell, name.to_sym, models, optional).first
}.next do |spell|
raise Plugin::Spell::SpellNotFoundError, "Spell `#{name}' (#{models.map(&:class).join(', ')}) does not exists." unless spell
spell.call(models, optional)
end
end
defdsl :spell? do |name, *models|
optional = {}.freeze
models = models.compact
*models, optional = models unless models.last.is_a?(Diva::Model)
!Plugin.collect(:search_spell, name.to_sym, models, optional).first(1).empty?
end
end
|
