bigbertha 0.0.1

data/examples/b.rb

@@ -0,0 +1,5 @@
+require 'bigbertha'
+
+ref = Bigbertha::Load.new( ENV['fb_url'] )
+ref.remove
+ref.set( %w(Hello World) )

data/examples/c.rb

@@ -0,0 +1,6 @@
+require 'bigbertha'
+
+ref = Bigbertha::Load.new( ENV['fb_url'] )
+ref.remove
+ref.push( "Bumblebee" )
+ref.push( "Tuna" )

data/examples/d.rb

@@ -0,0 +1,15 @@
+require 'bigbertha'
+
+ref = Bigbertha::Load.new( ENV['fb_url'] )
+ref.remove
+data = {
+  a: {
+    a_1: %s(Hello World),    
+    a_2: 10.5    
+  },
+  b: {
+    b_1: 10,
+    b_2: true
+  }
+}
+ref.set( data )

data/examples/e.rb

@@ -0,0 +1,21 @@
+require 'bigbertha'
+
+ref = Bigbertha::Load.new( ENV['fb_url'] )
+ref.remove
+data = {
+  a: {
+    a_1: %s(Hello World),    
+    a_2: {
+      a_2_1: 10.5,
+      a_2_2: "Word!"
+    }   
+  },
+  b: {
+    b_1: 10,
+    b_2: true
+  }
+}
+ref.set( data )
+ref.child( :a ).update( a_1:"BumbleBee Tuna" )
+ref.child( 'a/a_2' ).update( a_2_2:"You bet!" )
+ref.child( 'a/a_3' ).update( a_3_1:"You bet!" )

data/examples/f.rb

@@ -0,0 +1,20 @@
+require 'bigbertha'
+
+ref = Bigbertha::Load.new( ENV['fb_url'] )
+ref.remove
+data = {
+  a: {
+    a_1: %s(Hello World),    
+    a_2: {
+      a_2_1: 10.5,
+      a_2_2: "Word!"
+    }   
+  },
+  b: {
+    b_1: 10,
+    b_2: true
+  }
+}
+ref.set( data )
+ref.child( 'a/a_2/a_2_2' ).remove
+ref.child( :b ).remove

data/examples/g.rb

@@ -0,0 +1,20 @@
+require 'bigbertha'
+
+ref = Bigbertha::Load.new( ENV['fb_url'] )
+ref.remove
+data = {
+  a: {
+    a_1: %s(Hello World),    
+    a_2: {
+      a_2_1: 10.5,
+      a_2_2: "Word!"
+    }   
+  },
+  b: {
+    b_1: 10,
+    b_2: true
+  }
+}
+ref.set( data )
+ref.child( 'a/a_2/a_2_2' ).read
+ref.child( :b ).remove

data/examples/h.rb

@@ -0,0 +1,22 @@
+require 'bigbertha'
+
+ref = Bigbertha::Load.new( ENV['fb_url'] )
+ref.remove
+data = {
+  a: {
+    a_1: %s(Hello World),    
+    a_2: 10.5    
+  },
+  b: {
+    b_1: 10,
+    b_2: true
+  }
+}
+ref.set( data )
+a_2_ref = ref.child( 'a/a_2' )
+puts "A_2", a_2_ref.read
+
+val = ref.child( :a ).read
+puts val.class
+puts "A_1", val.a_1, val[:a_1]
+puts "A_2", val.a_2, val[:a_2]

data/examples/i.rb

@@ -0,0 +1,26 @@
+require 'bigbertha'
+
+ref = Bigbertha::Load.new( ENV['fb_url'] )
+ref.remove
+data = {
+  a: {
+    a_1: %s(Hello World),    
+    a_2: {
+      a_2_1: 10.5,
+      a_2_2: "Word!"
+    }   
+  },
+  b: {
+    b_1: 10,
+    b_2: true
+  }
+}
+ref.set( data )
+a_2_2_ref = ref.child( 'a/a_2/a_2_2' )
+a_2_ref   = a_2_2_ref.parent
+puts "A_2", a_2_ref.name, a_2_ref.read.inspect
+a_ref     = a_2_2_ref.parent.parent
+puts "A", a_ref.name, a_ref.read.inspect
+
+a_2_2_ref = ref.child( :a ).child( :a_2 ).child( :a_2_2 )
+puts "A_2", a_2_ref.name, a_2_ref.read.inspect

data/examples/j.rb

