frodata 0.9.1

data/lib/frodata/properties/binary.rb

@@ -0,0 +1,50 @@
+module FrOData
+  module Properties
+    # Defines the Binary FrOData type.
+    class Binary < FrOData::Property
+      # Returns the property value, properly typecast
+      # @return [Integer,nil]
+      def value
+        if (@value.nil? || @value.empty?) && allows_nil?
+          nil
+        else
+          @value.to_i
+        end
+      end
+
+      # Sets the property value
+      # @params new_value [0,1,Boolean]
+      def value=(new_value)
+        validate(new_value)
+        @value = parse_value(new_value)
+      end
+
+      # The FrOData type name
+      def type
+        'Edm.Binary'
+      end
+
+      # Value to be used in URLs.
+      # @return [String]
+      def url_value
+        "binary'#{value}'"
+      end
+
+      private
+
+      def parse_value(value)
+        if value == 0 || value == '0' || value == false
+          '0'
+        else
+          '1'
+        end
+      end
+
+      def validate(value)
+        unless [0,1,'0','1',true,false].include?(value)
+          validation_error 'Value is outside accepted range: 0 or 1'
+        end
+      end
+    end
+  end
+end

data/lib/frodata/properties/boolean.rb

@@ -0,0 +1,37 @@
+module FrOData
+  module Properties
+    # Defines the Boolean FrOData type.
+    class Boolean < FrOData::Property
+      # Returns the property value, properly typecast
+      # @return [Boolean, nil]
+      def value
+        if (@value.nil? || @value.empty?) && allows_nil?
+          nil
+        else
+          (@value == 'true' || @value == '1')
+        end
+      end
+
+      # Sets the property value
+      # @params new_value [Boolean]
+      def value=(new_value)
+        validate(new_value)
+        @value = new_value.to_s
+      end
+
+      # The FrOData type name
+      def type
+        'Edm.Boolean'
+      end
+
+      private
+
+      def validate(value)
+        return if value.nil? && allows_nil?
+        unless [0,1,'0','1','true','false',true,false].include?(value)
+          validation_error 'Value is outside accepted range: true or false'
+        end
+      end
+    end
+  end
+end

data/lib/frodata/properties/collection.rb

@@ -0,0 +1,50 @@
+module FrOData
+  module Properties
+    # Defines the Collection FrOData type.
+    class Collection < FrOData::Property
+      # Overriding default constructor to avoid converting
+      # value to string.
+      # TODO: Make this the default for all property types?
+      def initialize(name, value, options = {})
+        super(name, value, options)
+        self.value = value
+      end
+
+      def value
+        if @value.nil?
+          nil
+        else
+          @value.map(&:value)
+        end
+      end
+
+      def value=(value)
+        if value.nil? && allows_nil?
+          @value = nil
+        elsif value.respond_to?(:map)
+          @value = value.map.with_index do |element, index|
+            type_class.new("#{name}[#{index}]", element)
+          end
+        else
+          validation_error 'Value must be an array'
+        end
+      end
+
+      def url_value
+        '[' + @value.map(&:url_value).join(',') + ']'
+      end
+
+      def type
+        "Collection(#{value_type})"
+      end
+
+      def value_type
+        options[:value_type] || 'Edm.String'
+      end
+
+      def type_class
+        FrOData::PropertyRegistry[value_type]
+      end
+    end
+  end
+end

data/lib/frodata/properties/complex.rb

