br-cnpj 0.1.1

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 Bruno Coimbra
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.rdoc

@@ -0,0 +1,17 @@
+= br-cnpj
+
+Calcules and validates Brazilian CNPJ
+
+== Note on Patches/Pull Requests
+ 
+* Fork the project.
+* Make your feature addition or bug fix.
+* Add tests for it. This is important so I don't break it in a
+  future version unintentionally.
+* Commit, do not mess with rakefile, version, or history.
+  (if you want to have your own version, that is fine but bump version in a commit by itself I can ignore when I pull)
+* Send me a pull request. Bonus points for topic branches.
+
+== Copyright
+
+Copyright (c) 2010 Bruno Coimbra. See LICENSE for details.

data/ext/CNPJ/cnpj.c

@@ -0,0 +1,72 @@
+#include <stdlib.h>
+#include "cnpj.h"
+
+#define DIGITO1 0
+#define DIGITO2 1
+
+long long calcula_digito_cnpj(int raiz, int filial){
+    return (long long)raiz*1000000 + filial*100 + calcula_digito(raiz, filial);
+}
+
+int calcula_digito(int raiz, int filial){
+    int digito1=0, digito2=0, i;
+    int vet[14];
+    int pesos[][13] = {{5,4,3,2,9,8,7,6,5,4,3,2,0},
+                       {6,5,4,3,2,9,8,7,6,5,4,3,2}};
+    long long cnpj;
+    div_t divisao;
+
+    cnpj = (long long)raiz*1000000 + filial*100;
+    for (i=0;i<14;i++){
+        lldiv_t divisao;
+
+        divisao = lldiv(cnpj,10);
+        vet[13-i] = (int) divisao.rem;
+        cnpj = divisao.quot;
+    }
+    for(i=0;i<12;i++)
+        digito1 += vet[i] * pesos[DIGITO1][i];
+    divisao = div(digito1,11);
+    digito1 = divisao.rem<2 ? 0 : 11-divisao.rem;
+    vet[12]=digito1;
+    for(i=0;i<13;i++)
+        digito2 += vet[i] * pesos[DIGITO2][i];
+    divisao = div(digito2,11);
+    digito2 = divisao.rem<2 ? 0 : 11- divisao.rem;
+
+    return digito1*10 + digito2;
+}
+
+int e_cnpj(long long cnpj_l){
+    int raiz, filial;
+    lldiv_t divisao;
+
+    divisao = lldiv(cnpj_l,1000000);
+    raiz = divisao.quot;
+    divisao = lldiv(divisao.rem,100);
+    filial=divisao.quot;
+    return cnpj_l == calcula_digito_cnpj(raiz, filial);
+}
+
+int e_cgc(long long cgc_l){
+    if(e_cnpj(cgc_l)){
+        int pesos[]={2,1,2,1,2,1,2,1};
+        int acumulador=0, raiz=0, i=0;
+        lldiv_t divisao;
+
+        divisao = lldiv(cgc_l, 1000000);
+        raiz = (int)divisao.quot;
+        for (i=0;i<8;i++){
+            int produto=0;
+
+            divisao = lldiv(raiz,10);
+            produto = divisao.rem*pesos[7-i];
+            acumulador += (produto>9) ? produto-9 : produto;
+            raiz = divisao.quot;
+        }
+
+        divisao=lldiv(acumulador, 10);
+        return !divisao.rem;
+    }
+    return 0;
+}

data/ext/CNPJ/cnpj.h

@@ -0,0 +1,17 @@
+#ifndef _CNPJ_H
+#define _CNPJ_H
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+long long calcula_digito_cnpj(int raiz, int filial);
+int calcula_digito(int raiz, int filial);
+int e_cnpj(long long cnpj_l);
+int e_cgc(long long cgc_l);
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* _CNPJ_H */

data/ext/CNPJ/extconf.rb

@@ -0,0 +1,7 @@
+require 'mkmf'
+
+dir_config('cnpj')
+
+have_header('stdlib.h')
+
+create_makefile('CNPJ')

data/ext/CNPJ/ruby_cnpj.c

