median 0.0.1

data/.gitignore

@@ -0,0 +1,7 @@
+.bundle/
+log/*.log
+pkg/
+test/dummy/db/*.sqlite3
+test/dummy/log/*.log
+test/dummy/tmp/
+test/dummy/.sass-cache

data/Gemfile

@@ -0,0 +1,19 @@
+source "http://rubygems.org"
+
+# Declare your gem's dependencies in median.gemspec.
+# Bundler will treat runtime dependencies like base dependencies, and
+# development dependencies will be added by default to the :development group.
+gemspec
+
+# jquery-rails is used by the dummy application
+gem "rails", '~> 3.2.3'
+gem "jquery-rails"
+gem "sqlite3"
+
+# Declare any dependencies that are still in development here instead of in
+# your gemspec. These might include edge Rails or gems from your path or
+# Git. Remember to move these dependencies to your gemspec before releasing
+# your gem to rubygems.org.
+
+# To use debugger
+# gem 'ruby-debug19', :require => 'ruby-debug'

data/Gemfile.lock

@@ -0,0 +1,118 @@
+PATH
+  remote: .
+  specs:
+    median (0.0.1)
+      activesupport (~> 3.2.3)
+      nokogiri (~> 1.5.2)
+      savon (~> 0.9.9)
+
+GEM
+  remote: http://rubygems.org/
+  specs:
+    actionmailer (3.2.3)
+      actionpack (= 3.2.3)
+      mail (~> 2.4.4)
+    actionpack (3.2.3)
+      activemodel (= 3.2.3)
+      activesupport (= 3.2.3)
+      builder (~> 3.0.0)
+      erubis (~> 2.7.0)
+      journey (~> 1.0.1)
+      rack (~> 1.4.0)
+      rack-cache (~> 1.2)
+      rack-test (~> 0.6.1)
+      sprockets (~> 2.1.2)
+    activemodel (3.2.3)
+      activesupport (= 3.2.3)
+      builder (~> 3.0.0)
+    activerecord (3.2.3)
+      activemodel (= 3.2.3)
+      activesupport (= 3.2.3)
+      arel (~> 3.0.2)
+      tzinfo (~> 0.3.29)
+    activeresource (3.2.3)
+      activemodel (= 3.2.3)
+      activesupport (= 3.2.3)
+    activesupport (3.2.3)
+      i18n (~> 0.6)
+      multi_json (~> 1.0)
+    akami (1.0.0)
+      gyoku (>= 0.4.0)
+    arel (3.0.2)
+    builder (3.0.0)
+    erubis (2.7.0)
+    gyoku (0.4.4)
+      builder (>= 2.1.2)
+    hike (1.2.1)
+    httpi (0.9.6)
+      rack
+    i18n (0.6.0)
+    journey (1.0.3)
+    jquery-rails (2.0.2)
+      railties (>= 3.2.0, < 5.0)
+      thor (~> 0.14)
+    json (1.7.3)
+    mail (2.4.4)
+      i18n (>= 0.4.0)
+      mime-types (~> 1.16)
+      treetop (~> 1.4.8)
+    mime-types (1.18)
+    multi_json (1.3.5)
+    nokogiri (1.5.2)
+    nori (1.1.0)
+    polyglot (0.3.3)
+    rack (1.4.1)
+    rack-cache (1.2)
+      rack (>= 0.4)
+    rack-ssl (1.3.2)
+      rack
+    rack-test (0.6.1)
+      rack (>= 1.0)
+    rails (3.2.3)
+      actionmailer (= 3.2.3)
+      actionpack (= 3.2.3)
+      activerecord (= 3.2.3)
+      activeresource (= 3.2.3)
+      activesupport (= 3.2.3)
+      bundler (~> 1.0)
+      railties (= 3.2.3)
+    railties (3.2.3)
+      actionpack (= 3.2.3)
+      activesupport (= 3.2.3)
+      rack-ssl (~> 1.3.2)
+      rake (>= 0.8.7)
+      rdoc (~> 3.4)
+      thor (~> 0.14.6)
+    rake (0.9.2.2)
+    rdoc (3.12)
+      json (~> 1.4)
+    savon (0.9.9)
+      akami (~> 1.0)
+      builder (>= 2.1.2)
+      gyoku (>= 0.4.0)
+      httpi (~> 0.9)
+      nokogiri (>= 1.4.0)
+      nori (~> 1.1)
+      wasabi (~> 2.1)
+    sprockets (2.1.3)
+      hike (~> 1.2)
+      rack (~> 1.0)
+      tilt (~> 1.1, != 1.3.0)
+    sqlite3 (1.3.6)
+    thor (0.14.6)
+    tilt (1.3.3)
+    treetop (1.4.10)
+      polyglot
+      polyglot (>= 0.3.1)
+    tzinfo (0.3.33)
+    wasabi (2.1.0)
+      nokogiri (>= 1.4.0)
+
+PLATFORMS
+  ruby
+
+DEPENDENCIES
+  jquery-rails
+  median!
+  rails (~> 3.2.3)
+  sqlite3

data/MIT-LICENSE

@@ -0,0 +1,20 @@
+Copyright 2012 YOURNAME
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.rdoc

@@ -0,0 +1,5 @@
+= Median
+
+Move along. Nothing to see here yet. Under heavy development.
+
+This project rocks and uses MIT-LICENSE.

data/Rakefile

@@ -0,0 +1,38 @@
+#!/usr/bin/env rake
+begin
+  require 'bundler/setup'
+rescue LoadError
+  puts 'You must `gem install bundler` and `bundle install` to run rake tasks'
+end
+begin
+  require 'rdoc/task'
+rescue LoadError
+  require 'rdoc/rdoc'
+  require 'rake/rdoctask'
+  RDoc::Task = Rake::RDocTask
+end
+
+RDoc::Task.new(:rdoc) do |rdoc|
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title    = 'Median'
+  rdoc.options << '--line-numbers'
+  rdoc.rdoc_files.include('README.rdoc')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end
+
+
+
+
+Bundler::GemHelper.install_tasks
+
+require 'rake/testtask'
+
+Rake::TestTask.new(:test) do |t|
+  t.libs << 'lib'
+  t.libs << 'test'
+  t.pattern = 'test/**/*_test.rb'
+  t.verbose = false
+end
+
+
+task :default => :test

