zeng 0.0.1

data/lib/cute_kv/serializers/xml_serializer.rb

@@ -0,0 +1,325 @@
+module CuteKV#:nodoc:
+  module Serialization
+    # Builds an XML document to represent the model. Some configuration is
+    # available through +options+. However more complicated cases should
+    # override ActiveObject::Base#to_xml.
+    #
+    # By default the generated XML document will include the processing
+    # instruction and all the object's attributes. For example:
+    #
+    #   <?xml version="1.0" encoding="UTF-8"?>
+    #   <topic>
+    #     <title>The First Topic</title>
+    #     <author-name>David</author-name>
+    #     <id type="integer">1</id>
+    #     <approved type="boolean">false</approved>
+    #     <replies-count type="integer">0</replies-count>
+    #     <bonus-time type="datetime">2000-01-01T08:28:00+12:00</bonus-time>
+    #     <written-on type="datetime">2003-07-16T09:28:00+1200</written-on>
+    #     <content>Have a nice day</content>
+    #     <author-email-address>david@loudthinking.com</author-email-address>
+    #     <parent-id></parent-id>
+    #     <last-read type="date">2004-04-15</last-read>
+    #   </topic>
+    #
+    # This behavior can be controlled with <tt>:only</tt>, <tt>:except</tt>,
+    # <tt>:skip_instruct</tt>, <tt>:skip_types</tt> and <tt>:dasherize</tt>.
+    # The <tt>:only</tt> and <tt>:except</tt> options are the same as for the
+    # +attributes+ method. The default is to dasherize all column names, but you
+    # can disable this setting <tt>:dasherize</tt> to +false+. To not have the
+    # column type included in the XML output set <tt>:skip_types</tt> to +true+.
+    #
+    # For instance:
+    #
+    #   topic.to_xml(:skip_instruct => true, :except => [ :id, :bonus_time, :written_on, :replies_count ])
+    #
+    #   <topic>
+    #     <title>The First Topic</title>
+    #     <author-name>David</author-name>
+    #     <approved type="boolean">false</approved>
+    #     <content>Have a nice day</content>
+    #     <author-email-address>david@loudthinking.com</author-email-address>
+    #     <parent-id></parent-id>
+    #     <last-read type="date">2004-04-15</last-read>
+    #   </topic>
+    #
+    # To include first level associations use <tt>:include</tt>:
+    #
+    #   firm.to_xml :include => [ :account, :clients ]
+    #
+    #   <?xml version="1.0" encoding="UTF-8"?>
+    #   <firm>
+    #     <id type="integer">1</id>
+    #     <rating type="integer">1</rating>
+    #     <name>37signals</name>
+    #     <clients type="array">
+    #       <client>
+    #         <rating type="integer">1</rating>
+    #         <name>Summit</name>
+    #       </client>
+    #       <client>
+    #         <rating type="integer">1</rating>
+    #         <name>Microsoft</name>
+    #       </client>
+    #     </clients>
+    #     <account>
+    #       <id type="integer">1</id>
+    #       <credit-limit type="integer">50</credit-limit>
+    #     </account>
+    #   </firm>
+    #
+    # To include deeper levels of associations pass a hash like this:
+    #
+    #   firm.to_xml :include => {:account => {}, :clients => {:include => :address}}
+    #   <?xml version="1.0" encoding="UTF-8"?>
+    #   <firm>
+    #     <id type="integer">1</id>
+    #     <rating type="integer">1</rating>
+    #     <name>37signals</name>
+    #     <clients type="array">
+    #       <client>
+    #         <rating type="integer">1</rating>
+    #         <name>Summit</name>
+    #         <address>
+    #           ...
+    #         </address>
+    #       </client>
+    #       <client>
+    #         <rating type="integer">1</rating>
+    #         <name>Microsoft</name>
+    #         <address>
+    #           ...
+    #         </address>
+    #       </client>
+    #     </clients>
+    #     <account>
+    #       <id type="integer">1</id>
+    #       <credit-limit type="integer">50</credit-limit>
+    #     </account>
+    #   </firm>
+    #
+    # To include any methods on the model being called use <tt>:methods</tt>:
+    #
+    #   firm.to_xml :methods => [ :calculated_earnings, :real_earnings ]
+    #
+    #   <firm>
+    #     # ... normal attributes as shown above ...
+    #     <calculated-earnings>100000000000000000</calculated-earnings>
+    #     <real-earnings>5</real-earnings>
+    #   </firm>
+    #
+    # To call any additional Procs use <tt>:procs</tt>. The Procs are passed a
+    # modified version of the options hash that was given to +to_xml+:
+    #
+    #   proc = Proc.new { |options| options[:builder].tag!('abc', 'def') }
+    #   firm.to_xml :procs => [ proc ]
+    #
+    #   <firm>
+    #     # ... normal attributes as shown above ...
+    #     <abc>def</abc>
+    #   </firm>
+    #
+    # Alternatively, you can yield the builder object as part of the +to_xml+ call:
+    #
+    #   firm.to_xml do |xml|
+    #     xml.creator do
+    #       xml.first_name "David"
+    #       xml.last_name "Heinemeier Hansson"
+    #     end
+    #   end
+    #
+    #   <firm>
+    #     # ... normal attributes as shown above ...
+    #     <creator>
+    #       <first_name>David</first_name>
+    #       <last_name>Heinemeier Hansson</last_name>
+    #     </creator>
+    #   </firm>
+    #
+    # As noted above, you may override +to_xml+ in your ActiveObject::Base
+    # subclasses to have complete control about what's generated. The general
+    # form of doing this is:
+    #
+    #   class IHaveMyOwnXML < ActiveObject::Base
+    #     def to_xml(options = {})
+    #       options[:indent] ||= 2
+    #       xml = options[:builder] ||= Builder::XmlMarkup.new(:indent => options[:indent])
+    #       xml.instruct! unless options[:skip_instruct]
+    #       xml.level_one do
+    #         xml.tag!(:second_level, 'content')
+    #       end
+    #     end
+    #   end
+    def to_xml(options = {}, &block)
+      serializer = XmlSerializer.new(self, options)
+      block_given? ? serializer.to_s(&block) : serializer.to_s
+    end
+
+  end
+
+  class XmlSerializer < CuteKV::Serialization::Serializer #:nodoc:
+    def builder
+      @builder ||= begin
+        options[:indent] ||= 2
+        builder = options[:builder] ||= Builder::XmlMarkup.new(:indent => options[:indent])
+
+        unless options[:skip_instruct]
+          builder.instruct!
+          options[:skip_instruct] = true
+        end
+
+        builder
+      end
+    end
+
+    def root
+      root = (options[:root] || @object.class.to_s.underscore).to_s
+      dasherize? ? root.dasherize : root
+    end
+
+    def dasherize?
+      !options.has_key?(:dasherize) || options[:dasherize]
+    end
+
+    def serializable_attributes
+      serializable_attribute_names.collect { |name| Attribute.new(name.to_s, @object) }
+    end
+
+    def serializable_method_attributes
+      Array(options[:methods]).inject([]) do |method_attributes, name|
+        method_attributes << MethodAttribute.new(name.to_s, @object) if @object.respond_to?(name.to_s)
+        method_attributes
+      end
+    end
+
+    def add_attributes
+      (serializable_attributes + serializable_method_attributes).each do |attribute|
+        add_tag(attribute)
+      end
+    end
+
+    def add_procs
+      if procs = options.delete(:procs)
+        [ *procs ].each do |proc|
+          proc.call(options)
+        end
+      end
+    end
+
+    def add_tag(attribute)
+      builder.tag!(
+        dasherize? ? attribute.name.dasherize : attribute.name,
+        attribute.value.to_s,
+        attribute.decorations(!options[:skip_types])
+      )
+    end
+
+    def add_associations(association, objects, opts)
+      if objects.is_a?(Enumerable)
+        tag = association.to_s
+        tag = tag.dasherize if dasherize?
+        if objects.empty?
+          builder.tag!(tag, :type => :array)
+        else
+          builder.tag!(tag, :type => :array) do
+            association_name = association.to_s.singularize
+            objects.each do |object|
+              object.to_xml opts.merge(
+                :root => association_name,
+                :type => (object.class.to_s.underscore == association_name ? nil : object.class.name)
+              )
+            end
+          end
+        end
+      else
+        if object = @object.send(association)
+          object.to_xml(opts.merge(:root => association))
+        end
+      end
+    end
+
+    def serialize
+      args = [root]
+      if options[:namespace]
+        args << {:xmlns=>options[:namespace]}
+      end
+
+      if options[:type]
+        args << {:type=>options[:type]}
+      end
+
+      builder.tag!(*args) do
+        add_attributes
+        procs = options.delete(:procs)
+        add_includes { |association, objects, opts| add_associations(association, objects, opts) }
+        options[:procs] = procs
+        add_procs
+        yield builder if block_given?
+      end
+    end
+
+    class Attribute #:nodoc:
+      attr_reader :name, :value, :type
+
+      def initialize(name, object)
+        @name, @object = name, object
+
+        @type  = compute_type
+        @value = compute_value
+      end
+
+      # There is a significant speed improvement if the value
+      # does not need to be escaped, as <tt>tag!</tt> escapes all values
+      # to ensure that valid XML is generated. For known binary
+      # values, it is at least an order of magnitude faster to
+      # Base64 encode binary values and directly put them in the
+      # output XML than to pass the original value or the Base64
+      # encoded value to the <tt>tag!</tt> method. It definitely makes
+      # no sense to Base64 encode the value and then give it to
+      # <tt>tag!</tt>, since that just adds additional overhead.
+      def needs_encoding?
+        ![ :binary, :date, :datetime, :boolean, :float, :integer ].include?(type)
+      end
+
+      def decorations(include_types = true)
+        decorations = {}
+
+        if type == :binary
+          decorations[:encoding] = 'base64'
+        end
+
+        if include_types && type != :string
+          decorations[:type] = type
+        end
+
+        if value.nil?
+          decorations[:nil] = true
+        end
+
+        decorations
+      end
+
+      protected
+        def compute_type
+          type = @object.send(name).class
+        end
+
+        def compute_value
+          value = @object.send(name)
+
+          if formatter = Hash::XML_FORMATTING[type.to_s]
+            value ? formatter.call(value) : nil
+          else
+            value
+          end
+        end
+    end
+
+    class MethodAttribute < Attribute #:nodoc:
+      protected
+        def compute_type
+          Hash::XML_TYPE_NAMES[@object.send(name).class.name] || :string
+        end
+    end
+  end
+end

