minamisanriku-count.rb

minamisanriku-count.rb

#!/usr/bin/env ruby
# -*- coding: utf-8 -*-
# $Id$

require "kconv"
require "date"
# require "jcode"

class UnknownCode < Exception
end

def callnum_to_category( call_number, ndc )
   code = nil
   ndc = ndc.toutf8 if ndc
   case call_number
   when /^([\d])/
      code = $1.dup
   when /^(k[\d])/i
      code = $1.downcase
   when /^kノリ/i
      code = "k5" # 546.5(電車), 537(自動車)など
   when /^([ア-ン])/
      code = "絵本"
   when /^d/i
      code = "DVD"
   when /^c/i
      code = "CD"
   when /^O(\d)/i
      code = $1.dup
   else
      if not ndc.nil? and not ndc.empty? and ndc =~ /^([\d])/
         code = $1.dup
      else
         raise UnknownCode
      end
   end
   code
end

def output( data )
   data.keys.sort.each do |k|
      data[k].keys.sort.each do |s|
         puts [ k, s.to_s, data[k][s].size ].join( "\t" )
      end
   end
end

if $0 == __FILE__
   Encoding.default_external = "utf-8"
   format = :cli
   option = :items
   filter = {}
   while ARGV[0] =~ /\A-/
      if ARGV[0] =~ /\A-m/
         option = :manifestations
         ARGV.shift
      elsif ARGV[0] =~ /\A-export/
         format = :export
         ARGV.shift
      elsif ARGV[0] =~ /\A-checkout/
         format = :checkout
         ARGV.shift
      elsif ARGV[0] =~ /\A-from/
         ARGV.shift
         filter[:from] = Date.parse(ARGV.shift)
      elsif ARGV[0] =~ /\A-until/
         ARGV.shift
         filter[:until] = ( Date.parse(ARGV.shift) + 1 )
      else
        break
      end
   end
   items = {}
   manifestations = {}
   ARGF.each do |line|
      item_id, manifestation_id, call_number, item_identifier, ndc, shelf, = line.chomp.split( /\t/ ) if format == :cli
      manifestation_id, original_title, creator, publisher, pub_date, price, isbn, issn, item_identifier, call_number, item_price, acquired_at, bookstore, budget_type, circulation_status, shelf, library, = line.chomp.split( /\t/ ) if format == :export
      created_at, item_identifier, call_number, shelf, carrier_type, original_title, = line.chomp.split( /\t/ ) if format == :checkout
      if created_at
         created_at = Date.parse(created_at)
         next if filter[:from] and filter[:from] > created_at
         next if filter[:until] and filter[:until] <= created_at
      end
      item_id = item_identifier unless item_id
      call_number = NKF.nkf( "-WwZ1", call_number.to_s )
      begin
         code = callnum_to_category( call_number, ndc )
      rescue UnknownCode
         STDERR.puts line
         next
      end
      manifestations[ code ] ||= {}
      manifestations[ code ][ shelf.to_s ] ||= []
      manifestations[ code ][ shelf.to_s ] << manifestation_id
      items[ code ] ||= {}
      items[ code ][ shelf.to_s ] ||= []
      items[ code ][ shelf.to_s ] << item_id
   end

   case option
   when :manifestations
      STDERR.puts "Manifestations:"
      output( manifestations )
   #when :items
   else
      STDERR.puts "Items:"
      output( items )
   end
end