data/lib/median.rb

@@ -0,0 +1,33 @@
+require 'active_support/all'
+require 'nokogiri'
+require 'ostruct'
+require 'open-uri'
+require 'net/http'
+require 'net/https'
+
+require 'savon'
+
+require 'median/xml_support'
+require 'median/aleph'
+require 'median/primo'
+
+module Median
+
+  def self.config
+    @@config ||= OpenStruct.new
+  end
+
+  def self.config=(hash)
+    @@config = OpenStruct.new(hash)
+  end
+
+  class ConnectionError < RuntimeError; end
+
+  # TODO: Move default config to a config file
+  self.config.primo_base_url              = 'http://vs39.kobv.de:1701'
+  self.config.aleph_rest_service_base_url = 'http://ubtesa.uni-paderborn.de:1891/rest-dlf'
+  self.config.aleph_x_service_base_url    = 'https://ubtesa.uni-paderborn.de/X'
+  self.config.aleph_user_library          = 'PAD50'
+  self.config.aleph_bib_library           = 'PAD01'
+
+end

data/lib/median/aleph.rb

@@ -0,0 +1,18 @@
+require 'median/aleph/utils'
+require 'median/aleph/authentication'
+require 'median/aleph/search'
+require 'median/aleph/patron'
+require 'median/aleph/loan'
+require 'median/aleph/hold'
+require 'median/aleph/cash'
+require 'median/aleph/item'
+
+module Median::Aleph
+  extend Utils
+  extend Search
+  extend Authentication
+  extend Patron
+  extend Loan
+  extend Hold
+  extend Cash
+end

data/lib/median/aleph/authentication.rb

