my_data 0.1.0

data/lib/my_data/resources.rb

@@ -0,0 +1,10 @@
+# frozen_string_literal: true
+
+module MyData::Resources
+  autoload :ResponsesDoc, "my_data/resources/responses_doc"
+  autoload :ResponseType, "my_data/resources/response_type"
+  autoload :ErrorType, "my_data/resources/error_type"
+  autoload :Inv, "my_data/resources/inv"
+  autoload :Ecls, "my_data/resources/ecls"
+  autoload :Icls, "my_data/resources/icls"
+end

data/lib/my_data/resources/ecls.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+module MyData::Resources::Ecls
+  autoload :ExpensesClassificationType, "my_data/resources/ecls/expenses_classification_type"
+  autoload :InvoiceExpensesClassificationType, "my_data/resources/ecls/invoice_expenses_classification_type"
+  autoload :InvoicesIncomeClassificationDetailType, "my_data/resources/ecls/invoices_expenses_classification_detail_type"
+end

data/lib/my_data/resources/ecls/expenses_classification_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Ecls::ExpensesClassificationType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/ecls/invoice_expenses_classification_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Ecls::InvoiceExpensesClassificationType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/ecls/invoices_expenses_classification_detail_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Ecls::InvoicesExpensesClassificationDetailType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/error_type.rb

@@ -0,0 +1,8 @@
+# frozen_string_literal: true
+
+class MyData::Resources::ErrorType
+  include MyData::Resource
+
+  attribute :message, :string
+  attribute :code, :integer
+end

data/lib/my_data/resources/icls.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+module MyData::Resources::Icls
+  autoload :IncomeClassificationType, "my_data/resources/icls/income_classification_type"
+  autoload :InvoiceIncomeClassificationType, "my_data/resources/icls/invoice_income_classification_type"
+  autoload :InvoicesIncomeClassificationDetailType, "my_data/resources/icls/invoices_income_classification_detail_type"
+end

data/lib/my_data/resources/icls/income_classification_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Icls::IncomeClassificationType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/icls/invoice_income_classification_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Icls::InvoiceIncomeClassificationType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/icls/invoices_income_classification_detail_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Icls::InvoicesIncomeClassificationDetailType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/inv.rb

@@ -0,0 +1,14 @@
+# frozen_string_literal: true
+
+module MyData::Resources::Inv
+  autoload :InvoicesDoc, "my_data/resources/inv/invoices_doc"
+  autoload :AadeBookInvoiceType, "my_data/resources/inv/aade_book_invoice_type"
+  autoload :AddressType, "my_data/resources/inv/address_type"
+  autoload :InvoiceHeaderType, "my_data/resources/inv/invoice_header_type"
+  autoload :InvoiceRowType, "my_data/resources/inv/invoice_row_type"
+  autoload :InvoiceSummaryType, "my_data/resources/inv/invoice_summary_type"
+  autoload :PartyType, "my_data/resources/inv/party_type"
+  autoload :PaymentMethodDetailType, "my_data/resources/inv/payment_method_detail_type"
+  autoload :ShipType, "my_data/resources/inv/ship_type"
+  autoload :TaxTotalsType, "my_data/resources/inv/tax_totals_type"
+end

data/lib/my_data/resources/inv/aade_book_invoice_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Inv::AadeBookInvoiceType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/inv/address_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Inv::AddressType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/inv/invoice_header_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Inv::InvoiceHeaderType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/inv/invoice_row_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Inv::InvoiceRowType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/inv/invoice_summary_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Inv::InvoiceSummaryType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/inv/invoices_doc.rb

@@ -0,0 +1,17 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Inv::InvoicesDoc
+  include MyData::Resource
+
+  container_tag "InvoicesDoc", {
+    xmlns: "http://www.aade.gr/myDATA/invoice/v1.0",
+    "xmlns:xsi": "http://www.w3.org/2001/XMLSchema-instance",
+    "xsi:schemaLocation": "http://www.aade.gr/myDATA/invoice/v1.0 schema.xsd",
+    "xmlns:icls": "https://www.aade.gr/myDATA/incomeClassificaton/v1.0"
+  }
+
+  attribute :invoice, :resource,
+            class_name: "Inv::AadeBookInvoiceType", collection: true
+
+  validates_presence_of :invoice
+end

