require File.expand_path(File.dirname(__FILE__) + '/../spec_helper')

begin
  require "mongo_mapper"
  require "awesome_print/ext/mongo_mapper"

  describe "AwesomePrint/MongoMapper" do
    before :all do
      class MongoUser
        include MongoMapper::Document

        key :first_name, String
        key :last_name, String
      end
    end

    after :all do
      Object.instance_eval{ remove_const :MongoUser }
      Object.instance_eval{ remove_const :Chamelion }
    end

    before do
      stub_dotfile!
      @ap = AwesomePrint::Inspector.new(:plain => true, :sort_keys => true)
    end

    describe "with the raw option set to true" do
      # before { @ap.options[:raw] = true }
      before { @ap = AwesomePrint::Inspector.new(:plain => true, :sort_keys => true, :raw => true) }

      it "should print class instance" do
        user = MongoUser.new(:first_name => "Al", :last_name => "Capone")

        out = @ap.send(:awesome, user)
        out.gsub!(/#\<Proc:.+?\>/, 'AWESOME_PRINT_PROC_STUB')
        out.gsub!(/BSON::ObjectId\('[\da-f]+?'\)/, "BSON::ObjectId('123456789')")

        if MongoMapper::Version >= "0.13"
          str = <<-EOS.strip
#<MongoUser:0x01234567
    @__mm_default_keys = [
        [0] #<MongoMapper::Plugins::Keys::Key:0x01234567
            @dynamic = false,
            @embeddable = false,
            @has_default = true,
            @is_id = true,
            @typecast = nil,
            attr_accessor :accessors = [],
            attr_accessor :default = AWESOME_PRINT_PROC_STUB,
            attr_accessor :ivar = :@_id,
            attr_accessor :name = "_id",
            attr_accessor :options = {
                :default => AWESOME_PRINT_PROC_STUB
            },
            attr_accessor :type = ObjectId < Object
        >
    ],
    @__mm_keys = {
               "_id" => #<MongoMapper::Plugins::Keys::Key:0x01234567
            @dynamic = false,
            @embeddable = false,
            @has_default = true,
            @is_id = true,
            @typecast = nil,
            attr_accessor :accessors = [],
            attr_accessor :default = AWESOME_PRINT_PROC_STUB,
            attr_accessor :ivar = :@_id,
            attr_accessor :name = "_id",
            attr_accessor :options = {
                :default => AWESOME_PRINT_PROC_STUB
            },
            attr_accessor :type = ObjectId < Object
        >,
        "first_name" => #<MongoMapper::Plugins::Keys::Key:0x01234567
            @dynamic = false,
            @embeddable = false,
            @has_default = false,
            @is_id = false,
            @typecast = nil,
            attr_accessor :accessors = [],
            attr_accessor :ivar = :@first_name,
            attr_accessor :name = "first_name",
            attr_accessor :options = {},
            attr_accessor :type = String < Object
        >,
         "last_name" => #<MongoMapper::Plugins::Keys::Key:0x01234567
            @dynamic = false,
            @embeddable = false,
            @has_default = false,
            @is_id = false,
            @typecast = nil,
            attr_accessor :accessors = [],
            attr_accessor :ivar = :@last_name,
            attr_accessor :name = "last_name",
            attr_accessor :options = {},
            attr_accessor :type = String < Object
        >
    },
    @__mm_pre_cast = {
        "first_name" => "Al",
         "last_name" => "Capone"
    },
    @_dynamic_attributes = {},
    @_new = true,
    attr_accessor :_id = BSON::ObjectId('123456789'),
    attr_accessor :attributes = nil,
    attr_accessor :first_name = "Al",
    attr_accessor :last_name = "Capone",
    attr_reader :changed_attributes = {
        "first_name" => nil,
         "last_name" => nil
    }
>
EOS
        else
          str = <<-EOS.strip
#<MongoUser:0x01234567
    @_new = true,
    attr_accessor :first_name = "Al",
    attr_accessor :last_name = "Capone",
    attr_reader :changed_attributes = {
        "first_name" => nil,
         "last_name" => nil
    },
    attr_reader :first_name_before_type_cast = "Al",
    attr_reader :last_name_before_type_cast = "Capone"
>
EOS
        end
        out.gsub!(/0x([a-f\d]+)/, "0x01234567")
        expect(out).to eq(str)
      end

      it "should print the class" do
        expect(@ap.send(:awesome, MongoUser)).to eq <<-EOS.strip
class MongoUser < Object {
           "_id" => :object_id,
    "first_name" => :string,
     "last_name" => :string
}
EOS
      end

      it "should print the class when type is undefined" do
        class Chamelion
          include MongoMapper::Document
          key :last_attribute
        end

        expect(@ap.send(:awesome, Chamelion)).to eq <<-EOS.strip
class Chamelion < Object {
               "_id" => :object_id,
    "last_attribute" => :undefined
}
EOS
      end
    end

    describe "with associations" do
      before :all do
        class Child
          include MongoMapper::EmbeddedDocument
          key :data
        end

        class Sibling
          include MongoMapper::Document
          key :title
        end

        class Parent
          include MongoMapper::Document
          key :name

          one :child
          one :sibling
        end
      end

      describe "with show associations turned off (default)" do
        it "should render the class as normal" do
          expect(@ap.send(:awesome, Parent)).to eq <<-EOS.strip
class Parent < Object {
     "_id" => :object_id,
    "name" => :undefined
}
EOS
        end

        it "should render an instance as normal" do
          parent = Parent.new(:name => 'test')
          out = @ap.send(:awesome, parent)
          str = <<-EOS.strip
#<Parent:0x01234567> {
     "_id" => BSON::ObjectId('4d9183739a546f6806000001'),
    "name" => "test"
}
EOS
          out.gsub!(/'([\w]+){23}'/, "'4d9183739a546f6806000001'")
          out.gsub!(/0x([a-f\d]+)/, "0x01234567")
          expect(out).to eq(str)
        end
      end

      describe "with show associations turned on and inline embedded turned off" do
        before :each do
          @ap = AwesomePrint::Inspector.new(:plain => true, :mongo_mapper => { :show_associations => true })
        end

        it "should render the class with associations shown" do
          expect(@ap.send(:awesome, Parent)).to eq <<-EOS.strip