@@ -0,0 +1,64 @@
+module Median::Aleph
+  module Authentication
+
+    def authenticate(username, password)
+      return false if username.blank? or password.blank?
+
+      username.gsub!(/\s/, '')
+      username.upcase!
+
+      auth_info = post_url(Median.config.aleph_x_service_base_url,
+        op: 'bor-auth',
+        bor_id: username,
+        verification: password,
+        library: Median.config.aleph_user_library
+      )
+      puts auth_info
+
+      user_info = get_url(
+        Median.config.aleph_x_service_base_url,
+          op: 'bor-info',
+          bor_id: username,
+          verification: password,
+          loans: 'N',
+          cash: 'B',
+          hold: 'N',
+          library: Median.config.aleph_user_library
+      )
+
+      unless auth_info.at_xpath('/bor-auth/error') or user_info.at_xpath('/bor-info/error')
+        options = {}
+        # user id in the ILS Alpeh
+        options[:ilsid] = auth_info.at_xpath('//z303-id').try(:content)
+        # name of the user
+        name = auth_info.at_xpath('//z303-name').try(:content)
+        options[:lastname], options[:firstname] = name.split(',').map(&:strip) if name.present?
+        # email
+        options[:email] = auth_info.at_xpath('//z304-email-address').try(:content)
+        # map bor-status to roles
+        options[:role]  = 'g' # guest by default
+        status = auth_info.at_xpath('//z305-bor-status').try(:content)
+        case status
+        when /PS/ then options[:role] = 's'
+        when /PA/ then options[:role] = 'a'
+        when /PE/ then options[:role] = 'e'
+        when /PZ/ then options[:role] = 'z'
+        end
+        # exiry date
+        expiry_date = auth_info.at_xpath('//z305-expiry-date').try(:content)
+        options[:expiry_date] = Date.strptime(expiry_date, '%d/%m/%Y') if expiry_date.present?
+        # cash balance
+        balance = user_info.at_xpath('//balance').try(:content).to_f
+        balance = balance * -1 if balance != 0 and user_info.at_xpath('//sign').try(:content).try(:strip).try(:downcase) == 'd'
+        options[:cash_balance] = balance
+
+        # TODO: What about banned users?
+
+        return options
+      end
+
+      false
+    end
+
+  end
+end

data/lib/median/aleph/cash.rb

@@ -0,0 +1,35 @@
+module Median::Aleph
+  module Cash
+
+    def get_cash(patron_id)
+      xml = get_url("#{Median.config.aleph_rest_service_base_url}/patron/#{patron_id}/circulationActions/cash",
+        view: 'brief'
+      )
+
+      cash = OpenStruct.new
+      cash.balance = 0.0
+      cash.charges = []
+
+      # balance
+      cash.balance = xml.at_xpath('//open-sum').try(:content).gsub!(/\s/, '').to_f
+      # charges
+      xml.xpath('//cash').each do |charge_xml|
+        charge             = OpenStruct.new
+        sum                = charge_xml.at_xpath('z31-sum').try(:content).try(:gsub, '(', '').try(:gsub, ')', '').to_f
+        sum                = sum * -1 if sum != 0 and charge_xml.at_xpath('z31-credit-debit').try(:content).try(:strip).try(:downcase) == 'debit'
+        charge.sum         = sum
+        date               = charge_xml.at_xpath('z31-date').try(:content)
+        charge.date        = date.present? ? Date.strptime(date, '%Y%m%d') : nil
+        charge.author      = charge_xml.at_xpath('z13-author').try(:content)
+        charge.title       = charge_xml.at_xpath('z13-title').try(:content)
+        charge.year        = charge_xml.at_xpath('z13-year').try(:content)
+        description        = charge_xml.at_xpath('z31-description').try(:content)
+        charge.description = description if description.present? and description.downcase.strip != 'alle'
+        cash.charges << charge
+      end
+
+      return cash
+    end
+
+  end
+end

data/lib/median/aleph/hold.rb