data/lib/my_data/resources/inv/party_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Inv::PartyType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/inv/payment_method_detail_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Inv::PaymentMethodDetailType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/inv/ship_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Inv::ShipType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/inv/tax_totals_type.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+class MyData::Resources::Inv::TaxTotalsType
+  include MyData::Resource
+
+  xsd_structure
+end

data/lib/my_data/resources/response_type.rb

@@ -0,0 +1,19 @@
+# frozen_string_literal: true
+
+class MyData::Resources::ResponseType
+  include MyData::Resource
+
+  attribute :index, :integer
+
+  attribute :invoice_uid, :string
+  attribute :invoice_mark, :integer
+  attribute :classification_mark, :integer
+  attribute :cancellation_mark, :integer
+  attribute :authentication_code, :string
+
+  attribute :errors, :resource,
+            class_name: "ErrorType",
+            collection: true, collection_element_name: "error"
+
+  attribute :status_code, :string
+end

data/lib/my_data/resources/responses_doc.rb

@@ -0,0 +1,8 @@
+# frozen_string_literal: true
+
+class MyData::Resources::ResponsesDoc
+  include MyData::Resource
+
+  attribute :response, :resource, class_name: "ResponseType", collection: true
+end
+

data/lib/my_data/type_caster.rb

@@ -0,0 +1,58 @@
+# frozen_string_literal: true
+
+module MyData
+  module TypeCaster
+    extend self
+
+    ALLOWED_TYPES = [
+      :string,
+      :integer,
+      :float,
+      :date,
+      :time,
+      :boolean,
+      :resource,
+      :ignore
+    ].freeze
+
+    def valid_type?(type)
+      ALLOWED_TYPES.include?(type)
+    end
+
+    def cast(value:, type:, resource: nil)
+      return type_cast_resource(value, resource) if type == :resource
+
+      send("type_cast_#{type}", value)
+    end
+
+    private
+
+    def type_cast_string(value)
+      value.to_s.strip
+    end
+
+    def type_cast_integer(value)
+      value.present? ? value.to_i : nil
+    end
+
+    def type_cast_float(value)
+      value.present? ? value.to_f : nil
+    end
+
+    def type_cast_date(value)
+      value.present? ? value.to_date : nil
+    end
+
+    def type_cast_time(value)
+      value.present? ? value.to_time : nil
+    end
+
+    def type_cast_boolean(value)
+      value.downcase == "true"
+    end
+
+    def type_cast_resource(value, resource)
+      value.present? ? resource.new(value) : nil
+    end
+  end
+end

data/lib/my_data/version.rb

@@ -0,0 +1,5 @@
+# frozen_string_literal: true
+
+module MyData
+  VERSION = "0.1.0"
+end

data/lib/my_data/xml_generator.rb

