player/mruby/observable.mrb


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
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73

# inspired by toy-rx: https://github.com/staltz/toy-rx
class Subscriber
  attr_writer :subscription

  def initialize(observer)
    @observer = observer
  end

  def next(value)
    @observer.next(value)
  end

  def error(error)
    @observer.error(error)
  end

  def complete
    @observer.complete
  end

  def unsubscribe
    @subscription.unsubscribe unless @subscription.nil?
  end
end

class Observable
  def initialize(&subscribe)
    @subscribe = subscribe
  end

  def self.create(&subscribe)
    fail ArgumentError, "`create` needs a subscribe block" unless block_given?
    new do |observer|
      subscriber = Subscriber.new(observer)
      subscription = subscribe.call(subscriber);
      subscriber.subscription = subscription
      subscription
    end
  end

  # XXX probably nicer to define operators in another file
  def map(&tx)
    inobservable = self
    Observable.create do |out|
      observer = {
        next: -> (x) {
          begin
            out.next(tx.call(x))
          rescue => e
            out.error(e)
          end
        },
        error: -> (e) { out.error(e) },
        complete: -> (e) { out.complete },
      };
      inobservable.subscribe(observer)
    end
  end

  def subscribe(callbacks = {}, &nextcb)
    callbacks[:next] = nextcb if block_given?
    noop = -> () {}

    klass = Class.new do
      define_method(:next,     callbacks.fetch(:next, noop))
      define_method(:error,    callbacks.fetch(:error, noop))
      define_method(:complete, callbacks.fetch(:complete, noop))
    end

    observer = klass.new
    @subscribe.call(observer)
  end
end