data_bindings 0.0.1

data/test/bson_test.rb

@@ -0,0 +1,23 @@
+require File.expand_path("../test_helper", __FILE__)
+
+describe "Data Bindings bson" do
+  describe "bson parsing" do
+    it "should parse bson" do
+      a = DataBindings.from_bson(BSON.serialize(:author => 'siggy', :title => 'bible')).bind { property :author; property :title }
+      assert a.valid?
+      assert_equal "siggy", a[:author]
+    end
+  end
+
+  describe "bson generation" do
+    it "should generate bson" do
+      a = DataBindings.from_ruby('author' => 'siggy',"title" => 'koran').bind { property :author; property :title }
+      assert a.valid?
+      valid_bson_representations = [
+        "(\x00\x00\x00\x02author\x00\x06\x00\x00\x00siggy\x00\x02title\x00\x06\x00\x00\x00koran\x00\x00",
+        "(\x00\x00\x00\x02title\x00\x06\x00\x00\x00koran\x00\x02author\x00\x06\x00\x00\x00siggy\x00\x00"
+      ]
+      assert valid_bson_representations.include?( a.convert_to_bson )
+    end
+  end
+end

data/test/converter_test.rb

@@ -0,0 +1,36 @@
+require File.expand_path("../test_helper", __FILE__)
+
+describe "Data Bindings" do
+  before do
+    DataBindings.reset!
+    DataBindings.type(:person) do
+      property :name, String
+      property :age, Integer
+    end
+  end
+
+  describe "custom readers" do
+    it "should allow adding a custom converter" do
+      DataBindings.reader(:kolob) { '{"name":"god","age":123}' }
+      a = DataBindings.from_json_kolob.bind(:person)
+      assert_equal "god", a[:name]
+      assert a.valid?
+    end
+  end
+
+  describe "custom writers" do
+    it "should allow adding a custom converter" do
+      data = ''
+      DataBindings.writer(:kolob) { |o| data = o }
+      a = DataBindings.from_json('{"author":"siggy","title":"bible"}').convert_to_json_kolob
+      assert_equal MultiJson.decode('{"author":"siggy","title":"bible"}'), MultiJson.decode(data)
+    end
+
+    it "should allow adding a custom converter for a bound object" do
+      data = ''
+      DataBindings.writer(:kolob) { |o| data = o }
+      a = DataBindings.from_json('{"name":"siggy","age":32}').bind(:person).convert_to_json_kolob
+      assert_equal MultiJson.decode('{"name":"siggy","age":32}'), MultiJson.decode(data)
+    end
+  end
+end

data/test/data_bindings_test.rb

@@ -0,0 +1,67 @@
+require File.expand_path("../test_helper", __FILE__)
+
+describe "Data Bindings" do
+  before do
+    DataBindings.reset!
+    DataBindings.type(:person) do
+      property :name, String
+      property :age, Integer
+    end
+  end
+
+  it "should raise a validation error if neither the key or alias key exist on an object" do
+    DataBindings.type(:file) do
+      property :size, Integer
+      property :filename, String, :alias => [:filenames, :file_name]
+    end
+    a = DataBindings.from_json('{"size":925, "fn":"foo.txt"}').bind(:file)
+    assert_equal({'filename' => "not found"}, a.errors)
+    refute a.errors.empty?
+    refute a.valid?
+  end
+
+  describe "from_*_file" do
+    it "should load from a file" do
+      a = DataBindings.from_json_file(File.expand_path("../fixtures/1.json", __FILE__)).bind_array {
+        all_elements :person
+      }
+      assert a.valid?
+      assert_equal "josh", a[1][:name]
+    end
+  end
+
+  describe "from_*_net" do
+    it "should load from the net" do
+      a = DataBindings.from_json_http("http://localhost/1.json").bind_array {
+        all_elements :person
+      }
+      assert a.valid?
+      assert_equal "josh", a[1][:name]
+    end
+
+    it "should fail to load without auth" do
+      assert_raises DataBindings::HttpError do
+        a = DataBindings.from_json_http("http://secret/1.json").bind_array {
+          all_elements :person
+        }
+      end
+    end
+
+    it "should load with the right auth" do
+      a = DataBindings.from_json_http("http://secret/1.json", :basic_auth => {:username => 'test', :password => 'user'}).bind_array {
+        all_elements :person
+      }
+      assert a.valid?
+      assert_equal "josh", a[1][:name]
+    end
+  end
+
+  describe "strictness via the generator's default" do
+    it "should reject extra properties" do
+      DataBindings.strict = true
+      a = DataBindings.from_json('{"author":"siggy","title":"bible"}').bind { property :author }
+      assert_equal "siggy", a[:author]
+      refute a.valid?
+    end
+  end
+end

