newspaper_works 0.1.0

data/spec/lib/newspaper_works/ingest/newspaper_page_ingest_spec.rb

@@ -0,0 +1,77 @@
+require 'spec_helper'
+require 'misc_shared'
+require 'faraday'
+
+# test NewspaperPageIngest against work
+RSpec.describe NewspaperWorks::Ingest::NewspaperPageIngest do
+  include_context "shared setup"
+
+  # define the path to the file we will use for multiple examples
+  let(:path) do
+    File.join(fixture_path, 'page1.tiff')
+  end
+
+  it_behaves_like('ingest adapter IO')
+
+  describe "file import and attachment" do
+    do_now_jobs = [
+      IngestJob,
+      IngestLocalFileJob,
+      InheritPermissionsJob,
+      VisibilityCopyJob
+    ]
+
+    permission_methods = [
+      :edit_users,
+      :read_users,
+      :discover_users,
+      :edit_groups,
+      :read_groups,
+      :discover_groups
+    ]
+
+    def verify_pcdm_fileset(fileset)
+      # Hyrax always sets label (if not title) on fileset:
+      expect(fileset.label).to eq 'page1.tiff'
+      # reload file set and check on original file
+      fileset.reload
+      file = fileset.original_file
+      expect(file).to be_a Hydra::PCDM::File
+    end
+
+    def verify_attached_file(work, path)
+      work.reload
+      files = NewspaperWorks::Data::WorkFiles.of(work)
+      expect(files.keys.size).to eq 1
+      expect(File.exist?(files.values[0].path)).to be true
+      expect(files.values[0].size).to eq File.size(path)
+    end
+
+    it "ingests file data and saves", perform_enqueued: do_now_jobs do
+      adapter = build(:newspaper_page_ingest)
+      adapter.ingest(path)
+      file_sets = adapter.work.members.select { |w| w.class == FileSet }
+      expect(file_sets.size).to eq 1
+      verify_pcdm_fileset(file_sets[0])
+      verify_attached_file(adapter.work, path)
+    end
+
+    # For (minimal) page objects constructed in tests, PDF ingest,
+    #   permission setting on fileset happens as result of attachment
+    #   process (`NewspaperWorks::Data::WorkFiles`), via the
+    #   `NewspaperWorks::Data::handle_after_create_fileset` method,
+    #   since the CreateWithRemoteFilesActor in Hyrax unfortunately
+    #   does not invoke InheritPermissionJob.
+    it "copies work permissions to fileset", perform_enqueued: do_now_jobs do
+      adapter = build(:newspaper_page_ingest)
+      adapter.ingest(path)
+      adapter.work.reload
+      file_sets = adapter.work.members.select { |w| w.class == FileSet }
+      fileset = file_sets[0]
+      permission_methods.each do |m|
+        expect(fileset.send(m)).to match_array adapter.work.send(m)
+      end
+      expect(fileset.visibility).to eq adapter.work.visibility
+    end
+  end
+end

data/spec/lib/newspaper_works/ingest/page_image_spec.rb

@@ -0,0 +1,29 @@
+require 'spec_helper'
+
+RSpec.describe NewspaperWorks::Ingest::PageImage do
+  include_context 'ingest test fixtures'
+
+  let(:lccn) { 'sn93059126' }
+
+  let(:issue_path) { File.join(tiff_fixtures, lccn, '1853060401') }
+
+  let(:publication) { NewspaperWorks::Ingest::PublicationInfo.new(lccn) }
+
+  let(:issue) do
+    NewspaperWorks::Ingest::IssueImages.new(issue_path, publication)
+  end
+
+  describe "page construction and metadata" do
+    it "validates path to page image file" do
+      garbage_path = '/path/to/nonexistent'
+      expect { described_class.new(garbage_path, issue, 1) }.to raise_error ArgumentError
+    end
+
+    it "extracts page number, title from image filename" do
+      path = issue.keys[0]
+      page = described_class.new(path, issue, 1)
+      expect(page.page_number).to eq "1"
+      expect(page.title).to contain_exactly "The weekly journal: June 4, 1853: Page #{page.page_number}"
+    end
+  end
+end

data/spec/lib/newspaper_works/ingest/pdf_images_spec.rb

