mark_mapper 0.0.1

data/spec/quality_spec.rb

@@ -0,0 +1,51 @@
+# if defined?(Encoding) && Encoding.default_external != "UTF-8"
+#   Encoding.default_external = "UTF-8"
+# end
+
+# describe "The library itself" do
+#   def check_for_tab_characters(filename)
+#     failing_lines = []
+#     File.readlines(filename).each_with_index do |line,number|
+#       failing_lines << number + 1 if line =~ /\t/
+#     end
+
+#     unless failing_lines.empty?
+#       "#{filename} has tab characters on lines #{failing_lines.join(', ')}"
+#     end
+#   end
+
+#   def check_for_extra_spaces(filename)
+#     failing_lines = []
+#     File.readlines(filename).each_with_index do |line,number|
+#       next if line =~ /^\s+#.*\s+\n$/
+#       failing_lines << number + 1 if line =~ /\s+\n$/
+#     end
+
+#     unless failing_lines.empty?
+#       "#{filename} has spaces on the EOL on lines #{failing_lines.join(', ')}"
+#     end
+#   end
+
+#   RSpec::Matchers.define :be_well_formed do
+#     failure_message do |actual|
+#       actual.join("\n")
+#     end
+
+#     match do |actual|
+#       actual.empty?
+#     end
+#   end
+
+#   it "has no malformed whitespace" do
+#     exempt = /\.gitmodules|\.marshal|fixtures|vendor|ssl_certs|kill|LICENSE/
+#     error_messages = []
+#     Dir.chdir(File.expand_path("../..", __FILE__)) do
+#       `git ls-files`.split("\n").each do |filename|
+#         next if filename =~ exempt
+#         error_messages << check_for_tab_characters(filename)
+#         error_messages << check_for_extra_spaces(filename)
+#       end
+#     end
+#     expect(error_messages.compact).to be_well_formed
+#   end
+# end

data/spec/spec_helper.rb