data/test/fixtures/1.json

@@ -0,0 +1 @@
+[{"name":"andrew","age":32},{"name":"josh","age":12}]

data/test/json_test.rb

@@ -0,0 +1,40 @@
+require File.expand_path("../test_helper", __FILE__)
+
+describe "Data Bindings json" do
+  before do
+    DataBindings.reset!
+    DataBindings.type(:person) do
+      property :name, String
+      property :age, Integer
+    end
+  end
+
+  it "should create a JSON object" do
+    a = DataBindings.from_json('{"name":"Andrew","age":32}').bind(:person)
+    assert a.errors.empty?
+    assert a.valid?
+    assert_equal "Andrew", a[:name]
+    assert_equal MultiJson.decode("{\"name\":\"Andrew\",\"age\":32}"), MultiJson.decode(a.convert_to_json)
+  end
+
+  it "should refuse to create a JSON object when the data is invalid" do
+    a = DataBindings.from_json('{"name":"Andrew","age":"asd"}').bind(:person)
+    refute a.errors.empty?
+    refute a.valid?
+    assert_raises(DataBindings::FailedValidation) { a.convert_to_json }
+  end
+
+  it "should create a JSON object when the data is invalid and is forced" do
+    a = DataBindings.from_json('{"name":"Andrew","age":"asd"}').bind(:person)
+    refute a.errors.empty?
+    refute a.valid?
+    assert_equal MultiJson.decode("{\"name\":\"Andrew\",\"age\":\"asd\"}"), MultiJson.decode(a.force_convert_to_json)
+  end
+
+  it "should parse JSON" do
+    a = DataBindings.from_json("[1,2,3]").bind([Integer])
+    assert a.valid?
+    assert a.errors.empty?
+    assert_equal [1, 2, 3], [a[0], a[1], a[2]]
+  end
+end

data/test/native_test.rb

@@ -0,0 +1,64 @@
+require File.expand_path("../test_helper", __FILE__)
+
+describe "Data Bindings native" do
+  before do
+    DataBindings.reset!
+    DataBindings.type(:person) do
+      property :name, String
+      property :age, Integer
+    end
+    @person = Class.new { attr_accessor :name, :age; def initialize(name, age); @name, @age = name, age; end }
+    DataBindings.for_native(:person) { |props| @person.new(props[:name], props[:age]) }
+  end
+
+  it "should parse a Native object" do
+    p = @person.new("ben", 23)
+    a = DataBindings.from_native(p)
+    assert_equal "ben", a['name']
+  end
+
+  it "should transform into json without a binding (roughly)" do
+    p = @person.new("ben", 23)
+    assert_raises(DataBindings::UnboundError) { DataBindings.from_native(p).convert_to_json }
+  end
+
+  it "should not transform into json without a binding" do
+    p = @person.new("ben", 23)
+    a = DataBindings.from_native(p).bind(:person).convert_to_json
+    assert_equal({"name" => "ben", "age" => 23}, MultiJson.decode(a))
+  end
+
+  it "should transform into a native object" do
+    a = DataBindings.from_json('{"name":"Andrew","age":32}').bind(:person)
+    assert a.errors.empty?
+    assert a.valid?
+    assert_equal "Andrew", a[:name]
+    assert_equal "Andrew", a.to_native.name
+  end
+
+  it "should create a hash when there is no binding" do
+    a = DataBindings.from_json('{"name":"Andrew","age":32}').to_native
+    assert_equal "Andrew", a.name
+  end
+
+  it "should be able to create nested objets" do
+    DataBindings.type(:address_book) do
+      property :owner, :person
+      property :friends, [:person]
+    end
+    address_book = Class.new {
+      attr_accessor :owner, :friends
+      def initialize(owner, friends)
+        @owner, @friends = owner, friends
+      end
+
+      def find(name)
+        idx = @friends.find_index{|f| f.name == name }
+        idx && @friends[idx]
+      end
+    }
+    DataBindings.for_native(:address_book) { |props| address_book.new(props[:owner], props[:friends]) }
+    book = DataBindings.from_json('{"owner":{"name":"josh","age":34},"friends":[{"name":"grinch","age":123},{"name":"steve","age":23}]}').bind(:address_book).to_native
+    assert_equal 'steve', book.find('steve').name
+  end
+end

