bull 0.0.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: cf058fa3501715d4c28484775065f2b5e1e86081
+  data.tar.gz: 50cf31a2465eb99efdea0d460764cf650c8cdea9
+SHA512:
+  metadata.gz: 28e18b4f37962a35f3dcbcdb0792f13d1bdc5bac5ad3a9dbd3a583fbfe29b58207c1eab08c5545e07b7a08531bfa358199d74055132bd85129497fba63735a22
+  data.tar.gz: 7a4d66026d3fcff177a9f44ba5502442c2dfe435a08e6fab06309222fd4d30a275c2934381ba3aa80edf805dcd5420febfb663d064547c59211066a79c1e1699

data/bin/bull

@@ -0,0 +1,8 @@
+#!/usr/bin/env ruby
+
+dest = File.join(File.expand_path ARGV[1], ARGV[0])
+origin = File.join(File.expand_path(File.dirname(__FILE__)), '..', 'template')
+
+`cp -r #{origin} #{dest}`
+
+

data/lib/bull/client.rb

@@ -0,0 +1,280 @@
+#require 'opal'
+require 'browser'
+require 'browser/socket'
+require 'browser/delay'
+require 'promise'
+require 'json'
+require 'time'
+require 'bull/encode_times'
+require 'bull/reactive_var'
+require 'bull/notification'
+require 'bull/mrelogin'
+
+class BullClientController
+
+    include MNotification
+    #include MRelogin
+
+    attr_accessor :app_rendered
+    attr_accessor :ws
+    attr_reader :connection
+
+    @@ticket = 0
+
+    def initialize
+        @user_id = nil
+        @password = nil
+        @watch = {}
+        @promises = {}
+        @ws = nil
+        @app_rendered = false
+        @files = {}
+
+        @connection = RVar.new 'disconnected'
+        reactive(@connection) do
+            if @connection.value == 'disconnected'
+                notify_error 'disconnected', 1
+            else
+                notify_ok 'connected', 1
+            end
+        end
+    end
+
+    def watch(name, *args, &block)
+        id = get_ticket
+        @watch[id] = {who: block, name: name, args: args}
+        send('watch_' + name, id, *args)
+        id
+    end
+
+    def task(name, *args)
+        send 'task_' + name, -1, *args
+    end
+
+    def get_watch
+        @watch
+    end
+
+    def stop_watch(id)
+        @watch.delete(id)
+        send('stop_watch', id)
+    end
+
+    def rpc(command, *args)
+        id = get_ticket
+        promise = Promise.new
+        send 'rpc_'+command, id, *args
+        @promises[id] = promise
+        promise
+    end
+
+    def file(command, *args)
+        id = get_ticket
+        promise = Promise.new
+        send 'file_'+command, id, *args
+        @promises[id] = promise
+        @files[id] = ""
+        promise
+    end
+
+    def insert(table, hsh)
+        prom = rpc('insert', table, value: hsh).then do |response|
+            if response.nil?
+                #$notifications.add ['error', 'data not inserted', 0] if $notifications
+                notify_error 'data not inserted', 0
+            else
+                #$notifications.add ['ok', 'data inserted', 0] if $notifications
+              notify_ok 'data inserted', 0
+            end
+            response
+        end
+        prom
+    end
+
+    def update(table, id, hsh)
+        prom = rpc('update', table, id, value: hsh).then do |count|
+            if count == 0
+                #$notifications.add ['error', 'data not updated', 0] if $notifications
+                notify_error 'data not updated', 0
+            elsif count == 1
+                #$notifications.add ['ok', 'data updated', 0] if $notifications
+                notify_ok 'data updated', 0
+            end
+            count
+        end
+        prom
+    end
+
+    def delete(table, id)
+        #prom = rpc('delete', table, id).then do |count|
+        rpc('delete', table, id).then do |count|
+            if count == 0
+                #$notifications.add ['error', 'data not deleted', 0] if $notifications
+                notify_error 'data not deleted', 0
+            elsif count == 1
+                #$notifications.add ['ok', 'data deleted', 0] if $notifications
+                notify_ok 'data deleted', 0
+            end
+            #count
+        end
+        #prom
+    end
+
+    def login user, password
+        rpc('login', user, password).then do |response|
+            if response
+                @user_id = user
+                @password = password
+                @roles = response
+                notify_ok 'logged', 0
+            else
+                notify_error 'incorrect user or password', 0
+            end
+            response
+        end
+    end
+
+    def rewatch
+        @watch.each do |id, value|
+            send 'watch_' + value[:name], id, *value[:args]
+        end
+    end
+
+    def relogin #password
+        login(@user_id, @password).then do |response|
+            if response
+                #show_relogin false
+                notify_ok 'relogged', 0
+                rewatch
+            else
+                notify_error 'password incorrect', 0
+            end
+        end
+    end
+
+    def logout
+        rpc('logout')
+        clear
+    end
+
+    def notify msg
+      begin
+        msg = JSON.parse(msg)
+        data = msg['data'] || msg['result']
+        if data.instance_of?(String) && msg['times'] && msg['times'][0] == 'result'
+            data = Time.parse data
+        else
+            resolve_times data, msg['times']
+        end
+        if msg['response'] == 'watch'
+            handle_watch_data msg['id'], data
+        elsif msg['response'] == 'rpc'
+            handle_rpc_result msg['id'], data
+        elsif msg['response'] == 'file'
+            handle_file_data msg['id'], data, msg['end']
+        end
+      rescue Exception => e
+          #print e.message
+          #print e.backtrace.inspect
+      end
+    end
+
+    def start(app)
+        begin
+            controller = self
+            url = 'wss://' + `document.location.hostname` + ':3000'
+            @ws = Browser::Socket.new url do
+                on :open do |e|
+                    controller.connection.value = 'connected'
+                    if !controller.app_rendered
+                        $document.ready do
+                          React.render(React.create_element(app), `document.getElementById('container')`)
+                          controller.app_rendered = true
+                        end
+                    else
+                        if @user_id
+                            #controller.show_relogin true
+                            controller.relogin
+                        else
+                            controller.rewatch
+                        end
+                    end
+                end
+                on :message do |e|
+                    begin
+                        controller.notify e.data
+                    rescue Exception => e
+                        #print e.message
+                        #print e.backtrace.inspect
+                    end
+                end
+                on :close do |e|
+                    #print e.message
+                    #print e.backtrace.inspect
+                    controller.connection.value = 'disconnected'
+                    $window.after(5) {controller.reset}
+
+                end
+            end            
+        rescue Exception => e  
+            #print e.message
+            #print e.backtrace.inspect
+            $window.after(5) {reset}
+        end
+    end
+
+    private
+
+        def get_ticket
+            id = @@ticket
+            @@ticket += 1
+            id
+        end
+
+        def send(command, id, *args, **kwargs)
+            times = encode_times(kwargs)
+            msg = {command: command, id: id, args: args, kwargs: kwargs, times: times}.to_json
+            @ws.send(msg)
+        end
+
+        def handle_watch_data(id, data)
+            w = @watch[id]
+            if w
+                w[:who].call data
+            end
+        end
+
+        def handle_rpc_result(id, result)
+            @promises[id].resolve result
+            @promises.delete id
+        end
+
+        def handle_file_data(id, data, end_)
+            @files[id] << data
+            if end_
+                @promises[id].resolve @files[id]
+                @promises.delete id
+                @files.delete id
+            end
+        end
+
+        def clear
+            @watch.each_value do |value|
+                value[:who].call nil
+            end
+            @promises = {}
+            @user_id = nil
+            @password = nil
+            @watch = {} ###
+        end
+
+        def reset
+            #clear
+            @watch.each_value do |value|
+                value[:who].call nil
+            end
+            @promises = {}
+            #@watch = {}
+            start nil
+        end
+end