@@ -0,0 +1,150 @@
+$:.unshift(File.expand_path('../../lib', __FILE__))
+
+require 'rubygems'
+require 'bundler/setup'
+require 'fileutils'
+require 'timecop'
+require 'pp'
+require 'pry'
+
+if RUBY_PLATFORM != "java"
+  if ENV['TRAVIS']
+    require 'coveralls'
+    Coveralls.wear!
+  elsif ENV['COVERAGE'] && RUBY_VERSION > "1.8"
+    require 'simplecov'
+    SimpleCov.start do
+      add_filter 'spec'
+      add_group 'Core',         'lib/mark_mapper'
+      add_group 'Rails',        'lib/rails'
+      add_group 'Extensions',   'lib/mark_mapper/extensions'
+      add_group 'Plugins',      'lib/mark_mapper/plugins'
+      add_group 'Associations', 'lib/mark_mapper/plugins/associations'
+    end
+  end
+end
+
+require 'marklogic'
+require 'mark_mapper'
+
+# These environment variables can be set if wanting to test against a database
+# that is not on the local machine.
+ENV["MARKMAPPER_SPEC_HOST"] ||= "localhost"
+ENV["MARKMAPPER_SPEC_PORT"] ||= "8009"
+
+ENV["MARKMAPPER_SPEC_APP_SERVICES_PORT"] ||= "8000"
+ENV["MARKMAPPER_SPEC_ADMIN_PORT"] ||= "8001"
+ENV["MARKMAPPER_SPEC_MANAGE_PORT"] ||= "8002"
+
+ENV["MARKMAPPER_SPEC_USER"] ||= "admin"
+ENV["MARKMAPPER_SPEC_PASSWORD"] ||= "admin"
+ENV["MARKMAPPER_SKIP_APP_CREATION"] ||= "false"
+
+# These are used when creating any connection in the test suite.
+HOST = ENV["MARKMAPPER_SPEC_HOST"]
+PORT = ENV["MARKMAPPER_SPEC_PORT"].to_i
+
+APP_SERVICES_PORT = ENV["MARKMAPPER_SPEC_APP_SERVICES_PORT"]
+MANAGE_PORT = ENV["MARKMAPPER_SPEC_MANAGE_PORT"]
+ADMIN_PORT = ENV["MARKMAPPER_SPEC_ADMIN_PORT"]
+
+USER = ENV["MARKMAPPER_SPEC_USER"]
+PASSWORD = ENV["MARKMAPPER_SPEC_PASSWORD"]
+
+ADMIN_USER = ENV["MARKMAPPER_SPEC_ADMIN_USER"]
+ADMIN_PASSWORD = ENV["MARKMAPPER_SPEC_ADMIN_PASSWORD"]
+
+MarkLogic::Connection.configure({
+  :host => HOST,
+  :manage_port => MANAGE_PORT,
+  :admin_port => ADMIN_PORT,
+  :app_services_port => APP_SERVICES_PORT,
+  :default_user => ADMIN_USER,
+  :default_password => ADMIN_PASSWORD
+})
+
+CONNECTION = MarkLogic::Connection.new(HOST, PORT)
+MarkMapper.application = MarkLogic::Application.new("markmapper-application-test", connection: CONNECTION )
+MarkMapper.application.stale?
+
+MarkMapper.logger.level = Logger::DEBUG
+
+def Doc(name='Class', &block)
+  klass = Class.new
+  klass.class_eval do
+    include MarkMapper::Document
+
+    if name
+      class_eval "def self.name; '#{name}' end"
+      class_eval "def self.to_s; '#{name}' end"
+    else
+      set_collection_name :test
+    end
+  end
+
+  klass.class_eval(&block) if block_given?
+  klass.collection.remove if klass.database.exists?
+  klass
+end
+
+def EDoc(name='Class', &block)
+  klass = Class.new do
+    include MarkMapper::EmbeddedDocument
+
+    if name
+      class_eval "def self.name; '#{name}' end"
+      class_eval "def self.to_s; '#{name}' end"
+    end
+  end
+
+  klass.class_eval(&block) if block_given?
+  klass
+end
+
+def drop_indexes(klass)
+  klass.collection.drop_indexes if klass.database.collection_names.include?(klass.collection.name)
+end
+
+log_dir = File.expand_path('../../log', __FILE__)
+FileUtils.mkdir_p(log_dir) unless File.exist?(log_dir)
+logger = Logger.new(log_dir + '/test.log')
+
+Dir[File.dirname(__FILE__) + "/support/**/*.rb"].each {|f| require f}
+
+RSpec.configure do |config|
+  # config.filter_run_excluding :skip => true
+  config.expect_with :rspec do |c|
+    c.syntax = [:should, :expect]
+  end
+
+  config.fail_fast = true
+
+  config.before(:all) do
+    @application = MarkMapper.application.tap do |app|
+      app.add_index(MarkLogic::DatabaseSettings::RangeElementIndex.new(:_id, :type => 'string'))
+      app.add_index(MarkLogic::DatabaseSettings::RangeElementIndex.new(:name, :type => 'string'))
+      app.add_index(MarkLogic::DatabaseSettings::RangeElementIndex.new(:body, :type => 'string'))
+      app.add_index(MarkLogic::DatabaseSettings::RangeElementIndex.new(:age, :type => 'int'))
+      app.add_index(MarkLogic::DatabaseSettings::RangeElementIndex.new(:first_name, :type => 'string'))
+      app.add_index(MarkLogic::DatabaseSettings::RangeElementIndex.new(:position, :type => 'int'))
+      app.add_index(MarkLogic::DatabaseSettings::RangeElementIndex.new(:weight, :type => 'int'))
+    end
+    @application.sync
+    @database = @application.content_databases[0]
+    @database.clear
+  end
+
+  config.around(:each, :without_connection) do |example|
+    old, MarkMapper.connection = MarkMapper.connection, nil
+    example.run
+    MarkMapper.connection = old
+  end
+
+  config.after(:suite) do
+    puts "CLEANING UP AFTER ALL TESTS FINISHED"
+    MarkLogic::Application.new("markmapper-application-test", :port => PORT).drop
+  end
+end
+
+operators = %w{gt lt ge le ne eq asc desc}
+SymbolOperators = operators

data/spec/support/matchers.rb

@@ -0,0 +1,15 @@
+RSpec::Matchers.define :have_error_on do |*args|
+  match do |model|
+    field = args.dup.shift
+    error_messages = args
+
+    model.valid?
+    model.errors[field].any?
+  end
+end
+
+RSpec::Matchers.define :have_index do |index_name|
+  match do |model|
+    model.collection.index_information.detect { |index| index[0] == index_name }.present?
+  end
+end

data/spec/support/models.rb

