croesus 0.1.3

data/lib/croesus/associations.rb

@@ -0,0 +1,46 @@
+# encoding: UTF-8
+#
+# Author: Stefano Harding <riddopic@gmail.com>
+#
+# Copyright (C) 2014 Stefano Harding
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+#
+
+module Croesus::Associations
+
+  def has_many(resource, options = {})
+    class_name = options[:class_name] || "Croesus::#{resource.to_s.classify}"
+
+    class_eval do
+      define_method resource do
+        instance_variable_get("@#{resource}") ||
+          instance_variable_set("@#{resource}", Croesus::ResourceCollection.new(
+            class_name.constantize, self.satisfaction, options[:url]))
+      end
+    end
+  end
+
+  def belongs_to(resource, options = {})
+    class_name = options[:class_name] || "Croesus::#{resource.to_s.classify}"
+    parent_id = options[:parent_attribute] || "#{resource}_id"
+
+    class_eval do
+      define_method resource do
+        instance_variable_get("@#{resource}") ||
+          instance_variable_set("@#{resource}",
+            class_name.constantize.new(parent_id, self.satisfaction))
+      end
+    end
+  end
+end

data/lib/croesus/attribute.rb

@@ -0,0 +1,41 @@
+# encoding: UTF-8
+#
+# Author: Stefano Harding <riddopic@gmail.com>
+#
+# Copyright (C) 2014 Stefano Harding
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+#
+
+module Croesus
+  # A single attribute that is attached to a model
+  class Attribute
+    attr_reader :type
+
+    # @param type [Class] the class this attribute represents
+    # @param options [Hash] extra options that can be prescribed
+    def initialize(type = String, options = {})
+      @type = type
+
+      if options[:default].is_a?(Proc)
+        @default = options[:default]
+      else
+        @default = -> { options[:default] }
+      end
+    end
+
+    def default
+      @default.call
+    end
+  end
+end

data/lib/croesus/attributes.rb

@@ -0,0 +1,93 @@
+# encoding: UTF-8
+#
+# Author: Stefano Harding <riddopic@gmail.com>
+#
+# Copyright (C) 2014 Stefano Harding
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+#
+
+module Croesus
+  class Attributes
+    # @param params [Hash] the parameters you wish to initialize the model
+    #    with. If the model does not have an accessor set, it will ignore
+    #    the attribute passed.
+    def initialize(attributes = {})
+      self.attributes = attributes
+    end
+
+    # Sets the attributes on the model
+    # @param attributes [Hash]
+    def attributes=(attributes = {})
+      attributes.each do |attr, value|
+        self.send("#{attr}=", value) if self.respond_to?("#{attr}=")
+      end
+    end
+
+    # Get and ser the attributes on the model.
+    #
+    # @return [Hash]
+    def attributes
+      hash = {}
+      self.class.attributes.keys.each do |k|
+        hash[k] = send(k) if respond_to?(k)
+      end
+      hash
+    end
+
+    def to_h
+      self.attributes
+    end
+
+    def self.attributes
+      @attributes ||= {}
+    end
+
+    # @override
+    def self.attr_accessor(*args)
+      args.each { |name| self.attributes[name] = Attribute.new(Object) }
+      super
+    end
+
+    # Declares an attribute on the model
+    #
+    # @param name [String]
+    # @param type [Class] a class that represents the type
+    # @param options [Hash] extra options to apply to the attribute
+    def self.attribute(name, type=String, options={})
+      config = { writer: true, reader: true }.merge(options)
+
+      attr = Attribute.new(type, options)
+      self.attributes[name] = attr
+      variable = "@#{name}"
+
+      if config[:writer]
+        define_method("#{name}=") do |object|
+          val = Croesus.coercer.coerce(object, attr.type)
+          instance_variable_set(variable, val)
+        end
+      end
+
+      if config[:reader]
+        define_method(name) do
+          val = instance_variable_get(variable)
+          unless val
+            val = attr.default
+            instance_variable_set(variable, val)
+          end
+          val
+        end
+      end
+    end # def self.attribute
+  end # class Attributes
+end # module Croesus

data/lib/croesus/coerce.rb

