scb 0.0.1

data/lib/scb/db/table.rb

@@ -0,0 +1,105 @@
+# encoding: utf-8
+
+require_relative '../db'
+
+module SCB
+  class DB
+    class Table
+      attr_reader :name
+      attr_accessor :api
+
+      def initialize(name, api = nil)
+        @name = name
+        @api  = api || SCB.api
+      end
+
+      def query(simple_query, filter = "item")
+        json_query parse_simple_query(simple_query, filter)
+      end
+
+      def json_query(search_query = {})
+        body = post_query(search_query, "json")
+        api.load_json(body) unless body.nil?
+      end
+
+      def png_query(simple_query, filter = "item")
+        post_query parse_simple_query(simple_query, filter), "png"
+      end
+
+      def post_query(search_query, format = "json")
+        api_post(name, {
+          query: search_query,
+          response: {
+            format: format
+          }
+        })
+      rescue SCB::HTTP::Exception
+        raise SCB::DB::InvalidQuery, "Invalid query"
+      end
+
+      def title
+        data['title']
+      end
+
+      def uri
+        api_uri
+      end
+
+      def variables(klass = Variable)
+        @variables ||= data['variables'].map do |v|
+          klass.new(v)
+        end
+      end
+
+      def codes
+        variables.map(&:code)
+      end
+
+      def write_png_query(filename, simple_query, filter = "item")
+        write_file filename, png_query(simple_query, filter)
+      end
+
+      def write_png_query_raw(filename, search_query)
+        write_file filename, post_query(search_query, "png")
+      end
+
+      def inspect
+        name
+      end
+
+      def data
+        @data ||= api.get_and_parse(name) || []
+      end
+
+      private
+
+      def api_uri
+        api.uri(name)
+      end
+
+      def api_post(name, search_query)
+        api.post(name, search_query)
+      end
+
+      def write_file(filename, data)
+        unless File.exist?(filename)
+          File.open(filename, 'wb') do |f|
+            f.write data
+          end
+        end
+      end
+
+      def parse_simple_query(simple_query, filter)
+        simple_query.map do |q|
+          {
+            code: q[0].to_s,
+            selection: {
+              filter: filter,
+              values: Array(q[1]).map(&:to_s)
+            }
+          }
+        end
+      end
+    end
+  end
+end

data/lib/scb/db/variable.rb

@@ -0,0 +1,41 @@
+# encoding: utf-8
+
+module SCB
+  class DB
+    class Variable
+      attr_reader :data
+
+      def initialize(data)
+        @data = data
+      end
+
+      def code
+        data["code"]
+      end
+
+      def text
+        data["text"]
+      end
+
+      def values
+        data["values"]
+      end
+
+      def values_hash
+        @values_hash ||= Hash[values.zip(value_texts)]
+      end
+
+      def value_texts
+        data["valueTexts"]
+      end
+
+      def elimination?
+        !!data["elimination"]
+      end
+
+      def time?
+        !!data["time"]
+      end
+    end
+  end
+end

data/lib/scb/http.rb

@@ -0,0 +1,53 @@
+# encoding: utf-8
+
+require 'net/http'
+
+require_relative "version"
+
+module SCB
+  class HTTP
+    HEADERS = {
+      'User-Agent' => "RubyGem: scb (#{SCB::VERSION})"
+    }
+
+    class << self
+      def get(uri)
+        perform uri, Net::HTTP::Get.new(uri.request_uri, HEADERS)
+      end
+
+      def post(uri, body)
+        request = Net::HTTP::Post.new(uri.request_uri, HEADERS).tap do |r|
+          r.body = body
+        end
+
+        perform(uri, request)
+      end
+
+      private
+
+      def perform(uri, request)
+        Net::HTTP.start(uri.host, uri.port) do |http|
+          http.read_timeout = 60
+          response = http.request(request)
+          http.finish
+
+          if response.kind_of? Net::HTTPSuccess
+            response
+          else
+            raise Exception, response
+          end
+        end
+      end
+    end
+
+    class Exception < RuntimeError
+      attr_accessor :response
+      attr_reader   :message
+
+      def initialize(response = nil)
+        @response = response
+        @message  = response.message if response
+      end
+    end
+  end
+end