data/lib/cute_kv/timestamp.rb

@@ -0,0 +1,56 @@
+module CuteKV
+	# CuteKV automatically timestamps create and update operations if the table has fields
+	# named created_at/created_on or updated_at/updated_on.
+	#
+	# Timestamping can be turned off by setting
+	#   <tt>ActiveRecord::Base.record_timestamps = false</tt>
+	#
+	# Timestamps are in the local timezone by default but you can use UTC by setting
+	#   <tt>CuteKV::Timestampes.default_timezone == :utc</tt>
+	module Timestamp
+
+		def self.included(base) #:nodoc:
+			base.extend ClassMethods
+			base.alias_method_chain :save, :timestamps
+		end
+
+
+
+		module ClassMethods
+			def default_timezone
+				@timezone = Timestamp::default_timezone
+				@timezone.to_sym
+			end
+
+			def add_timestamps
+				assign(:created_at, :updated_at) unless already_has_timestamp?
+			end
+
+			def already_has_timestamp?
+				attrs = self.assigned_attributes
+				attrs.include?(:created_at) && attrs.include?(:updated_at) 
+			end
+
+		end
+
+		private
+
+		def save_with_timestamps #:nodoc:
+			t = self.class.default_timezone == :utc ? DateTime.now.utc : DateTime.now
+			self.created_at ||= t if self.respond_to?(:created_at)
+			self.updated_at = t if self.respond_to?(:updated_at)
+			save_without_timestamps
+		end
+
+
+		class << self
+
+			def default_timezone
+				@default_tz ||= :utc
+			end
+
+		end
+
+	end
+
+end

