apdm 0.0.15

data/spec/fixtures/vcr_cassettes/site_stat_custom_category.yml

@@ -0,0 +1,172 @@
+---
+http_interactions:
+- request:
+    method: get
+    uri: http://www.avisnavn.no/?app=default&counterName=awesomesauce&element=traffic&key=automated-test-key&service=designElements&version=4
+    body:
+      encoding: US-ASCII
+      string: ''
+    headers: {}
+  response:
+    status:
+      code: 200
+      message: OK
+    headers:
+      X-Trace-App:
+      - ! '[relax ; blixt.api.kunder.linpro.no ; Sat Apr 28 15:14:03 CEST 2012]'
+      - ! '[relax ; knuff.api.kunder.linpro.no ; Sat Apr 28 15:14:03 CEST 2012]'
+      - ! '[seamstress ; glitter.api.kunder.linpro.no ; Sat Apr 28 15:19:04 CEST 2012]'
+      X-Ua-Compatible:
+      - IE=Edge
+      Content-Language:
+      - nb-NO-www.avisnavn.no
+      Content-Type:
+      - text/html; charset=utf-8
+      Server:
+      - Jetty(6.1.24)
+      X-Varnish:
+      - '1596279391'
+      - '2243642635'
+      Via:
+      - 1.1 varnish
+      - 1.1 varnish
+      X-Src-Webcache:
+      - regolit.api.kunder.linpro.no glitter
+      Transfer-Encoding:
+      - chunked
+      Date:
+      - Sat, 28 Apr 2012 13:19:04 GMT
+      Age:
+      - '0'
+      Connection:
+      - keep-alive
+      Cache-Control:
+      - must-revalidate
+      X-Country-Code:
+      - 'NO'
+    body:
+      encoding: US-ASCII
+      string: ! '<!-- PATH:  -->
+
+        <!-- Spring Score : start -->
+
+        <script type="text/javascript" src="http://r.api.no/local/v3/common/js/spring/spring.js">
+        </script>
+
+        <script type="text/javascript">
+
+        <!--
+
+        var api_sp_e02 = {
+
+        "s":"api",
+
+        "cp":"API/www.avisnavn.no",
+
+        "url": "http://www.avisnavn.no/designelement"
+
+        }
+
+        spring.c(api_sp_e02);
+
+        //-->
+
+        </script>
+
+        <noscript><img src="http://api.tns-cs.net/j0=,,,;+,cp=API/www.avisnavn.no+url=http%3A%2F%2Fwww.avisnavn.no%2Fdesignelement;;;"
+        alt=""></noscript>
+
+        <!-- Spring Score : end -->
+
+        <!--
+
+        Cache-Control: max-age=86400, groups=/componada-dold, /relax-blixt, /pub2463514,
+        /ece_frontpage, /com-global-traffic_tns, /sec39688
+
+        X-Trace-App: [componada ; dold.api.kunder.linpro.no ; Sat Apr 28 15:14:03
+        CEST 2012]
+
+        X-Trace-App: [relax ; blixt.api.kunder.linpro.no ; Sat Apr 28 13:05:37 CEST
+        2012]
+
+        -->
+
+        <img src="http://cachetest.api.no/pix.gif" width="1" height="1" alt="">
+
+        <!--
+
+        Cache-Control: max-age=86400, groups=/componada-drag, /static, /com-global-traffic_apipix
+
+        X-Trace-App: [componada ; drag.api.kunder.linpro.no ; Sat Apr 28 07:16:35
+        CEST 2012]
+
+        -->
+
+        <!-- Begin Sitestat4 code -->
+
+        <script language="JavaScript1.1" type="text/javascript">
+
+        <!--
+
+        function sitestat(u){
+
+        var d=document,l=d.location;
+
+        u += "&ns__t="+(new Date().getTime());
+
+        // Gets the search result total from the search_results component
+
+        if(typeof ns_searchResults != "undefined")if(ns_searchResults)u += "&amp;ns_search_result="
+        + ns_searchResults;
+
+        ns_pixelUrl = u;
+
+        u=ns_pixelUrl+"&ns_c="+((d.characterSet)?d.characterSet:d.defaultCharset)+"&ns_ti="+escape(d.title)+"&ns_jspageurl="+escape(l&&l.href?l.href:d.URL)+"&ns_referrer="+escape(d.referrer);
+
+        (d.images)?new Image().src=u:d.write(''<''+''p><img src="''+u+''" height="1"
+        width="1" alt="*"><''+''/p>'');
+
+        }
+
+        fullStatUrl = ''http://int.sitestat.com/a-pi/x/s?awesomesauce&amp;category='';
+
+        sitestat(fullStatUrl);
+
+        // Used in click in / out scripts.
+
+        var nedstat_site = ''x'';
+
+        var nedstat_siteHost = ''http://www.avisnavn.no'';
+
+        var nedstat_active = ''true'';
+
+        //-->
+
+        </script>
+
+        <noscript>
+
+        <img src="http://int.sitestat.com/a-pi/x/s?awesomesauce&amp;category=" width="1"
+        height="1" alt="">
+
+        </noscript>
+
+        <!-- End Sitestat code -->
+
+        <!--
+
+        Cache-Control: max-age=86400, groups=/componada-glitter, /relax-blixt, /pub2463514,
+        /ece_frontpage, /com-global-traffic_nedstat_section, /sec39688
+
+        X-Trace-App: [componada ; glitter.api.kunder.linpro.no ; Sat Apr 28 15:19:04
+        CEST 2012]
+
+        X-Trace-App: [relax ; blixt.api.kunder.linpro.no ; Sat Apr 28 13:05:37 CEST
+        2012]
+
+        -->
+
+'
+    http_version: 
+  recorded_at: Sat, 28 Apr 2012 13:19:05 GMT
+recorded_with: VCR 2.0.1