@@ -0,0 +1,110 @@
+# encoding: UTF-8
+#
+# Author: Stefano Harding <riddopic@gmail.com>
+#
+# Copyright (C) 2014 Stefano Harding
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+#
+
+module Croesus
+  # The class that coerces objects based on the definitions that are registered
+  # with it.
+  class Coercer
+    def initialize
+      @coercions = Hash.new do |hash, origin|
+        hash[origin] = Hash.new do |h, target|
+          h[target] = Coercion.new(origin, target)
+        end
+      end
+      @mutex = Mutex.new
+    end
+
+    # Registers a coercion with the Croesus library
+    #
+    # @param origin [Class] the class to convert
+    # @param target [Class] what the origin will be converted to
+    def register(origin, target, &block)
+      raise(ArgumentError, 'block is required') unless block_given?
+
+      @mutex.synchronize do
+        @coercions[origin][target] = Coercion.new(origin, target, &block)
+      end
+    end
+
+    # Removes a coercion from the library
+    #
+    # @param origin [Class]
+    # @param target [Class]
+    def unregister(origin, target)
+      @mutex.synchronize do
+        @coercions[origin].delete(target)
+      end
+    end
+
+    # @param object [Object] the object to coerce
+    # @param target [Class] what you want the object to turn in to
+    def coerce(object, target)
+      @mutex.synchronize do
+        @coercions[object.class][target].call(object)
+      end
+    end
+  end
+
+  # This wraps the block that is provided when you register a coercion.
+  class Coercion
+    # Just passes the object on through
+    PASS_THROUGH = ->(obj, _) { obj }
+
+    # @param origin [Class] the class that the object is
+    # @param target [Class] the class you wish to coerce to
+    def initialize(origin, target, &block)
+      @origin  = origin
+      @target  = target
+      @block   = block_given? ? block : PASS_THROUGH
+    end
+
+    # Calls the coercion
+    #
+    # @return [Object]
+    def call(object)
+      @block.call(object, @target)
+    end
+  end
+end
+
+%w(
+  date_definitions
+  date_time_definitions
+  fixnum_definitions
+  float_definitions
+  integer_definitions
+  string_definitions
+  time_definitions
+  hash_definitions
+  boolean_definitions
+).each { |file| require File.join('croesus/coercions/', file) }
+
+module Croesus::Coercions
+  def self.bind_to(coercer)
+    Croesus::Coercions::DateDefinitions.bind_to(coercer)
+    Croesus::Coercions::DateTimeDefinitions.bind_to(coercer)
+    Croesus::Coercions::FixnumDefinitions.bind_to(coercer)
+    Croesus::Coercions::FloatDefinitions.bind_to(coercer)
+    Croesus::Coercions::IntegerDefinitions.bind_to(coercer)
+    Croesus::Coercions::StringDefinitions.bind_to(coercer)
+    Croesus::Coercions::TimeDefinitions.bind_to(coercer)
+    Croesus::Coercions::HashDefinitions.bind_to(coercer)
+    Croesus::Coercions::BooleanDefinitions.bind_to(coercer)
+  end
+end

data/lib/croesus/coercions/boolean_definitions.rb

@@ -0,0 +1,32 @@
+# encoding: UTF-8
+#
+# Author: Stefano Harding <riddopic@gmail.com>
+#
+# Copyright (C) 2014 Stefano Harding
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+#
+
+unless defined?(Boolean)
+  class Boolean
+  end
+end
+
+module Croesus::Coercions
+  class BooleanDefinitions
+    def self.bind_to(coercer)
+      coercer.register(TrueClass, String) { |o, _| 'true' }
+      coercer.register(FalseClass, String) { |o, _| 'false' }
+    end
+  end
+end

data/lib/croesus/coercions/date_definitions.rb

@@ -0,0 +1,30 @@
+# encoding: UTF-8
+#
+# Author: Stefano Harding <riddopic@gmail.com>
+#
+# Copyright (C) 2014 Stefano Harding
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+#
+
+module Croesus::Coercions
+  class DateDefinitions
+    def self.bind_to(coercer)
+      coercer.register(Date, Time)     { |obj, _| obj.to_time }
+      coercer.register(Date, DateTime) { |obj, _| obj.to_datetime }
+      coercer.register(Date, Integer)  { |obj, _| obj.to_time.to_i }
+      coercer.register(Date, Float)    { |obj, _| obj.to_time.to_f }
+      coercer.register(Date, String)   { |obj, _| obj.to_s }
+    end
+  end
+end

data/lib/croesus/coercions/date_time_definitions.rb

@@ -0,0 +1,30 @@
+# encoding: UTF-8
+#
+# Author: Stefano Harding <riddopic@gmail.com>
+#
+# Copyright (C) 2014 Stefano Harding
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+#
+
+module Croesus::Coercions
+  class DateTimeDefinitions
+    def self.bind_to(coercer)
+      coercer.register(DateTime, Time)     { |obj, _| obj.to_time }
+      coercer.register(DateTime, Date)     { |obj, _| obj.to_date }
+      coercer.register(DateTime, Integer)  { |obj, _| obj.to_time.to_i }
+      coercer.register(DateTime, Float)    { |obj, _| obj.to_time.to_f }
+      coercer.register(DateTime, String)   { |obj, _| obj.to_s }
+    end
+  end
+end

data/lib/croesus/coercions/fixnum_definitions.rb

