require 'test_helper'

require "test_xml/mini_test"
require "roar/representer/json"

class JsonRepresenterTest < MiniTest::Spec
  class Order
    include Roar::Representer::JSON
    property :id
    property :pending
  end
  
  
  describe "JsonRepresenter" do
    before do
      @r = Order.new
    end
    
    describe "#to_json" do
      it "#serialize returns the serialized model" do
        @r.id = 1
        assert_equal '{"order":{"id":1}}', @r.to_json
      end
    end
    
    describe ".from_json" do
      it "returns the deserialized model" do
        @m = Order.from_json('{"order": {"id":1}}')
        assert_equal 1, @m.id
      end
      
      it "accepts :except option" do
        order = Order.from_json({order: {id: 1, pending: 1}}.to_json, :except => [:id])
        assert_equal nil, order.id
        assert_equal 1, order.pending
      end
      
      it "accepts :include option" do
        order = Order.from_json({order: {id: 1, pending: 1}}.to_json, :include => [:id])
        assert_equal 1, order.id
        assert_equal nil, order.pending
      end
      
      it "works with a nil document" do
        assert Order.from_json(nil)
      end
    end
  end
end

class JsonHyperlinkRepresenterTest
  describe "API" do
    before do
      @l = Roar::Representer::JSON::Hyperlink.from_json({:link => {:rel => :self, :href => "http://roar.apotomo.de"}}.to_json)
    end
    
    it "responds to #representation_name" do
      assert_equal :link, @l.class.representation_name
    end
    
    
    it "responds to #rel" do
      assert_equal "self", @l.rel
    end
    
    it "responds to #href" do
      assert_equal "http://roar.apotomo.de", @l.href
    end
  end
end

class JsonHypermediaTest
  describe "Hypermedia API" do
    before do
      @c = Class.new do
        include Roar::Representer::JSON
        include Roar::Representer::Feature::Hypermedia
        
        self.representation_name= :order
        
        property :id
        
        link :self do "http://self" end
        link :next do "http://next/#{id}" end
      end
      
      @r = @c.new
    end
    
    it "responds to #links" do
      assert_equal [], @r.links
    end
    
    it "extracts links from JSON" do
      @r = @c.from_json({:order => {:links => [{:rel => "self", :href => "http://self"}]}}.to_json)
      
      assert_equal 1, @r.links.size
      assert_equal({"rel"=>"self", "href"=>"http://self"}, @r.links.first.to_attributes) 
    end
    
    it "renders link: correctly in JSON" do
      assert_equal "{\"order\":{\"id\":1,\"links\":[{\"rel\":\"self\",\"href\":\"http://self\"},{\"rel\":\"next\",\"href\":\"http://next/1\"}]}}", @c.from_attributes(:id => 1).to_json
    end
  end
end