data/lib/cute_kv/validations.rb

@@ -0,0 +1,68 @@
+module CuteKV
+
+  module Validations
+
+    def self.included(base)
+      base.extend ClassMethods
+      base.send :include, InstanceMethods
+      base.class_eval { alias_method :validated, :save; alias_method :save, :validating }
+    end
+
+    class Error
+
+      def initialize
+        @body = Hash.new {|h,k| h[k] = []}
+      end
+
+      def add(attr, mesg)
+        attr = attr.to_s
+        @body[attr] << mesg unless @body[attr].include?(mesg)
+      end
+
+      def on(attr)
+        attr = attr.to_s
+        @body[attr].size == 1 ? @body[attr].first : @body[attr]
+      end
+
+      def empty?
+        @body.values.flatten.empty?
+      end
+
+    end
+
+    module InstanceMethods
+
+      def validating
+        self.class.validations.each {|v| self.send v}
+        valid? ? validated : nil
+      end
+
+      def errors
+        @errors ||= Error.new
+      end
+
+      def valid?
+        self.errors.empty?
+      end
+
+      def errors_message_on(attr)
+        self.errors.on(attr)
+      end
+
+    end
+
+    module ClassMethods
+
+      def validate(validate_process)
+        (@validations ||=[]) << validate_process
+      end
+
+      def validations
+        (@validations ||=[]).dup
+      end
+
+    end
+
+  end
+
+end

data/lib/cutekv.rb

@@ -0,0 +1,17 @@
+$:.unshift(File.dirname(__FILE__)) unless
+  $:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+
+require 'rubygems'
+require 'lightcloud'
+require 'active_support'
+require 'cute_kv/ext/string'
+require 'cute_kv/ext/symbol'
+require 'cute_kv/document'
+require 'cute_kv/validations'
+require 'cute_kv/connector'
+require 'cute_kv/associations'
+require 'cute_kv/indexer'
+require 'cute_kv/serialization'
+require 'cute_kv/connector'
+require 'cute_kv/timestamp'
+

data/spec/asso.yml

@@ -0,0 +1,23 @@
+ -
+  Book:
+   owner
+  User:
+   books
+ -
+  User:
+   project
+  Project:
+   master
+ -
+  User:
+   projects
+  Project:
+   members
+ -
+  User:
+   icon
+  Icon:
+   user
+ 
+
+

data/spec/asso_sin_plural.yml

@@ -0,0 +1,36 @@
+ -
+  Book:
+   owner
+  User:
+   book
+  plural:
+   book
+  singular:
+   owner
+ -
+  User:
+   projects
+  Project:
+   members
+  plural:
+   projects
+   members
+ -
+  User:
+   icons
+  Icon:
+   users
+  singular:
+    icons
+    users
+ -
+  User:
+   husband
+   wife
+ -
+  User:
+   friends
+ 
+  
+
+