data/spec/geo_spec.rb

@@ -0,0 +1,10 @@
+require 'apdm/local_paper_area'
+
+describe APDM::LocalPaperArea do
+
+  let(:geo) { "{\"type\":\"MultiPolygon\",\"coordinates\":[[[[12.1234130859375,63.1046997471211],[11.865234375,63.1071845371386],[11.5960693359375,63.1593160714105],[11.4202880859375,63.1717145457086],[11.35986328125,63.1469122928484],[11.239013671875,63.1096691147021],[11.1236572265625,63.0375300597363],[11.00830078125,62.9951584521205],[10.9149169921875,62.8175283202214],[10.72265625,62.7496959510699],[10.7391357421875,62.5983974391559],[10.74462890625,62.5021745599426],[10.78857421875,62.4030956316363],[10.5029296875,62.3343099292011],[10.12939453125,62.2065118984177],[9.854736328125,62.0858865828731],[10.0579833984375,61.9905877362041],[10.3765869140625,61.8924020831161],[10.5084228515625,61.7731228645315],[10.78857421875,61.7002908383263],[11.05224609375,61.6585951742643],[11.260986328125,61.556725885809],[11.2664794921875,61.4728903088153],[11.5191650390625,61.4230058983234],[11.7169189453125,61.7054988381964],[11.678466796875,62.1218677921369],[11.88720703125,62.2704786971012],[12.0355224609375,62.3547073258179],[12.2332763671875,62.3598045100388],[12.0684814453125,62.6110351962702],[12.1728515625,62.9502272814474],[12.1234130859375,63.1046997471211],[12.1234130859375,63.1046997471211],[12.1234130859375,63.1046997471211],[12.1234130859375,63.1046997471211],[12.1234130859375,63.1046997471211]]]]}" }
+
+  subject { APDM::LocalPaperArea.new(geo) }
+  it { subject.contains?(11.660385, 62.629982).should be_true } # røros
+  it { subject.contains?(5.857244, 61.45325).should be_false } # førde
+end

data/spec/issues_etl_spec.rb

