facturacr 0.1.2

data/lib/facturacr/signed_document.rb

@@ -0,0 +1,19 @@
+require 'base64'
+
+module FE
+  class SignedDocument
+    attr_accessor :document, :path, :base64, :payload
+    
+    def initialize(document, path)
+      @document = document
+      @path = path
+      @base64 = nil
+      if File.exist?(@path)
+        file = File.open(@path,"rb")
+        @base64 = Base64.encode64(file.read).gsub("\n","");
+      end
+      @payload = document.api_payload
+      @payload[:comprobanteXml] = @base64
+    end
+  end
+end

data/lib/facturacr/signer/signer.rb

@@ -0,0 +1,245 @@
+require 'openssl'
+require 'base64'
+require "rexml/document"
+require "rexml/xpath"
+
+module FE
+  class Signer
+    REXML::Document::entity_expansion_limit = 0
+    C14N            = "http://www.w3.org/TR/2001/REC-xml-c14n-20010315" #"http://www.w3.org/2001/10/xml-exc-c14n#"
+    DSIG            = "http://www.w3.org/2000/09/xmldsig#"
+    NOKOGIRI_OPTIONS = Nokogiri::XML::ParseOptions::STRICT | Nokogiri::XML::ParseOptions::NONET | Nokogiri::XML::ParseOptions::NOENT
+    RSA_SHA1        = "http://www.w3.org/2000/09/xmldsig#rsa-sha1"
+    RSA_SHA256      = "http://www.w3.org/2001/04/xmldsig-more#rsa-sha256"
+    RSA_SHA384      = "http://www.w3.org/2001/04/xmldsig-more#rsa-sha384"
+    RSA_SHA512      = "http://www.w3.org/2001/04/xmldsig-more#rsa-sha512"
+    SHA1            = "http://www.w3.org/2000/09/xmldsig#sha1"
+    SHA256          = "http://www.w3.org/2001/04/xmlenc#sha256"
+    SHA384          = "http://www.w3.org/2001/04/xmldsig-more#sha384"
+    SHA512          = "http://www.w3.org/2001/04/xmlenc#sha512"
+    ENVELOPED_SIG   = "http://www.w3.org/2000/09/xmldsig#enveloped-signature"
+    INC_PREFIX_LIST = "#default samlp saml ds xs xsi md"
+    NAMESPACES =      "#default ds xs xsi xades xsd"
+
+    XADES           = "http://uri.etsi.org/01903/v1.3.2#"
+    XADES141        = "http://uri.etsi.org/01903/v1.4.1#"
+    SIGNATURE_POLICY = "https://tribunet.hacienda.go.cr/docs/esquemas/2016/v4/Resolucion%20Comprobantes%20Electronicos%20%20DGT-R-48-2016.pdf"
+    
+    
+    def initialize(key_path, key_password,input_xml, output_path=nil)
+      @doc = REXML::Document.new(File.read(input_xml))
+      @doc.context[:attribute_quote] = :quote
+      @doc << REXML::XMLDecl.new(REXML::XMLDecl::DEFAULT_VERSION,REXML::XMLDecl::DEFAULT_ENCODING, REXML::XMLDecl::DEFAULT_STANDALONE)
+      @p12 = OpenSSL::PKCS12.new(File.read("tmp/pruebas.p12"),"8753")
+      @x509 = @p12.certificate
+      @output_path = output_path
+    end
+    
+    def sign
+      #Build parts for Digest Calculation
+      key_info = build_key_info_element
+      signed_properties = build_signed_properties_element
+      signed_info_element = build_signed_info_element(key_info,signed_properties)
+      # Compute Signature
+      signed_info_canon = canonicalize_document(signed_info_element)
+      signature_value = compute_signature(@p12.key,algorithm(RSA_SHA256).new,signed_info_canon)
+      
+      # delete parts namespaces
+      delete_namespaces(signed_info_element)
+      delete_namespaces(key_info)
+      delete_namespaces(signed_properties)
+      
+      # Created Signature element and add parts
+      signature_element = REXML::Element.new("ds:Signature").add_namespace('ds', DSIG)
+      signature_element.add_attribute("Id","xmldsig-#{uuid}")
+      
+      signature_element.add_element(signed_info_element)
+      signature_element.add_element("ds:SignatureValue","Id"=>"xmldsig-#{uuid}-sigvalue").text = signature_value
+      signature_element.add_element(key_info)
+      
+      object = signature_element.add_element("ds:Object")
+      qualifying_properties = object.add_element("xades:QualifyingProperties", {"Target"=>"#xmldsig-#{uuid}"})
+      qualifying_properties.add_namespace("xades", XADES)
+      qualifying_properties.add_namespace("xades141", XADES141)
+      
+      qualifying_properties.add_element(signed_properties)
+      
+      @doc.root.add_element(signature_element)
+      
+      File.open(@output_path,"w"){|f| f.write(@doc.to_s)} if @output_path
+      
+      @doc
+    end
+    
+    private
+    
+    def build_signed_properties_element
+      cert_digest = compute_digest(@x509.to_der,algorithm(SHA256))
+      policy_digest = compute_digest(@x509.to_der,algorithm(SHA256))
+      signing_time = DateTime.now
+      
+      element = REXML::Element.new("xades:SignedProperties",nil,{:attribute_quote=>:quote})
+      element.add_namespace("https://tribunet.hacienda.go.cr/docs/esquemas/2017/v4.2/facturaElectronica")
+      element.add_namespace("ds","http://www.w3.org/2000/09/xmldsig#")
+      element.add_namespace("xades","http://uri.etsi.org/01903/v1.3.2#")
+      element.add_namespace("xsd","http://www.w3.org/2001/XMLSchema")
+      element.add_namespace("xsi","http://www.w3.org/2001/XMLSchema-instance")
+      element.add_namespace("xades141", XADES141)
+      element.add_attribute("Id","xmldsig-#{uuid}-signedprops")
+  
+      element.add_element("xades:SigningTime").text = signing_time.rfc3339
+      signing_certificate_elem = element.add_element("xades:SigningCertificate")
+      cert_elem = signing_certificate_elem.add_element("xades:Cert")
+      cert_digest_elem = cert_elem.add_element("xades:CertDigest")
+      cert_digest_elem.add_element("ds:DigestMethod", {"Algorithm"=>SHA256})
+      cert_digest_elem.add_element("ds:DigestValue").text = cert_digest
+
+      issuer_serial = cert_elem.add_element("xades:IssuerSerial")
+      issuer_serial.add_element("ds:X509IssuerName").text = @x509.issuer.to_a.reverse.map{|c| c[0..1].join("=")}.join(", ")
+      issuer_serial.add_element("ds:X509SerialNumber").text = @x509.serial.to_s
+
+      policy_elem = element.add_element("xades:SignaturePolicyIdentifier")
+      policy_id_elem = policy_elem.add_element("xades:SignaturePolicyId")
+      sig_policy_id = policy_id_elem.add_element("xades:SigPolicyId")
+      sig_policy_id.add_element("xades:Identifier").text = SIGNATURE_POLICY
+
+      policy_hash  = sig_policy_id.add_element("xades:SigPolicyHash")
+      policy_hash.add_element("ds:DigestMethod", {"Algorithm"=>"http://www.w3.org/2000/09/xmldsig#sha1"})
+      policy_hash.add_element("ds:DigestValue").text = "V8lVVNGDCPen6VELRD1Ja8HARFk="#policy_digest
+      
+      element
+    end
+    
+    def build_key_info_element
+      key_info = REXML::Element.new("ds:KeyInfo",nil,{:attribute_quote=>:quote})
+      key_info.add_namespace("https://tribunet.hacienda.go.cr/docs/esquemas/2017/v4.2/facturaElectronica")
+      key_info.add_namespace("ds","http://www.w3.org/2000/09/xmldsig#")
+      key_info.add_namespace("xsd","http://www.w3.org/2001/XMLSchema")
+      key_info.add_namespace("xsi","http://www.w3.org/2001/XMLSchema-instance")
+  
+      key_info.add_attribute("Id","xmldsig-#{uuid}-keyinfo")
+      x509_data = key_info.add_element("ds:X509Data")
+      x509_data.add_element("ds:X509Certificate").text = @x509.to_pem.to_s.gsub("-----BEGIN CERTIFICATE-----","").gsub("-----END CERTIFICATE-----","").gsub(/\n|\r/, "")
+      key_value = key_info.add_element("ds:KeyValue")
+      rsa_value = key_value.add_element("ds:RSAKeyValue")
+      rsa_value.add_element("ds:Modulus").text = Base64.encode64(@x509.public_key.params["n"].to_s(2)).gsub("\n","")
+      rsa_value.add_element("ds:Exponent").text = Base64.encode64(@x509.public_key.params["e"].to_s(2)).gsub("\n","")
+      key_info
+    end
+    
+    def build_signed_info_element(key_info_element, signed_props_element)
+      
+      signed_info_element = REXML::Element.new("ds:SignedInfo",nil,{:attribute_quote=>:quote})
+      signed_info_element.add_namespace("https://tribunet.hacienda.go.cr/docs/esquemas/2017/v4.2/facturaElectronica")
+      signed_info_element.add_namespace("ds","http://www.w3.org/2000/09/xmldsig#")
+      signed_info_element.add_namespace("xsd","http://www.w3.org/2001/XMLSchema")
+      signed_info_element.add_namespace("xsi","http://www.w3.org/2001/XMLSchema-instance")
+      signed_info_element.add_element("ds:CanonicalizationMethod", { "Algorithm"=>C14N })
+      signed_info_element.add_element("ds:SignatureMethod", {"Algorithm"=>RSA_SHA256})
+      
+      # Add Ref0
+      ref0 = signed_info_element.add_element("ds:Reference",{"Id"=>"xmldsig-#{uuid}-ref0"})
+      transforms = ref0.add_element("ds:Transforms")
+      transform = transforms.add_element("ds:Transform", {"Algorithm"=>ENVELOPED_SIG})
+      digest_method_element = ref0.add_element("ds:DigestMethod", {"Algorithm"=> SHA256})
+      ref0.add_element("ds:DigestValue").text = digest_document(@doc,SHA256)
+      
+      # Add KeyInfo Ref
+      ref_key_info = signed_info_element.add_element("ds:Reference",{"URI"=>"#xmldsig-#{uuid}-keyinfo"})
+      ref_key_info.add_element("ds:DigestMethod", {"Algorithm"=> SHA256})
+      ref_key_info.add_element("ds:DigestValue").text = digest_document(key_info_element, SHA256, true)
+      
+      # Add SignedProps Ref
+      ref_props = signed_info_element.add_element("ds:Reference",{"URI"=>"#xmldsig-#{uuid}-signedprops", "Type"=>"http://uri.etsi.org/01903#SignedProperties"})
+      ref_props.add_element("ds:DigestMethod", {"Algorithm"=> SHA256})
+      ref_props.add_element("ds:DigestValue").text = digest_document(signed_props_element, SHA256,true)
+      
+      signed_info_element
+    end
+    
+    def digest_document(doc, digest_algorithm=SHA256, strip=false)
+      compute_digest(canonicalize_document(doc,strip),algorithm(digest_algorithm))
+    end
+    
+    def canonicalize_document(doc,strip=false)
+      doc = doc.to_s if doc.is_a?(REXML::Element)
+      doc.strip! if strip
+      doc.encode("UTF-8")
+      noko = Nokogiri::XML(doc) do |config|
+        config.options = NOKOGIRI_OPTIONS
+      end
+      
+      noko.canonicalize(canon_algorithm(C14N),NAMESPACES.split(" "))
+    end
+    
+    def delete_namespaces(element)
+      NAMESPACES.split(" ").each do |ns|
+        element.delete_namespace(ns)
+      end
+    end
+    
+    def uuid
+      @uuid ||= SecureRandom.uuid
+    end
+    
+    def canon_algorithm(element)
+     algorithm = element
+     if algorithm.is_a?(REXML::Element)
+       algorithm = element.attribute('Algorithm').value
+     end
+
+     case algorithm
+       when "http://www.w3.org/TR/2001/REC-xml-c14n-20010315",
+            "http://www.w3.org/TR/2001/REC-xml-c14n-20010315#WithComments"
+         Nokogiri::XML::XML_C14N_1_0
+       when "http://www.w3.org/2006/12/xml-c14n11",
+            "http://www.w3.org/2006/12/xml-c14n11#WithComments"
+         Nokogiri::XML::XML_C14N_1_1
+       else
+         Nokogiri::XML::XML_C14N_EXCLUSIVE_1_0
+     end
+    end
+
+    def algorithm(element)
+     algorithm = element
+     if algorithm.is_a?(REXML::Element)
+       algorithm = element.attribute("Algorithm").value
+     end
+
+     algorithm = algorithm && algorithm =~ /(rsa-)?sha(.*?)$/i && $2.to_i
+
+     case algorithm
+     when 256 then OpenSSL::Digest::SHA256
+     when 384 then OpenSSL::Digest::SHA384
+     when 512 then OpenSSL::Digest::SHA512
+     else
+       OpenSSL::Digest::SHA1
+     end
+    end
+
+    def compute_signature(private_key, signature_algorithm, document)
+      Base64.encode64(private_key.sign(signature_algorithm, document)).gsub(/\n/, "")
+    end
+
+    def compute_digest(document, digest_algorithm)
+     digest = digest_algorithm.digest(document)
+     Base64.encode64(digest).strip!
+    end
+    
+  end
+  
+  class JavaSigner
+    
+    def initialize(key_file,password,path,out_path)
+      @key_file = key_file
+      @password = password
+      @path = path
+      @out_path = out_path
+    end
+    
+    def sign
+      null_device = Gem.win_platform? ? "/nul" : "/dev/null" 
+      system("java -jar #{FE.bin}/signer/signer.jar #{@key_file} #{@password} #{@path} #{@out_path} 1>#{null_device} 2>#{null_device}")
+    end
+  end
+end