@@ -0,0 +1,256 @@
+# custom type
+class WindowSize
+  attr_reader :width, :height
+
+  def self.to_marklogic(value)
+    value.to_a
+  end
+
+  def self.from_marklogic(value)
+    value.is_a?(self) ? value : WindowSize.new(value)
+  end
+
+  def initialize(*args)
+    @width, @height = args.flatten
+  end
+
+  def to_a
+    [width, height]
+  end
+
+  def ==(other)
+    other.is_a?(self.class) && other.width == width && other.height == height
+  end
+end
+
+module AccountsExtensions
+  def inactive
+    all(:last_logged_in => nil)
+  end
+end
+
+class Post
+  include MarkMapper::Document
+
+  key :title, String
+  key :body, String
+
+  many :comments, :as => :commentable, :class_name => 'PostComment'
+
+  timestamps!
+end
+
+class PostComment
+  include MarkMapper::Document
+
+  key :username, String, :default => 'Anonymous'
+  key :body, String
+
+  key :commentable_id, ObjectId
+  key :commentable_type, String
+  belongs_to :commentable, :polymorphic => true
+
+  timestamps!
+end
+
+class Address
+  include MarkMapper::EmbeddedDocument
+
+  key :address, String
+  key :city,    String
+  key :state,   String
+  key :zip,     Integer
+end
+
+class Message
+  include MarkMapper::Document
+
+  key :body, String
+  key :position, Integer
+  key :room_id, ObjectId
+
+  belongs_to :room
+end
+
+class Enter < Message; end
+class Exit < Message;  end
+class Chat < Message;  end
+
+class Room
+  include MarkMapper::Document
+
+  key :name, String
+  many :messages, :polymorphic => true, :order => 'position' do
+    def older
+      all(:position => {'$gt' => 5})
+    end
+  end
+  many :latest_messages, :class_name => 'Message', :order => 'position desc', :limit => 2
+
+  many :accounts, :polymorphic => true, :extend => AccountsExtensions
+end
+
+class Account
+  include MarkMapper::Document
+
+  key :room_id, ObjectId
+  key :last_logged_in, Time
+
+  belongs_to :room
+end
+class AccountUser < Account; end
+class Bot < Account; end
+
+class Answer
+  include MarkMapper::Document
+
+  key :body, String
+end
+
+module CollaboratorsExtensions
+  def top
+    first
+  end
+end
+
+class Project
+  include MarkMapper::Document
+
+  key :name, String
+
+  many :collaborators, :extend => CollaboratorsExtensions
+  many :statuses, :order => 'position' do
+    def open
+      all(:name => %w(New Assigned))
+    end
+  end
+
+  many :addresses
+end
+
+class Collaborator
+  include MarkMapper::Document
+  key :project_id, ObjectId
+  key :name, String
+  belongs_to :project
+end
+
+class Status
+  include MarkMapper::Document
+
+  scope :complete, where(:name => 'Complete')
+
+  def self.by_position(position)
+    where(:position => position)
+  end
+
+  key :project_id, ObjectId
+  key :target_id, ObjectId
+  key :target_type, String
+  key :name, String, :required => true
+  key :position, Integer
+
+  belongs_to :project
+  belongs_to :target, :polymorphic => true
+end
+
+class Media
+  include MarkMapper::EmbeddedDocument
+
+  key :file, String
+  key :visible, Boolean
+end
+
+class Video < Media
+  key :length, Integer
+end
+
+class Image < Media
+  key :width, Integer
+  key :height, Integer
+end
+
+class Music < Media
+  key :bitrate, String
+end
+
+class Catalog
+  include MarkMapper::Document
+
+  many :medias, :polymorphic => true do
+    def visible
+      # for some reason we can't use select here
+      find_all { |m| m.visible? }
+    end
+  end
+end
+
+module TrModels
+  class Transport
+    include MarkMapper::EmbeddedDocument
+
+    key :license_plate, String
+    key :purchased_on, Date
+  end
+
+  class Car < TrModels::Transport
+    include MarkMapper::EmbeddedDocument
+
+    key :model, String
+    key :year, Integer
+  end
+
+  class Bus < TrModels::Transport
+    include MarkMapper::EmbeddedDocument
+
+    key :max_passengers, Integer
+  end
+
+  class Ambulance < TrModels::Transport
+    include MarkMapper::EmbeddedDocument
+
+    key :icu, Boolean
+  end
+
+  class Fleet
+    include MarkMapper::Document
+
+    module TransportsExtension
+      def to_be_replaced
+        # for some reason we can't use select
+        find_all { |t| t.purchased_on < 2.years.ago.to_date }
+      end
+    end
+
+    many :transports, :polymorphic => true, :class_name => "TrModels::Transport", :extend => TransportsExtension
+    key :name, String
+  end
+end
+
+module News
+  class Paper
+    include MarkMapper::Document
+  end
+
+  class Article
+    include MarkMapper::Document
+  end
+end
+
+class AltUser
+  include MarkMapper::Document
+end
+
+class Human
+  include MarkMapper::EmbeddedDocument
+
+  key :name, String
+  embedded_in :post
+end
+
+class Robot
+  include MarkMapper::EmbeddedDocument
+
+  key :serial_number, String
+  embedded_in :post
+end