@@ -0,0 +1,41 @@
+# encoding: utf-8
+require 'apdm/issues/etl'
+
+describe APDM::Issues::ETL do
+
+  subject { APDM::Issues::ETL }
+
+  context "with a sane import source" do
+    let(:glom) { { 'www.glomdalen.no' => ['2012-01-01', '2012-01-02'] } }
+    let(:avisnavn) { { 'www.avisnavn.no' => ['2012-01-01'] } }
+
+    it "extracts" do
+      subject.extract('spec/fixtures/issues.csv').should eq(glom.merge(avisnavn))
+    end
+
+    it "transforms" do
+      channel, issues = subject.transform('www.avisnavn.no', ['2012-01-01'])
+
+      channel.should eq APDM::Channel.find('avisnavn')
+      issues.should eq [Date.new(2012, 1, 1)]
+    end
+  end
+
+  context "when unable to match issues to a channel" do
+    it "complains" do
+      ->{ subject.transform('www.no-such-paper.no', []) }.should raise_error APDM::Issues::ETL::NoMatchingChannel
+    end
+  end
+
+  describe "the full import" do
+    # NOTE: I am not convinced about the structure of this.
+    it "works" do
+      subject.stub(:path).and_return '/tmp/1.rb', '/tmp/2.rb'
+      subject.import('spec/fixtures/issues.csv')
+
+      File.read('/tmp/1.rb').should eq("APDM::ISSUES['glomdalen'] = [\n  Date.parse('2012-01-01'),\n  Date.parse('2012-01-02')\n]\n")
+      File.read('/tmp/2.rb').should eq("APDM::ISSUES['avisnavn'] = [\n  Date.parse('2012-01-01')\n]\n")
+    end
+  end
+
+end

data/spec/mockcached.rb

@@ -0,0 +1,36 @@
+class Mockcached
+
+  def initialize
+    @store = {}
+  end
+
+  def set(*args)
+    @store[args[0]] = args[1]
+  end
+
+  def get(*args)
+    @store[args[0]]
+  end
+
+  def fetch(*args)
+    set args[0], yield
+  end
+
+  def get_multi(*keys)
+    result = {}
+    keys.each do |key|
+      value = get(key)
+      result[key] = value if value
+    end
+    result
+  end
+
+  def multi
+    yield
+  end
+
+  def delete(*args)
+    @store.delete(args[0])
+  end
+
+end

data/spec/network_spec.rb

@@ -0,0 +1,43 @@
+require 'apdm/network'
+
+describe APDM::Network do
+  subject { APDM::Network.new }
+
+  let(:abc) { stub(:label => 'abc') }
+  let(:prq) { stub(:label => 'prq') }
+  let(:xyz) { stub(:label => 'xyz') }
+
+  it "can append channels" do
+    subject << xyz
+    subject.channels.should eq([xyz])
+  end
+
+  context "with several channels" do
+    before :each do
+      subject << abc << prq << xyz
+    end
+
+    it "finds a channel by label" do
+      subject.find_by_label('prq').should eq(prq)
+    end
+
+    describe "find" do
+      specify "by domain" do
+        subject.find_by_url('prq.no').should eq(prq)
+      end
+
+      specify "with some random subdomain" do
+        subject.find_by_url('auda.mobil.prq.no').should eq(prq)
+      end
+
+      specify "by homepage" do
+        subject.find_by_url('http://www.prq.no').should eq(prq)
+      end
+
+      specify "by homepage with secure protocol" do
+        subject.find_by_url('https://www.prq.no').should eq(prq)
+      end
+    end
+  end
+
+end

data/spec/null_cache_spec.rb

@@ -0,0 +1,29 @@
+require 'apdm'
+
+describe APDM::NullCache do
+  before(:each) do
+    APDM.cache = nil
+  end
+
+  it "does nothing on set" do
+    ->{ subject.set('whatever', 'stuff', :expires_in => 23) }.should_not raise_error
+  end
+
+  it "does nothing on get" do
+    ->{ subject.get('whatever') }.should_not raise_error
+  end
+
+  it "does nothing on delete" do
+    ->{ subject.delete('whatever') }.should_not raise_error
+  end
+
+  it "is apdm's default cache" do
+    ->{ APDM.cache.get('whatever') }.should_not raise_error
+  end
+
+  it "can be overridden" do
+    cache = stub(:cache, :get => 'hey')
+    APDM.cache = cache
+    APDM.cache.get('something').should eq('hey')
+  end
+end

data/spec/origo_spec.rb