data/lib/facturacr/ticket.rb

@@ -0,0 +1,34 @@
+require 'facturacr/document'
+
+module FE
+ 
+  class Ticket < Document
+    
+    def initialize(args={})
+      @date = args[:date]
+      @issuer = args[:issuer]
+      @receiver = args[:receiver]
+      @items = args[:items]
+      @number = args[:number]
+      @condition = args[:condition]
+      @payment_type = args[:payment_type] || "01"
+      @document_type = "04"
+      @credit_term = args[:credit_term]
+      @summary = args[:summary]
+      @regulation = args[:regulation] ||= FE::Document::Regulation.new
+      @security_code = args[:security_code]
+      @document_situation = args[:document_situation]
+      @namespaces = {
+        "xmlns:xsi"=>"http://www.w3.org/2001/XMLSchema-instance", 
+        "xmlns:xsd"=>"http://www.w3.org/2001/XMLSchema",
+        "xmlns"=>"https://tribunet.hacienda.go.cr/docs/esquemas/2017/v4.2/tiqueteElectronico",
+        "xsi:schemaLocation"=>"https://tribunet.hacienda.go.cr/docs/esquemas/2017/v4.2/tiqueteElectronico https://tribunet.hacienda.go.cr/docs/esquemas/2017/v4.2/tiqueteElectronico.xsd"
+      }
+    end
+    
+    def document_tag
+      "TiqueteElectronico"
+    end
+    
+  end 
+end