data/test/params_test.rb

@@ -0,0 +1,60 @@
+require File.expand_path("../test_helper", __FILE__)
+
+describe "Data Bindings params" do
+  
+  describe "params parsing" do
+    it "should parse params" do
+      a = DataBindings.from_params("author=josh&title=great+expectations").bind { property :author; property :title }
+      assert a.valid?
+      assert_equal "josh", a[:author]
+    end
+    
+    it "should parse a nested hash" do
+      a = DataBindings.from_params("name[first_name][short]=ben&name[first_name][long]=benjamin&name[last_name]=coe").bind { property :name }
+      assert a.valid?
+      assert_equal "ben", a[:name][:first_name][:short]
+      assert_equal "benjamin", a[:name][:first_name][:long]
+      assert_equal "coe", a[:name][:last_name]
+    end
+    
+    it "should parse an array" do
+      a = DataBindings.from_params("name[0][last_name]=coe&name[0][first_name]=ben&name[1][first_name]=josh").bind { property :name }
+      assert a.valid?
+      assert_equal "ben", a[:name][0][:first_name]
+      assert_equal "coe", a[:name][0][:last_name]
+      assert_equal "josh", a[:name][1][:first_name]
+    end
+  end
+  
+  describe "params generation" do
+    
+    it "should generate params" do
+      a = DataBindings.from_ruby('author' => 'siggy',"title" => 'koran').bind { property :author; property :title }
+      assert a.valid?
+      assert_match "author=siggy", a.convert_to_params
+    end
+    
+    it "should generate params for nested hash" do
+      a = DataBindings.from_ruby('author' => {'name' => {'first_name' => 'bill'}}, 'title' => 'koran', 'meta' => {'isbn' => 9999} ).bind do
+          property :author
+          property :title
+          property :meta
+      end
+      assert a.valid?
+      assert_match "author[name][first_name]=bill", a.convert_to_params
+      assert_match "meta[isbn]=9999", a.convert_to_params
+      assert_match "title=koran", a.convert_to_params
+    end
+    
+    it "should generate params for nested array" do
+      a = DataBindings.from_ruby('authors' => ['josh', 'ben'], 'title' => 'koran' ).bind do
+          property :authors
+          property :title
+      end
+      assert a.valid?
+      assert_match "authors[0]=josh", a.convert_to_params
+      assert_match "title=koran", a.convert_to_params
+    end
+    
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,17 @@
+require 'minitest/spec'
+require 'minitest/autorun'
+
+$: << File.expand_path("../../lib", __FILE__)
+require 'data_bindings'
+require 'fakeweb'
+
+FakeWeb.allow_net_connect = false
+
+Dir[File.expand_path("../fixtures/*", __FILE__)].each do |f|
+  FakeWeb.register_uri(:get, "http://localhost/#{File.basename(f)}", :body => File.read(f))
+  FakeWeb.register_uri(:get, "http://secret/#{File.basename(f)}", :body => "Unauthorized", :status => ["401", "Unauthorized"])
+  FakeWeb.register_uri(:get, "http://test:user@secret/#{File.basename(f)}", :body => File.read(f))
+end
+
+require 'bson'
+require 'tnetstring'

data/test/tnetstring_test.rb