data/lib/bull/encode_times.rb

@@ -0,0 +1,35 @@
+require 'time'
+
+def resolve_times doc, keys
+  keys.each do |k|
+    d = doc
+    ks = k.split('.')
+    attr = ks.shift.to_sym
+    while ks != []
+      if d.is_a? Array
+        d = d[attr.to_i]
+      else
+        d = d[attr]
+      end
+      attr = ks.shift.to_sym
+    end
+    begin
+        i = Integer(attr.to_s)
+        d[i] = Time.parse d[i]
+    rescue
+        d[attr] = Time.parse d[attr]
+    end
+  end
+end
+
+def encode_times doc, base=''
+  ret = []
+  if doc.is_a? Array
+    doc.each_with_index { |v, i| ret << encode_times(v, base + '.' + i.to_s)}
+  elsif doc.is_a? Hash
+    doc.each_pair {|k, v| ret << encode_times(v, base + '.' + k.to_s)}
+  elsif doc.is_a? Time
+    return base[1..-1]
+  end
+  ret.flatten
+end

data/lib/bull/mrelogin.rb

@@ -0,0 +1,8 @@
+module MRelogin
+  def self.panel= panel
+    @panel = panel
+  end
+  def show_relogin val
+    @panel.show val
+  end
+end

data/lib/bull/mreport.rb