data/lib/scb/version.rb

@@ -0,0 +1,5 @@
+# encoding: utf-8
+
+module SCB
+  VERSION = "0.0.1"
+end

data/scb.gemspec

@@ -0,0 +1,28 @@
+# encoding: utf-8
+
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+
+require 'scb/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = "scb"
+  spec.version       = SCB::VERSION
+  spec.authors       = ["Peter Hellberg"]
+  spec.email         = ["peter@c7.se"]
+  spec.summary       = "A small API client for the SCB API."
+  spec.homepage      = "https://github.com/peterhellberg/scb"
+  spec.license       = "MIT"
+
+  spec.required_ruby_version = '>= 1.9.3'
+
+  spec.files         = `git ls-files`.split($/)
+  spec.executables   = spec.files.grep(%r{^bin/}) { |f| File.basename(f) }
+  spec.test_files    = spec.files.grep(%r{^spec/})
+  spec.require_paths = ["lib"]
+
+  spec.add_development_dependency "bundler", "~> 1.3"
+  spec.add_development_dependency "minitest", "~> 4.7"
+  spec.add_development_dependency "rake"
+  spec.add_development_dependency "pry"
+end

data/spec/fixtures/sv.json

@@ -0,0 +1,6 @@
+[
+  {
+    "dbid": "ssd",
+    "text": "Statistikdatabasen"
+  }
+]

data/spec/fixtures/sv/ssd.json

@@ -0,0 +1,107 @@
+[
+  {
+    "id": "AM",
+    "type": "l",
+    "text": "Arbetsmarknad"
+  },
+  {
+    "id": "BO",
+    "type": "l",
+    "text": "Boende, byggande och bebyggelse"
+  },
+  {
+    "id": "FM",
+    "type": "l",
+    "text": "Finansmarknad"
+  },
+  {
+    "id": "HE",
+    "type": "l",
+    "text": "Hushållens ekonomi"
+  },
+  {
+    "id": "JO",
+    "type": "l",
+    "text": "Jord- och skogsbruk, fiske"
+  },
+  {
+    "id": "LE",
+    "type": "l",
+    "text": "Levnadsförhållanden"
+  },
+  {
+    "id": "MI",
+    "type": "l",
+    "text": "Miljö"
+  },
+  {
+    "id": "NV",
+    "type": "l",
+    "text": "Näringsverksamhet"
+  },
+  {
+    "id": "PR",
+    "type": "l",
+    "text": "Priser och konsumtion"
+  },
+  {
+    "id": "TK",
+    "type": "l",
+    "text": "Transporter och kommunikationer"
+  },
+  {
+    "id": "AA",
+    "type": "l",
+    "text": "Ämnesövergripande statistik"
+  },
+  {
+    "id": "BE",
+    "type": "l",
+    "text": "Befolkning"
+  },
+  {
+    "id": "EN",
+    "type": "l",
+    "text": "Energi"
+  },
+  {
+    "id": "HA",
+    "type": "l",
+    "text": "Handel med varor och tjänster"
+  },
+  {
+    "id": "HS",
+    "type": "l",
+    "text": "Hälso- och sjukvård"
+  },
+  {
+    "id": "KU",
+    "type": "l",
+    "text": "Kultur och fritid"
+  },
+  {
+    "id": "ME",
+    "type": "l",
+    "text": "Demokrati"
+  },
+  {
+    "id": "NR",
+    "type": "l",
+    "text": "Nationalräkenskaper"
+  },
+  {
+    "id": "OE",
+    "type": "l",
+    "text": "Offentlig ekonomi"
+  },
+  {
+    "id": "SO",
+    "type": "l",
+    "text": "Socialtjänst"
+  },
+  {
+    "id": "UF",
+    "type": "l",
+    "text": "Utbildning och forskning"
+  }
+]

data/spec/fixtures/sv/ssd/BO.json

