ref: master
vendor/plugins/validates_as_cnpj/lib/validates_as_cnpj.rb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 |
# validates_as_cnpj.rb - implement the validation of cnpj # # Copyright (c) 2006 O.S. Systems # # Authors: Andr� Ribeiro Camargo <andre@boaideia.inf.br>, # Luis Gustavo S. Barreto <gustavo@ossystems.com.br> # # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU # General Public License for more details. module ValidaCNPJ def self.valida_cnpj(cnpj = nil) return nil if cnpj.nil? nulos = %w{11111111111111 22222222222222 33333333333333 44444444444444 55555555555555 66666666666666 77777777777777 88888888888888 99999999999999 00000000000000} valor = cnpj.scan(/[0-9]/).collect{|x| x.to_i} fatores = [5, 4, 3, 2, 9, 8, 7, 6, 5, 4, 3, 2] if valor.length == 14 and not nulos.member?(valor.to_s) soma = 0 0.upto(11) do |i| soma += valor[i] * fatores[i] end resto = soma % 11 dv1 = resto < 2 ? 0 : 11 - resto if dv1 == valor[12] soma = 0 0.upto(12) do |i| soma += valor[i] * (i == 0 ? 6 : fatores[i-1]) end resto = soma % 11 dv2 = resto < 2 ? 0 : 11 - resto return true if dv2 == valor[13] end end return nil end end module ActiveRecord module Validations module ClassMethods def validates_as_cnpj(*attr_names) configuration = { } configuration.update(attr_names.pop) if attr_names.last.is_a?(Hash) validates_each(attr_names, configuration) do |record, attr_name, value| next if value.blank? unless ValidaCNPJ::valida_cnpj(value) record.errors.add(attr_name) end end end end end end |