@@ -0,0 +1,26 @@
+require 'liquid'
+
+module MReport
+  def reports
+    MReport.reports
+  end
+
+  def self.load_reports path
+    @reports = {}
+    #Dir.glob(File.join('..', '..', '**', 'reports' , '*.html')).each do |file|
+    Dir.glob(File.join(path, '**', 'reports' , '*.html')).each do |file|
+      puts "load file #{file}"
+      html = File.read(file)
+      @reports[File.basename(file, '.html')] = Liquid::Template.parse(html)
+    end
+    puts 'reports loaded'
+    @reports
+  end
+
+  def self.reports
+    return @reports #if !@reports.nil?
+    #load_reports
+  end
+end
+
+#MReport.load_reports

data/lib/bull/notification.rb

@@ -0,0 +1,87 @@
+require 'reactive-ruby'
+
+module MNotification
+  def notifications
+    MNotification.notifications
+  end
+
+  def self.notification_controller= controller
+    @notifications = controller
+  end
+
+  def self.notifications
+    @notifications
+  end
+
+  def notify_ok msg, level=10
+    puts msg
+    notifications.add ['ok', msg, level] if !notifications.nil?
+  end
+
+  def notify_error msg, level=10
+    puts msg
+    notifications.add ['error', msg, level] if !notifications.nil?
+  end
+
+  def notify_info msg, level=10
+    puts msg
+    notifications.add ['info', msg, level] if !notifications.nil?
+  end
+end
+
+class NotificationController
+  @@ticket = 0
+
+  def initialize panel, level
+    @panel = panel
+    @level = level
+  end
+
+  def add msg
+    return if msg[-1] < @level
+    id = @@ticket
+    @@ticket += 1
+    @panel.append id, ['animated fadeIn'] + msg
+    $window.after(4) do
+      @panel.update id, ['animated fadeOut'] + msg
+    end
+    $window.after(5) do
+      @panel.delete id
+    end
+  end
+end
+
+class Notification < React::Component::Base
+  param :level
+
+  before_mount do
+    state.notifications! Hash.new
+    MNotification.notification_controller = NotificationController.new self, params.level
+  end
+
+  def append id, row
+    aux = state.notifications
+    aux[id] = row
+    state.notifications! aux
+  end
+
+  def update id, row
+    aux = state.notifications
+    aux[id] = row
+    state.notifications! aux
+  end
+
+  def delete id
+    aux = state.notifications
+    aux.delete id
+    state.notifications! aux
+  end
+
+  def render
+    div(style: {position: 'absolute'}) do
+      state.notifications.each_pair do |k, (animation, code, v, level)|
+        div(key: k, class: animation + ' notification ' + code){v}
+      end
+    end
+  end
+end