guia_mais 0.2

data/Manifest

@@ -0,0 +1,3 @@
+Rakefile
+Manifest
+lib/guia_mais.rb

data/Rakefile

@@ -0,0 +1,14 @@
+# -*- coding: utf-8 -*-
+require "rubygems"
+require "rake"
+require "echoe"
+
+Echoe.new("guia_mais", "0.2") do |p|
+  p.description = "Busca dados no site Guia Mais através do telefone"
+  p.author = "Claudemiro Alves Feitosa Neto"
+  p.email = "dimiro1@gmail.com"
+  p.ignore_pattern = ["tmp/*", "script/*"]
+  p.development_dependencies = ["hpricot", "httparty"]
+end
+
+Dir["#{File.dirname(__FILE__)}/tasks/*.rake"].sort.each { |ext| load ext }

data/guia_mais.gemspec

@@ -0,0 +1,37 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{guia_mais}
+  s.version = "0.2"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 1.2") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Claudemiro Alves Feitosa Neto"]
+  s.date = %q{2009-11-09}
+  s.description = %q{Busca dados no site Guia Mais através do telefone}
+  s.email = %q{dimiro1@gmail.com}
+  s.extra_rdoc_files = ["lib/guia_mais.rb"]
+  s.files = ["Rakefile", "Manifest", "lib/guia_mais.rb", "guia_mais.gemspec", "test/guia_mais_test.rb"]
+  s.homepage = %q{}
+  s.rdoc_options = ["--line-numbers", "--inline-source", "--title", "Guia_mais", "--main", "README"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{guia_mais}
+  s.rubygems_version = %q{1.3.5}
+  s.summary = %q{Busca dados no site Guia Mais através do telefone}
+  s.test_files = ["test/guia_mais_test.rb"]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+      s.add_development_dependency(%q<hpricot>, [">= 0"])
+      s.add_development_dependency(%q<httparty>, [">= 0"])
+    else
+      s.add_dependency(%q<hpricot>, [">= 0"])
+      s.add_dependency(%q<httparty>, [">= 0"])
+    end
+  else
+    s.add_dependency(%q<hpricot>, [">= 0"])
+    s.add_dependency(%q<httparty>, [">= 0"])
+  end
+end

data/lib/guia_mais.rb

@@ -0,0 +1,112 @@
+# -*- coding: utf-8 -*-
+require "rubygems"
+require "httparty"
+require "hpricot"
+require "timeout"
+
+class String
+  def to_utf8
+    unpack("C*").pack("U*")
+  end
+end
+
+module GuiaMais
+  class GuiaMaisException < Exception
+  end
+
+  ESTADOS = {
+    :acre                => {:guia => 579, :sigla => 'AC'},
+    :alagoas             => {:guia => 580, :sigla => 'AL'},
+    :amazonas            => {:guia => 325, :sigla => 'AM'},
+    :amapa               => {:guia => 581, :sigla => 'AP'},
+    :bahia               => {:guia => 326, :sigla => 'BA'},
+    :ceara               => {:guia => 582, :sigla => 'CE'},
+    :distrito_federal    => {:guia => 327, :sigla => 'DF'},
+    :espirito_santo      => {:guia => 328, :sigla => 'ES'},
+    :goias               => {:guia => 329, :sigla => 'GO'},
+    :maranhao            => {:guia => 584, :sigla => 'MA'},
+    :minas_gerais        => {:guia => 585, :sigla => 'MG'},
+    :mato_grosso_do_sul  => {:guia => 586, :sigla => 'MS'},
+    :mato_grosso         => {:guia => 587, :sigla => 'MT'},
+    :para                => {:guia => 330, :sigla => 'PA'},
+    :paraiba             => {:guia => 588, :sigla => 'PB'},
+    :pernambuco          => {:guia => 589, :sigla => 'PE'},
+    :piaui               => {:guia => 590, :sigla => 'PI'},
+    :parana              => {:guia => 331, :sigla => 'PR'},
+    :rio_de_janeiro      => {:guia => 333, :sigla => 'RJ'},
+    :rio_grande_do_norte => {:guia => 591, :sigla => 'RN'},
+    :rondonia            => {:guia => 592, :sigla => 'RO'},
+    :roraima             => {:guia => 593, :sigla => 'RR'},
+    :rio_grande_do_sul   => {:guia => 334, :sigla => 'RS'},
+    :santa_catarina      => {:guia => 335, :sigla => 'SC'},
+    :sergipe             => {:guia => 594, :sigla => 'SE'},
+    :sao_paulo           => {:guia => 336, :sigla => 'SP'},
+    :tocantins           => {:guia => 595, :sigla => 'TO'}
+  }
+
+  class Cliente
+    attr_reader :nome, :telefone, :endereco, :bairro, :cep, :categoria
+    def initialize(nome, telefone, endereco, bairro, cep, categoria)
+      @nome = nome
+      @telefone = telefone
+      @endereco = endereco
+      @bairro = bairro
+      @cep = cep
+      @categoria = categoria
+    end
+
+    def self.buscar(oque, params)
+      Minerador.buscar(oque, params)
+    end
+
+  end
+
+  class Minerador
+    include HTTParty
+    base_uri "http://www.guiamais.com.br"
+    @@pagina = ""
+    @@query = {}
+
+    def self.buscar(oque, query = {})
+      query[:txb] = oque
+      query[:nes] ||= ESTADOS[query[:estado]][:sigla] if query[:estado]
+      query[:ies] ||= ESTADOS[query[:estado]][:guia] if query[:estado]
+      query.delete(:estado)
+      @@query = query
+      resultado = get("/Results.aspx", :query => query)
+      @@pagina = Hpricot(resultado.body.to_utf8)
+      minerar_dados
+    end
+
+    private
+
+    def self.buscar_elemento(elemento)
+      resultado = @@pagina.search(elemento).first
+      resultado ? resultado.inner_html : nil
+    end
+    
+    def self.minerar_dados
+      nome, endereco, bairro, cep, categoria = nil
+      begin
+        timeout(10) do
+          nome = buscar_elemento("div#ctl00_C1_RR_ctl00_lst_oPanelTittle span.txtT")
+          unless nome
+            nome = buscar_elemento("div#ctl00_C1_RR_ctl00_lst_oPanelTittle span.txtTitleBlack")
+          end
+          unless nome
+            nome = buscar_elemento("div#ctl00_C1_RR_ctl00_lst_oPanelTittle a.txtT")
+          end
+
+          endereco = buscar_elemento("div#ctl00_C1_RR_ctl00_lst_oPanelTitleCat+div div.divAddress>span.CmpInf")
+          bairro = buscar_elemento("div#ctl00_C1_RR_ctl00_lst_oPanelTitleCat+div div.divNeighborHood>span.CmpInf")
+          cep = buscar_elemento("div#ctl00_C1_RR_ctl00_lst_oPanelTitleCat+div div.divCEP>span.CmpInf")
+          categoria = buscar_elemento("div#ctl00_C1_RR_ctl00_lst_oPanelCategory>span.CmpInf")
+        end
+      rescue TimeoutError
+        raise GuiaMaisException.new, 'GuiaMais fora do ar'
+      end
+      return Cliente.new(nome, @@query[:txb], endereco, bairro, cep, categoria)
+    end
+
+  end
+end

data/test/guia_mais_test.rb

@@ -0,0 +1,51 @@
+# -*- coding: utf-8 -*-
+require "#{Dir.pwd}/lib/guia_mais.rb"
+require "test/unit"
+
+class GuiaMaisTest < Test::Unit::TestCase
+  def test_se_funciona_com_32222222_RN
+    cliente = GuiaMais::Cliente.buscar("32222222", :estado => :rio_grande_do_norte)
+    assert_equal cliente.nome, "MED DIET DROGARIA"
+    assert_equal cliente.endereco, "Av Afonso Pena 939 "
+    assert_equal cliente.bairro, "Tirol"
+    assert_equal cliente.cep, "59020-100"
+    assert_equal cliente.categoria, "Farmácias e Drogarias - Art"
+  end
+
+  def test_se_funciona_com_32222222_PI
+    cliente = GuiaMais::Cliente.buscar("32222222", :estado => :piaui)
+    assert_equal cliente.nome, "RÁDIO TÁXI"
+    assert_equal cliente.endereco, "R Álvaro Ferreira, 60"
+    assert_equal cliente.bairro, "Monte Castelo"
+    assert_equal cliente.cep, "64017-380"
+    assert_equal cliente.categoria, "Táxi"
+  end
+
+  def test_se_funciona_com_32222222_AP
+    cliente = GuiaMais::Cliente.buscar("32222222", :estado => :amapa)
+    assert_equal cliente.nome, "ELDORADO VEÍCULOS"
+    assert_equal cliente.endereco, "Rod Br-156 km 3 Boné Azul"
+    assert_equal cliente.bairro, "Lotm Açaí"
+    assert_equal cliente.cep, "68900-001"
+    assert_equal cliente.categoria, "Automóveis - Agências e Revendedores"
+  end
+
+  def test_se_funciona_com_32325151_PI
+    cliente = GuiaMais::Cliente.buscar("32325151", :estado => :piaui)
+    assert_equal cliente.nome, "ARTTE DOS PÉS"
+    assert_equal cliente.endereco, "Av Dom Severino, 1065"
+    assert_equal cliente.bairro, "Fátima"
+    assert_equal cliente.cep, "64049-370"
+    assert_equal cliente.categoria, "Cabeleireiros e Institutos de Beleza"
+  end
+
+  def test_se_funciona_com_32321311_PI
+    cliente = GuiaMais::Cliente.buscar("32331128", :estado => :piaui)
+    assert_equal cliente.nome, "ALEMANHA VEICULOS"
+    assert_equal cliente.endereco, "Av João XXIII 3480 "
+    assert_equal cliente.bairro, "Noivos"
+    assert_equal cliente.cep, "64045-000"
+    assert_equal cliente.categoria, "Automóveis - Concessionárias e Serviços Autorizados"
+  end
+
+end

metadata

@@ -0,0 +1,82 @@
+--- !ruby/object:Gem::Specification 
+name: guia_mais
+version: !ruby/object:Gem::Version 
+  version: "0.2"
+platform: ruby
+authors: 
+- Claudemiro Alves Feitosa Neto
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-11-09 00:00:00 -03:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: hpricot
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: httparty
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: "Busca dados no site Guia Mais atrav\xC3\xA9s do telefone"
+email: dimiro1@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- lib/guia_mais.rb
+files: 
+- Rakefile
+- Manifest
+- lib/guia_mais.rb
+- guia_mais.gemspec
+has_rdoc: true
+homepage: ""
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --line-numbers
+- --inline-source
+- --title
+- Guia_mais
+- --main
+- README
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "1.2"
+  version: 
+requirements: []
+
+rubyforge_project: guia_mais
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: "Busca dados no site Guia Mais atrav\xC3\xA9s do telefone"
+test_files: 
+- test/guia_mais_test.rb