@@ -0,0 +1,114 @@
+module FrOData
+  module Properties
+    # Abstract base class for FrOData ComplexTypes
+    # @see [FrOData::Schema::ComplexType]
+    class Complex < FrOData::Property
+      def initialize(name, value, options = {})
+        super(name, value, options)
+        init_properties
+      end
+
+      # Returns the property value, properly typecast
+      # @return [Hash, nil]
+      def value
+        if allows_nil? && properties.values.all?(&:nil?)
+          nil
+        else
+          Hash[properties.map { |key, value| [key, value.value] }]
+        end
+      end
+
+      # Sets the property value
+      # @params new_value [Hash]
+      def value=(new_value)
+        validate(new_value)
+        if new_value.nil?
+          property_names.each { |name| self[name] = nil }
+        else
+          property_names.each { |name| self[name] = new_value[name] }
+        end
+      end
+
+      # Returns a list of this ComplexType's property names.
+      # @return [Array<String>]
+      def property_names
+        @property_names ||= properties.keys
+      end
+
+      # Returns the value of the requested property.
+      # @param property_name [to_s]
+      # @return [*]
+      def [](property_name)
+        properties[property_name.to_s].value
+      end
+
+      # Sets the value of the named property.
+      # @param property_name [to_s]
+      # @param value [*]
+      # @return [*]
+      def []=(property_name, value)
+        properties[property_name.to_s].value = value
+      end
+
+      # Returns the XML representation of the property to the supplied XML
+      # builder.
+      # @param xml_builder [Nokogiri::XML::Builder]
+      def to_xml(xml_builder)
+        attributes = {
+            'metadata:type' => type,
+        }
+
+        xml_builder['data'].send(name.to_sym, attributes) do
+          properties.each do |name, property|
+            property.to_xml(xml_builder)
+          end
+        end
+      end
+
+      # Creates a new property instance from an XML element
+      # @param property_xml [Nokogiri::XML::Element]
+      # @param options [Hash]
+      # @return [FrOData::Property]
+      def self.from_xml(property_xml, options = {})
+        nodes = property_xml.element_children
+        props = Hash[nodes.map { |el| [el.name, el.content] }]
+        new(property_xml.name, props.to_json, options)
+      end
+
+      private
+
+      def complex_type
+        raise NotImplementedError, 'Subclass must override'
+      end
+
+      def properties
+        @properties
+      end
+
+      def init_properties
+        @properties = complex_type.send(:collect_properties)
+        set_properties(JSON.parse(@value)) unless @value.nil?
+      end
+
+      def set_properties(new_properties)
+        property_names.each do |prop_name|
+          self[prop_name] = new_properties[prop_name]
+        end
+      end
+
+      def validate(value)
+        return if value.nil? && allows_nil?
+        raise ArgumentError, 'Value must be a Hash' unless value.is_a?(Hash)
+        value.keys.each do |name|
+          unless property_names.include?(name) || name =~ /@odata/
+            raise ArgumentError, "Invalid property #{name}"
+          end
+        end
+      end
+
+      def validate_options(options)
+        raise ArgumentError, 'Type is required' unless options[:type]
+      end
+    end
+  end
+end

data/lib/frodata/properties/date.rb

@@ -0,0 +1,27 @@
+require 'frodata/properties/date_time'
+
+module FrOData
+  module Properties
+    # Defines the Date FrOData type.
+    class Date < FrOData::Properties::DateTime
+      # The FrOData type name
+      def type
+        'Edm.Date'
+      end
+
+      def url_value
+        @value
+      end
+
+      protected
+
+      def date_class
+        ::Date
+      end
+
+      def strptime_format
+        '%Y-%m-%d'
+      end
+    end
+  end
+end

data/lib/frodata/properties/date_time.rb

@@ -0,0 +1,83 @@
+module FrOData
+  module Properties
+    # Defines the DateTime FrOData type.
+    class DateTime < FrOData::Property
+      # Returns the property value, properly typecast
+      # @return [DateTime, nil]
+      def value
+        if (@value.nil? || @value.empty?) && allows_nil?
+          nil
+        else
+          begin
+            date_class.strptime(@value, strptime_format)
+          rescue ArgumentError
+            date_class.parse(@value)
+          end
+        end
+      end
+
+      # Sets the property value
+      # @params new_value [DateTime]
+      def value=(new_value)
+        validate(new_value)
+        @value = parse_value(new_value)
+      end
+
+      # The FrOData type name
+      def type
+        'Edm.DateTime'
+      end
+
+      # Value to be used in JSON.
+      # @return [String]
+      def xml_value
+        @value.andand.sub(/[\+\-]00:00$/, 'Z')
+      end
+
+      # Value to be used in JSON.
+      # @return [String]
+      def json_value
+        xml_value
+      end
+
+      # Value to be used in URLs.
+      # @return [String]
+      def url_value
+        xml_value
+      end
+
+      protected
+
+      # Specifies date/time implementation to use
+      def date_class
+        ::DateTime
+      end
+
+      # Specifies the date/time format string used for `strptime`
+      def strptime_format
+        #'%Y-%m-%dT%H:%M:%S.%L'
+        "%Y-%m-%dT%H:%M:%SZ"
+      end
+
+      def validate(value)
+        begin
+          return if value.nil? && allows_nil?
+          return if value.is_a?(date_class)
+          date_class.parse(value)
+        rescue
+          validation_error "Value '#{value}' is not a date time format that can be parsed"
+        end
+      end
+
+      def parse_value(value)
+        return value if value.nil? && allows_nil?
+        if value.is_a?(date_class)
+          parsed_value = value
+        else
+          parsed_value = date_class.parse(value)
+        end
+        parsed_value.strftime(strptime_format)
+      end
+    end
+  end
+end

