cpa 0.0.1

data/Rakefile

@@ -0,0 +1,20 @@
+# encoding: UTF-8
+
+task :db do
+  require "net/http/persistent"
+
+  http = Net::HTTP::Persistent.new
+
+  %w[A B C D E F G H J K L M N P Q R S T U V W X Y Z].each do |provincia|
+    res = http.request(URI.parse("http://www.correoargentino.com.ar/consultas/cpa/obtener_localidades/#{provincia}")).body
+
+    File.open("db/#{provincia}", "w") do |file|
+      res.scan(/option value=.(\d+).+>(.+?)</) do |id, name|
+        file.write(id)
+        file.write(" ")
+        file.write(name.gsub("&Ntilde;", "Ñ"))
+        file.write("\n")
+      end
+    end
+  end
+end

data/bin/cpa

@@ -0,0 +1,90 @@
+#! /usr/bin/env ruby
+# encoding: UTF-8
+
+PROVINCIAS = {
+  "capital federal" => "C",
+  "caba" => "C",
+  "ciudad autonoma de buenos aires" => "C",
+  "buenos aires" => "B",
+  "catamarca" => "K",
+  "chaco" => "H",
+  "chubut" => "U",
+  "cordoba" => "X",
+  "corrientes" => "W",
+  "entre rios" => "E",
+  "formosa" => "P",
+  "jujuy" => "Y",
+  "la pampa" => "L",
+  "la rioja" => "F",
+  "mendoza" => "M",
+  "misiones" => "N",
+  "neuquen" => "Q",
+  "rio negro" => "R",
+  "salta" => "A",
+  "san juan" => "J",
+  "san luis" => "D",
+  "santa cruz" => "Z",
+  "santa fe" => "S",
+  "santiago del estero" => "G",
+  "tierra del fuego" => "V",
+  "tucuman" => "T"
+}
+
+trap(:INT) { exit 1 }
+
+def flunk(message)
+  $stderr.puts message
+  exit 1
+end
+
+def simplify(str)
+  str.downcase.tr("áéíóú", "aeiou")
+end
+
+def parse(line)
+  flunk("Error: nada que buscar.") if line.nil? || line.empty?
+
+  parts = line.split(/,\s*/)
+
+  flunk("Error: no se encontró la provincia.") if parts.size < 2
+
+  if parts[0] =~ /^(?:Av |Avenida )?(.+?) (\d+)$/
+    calle = $1
+    altura = $2
+  end
+
+  provincia = PROVINCIAS[simplify(parts[-1])] ||
+    flunk("Error: no se encontró la provincia '#{parts[-1]}'.")
+
+  if provincia == "C"
+    localidad = "5001"
+  else
+    localidad = File.open("db/#{provincia}") do |io|
+      while line = io.gets
+        id, name = line.split(" ", 2)
+
+        break id if name.start_with?(parts[-2].upcase)
+      end
+    end
+  end
+
+  require "net/http/persistent"
+
+  http = Net::HTTP::Persistent.new
+
+  post = Net::HTTP::Post.new("/consultas/cpa/obtener_cpa")
+  post.body = "localidad=#{localidad}&calle=#{http.escape(simplify(calle))}&altura=#{http.escape(altura)}"
+  http.request(URI.parse("http://www.correoargentino.com.ar"), post).body[/[A-Z]\d{4}[A-Z]{3}/]
+end
+
+###
+
+if ARGV.first == "-"
+  $stdout.sync = true
+
+  while line = gets
+    puts parse(line.chomp)
+  end
+else
+  puts parse(ARGV.first)
+end

data/cpa.gemspec

@@ -0,0 +1,23 @@
+Gem::Specification.new do |s|
+  s.name = "cpa"
+  s.version = "0.0.1"
+  s.summary = "A CLI tool to query Argentinean zip codes."
+  s.authors = ["Damian Janowski"]
+  s.email = ["djanowski@dimaion.com"]
+  s.homepage = "http://github.com/djanowski/cpa"
+
+  s.add_dependency("net-http-persistent")
+  s.add_development_dependency("cutest")
+
+  s.executables << "cpa"
+
+  s.files = Dir[
+    "*.gemspec",
+    "LICENSE",
+    "README*",
+    "Rakefile",
+    "bin/*",
+    "lib/**/*.rb",
+    "test/*.*",
+  ]
+end

data/test/cpa.rb

@@ -0,0 +1,45 @@
+# encoding: UTF-8
+
+require "cutest"
+require "open3"
+
+test "CABA" do
+  assert_equal `./bin/cpa 'Lavalleja 795, Capital Federal'`, "C1414DTO\n"
+  assert_equal `./bin/cpa 'Lavalleja 795, CABA'`, "C1414DTO\n"
+  assert_equal `./bin/cpa 'Lavalleja 795, Ciudad Autónoma de Buenos Aires'`, "C1414DTO\n"
+end
+
+test "Interior" do
+  assert_equal `./bin/cpa 'Independencia 333, Sunchales, Santa Fe'`, "S2322AWD\n"
+  assert_equal `./bin/cpa 'Av Independencia 333, Sunchales, Santa Fe'`, "S2322AWD\n"
+  assert_equal `./bin/cpa 'Avenida Independencia 333, Sunchales, Santa Fe'`, "S2322AWD\n"
+end
+
+test "stdin" do
+  Open3.popen3("./bin/cpa -") do |stdin, stdout|
+    stdin.puts "Amenábar 1294, Capital Federal"
+    assert_equal "C1426AJV\n", stdout.gets
+    stdin.puts "Aguirre 230, Capital Federal"
+    assert_equal "C1414ASF\n", stdout.gets
+  end
+end
+
+test "errors" do
+  Open3.popen3("./bin/cpa 'Lavalleja 795'") do |_, stdout, stderr, wait|
+    assert stdout.read.empty?
+    assert stderr.read =~ /Error: no se encontró la provincia/
+    assert !wait.value.success?
+  end
+
+  Open3.popen3("./bin/cpa 'Lavalleja 795, New York'") do |_, stdout, stderr, wait|
+    assert stdout.read.empty?
+    assert stderr.read =~ /Error: no se encontró la provincia 'New York'/
+    assert !wait.value.success?
+  end
+
+  Open3.popen3("./bin/cpa") do |_, stdout, stderr, wait|
+    assert stdout.read.empty?
+    assert stderr.read =~ /Error: nada que buscar/
+    assert !wait.value.success?
+  end
+end

metadata

@@ -0,0 +1,81 @@
+--- !ruby/object:Gem::Specification 
+name: cpa
+version: !ruby/object:Gem::Version 
+  prerelease: 
+  version: 0.0.1
+platform: ruby
+authors: 
+- Damian Janowski
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-06-19 00:00:00 -03:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: net-http-persistent
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+  type: :runtime
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: cutest
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+  type: :development
+  version_requirements: *id002
+description: 
+email: 
+- djanowski@dimaion.com
+executables: 
+- cpa
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- cpa.gemspec
+- Rakefile
+- bin/cpa
+- test/cpa.rb
+has_rdoc: true
+homepage: http://github.com/djanowski/cpa
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.6.2
+signing_key: 
+specification_version: 3
+summary: A CLI tool to query Argentinean zip codes.
+test_files: []
+