@@ -0,0 +1,32 @@
+require 'spec_helper'
+
+RSpec.describe NewspaperWorks::Ingest::PdfImages do
+  let(:path) do
+    base = Pathname.new(NewspaperWorks::GEM_PATH).join('spec/fixtures/files')
+    base.join('sample-4page-issue.pdf').to_s
+  end
+  let(:pdfimages) { described_class.new(path) }
+
+  describe "get image sizing from PDF" do
+    it "gets width" do
+      expect(pdfimages.width).to be 7200
+    end
+
+    it "gets height" do
+      expect(pdfimages.height).to be 9600
+    end
+
+    it "gets ppi" do
+      expect(pdfimages.ppi).to be 400
+    end
+  end
+
+  describe "get image info from PDF" do
+    it "gets color info" do
+      color, channels, bits = pdfimages.color
+      expect(color).to eq 'gray'
+      expect(channels).to be 1
+      expect(bits).to be 1
+    end
+  end
+end

data/spec/lib/newspaper_works/ingest/pdf_issue_spec.rb

@@ -0,0 +1,29 @@
+require 'spec_helper'
+
+RSpec.describe NewspaperWorks::Ingest::PDFIssue do
+  include_context 'ingest test fixtures'
+
+  let(:lccn) { 'sn93059126' }
+
+  let(:pdf_path) { File.join(pdf_fixtures, lccn, '1853060401.pdf') }
+
+  let(:publication) { NewspaperWorks::Ingest::PublicationInfo.new(lccn) }
+
+  describe "issue construction and metadata" do
+    it "constructs with path and publication" do
+      issue = described_class.new(pdf_path, publication)
+      expect(issue.path).to eq pdf_path
+      expect(issue.filename).to eq File.basename(pdf_path)
+      expect(issue.publication).to be publication
+      expect(issue.lccn).to eq lccn
+      expect(issue.publication.lccn).to eq lccn
+    end
+
+    it "extracts date, edition, title from filename" do
+      issue = described_class.new(pdf_path, publication)
+      expect(issue.publication_date).to eq '1853-06-04'
+      expect(issue.edition_number).to eq 1
+      expect(issue.title).to contain_exactly 'The weekly journal: June 4, 1853'
+    end
+  end
+end

data/spec/lib/newspaper_works/ingest/pdf_issues_spec.rb

@@ -0,0 +1,62 @@
+require 'spec_helper'
+
+RSpec.describe NewspaperWorks::Ingest::PDFIssues do
+  include_context 'ingest test fixtures'
+
+  let(:lccn) { 'sn93059126' }
+
+  let(:publication) { NewspaperWorks::Ingest::PublicationInfo.new(lccn) }
+
+  let(:pub_path) { File.join(pdf_fixtures, lccn) }
+
+  describe " construction and metadata" do
+    it "constructs with path and publication" do
+      issues = described_class.new(pub_path, publication)
+      expect(issues.path).to eq pub_path
+      expect(issues.publication).to be publication
+      expect(issues.lccn).to eq lccn
+      expect(issues.publication.lccn).to eq lccn
+    end
+
+    it "enumerates valid pdfs as PDFIssue objects" do
+      issues = described_class.new(pub_path, publication)
+      expect(issues.size).to eq 5
+      enumerated = issues.values
+      expect(enumerated.size).to eq issues.size
+      sample = enumerated[0]
+      expect(sample).to be_a NewspaperWorks::Ingest::PDFIssue
+      expect(File.dirname(sample.path)).to eq pub_path
+    end
+
+    it "presents hash-like mapping behavior" do
+      issues = described_class.new(pub_path, publication)
+      expected_paths = Dir.entries(pub_path).map { |p| File.join(pub_path, p) }
+      expected_paths = expected_paths.select { |p| p.end_with?('.pdf') }
+      # Keys are paths to file:
+      expect(issues.keys).to match_array expected_paths
+      # info and [] methods get PDFIssue for given path key:
+      issue1 = issues[issues.keys[0]]
+      issue2 = issues.info(issues.keys[1])
+      expect(issue1).to be_a NewspaperWorks::Ingest::PDFIssue
+      expect(issue2).to be_a NewspaperWorks::Ingest::PDFIssue
+      expect(issue1.path).to eq issues.keys[0]
+    end
+
+    it "enumerates pairs like a hash" do
+      issues = described_class.new(pub_path, publication)
+      expected_paths = Dir.entries(pub_path).map { |p| File.join(pub_path, p) }
+      issues.each_value do |v|
+        expect(v).to be_a NewspaperWorks::Ingest::PDFIssue
+      end
+      issues.each_key do |k|
+        expect(expected_paths).to include k
+      end
+      issues.each do |path, info|
+        expect(expected_paths).to include path
+        expect(info).to be_a NewspaperWorks::Ingest::PDFIssue
+        expect(info.path).to eq path
+      end
+      expect(issues.to_a.size).to eq 5
+    end
+  end
+end

