Popup records now work for all result-lists, as the request is now
[mkws-moved-to-github.git] / tools / htdocs / mkws.js
1 /*! MKWS, the MasterKey Widget Set. Copyright (C) 2013-2014, Index Data */
2
3 "use strict"; // HTML5: disable for debug_level >= 2
4
5
6 // Handlebars helpers
7 Handlebars.registerHelper('json', function(obj) {
8     return $.toJSON(obj);
9 });
10
11
12 Handlebars.registerHelper('translate', function(s) {
13     return mkws.M(s);
14 });
15
16
17 // We need {{attr '@name'}} because Handlebars can't parse {{@name}}
18 Handlebars.registerHelper('attr', function(attrName) {
19     return this[attrName];
20 });
21
22
23 /*
24  * Use as follows: {{#if-any NAME1 having="NAME2"}}
25  * Applicable when NAME1 is the name of an array
26  * The guarded code runs only if at least one element of the NAME1
27  * array has a subelement called NAME2.
28  */
29 Handlebars.registerHelper('if-any', function(items, options) {
30     var having = options.hash.having;
31     for (var i in items) {
32         var item = items[i]
33         if (!having || item[having]) {
34             return options.fn(this);
35         }
36     }
37     return "";
38 });
39
40
41 Handlebars.registerHelper('first', function(items, options) {
42     var having = options.hash.having;
43     for (var i in items) {
44         var item = items[i]
45         if (!having || item[having]) {
46             return options.fn(item);
47         }
48     }
49     return "";
50 });
51
52
53 Handlebars.registerHelper('commaList', function(items, options) {
54     var out = "";
55
56     for (var i in items) {
57         if (i > 0) out += ", ";
58         out += options.fn(items[i])
59     }
60
61     return out;
62 });
63
64
65
66 // Some functions are visible to be called from outside code, namely
67 // generated HTML: mkws.switchView(), showDetails(), limitTarget(),
68 // limitQuery(), delimitTarget(), delimitQuery(), pagerPrev(),
69 // pagerNext(), showPage(). Also mkws.M() is made available for the
70 // Handlebars helper 'translate'
71
72
73 // Set up global mkws object. Contains a hash of team objects,
74 // indexed by windowid.
75 var mkws = {
76     authenticated: false,
77     debug_function: undefined, // will be set during initialisation
78     debug_level: undefined, // will be initialised from mkws_config
79     paz: undefined, // will be set up during initialisation
80     teams: {},
81     locale_lang: {
82         "de": {
83             "Authors": "Autoren",
84             "Subjects": "Schlagwörter",
85             "Sources": "Daten und Quellen",
86             "Termlists": "Termlisten",
87             "Next": "Weiter",
88             "Prev": "Zurück",
89             "Search": "Suche",
90             "Sort by": "Sortieren nach",
91             "and show": "und zeige",
92             "per page": "pro Seite",
93             "Displaying": "Zeige",
94             "to": "von",
95             "of": "aus",
96             "found": "gefunden",
97             "Title": "Titel",
98             "Author": "Autor",
99             "Date": "Datum",
100             "Subject": "Schlagwort",
101             "Location": "Ort",
102             "Records": "Datensätze",
103             "Targets": "Datenbanken",
104
105             "dummy": "dummy"
106         },
107
108         "da": {
109             "Authors": "Forfattere",
110             "Subjects": "Emner",
111             "Sources": "Kilder",
112             "Termlists": "Termlists",
113             "Next": "Næste",
114             "Prev": "Forrige",
115             "Search": "Søg",
116             "Sort by": "Sorter efter",
117             "and show": "og vis",
118             "per page": "per side",
119             "Displaying": "Viser",
120             "to": "til",
121             "of": "ud af",
122             "found": "fandt",
123             "Title": "Title",
124             "Author": "Forfatter",
125             "Date": "Dato",
126             "Subject": "Emneord",
127             "Location": "Lokation",
128             "Records": "Poster",
129             "Targets": "Baser",
130
131             "dummy": "dummy"
132         }
133     }
134 };
135
136
137 // Define empty mkws_config for simple applications that don't define it.
138 if (mkws_config == null || typeof mkws_config != 'object') {
139     var mkws_config = {};
140 }
141
142
143 // wrapper for jQuery lib
144 function _make_mkws_team($, teamName) {
145     var that = {};
146     var m_teamName = teamName;
147     var m_submitted = false;
148     var m_query; // initially undefined
149     var m_sort = 'relevance';
150     var m_filters = [];
151     var m_totalRec = 0;
152     var m_recPerPage = 20;
153     var m_curPage = 1;
154     var m_curDetRecId = '';
155     var m_curDetRecData = null;
156     var m_debug_time = {
157         // Timestamps for logging
158         "start": $.now(),
159         "last": $.now()
160     };
161     var m_paz; // will be initialised below
162
163
164     // if (console && console.log) // disabled, will fail in IE8
165     //  console.log("run _make_mkws_team(" + (teamName ? teamName : "") + ")");
166
167
168     // Needs to be defined inside _make_mkws_team() so it can see m_debug_time
169     mkws.debug_function = function (string) {
170         if (!mkws.debug_level)
171             return;
172
173         if (typeof console === "undefined" || typeof console.log === "undefined") { /* ARGH!!! old IE */
174             return;
175         }
176
177         var now = $.now();
178         var timestamp = ((now - m_debug_time.start)/1000).toFixed(3) + " (+" + ((now - m_debug_time.last)/1000).toFixed(3) + ") "
179         m_debug_time.last = now;
180
181         // you need to disable use strict at the top of the file!!!
182         if (mkws.debug_level >= 3) {
183             console.log(timestamp + arguments.callee.caller);
184         } else if (mkws.debug_level >= 2) {
185             console.log(timestamp + ">>> called from function " + arguments.callee.caller.name + ' <<<');
186         }
187         console.log(timestamp + string);
188     }
189     var debug = mkws.debug_function; // local alias
190     debug("start running MKWS");
191
192     m_sort = mkws_config.sort_default;
193     debug("copied mkws_config.sort_default '" + mkws_config.sort_default + "' to m_sort");
194
195     if (mkws_config.query_width < 5 || mkws_config.query_width > 150) {
196         debug("Reset query width: " + mkws_config.query_width);
197         mkws_config.query_width = 50;
198     }
199
200     for (var key in mkws_config) {
201         if (mkws_config.hasOwnProperty(key)) {
202             if (key.match(/^language_/)) {
203                 var lang = key.replace(/^language_/, "");
204                 // Copy custom languages into list
205                 mkws.locale_lang[lang] = mkws_config[key];
206                 debug("Added locally configured language '" + lang + "'");
207             }
208         }
209     }
210
211     // protocol independent link for pazpar2: "//mkws/sp" -> "https://mkws/sp"
212     if (mkws_config.pazpar2_url.match(/^\/\//)) {
213         mkws_config.pazpar2_url = document.location.protocol + mkws_config.pazpar2_url;
214         debug("adjust protocol independent links: " + mkws_config.pazpar2_url);
215     }
216
217     debug("Create main pz2 object");
218     // create a parameters array and pass it to the pz2's constructor
219     // then register the form submit event with the pz2.search function
220     // autoInit is set to true on default
221     m_paz = new pz2({ "onshow": my_onshow,
222                       "windowid": teamName,
223                       "showtime": 500,            //each timer (show, stat, term, bytarget) can be specified this way
224                       "pazpar2path": mkws_config.pazpar2_url,
225                       "oninit": my_oninit,
226                       "onstat": my_onstat,
227                       "onterm": my_onterm,
228                       "termlist": "xtargets,subject,author",
229                       "onbytarget": my_onbytarget,
230                       "usesessions" : mkws_config.use_service_proxy ? false : true,
231                       "showResponseType": '', // or "json" (for debugging?)
232                       "onrecord": my_onrecord });
233     that.m_paz = m_paz; // For access from non-member functions like mkws.showDetails
234
235     if (!isNaN(parseInt(mkws_config.perpage_default))) {
236         m_recPerPage = parseInt(mkws_config.perpage_default);
237     }
238
239
240     //
241     // pz2.js event handlers:
242     //
243     function my_oninit(teamName) {
244         debug("init for " + teamName);
245         m_paz.stat();
246         m_paz.bytarget();
247     }
248
249
250     function my_onshow(data, teamName) {
251         debug("show for " + teamName);
252         m_totalRec = data.merged;
253         // move it out
254         var pager = document.getElementById("mkwsPager");
255         if (pager) {
256             pager.innerHTML = "";
257             pager.innerHTML +='<div style="float: right">' + M('Displaying') + ': '
258                 + (data.start + 1) + ' ' + M('to') + ' ' + (data.start + data.num) +
259                 ' ' + M('of') + ' ' + data.merged + ' (' + M('found') + ': '
260                 + data.total + ')</div>';
261             drawPager(pager);
262         }
263
264         // navi
265         var results = $(".mkwsRecords.mkwsTeam_" + m_teamName);
266
267         var html = [];
268         for (var i = 0; i < data.hits.length; i++) {
269             var hit = data.hits[i];
270             html.push('<div class="record" id="mkwsRecdiv_' + hit.recid + '" >',
271                       renderSummary(hit),
272                       '</div>');
273             if (hit.recid == m_curDetRecId) {
274                 html.push(renderDetails(m_curDetRecData));
275             }
276         }
277         results.html(html.join(''));
278     }
279
280
281     function renderSummary(hit)
282     {
283         var template = loadTemplate("Summary");
284         hit._id = "mkwsRec_" + hit.recid;
285         hit._onclick = "mkws.showDetails(this.id, '" + m_teamName + "');return false;"
286         return template(hit);
287     }
288
289
290     function my_onstat(data, teamName) {
291         debug("stat for " + teamName);
292         var stat = document.getElementById("mkwsStat");
293         if (stat == null)
294             return;
295
296         stat.innerHTML = '<span class="head">' + M('Status info') + '</span>' +
297             ' -- ' +
298             '<span class="clients">' + M('Active clients') + ': ' + data.activeclients + '/' + data.clients + '</span>' +
299             ' -- ' +
300             '<span class="records">' + M('Retrieved records') + ': ' + data.records + '/' + data.hits + '</span>';
301     }
302
303
304     function my_onterm(data, teamName) {
305         debug("term for " + teamName);
306         // no facets
307         if (!mkws_config.facets || mkws_config.facets.length == 0) {
308             $("#mkwsTermlists").hide();
309             return;
310         }
311
312         // display if we first got results
313         $("#mkwsTermlists").show();
314
315         var acc = [];
316         acc.push('<div class="title">' + M('Termlists') + '</div>');
317         var facets = mkws_config.facets;
318
319         for(var i = 0; i < facets.length; i++) {
320             if (facets[i] == "sources") {
321                 add_single_facet(acc, "Sources",  data.xtargets, 16, null);
322             } else if (facets[i] == "subjects") {
323                 add_single_facet(acc, "Subjects", data.subject,  10, "subject");
324             } else if (facets[i] == "authors") {
325                 add_single_facet(acc, "Authors",  data.author,   10, "author");
326             } else {
327                 alert("bad facet configuration: '" + facets[i] + "'");
328             }
329         }
330
331         var termlist = $("#mkwsTermlists");
332         if (termlist)
333             termlist.html(acc.join(''));
334     }
335
336
337     function add_single_facet(acc, caption, data, max, pzIndex) {
338         acc.push('<div class="facet" id="mkwsFacet' + caption + '">');
339         acc.push('<div class="termtitle">' + M(caption) + '</div>');
340         for (var i = 0; i < data.length && i < max; i++) {
341             acc.push('<div class="term">');
342             acc.push('<a href="#" ');
343             var action;
344             if (!pzIndex) {
345                 // Special case: target selection
346                 acc.push('target_id='+data[i].id+' ');
347                 action = 'mkws.limitTarget(this.getAttribute(\'target_id\'),this.firstChild.nodeValue)';
348             } else {
349                 action = 'mkws.limitQuery(\'' + pzIndex + '\', this.firstChild.nodeValue)';
350             }
351             acc.push('onclick="' + action + ';return false;">' + data[i].name + '</a>'
352                      + ' <span>' + data[i].freq + '</span>');
353             acc.push('</div>');
354         }
355         acc.push('</div>');
356     }
357
358
359     function my_onrecord(data, teamName) {
360         debug("record for " + teamName);
361         // FIXME: record is async!!
362         clearTimeout(m_paz.recordTimer);
363         // in case on_show was faster to redraw element
364         var detRecordDiv = document.getElementById('mkwsDet_'+data.recid);
365         if (detRecordDiv) return;
366         m_curDetRecData = data;
367         var recordDiv = document.getElementById('mkwsRecdiv_'+m_curDetRecData.recid);
368         var html = renderDetails(m_curDetRecData);
369         recordDiv.innerHTML += html;
370     }
371
372
373     function my_onbytarget(data, teamName) {
374         debug("target for " + teamName);
375         var targetDiv = document.getElementById("mkwsBytarget");
376         if (!targetDiv) {
377             // No mkwsTargets div.
378             return;
379         }
380
381         var table ='<table><thead><tr>' +
382             '<td>' + M('Target ID') + '</td>' +
383             '<td>' + M('Hits') + '</td>' +
384             '<td>' + M('Diags') + '</td>' +
385             '<td>' + M('Records') + '</td>' +
386             '<td>' + M('State') + '</td>' +
387             '</tr></thead><tbody>';
388
389         for (var i = 0; i < data.length; i++) {
390             table += "<tr><td>" + data[i].id +
391                 "</td><td>" + data[i].hits +
392                 "</td><td>" + data[i].diagnostic +
393                 "</td><td>" + data[i].records +
394                 "</td><td>" + data[i].state + "</td></tr>";
395         }
396
397         table += '</tbody></table>';
398         targetDiv.innerHTML = table;
399     }
400
401     ////////////////////////////////////////////////////////////////////////////////
402     ////////////////////////////////////////////////////////////////////////////////
403
404
405     // wait until the DOM is ready
406     function domReady ()
407     {
408         $('.mkwsSearchForm').each(function (i, obj) {
409             var node = this;
410             debug("adding class 'foo' to node " + node);
411             mkws.handle_node_with_team(node, function(tname) {
412                 $(node).submit(onFormSubmitEventHandler);
413             });
414         });
415
416         document.mkwsSearchForm.mkwsQuery.value = '';
417         if (document.mkwsSelect) {
418             if (document.mkwsSelect.mkwsSort)
419                 document.mkwsSelect.mkwsSort.onchange = onSelectDdChange;
420             if (document.mkwsSelect.mkwsPerpage)
421                 document.mkwsSelect.mkwsPerpage.onchange = onSelectDdChange;
422         }
423     }
424
425
426     // when search button pressed
427     function onFormSubmitEventHandler()
428     {
429         that.newSearch(document.mkwsSearchForm.mkwsQuery.value);
430         return false;
431     }
432
433
434     that.newSearch = function(query, sort, targets, windowid)
435     {
436         debug("newSearch: " + query);
437
438         if (mkws_config.use_service_proxy && !mkws.authenticated) {
439             alert("searching before authentication");
440             return;
441         }
442
443         m_filters = []
444         redraw_navi(); // ### should use windowid
445         resetPage(); // ### the globals it resents should be indexed by windowid
446         loadSelect(); // ### should use windowid
447         triggerSearch(query, sort, targets, windowid);
448         mkws.switchView('records'); // In case it's configured to start off as hidden
449         m_submitted = true;
450     }
451
452
453     function onSelectDdChange()
454     {
455         if (!m_submitted) return false;
456         resetPage();
457         loadSelect();
458         m_paz.show(0, m_recPerPage, m_sort);
459         return false;
460     }
461
462
463     function resetPage()
464     {
465         m_curPage = 1;
466         m_totalRec = 0;
467     }
468
469
470     function triggerSearch (query, sort, targets, windowid)
471     {
472         var pp2filter = "";
473         var pp2limit = "";
474
475         // Re-use previous query/sort if new ones are not specified
476         if (query) {
477             m_query = query;
478         }
479         if (sort) {
480             m_sort = sort;
481         }
482         if (targets) {
483             // ### should support multiple |-separated targets
484             m_filters.push({ id: targets, name: targets });
485         }
486
487         for (var i in m_filters) {
488             var filter = m_filters[i];
489             if (filter.id) {
490                 if (pp2filter)
491                     pp2filter += ",";
492                 if (filter.id.match(/^[a-z:]+[=~]/)) {
493                     debug("filter '" + filter.id + "' already begins with SETTING OP");
494                 } else {
495                     filter.id = 'pz:id=' + filter.id;
496                 }
497                 pp2filter += filter.id;
498             } else {
499                 if (pp2limit)
500                     pp2limit += ",";
501                 pp2limit += filter.field + "=" + filter.value.replace(/[\\|,]/g, '\\$&');
502             }
503         }
504
505         var params = {};
506         if (pp2limit) {
507             params.limit = pp2limit;
508         }
509         if (windowid) {
510             params.windowid = windowid;
511         }
512         debug("triggerSearch(" + m_query + "): filters = " + $.toJSON(m_filters) + ", pp2filter = " + pp2filter + ", params = " + $.toJSON(params));
513
514         m_paz.search(m_query, m_recPerPage, m_sort, pp2filter, undefined, params);
515     }
516
517
518     function loadSelect ()
519     {
520         if (document.mkwsSelect) {
521             if (document.mkwsSelect.mkwsSort)
522                 m_sort = document.mkwsSelect.mkwsSort.value;
523             if (document.mkwsSelect.mkwsPerpage)
524                 m_recPerPage = document.mkwsSelect.mkwsPerpage.value;
525         }
526     }
527
528
529     // limit the query after clicking the facet
530     mkws.limitQuery = function (field, value)
531     {
532         debug("limitQuery(field=" + field + ", value=" + value + ")");
533         m_filters.push({ field: field, value: value });
534         redraw_navi();
535         resetPage();
536         loadSelect();
537         triggerSearch();
538         return false;
539     }
540
541
542     // limit by target functions
543     mkws.limitTarget  = function (id, name)
544     {
545         debug("limitTarget(id=" + id + ", name=" + name + ")");
546         m_filters.push({ id: id, name: name });
547         redraw_navi();
548         resetPage();
549         loadSelect();
550         triggerSearch();
551         return false;
552     }
553
554
555     mkws.delimitQuery = function (field, value)
556     {
557         debug("delimitQuery(field=" + field + ", value=" + value + ")");
558         var newFilters = [];
559         for (var i in m_filters) {
560             var filter = m_filters[i];
561             if (filter.field &&
562                 field == filter.field &&
563                 value == filter.value) {
564                 debug("delimitTarget() removing filter " + $.toJSON(filter));
565             } else {
566                 debug("delimitTarget() keeping filter " + $.toJSON(filter));
567                 newFilters.push(filter);
568             }
569         }
570         m_filters = newFilters;
571
572         redraw_navi();
573         resetPage();
574         loadSelect();
575         triggerSearch();
576         return false;
577     }
578
579
580     mkws.delimitTarget = function (id)
581     {
582         debug("delimitTarget(id=" + id + ")");
583         var newFilters = [];
584         for (var i in m_filters) {
585             var filter = m_filters[i];
586             if (filter.id) {
587                 debug("delimitTarget() removing filter " + $.toJSON(filter));
588             } else {
589                 debug("delimitTarget() keeping filter " + $.toJSON(filter));
590                 newFilters.push(filter);
591             }
592         }
593         m_filters = newFilters;
594
595         redraw_navi();
596         resetPage();
597         loadSelect();
598         triggerSearch();
599         return false;
600     }
601
602
603     function redraw_navi ()
604     {
605         var navi = document.getElementById('mkwsNavi');
606         if (!navi) return;
607
608         var text = "";
609         for (var i in m_filters) {
610             if (text) {
611                 text += " | ";
612             }
613             var filter = m_filters[i];
614             if (filter.id) {
615                 text += 'Source: <a class="crossout" href="#" onclick="mkws.delimitTarget(' +
616                     "'" + filter.id + "'" + ');return false;">' + filter.name + '</a>';
617             } else {
618                 text += filter.field + ': <a class="crossout" href="#" onclick="mkws.delimitQuery(' +
619                     "'" + filter.field + "', '" + filter.value + "'" +
620                     ');return false;">' + filter.value + '</a>';
621             }
622         }
623
624         navi.innerHTML = text;
625     }
626
627
628     function drawPager (pagerDiv)
629     {
630         //client indexes pages from 1 but pz2 from 0
631         var onsides = 6;
632         var pages = Math.ceil(m_totalRec / m_recPerPage);
633
634         var firstClkbl = (m_curPage - onsides > 0)
635             ? m_curPage - onsides
636             : 1;
637
638         var lastClkbl = firstClkbl + 2*onsides < pages
639             ? firstClkbl + 2*onsides
640             : pages;
641
642         var prev = '<span id="mkwsPrev">&#60;&#60; ' + M('Prev') + '</span><b> | </b>';
643         if (m_curPage > 1)
644             prev = '<a href="#" id="mkwsPrev" onclick="mkws.pagerPrev();">'
645             +'&#60;&#60; ' + M('Prev') + '</a><b> | </b>';
646
647         var middle = '';
648         for(var i = firstClkbl; i <= lastClkbl; i++) {
649             var numLabel = i;
650             if(i == m_curPage)
651                 numLabel = '<b>' + i + '</b>';
652
653             middle += '<a href="#" onclick="mkws.showPage(' + i + ')"> '
654                 + numLabel + ' </a>';
655         }
656
657         var next = '<b> | </b><span id="mkwsNext">' + M('Next') + ' &#62;&#62;</span>';
658         if (pages - m_curPage > 0)
659             next = '<b> | </b><a href="#" id="mkwsNext" onclick="mkws.pagerNext()">'
660             + M('Next') + ' &#62;&#62;</a>';
661
662         var predots = '';
663         if (firstClkbl > 1)
664             predots = '...';
665
666         var postdots = '';
667         if (lastClkbl < pages)
668             postdots = '...';
669
670         pagerDiv.innerHTML += '<div style="float: clear">'
671             + prev + predots + middle + postdots + next + '</div>';
672     }
673
674
675     mkws.showPage = function (pageNum)
676     {
677         m_curPage = pageNum;
678         m_paz.showPage(m_curPage - 1);
679     }
680
681
682     // simple paging functions
683     mkws.pagerNext = function () {
684         if (m_totalRec - m_recPerPage*m_curPage > 0) {
685             m_paz.showNext();
686             m_curPage++;
687         }
688     }
689
690
691     mkws.pagerPrev = function () {
692         if (m_paz.showPrev() != false)
693             m_curPage--;
694     }
695
696
697     // switching view between targets and records
698     mkws.switchView = function(view) {
699         debug("switchView: " + view);
700
701         var targets = document.getElementById('mkwsTargets');
702         var results = document.getElementById('mkwsResults') ||
703             document.getElementById('mkwsRecords');
704         var blanket = document.getElementById('mkwsBlanket');
705         var motd    = document.getElementById('mkwsMOTD');
706
707         switch(view) {
708         case 'targets':
709             if (targets) targets.style.display = "block";
710             if (results) results.style.display = "none";
711             if (blanket) blanket.style.display = "none";
712             if (motd) motd.style.display = "none";
713             break;
714         case 'records':
715             if (targets) targets.style.display = "none";
716             if (results) results.style.display = "block";
717             if (blanket) blanket.style.display = "block";
718             if (motd) motd.style.display = "none";
719             break;
720         case 'none':
721             if (targets) targets.style.display = "none";
722             if (results) results.style.display = "none";
723             if (blanket) blanket.style.display = "none";
724             if (motd) motd.style.display = "none";
725             break;
726         default:
727             alert("Unknown view '" + view + "'");
728         }
729     }
730
731
732     // detailed record drawing
733     mkws.showDetails = function (prefixRecId, tname) {
734         var recId = prefixRecId.replace('mkwsRec_', '');
735         var oldRecId = m_curDetRecId;
736         m_curDetRecId = recId;
737
738         // remove current detailed view if any
739         var detRecordDiv = document.getElementById('mkwsDet_'+oldRecId);
740         // lovin DOM!
741         if (detRecordDiv)
742             detRecordDiv.parentNode.removeChild(detRecordDiv);
743
744         // if the same clicked, just hide
745         if (recId == oldRecId) {
746             m_curDetRecId = '';
747             m_curDetRecData = null;
748             return;
749         }
750         // request the record
751         var team = mkws.teams[tname];
752         if (!team) alert("no team '" + tname + "'");
753         team.m_paz.record(recId);
754     }
755
756
757     function renderDetails(data, marker)
758     {
759         var template = loadTemplate("Record");
760         var details = template(data);
761         return '<div class="details" id="mkwsDet_' + data.recid + '">' + details + '</div>';
762     }
763
764
765     function loadTemplate(name)
766     {
767         var template = mkws['template' + name];
768
769         if (template === undefined) {
770             var source = $("#mkwsTemplate" + name).html();
771             if (!source) {
772                 source = defaultTemplate(name);
773             }
774
775             template = Handlebars.compile(source);
776             debug("compiled template '" + name + "'");
777             mkws['template' + name] = template;
778         }
779
780         return template;
781     }
782
783
784     function defaultTemplate(name)
785     {
786         if (name === 'Record') {
787             return '\
788 <table>\
789   <tr>\
790     <th>{{translate "Title"}}</th>\
791     <td>\
792       {{md-title}}\
793       {{#if md-title-remainder}}\
794         ({{md-title-remainder}})\
795       {{/if}}\
796       {{#if md-title-responsibility}}\
797         <i>{{md-title-responsibility}}</i>\
798       {{/if}}\
799     </td>\
800   </tr>\
801   {{#if md-date}}\
802   <tr>\
803     <th>{{translate "Date"}}</th>\
804     <td>{{md-date}}</td>\
805   </tr>\
806   {{/if}}\
807   {{#if md-author}}\
808   <tr>\
809     <th>{{translate "Author"}}</th>\
810     <td>{{md-author}}</td>\
811   </tr>\
812   {{/if}}\
813   {{#if md-electronic-url}}\
814   <tr>\
815     <th>{{translate "URL"}}</th>\
816     <td>\
817       {{#each md-electronic-url}}\
818         <a href="{{this}}">{{this}}</a><br/>\
819       {{/each}}\
820     </td>\
821   </tr>\
822   {{/if}}\
823   {{#if-any location having="md-subject"}}\
824   <tr>\
825     <th>{{translate "Subject"}}</th>\
826     <td>\
827       {{#first location having="md-subject"}}\
828         {{#if md-subject}}\
829           {{md-subject}}\
830         {{/if}}\
831       {{/first}}\
832     </td>\
833   </tr>\
834   {{/if-any}}\
835   <tr>\
836     <th>{{translate "Locations"}}</th>\
837     <td>\
838       {{#commaList location}}\
839         {{attr "@name"}}{{/commaList}}\
840     </td>\
841   </tr>\
842 </table>\
843 ';
844         } else if (name === "Summary") {
845             return '\
846 <a href="#" id="{{_id}}" onclick="{{_onclick}}">\
847   <b>{{md-title}}</b>\
848 </a>\
849 {{#if md-title-remainder}}\
850   <span>{{md-title-remainder}}</span>\
851 {{/if}}\
852 {{#if md-title-responsibility}}\
853   <span><i>{{md-title-responsibility}}</i></span>\
854 {{/if}}\
855 ';
856         }
857
858         var s = "There is no default '" + name +"' template!";
859         alert(s);
860         return s;
861     }
862
863
864     /*
865      * All the HTML stuff to render the search forms and
866      * result pages.
867      */
868     function mkws_html_all() {
869         mkws_set_lang();
870         if (mkws_config.show_lang)
871             mkws_html_lang();
872
873         // For some reason, doing this programmatically results in
874         // document.mkwsSearchForm.mkwsQuery being undefined, hence the raw HTML.
875         debug("HTML search form");
876         $('.mkwsSearch').each(function (i, obj) {
877             var node = this;
878             mkws.handle_node_with_team(node, function(tname) {
879                 $(node).html('\
880 <form name="mkwsSearchForm" class="mkwsSearchForm mkwsTeam_' + tname + '" action="" >\
881   <input id="mkwsQuery" class="mkwsQuery mkwsTeam_' + tname + '" type="text" size="' + mkws_config.query_width + '" />\
882   <input id="mkwsButton" class="mkwsButton mkwsTeam_' + tname + '" type="submit" value="' + M('Search') + '" />\
883 </form>');
884             });
885         });
886
887         debug("HTML records");
888         // If the application has an #mkwsResults, populate it in the
889         // usual way. If not, assume that it's a smarter application that
890         // defines its own subcomponents:
891         //      #mkwsTermlists
892         //      #mkwsRanking
893         //      #mkwsPager
894         //      #mkwsNavi
895         //      #mkwsRecords
896         if ($("#mkwsResults").length) {
897             $("#mkwsResults").html('\
898 <table width="100%" border="0" cellpadding="6" cellspacing="0">\
899   <tr>\
900     <td id="mkwsTermlistContainer1" class="mkwsTermlistContainer1 mkwsTeam_AUTO" width="250" valign="top">\
901       <div id="mkwsTermlists" class="mkwsTermlists mkwsTeam_AUTO"></div>\
902     </td>\
903     <td id="mkwsMOTDContainer" valign="top">\
904       <div id="mkwsRanking" class="mkwsRanking mkwsTeam_AUTO"></div>\
905       <div id="mkwsPager" class="mkwsPager mkwsTeam_AUTO"></div>\
906       <div id="mkwsNavi" class="mkwsNavi mkwsTeam_AUTO"></div>\
907       <div id="mkwsRecords" class="mkwsRecords mkwsTeam_AUTO"></div>\
908     </td>\
909   </tr>\
910   <tr>\
911     <td colspan="2">\
912       <div id="mkwsTermlistContainer2" class="mkwsTermlistContainer2 mkwsTeam_AUTO"></div>\
913     </td>\
914   </tr>\
915 </table>');
916         }
917
918         if ($("#mkwsRanking").length) {
919             var ranking_data = '';
920             ranking_data += '<form name="mkwsSelect" id="mkwsSelect" action="" >';
921             if (mkws_config.show_sort) {
922                 ranking_data +=  M('Sort by') + ' ' + mkws_html_sort() + ' ';
923             }
924             if (mkws_config.show_perpage) {
925                 ranking_data += M('and show') + ' ' + mkws_html_perpage() + ' ' + M('per page') + '.';
926             }
927             ranking_data += '</form>';
928
929             $("#mkwsRanking").html(ranking_data);
930         }
931
932         mkws_html_switch();
933
934         if (mkws_config.responsive_design_width) {
935             // Responsive web design - change layout on the fly based on
936             // current screen width. Required for mobile devices.
937             $(window).resize(function(e) { mkws_resize_page() });
938             // initial check after page load
939             $(document).ready(function() { mkws_resize_page() });
940         }
941
942         domReady();
943
944         // on first page, hide the termlist
945         $(document).ready(function() { $("#mkwsTermlists").hide(); });
946         var motd = document.getElementById("mkwsMOTD");
947         var container = document.getElementById("mkwsMOTDContainer");
948         if (motd && container) {
949             // Move the MOTD from the provided element down into the container
950             motd.parentNode.removeChild(motd);
951             container.appendChild(motd);
952         }
953     }
954
955
956     // implement $.parseQuerystring() for parsing URL parameters
957     function parseQuerystring() {
958         var nvpair = {};
959         var qs = window.location.search.replace('?', '');
960         var pairs = qs.split('&');
961         $.each(pairs, function(i, v){
962             var pair = v.split('=');
963             nvpair[pair[0]] = pair[1];
964         });
965         return nvpair;
966     }
967
968
969     function mkws_set_lang()  {
970         var lang = parseQuerystring().lang || mkws_config.lang;
971         if (!lang || !mkws.locale_lang[lang]) {
972             mkws_config.lang = ""
973         } else {
974             mkws_config.lang = lang;
975         }
976
977         debug("Locale language: " + (mkws_config.lang ? mkws_config.lang : "none"));
978         return mkws_config.lang;
979     }
980
981
982     function mkws_html_switch() {
983         debug("HTML switch");
984
985         $("#mkwsSwitch").append($('<a href="#" id="mkwsSwitch_records" onclick="mkws.switchView(\'records\')">' + M('Records') + '</a>'));
986         $("#mkwsSwitch").append($("<span/>", { text: " | " }));
987         $("#mkwsSwitch").append($('<a href="#" id="mkwsSwitch_targets" onclick="mkws.switchView(\'targets\')">' + M('Targets') + '</a>'));
988
989         debug("HTML targets");
990         $("#mkwsTargets").html('\
991 <div id="mkwsBytarget" class="mkwsBytarget mkwsTeam_AUTO">\
992   No information available yet.\
993 </div>');
994         $("#mkwsTargets").css("display", "none");
995     }
996
997
998     function mkws_html_sort() {
999         debug("HTML sort, m_sort = '" + m_sort + "'");
1000         var sort_html = '<select name="mkwsSort" id="mkwsSort">';
1001
1002         for(var i = 0; i < mkws_config.sort_options.length; i++) {
1003             var opt = mkws_config.sort_options[i];
1004             var key = opt[0];
1005             var val = opt.length == 1 ? opt[0] : opt[1];
1006
1007             sort_html += '<option value="' + key + '"';
1008             if (m_sort == key || m_sort == val) {
1009                 sort_html += ' selected="selected"';
1010             }
1011             sort_html += '>' + M(val) + '</option>';
1012         }
1013         sort_html += '</select>';
1014
1015         return sort_html;
1016     }
1017
1018
1019     function mkws_html_perpage() {
1020         debug("HTML perpage");
1021         var perpage_html = '<select name="mkwsPerpage" id="mkwsPerpage">';
1022
1023         for(var i = 0; i < mkws_config.perpage_options.length; i++) {
1024             var key = mkws_config.perpage_options[i];
1025
1026             perpage_html += '<option value="' + key + '"';
1027             if (key == mkws_config.perpage_default) {
1028                 perpage_html += ' selected="selected"';
1029             }
1030             perpage_html += '>' + key + '</option>';
1031         }
1032         perpage_html += '</select>';
1033
1034         return perpage_html;
1035     }
1036
1037
1038     /* create locale language menu */
1039     function mkws_html_lang() {
1040         var lang_default = "en";
1041         var lang = mkws_config.lang || lang_default;
1042         var list = [];
1043
1044         /* display a list of configured languages, or all */
1045         var lang_options = mkws_config.lang_options || [];
1046         var hash = {};
1047         for (var i = 0; i < lang_options.length; i++) {
1048             hash[lang_options[i]] = 1;
1049         }
1050
1051         for (var k in mkws.locale_lang) {
1052             if (hash[k] == 1 || lang_options.length == 0)
1053                 list.push(k);
1054         }
1055
1056         // add english link
1057         if (lang_options.length == 0 || hash[lang_default] == 1)
1058             list.push(lang_default);
1059
1060         debug("Language menu for: " + list.join(", "));
1061
1062         /* the HTML part */
1063         var data = "";
1064         for(var i = 0; i < list.length; i++) {
1065             var l = list[i];
1066
1067             if (data)
1068                 data += ' | ';
1069
1070             if (lang == l) {
1071                 data += ' <span>' + l + '</span> ';
1072             } else {
1073                 data += ' <a href="?lang=' + l + '">' + l + '</a> '
1074             }
1075         }
1076
1077         $("#mkwsLang").html(data);
1078     }
1079
1080
1081     function mkws_resize_page () {
1082         var list = ["mkwsSwitch"];
1083
1084         var width = mkws_config.responsive_design_width;
1085         var parentId = $("#mkwsTermlists").parent().attr('id');
1086
1087         if ($(window).width() <= width &&
1088             parentId === "mkwsTermlistContainer1") {
1089             debug("changing from wide to narrow: " + $(window).width());
1090             $("#mkwsTermlists").appendTo($("#mkwsTermlistContainer2"));
1091             $("#mkwsTermlistContainer1").hide();
1092             $("#mkwsTermlistContainer2").show();
1093             for(var i = 0; i < list.length; i++) {
1094                 $("#" + list[i]).hide();
1095             }
1096         } else if ($(window).width() > width &&
1097                    parentId === "mkwsTermlistContainer2") {
1098             debug("changing from narrow to wide: " + $(window).width());
1099             $("#mkwsTermlists").appendTo($("#mkwsTermlistContainer1"));
1100             $("#mkwsTermlistContainer1").show();
1101             $("#mkwsTermlistContainer2").hide();
1102             for(var i = 0; i < list.length; i++) {
1103                 $("#" + list[i]).show();
1104             }
1105         }
1106     };
1107
1108
1109     /* locale */
1110     function M(word) {
1111         var lang = mkws_config.lang;
1112
1113         if (!lang || !mkws.locale_lang[lang])
1114             return word;
1115
1116         return mkws.locale_lang[lang][word] || word;
1117     }
1118     mkws.M = M; // so the Handlebars helper can use it
1119
1120
1121     // main
1122     (function() {
1123         try {
1124             mkws_html_all()
1125         }
1126
1127         catch (e) {
1128             mkws_config.error = e.message;
1129             // alert(e.message);
1130         }
1131     })();
1132
1133     // Bizarrely, 'that' is just an empty hash. All its state is in
1134     // the closure variables defined earlier in this function.
1135     return that;
1136 };
1137
1138
1139 /*
1140  * implement jQuery plugin $.pazpar2({})
1141  */
1142 function _mkws_jquery_plugin ($) {
1143     var debug_level = 1;
1144
1145     function debug (string) {
1146         if (!debug_level)
1147             return;
1148
1149         if (typeof console === "undefined" || typeof console.log === "undefined")
1150             return;
1151
1152         console.log("jquery.pazpar2: " + string);
1153     }
1154
1155     function init_popup(obj) {
1156         var config = obj ? obj : {};
1157
1158         var height = config.height || 760;
1159         var width = config.width || 880;
1160         var id_button = config.id_button || "input#mkwsButton";
1161         var id_popup = config.id_popup || "#mkwsPopup";
1162
1163         debug("popup height: " + height + ", width: " + width);
1164
1165         // make sure that jquery-ui was loaded afte jQuery core lib, e.g.:
1166         // <script src="http://code.jquery.com/ui/1.10.3/jquery-ui.min.js"></script>
1167         if (!$.ui) {
1168             debug("Error: jquery-ui.js is missing, did you include it after jQuery core in the HTML file?");
1169             return;
1170         }
1171
1172         $(id_popup).dialog({
1173             closeOnEscape: true,
1174             autoOpen: false,
1175             height: height,
1176             width: width,
1177             modal: true,
1178             resizable: true,
1179             buttons: {
1180                 Cancel: function() {
1181                     $(this).dialog("close");
1182                 }
1183             },
1184             close: function() { }
1185         });
1186
1187         $(id_button)
1188             .button()
1189             .click(function() {
1190                 $(id_popup).dialog("open");
1191             });
1192     };
1193
1194     $.extend({
1195
1196         // service-proxy or pazpar2
1197         pazpar2: function(config) {
1198             var id_popup = config.id_popup || "#mkwsPopup";
1199             id_popup = id_popup.replace(/^#/, "");
1200
1201             // simple layout
1202             var div = '\
1203 <div id="mkwsSwitch"></div>\
1204 <div id="mkwsLang"></div>\
1205 <div id="mkwsSearch"></div>\
1206 <div id="mkwsResults"></div>\
1207 <div id="mkwsTargets"></div>\
1208 <div id="mkwsStat"></div>';
1209
1210             // new table layout
1211             var table = '\
1212 <style type="text/css">\
1213   #mkwsTermlists div.facet {\
1214   float:left;\
1215   width: 30%;\
1216   margin: 0.3em;\
1217   }\
1218   #mkwsStat {\
1219   text-align: right;\
1220   }\
1221 </style>\
1222     \
1223 <table width="100%" border="0">\
1224   <tr>\
1225     <td>\
1226       <div id="mkwsSwitch"></div>\
1227       <div id="mkwsLang"></div>\
1228       <div id="mkwsSearch"></div>\
1229     </td>\
1230   </tr>\
1231   <tr>\
1232     <td>\
1233       <div style="height:500px; overflow: auto">\
1234         <div id="mkwsPager"></div>\
1235         <div id="mkwsNavi"></div>\
1236         <div id="mkwsRecords"></div>\
1237         <div id="mkwsTargets"></div>\
1238         <div id="mkwsRanking"></div>\
1239       </div>\
1240     </td>\
1241   </tr>\
1242   <tr>\
1243     <td>\
1244       <div style="height:300px; overflow: hidden">\
1245         <div id="mkwsTermlists"></div>\
1246       </div>\
1247     </td>\
1248   </tr>\
1249   <tr>\
1250     <td>\
1251       <div id="mkwsStat"></div>\
1252     </td>\
1253   </tr>\
1254 </table>';
1255
1256             var popup = '\
1257 <div id="mkwsSearch"></div>\
1258 <div id="' + id_popup + '">\
1259   <div id="mkwsSwitch"></div>\
1260   <div id="mkwsLang"></div>\
1261   <div id="mkwsResults"></div>\
1262   <div id="mkwsTargets"></div>\
1263   <div id="mkwsStat"></div>\
1264 </div>'
1265
1266             if (config && config.layout == 'div') {
1267                 debug("jquery plugin layout: div");
1268                 document.write(div);
1269             } else if (config && config.layout == 'popup') {
1270                 debug("jquery plugin layout: popup with id: " + id_popup);
1271                 document.write(popup);
1272                 $(document).ready(function() { init_popup(config); });
1273             } else {
1274                 debug("jquery plugin layout: table");
1275                 document.write(table);
1276             }
1277         }
1278     });
1279 };
1280
1281
1282 // wrapper to call _make_mkws_team() after page load
1283 (function (j) {
1284     function log(s) {
1285         if (typeof console === "undefined" || typeof console.log === "undefined") { /* ARGH!!! old IE */
1286             return;
1287         }
1288         console.log(s);
1289     }
1290
1291     // enable before page load, so we could call it before mkws() runs
1292     _mkws_jquery_plugin(j);
1293
1294     $(document).ready(function() {
1295         log("on load ready");
1296         default_mkws_config();
1297
1298         // Backwards compatibility: set new magic class names on any
1299         // elements that have the old magic IDs.
1300         var ids = [ "Switch", "Lang", "Search", "Pager", "Navi",
1301                     "Results", "Records", "Targets", "Ranking",
1302                     "Termlists", "Stat" ];
1303         for (var i = 0; i < ids.length; i++) {
1304             var id = 'mkws' + ids[i];
1305             var node = $('#' + id);
1306             if (node.attr('id')) {
1307                 node.addClass(id + " mkwsTeam_AUTO");
1308                 log("added magic classes to '" + node.attr('id') + "'");
1309             }
1310         }
1311
1312         // Find all nodes with class (NOT id) mkwsRecords, and
1313         // determine their team from the mkwsTeam_* class. So:
1314         //      <div class="mkwsRecords mkwsTeam_foo"/>
1315         $('.mkwsSearch, .mkwsResults, .mkwsRecords, .mkwsTermlists').each(function () {
1316             var node = this;
1317             mkws.handle_node_with_team(node, function(tname) {
1318                 if (mkws.teams[tname]) {
1319                     log("MKWS team '" + tname + "' already exists, skipping");
1320                 } else {
1321                     mkws.teams[tname] = _make_mkws_team(j, tname);
1322                     log("Made MKWS team '" + tname + "'");
1323                 }
1324             });
1325         });
1326
1327         if (mkws_config.use_service_proxy) {
1328             authenticate_session(mkws_config.service_proxy_auth,
1329                                  mkws_config.service_proxy_auth_domain,
1330                                  mkws_config.pazpar2_url);
1331         } else {
1332             // raw pp2
1333             run_auto_searches();
1334         }
1335     });
1336
1337
1338     mkws.handle_node_with_team = function(node, callback) {
1339         var classes = node.className;
1340         var list = classes.split(/\s+/)
1341         var tname;
1342         for (var i = 0; i < list.length; i++) {
1343             var cname = list[i];
1344             if (cname.match(/^mkwsTeam_/)) {
1345                 tname = cname.replace(/^mkwsTeam_/, '');
1346             }
1347         }
1348         if (!tname)
1349             tname = "AUTO";
1350         callback(tname);
1351     }
1352
1353
1354     function default_mkws_config() {
1355         /* default mkws config */
1356         var config_default = {
1357             use_service_proxy: true,
1358             pazpar2_url: "//mkws.indexdata.com/service-proxy/",
1359             service_proxy_auth: "//mkws.indexdata.com/service-proxy-auth",
1360             lang: "",
1361             sort_options: [["relevance"], ["title:1", "title"], ["date:0", "newest"], ["date:1", "oldest"]],
1362             perpage_options: [10, 20, 30, 50],
1363             sort_default: "relevance",
1364             perpage_default: 20,
1365             query_width: 50,
1366             show_lang: true,    /* show/hide language menu */
1367             show_sort: true,    /* show/hide sort menu */
1368             show_perpage: true,         /* show/hide perpage menu */
1369             lang_options: [],   /* display languages links for given languages, [] for all */
1370             facets: ["sources", "subjects", "authors"], /* display facets, in this order, [] for none */
1371             responsive_design_width: undefined, /* a page with less pixel width considered as narrow */
1372             debug_level: 1,     /* debug level for development: 0..2 */
1373
1374             dummy: "dummy"
1375         };
1376
1377         /* Set global debug_level flag early so that debug() works */
1378         if (typeof mkws_config.debug_level !== 'undefined') {
1379             mkws.debug_level = mkws_config.debug_level;
1380         } else if (typeof config_default.debug_level !== 'undefined') {
1381             mkws.debug_level = config_default.debug_level;
1382         }
1383
1384         // make sure the mkws_config is a valid hash
1385         if (!$.isPlainObject(mkws_config)) {
1386             debug("ERROR: mkws_config is not an JS object, ignore it....");
1387             mkws_config = {};
1388         }
1389
1390         /* override standard config values by function parameters */
1391         for (var k in config_default) {
1392             if (typeof mkws_config[k] === 'undefined')
1393                 mkws_config[k] = config_default[k];
1394             //debug("Set config: " + k + ' => ' + mkws_config[k]);
1395         }
1396     }
1397
1398
1399     /*
1400      * Run service-proxy authentication in background (after page load).
1401      * The username/password is configured in the apache config file
1402      * for the site.
1403      */
1404     function authenticate_session(auth_url, auth_domain, pp2_url) {
1405         console.log("Run service proxy auth URL: " + auth_url);
1406
1407         if (!auth_domain) {
1408             auth_domain = pp2_url.replace(/^(https?:)?\/\/(.*?)\/.*/, '$2');
1409             console.log("guessed auth_domain '" + auth_domain + "' from pp2_url '" + pp2_url + "'");
1410         }
1411
1412         var request = new pzHttpRequest(auth_url, function(err) {
1413             alert("HTTP call for authentication failed: " + err)
1414             return;
1415         }, auth_domain);
1416
1417         request.get(null, function(data) {
1418             if (!$.isXMLDoc(data)) {
1419                 alert("service proxy auth response document is not valid XML document, give up!");
1420                 return;
1421             }
1422             var status = $(data).find("status");
1423             if (status.text() != "OK") {
1424                 alert("service proxy auth repsonse status: " + status.text() + ", give up!");
1425                 return;
1426             }
1427
1428             console.log("Service proxy auth successfully done");
1429             mkws.authenticated = true;
1430             run_auto_searches();
1431         });
1432     }
1433
1434
1435     function run_auto_searches() {
1436         console.log("running auto searches");
1437
1438         for (var teamName in mkws.teams) {
1439             // ### should check mkwsTermlist as well, for facet-only teams
1440             var node = $('.mkwsRecords.mkwsTeam_' + teamName);
1441             var query = node.attr('autosearch');
1442             console.log("teamName '" + teamName + "', node=" + node + ", class='" + node.className + "', query=" + query);
1443
1444             if (query) {
1445                 var sort = node.attr('sort');
1446                 var targets = node.attr('targets');
1447                 var s = "running auto search: '" + query + "'";
1448                 if (teamName) s += " [teamName '" + teamName + "']";
1449                 if (sort) s += " sorted by '" + sort + "'";
1450                 if (targets) s += " in targets '" + targets + "'";
1451                 console.log(s);
1452                 var team = mkws.teams[teamName];
1453                 console.log($.toJSON(team));
1454                 team.newSearch(query, sort, targets, teamName);
1455             }
1456         }
1457     }
1458 })(jQuery);