data/lib/facturacr/version.rb

@@ -0,0 +1,3 @@
+module FE
+  VERSION = "0.1.2"
+end

data/lib/facturacr/xml_document.rb

@@ -0,0 +1,161 @@
+require 'nokogiri'
+
+require 'facturacr/document'
+
+module FE  
+  class XmlDocument
+    
+    attr_accessor :document, :root_tag
+    
+    def initialize(xml_path)
+      if File.exist?(xml_path)
+        @doc = Nokogiri::XML(File.open(xml_path,"rb")) do |config|
+          config.options = Nokogiri::XML::ParseOptions::NOBLANKS | Nokogiri::XML::ParseOptions::NOENT
+        end
+        root_tag = @doc.elements.first.name
+        
+        
+        if root_tag.eql?('FacturaElectronica')
+          @document = FE::Invoice.new
+        elsif root_tag.eql?("NotaCreditoElectronica")
+          @document = FE::CreditNote.new
+        elsif root_tag.eql?("NotaDebitoElectronica")
+          @document = FE::DebitNote.new
+        end
+        @document.date = DateTime.parse(@doc.css("#{root_tag} FechaEmision").text)
+        @key = @doc.css("#{root_tag} Clave").text
+        @document.number = @key[31..40].to_i
+        @document.document_situation = @key[41]
+        @document.security_code = @key[42..-1]
+        @document.condition = @doc.css("#{root_tag} CondicionVenta").text
+        @document.credit_term = @doc.css("#{root_tag} PlazoCredito").text unless @doc.css("#{root_tag} PlazoCredito").empty?
+        @document.payment_type = @doc.css("#{root_tag} MedioPago").first.text
+        
+        @issuer = FE::Document::Issuer.new
+        @issuer.identification_document = FE::Document::IdentificationDocument.new type: @doc.css("#{root_tag} Emisor Identificacion Tipo").text, number: @doc.css("#{root_tag} Emisor Identificacion Numero").text.to_i
+        @issuer.name = @doc.css("#{root_tag} Emisor Nombre").text
+        @issuer.comercial_name = @doc.css("#{root_tag} Emisor NombreComercial").text unless @doc.css("#{root_tag} Emisor NombreComercial").empty?
+        location = FE::Document::Location.new
+        location.province = @doc.css("#{root_tag} Emisor Ubicacion Provincia").text
+        location.county = @doc.css("#{root_tag} Emisor Ubicacion Canton").text
+        location.district = @doc.css("#{root_tag} Emisor Ubicacion Distrito").text
+        location.others = @doc.css("#{root_tag} Emisor Ubicacion OtrasSenas").text
+        @issuer.location = location
+        
+        if !@doc.css("#{root_tag} Emisor Telefono").empty?
+          @issuer.phone = FE::Document::Phone.new country_code: @doc.css("#{root_tag} Emisor Telefono CodigoPais").text, number: @doc.css("#{root_tag} Emisor Telefono CodigoPais").text
+        end
+        if !@doc.css("#{root_tag} Emisor Fax").empty?
+          @issuer.fax = FE::Document::Phone.new country_code: @doc.css("#{root_tag} Emisor Telefono CodigoPais").text, number: @doc.css("#{root_tag} Emisor Telefono CodigoPais").text
+        end
+        @issuer.email = @doc.css("#{root_tag} Emisor CorreoElectronico").text
+        
+        unless @doc.css("#{root_tag} Receptor").empty?
+          @receiver = FE::Document::Receiver.new
+          @receiver.name = @doc.css("#{root_tag} Receptor Nombre").text
+          unless @doc.css("#{root_tag} Receptor Identificacion").empty?
+            @receiver.identification_document = FE::Document::IdentificationDocument.new type: @doc.css("#{root_tag} Receptor Identificacion Tipo").text, number: @doc.css("#{root_tag} Receptor Identificacion Numero").text.to_i
+          end
+          
+          unless @doc.css("#{root_tag} Receptor IdentificacionExtranjero").empty?
+            @receiver.foreign_id_number = @doc.css("#{root_tag} Receptor IdentificacionExtranjero").text
+          end
+          @receiver.comercial_name = @doc.css("#{root_tag} Receptor NombreComercial").text unless @doc.css("#{root_tag} Receptor NombreComercial").empty?
+          
+          unless @doc.css("#{root_tag} Receptor Ubicacion").empty?
+            location = FE::Document::Location.new
+            location.province = @doc.css("#{root_tag} Receptor Ubicacion Provincia").text
+            location.county = @doc.css("#{root_tag} Receptor Ubicacion Canton").text
+            location.district = @doc.css("#{root_tag} Receptor Ubicacion Distrito").text
+            location.others = @doc.css("#{root_tag} Receptor Ubicacion OtrasSenas").text
+            @receiver.location = location
+          end
+          
+          if !@doc.css("#{root_tag} Receptor Telefono").empty?
+            @issuer.phone = FE::Document::Phone.new country_code: @doc.css("#{root_tag} Receptor Telefono CodigoPais").text, number: @doc.css("#{root_tag} Receptor Telefono CodigoPais").text
+          end
+          if !@doc.css("#{root_tag} Receptor Fax").empty?
+            @receiver.fax = FE::Document::Phone.new country_code: @doc.css("#{root_tag} Receptor Telefono CodigoPais").text, number: @doc.css("#{root_tag} Receptor Telefono CodigoPais").text
+          end
+          @receiver.email = @doc.css("#{root_tag} Receptor CorreoElectronico").text unless @doc.css("#{root_tag} Receptor CorreoElectronico").empty?
+        end
+        @items = []
+        @doc.css("#{root_tag} DetalleServicio LineaDetalle").each do |line|
+          item = FE::Document::Item.new
+          item.line_number = line.css("NumeroLinea").text.to_i
+          item.code = line.css("Codigo Codigo").text
+          item.quantity = line.css("Cantidad").text
+          item.unit = line.css("UnidadMedida").text
+          item.description = line.css("Detalle").text
+          item.unit_price = line.css("PrecioUnitario").text.to_f
+          item.total = line.css("MontoTotal").text.to_f
+          item.discount = line.css("MontoDescuento").text.to_f unless line.css("MontoDescuento").empty?
+          item.discount_reason = line.css("NaturalezaDescuento").text unless line.css("NaturalezaDescuento").empty?
+          item.subtotal = line.css("SubTotal").text.to_f
+          item.net_total = line.css("MontoTotalLinea").text.to_f
+          item.taxes = []
+          line.css("Impuesto").each do |tax|
+            item.taxes << FE::Document::Tax.new(code: tax.css("Codigo").text, rate: tax.css("Tarifa").text.to_f, total: tax.css("Monto").text.to_f)
+          end
+          unless line.css("Exoneracion").empty?
+            exo = FE::Document::Exoneration.new
+            exo.document_type = line.css("Exoneracion TipoDocumento").text
+            exo.document_number = line.css("Exoneracion NumeroDocumento").text
+            exo.institution = line.css("Exoneracion NombreInstitucion").text
+            exo.date = DateTime.parse(line.css("Exoneracion FechaEmision").text)
+            exo.total_tax = line.css("Exoneracion MontoImpuesto").text.to_f
+            exo.percentage = line.css("Exoneracion PorcentajeCompra").text.to_i
+            item.exoneration = exo
+          end
+          @items << item
+        end
+
+        
+        @summary = FE::Document::Summary.new
+        sum = @doc.css("#{root_tag} ResumenFactura")
+        @summary.currency = sum.css("CodigoMoneda").text
+        @summary.exchange_rate = sum.css("TipoCambio").text.to_f
+        @summary.services_taxable_total = sum.css("TotalServGravados").text.to_f
+        @summary.services_exent_total = sum.css("TotalServExentos").text.to_f
+        @summary.goods_taxable_total = sum.css("TotalMercanciasGravadas").text.to_f
+        @summary.goods_exent_total = sum.css("TotalMercanciasExentas").text.to_f
+        @summary.taxable_total = sum.css("TotalGravado").text.to_f
+        @summary.exent_total = sum.css("TotalExento").text.to_f
+        @summary.subtotal = sum.css("TotalVenta").text.to_f
+        @summary.discount_total = sum.css("TotalDescuentos").text.to_f
+        @summary.gross_total = sum.css("TotalVentaNeta").text.to_f
+        @summary.tax_total = sum.css("TotalImpuesto").text.to_f
+        @summary.net_total = sum.css("TotalComprobante").text.to_f
+        
+        refs = @doc.css("#{root_tag} InformacionReferencia")
+        @references = []
+        unless refs.empty?
+          refs.each do |ref|
+            reference = FE::Document::Reference.new
+            reference.document_type = ref.css("TipoDoc")
+            reference.number = ref.css("Numero")
+            reference.date = ref.css("FechaEmision")
+            reference.code = ref.css("Codigo")
+            reference.reason = ref.css("Razon")
+            @references << reference
+          end
+        end
+        
+        reg = @doc.css("#{root_tag} Normativa")
+        @regulation = FE::Document::Regulation.new
+        @regulation.number = reg.css("NumeroResolucion").text
+        @regulation.date = reg.css("FechaResolucion").text
+        
+        
+        @document.issuer = @issuer
+        @document.receiver = @receiver
+        @document.items = @items
+        @document.summary = @summary
+        @document.references = @references
+        @document.regulation = @regulation        
+      else
+        raise "#{xml_path} does not exist"    
+      end
+    end
+  end
+end