class Parent < Object {
        "_id" => :object_id,
       "name" => :undefined,
      "child" => embeds one Child,
    "sibling" => one Sibling
}
EOS
        end

        it "should render an instance with associations shown" do
          parent = Parent.new(:name => 'test')
          out = @ap.send(:awesome, parent)
          str = <<-EOS.strip
#<Parent:0x01234567> {
        "_id" => BSON::ObjectId('4d9183739a546f6806000001'),
       "name" => "test",
      "child" => embeds one Child,
    "sibling" => one Sibling
}
EOS
          out.gsub!(/'([\w]+){23}'/, "'4d9183739a546f6806000001'")
          out.gsub!(/0x([a-f\d]+)/, "0x01234567")
          expect(out).to eq(str)
        end
      end

      describe "with show associations turned on and inline embedded turned on" do
        before :each do
          @ap = AwesomePrint::Inspector.new(:plain => true,
              :mongo_mapper => {
                :show_associations => true,
                :inline_embedded   => true
            }
          )
        end

        it "should render an instance with associations shown and embeds there" do
          parent = Parent.new(:name => 'test', :child => Child.new(:data => 5))
          out = @ap.send(:awesome, parent)
          str = <<-EOS.strip
#<Parent:0x01234567> {
        "_id" => BSON::ObjectId('4d9183739a546f6806000001'),
       "name" => "test",
      "child" => embedded #<Child:0x01234567> {
         "_id" => BSON::ObjectId('4d9183739a546f6806000001'),
        "data" => 5
    },
    "sibling" => one Sibling
}
EOS
          out.gsub!(/'([\w]+){23}'/, "'4d9183739a546f6806000001'")
          out.gsub!(/0x([a-f\d]+)/, "0x01234567")
          expect(out).to eq(str)
        end
      end
    end
  end

rescue LoadError => error
  puts "Skipping MongoMapper specs: #{error}"
end