@@ -0,0 +1,71 @@
+#include "ruby.h"
+#include "cnpj.h"
+
+static VALUE t_init_cnpj(int argc, VALUE *argv, VALUE self)
+{
+    int raiz = 0;
+    int filial = 0;
+    int verif = 0;
+    VALUE valid = Qnil;
+
+    if (argc == 2) {
+        raiz = FIX2INT(argv[0]);
+        if( raiz >= 100000000 || raiz < 0 )
+            rb_raise(rb_eArgError, "raiz should be greater than -1 or lesser than 10_000_000");
+        filial = NUM2INT(argv[1]);
+        if( filial >= 10000 || filial < 1)
+            rb_raise(rb_eArgError, "filial should be greater than 0 or lesser than 10_000");
+        verif = calcula_digito(raiz,filial);
+        valid = Qtrue;
+    }
+    else if (argc == 1) {
+        lldiv_t v;
+        long long cnpj = 0;
+
+        if (rb_class_of(argv[0]) == rb_cString) 
+            cnpj = NUM2LL(rb_str_to_inum(argv[0], 10, 0));
+        else
+            if (rb_class_of(argv[0]) == rb_cFixnum ||
+                rb_class_of(argv[0]) == rb_cBignum)
+                cnpj = NUM2LL(argv[0]);
+
+        v = lldiv(cnpj, (long long)100);
+        verif = (int)v.rem;
+        v = lldiv(v.quot, (long long)10000);
+        filial = (int)v.rem;
+        raiz = (int)v.quot;
+        valid = verif == calcula_digito(raiz,filial) ? Qtrue : Qfalse;
+    }
+
+    rb_iv_set(self, "@raiz", INT2FIX(raiz));
+    rb_iv_set(self, "@filial", INT2FIX(filial));
+    rb_iv_set(self, "@verif", INT2FIX(verif));
+    rb_iv_set(self, "@valid", valid);
+
+    return self;
+}
+
+static VALUE is_cgc(VALUE self){
+    long long raiz=0;
+    int filial = 0, dv = 0;
+    raiz = NUM2INT(rb_iv_get(self, "@raiz"));
+    filial = NUM2INT(rb_iv_get(self, "@filial"));
+    dv = NUM2INT(rb_iv_get(self, "@verif"));
+    return e_cgc((long long)raiz * 1000000 + filial * 100 + dv) ? Qtrue : Qfalse;
+}
+
+static VALUE valid_cnpj(VALUE self, VALUE ruby_cnpj){
+    long long cnpj=0;
+    cnpj = (long long)NUM2LL(ruby_cnpj);
+    if(cnpj == 0) return Qfalse;
+    return e_cnpj(cnpj) ? Qtrue : Qfalse;
+}
+
+VALUE mBR, cCNPJ;
+void Init_CNPJ(){
+    mBR = rb_define_module("BR");
+    cCNPJ = rb_define_class_under(mBR, "CNPJ", rb_cObject);
+    rb_define_method(cCNPJ, "initialize", t_init_cnpj, -1);
+    rb_define_singleton_method(cCNPJ, "valid?", valid_cnpj, 1);
+    rb_define_method(cCNPJ, "is_cgc?", is_cgc, 0);
+}

data/lib/br/cnpj.rb

@@ -0,0 +1,25 @@
+require File.join(File.dirname(__FILE__), '../CNPJ')
+
+module BR
+  class CNPJ
+    class << self
+        alias_method :orig_valid?, :valid?
+    end
+
+    def self.valid?(cnpj)
+      if cnpj.is_a? String
+        orig_valid?(cnpj.to_i)
+      else
+        orig_valid?(cnpj)
+      end
+    end
+
+    def to_i
+      @raiz * 1_000_000 + @filial * 100 + @verif
+    end
+
+    def to_s
+      "%014d" % to_i
+    end
+  end
+end

data/spec/br-cnpj_spec.rb

@@ -0,0 +1,7 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+describe "BrCnpj" do
+  it "fails" do
+    fail "No specs defined yet"
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,9 @@
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+require 'br-cnpj'
+require 'spec'
+require 'spec/autorun'
+
+Spec::Runner.configure do |config|
+  
+end

metadata

@@ -0,0 +1,83 @@
+--- !ruby/object:Gem::Specification 
+name: br-cnpj
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+  - 0
+  - 1
+  - 1
+  version: 0.1.1
+platform: ruby
+authors: 
+- Bruno Coimbra
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-04-09 00:00:00 -03:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: rspec
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 1
+        - 2
+        - 9
+        version: 1.2.9
+  type: :development
+  version_requirements: *id001
+description: no descripton yet
+email: bbcoimbra@gmail.com
+executables: []
+
+extensions: 
+- ext/CNPJ/extconf.rb
+extra_rdoc_files: 
+- LICENSE
+- README.rdoc
+files: 
+- ext/CNPJ/cnpj.c
+- ext/CNPJ/cnpj.h
+- ext/CNPJ/extconf.rb
+- ext/CNPJ/ruby_cnpj.c
+- lib/br/cnpj.rb
+- LICENSE
+- README.rdoc
+has_rdoc: true
+homepage: http://github.com/bbcoimbra/br-cnpj
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.6
+signing_key: 
+specification_version: 3
+summary: Calcules and validates given CNPJ
+test_files: 
+- spec/spec_helper.rb
+- spec/br-cnpj_spec.rb