@@ -0,0 +1,24 @@
+# encoding: utf-8
+require 'vcr_helper'
+require 'apdm/origo'
+
+describe APDM::Origo do
+
+  it "determines whether a organization id is an APDM organization" do
+    APDM::Origo.organization?(1).should == false
+    APDM::Origo.organization?(44).should == true
+  end
+
+  it "actually talks to origo" do
+    VCR.use_cassette('origo.someone.credentials') do
+      credentials = APDM::Origo.fetch_credentials(4111).first
+      credentials["role"].should == "Redaktør"
+    end
+  end
+
+  it "filters out non-a-pressen credentials" do
+    VCR.use_cassette('origo.westerdal.credentials') do
+      APDM::Origo.fetch_credentials(1034291).should eq([])
+    end
+  end
+end

data/spec/saxo/iptc_spec.rb

@@ -0,0 +1,105 @@
+require 'simplecov'
+require 'apdm/saxo/iptc'
+
+describe APDM::Saxo::IPTC do
+  before :each do
+    APDM::Saxo::IPTC.any_instance.stub(:logger) { stub.as_null_object }
+  end
+
+  describe "target file" do
+    subject { APDM::Saxo::IPTC.new('name', 'path') }
+    its(:name) { should eq('name') }
+    its(:path) { should eq('path') }
+  end
+
+  describe "manipulating the file" do
+
+    let(:fullpath) { File.expand_path('../../fixtures', __FILE__) }
+    let(:testfile) { "#{fullpath}/test.jpg" }
+    let(:tmpfile) { "#{fullpath}/tmp.jpg" }
+
+    subject { APDM::Saxo::IPTC.new('tmp.jpg', fullpath) }
+
+    before :each do
+      FileUtils.cp testfile, tmpfile
+      # guard
+      `exiv2 -Pnv #{tmpfile}`.gsub(/^ObjectName/, "").strip.should eq("Old Object Name")
+    end
+
+    after :each do
+      File.delete tmpfile
+    end
+
+    it "deletes existing data" do
+      subject.delete_metadata
+      `exiv2 -Pnv #{tmpfile}`.should eq("")
+    end
+
+    describe "writing metadata" do
+      it "writes the file name into ObjectName" do
+        subject.write_metadata
+        `exiv2 -Pnv #{tmpfile}`.gsub(/^ObjectName/, "").strip.should eq('tmp.jpg')
+      end
+
+      [:keywords, :byline, :headline, :credit, :source, :copyright, :caption].each do |key|
+        it "writes the #{key.inspect} into #{key.to_s.capitalize}" do
+          subject.write_metadata(key => key.to_s)
+          `exiv2 -Pnv #{tmpfile}`.split("\n").last.gsub(/#{key.to_s.capitalize}/, '').strip.should eq(key.to_s)
+        end
+      end
+
+    end
+  end
+
+  describe "source photo" do
+    it "is optionally included" do
+      photo = APDM::Saxo::IPTC.new('name', 'path', :source => 'url')
+      photo.source.should eq('url')
+    end
+  end
+
+  describe "#download" do
+    subject { APDM::Saxo::IPTC.new('name', 'path', :source => 'url') }
+
+    it "opens the file" do
+      File.should_receive(:open).with('path/name', 'wb')
+      subject.download
+    end
+
+    it "does other stuff which is exceedingly difficult to test"
+  end
+
+  describe "#write" do
+    it "downloads the file" do
+      photo = APDM::Saxo::IPTC.new('name', 'path', :source => 'url')
+      photo.should_receive(:download)
+      photo.write
+    end
+
+    context "with an existing file" do
+      let(:photo) { APDM::Saxo::IPTC.new('name', 'path') }
+
+      before(:each) do
+        photo.stub(:download)
+        photo.stub(:delete_metadata)
+        photo.stub(:write_metadata)
+      end
+
+      it "doesn't download if there is no specified source" do
+        photo.should_not_receive(:download)
+        photo.write
+      end
+
+      it "deletes existing metadata" do
+        photo.should_receive(:delete_metadata)
+        photo.write
+      end
+
+      it "writes the metadata" do
+        data = stub(:metadata)
+        photo.should_receive(:write_metadata).with(data)
+        photo.write(data)
+      end
+    end
+  end
+end