@@ -0,0 +1,32 @@
+# encoding: UTF-8
+#
+# Author: Stefano Harding <riddopic@gmail.com>
+#
+# Copyright (C) 2014 Stefano Harding
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+#
+
+module Croesus::Coercions
+  class FixnumDefinitions
+    def self.bind_to(coercer)
+      coercer.register(Fixnum, String)   { |obj, _| obj.to_s }
+      coercer.register(Fixnum, Time)     { |obj, _| Time.at(obj) }
+      coercer.register(Fixnum, Date)     { |obj, _| Time.at(obj).to_date }
+      coercer.register(Fixnum, DateTime) { |obj, _| Time.at(obj).to_datetime }
+      coercer.register(Fixnum, String)   { |obj, _| obj.to_s }
+      coercer.register(Fixnum, Integer)  { |obj, _| obj.to_i }
+      coercer.register(Fixnum, Float)    { |obj, _| obj.to_f }
+    end
+  end
+end

data/lib/croesus/coercions/float_definitions.rb

@@ -0,0 +1,30 @@
+# encoding: UTF-8
+#
+# Author: Stefano Harding <riddopic@gmail.com>
+#
+# Copyright (C) 2014 Stefano Harding
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+#
+
+module Croesus::Coercions
+  class FloatDefinitions
+    def self.bind_to(coercer)
+      coercer.register(Float, Time)     { |obj, _| Time.at(obj) }
+      coercer.register(Float, Date)     { |obj, _| Time.at(obj).to_date }
+      coercer.register(Float, DateTime) { |obj, _| Time.at(obj).to_datetime }
+      coercer.register(Float, String)   { |obj, _| obj.to_s }
+      coercer.register(Float, Integer)  { |obj, _| obj.to_i }
+    end
+  end
+end

data/lib/croesus/coercions/hash_definitions.rb

@@ -0,0 +1,27 @@
+# encoding: UTF-8
+#
+# Author: Stefano Harding <riddopic@gmail.com>
+#
+# Copyright (C) 2014 Stefano Harding
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+#
+
+module Croesus::Coercions
+  class HashDefinitions
+    def self.bind_to(coercer)
+      coercer.register(Hash, String) { |obj, _| obj.to_s }
+      coercer.register(Hash, Array)  { |obj, _| obj.to_a }
+    end
+  end
+end

data/lib/croesus/coercions/integer_definitions.rb

@@ -0,0 +1,29 @@
+# encoding: UTF-8
+#
+# Author: Stefano Harding <riddopic@gmail.com>
+#
+# Copyright (C) 2014 Stefano Harding
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+#
+
+module Croesus::Coercions
+  class IntegerDefinitions
+    def self.bind_to(coercer)
+      coercer.register(Integer, Time)     { |obj, _| Time.at(obj) }
+      coercer.register(Integer, Date)     { |obj, _| Time.at(obj).to_date }
+      coercer.register(Integer, DateTime) { |obj, _| Time.at(obj).to_datetime }
+      coercer.register(Integer, String)   { |obj, _| obj.to_s }
+    end
+  end
+end

data/lib/croesus/coercions/string_definitions.rb

@@ -0,0 +1,43 @@
+# encoding: UTF-8
+#
+# Author: Stefano Harding <riddopic@gmail.com>
+#
+# Copyright (C) 2014 Stefano Harding
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+#
+
+module Croesus::Coercions
+  class StringDefinitions
+    def self.bind_to(coercer)
+      # Attempt to parse the date. If it can't be parsed just return nil.
+      # Silently failing is about the only thing I can think of.
+      type_parser = -> (obj, target) do
+        begin
+          target.parse(obj)
+        rescue ArgumentError
+          nil
+        end
+      end
+
+      coercer.register(String, Time, &type_parser)
+      coercer.register(String, Date, &type_parser)
+      coercer.register(String, DateTime, &type_parser)
+      coercer.register(String, Integer)  { |obj, _| obj.to_i }
+      coercer.register(String, Float) { |obj, _| obj.to_f }
+      coercer.register(String, Boolean) do |string, _|
+        %w(1 on t true y yes).include?(string.downcase)
+      end
+    end
+  end
+end

data/lib/croesus/coercions/time_definitions.rb

@@ -0,0 +1,30 @@
+# encoding: UTF-8
+#
+# Author: Stefano Harding <riddopic@gmail.com>
+#
+# Copyright (C) 2014 Stefano Harding
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+#
+
+module Croesus::Coercions
+  class TimeDefinitions
+    def self.bind_to(coercer)
+      coercer.register(Time, Date)     { |obj, _| obj.to_date }
+      coercer.register(Time, DateTime) { |obj, _| obj.to_datetime }
+      coercer.register(Time, Integer)  { |obj, _| obj.to_i }
+      coercer.register(Time, Float)    { |obj, _| obj.to_f }
+      coercer.register(Time, String)   { |obj, _| obj.to_s }
+    end
+  end
+end