&GetExternalSearchTargets

=head2 GetExternalSearchTargets

Returns the list of Z39.50 servers that are marked for search in the OPAC using

Pazpar2.

=cut

sub GetExternalSearchTargets {

    my ( $branchcode ) = @_;

    if ( $branchcode ) {

        return C4::Context->dbh->selectall_arrayref( q{

            SELECT * FROM external_targets et

            LEFT JOIN external_target_restrictions etr

                ON (etr.target_id = et.target_id and etr.branchcode = ?)

            WHERE etr.target_id IS NULL

            ORDER BY et.name

        }, { Slice => {} }, $branchcode );

    } else {

        return C4::Context->dbh->selectall_arrayref( q{

            SELECT * FROM external_targets et

            LEFT JOIN external_target_restrictions etr USING (target_id)

            GROUP by et.target_id

            HAVING branchcode IS NULL

            ORDER BY et.name

        }, { Slice => {} } );

    }

}

        &XSLTGetFilename

    return $xslfilename;

}

sub XSLTParse4Display {

    my ( $biblionumber, $orig_record, $xslsyspref, $fixamps, $hidden_items ) = @_;

    my $xslfilename = XSLTGetFilename( C4::Context->preference( 'marcflavour' ), $xslsyspref );

#!/usr/bin/perl

#

# Copyright 2013 Jesse Weaver

#

# This file is part of Koha.

#

# Koha is free software; you can redistribute it and/or modify it under the

# terms of the GNU General Public License as published by the Free Software

# Foundation; either version 2 of the License, or (at your option) any later

# version.

#

# Koha is distributed in the hope that it will be useful, but WITHOUT ANY

# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR

# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.

#

# You should have received a copy of the GNU General Public License along

# with Koha; if not, write to the Free Software Foundation, Inc.,

# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.

#

use Modern::Perl '2010';

use CGI;

use C4::Auth;

use C4::Context;

use C4::Branch;

use C4::Output;

use URI::Escape;

our $dbh = C4::Context->dbh;

our $input = new CGI;

our ( $template, $loggedinuser, $cookie ) = get_template_and_user( {

    template_name => "admin/external-targets.tt",

    query => $input,

    type => "intranet",

    authnotrequired => 0,

    flagsrequired => {parameters => 'parameters_remaining_permissions'},

    debug => 1,

} );

our $op = $input->param( 'op' ) // 'show';

$template->{VARS}->{op} = $op;

given ( $op ) {

    when ( 'show' ) { show_external_targets(); }

    when ( 'add' ) { show_edit_form(); }

    when ( 'edit' ) { show_edit_form(); }

    when ( 'save' ) { save_target(); }

    when ( 'delete' ) { delete_target(); }

}

output_html_with_http_headers $input, $cookie, $template->output;

sub show_external_targets {

    $template->{VARS}->{saved_id} = $input->param( 'saved_id' );

    $template->{VARS}->{deleted_name} = $input->param( 'deleted_name' );

    $template->{VARS}->{targets} = $dbh->selectall_arrayref( q{

        SELECT *

        FROM external_targets

    }, { Slice => {} } );

}

sub show_edit_form {

    $template->{VARS}->{branches} = GetBranchesLoop( undef, 0 );

    $template->{VARS}->{syntaxes} = [ 'MARC21', 'UNIMARC', 'NORMARC' ];

    $template->{VARS}->{encodings} = { 'utf8' => 'UTF-8', 'marc8' => 'MARC-8' };

    my $target_id;

    if ( $target_id = $input->param( 'target_id' ) ) {

        $template->{VARS}->{target} = $dbh->selectrow_hashref( q{ SELECT * FROM external_targets WHERE target_id = ? }, {}, $target_id );

        my $available_branches = $dbh->selectall_hashref( q{ SELECT * FROM external_target_restrictions WHERE target_id = ? }, 'branchcode', {}, $target_id );

        foreach my $branch ( @{ $template->{VARS}->{branches} } ) {

            $branch->{selected} = 1 if ( $available_branches->{$branch->{branchcode}} );

        }

    }

}

sub save_target {

    my $target_id;

    if ( $target_id = $input->param( 'target_id' ) ) {

        $dbh->do( q{

            UPDATE external_targets

            SET name = ?, host = ?, port = ?, db = ?, userid = ?, password = ?, syntax = ?, encoding = ?

            WHERE target_id = ?

        }, {}, map { $input->param( $_ ) // '' } qw( name host port db userid password syntax encoding target_id ) );

    } else {

        $dbh->do( q{

            INSERT

            INTO external_targets(name, host, port, db, userid, password, syntax, encoding)

            VALUES(?, ?, ?, ?, ?, ?, ?, ?)

        }, {}, map { $input->param( $_ ) // '' } qw( name host port db userid password syntax encoding ) );

        $target_id = $dbh->last_insert_id( undef, undef, undef, undef );

    }

    $dbh->do( q{

        DELETE

        FROM external_target_restrictions

        WHERE target_id = ?

    }, {}, $target_id );

    foreach my $branchcode ( $input->param( 'branch' ) ) {

        $dbh->do( q{

            INSERT

            INTO external_target_restrictions(branchcode, target_id)

            VALUES(?, ?)

        }, {}, $branchcode, $target_id );

    }

    print $input->redirect( '/cgi-bin/koha/admin/external_targets.pl?saved_id=' . $target_id );

    exit;

}

sub delete_target {

    my ($target_id, $target);

    return unless ( $target_id = $input->param( 'target_id' ) and $target = $dbh->selectrow_hashref( q{ SELECT * FROM external_targets WHERE target_id = ? }, {}, $target_id ) );

    $dbh->do( q{ DELETE FROM external_targets WHERE target_id = ? }, {}, $target_id );

    print $input->redirect( '/cgi-bin/koha/admin/external_targets.pl?deleted_name=' . uri_escape( $target->{'name'} ) );

}

   __PAZPAR2_TOGGLE_HTTPD_PRE__

     <Proxy *>

         AddDefaultCharset off

         Order deny,allow

         Allow from all

     </Proxy>

     ProxyRequests off

     ProxyPass /pazpar2/search.pz2 http://__PAZPAR2_HOST__:__PAZPAR2_PORT__/search.pz2

   __PAZPAR2_TOGGLE_HTTPD_POST__

<settings target="*">

  <!-- This file introduces default settings for pazpar2 -->

  <!-- $Id: loc.xml,v 1.2 2007-07-10 13:43:07 adam Exp $ -->

  <!-- mapping for unqualified search -->

  <set name="pz:cclmap:term" value="u=1016 t=l,r s=al"/>

  <!-- field-specific mappings -->

  <set name="pz:cclmap:au" value="u=1004 s=al"/>

  <set name="pz:cclmap:ti" value="u=4 s=al"/>

  <set name="pz:cclmap:su" value="u=21 s=al"/>

  <set name="pz:cclmap:isbn" value="u=7"/>

  <set name="pz:cclmap:issn" value="u=8"/>

  <set name="pz:cclmap:date" value="u=30 r=r"/>

  <!-- Retrieval settings -->

  <set name="pz:elements" value="F"/>

</settings>

<?xml version="1.0" encoding="UTF-8"?>

<xsl:stylesheet

    version="1.0"

    xmlns:xsl="http://www.w3.org/1999/XSL/Transform"

    xmlns:pz="http://www.indexdata.com/pazpar2/1.0"

    xmlns:marc="http://www.loc.gov/MARC21/slim">

 <xsl:output indent="yes" method="xml" version="1.0" encoding="UTF-8"/>

  <xsl:template match="/marc:record">

    <pz:record>

      <xsl:for-each select="marc:controlfield[@tag='001']">

        <pz:metadata type="id">

          <xsl:value-of select="."/>

        </pz:metadata>

      </xsl:for-each>

      <!-- -->

      <xsl:for-each select="marc:datafield[@tag='020']">

	<xsl:if test="marc:subfield[@code='a'] = 'US'">

          <pz:metadata type="lccn">

	    <xsl:value-of select="marc:subfield[@code='b']"/>

	  </pz:metadata>

	</xsl:if>

      </xsl:for-each>

      <xsl:for-each select="marc:datafield[@tag='010']">

        <pz:metadata type="isbn">

	  <xsl:value-of select="marc:subfield[@code='a']"/>

	</pz:metadata>

      </xsl:for-each>

      <xsl:for-each select="marc:datafield[@tag='011']">

        <pz:metadata type="issn">

	  <xsl:value-of select="marc:subfield[@code='a']"/>

	</pz:metadata>

      </xsl:for-each>

      <xsl:for-each select="marc:datafield[@tag='200']">

        <pz:metadata type="work-title">

          <xsl:value-of select="marc:subfield[@code='a']"/>

        </pz:metadata>

      </xsl:for-each>

      <!-- Date of Pulbication -->

      <xsl:for-each select="marc:datafield[@tag='210']">

        <pz:metadata type="date">

	  <xsl:value-of select="marc:subfield[@code='d']"/>

	</pz:metadata>

      </xsl:for-each>

      <!--  Usmarc 650 maps to unimarc 606 and marc21 653 maps to unimarc 610 -->

      <xsl:for-each select="marc:datafield[@tag='606' or @tag='610']">

	<pz:metadata type="subject">

	  <xsl:value-of select="marc:subfield[@code='a']"/>

	</pz:metadata>

      </xsl:for-each>

      <xsl:for-each select="marc:datafield[@tag &gt;= 300 and @tag &lt;= 345]

                            [@tag != '325']">

        <pz:metadata type="description">

            <xsl:value-of select="*/text()"/>

        </pz:metadata>

      </xsl:for-each>

      <!-- Author : primary, alternative and secondary responsibility (equivalent marc21 tags : 100, 700 -->

      <xsl:for-each select="marc:datafield[@tag='700' or @tag='701' or @tag='702']">

	<pz:metadata type="work-author">

	  <xsl:value-of select="marc:subfield[@code='a']"/>

          <xsl:text>, </xsl:text>

	  <xsl:value-of select="marc:subfield[@code='b']"/>

	</pz:metadata>

      </xsl:for-each>

      <!-- Author : marc21 tag 720 maps to unimarc 730

      <xsl:for-each select="marc:datafield[@tag='730']">

	<pz:metadata type="author">

	  <xsl:value-of select="marc:subfield[@code='a']"/>

	</pz:metadata>

      </xsl:for-each>

      -->

      <!-- -->

      <xsl:for-each select="marc:datafield[@tag='856']">

	<pz:metadata type="url">

	  <xsl:value-of select="marc:subfield[@code='u']"/>

	</pz:metadata>

      </xsl:for-each>

    </pz:record>

  </xsl:template>

</xsl:stylesheet>

('OPACSearchExternalTargets','0',NULL,'Whether to search external targets in the OPAC','YesNo'),

$DBversion = "3.13.00.XXX";

if(CheckVersion($DBversion)) {

    $dbh->do(

"INSERT IGNORE INTO systempreferences (variable,value,explanation,options,type) VALUES('OPACSearchExternalTargets','0','Whether to search external targets in the OPAC','','YesNo')"

    );

    $dbh->do( q{

CREATE TABLE `external_targets` (

  `target_id` int(11) NOT NULL AUTO_INCREMENT,

  `host` varchar(128) NOT NULL,

  `port` int(11) NOT NULL,

  `db` varchar(64) NOT NULL,

  `userid` varchar(64) DEFAULT '',

  `password` varchar(64) DEFAULT '',

  `name` varchar(64) NOT NULL,

  `syntax` varchar(64) NOT NULL,

  `encoding` varchar(16) DEFAULT 'MARC-8',

  PRIMARY KEY (`target_id`)

) ENGINE=InnoDB AUTO_INCREMENT=21 DEFAULT CHARSET=utf8

    } );

    $dbh->do( q{

CREATE TABLE `external_target_restrictions` (

  `branchcode` varchar(10) NOT NULL,

  `target_id` int(11) NOT NULL,

  KEY `branchcode` (`branchcode`),

  KEY `target_id` (`target_id`),

  CONSTRAINT `external_target_restrictions_ibfk_1` FOREIGN KEY (`branchcode`) REFERENCES `branches` (`branchcode`) ON DELETE CASCADE,

  CONSTRAINT `external_target_restrictions_ibfk_2` FOREIGN KEY (`target_id`) REFERENCES `external_targets` (`target_id`) ON DELETE CASCADE

) ENGINE=InnoDB DEFAULT CHARSET=utf8

    } );

    print "Upgrade to $DBversion done (Bug 10486 - Allow external Z39.50 targets to be searched from the OPAC)\n";

    SetVersion($DBversion);

}

tr.highlight td {

	background-color : #F6F6F6;

	border-color : #BCBCBC;

}

tr.highlight th[scope=row] {

	background-color : #DDDDDD;

	border-color : #BCBCBC;

}

tr.updated td {

    background-color: #FFFFBB;

}

    <li><a href="/cgi-bin/koha/admin/external_targets.pl">External search targets</a></li>

    <dt><a href="/cgi-bin/koha/admin/external_targets.pl">External search targets</a></dt>

    <dd>Define external search targets that can be searched from the OPAC.</dd>

[% INCLUDE 'doc-head-open.inc' %]

[% IF op == 'show' %]

<title>Koha &rsaquo; Administration &rsaquo; External targets</title>

[% ELSIF op == 'add' %]

<title>Koha &rsaquo; Administration &rsaquo; External targets &rsaquo; Create an external target</title>

[% ELSIF op == 'edit' %]

<title>Koha &rsaquo; Administration &rsaquo; External targets &rsaquo; Editing '[% target.name %]'</title>

[% END %]

[% INCLUDE 'doc-head-close.inc' %]

<link rel="stylesheet" type="text/css" href="[% themelang %]/css/datatables.css" />

<script type="text/javascript" src="[% themelang %]/lib/jquery/plugins/jquery.dataTables.min.js"></script>

[% INCLUDE 'datatables-strings.inc' %]

<script type="text/javascript" src="[% themelang %]/js/datatables.js"></script>

<script type="text/javascript">

//<![CDATA[

 $(document).ready(function() {

    [% IF ( targets.size ) %]

    var dTable = $("#targets").dataTable( $.extend( true, {}, dataTablesDefaults, {

        aoColumnDefs: [

            { aTargets: [ 1,2,3,4,5 ], bSortable: false, bSearchable: false },

        ],

        asStripeClasses: [ '', 'highlight' ],

        bPaginate: false,

    } ) );

    [% IF saved_id %]

    $( '#targets tr[data-targetid=[% saved_id %]]' ).addClass( 'updated' );

    [% END %]

    $( '#targets .delete' ).click( function() {

        return confirm( _("Are you sure you wish to delete this target?") );

    } );

    [% END %]

 });

//]]>

</script>

</head>

<body id="admin_z3950servers" class="admin">

[% INCLUDE 'header.inc' %]

[% INCLUDE 'cat-search.inc' %]

[% IF op == 'show' %]

<div id="breadcrumbs"><a href="/cgi-bin/koha/mainpage.pl">Home</a> &rsaquo; <a href="/cgi-bin/koha/admin/admin-home.pl">Administration</a> &rsaquo; External targets</div>

[% ELSIF op == 'add' %]

<div id="breadcrumbs"><a href="/cgi-bin/koha/mainpage.pl">Home</a> &rsaquo; <a href="/cgi-bin/koha/admin/admin-home.pl">Administration</a> &rsaquo; <a href="/cgi-bin/koha/admin/external_targets.pl">External targets</a> &rsaquo; Create an external target</div>

[% ELSIF op == 'edit' %]

<div id="breadcrumbs"><a href="/cgi-bin/koha/mainpage.pl">Home</a> &rsaquo; <a href="/cgi-bin/koha/admin/admin-home.pl">Administration</a> &rsaquo; <a href="/cgi-bin/koha/admin/external_targets.pl">External targets</a> &rsaquo; Editing '[% target.name %]'</div>

[% END %]

<div id="doc3" class="yui-t2">

<div id="bd">

<div id="yui-main"><div class="yui-b">

[% IF op == 'show' %]

[% IF deleted_name %]

<div class="alert">

    <p>Deleted target '[% deleted_name %]'</p>

</div>

[% END %]

<div id="toolbar" class="btn-toolbar">

    <a id="newtarget" class="btn btn-small" href="/cgi-bin/koha/admin/external_targets.pl?op=add"><i class="icon-plus"></i> New external target</a>

</div>

<p>These Z39.50 targets are searched in the OPAC using the "external targets" feature. Note that Pazpar2 must be installed and configured for this to work.</p>

[% IF targets.size %]

<table id="targets">

    <thead><tr><th>Name</th><th>Connection</th><th>Login</th><th>Syntax</th><th>Encoding</th><th>&nbsp;</th><th>&nbsp;</th></tr></thead>

    <tbody>

        [% FOREACH target = targets %]

        <tr data-targetid="[% target.target_id %]">

            <td>[% target.name %]</td>

            <td>[% target.host %]:[% target.port %]/[% target.db %]</td>

            <td>[% IF target.userid %][% target.userid %] / [% IF target.password %]********[% ELSE %]<span class="hint">none</span>[% END %][% ELSE %]<span class="hint">none</span>[% END %]</td>

            <td>[% target.syntax %]</td>

            <td>

                [% IF target.encoding == 'marc8' %]

                MARC-8

                [% ELSIF target.encoding == 'utf8' %]

                UTF-8

                [% END %]

            </td>

            <td><a href="/cgi-bin/koha/admin/external_targets.pl?op=edit&amp;target_id=[% target.target_id %]">Edit</a></td>

            <td><a class="delete" href="/cgi-bin/koha/admin/external_targets.pl?op=delete&amp;target_id=[% target.target_id %]">Delete</a></td>

        </tr>

        [% END %]

    </tbody>

</table>

[% ELSE %]

<p>No external targets have been defined yet.</p>

[% END %]

[% ELSIF op == 'add' || op == 'edit' %]

<form action="/cgi-bin/koha/admin/external_targets.pl" method="POST">

    [% IF op == 'add' %]

    <h1>Create an external target</h1>

    [% ELSIF op == 'edit' %]

    <h1>Editing '[% target.name %]'</h1>

    [% END %]

    <input type="hidden" name="op" value="save">

    <input type="hidden" name="target_id" value="[% target.target_id %]">

    <fieldset class="rows">

        <ol>

            <li><label for="name">Name:</label> <input type="text" id="name" name="name" value="[% target.name %]" required></li>

            <li><label for="host">Host:</label> <input type="text" id="host" name="host" value="[% target.host %]" required></li>

            <li><label for="port">Port:</label> <input type="num" id="port" name="port" value="[% target.port %]" required></li>

            <li><label for="db">Database:</label> <input type="text" id="db" name="db" value="[% target.db %]" required></li>

            <li><label for="userid">User:</label> <input type="text" id="userid" name="userid" value="[% target.userid %]"></li>

            <li><label for="password">Password:</label> <input type="password" id="password" name="password" value="[% target.password %]" autocomplete="off"></li>

            <li>

                <label for="syntax">Syntax:</label>

                <select id="syntax" name="syntax">

                    [% FOREACH syntax = syntaxes %]

                    [% IF syntax == target.syntax %]

                    <option selected>[% syntax %]

                    [% ELSE %]

                    <option>[% syntax %]</option>

                    [% END %]

                    [% END %]

                </select>

            </li>

            <li>

                <label for="encoding">Encoding:</label>

                <select id="encoding" name="encoding">

                    [% FOREACH encoding = encodings %]

                    [% IF encoding.key == target.encoding %]

                    <option value="[% encoding.key %]" selected>[% encoding.value %]

                    [% ELSE %]

                    <option value="[% encoding.key %]">[% encoding.value %]</option>

                    [% END %]

                    [% END %]

                </select>

            </li>

            <li>

                <label>Restricted libraries:</label>

                <fieldset>

                    <legend>Not available to patrons from:</legend>

                    <p>Only targets with no restrictions will be shown to anonymous (not logged in) users.</p>

                    <ol>

                        [% FOREACH branch = branches %]

                        <li>

                            <label for="branch-[% branch.branchcode %]">[% branch.branchname %]</label>

                            [% IF branch.selected %]

                            <input type="checkbox" id="branch-[% branch.branchcode %]" name="branch" value="[% branch.branchcode %]" checked />

                            [% ELSE %]

                            <input type="checkbox" id="branch-[% branch.branchcode %]" name="branch" value="[% branch.branchcode %]" />

                            [% END %]

                        </li>

                        [% END %]

                    </ol>

                </fieldset>

            </li>

        </ol>

    </fieldset>

    <fieldset class="action"><input type="submit" value="Save"></fieldset>

</form>

[% END %]

</div></div>

<div class="yui-b">

[% INCLUDE 'admin-menu.inc' %]

</div>

</div>

[% INCLUDE 'intranet-bottom.inc' %]

        -

            - pref: OPACSearchExternalTargets

              default: 0

              choices:

                  yes: Search

                  no: "Don't search"

            - external targets from the OPAC.

.sourcecol {

  vertical-align: top;

  width: 100px;

}

.notesrow label {

  font-weight: bold;

}

.notesrow span {

  display: block;

}

.notesrow textarea {

  width: 100%;

}

#modal-overlay {

  background-color: white;

  border-radius: 5px;

  max-width: 75%;

  padding: 15px;

}

    function StartExternalSearch(name, text) {

        $( '#numresults' )

            .eq( 0 )

            .append( ' <span id="' + name + '-results">' + text + '... <img class="throbber" src="/opac-tmpl/lib/jquery/plugins/themes/classic/throbber.gif" /></span>' );

    }

    function FailExternalSearch( name, text ) {

        $( '#' + name + '-results' ).html( text );

    }

    function FinishExternalSearch( name, text, numItems, url ) {

        if ( numItems ) {

            $( '#' + name + '-results' ).html( text.replace( '__LINK__', '<a href="' + url + '">' + _("__RESULTS__ results").replace( '__RESULTS__', numItems ) + '</a>' ) );

        } else {

            $( '#' + name + '-results' ).remove();

        }

    }

            first_succeeded = true;

            FinishExternalSearch( 'pazpar2', _("Found __LINK__ in __TARGETS__ external targets").replace( '__TARGETS__', num_targets ), data.total, '/cgi-bin/koha/opac-external-search.pl?q=' + escape( querystring ) );

  xmlns="http://www.w3.org/1999/xhtml"

    <xsl:param name="showAvailability" select="true()"/>

                        <xsl:if test="$showAvailability">

               </xsl:if>

  xmlns="http://www.w3.org/1999/xhtml"

<xsl:param name="showAvailability" select="true()"/>

  <xsl:if test="$showAvailability">

  </xsl:if>

.sourcecol {

	vertical-align: top;

	width: 100px;

}

#modal-overlay {

    background-color: white;

    border-radius: 5px;

    max-width: 75%;

    padding: 15px;

}

#overdrive-results, #pazpar2-results {

    font-weight: bold;

    padding-left: 1em;

}

if ( typeof KOHA == "undefined" || !KOHA ) {

    var KOHA = {};

}

KOHA.XSLTGet = ( function() {

    // Horrible browser hack, but required due to the following hard-to-detect and long-unfixed bug:

    // https://bugs.webkit.org/show_bug.cgi?id=60276

    var isChrome = /Chrome/.test(navigator.userAgent) && /Google Inc/.test(navigator.vendor);

    var isSafari = /Safari/.test(navigator.userAgent) && /Apple Computer/.test(navigator.vendor);

    if ( !isChrome && !isSafari ) return $.get;

    return function( url ) {

        var result = new jQuery.Deferred();

        var basepath = url.match( /(.*\/)*/ )[0];

        $.get( url ).done( function( xslDoc ) {

            var xslImports = xslDoc.getElementsByTagNameNS( 'http://www.w3.org/1999/XSL/Transform', 'import' );

            var importsRemaining = xslImports.length;

            if ( importsRemaining == 0 ) {

                result.resolve( xslDoc );

                return;

            }

            $.each( xslImports, function( i, importElem ) {

                var path = $( importElem ).attr( 'href' );

                if ( !/^(\/|https?:)/.test( path ) ) path = basepath + path;

                KOHA.XSLTGet( path ).done( function( subDoc ) {

                    importsRemaining--;

                    $( importElem ).replaceWith( subDoc.documentElement.childNodes );

                    if ( importsRemaining == 0 ) result.resolve( xslDoc );

                } ).fail( function() {

                    importsRemaining = -1;

                    result.reject();

                } );

            } );

        } ).fail( function() {

            result.reject();

        } );

        return result;

    };

} )();

KOHA.TransformToFragment = function( xmlDoc, xslDoc ) {

    if ( window.XSLTProcessor ) {

        var proc = new XSLTProcessor();

        proc.importStylesheet( xslDoc );

        proc.setParameter( null, 'showAvailability', false );

        return (new XMLSerializer).serializeToString( proc.transformToFragment( xmlDoc, document ) );

    } else if ( window.ActiveXObject ) {

        var xslt = new ActiveXObject( "Msxml2.XSLTemplate" );

        xslt.stylesheet = xslDoc;

        var xslProc = xslt.createProcessor();

        xslProc.input = xmlDoc;

        xslProc.addParameter( 'showAvailability', false );

        xslProc.transform();

        return xslProc.output;

    }

};

KOHA.ExternalSearch = ( function() {

    return {

        targets: {},

        Search: function( q, limit, callback ) {

            var targetIDs = [];

            var includedTargets = [];

            $.each( KOHA.ExternalSearch.targets, function ( url, info ) {

                if ( !info.disabled ) {

                    includedTargets.push( url );

                    targetIDs.push( info.id );

                }

            } );

            if ( KOHA.ExternalSearch._pz !== undefined ) {

                afterinit( KOHA.ExternalSearch._pz );

            } else {

                $.get( '/cgi-bin/koha/svc/pazpar2_init', { targets: targetIDs.join(',') }, function( data ) {

                    KOHA.ExternalSearch._pz = new pz2({

                        sessionId: data.sessionID,

                        onshow: callback,

                        errorhandler: function ( error ) { callback( { error: error } ) },

                    } );

                    afterinit( KOHA.ExternalSearch._pz );

                } );

            }

            function afterinit( pz ) {

                pz.search( q, limit, 'relevance:0', 'pz:id=' + includedTargets.join( '|' ) );

            }

        },

        Fetch: function( offset, callback ) {

            var pz = KOHA.ExternalSearch._pz;

            pz.showCallback = callback;

            pz.show( offset );

        },

        GetDetailedRecord: function( recid, callback ) {

            KOHA.ExternalSearch._pz.record( recid, 0, undefined, { callback: callback } );

        },

    };

} )();

/*

* $ lightbox_me

* By: Buck Wilson

* Version : 2.3

*

* Licensed under the Apache License, Version 2.0 (the "License");

* you may not use this file except in compliance with the License.

* You may obtain a copy of the License at

*

*     http://www.apache.org/licenses/LICENSE-2.0

*

* Unless required by applicable law or agreed to in writing, software

* distributed under the License is distributed on an "AS IS" BASIS,

* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.

* See the License for the specific language governing permissions and

* limitations under the License.

*/

(function($) {

    $.fn.lightbox_me = function(options) {

        return this.each(function() {

            var

                opts = $.extend({}, $.fn.lightbox_me.defaults, options),

                $overlay = $(),

                $self = $(this),

                $iframe = $('<iframe id="foo" style="z-index: ' + (opts.zIndex + 1) + ';border: none; margin: 0; padding: 0; position: absolute; width: 100%; height: 100%; top: 0; left: 0; filter: mask();"/>'),

                ie6 = ($.browser.msie && $.browser.version < 7);

            if (opts.showOverlay) {

                //check if there's an existing overlay, if so, make subequent ones clear

               var $currentOverlays = $(".js_lb_overlay:visible");

                if ($currentOverlays.length > 0){

                    $overlay = $('<div class="lb_overlay_clear js_lb_overlay"/>');

                } else {

                    $overlay = $('<div class="' + opts.classPrefix + '_overlay js_lb_overlay"/>');

                }

            }

            /*----------------------------------------------------

               DOM Building

            ---------------------------------------------------- */

            if (ie6) {

                var src = /^https/i.test(window.location.href || '') ? 'javascript:false' : 'about:blank';

                $iframe.attr('src', src);

                $('body').append($iframe);

            } // iframe shim for ie6, to hide select elements

            $('body').append($self.hide()).append($overlay);

            /*----------------------------------------------------

               Overlay CSS stuffs

            ---------------------------------------------------- */

            // set css of the overlay

            if (opts.showOverlay) {

                setOverlayHeight(); // pulled this into a function because it is called on window resize.

                $overlay.css({ position: 'absolute', width: '100%', top: 0, left: 0, right: 0, bottom: 0, zIndex: (opts.zIndex + 2), display: 'none' });

				if (!$overlay.hasClass('lb_overlay_clear')){

			$overlay.css(opts.overlayCSS);

                }

            }

            /*----------------------------------------------------

               Animate it in.

            ---------------------------------------------------- */

               //

            if (opts.showOverlay) {

                $overlay.fadeIn(opts.overlaySpeed, function() {

                    setSelfPosition();

                    $self[opts.appearEffect](opts.lightboxSpeed, function() { setOverlayHeight(); setSelfPosition(); opts.onLoad()});

                });

            } else {

                setSelfPosition();

                $self[opts.appearEffect](opts.lightboxSpeed, function() { opts.onLoad()});

            }

            /*----------------------------------------------------

               Hide parent if parent specified (parentLightbox should be jquery reference to any parent lightbox)

            ---------------------------------------------------- */

            if (opts.parentLightbox) {

                opts.parentLightbox.fadeOut(200);

            }

            /*----------------------------------------------------

               Bind Events

            ---------------------------------------------------- */

            $(window).resize(setOverlayHeight)

                     .resize(setSelfPosition)

                     .scroll(setSelfPosition);

            $(window).bind('keyup.lightbox_me', observeKeyPress);

            if (opts.closeClick) {

                $overlay.click(function(e) { closeLightbox(); e.preventDefault; });

            }

            $self.delegate(opts.closeSelector, "click", function(e) {

                closeLightbox(); e.preventDefault();

            });

            $self.bind('close', closeLightbox);

            $self.bind('reposition', setSelfPosition);

            /*--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

              -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- */

            /*----------------------------------------------------

               Private Functions

            ---------------------------------------------------- */

            /* Remove or hide all elements */

            function closeLightbox() {

                var s = $self[0].style;

                if (opts.destroyOnClose) {

                    $self.add($overlay).remove();

                } else {

                    $self.add($overlay).hide();

                }

                //show the hidden parent lightbox

                if (opts.parentLightbox) {

                    opts.parentLightbox.fadeIn(200);

                }

                $iframe.remove();

				// clean up events.

                $self.undelegate(opts.closeSelector, "click");

                $(window).unbind('reposition', setOverlayHeight);

                $(window).unbind('reposition', setSelfPosition);

                $(window).unbind('scroll', setSelfPosition);

                $(window).unbind('keyup.lightbox_me');

                if (ie6)

                    s.removeExpression('top');

                opts.onClose();

            }

            /* Function to bind to the window to observe the escape/enter key press */

            function observeKeyPress(e) {

                if((e.keyCode == 27 || (e.DOM_VK_ESCAPE == 27 && e.which==0)) && opts.closeEsc) closeLightbox();

            }

            /* Set the height of the overlay

                    : if the document height is taller than the window, then set the overlay height to the document height.

                    : otherwise, just set overlay height: 100%

            */

            function setOverlayHeight() {

                if ($(window).height() < $(document).height()) {

                    $overlay.css({height: $(document).height() + 'px'});

                     $iframe.css({height: $(document).height() + 'px'});

                } else {

                    $overlay.css({height: '100%'});

                    if (ie6) {

                        $('html,body').css('height','100%');

                        $iframe.css('height', '100%');

                    } // ie6 hack for height: 100%; TODO: handle this in IE7

                }

            }

            /* Set the position of the modal'd window ($self)

                    : if $self is taller than the window, then make it absolutely positioned

                    : otherwise fixed

            */

            function setSelfPosition() {

                var s = $self[0].style;

                // reset CSS so width is re-calculated for margin-left CSS

                $self.css({left: '50%', marginLeft: ($self.outerWidth() / 2) * -1,  zIndex: (opts.zIndex + 3) });

                /* we have to get a little fancy when dealing with height, because lightbox_me

                    is just so fancy.

                 */

                // if the height of $self is bigger than the window and self isn't already position absolute

                if (($self.height() + 80  >= $(window).height()) && ($self.css('position') != 'absolute' || ie6)) {

                    // we are going to make it positioned where the user can see it, but they can still scroll

                    // so the top offset is based on the user's scroll position.

                    var topOffset = $(document).scrollTop() + 40;

                    $self.css({position: 'absolute', top: topOffset + 'px', marginTop: 0})

                    if (ie6) {

                        s.removeExpression('top');

                    }

                } else if ($self.height()+ 80  < $(window).height()) {

                    //if the height is less than the window height, then we're gonna make this thing position: fixed.

                    // in ie6 we're gonna fake it.

                    if (ie6) {

                        s.position = 'absolute';

                        if (opts.centered) {

                            s.setExpression('top', '(document.documentElement.clientHeight || document.body.clientHeight) / 2 - (this.offsetHeight / 2) + (blah = document.documentElement.scrollTop ? document.documentElement.scrollTop : document.body.scrollTop) + "px"')

                            s.marginTop = 0;

                        } else {

                            var top = (opts.modalCSS && opts.modalCSS.top) ? parseInt(opts.modalCSS.top) : 0;

                            s.setExpression('top', '((blah = document.documentElement.scrollTop ? document.documentElement.scrollTop : document.body.scrollTop) + '+top+') + "px"')

                        }

                    } else {

                        if (opts.centered) {

                            $self.css({ position: 'fixed', top: '50%', marginTop: ($self.outerHeight() / 2) * -1})

                        } else {

                            $self.css({ position: 'fixed'}).css(opts.modalCSS);

                        }

                    }

                }

            }

        });

    };

    $.fn.lightbox_me.defaults = {

        // animation

        appearEffect: "fadeIn",

        appearEase: "",

        overlaySpeed: 250,

        lightboxSpeed: 300,

        // close

        closeSelector: ".close",

        closeClick: true,

        closeEsc: true,

        // behavior

        destroyOnClose: false,

        showOverlay: true,

        parentLightbox: false,

        // callbacks

        onLoad: function() {},

        onClose: function() {},

        // style

        classPrefix: 'lb',

        zIndex: 999,

        centered: false,

        modalCSS: {top: '40px'},

        overlayCSS: {background: 'black', opacity: .3}

    }

})(jQuery);

/*

 * pz2.js - pazpar2's javascript client library.

 * Copyright (C) 2006-2013 Index Data.

 *

 * This program is free software; you can redistribute it and/or

 * modify it under the terms of the GNU General Public License

 * as published by the Free Software Foundation; either version 2

 * of the License, or (at your option) any later version.

 *

 * This program is distributed in the hope that it will be useful,

 * but WITHOUT ANY WARRANTY; without even the implied warranty of

 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

 * GNU General Public License for more details.

 *

 * You should have received a copy of the GNU General Public License

 * along with this program; if not, write to the Free Software

 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.

*/

//since explorer is flawed

if (!window['Node']) {

    window.Node = new Object();

    Node.ELEMENT_NODE = 1;

    Node.ATTRIBUTE_NODE = 2;

    Node.TEXT_NODE = 3;

    Node.CDATA_SECTION_NODE = 4;

    Node.ENTITY_REFERENCE_NODE = 5;

    Node.ENTITY_NODE = 6;

    Node.PROCESSING_INSTRUCTION_NODE = 7;

    Node.COMMENT_NODE = 8;

    Node.DOCUMENT_NODE = 9;

    Node.DOCUMENT_TYPE_NODE = 10;

    Node.DOCUMENT_FRAGMENT_NODE = 11;

    Node.NOTATION_NODE = 12;

}

// prevent execution of more than once

if(typeof window.pz2 == "undefined") {

window.undefined = window.undefined;

var pz2 = function ( paramArray )

{

    // at least one callback required

    if ( !paramArray )

        throw new Error("Pz2.js: Array with parameters has to be supplied.");

    //supported pazpar2's protocol version

    this.suppProtoVer = '1';

    if (typeof paramArray.pazpar2path != "undefined")

        this.pz2String = paramArray.pazpar2path;

    else

        this.pz2String = "/pazpar2/search.pz2";

    this.useSessions = true;

    this.stylesheet = paramArray.detailstylesheet || null;

    //load stylesheet if required in async mode

    if( this.stylesheet ) {

        var context = this;

        var request = new pzHttpRequest( this.stylesheet );

        request.get( {}, function ( doc ) { context.xslDoc = doc; } );

    }

    this.errorHandler = paramArray.errorhandler || null;

    this.showResponseType = paramArray.showResponseType || "xml";

    // function callbacks

    this.initCallback = paramArray.oninit || null;

    this.statCallback = paramArray.onstat || null;

    this.showCallback = paramArray.onshow || null;

    this.termlistCallback = paramArray.onterm || null;

    this.recordCallback = paramArray.onrecord || null;

    this.bytargetCallback = paramArray.onbytarget || null;

    this.resetCallback = paramArray.onreset || null;

    // termlist keys

    this.termKeys = paramArray.termlist || "subject";

    // some configurational stuff

    this.keepAlive = 50000;

    if ( paramArray.keepAlive < this.keepAlive )

        this.keepAlive = paramArray.keepAlive;

    this.sessionID = paramArray.sessionId || null;

    this.serviceId = paramArray.serviceId || null;

    this.initStatusOK = false;

    this.pingStatusOK = false;

    this.searchStatusOK = false;

    // for sorting

    this.currentSort = "relevance";

    // where are we?

    this.currentStart = 0;

    // currentNum can be overwritten in show

    this.currentNum = 20;

    // last full record retrieved

    this.currRecID = null;

    // current query

    this.currQuery = null;

    //current raw record offset

    this.currRecOffset = null;

    //timers

    this.pingTimer = null;

    this.statTime = paramArray.stattime || 1000;

    this.statTimer = null;

    this.termTime = paramArray.termtime || 1000;

    this.termTimer = null;

    this.showTime = paramArray.showtime || 1000;

    this.showTimer = null;

    this.showFastCount = 4;

    this.bytargetTime = paramArray.bytargettime || 1000;

    this.bytargetTimer = null;

    this.recordTime = paramArray.recordtime || 500;

    this.recordTimer = null;

    // counters for each command and applied delay

    this.dumpFactor = 500;

    this.showCounter = 0;

    this.termCounter = 0;

    this.statCounter = 0;

    this.bytargetCounter = 0;

    this.recordCounter = 0;

    // active clients, updated by stat and show

    // might be an issue since bytarget will poll accordingly

    this.activeClients = 1;

    // if in proxy mode no need to init

    if (paramArray.usesessions != undefined) {

         this.useSessions = paramArray.usesessions;

        this.initStatusOK = true;

    }

    // else, auto init session or wait for a user init?

    if (this.useSessions && paramArray.autoInit !== false) {

        this.init(this.sessionID, this.serviceId);

    }

    // Version parameter

    this.version = paramArray.version || null;

};

pz2.prototype =

{

    //error handler for async error throws

   throwError: function (errMsg, errCode)

   {

        var err = new Error(errMsg);

        if (errCode) err.code = errCode;

        if (this.errorHandler) {

            this.errorHandler(err);

        }

        else {

            throw err;

        }

   },

    // stop activity by clearing tiemouts

   stop: function ()

   {

       clearTimeout(this.statTimer);

       clearTimeout(this.showTimer);

       clearTimeout(this.termTimer);

       clearTimeout(this.bytargetTimer);

    },

    // reset status variables

    reset: function ()

    {

        if ( this.useSessions ) {

            this.sessionID = null;

            this.initStatusOK = false;

            this.pingStatusOK = false;

            clearTimeout(this.pingTimer);

        }

        this.searchStatusOK = false;

        this.stop();

        if ( this.resetCallback )

                this.resetCallback();

    },

    init: function (sessionId, serviceId)

    {

        this.reset();

        // session id as a param

        if (sessionId && this.useSessions ) {

            this.initStatusOK = true;

            this.sessionID = sessionId;

            this.ping();

        // old school direct pazpar2 init

        } else if (this.useSessions) {

            var context = this;

            var request = new pzHttpRequest(this.pz2String, this.errorHandler);

            var opts = {'command' : 'init'};

            if (serviceId) opts.service = serviceId;

            request.safeGet(

                opts,

                function(data) {

                    if ( data.getElementsByTagName("status")[0]

                            .childNodes[0].nodeValue == "OK" ) {

                        if ( data.getElementsByTagName("protocol")[0]

                                .childNodes[0].nodeValue

                            != context.suppProtoVer )

                            throw new Error(

                                "Server's protocol not supported by the client"

                            );

                        context.initStatusOK = true;

                        context.sessionID =

                            data.getElementsByTagName("session")[0]

                                .childNodes[0].nodeValue;

                        if (data.getElementsByTagName("keepAlive").length > 0) {

                            context.keepAlive = data.getElementsByTagName("keepAlive")[0].childNodes[0].nodeValue;

                        }

                        context.pingTimer =

                            setTimeout(

                                function () {

                                    context.ping();

                                },

                                context.keepAlive

                            );

                        if ( context.initCallback )

                            context.initCallback();

                    }

                    else

                        context.throwError('Init failed. Malformed WS resonse.',

                                            110);

                }

            );

        // when through proxy no need to init

        } else {

            this.initStatusOK = true;

	}

    },

    // no need to ping explicitly

    ping: function ()

    {

        // pinging only makes sense when using pazpar2 directly

        if( !this.initStatusOK || !this.useSessions )

            throw new Error(

            'Pz2.js: Ping not allowed (proxy mode) or session not initialized.'

            );

        var context = this;

        clearTimeout(context.pingTimer);

        var request = new pzHttpRequest(this.pz2String, this.errorHandler);

        request.safeGet(

            { "command": "ping", "session": this.sessionID, "windowid" : window.name },

            function(data) {

                if ( data.getElementsByTagName("status")[0]

                        .childNodes[0].nodeValue == "OK" ) {

                    context.pingStatusOK = true;

                    context.pingTimer =

                        setTimeout(

                            function () {

                                context.ping();

                            },

                            context.keepAlive

                        );

                }

                else

                    context.throwError('Ping failed. Malformed WS resonse.',

                                        111);

            }

        );

    },

    search: function (query, num, sort, filter, showfrom, addParamsArr)

    {

        clearTimeout(this.statTimer);

        clearTimeout(this.showTimer);

        clearTimeout(this.termTimer);

        clearTimeout(this.bytargetTimer);

        this.showCounter = 0;

        this.termCounter = 0;

        this.bytargetCounter = 0;

        this.statCounter = 0;

        this.activeClients = 1;

        // no proxy mode

        if( !this.initStatusOK )

            throw new Error('Pz2.js: session not initialized.');

        if( query !== undefined )

            this.currQuery = query;

        else

            throw new Error("Pz2.js: no query supplied to the search command.");

        if ( showfrom !== undefined )

            var start = showfrom;

        else

            var start = 0;

	var searchParams = {

          "command": "search",

          "query": this.currQuery,

          "session": this.sessionID,

          "windowid" : window.name

        };

        if( sort !== undefined ) {

            this.currentSort = sort;

	    searchParams["sort"] = sort;

	}

        if (filter !== undefined)

	        searchParams["filter"] = filter;

        // copy additional parmeters, do not overwrite

        if (addParamsArr != undefined) {

            for (var prop in addParamsArr) {

                if (!searchParams.hasOwnProperty(prop))

                    searchParams[prop] = addParamsArr[prop];

            }

        }

        var context = this;

        var request = new pzHttpRequest(this.pz2String, this.errorHandler);

        request.safeGet(

            searchParams,

            function(data) {

                if ( data.getElementsByTagName("status")[0]

                        .childNodes[0].nodeValue == "OK" ) {

                    context.searchStatusOK = true;

                    //piggyback search

                    context.show(start, num, sort);

                    if (context.statCallback)

                        context.stat();

                    if (context.termlistCallback)

                        context.termlist();

                    if (context.bytargetCallback)

                        context.bytarget();

                }

                else

                    context.throwError('Search failed. Malformed WS resonse.',

                                        112);

            }

        );

    },

    stat: function()

    {

        if( !this.initStatusOK )

            throw new Error('Pz2.js: session not initialized.');

        // if called explicitly takes precedence

        clearTimeout(this.statTimer);

        var context = this;

        var request = new pzHttpRequest(this.pz2String, this.errorHandler);

        request.safeGet(

            { "command": "stat", "session": this.sessionID, "windowid" : window.name },

            function(data) {

                if ( data.getElementsByTagName("stat") ) {

                    var activeClients =

                        Number( data.getElementsByTagName("activeclients")[0]

                                    .childNodes[0].nodeValue );

                    context.activeClients = activeClients;

		    var stat = Element_parseChildNodes(data.documentElement);

                    context.statCounter++;

		    var delay = context.statTime

                        + context.statCounter * context.dumpFactor;

                    if ( activeClients > 0 )

                        context.statTimer =

                            setTimeout(

                                function () {

                                    context.stat();

                                },

                                delay

                            );

                    context.statCallback(stat);

                }

                else

                    context.throwError('Stat failed. Malformed WS resonse.',

                                        113);

            }

        );

    },

    show: function(start, num, sort, query_state)

    {

        if( !this.searchStatusOK && this.useSessions )

            throw new Error(

                'Pz2.js: show command has to be preceded with a search command.'

            );

        // if called explicitly takes precedence

        clearTimeout(this.showTimer);

        if( sort !== undefined )

            this.currentSort = sort;

        if( start !== undefined )

            this.currentStart = Number( start );

        if( num !== undefined )

            this.currentNum = Number( num );

        var context = this;

        var request = new pzHttpRequest(this.pz2String, this.errorHandler);

	var requestParameters =

          {

              "command": "show",

              "session": this.sessionID,

              "start": this.currentStart,

              "num": this.currentNum,

              "sort": this.currentSort,

              "block": 1,

              "type": this.showResponseType,

              "windowid" : window.name

          };