data/spec/lib/newspaper_works/ingest/pdf_pages_spec.rb

@@ -0,0 +1,110 @@
+require 'spec_helper'
+require 'mini_magick'
+
+RSpec.describe NewspaperWorks::Ingest::PdfPages do
+  let(:sample1) do
+    base = Pathname.new(NewspaperWorks::GEM_PATH).join('spec/fixtures/files')
+    base.join('sample-4page-issue.pdf').to_s
+  end
+  let(:sample2) do
+    base = Pathname.new(NewspaperWorks::GEM_PATH).join('spec/fixtures/files')
+    base.join('sample-color-newsletter.pdf').to_s
+  end
+  let(:sample3) do
+    base = Pathname.new(NewspaperWorks::GEM_PATH).join('spec/fixtures/files')
+    base.join('ndnp-sample1.pdf').to_s
+  end
+  let(:onebitpages) { described_class.new(sample1) }
+  let(:colorpages) { described_class.new(sample2) }
+  let(:graypages) { described_class.new(sample3) }
+
+  describe "implementation details" do
+    it "pdfinfo gets PdfImages, memoized" do
+      pdfimages = onebitpages.pdfinfo
+      expect(pdfimages).to be_a(NewspaperWorks::Ingest::PdfImages)
+      pdfimages2 = onebitpages.pdfinfo
+      # same object, method only fetches once:
+      expect(pdfimages2).to equal pdfimages
+    end
+
+    it "gets correct Ghostscript TIFF output" do
+      expect(onebitpages.gsdevice).to eq 'tiffg4'
+      expect(colorpages.gsdevice).to eq 'tiff24nc'
+    end
+
+    it "gets text elements saved in PDF" do
+      # should be little to nothing in scanned work, besides
+      # output of Ghostscript banner:
+      expect(onebitpages.gstext.length).to eq 0
+      # the color sample is born-digital and thus has text in PDF;
+      #   this checks for > 160 (non-trivial) text, though this text
+      #   stream is at least 6k, if you strip out excess whitespace.
+      expect(colorpages.gstext.length).to be > 160
+    end
+
+    it "gets reasonable ppi" do
+      # 400 ppi native:
+      expect(onebitpages.ppi).to eq 400
+      # sourced from scan:
+      expect(onebitpages.ppi).to eq onebitpages.pdfinfo.ppi
+      # digital native content gets forced to 400 ppi...
+      expect(colorpages.ppi).to eq 400
+      # ...because the images in this sample are not reasonably
+      #    representative, due to low PPI (not scans of whole pages):
+      expect(colorpages.ppi).to be > colorpages.pdfinfo.ppi
+    end
+  end
+
+  describe "splits PDF into pages with TIFF tmpfiles" do
+    it "page filenames of TIFF files are ordered" do
+      pages = colorpages.entries
+      pages.each_with_index do |path, idx|
+        n = idx + 1
+        expect(path).to match(/page#{n}.tiff/)
+      end
+    end
+
+    it "color sample splits into color TIFF per page" do
+      pages = colorpages.entries
+      pages.each do |path|
+        image = MiniMagick::Image.open(path)
+        expect(image.mime_type).to eq 'image/tiff'
+        expect(image.colorspace).to start_with 'DirectClass sRGB'
+      end
+    end
+
+    it "one bit sample splits into Group 4 TIFF per page" do
+      pages = onebitpages.entries
+      pages.each do |path|
+        Open3.popen3("identify #{path}") do |_stdin, stdout, _stderr, _wait_thr|
+          output = stdout.read
+          expect(output).to include '1-bit'
+          expect(output).to include 'Bilevel'
+          expect(output).to include 'TIFF'
+        end
+      end
+    end
+
+    it "one bit sample is 7200x9600 scan, verify" do
+      pages = onebitpages.entries
+      pages.each do |path|
+        image = MiniMagick::Image.open(path)
+        expect(image.width).to eq 7200
+        expect(image.height).to eq 9600
+      end
+    end
+
+    it "processes Grayscale NDNP PDF correctly" do
+      pages = graypages.entries
+      expect(pages.length).to eq 1
+      pages.each do |path|
+        Open3.popen3("identify #{path}") do |_stdin, stdout, _stderr, _wait_thr|
+          output = stdout.read
+          expect(output).to include 'Grayscale'
+          expect(output).to include '8-bit'
+          expect(output).to include 'TIFF'
+        end
+      end
+    end
+  end
+end

data/spec/lib/newspaper_works/ingest/pub_finder_spec.rb

@@ -0,0 +1,58 @@
+require 'spec_helper'
+
+RSpec.describe NewspaperWorks::Ingest::PubFinder do
+  describe "mixin publication find-or-create module" do
+    let(:klass) do
+      Class.new do
+        include NewspaperWorks::Ingest::PubFinder
+      end
+    end
+
+    before do
+      ['sn2099999999', 'sn2036999999', 'sn82014496'].each do |lccn|
+        NewspaperTitle.where(lccn: lccn).delete_all
+      end
+    end
+
+    # use factory for saved NewspaperIssue:
+    let(:issue) { create(:newspaper_issue) }
+
+    let(:ingester) { klass.new }
+
+    let(:publication) { create(:newspaper_title) }
+
+    it "finds existing publication, if it exists" do
+      lccn = publication.lccn
+      expect(ingester.find_publication(lccn)).to be_a NewspaperTitle
+    end
+
+    it "links existing publication on find-or-create" do
+      lccn = publication.lccn
+      ingester.find_or_create_publication_for_issue(issue, lccn, nil, {})
+      publication.reload
+      expect(publication.members.to_a).to include issue
+    end
+
+    it "links issue to new publication" do
+      lccn = 'sn2099999999'
+      expect(ingester.find_publication(lccn)).to be_nil
+      ingester.find_or_create_publication_for_issue(issue, lccn, nil, {})
+      publication = ingester.find_publication(lccn)
+      expect(publication).to be_a NewspaperTitle
+      expect(publication.members.to_a).to include issue
+    end
+
+    it "copies metadata for created publication" do
+      lccn = 'sn82014496'
+      expect(ingester.find_publication(lccn)).to be_nil
+      publication = ingester.create_publication(lccn, nil, {})
+      expect(publication.title).to contain_exactly "Rocky Mountain news"
+      expect(publication.place_of_publication.map { |v| v.to_uri.to_s }).to \
+        contain_exactly(
+          "http://sws.geonames.org/5419384/"
+        )
+      expect(publication.language).to contain_exactly 'eng'
+      expect(publication.oclcnum).to eq 'ocm03946163'
+    end
+  end
+end

data/spec/lib/newspaper_works/ingest/publication_info_spec.rb

@@ -0,0 +1,61 @@
+require 'spec_helper'
+
+RSpec.describe NewspaperWorks::Ingest::PublicationInfo do
+  # prefers lccn.loc.gov:
+  let(:lccn1) { 'sn83021453' }
+  let(:lccn2) { 'sn83045396' }
+  # prefers ChronAm:
+  let(:lccn3) { 'sn94051019' }
+  let(:bad_lccn) { 'sn99999999' }
+
+  describe "gets metadata" do
+    it "gets simple metadata" do
+      meta = described_class.new(lccn1)
+      expect(meta.title).to eq 'Salt Lake daily tribune'
+      expect(meta.issn).to be_nil
+      expect(meta.oclcnum).to eq 'ocm10170377'
+      expect(meta.place_name).to eq 'Salt Lake City, Utah'
+      expect(meta.place_of_publication).to eq 'http://sws.geonames.org/5780993/'
+    end
+
+    it "gets related item metadata" do
+      meta1 = described_class.new(lccn1)
+      meta2 = described_class.new(lccn2)
+      # lccn2 succeeds lccn1, favors lccn.loc.gov URL as authoritative:
+      expect(meta1.succeeded_by).to eq "https://lccn.loc.gov/#{lccn2}"
+      # lccn1 precedes lccn2, favors lccn.loc.gov URL as authoritative:
+      expect(meta2.preceded_by).to eq "https://lccn.loc.gov/sn83021453"
+    end
+  end
+
+  describe "backing authority choice" do
+    it "picks default authority of lccn.loc.gov" do
+      meta = described_class.new(lccn1)
+      expect(meta.implementation).to be_a NewspaperWorks::Ingest::LCPublicationInfo
+    end
+
+    it "picks chronam implementation when lccn.loc.gov empty for LCCN" do
+      meta = described_class.new(lccn3)
+      expect(meta.implementation).to be_a NewspaperWorks::Ingest::ChronAmPublicationInfo
+    end
+
+    it "responds to known metadata" do
+      meta = described_class.new(lccn3)
+      expect(meta).to respond_to(:lccn)
+      expect(meta).to respond_to(:issn)
+      expect(meta).to respond_to(:title)
+      expect(meta).to respond_to(:oclcnum)
+      expect(meta).to respond_to(:place_name)
+      expect(meta).to respond_to(:place_of_publication)
+      expect(meta).to respond_to(:preceded_by)
+      expect(meta).to respond_to(:succeeded_by)
+    end
+  end
+
+  describe "error handling" do
+    it "handles unknown LCCN (empty mods)" do
+      meta = described_class.new(bad_lccn)
+      expect(meta.empty?).to be true
+    end
+  end
+end

data/spec/lib/newspaper_works/ingest_spec.rb

@@ -0,0 +1,45 @@
+require 'spec_helper'
+
+describe NewspaperWorks::Ingest do
+  describe "Ingest module methods" do
+    it "gets default admin set" do
+      admin_set = described_class.find_admin_set
+      expect(admin_set).to be_an AdminSet
+      expect(admin_set.id).to eq AdminSet::DEFAULT_ID
+    end
+
+    # initial expectations of a just-created work without administrative
+    #   metadata set yet; AKA the "before" picture
+    def expect_initial_work_state(work)
+      expect(work.admin_set).to be_nil
+      expect(work.depositor).to be_nil
+      expect(work.visibility).to eq 'restricted'
+      expect(work.date_modified).to be_nil
+      expect(work.date_uploaded).to be_nil
+      expect(work.resource_type).to be_empty
+      expect(work.state).to be_nil
+    end
+
+    it "sets default assigned metadata for a work" do
+      work = NewspaperTitle.create!(title: ["hello"])
+      expect_initial_work_state(work)
+      described_class.assign_administrative_metadata(work)
+      expect(work.admin_set).to eq AdminSet.find(AdminSet::DEFAULT_ID)
+      expect(work.depositor).to eq User.batch_user.user_key
+      expect(work.visibility).to eq 'open'
+      expect(work.state).to be_an ActiveTriples::Resource
+      expect(work.state.to_uri.to_s).to eq \
+        'http://fedora.info/definitions/1/0/access/ObjState#active'
+      expect(work.date_uploaded).to be_a DateTime
+      expect(work.date_modified).to eq work.date_uploaded
+      expect(work.resource_type).to match_array ['Newspapers']
+    end
+
+    it "has method to get publication metadata for lccn" do
+      lccn = 'sn84038814'
+      metadata = described_class.publication_metadata(lccn)
+      expect(metadata).to be_a NewspaperWorks::Ingest::PublicationInfo
+      expect(metadata.lccn).to eq lccn
+    end
+  end
+end

data/spec/lib/newspaper_works/issue_pdf_composer_spec.rb

@@ -0,0 +1,101 @@
+require 'spec_helper'
+
+RSpec.describe NewspaperWorks::IssuePDFComposer do
+  let(:bare_issue) do
+    build(:newspaper_issue)
+  end
+
+  let(:fixtures_path) do
+    fixtures = File.join(NewspaperWorks::GEM_PATH, 'spec/fixtures/files')
+    Hyrax.config.whitelisted_ingest_dirs.push(fixtures)
+    fixtures
+  end
+
+  let(:pdf_path) do
+    File.join(fixtures_path, 'minimal-1-page.pdf')
+  end
+
+  let(:broken_pdf) do
+    File.join(fixtures_path, 'broken-truncated.pdf')
+  end
+
+  def page_with_pdf(name, path)
+    # empty+saved fileset: only need id, no primary file, to attach derivatives
+    fs = FileSet.create!
+    page = NewspaperPage.create!(title: [name])
+    page.members << fs
+    page.save!
+    derivatives = NewspaperWorks::Data::WorkDerivatives.of(page)
+    derivatives.assign(path)
+    derivatives.commit!
+    page
+  end
+
+  let(:page1_with_pdf) { page_with_pdf('Page 1', pdf_path) }
+  let(:page2_with_pdf) { page_with_pdf('Page 2', pdf_path) }
+
+  let(:broken_page) { page_with_pdf('Broken Page', broken_pdf) }
+
+  let(:two_page_issue) do
+    issue = NewspaperIssue.create(title: ['Issue Test'])
+    issue.ordered_members << page1_with_pdf
+    issue.ordered_members << page2_with_pdf
+    issue.save!
+    issue
+  end
+
+  let(:unfinished_issue) do
+    issue = NewspaperIssue.create(title: ['Unfinished issue'])
+    issue.members << FileSet.create!
+    issue.save!
+    issue.ordered_members << broken_page
+    issue.save!
+    issue
+  end
+
+  describe "adapter construction" do
+    it "constructs adapter" do
+      composer = described_class.new(bare_issue)
+      expect(composer.issue).to be bare_issue
+      expect(composer.page_pdfs).to match_array []
+    end
+  end
+
+  describe "Validation and handling of not-yet-ready pages" do
+    it "validates PDFs" do
+      # we can fake issue context with nil on construction to call validate_pdf
+      composer = described_class.new(nil)
+      expect(composer.validate_pdf(broken_pdf)).to be false
+      expect(composer.validate_pdf(pdf_path)).to be true
+    end
+
+    it "raises NewspaperWorks::PagesNotReady on incomplete PDF" do
+      composer = described_class.new(unfinished_issue)
+      expect { composer.compose }.to raise_error(NewspaperWorks::PagesNotReady)
+    end
+  end
+
+  describe "Construction, attachment of combined PDF" do
+    do_now_jobs = [IngestLocalFileJob, IngestJob, InheritPermissionsJob]
+
+    def files_of(work)
+      NewspaperWorks::Data::WorkFiles.of(work)
+    end
+
+    it "creates issue PDF from sources", perform_enqueued: do_now_jobs do
+      composer = described_class.new(two_page_issue)
+      # no (primary) files attached to issue yet:
+      expect(files_of(two_page_issue).keys.size).to eq 0
+      # Make the mulit-page-pdf with IssuePDFComposer#compose:
+      composer.compose
+      # reload issue files, as they have been updated; check for PDF:
+      two_page_issue.reload
+      files = files_of(two_page_issue)
+      expect(files.keys.size).to eq 1
+      # getting path initiates a repository checkout of file:
+      path = files.values[0].path
+      # we found a PDF, simple check only extension (not validating):
+      expect(path.end_with?('pdf')).to be true
+    end
+  end
+end

data/spec/lib/newspaper_works/logging_spec.rb

@@ -0,0 +1,53 @@
+require 'spec_helper'
+
+describe NewspaperWorks::Logging do
+  describe "mixin logging module" do
+    let(:klass) do
+      Class.new do
+        include NewspaperWorks::Logging
+      end
+    end
+
+    let(:loggable) { klass.new }
+
+    let(:configured) do
+      obj = loggable
+      # expectation is that this is called by consuming class constructor:
+      obj.configure_logger('ingest-test')
+      obj
+    end
+
+    it "requires configuration by consuming class" do
+      name = 'random_testing_logname'
+      expect(loggable.instance_variable_get(:@logger)).to be_nil
+      expect(described_class.configured).not_to include name
+      loggable.configure_logger(name)
+      expect(loggable.instance_variable_get(:@logger)).not_to be_nil
+      expect(described_class.configured).to include name
+    end
+
+    it "logs formatted message to rails logger with write_log" do
+      message = "FYI: heads-up, this is a message"
+      expect(Rails.logger).to receive(:add).with(
+        Logger::INFO,
+        configured.message_format(message),
+        nil
+      )
+      configured.write_log(message)
+    end
+
+    it "writes to named log file" do
+      # need to reset global de-dupe state for additional logger, just for
+      #   purposes of this test
+      described_class.configured = []
+      message = "Instant coffee"
+      named_log = configured.instance_variable_get(:@named_log)
+      expect(named_log).to receive(:add).with(
+        Logger::INFO,
+        configured.message_format(message),
+        nil
+      )
+      configured.write_log(message)
+    end
+  end
+end