@@ -0,0 +1,10 @@
+require 'bigbertha'
+require 'yaml'
+
+ref = Bigbertha::Load.new( ENV['fb_url'] )
+ref.remove
+a_ref = ref.push( {a:1, b:2} )
+b_ref = ref.push( {c:1, d:2} )
+a_ref.set_priority( 20 )
+b_ref.set_priority( 10 ) 
+puts "A", a_ref.parent.read.to_yaml

data/lib/bigbertha.rb

@@ -0,0 +1,17 @@
+require 'json'
+require 'typhoeus'
+require 'map'
+
+module Bigbertha  
+  LIBPATH      = ::File.expand_path(::File.dirname(__FILE__)) + ::File::SEPARATOR
+  PATH         = ::File.dirname(LIBPATH) + ::File::SEPARATOR  
+  
+  def self.require_all_libs_relative_to( fname, dir = nil )
+    dir ||= ::File.basename(fname, '.*')
+    search_me = ::File.expand_path(
+        ::File.join(::File.dirname(fname), dir, '**', '*.rb'))
+    Dir.glob(search_me).sort.each { |rb| require rb }
+  end  
+end
+
+Bigbertha.require_all_libs_relative_to File.expand_path( "bigbertha", Bigbertha::LIBPATH )

data/lib/bigbertha/action.rb