@@ -0,0 +1,80 @@
+# frozen_string_literal: true
+
+module MyData
+  class XmlGenerator
+    attr_reader :resource, :mappings, :class_name, :container, :parent_namespace
+
+    def initialize(resource, parent_namespace: nil)
+      @resource = resource
+      @mappings = resource.class.mappings
+      @class_name = resource.class.name
+      @container = resource.class.container
+      @parent_namespace = parent_namespace
+    end
+
+    def namespace
+      @namespace ||= resource.class.module_parent_name.split("::").last.downcase
+    end
+
+    def to_xml
+      to_doc.parent.to_xml
+    end
+
+    def to_xml_structure
+      resource.attributes.each_with_object([]) do |(key, value), structure|
+        attr_mappings = mappings[key]
+        next if value.nil?
+
+        if attr_mappings[:collection]
+          val = value.map { |v| attr_mappings[:resource] ? self.class.new(v, parent_namespace: namespace).to_xml_structure : v.to_s }
+
+          if attr_mappings[:collection_element_name]
+            struct = val.map { |v| attr_structure(attr_mappings[:collection_element_name], v) }
+            structure.push(attr_structure(key, struct))
+          else
+            struct = val.map { |v| attr_structure(key, v) }
+            structure.push(*struct)
+          end
+        else
+          val = attr_mappings[:resource] ? self.class.new(value, parent_namespace: namespace).to_xml_structure : value.to_s
+          structure.push(attr_structure(key, val))
+        end
+      end
+    end
+
+    private
+
+    def attr_structure(key, value)
+      prefix = parent_namespace && namespace != parent_namespace ? "#{namespace}:" : ""
+
+      {
+        name: [prefix, key.camelize(:lower)].join,
+        value: value
+      }
+    end
+
+    def to_doc
+      Nokogiri::XML::Builder.new(encoding: "UTF-8") do |xml|
+        xml.send(container[:name], container[:attributes]) do
+          create_nodes(xml, to_xml_structure)
+        end
+      end
+    end
+
+    def create_nodes(xml, structure)
+      if structure.is_a?(Array)
+        structure.each do |es|
+          create_node(xml, es[:name], es[:value])
+        end
+      else
+        create_node(xml, structure[:name], structure[:value])
+      end
+    end
+
+    def create_node(xml, name, value)
+      xml.send(name) do
+        value.is_a?(String) ? (xml << value) : create_nodes(xml, value)
+      end
+    end
+  end
+end

data/lib/my_data/xml_parser.rb

@@ -0,0 +1,96 @@
+# frozen_string_literal: true
+
+module MyData
+  class XmlParser
+    attr_reader :doc, :mappings, :class_name
+
+    def initialize(doc, mappings, class_name)
+      @doc = doc
+      @mappings = mappings
+      @class_name = class_name
+    end
+
+    def parse_xml
+      doc.children.select(&:element?).each_with_object({}) do |element, parse_attrs|
+        attr_names = extract_attr_names(element)
+
+        attr_names.each do |attr_name|
+          value = extract_value(element, attr_name)
+          parse_attrs[attr_name] = value if value
+        end
+      end
+    end
+
+    private
+
+    def extract_attr_names(element)
+      posible_attrs = mappings.select { |_, opts| element.name == opts[:tag_name] }
+
+      if posible_attrs.present?
+        attr_names = posible_attrs
+                     .select { |_name, opts| match_static_tag_attributes?(element, opts[:static_tag_attrs]) }
+      else
+        attr_names = []
+        # raise "Not implemented: #{class_name}: #{element.name}"
+      end
+
+      if attr_names.empty?
+        # raise("Tag attributes not matched: #{class_name}: #{element.name}, element attrs: #{element.attributes}")
+      end
+
+      attr_names.map(&:first)
+    end
+
+    def extract_value(element, attr_name)
+      value = element
+      attr_opts = mappings[attr_name]
+
+      # TODO: current we dont check that the attribute setting matcing the elements
+      if attr_opts[:nested_tags].present?
+        attr_opts[:nested_tags].each do |tag|
+          return if value.nil?
+
+          value = value.children.select(&:element?).find { |element| element.name == tag[:name].to_s }
+        end
+
+        return value if value.nil?
+      end
+
+      if attr_opts[:collection]
+        value.children.select(&:element?).map { |val| get_value(val, attr_opts) }
+      else
+        get_value(value, attr_opts)
+      end
+    end
+
+    def get_value(value, attr_opts)
+      if attr_opts[:type] == :model
+        nested_parser = self.class.new(
+          value,
+          attr_opts[:class_name].mappings,
+          attr_opts[:class_name].name
+        )
+        value = nested_parser.parse_xml
+      else
+        value = if attr_opts[:dynamic_tag_attr].present?
+                  value.attributes[attr_opts[:dynamic_tag_attr]].value
+                else
+                  value.text
+                end
+      end
+    end
+
+    def match_static_tag_attributes?(element, static_tag_attributes)
+      static_tag_attributes.all? do |tag_attribute|
+        element_attr = element.attributes[tag_attribute.name]
+
+        next false unless element_attr
+
+        matched = (element_attr.value == tag_attribute.value) &&
+                  (tag_attribute.namespace.nil? || tag_attribute.namespace == element_attr.namespace.prefix)
+
+        matched
+      end
+    end
+  end
+end