module AwesomePrint::Ripple

def self.included(base)
  base.send :alias_method, :cast_without_ripple, :cast
  base.send :alias_method, :cast, :cast_with_ripple
end

def awesome_ripple_document_class(object)
  return object.inspect if !defined?(::ActiveSupport::OrderedHash) || !object.respond_to?(:properties)
  name = "class #{awesome_simple(object.to_s, :class)}"
  base = "< #{awesome_simple(object.superclass.to_s, :class)}"
  [name, base, awesome_hash(data)].join(' ')
end

def awesome_ripple_document_instance(object)
  return object.inspect if !defined?(::ActiveSupport::OrderedHash)
  return awesome_object(object) if @options[:raw]
  exclude_assoc = @options[:exclude_assoc] or @options[:exclude_associations]
  data = object.attributes.inject(::ActiveSupport::OrderedHash.new) do |hash, (name, value)|
    hash[name.to_sym] = object.send(name)
    hash
  end
  unless exclude_assoc
    data = object.class.embedded_associations.inject(data) do |hash, assoc|
      hash[assoc.name] = object.get_proxy(assoc) # Should always be array or Ripple::EmbeddedDocument for embedded associations
      hash
    end
  end
  "#{object} " << awesome_hash(data)
end

def cast_with_ripple(object, type)
  cast = cast_without_ripple(object, type)
  return cast if !defined?(::Ripple)
  if object.is_a?(::Ripple::AttributeMethods) # Module used to access attributes across documents and embedded documents
    cast = :ripple_document_instance
  elsif object.is_a?(::Ripple::Properties)    # Used to access property metadata on Ripple classes
    cast = :ripple_document_class
  end
  cast
end