506 lines
No EOL
17 KiB
Ruby
506 lines
No EOL
17 KiB
Ruby
require 'rubygems'
|
|
require 'extlib'
|
|
require 'digest/md5'
|
|
require File.dirname(__FILE__) + '/document'
|
|
# = CouchRest::Model - ORM, the CouchDB way
|
|
module CouchRest
|
|
# = CouchRest::Model - ORM, the CouchDB way
|
|
#
|
|
# CouchRest::Model provides an ORM-like interface for CouchDB documents. It
|
|
# avoids all usage of <tt>method_missing</tt>, and tries to strike a balance
|
|
# between usability and magic. See CouchRest::Model#view_by for
|
|
# documentation about the view-generation system.
|
|
#
|
|
# ==== Example
|
|
#
|
|
# This is an example class using CouchRest::Model. It is taken from the
|
|
# spec/couchrest/core/model_spec.rb file, which may be even more up to date
|
|
# than this example.
|
|
#
|
|
# class Article < CouchRest::Model
|
|
# use_database CouchRest.database!('http://localhost:5984/couchrest-model-test')
|
|
# unique_id :slug
|
|
#
|
|
# view_by :date, :descending => true
|
|
# view_by :user_id, :date
|
|
#
|
|
# view_by :tags,
|
|
# :map =>
|
|
# "function(doc) {
|
|
# if (doc['couchrest-type'] == 'Article' && doc.tags) {
|
|
# doc.tags.forEach(function(tag){
|
|
# emit(tag, 1);
|
|
# });
|
|
# }
|
|
# }",
|
|
# :reduce =>
|
|
# "function(keys, values, rereduce) {
|
|
# return sum(values);
|
|
# }"
|
|
#
|
|
# key_writer :date
|
|
# key_reader :slug, :created_at, :updated_at
|
|
# key_accessor :title, :tags
|
|
#
|
|
# timestamps!
|
|
#
|
|
# before(:create, :generate_slug_from_title)
|
|
# def generate_slug_from_title
|
|
# self['slug'] = title.downcase.gsub(/[^a-z0-9]/,'-').squeeze('-').gsub(/^\-|\-$/,'')
|
|
# end
|
|
# end
|
|
#
|
|
# ==== Examples of finding articles with these views:
|
|
#
|
|
# * All the articles by Barney published in the last 24 hours. Note that we
|
|
# use <tt>{}</tt> as a special value that sorts after all strings,
|
|
# numbers, and arrays.
|
|
#
|
|
# Article.by_user_id_and_date :startkey => ["barney", Time.now - 24 * 3600], :endkey => ["barney", {}]
|
|
#
|
|
# * The most recent 20 articles. Remember that the <tt>view_by :date</tt>
|
|
# has the default option <tt>:descending => true</tt>.
|
|
#
|
|
# Article.by_date :count => 20
|
|
#
|
|
# * The raw CouchDB view reduce result for the custom <tt>:tags</tt> view.
|
|
# In this case we'll get a count of the number of articles tagged "ruby".
|
|
#
|
|
# Article.by_tags :key => "ruby", :reduce => true
|
|
#
|
|
class Model < Document
|
|
|
|
# instantiates the hash by converting all the keys to strings.
|
|
def initialize keys = {}
|
|
super(keys)
|
|
apply_defaults
|
|
cast_keys
|
|
unless self['_id'] && self['_rev']
|
|
self['couchrest-type'] = self.class.to_s
|
|
end
|
|
end
|
|
|
|
# this is the CouchRest::Database that model classes will use unless
|
|
# they override it with <tt>use_database</tt>
|
|
cattr_accessor :default_database
|
|
|
|
class_inheritable_accessor :casts
|
|
class_inheritable_accessor :default_obj
|
|
class_inheritable_accessor :class_database
|
|
class_inheritable_accessor :design_doc
|
|
class_inheritable_accessor :design_doc_slug_cache
|
|
class_inheritable_accessor :design_doc_fresh
|
|
|
|
class << self
|
|
# override the CouchRest::Model-wide default_database
|
|
def use_database db
|
|
self.class_database = db
|
|
end
|
|
|
|
# returns the CouchRest::Database instance that this class uses
|
|
def database
|
|
self.class_database || CouchRest::Model.default_database
|
|
end
|
|
|
|
# Load a document from the database by id
|
|
def get id
|
|
doc = database.get id
|
|
new(doc)
|
|
end
|
|
|
|
# Load all documents that have the "couchrest-type" field equal to the
|
|
# name of the current class. Take thes the standard set of
|
|
# CouchRest::Database#view options.
|
|
def all opts = {}, &block
|
|
self.design_doc ||= Design.new(default_design_doc)
|
|
unless design_doc_fresh
|
|
refresh_design_doc
|
|
end
|
|
# view_name = "#{design_doc_slug}/all"
|
|
# raw = opts.delete(:raw)
|
|
# fetch_view_with_docs(view_name, opts, raw)
|
|
view :all, opts, &block
|
|
end
|
|
|
|
# Cast a field as another class. The class must be happy to have the
|
|
# field's primitive type as the argument to it's constucture. Classes
|
|
# which inherit from CouchRest::Model are happy to act as sub-objects
|
|
# for any fields that are stored in JSON as object (and therefore are
|
|
# parsed from the JSON as Ruby Hashes).
|
|
def cast field, opts = {}
|
|
self.casts ||= {}
|
|
self.casts[field.to_s] = opts
|
|
end
|
|
|
|
# Defines methods for reading and writing from fields in the document.
|
|
# Uses key_writer and key_reader internally.
|
|
def key_accessor *keys
|
|
key_writer *keys
|
|
key_reader *keys
|
|
end
|
|
|
|
# For each argument key, define a method <tt>key=</tt> that sets the
|
|
# corresponding field on the CouchDB document.
|
|
def key_writer *keys
|
|
keys.each do |method|
|
|
key = method.to_s
|
|
define_method "#{method}=" do |value|
|
|
self[key] = value
|
|
end
|
|
end
|
|
end
|
|
|
|
# For each argument key, define a method <tt>key</tt> that reads the
|
|
# corresponding field on the CouchDB document.
|
|
def key_reader *keys
|
|
keys.each do |method|
|
|
key = method.to_s
|
|
define_method method do
|
|
self[key]
|
|
end
|
|
end
|
|
end
|
|
|
|
def default
|
|
self.default_obj
|
|
end
|
|
|
|
def set_default hash
|
|
self.default_obj = hash
|
|
end
|
|
|
|
# Automatically set <tt>updated_at</tt> and <tt>created_at</tt> fields
|
|
# on the document whenever saving occurs. CouchRest uses a pretty
|
|
# decent time format by default. See Time#to_json
|
|
def timestamps!
|
|
before(:create) do
|
|
self['updated_at'] = self['created_at'] = Time.now
|
|
end
|
|
before(:update) do
|
|
self['updated_at'] = Time.now
|
|
end
|
|
end
|
|
|
|
# Name a method that will be called before the document is first saved,
|
|
# which returns a string to be used for the document's <tt>_id</tt>.
|
|
# Because CouchDB enforces a constraint that each id must be unique,
|
|
# this can be used to enforce eg: uniq usernames. Note that this id
|
|
# must be globally unique across all document types which share a
|
|
# database, so if you'd like to scope uniqueness to this class, you
|
|
# should use the class name as part of the unique id.
|
|
def unique_id method = nil, &block
|
|
if method
|
|
define_method :set_unique_id do
|
|
self['_id'] ||= self.send(method)
|
|
end
|
|
elsif block
|
|
define_method :set_unique_id do
|
|
uniqid = block.call(self)
|
|
raise ArgumentError, "unique_id block must not return nil" if uniqid.nil?
|
|
self['_id'] ||= uniqid
|
|
end
|
|
end
|
|
end
|
|
|
|
# Define a CouchDB view. The name of the view will be the concatenation
|
|
# of <tt>by</tt> and the keys joined by <tt>_and_</tt>
|
|
#
|
|
# ==== Example views:
|
|
#
|
|
# class Post
|
|
# # view with default options
|
|
# # query with Post.by_date
|
|
# view_by :date, :descending => true
|
|
#
|
|
# # view with compound sort-keys
|
|
# # query with Post.by_user_id_and_date
|
|
# view_by :user_id, :date
|
|
#
|
|
# # view with custom map/reduce functions
|
|
# # query with Post.by_tags :reduce => true
|
|
# view_by :tags,
|
|
# :map =>
|
|
# "function(doc) {
|
|
# if (doc['couchrest-type'] == 'Post' && doc.tags) {
|
|
# doc.tags.forEach(function(tag){
|
|
# emit(doc.tag, 1);
|
|
# });
|
|
# }
|
|
# }",
|
|
# :reduce =>
|
|
# "function(keys, values, rereduce) {
|
|
# return sum(values);
|
|
# }"
|
|
# end
|
|
#
|
|
# <tt>view_by :date</tt> will create a view defined by this Javascript
|
|
# function:
|
|
#
|
|
# function(doc) {
|
|
# if (doc['couchrest-type'] == 'Post' && doc.date) {
|
|
# emit(doc.date, null);
|
|
# }
|
|
# }
|
|
#
|
|
# It can be queried by calling <tt>Post.by_date</tt> which accepts all
|
|
# valid options for CouchRest::Database#view. In addition, calling with
|
|
# the <tt>:raw => true</tt> option will return the view rows
|
|
# themselves. By default <tt>Post.by_date</tt> will return the
|
|
# documents included in the generated view.
|
|
#
|
|
# CouchRest::Database#view options can be applied at view definition
|
|
# time as defaults, and they will be curried and used at view query
|
|
# time. Or they can be overridden at query time.
|
|
#
|
|
# Custom views can be queried with <tt>:reduce => true</tt> to return
|
|
# reduce results. The default for custom views is to query with
|
|
# <tt>:reduce => false</tt>.
|
|
#
|
|
# Views are generated (on a per-model basis) lazily on first-access.
|
|
# This means that if you are deploying changes to a view, the views for
|
|
# that model won't be available until generation is complete. This can
|
|
# take some time with large databases. Strategies are in the works.
|
|
#
|
|
# To understand the capabilities of this view system more compeletly,
|
|
# it is recommended that you read the RSpec file at
|
|
# <tt>spec/core/model_spec.rb</tt>.
|
|
|
|
def view_by *keys
|
|
self.design_doc ||= Design.new(default_design_doc)
|
|
opts = keys.pop if keys.last.is_a?(Hash)
|
|
opts ||= {}
|
|
ducktype = opts.delete(:ducktype)
|
|
# if ducktype
|
|
# end
|
|
keys.push opts
|
|
self.design_doc.view_by(*keys)
|
|
self.design_doc_fresh = false
|
|
end
|
|
|
|
# def view_by *keys
|
|
# opts = keys.pop if keys.last.is_a?(Hash)
|
|
# opts ||= {}
|
|
#
|
|
#
|
|
# type = self.to_s
|
|
#
|
|
# method_name = "by_#{keys.join('_and_')}"
|
|
# self.generated_design_doc ||= default_design_doc
|
|
# ducktype = opts.delete(:ducktype)
|
|
# if opts[:map]
|
|
# view = {}
|
|
# view['map'] = opts.delete(:map)
|
|
# if opts[:reduce]
|
|
# view['reduce'] = opts.delete(:reduce)
|
|
# opts[:reduce] = false
|
|
# end
|
|
# generated_design_doc['views'][method_name] = view
|
|
# else
|
|
# doc_keys = keys.collect{|k|"doc['#{k}']"}
|
|
# key_protection = doc_keys.join(' && ')
|
|
# key_emit = doc_keys.length == 1 ? "#{doc_keys.first}" : "[#{doc_keys.join(', ')}]"
|
|
# map_function = <<-JAVASCRIPT
|
|
# function(doc) {
|
|
# if (#{!ducktype ? "doc['couchrest-type'] == '#{type}' && " : ""}#{key_protection}) {
|
|
# emit(#{key_emit}, null);
|
|
# }
|
|
# }
|
|
# JAVASCRIPT
|
|
# generated_design_doc['views'][method_name] = {
|
|
# 'map' => map_function
|
|
# }
|
|
# end
|
|
# generated_design_doc['views'][method_name]['couchrest-defaults'] = opts
|
|
# self.design_doc_fresh = false
|
|
# method_name
|
|
# end
|
|
|
|
def method_missing m, *args
|
|
if has_view?(m)
|
|
query = args.shift || {}
|
|
view(m, query, *args)
|
|
else
|
|
super
|
|
end
|
|
end
|
|
|
|
# returns stored defaults if the there is a view named this in the design doc
|
|
def has_view?(view)
|
|
view = view.to_s
|
|
design_doc && design_doc['views'] && design_doc['views'][view]
|
|
end
|
|
|
|
# # Fetch the generated design doc. Could raise an error if the generated
|
|
# # views have not been queried yet.
|
|
# def design_doc
|
|
# database.get("_design/#{design_doc_slug}")
|
|
# end
|
|
|
|
# Dispatches to any named view.
|
|
def view name, query={}, &block
|
|
unless design_doc_fresh
|
|
refresh_design_doc
|
|
end
|
|
query[:raw] = true if query[:reduce]
|
|
raw = query.delete(:raw)
|
|
fetch_view_with_docs(name, query, raw, &block)
|
|
end
|
|
|
|
private
|
|
|
|
def fetch_view_with_docs name, opts, raw=false, &block
|
|
if raw
|
|
fetch_view name, opts, &block
|
|
else
|
|
begin
|
|
view = fetch_view name, opts.merge({:include_docs => true}), &block
|
|
view['rows'].collect{|r|new(r['doc'])} if view['rows']
|
|
rescue
|
|
# fallback for old versions of couchdb that don't
|
|
# have include_docs support
|
|
view = fetch_view name, opts, &block
|
|
view['rows'].collect{|r|new(database.get(r['id']))} if view['rows']
|
|
end
|
|
end
|
|
end
|
|
|
|
def fetch_view view_name, opts, &block
|
|
retryable = true
|
|
begin
|
|
design_doc.view(view_name, opts, &block)
|
|
# the design doc could have been deleted by a rouge process
|
|
rescue RestClient::ResourceNotFound => e
|
|
if retryable
|
|
refresh_design_doc
|
|
retryable = false
|
|
retry
|
|
else
|
|
raise e
|
|
end
|
|
end
|
|
end
|
|
|
|
def design_doc_slug
|
|
return design_doc_slug_cache if design_doc_slug_cache && design_doc_fresh
|
|
funcs = []
|
|
design_doc['views'].each do |name, view|
|
|
funcs << "#{name}/#{view['map']}#{view['reduce']}"
|
|
end
|
|
md5 = Digest::MD5.hexdigest(funcs.sort.join(''))
|
|
self.design_doc_slug_cache = "#{self.to_s}-#{md5}"
|
|
end
|
|
|
|
def default_design_doc
|
|
{
|
|
"language" => "javascript",
|
|
"views" => {
|
|
'all' => {
|
|
'map' => "function(doc) {
|
|
if (doc['couchrest-type'] == '#{self.to_s}') {
|
|
emit(null,null);
|
|
}
|
|
}"
|
|
}
|
|
}
|
|
}
|
|
end
|
|
|
|
def refresh_design_doc
|
|
did = "_design/#{design_doc_slug}"
|
|
saved = database.get(did) rescue nil
|
|
if saved
|
|
design_doc['views'].each do |name, view|
|
|
saved['views'][name] = view
|
|
end
|
|
database.save(saved)
|
|
else
|
|
design_doc['_id'] = did
|
|
design_doc.delete('_rev')
|
|
design_doc.database = database
|
|
design_doc.save
|
|
end
|
|
self.design_doc_fresh = true
|
|
end
|
|
|
|
end # class << self
|
|
|
|
# returns the database used by this model's class
|
|
def database
|
|
self.class.database
|
|
end
|
|
|
|
# Takes a hash as argument, and applies the values by using writer methods
|
|
# for each key. Raises a NoMethodError if the corresponding methods are
|
|
# missing. In case of error, no attributes are changed.
|
|
def update_attributes hash
|
|
hash.each do |k, v|
|
|
raise NoMethodError, "#{k}= method not available, use key_accessor or key_writer :#{k}" unless self.respond_to?("#{k}=")
|
|
end
|
|
hash.each do |k, v|
|
|
self.send("#{k}=",v)
|
|
end
|
|
save
|
|
end
|
|
|
|
# for compatibility with old-school frameworks
|
|
alias :new_record? :new_document?
|
|
|
|
# We override this to create the create and update callback opportunities.
|
|
# I think we should drop those and just have save. If you care, in your callback,
|
|
# check new_document?
|
|
def save actually=false
|
|
if actually
|
|
super()
|
|
else
|
|
if new_document?
|
|
create
|
|
else
|
|
update
|
|
end
|
|
end
|
|
end
|
|
|
|
def update
|
|
save :actually
|
|
end
|
|
|
|
def create
|
|
# can we use the callbacks for this?
|
|
set_unique_id if self.respond_to?(:set_unique_id)
|
|
save :actually
|
|
end
|
|
|
|
private
|
|
|
|
def apply_defaults
|
|
if self.class.default
|
|
self.class.default.each do |k,v|
|
|
self[k] = v
|
|
end
|
|
end
|
|
end
|
|
|
|
def cast_keys
|
|
return unless self.class.casts
|
|
# TODO move the argument checking to the cast method for early crashes
|
|
self.class.casts.each do |k,v|
|
|
next unless self[k]
|
|
target = v[:as]
|
|
if target.is_a?(Array)
|
|
klass = ::Extlib::Inflection.constantize(target[0])
|
|
self[k] = self[k].collect do |value|
|
|
klass.new(value)
|
|
end
|
|
else
|
|
self[k] = ::Extlib::Inflection.constantize(target).new(self[k])
|
|
end
|
|
end
|
|
end
|
|
|
|
include ::Extlib::Hook
|
|
# todo: drop create and update hooks...
|
|
# (use new_record? in callbacks if you care)
|
|
register_instance_hooks :save, :create, :update, :destroy
|
|
|
|
end # class Model
|
|
end # module CouchRest |