@@ -0,0 +1,141 @@
+require 'bigbertha/faults'
+
+module Bigbertha
+  module Action    
+    include Bigbertha::Faults
+    
+    def read
+      location = json_url
+      resp = Typhoeus.get( location, gen_opts( params: {format: :export} ) )
+      res  = handle_response( resp, location )
+      res.is_a?(Map) ? Snapshot.new( res ).to_map : res.is_a?(String) ? res.to_val : res
+    end
+            
+    def set( data )
+      location = json_url
+      resp = Typhoeus.put( location, gen_opts( body: data.to_json ) )
+      handle_response( resp, location )
+    end
+
+    def update( data )
+      location = json_url
+      resp = Typhoeus.patch( location, gen_opts( body: data.to_json ) )
+      handle_response( resp, location )
+    end
+    
+    def inc( field )
+      map = read
+      current_val = map[field]
+      raise NonNumericFieldError, "The field #{field} does not have a numeric value" if current_val and !current_val.is_a? Numeric
+      if current_val
+        new_val = map[field] + 1        
+      else 
+        new_val = 0
+      end
+      update( field => new_val )
+    end
+    
+    def dec( field )
+      map = read
+      current_val = map[field]
+      raise NonNumericFieldError, "The field #{field} does not have a numeric value" if current_val and !current_val.is_a? Numeric
+      if current_val
+        new_val = map[field] - 1        
+      else
+        new_val = 0
+      end
+      update( field => new_val )
+    end
+        
+    def remove
+      location = json_url
+      resp = Typhoeus.delete( location, gen_opts )
+      unless resp.success?
+        raise InvalidRequestError, "<#{resp.return_code}> Unable to perform request #{location}"
+      end
+    end
+  
+    def push( data=nil )
+      location = json_url
+      opts     = {}      
+      if data
+        opts[:body] = data.to_json
+      else
+        opts[:body] = ''.to_json
+      end
+      resp = Typhoeus.post( location, gen_opts( opts ) )
+      res = handle_response( resp, location )
+      Bigbertha::Load.new( uri.to_s + '/' + res.name )
+    end
+  
+    def set_priority( priority )
+      location = json_url( true )
+      resp = Typhoeus.put( location, gen_opts( body: priority.to_json ) )
+      unless resp.success? or resp.body
+        raise InvalidRequestError, "<#{resp.return_code}> Unable to perform request #{location}"
+      end
+    end
+    
+    def get_priority
+      location = json_url( true )      
+      resp = Typhoeus.get( location, gen_opts( params: { format: :export} ) )
+      res = handle_response( resp, location )
+      res.to_i
+    rescue NoDataError
+      nil
+    end
+    
+    def get_rules
+      location = rules_url
+      resp     = Typhoeus.get( location, gen_opts )
+      handle_response( resp, location )       
+    end
+    
+    def set_rules( rules )
+      location = rules_url
+      resp     = Typhoeus.put( location, gen_opts( body: {:rules => rules}.to_json ) )
+      handle_response( resp, location )
+    end
+    
+
+    private
+   
+    def gen_opts( opts={} )
+      if @auth_token
+        opts[:params] ||= {}
+        opts[:params][:auth] = @auth_token 
+      end
+      opts
+    end
+          
+    def handle_response( resp, location )
+      if resp.response_code == 403
+        raise PermissionDeniedError, "No permission for #{location}"
+      end
+      unless resp.success?
+        raise InvalidRequestError, "<#{resp.return_code}> Unable to perform request #{location}"
+      end
+      if resp.body.empty? or resp.body == "null"
+        raise NoDataError, "No data found at location #{location}"
+      end
+      
+      results = JSON.parse( resp.body ) rescue nil
+      results ? (results.is_a?(Hash) ? Map( results ) : results ) : resp.body.gsub( /\"/, '' )        
+    end
+                
+    def json_url( priority=nil )
+      if @url =~ /\.json$/
+        loc = @url
+      elsif root?
+        loc = @url + "/.json"
+      else
+        loc = @url + ".json"
+      end
+      priority ? loc.gsub( /\.json$/, "/.priority/.json" ) : loc
+    end
+    
+    def rules_url
+      @uri.merge( '.settings/rules.json' ).to_s      
+    end    
+  end
+end

data/lib/bigbertha/core.rb

@@ -0,0 +1 @@
+Bigbertha.require_all_libs_relative_to File.expand_path( File.join( %w(bigbertha core_ext), Bigbertha::LIBPATH ) )

data/lib/bigbertha/core_ext/map.rb

@@ -0,0 +1,23 @@
+require 'values'
+
+class Map
+  Event = Value.new( :event_type, :ref )
+  def diff(other)
+    res = dup.
+      delete_if { |k, v| other[k] == v }.
+      merge!(other.dup.delete_if { |k, v| has_key?(k) })
+    events = []  
+    res.each_pair do |k,v|
+      if self[k]
+        if other[k]
+          events << Event.new( Bigbertha::Load.evt_value, k ) 
+        else
+          events << Event.new( Bigbertha::Load.evt_child_removed, k )
+        end
+      else
+        events << Event.new( Bigbertha::Load.evt_child_added, k )
+      end
+    end
+    events
+  end  
+end

data/lib/bigbertha/core_ext/string.rb

@@ -0,0 +1,15 @@
+class String
+  def to_val
+    if self =~ /\A[-+]?\d+$/
+      Integer( self )
+    elsif self =~ /\A[-+]?\d+\.\d+$/
+      Float( self )
+    elsif self =~ /false/
+      false
+    elsif self =~ /true/
+      true
+    else
+      self
+    end
+  end
+end

data/lib/bigbertha/faults.rb

@@ -0,0 +1,9 @@
+module Bigbertha
+  module Faults
+    class NoDataError           < RuntimeError; end
+    class InvalidRequestError   < RuntimeError; end
+    class InvalidJSONError      < RuntimeError; end
+    class PermissionDeniedError < RuntimeError; end
+    class NonNumericFieldError  < RuntimeError; end
+  end
+end

data/lib/bigbertha/load.rb

@@ -0,0 +1,22 @@
+require 'bigbertha/ref'
+
+module Bigbertha
+  class Load
+    include Bigbertha::Ref
+    include Bigbertha::Action
+    
+    attr_reader :url, :uri
+    
+    def self.evt_value;         :value;     end
+    def self.evt_child_added;   :add_child; end
+    def self.evt_child_changed; :mod_child; end
+    def self.evt_child_removed; :rm_child;  end
+    def self.evt_child_moved;   :mv_child;  end
+                
+    def initialize( url, auth_token=nil )
+      @url        = url
+      @uri        = URI.parse( @url )
+      @auth_token = auth_token
+    end                                
+  end
+end

data/lib/bigbertha/ref.rb

@@ -0,0 +1,64 @@
+require 'uri'
+
+module Bigbertha
+  module Ref      
+    def name
+      parse_path[-1]
+    end
+    
+    def val
+      read
+    end
+    
+    def root
+      return self if root?
+      Bigbertha::Load.new( @uri.scheme + '://' + @uri.host )            
+    end
+    
+    def root?
+      @uri.path.empty? or @uri.path == "/"
+    end
+  
+    def parent
+      return nil if root?
+      path = parse_path[0..-2].join( "/" )
+      Bigbertha::Load.new( root.uri.merge(path).to_s )
+    end
+    
+    def child( child_path )
+      Bigbertha::Load.new( "#{uri.to_s}/#{child_path}" )
+    end
+      
+    def child?( child_path )
+      child( child_path ).read
+      true
+    rescue
+      false
+    end
+  
+    def children?
+      data = read
+      data.is_a? Map and !data.empty?
+    end
+    
+    def num_children
+      data = read
+      if data.is_a? Map and !data.empty?
+        data.count
+      else
+        0
+      end
+    end
+      
+    def to_s
+      @url
+    end
+    
+        
+    private
+              
+    def parse_path
+      @uri.path.split( "/" )
+    end
+  end
+end