@@ -0,0 +1,23 @@
+require File.expand_path("../test_helper", __FILE__)
+
+describe "Data Bindings tnetstring" do
+  describe "tnetstring parsing" do
+    it "should parse tnetstring" do
+      a = DataBindings.from_tnetstring(TNetstring.dump('author' => 'siggy', 'title' => 'bible')).bind { property :author; property :title }
+      assert a.valid?
+      assert_equal "siggy", a[:author]
+    end
+  end
+
+  describe "tnetstring generation" do
+    it "should generate tnetstring" do
+      a = DataBindings.from_ruby('author' => 'siggy',"title" => 'koran').bind { property :author; property :title }
+      assert a.valid?
+      valid_tnetstring_representations = [
+        "33:6:author,5:siggy,5:title,5:koran,}",
+        "33:5:title,5:koran,6:author,5:siggy,}"
+      ]
+      assert valid_tnetstring_representations.include?( a.convert_to_tnetstring )
+    end
+  end
+end

data/test/validation_test.rb

@@ -0,0 +1,217 @@
+describe "Data Bindings validation" do
+  before do
+    DataBindings.reset!
+  end
+
+  it "should revalidate" do
+    a = DataBindings.from_json("[1,2,3]").bind([Integer])
+    assert a.valid?
+    assert a.errors.empty?
+    assert_equal [1, 2, 3], [a[0], a[1], a[2]]
+    a.unshift 'asd'
+    refute a.valid?
+    refute a.errors.empty?
+  end
+
+  it "should allow for a property to have a Boolean type" do
+    DataBindings.type(:person) do
+      property :name, String
+      property :awesome, :boolean
+    end
+    a = DataBindings.from_json('{"name":"Andrew","awesome":"true"}').bind(:person)
+    assert a.errors.empty?
+    assert a.valid?
+    assert_equal true, a[:awesome]
+  end
+
+  it "should allow for a property to have a default value set" do
+    DataBindings.type(:person) do
+      property :name, String
+      property :age, Integer, :default => 25
+    end
+    a = DataBindings.from_json('{"name":"Andrew"}').bind(:person)
+    assert a.errors.empty?
+    assert a.valid?
+    assert_equal 25, a[:age]
+  end
+
+  it "should allow the default value to be overridden with another value." do
+    DataBindings.type(:person) do
+      property :name, String
+      property :age, Integer, :default => 25
+    end
+    a = DataBindings.from_json('{"name":"Andrew", "age":26}').bind(:person)
+    assert a.errors.empty?
+    assert a.valid?
+    assert_equal 26, a[:age]
+  end
+  
+  it "should allow for an alias property name to be set for a property" do
+    DataBindings.type(:file) do
+      property :size, Integer
+      property :filename, String, :alias => :file_name
+    end
+    a = DataBindings.from_json('{"size":925, "file_name":"foo.txt"}').bind(:file)
+    assert a.errors.empty?
+    assert a.valid?
+    assert_equal "foo.txt", a[:filename]
+  end
+  
+  it "should allow an array of aliases to be provided for a property" do
+    DataBindings.type(:file) do
+      property :size, Integer
+      property :filename, String, :alias => [:filenames, :file_name]
+    end
+    a = DataBindings.from_json('{"size":925, "file_name":"foo.txt"}').bind(:file)
+    assert a.errors.empty?
+    assert a.valid?
+    assert_equal "foo.txt", a[:filename]    
+  end
+
+  it "should raise when using bind! with invalid data" do
+    DataBindings.type(:person) do
+      property :name, String
+      property :age, Integer
+    end
+    assert_raises DataBindings::FailedValidation do
+      DataBindings.from_json('{"name":"Andrew","age":"asd"}').bind!(:person)
+    end
+  end
+
+  it "should give back the original object with errors with invalid data" do
+    DataBindings.type(:person) do
+      property :name, String
+      property :age, Integer
+    end
+    a = DataBindings.from_json('{"name":"Andrew","age":"asd"}').bind(:person)
+    assert_equal "Andrew", a[:name] 
+    assert_equal "asd", a[:age] 
+    refute a.valid?
+  end
+
+  describe "nested DataBindings::FailedValidation" do
+    before do
+      DataBindings.for_native(:person) { |obj| person.new(obj[:name], obj[:age]) }
+      DataBindings.type(:person) do
+        property :name, String
+        property :age, Integer
+        property :books, Array(:book)
+      end
+
+      DataBindings.type(:book) do
+        property :author, String
+        property :title, String
+      end
+    end
+
+    it "should bind to ruby" do
+      a = DataBindings.from_json('{"name":"Andrew","age":32,"books":[{"author":"Siggy","title":"Help Me"},{"author":"Samsum","title":"SC2 and you"}]}').bind(:person)
+      assert a.valid?
+      assert a.errors.empty?
+      assert_equal "Andrew", a[:name]
+      assert_equal "Help Me", a[:books][0][:title]
+    end
+
+    it "should be invalid if a nested object is invalid" do
+      a = DataBindings.from_json('{"name":"Andrew","age":32,"books":[{"author":"Siggy"},{"author":"Samsum","title":"SC2 and you"}]}').bind(:person)
+      refute a.valid?
+      refute a.errors.empty?
+      assert_equal "Andrew", a[:name]
+      assert_equal nil, a[:books][0][:title]
+    end
+  end
+
+  describe "nested validation" do
+    it "should bind to ruby" do
+      a = DataBindings.from_json('{"name":"Andrew","age":32,"book":{"author":"Siggy","title":"Help Me"}}').to_native
+      assert_equal OpenStruct, a.class
+      assert_equal "Siggy", a.book.author
+    end
+  end
+
+  describe "in clause" do
+    before do
+      DataBindings.type(:person) do
+        property :name, String, :in => %w(Steve John Andrew)
+      end
+    end
+
+    it "should have vaild data" do
+      a = DataBindings.from_json('{"name":"Andrew"}').bind(:person)
+      assert_equal "Andrew", a[:name] 
+      assert a.valid?
+    end
+
+    it "should handle invaild data" do
+      a = DataBindings.from_json('{"name":"Josh"}').bind(:person)
+      assert_equal "Josh", a[:name] 
+      refute a.valid?
+    end
+  end
+
+  describe "inline data type" do
+    before do
+      DataBindings.type(:person) do
+        property :books, [] do
+          property :author
+          property :title
+        end
+      end
+    end
+
+    it "should have vaild data" do
+      a = DataBindings.from_json('{"books":[{"author":"siggy","title":"bible"},{"author":"josh","title":"koran"}]}').bind(:person)
+      assert_equal "josh", a[:books][1][:author] 
+      assert a.valid?
+    end
+
+    it "should handle invaild data" do
+      a = DataBindings.from_json('{"books":[{"author":"siggy"},{"author":"josh","title":"koran"}]}').bind(:person)
+      assert_equal "josh", a[:books][1][:author] 
+      refute a.valid?
+    end
+
+    it "should allow binding to the data in a non-named way" do
+      a = DataBindings.from_json('{"books":[{"author":"siggy","title":"bible"},{"author":"josh","title":"koran"}]}').bind {
+        property :books, [] do
+          property :author
+          property :title
+        end
+      }
+      assert_equal "josh", a[:books][1][:author] 
+      assert a.valid?
+    end
+  end
+
+  describe "ad-hoc data type" do
+    it "should allow binding to the data in a non-named way" do
+      a = DataBindings.from_json('{"books":[{"author":"siggy","title":"bible"},{"author":"josh","title":"koran"}]}').bind {
+        property :books, [] do
+          property :author
+          property :title
+        end
+      }
+      assert_equal "josh", a[:books][1][:author] 
+      assert a.valid?
+    end
+
+    it "should handle invaild data" do
+      a = DataBindings.from_json('{"books":[{"author":"siggy"},{"author":"josh","title":"koran"}]}').bind {
+        property :books, [] do
+          property :author
+          property :title
+        end
+      }
+      assert_equal "josh", a[:books][1][:author]
+      refute a.valid?
+    end
+
+    describe "strictness" do
+      it "should reject extra properties" do
+        a = DataBindings.from_json('{"author":"siggy","title":"bible"}').bind(:strict => true) { property :author }
+        assert_equal "siggy", a[:author]
+        refute a.valid?
+      end
+    end
+  end
+end