@@ -0,0 +1,57 @@
+[
+  {
+    "id": "BO0102",
+    "type": "l",
+    "text": "Ombyggnad och rivning av flerbostadshus"
+  },
+  {
+    "id": "BO0201",
+    "type": "l",
+    "text": "Priser för nyproducerade bostäder"
+  },
+  {
+    "id": "BO0303",
+    "type": "l",
+    "text": "Outhyrda bostadslägenheter i flerbostadshus"
+  },
+  {
+    "id": "BO0406",
+    "type": "l",
+    "text": "Hyror i bostadslägenheter"
+  },
+  {
+    "id": "BO0601",
+    "type": "l",
+    "text": "Fastighetstaxeringar"
+  },
+  {
+    "id": "BO0101",
+    "type": "l",
+    "text": "Nybyggnad av bostäder"
+  },
+  {
+    "id": "BO0104",
+    "type": "l",
+    "text": "Bostadsbestånd (kalkylerat)"
+  },
+  {
+    "id": "BO0301",
+    "type": "l",
+    "text": "Intäkts- och kostnadsundersökning för flerbostadshus (IKU)"
+  },
+  {
+    "id": "BO0404",
+    "type": "l",
+    "text": "Avgifter/hyror för nybyggda lägenheter"
+  },
+  {
+    "id": "BO0501",
+    "type": "l",
+    "text": "Fastighetspriser och lagfarter"
+  },
+  {
+    "id": "BO0701",
+    "type": "l",
+    "text": "Bygglovsstatistik för bostäder och lokaler"
+  }
+]

data/spec/fixtures/sv/ssd/BO/BO0102.json

@@ -0,0 +1,47 @@
+[
+  {
+    "id": "LagenhetOmbAkBpAtAr",
+    "type": "t",
+    "text": "Ombyggda lägenheter i flerbostadshus med statligt stöd i riket efter åtgärd, byggnadsperiod och ägarkategori. År 1989 - 2008"
+  },
+  {
+    "id": "LagenhetOmbAtgardAr",
+    "type": "t",
+    "text": "Ombyggnad av flerbostadshus, tillskott av lägenheter, i riket efter åtgärd, ägarkategori, byggnadsperiod, lägenhetstyp och med/utan statligt stöd. År 1989 - 2012"
+  },
+  {
+    "id": "LagenhetOmbStodtypAr",
+    "type": "t",
+    "text": "Ombyggda lägenheter i flerbostadshus i riket efter ägarkategori, byggnadsperiod, lägenhetstyp och med/utan statligt stöd. År 1989 - 2008"
+  },
+  {
+    "id": "LagenhetRivAkBpLtRAr",
+    "type": "t",
+    "text": "Rivning av lägenheter i flerbostadshus efter region, ägarkategori, byggnadsperiod, lägenhetstyp och rivningsorsak. År 1989 - 2012"
+  },
+  {
+    "id": "LagenhetOmbAkBpAr",
+    "type": "t",
+    "text": "Ombyggd bostadsarea i flerbostadshus efter region, ägarkategori och byggnadsperiod. År 1989 - 2012"
+  },
+  {
+    "id": "LagenhetOmbAkBpLtAr",
+    "type": "t",
+    "text": "Ombyggda lägenheter i flerbostadshus efter region, ägarkategori, byggnadsperiod och lägenhetstyp. År 1989 - 2012"
+  },
+  {
+    "id": "LagenhetOmbKv",
+    "type": "t",
+    "text": "Lägenheter i ombyggda flerbostadshus efter region. Preliminära uppgifter. Kvartal 1989K1 - 2012K4"
+  },
+  {
+    "id": "LagenhetOmbUpplatAr",
+    "type": "t",
+    "text": "Ombyggda lägenheter i flerbostadshus med statligt stöd efter region och upplåtelseform. År 1989 - 2008"
+  },
+  {
+    "id": "LagenhetRivKvalAr",
+    "type": "t",
+    "text": "Rivning av lägenheter i flerbostadshus efter region och kvalitetsgrupp. År 1989 - 2011"
+  }
+]