describe "crud" do
  extend WebStub::SpecHelpers
  
  describe "create" do
    it "should create on save if record is new" do
      stub_request(:post, "http://example.com/comments.json").to_return(json: { id: 1 })
      comment = Comment.new
      comment.save do |result|
        @result = result
        resume
      end
    
      wait_max 1.0 do
        @result.should.not.be.nil
      end
    end
  
    it "should create with json in response" do
      stub_request(:post, "http://example.com/comments.json").to_return(json: { id: 1 })
      comment = Comment.new
      comment.create do |result|
        @result = result
        resume
      end
    
      wait_max 1.0 do
        @result.should.not.be.nil
      end
    end
  
    it "should create without json in response" do
      stub_request(:post, "http://example.com/comments.json").to_return(body: "")
      @comment = Comment.new
      @comment.create do |result|
        @result = result
        resume
      end
    
      wait_max 1.0 do
        @result.should == @comment
      end
    end
  
    it "should create with empty json response" do
      stub_request(:post, "http://example.com/comments.json").to_return(json: {})
      @comment = Comment.new
      @comment.create do |result|
        @result = result
        resume
      end
    
      wait_max 1.0 do
        @result.should == @comment
      end
    end
  
    it "should give HTTP response to block" do
      stub_request(:post, "http://example.com/comments.json").to_return(json: {}, status_code: 404)
      Comment.new.create do |result, response|
        @response = response
        resume
      end
    
      wait_max 1.0 do
        @response.should.not.be.ok
      end
    end
    
    it "should include association" do
      stub_request(:post, "http://example.com/posts.json").to_return(body: "")
      Post.new.create(:include => :comments) do |result, response|
        @response = response
        resume
      end
    
      wait_max 1.0 do
        @response.should.be.ok
      end
    end
    
    it "should include association with _attributes suffix" do
      stub_request(:post, "http://example.com/posts.json").to_return(body: "")
      Post.new.create(:include => :comments_attributes) do |result, response|
        @response = response
        resume
      end
    
      wait_max 1.0 do
        @response.should.be.ok
      end
    end
    
    it "should raise error when included association is not found" do
      stub_request(:post, "http://example.com/posts.json").to_return(body: "")
      lambda { Post.new.create(:include => :foobar) { |result, response| } }.should.raise(ArgumentError)
    end
  end
  
  describe "update" do
    it "should update on save if record already exists" do
      stub_request(:put, "http://example.com/comments/10.json").to_return(json: { id: 10 })
      comment = Comment.instantiate(:id => 10)
      comment.save do |result|
        @result = result
        resume
      end
    
      wait_max 1.0 do
        @result.should.not.be.nil
      end
    end

    it "should update with json in response" do
      stub_request(:put, "http://example.com/comments/10.json").to_return(json: { id: 10 })
      comment = Comment.instantiate(:id => 10)
      comment.update do |result|
        @result = result
        resume
      end
    
      wait_max 1.0 do
        @result.should.not.be.nil
      end
    end
  
    it "should update without json in response" do
      stub_request(:put, "http://example.com/comments/10.json").to_return(body: "")
      @comment = Comment.instantiate(:id => 10)
      @comment.update do |result|
        @result = result
        resume
      end
    
      wait_max 1.0 do
        @result.should.be == @comment
      end
    end
  
    it "should update with empty json response" do
      stub_request(:put, "http://example.com/comments/10.json").to_return(json: {})
      @comment = Comment.instantiate(:id => 10)
      @comment.update do |result|
        @result = result
        resume
      end
    
      wait_max 1.0 do
        @result.should.be == @comment
      end
    end
  
    it "should give HTTP response to block" do
      stub_request(:put, "http://example.com/comments/10.json").to_return(json: {}, status_code: 404)
      Comment.instantiate(:id => 10).update do |result, response|
        @response = response
        resume
      end
    
      wait_max 1.0 do
        @response.should.not.be.ok
      end
    end
    
    
    it "should include association" do
      stub_request(:put, "http://example.com/posts/10.json").to_return(body: "")
      Post.instantiate(:id => 10).update(:include => :comments) do |result, response|
        @response = response
        resume
      end
    
      wait_max 1.0 do
        @response.should.be.ok
      end
    end
  end

  describe "destroy" do
    it "should destroy with json in response" do
      stub_request(:delete, "http://example.com/comments/10.json").to_return(json: { id: 10 })
      comment = Comment.instantiate(:id => 10)
      comment.destroy do |result|
        @result = result
        resume
      end
    
      wait_max 1.0 do
        @result.should.not.be.nil
      end
    end
  
    it "should destroy without json in response" do
      stub_request(:delete, "http://example.com/comments/10.json").to_return(body: "")
      comment = Comment.instantiate(:id => 10)
      comment.destroy do |result|
        @result = result
        resume
      end
    
      wait_max 1.0 do
        @result.should.be.nil
      end
    end
  
    it "should give HTTP response to block" do
      stub_request(:delete, "http://example.com/comments/10.json").to_return(json: {}, status_code: 404)
      Comment.instantiate(:id => 10).destroy do |result, response|
        @response = response
        resume
      end
    
      wait_max 1.0 do
        @response.should.not.be.ok
      end
    end
  end

  describe "reload" do
    it "should reload with json in response" do
      stub_request(:get, "http://example.com/comments/10.json").to_return(json: { id: 10 })
      comment = Comment.instantiate(:id => 10)
      comment.reload do |result|
        @result = result
        resume
      end
    
      wait_max 1.0 do
        @result.should.not.be.nil
      end
    end
  
    it "should reload without json in response" do
      stub_request(:get, "http://example.com/comments/10.json").to_return(body: "")
      comment = Comment.instantiate(:id => 10)
      comment.reload do |result|
        @result = result
        resume
      end
    
      wait_max 1.0 do
        @result.should.be.nil
      end
    end
  
    it "should give HTTP response to block" do
      stub_request(:get, "http://example.com/comments/10.json").to_return(json: {}, status_code: 404)
      Comment.instantiate(:id => 10).reload do |result, response|
        @response = response
        resume
      end
    
      wait_max 1.0 do
        @response.should.not.be.ok
      end
    end
  end
end