data/lib/frodata/properties/date_time_offset.rb

@@ -0,0 +1,17 @@
+module FrOData
+  module Properties
+    # Defines the DateTimeOffset FrOData type.
+    class DateTimeOffset < FrOData::Properties::DateTime
+      # The FrOData type name
+      def type
+        'Edm.DateTimeOffset'
+      end
+
+      protected
+
+      def strptime_format
+        '%Y-%m-%dT%H:%M:%S%:z'
+      end
+    end
+  end
+end

data/lib/frodata/properties/decimal.rb

@@ -0,0 +1,50 @@
+module FrOData
+  module Properties
+    # Defines the Decimal FrOData type.
+    class Decimal < FrOData::Property
+      # Returns the property value, properly typecast
+      # @return [BigDecimal,nil]
+      def value
+        if (@value.nil? || @value.empty?) && (strict? && allows_nil?)
+          nil
+        else
+          BigDecimal(@value)
+        end
+      end
+
+      # Sets the property value
+      # @params new_value something BigDecimal() can parse
+      def value=(new_value)
+        validate(BigDecimal(new_value.to_s))
+        @value = new_value.to_s
+      end
+
+      # The FrOData type name
+      def type
+        'Edm.Decimal'
+      end
+
+      # Value to be used in URLs.
+      # @return [String]
+      def url_value
+        "#{value.to_f}"
+      end
+
+      private
+
+      def validate(value)
+        if value > max_value || value < min_value || value.precs.first > 29
+          validation_error "Value is outside accepted range: #{min_value} to #{max_value}, or has more than 29 significant digits"
+        end
+      end
+
+      def min_value
+        @min ||= BigDecimal(-7.9 * (10**28), 2)
+      end
+
+      def max_value
+        @max ||= BigDecimal(7.9 * (10**28), 2)
+      end
+    end
+  end
+end

data/lib/frodata/properties/enum.rb

@@ -0,0 +1,62 @@
+module FrOData
+  module Properties
+    # Abstract base class for FrOData EnumTypes
+    # @see [FrOData::Schema::EnumType]
+    class Enum < FrOData::Property
+      # Returns the property value, properly typecast
+      # @return [String, nil]
+      def value
+        if @value.nil? && allows_nil?
+          nil
+        else
+          @value
+        end
+      end
+
+      # Sets the property value
+      # @params new_value [String]
+      def value=(new_value)
+        parsed_value = validate(new_value)
+        @value = is_flags? ? parsed_value : parsed_value.first
+      end
+
+      # Value to be used in URLs.
+      # @return [String]
+      def url_value
+        "#{type}'#{@value}'"
+      end
+
+      private
+
+      def members
+        raise NotImplementedError, 'Subclass must override'
+      end
+
+      def validate(value)
+        return [] if value.nil? && allows_nil?
+        values = parse_value(value)
+
+        if values.length > 1 && !is_flags?
+          raise ArgumentError, 'Multiple values are not allowed for this property'
+        end
+
+        values.map do |value|
+          if members.keys.include?(value)
+            members[value]
+          elsif members.values.include?(value)
+            value
+          else
+            validation_error "Value must be one of #{members.to_a}, but was: '#{value}'"
+          end
+        end.compact
+      end
+
+      def parse_value(value)
+        return nil if value.nil?
+        value.to_s.split(',').map(&:strip).map do |val|
+          val =~ /^[0-9]+$/ ? val.to_i : val
+        end
+      end
+    end
+  end
+end