@@ -0,0 +1,86 @@
+module Median::Aleph
+  module Hold
+
+    def get_holds(patron_id)
+      # patron_id = 'COPA99001517'
+
+      holds = []
+
+      # load holds
+      url = "#{Median.config.aleph_rest_service_base_url}/patron/#{patron_id}/circulationActions/requests/holds"
+      xml = get_url(url, view: 'full')
+
+      # Rails.logger.info xml
+
+      # parse holds
+      holds = xml.xpath('//hold-request').collect do |hold_xml|
+        hold            = OpenStruct.new()
+        hold.id         = hold_xml.attribute('href').try(:content).try(:split, '/').try(:last)
+        hold.can_cancel = (hold_xml.attribute('delete').try(:content).try(:upcase) == 'Y') ? true : false
+        open_date       = hold_xml.at_xpath('./z37/z37-open-date').try(:content)
+        hold.open_date  = open_date.present? ? Date.strptime(open_date, '%Y%m%d') : nil
+        queue_pos       = hold_xml.at_xpath('./status').try(:content).try(:match, /position ([0-9]+)/i).try(:[], 1).to_i
+        hold.queue_pos  = queue_pos
+        due_date        = hold_xml.at_xpath('./status').try(:content).try(:match, /due date ([0-9]+\/[0-9]+\/[0-9]+)/i).try(:[], 1)
+        hold.due_date   = due_date.present? ? Date.strptime(due_date, '%d/%m/%y') : nil
+        hold.doc_id     = hold_xml.at_xpath('./z13/z13-doc-number').try(:content)
+        hold.author     = hold_xml.at_xpath('./z13/z13-author').try(:content)
+        hold.title      = hold_xml.at_xpath('./z13/z13-title').try(:content)
+        hold.year       = hold_xml.at_xpath('./z13/z13-year').try(:content)
+        hold.signature  = hold_xml.at_xpath('./z13/z13-call-no').try(:content)
+
+        hold
+      end
+
+      return holds
+    end
+
+    def create_hold(patron_id, record_id)
+      # First, get the group list and fetch the ID for group 0
+      group0_id = get_hold_group0_id(patron_id, record_id)
+      if group0_id.present?
+        url = "#{Median.config.aleph_rest_service_base_url}/patron/#{patron_id}/record/#{record_id}/holds/#{group0_id}"
+
+        data = <<-XML
+          <hold-request-parameters>
+            <pickup-location>P0001</pickup-location>
+            <start-interest-date>#{Date.today.strftime('%Y%m%d')}</start-interest-date>
+            <last-interest-date>#{(Date.today + 1.year).strftime('%Y%m%d')}</last-interest-date>
+            <rush>N</rush>
+          </hold-request-parameters>
+        XML
+
+        # Optional XML Fields for the hold request.
+        # <sub-author>Additional Author Information</sub-author>
+        # <sub-title>Additional Title Information</sub-title>
+        # <pages>Addtional Pages Information</pages>
+        # <note-1>Additional Note</note-1>
+        # <note-2>Addtional Note</note-2>
+
+        xml    = put_url(url, post_xml: data)
+        result = xml.at_xpath('//reply-text').try(:content).try(:downcase)
+        return result == 'ok'
+      end
+      false
+    end
+
+    def cancel_hold(patron_id, hold_id)
+      url = "#{Median.config.aleph_rest_service_base_url}/patron/#{patron_id}/circulationActions/requests/holds/#{hold_id}"
+      xml = delete_url(url)
+      result = xml.at_xpath('//reply-text').try(:content).try(:downcase)
+      return result == 'ok'
+    end
+
+    protected
+
+    def get_hold_group0_id(patron_id, record_id)
+      url    = "#{Median.config.aleph_rest_service_base_url}/patron/#{patron_id}/record/#{record_id}/holds"
+      puts url
+      xml    = get_url(url, view: 'full')
+      puts xml
+      group0 = xml.at_xpath('//group')
+      return group0.attribute('href').try(:content).try(:split, '/').try(:last) if group0
+    end
+
+  end
+end