source: trunk/gsdl/src/recpt/documentaction.cpp@ 11355

Last change on this file since 11355 was 11355, checked in by kjdon, 18 years ago

added usability macros back in, changed _tabtextsearch_ to _labelSearch_ (pulldown navbar)

  • Property svn:executable set to *
  • Property svn:keywords set to Author Date Id Revision
File size: 45.5 KB
Line 
1/**********************************************************************
2 *
3 * documentaction.cpp --
4 * Copyright (C) 1999 The New Zealand Digital Library Project
5 *
6 * A component of the Greenstone digital library software
7 * from the New Zealand Digital Library Project at the
8 * University of Waikato, New Zealand.
9 *
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 2 of the License, or
13 * (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 *
24 *********************************************************************/
25
26#include <string.h>
27
28#include "documentaction.h"
29#include "browsetools.h"
30#include "OIDtools.h"
31#include "querytools.h"
32#include "unitool.h"
33#include "gsdltools.h"
34#include "highlighttext.h"
35
36documentaction::documentaction () {
37 recpt = NULL;
38
39
40 // this action uses cgi variables "a", "d", "cl",
41 // "x", "gc", "gt", "gp", and "hl"
42 cgiarginfo arg_ainfo;
43 arg_ainfo.shortname = "a";
44 arg_ainfo.longname = "action";
45 arg_ainfo.multiplechar = true;
46 arg_ainfo.defaultstatus = cgiarginfo::weak;
47 arg_ainfo.argdefault = "p";
48 arg_ainfo.savedarginfo = cgiarginfo::must;
49 argsinfo.addarginfo (NULL, arg_ainfo);
50
51 arg_ainfo.shortname = "d";
52 arg_ainfo.longname = "document OID";
53 arg_ainfo.multiplechar = true;
54 arg_ainfo.defaultstatus = cgiarginfo::none;
55 arg_ainfo.argdefault = g_EmptyText;
56 arg_ainfo.savedarginfo = cgiarginfo::can;
57 argsinfo.addarginfo (NULL, arg_ainfo);
58
59 // whether or not a document should be retrieved from the
60 // library or the Web.
61 arg_ainfo.shortname = "il";
62 arg_ainfo.longname = "internal link preference";
63 arg_ainfo.multiplechar = false;
64 arg_ainfo.defaultstatus = cgiarginfo::weak;
65 arg_ainfo.argdefault = "l";
66 arg_ainfo.savedarginfo = cgiarginfo::must;
67 argsinfo.addarginfo (NULL, arg_ainfo);
68
69 arg_ainfo.shortname = "cl";
70 arg_ainfo.longname = "classification OID";
71 arg_ainfo.multiplechar = true;
72 arg_ainfo.defaultstatus = cgiarginfo::none;
73 arg_ainfo.argdefault = g_EmptyText;
74 arg_ainfo.savedarginfo = cgiarginfo::can;
75 argsinfo.addarginfo (NULL, arg_ainfo);
76
77 // in this action "gc" controls the expand/contract
78 // contents function
79 arg_ainfo.shortname = "gc";
80 arg_ainfo.longname = "expand contents";
81 arg_ainfo.multiplechar = false;
82 arg_ainfo.defaultstatus = cgiarginfo::weak;
83 arg_ainfo.argdefault = "0";
84 arg_ainfo.savedarginfo = cgiarginfo::can;
85 argsinfo.addarginfo (NULL, arg_ainfo);
86
87 // in this action "gt" controls the expand/contract
88 // text function 0 = not expanded, 1 = expand unless
89 // there are more than 10 sections containing text,
90 // 2 = expand all
91 arg_ainfo.shortname = "gt";
92 arg_ainfo.longname = "expand text";
93 arg_ainfo.multiplechar = false;
94 arg_ainfo.defaultstatus = cgiarginfo::weak;
95 arg_ainfo.argdefault = "0";
96 arg_ainfo.savedarginfo = cgiarginfo::can;
97 argsinfo.addarginfo (NULL, arg_ainfo);
98
99 // in this action "gp" is the "go to page" control
100 // used by the Book type of toc
101 arg_ainfo.shortname = "gp";
102 arg_ainfo.longname = "go to page";
103 arg_ainfo.multiplechar = true;
104 arg_ainfo.defaultstatus = cgiarginfo::none;
105 arg_ainfo.argdefault = g_EmptyText;
106 arg_ainfo.savedarginfo = cgiarginfo::mustnot;
107 argsinfo.addarginfo (NULL, arg_ainfo);
108
109 // in this action "hl" is the "highlighting on/
110 // highlighting off control ("hl" == "2" is a
111 // special case that forces phrase highlighting
112 // to be used even if the query string doesn't
113 // appear to be a phrase)
114 arg_ainfo.shortname = "hl";
115 arg_ainfo.longname = "highlighting on/off";
116 arg_ainfo.multiplechar = false;
117 arg_ainfo.defaultstatus = cgiarginfo::weak;
118 arg_ainfo.argdefault = "1";
119 arg_ainfo.savedarginfo = cgiarginfo::must;
120 argsinfo.addarginfo (NULL, arg_ainfo);
121
122 // "x" is 0 normally or 1 if page
123 // has been "detached"
124 arg_ainfo.shortname = "x";
125 arg_ainfo.longname = "detached page";
126 arg_ainfo.multiplechar = false;
127 arg_ainfo.defaultstatus = cgiarginfo::weak;
128 arg_ainfo.argdefault = "0";
129 arg_ainfo.savedarginfo = cgiarginfo::must;
130 argsinfo.addarginfo (NULL, arg_ainfo);
131
132 // "xx" is 0 normally or 1 if documents should be detached by default
133 arg_ainfo.shortname = "xx";
134 arg_ainfo.longname = "detach all doc pages";
135 arg_ainfo.multiplechar = false;
136 arg_ainfo.defaultstatus = cgiarginfo::weak;
137 arg_ainfo.argdefault = "0";
138 arg_ainfo.savedarginfo = cgiarginfo::must;
139 argsinfo.addarginfo (NULL, arg_ainfo);
140
141
142 // f arg is set to 1 if document is to
143 // be displayed in a frame
144 arg_ainfo.shortname = "f";
145 arg_ainfo.longname = "frame";
146 arg_ainfo.multiplechar = false;
147 arg_ainfo.defaultstatus = cgiarginfo::weak;
148 arg_ainfo.argdefault = "0";
149 arg_ainfo.savedarginfo = cgiarginfo::mustnot;
150 argsinfo.addarginfo (NULL, arg_ainfo);
151
152 // fc arg is "1" if search bar is to be included (i.e. if "fc" == 1
153 // the httpdocument macro will include "&f=1"
154 arg_ainfo.shortname = "fc";
155 arg_ainfo.longname = "include search bar";
156 arg_ainfo.multiplechar = false;
157 arg_ainfo.defaultstatus = cgiarginfo::weak;
158 arg_ainfo.argdefault = "1";
159 arg_ainfo.savedarginfo = cgiarginfo::must;
160 argsinfo.addarginfo (NULL, arg_ainfo);
161
162 //rd is whether a document will be displayed
163 //with a relevant document list
164 arg_ainfo.shortname = "rd";
165 arg_ainfo.longname = "include relevant documents";
166 arg_ainfo.multiplechar = false;
167 arg_ainfo.defaultstatus = cgiarginfo::weak;
168 arg_ainfo.argdefault = "0";
169 arg_ainfo.savedarginfo = cgiarginfo::must;
170 argsinfo.addarginfo (NULL, arg_ainfo);
171
172 //dm is the metadata that has been used for the datelist
173 arg_ainfo.shortname = "dm";
174 arg_ainfo.longname = "date metadata";
175 arg_ainfo.multiplechar = true;
176 arg_ainfo.defaultstatus = cgiarginfo::weak;
177 arg_ainfo.argdefault = g_EmptyText;
178 arg_ainfo.savedarginfo = cgiarginfo::must;
179 argsinfo.addarginfo (NULL, arg_ainfo);
180
181}
182
183documentaction::~documentaction () {
184}
185
186bool documentaction::check_cgiargs (cgiargsinfoclass &argsinfo, cgiargsclass &args,
187 recptprotolistclass *protos, ostream &logout) {
188
189 if(!args["d"].empty())
190 {
191 text_t docTop;
192 get_top(args["d"],docTop);
193
194 recptproto* collectproto = protos->getrecptproto (args["c"], logout);
195 if (collectproto != NULL)
196 {
197 ColInfoResponse_t *cinfo = recpt->get_collectinfo_ptr (collectproto, args["c"], logout);
198
199 if(cinfo->authenticate == "document")
200 {
201 // both are either commented out or uncomment and are empty
202 if (cinfo->public_documents.empty() && cinfo->private_documents.empty())
203 {
204 //deny everything
205 args["uan"] = "1";
206 args["ug"] = cinfo->auth_group;
207 }
208
209 // both public_documents and private_documents are turned on !
210 else if (!cinfo->public_documents.empty() && !cinfo->private_documents.empty())
211 {
212 //deny everything
213 args["uan"] = "1";
214 args["ug"] = cinfo->auth_group;
215 }
216
217 // if public_documents is set but this document isn't
218 // listed in it we need to authenticate
219 else if ((!cinfo->public_documents.empty()) &&
220 (cinfo->public_documents.find(docTop) == cinfo->public_documents.end()))
221 {
222 args["uan"] = "1";
223 args["ug"] = cinfo->auth_group;
224 }
225
226 // if private_documents is set and this document is
227 // listed in it we need to authenticate
228 else if ((!cinfo->private_documents.empty()) &&
229 (cinfo->private_documents.find(docTop) != cinfo->private_documents.end()))
230 {
231 args["uan"] = "1";
232 args["ug"] = cinfo->auth_group;
233 }
234
235 }
236 }
237 }
238 // check gc argument
239 int arg_gc = args.getintarg("gc");
240 if (arg_gc < 0 || arg_gc > 2) {
241 logout << "Warning: \"gc\" argument out of range (" << arg_gc << ")\n";
242 cgiarginfo *gcinfo = argsinfo.getarginfo ("gc");
243 if (gcinfo != NULL) args["gc"] = gcinfo->argdefault;
244 }
245
246 // check gt argument (may be either 0, 1 or 2)
247 int arg_gt = args.getintarg("gt");
248 if (arg_gt != 0 && arg_gt != 1 && arg_gt != 2) {
249 logout << "Warning: \"gt\" argument out of range (" << arg_gt << ")\n";
250 cgiarginfo *gtinfo = argsinfo.getarginfo ("gt");
251 if (gtinfo != NULL) args["gt"] = gtinfo->argdefault;
252 }
253
254 // check hl argument
255 int arg_hl = args.getintarg("hl");
256 if (arg_hl < 0 || arg_hl > 2) {
257 logout << "Warning: \"hl\" argument out of range (" << arg_hl << ")\n";
258 cgiarginfo *hlinfo = argsinfo.getarginfo ("hl");
259 if (hlinfo != NULL) args["hl"] = hlinfo->argdefault;
260 }
261
262 // check x argument
263 int arg_x = args.getintarg("x");
264 if (arg_x != 0 && arg_x != 1) {
265 logout << "Warning: \"x\" argument out of range (" << arg_x << ")\n";
266 cgiarginfo *xinfo = argsinfo.getarginfo ("x");
267 if (xinfo != NULL) args["x"] = xinfo->argdefault;
268 }
269
270 //checks whether rd arg is valid
271 int arg_rd = args.getintarg("rd");
272 if (arg_rd != 0 && arg_rd != 1) {
273 logout << "Warning: \"rd\" argument out of range (" << arg_rd << ")\n";
274 cgiarginfo *rdinfo = argsinfo.getarginfo ("rd");
275 if (rdinfo != NULL) args["rd"] = rdinfo->argdefault;
276 }
277
278
279 return true;
280}
281
282void documentaction::get_cgihead_info (cgiargsclass &args, recptprotolistclass *protos,
283 response_t &response,text_t &response_data,
284 ostream &logout) {
285
286 if ((args["il"] == "w") && (!args["d"].empty())) {
287
288 recptproto* collectproto = protos->getrecptproto (args["c"], logout);
289 if (collectproto != NULL) {
290
291 text_tset metadata;
292 FilterResponse_t filt_response;
293 text_t top;
294
295 metadata.insert ("URL");
296
297 // get metadata for parent document
298 get_top (args["d"], top);
299 if (get_info (top, args["c"], args["l"], metadata, false, collectproto, filt_response, logout)) {
300 text_t url = filt_response.docInfo[0].metadata["URL"].values[0];
301
302 response = location;
303 response_data = url;
304 return;
305 } else {
306 // error, no URL
307 logout << "Error: documentaction::get_cgihead_info failed on get_info" << endl;
308 }
309 }
310 }
311 response = content;
312 response_data = "text/html";
313}
314
315// set_widthtspace calculates how wide the spaces in the nav bar should
316// be and sets the appropriate macro
317void documentaction::set_spacemacro (displayclass &disp, FilterResponse_t &response,
318 bool has_search_button) {
319
320 text_t width;
321 int twidth, swidth, iwidth = 0;
322
323 int numc = response.docInfo.size();
324 ResultDocInfo_tarray::iterator dochere = response.docInfo.begin();
325 ResultDocInfo_tarray::iterator docend = response.docInfo.end();
326
327 disp.expandstring (displayclass::defaultpackage, "_pagewidth_", width);
328 twidth = width.getint();
329
330 if (has_search_button) {
331 disp.expandstring ("query", "_searchwidth_", width);
332 iwidth += width.getint();
333 } else {
334 numc -= 1;
335 }
336
337 while (dochere != docend) {
338 const text_t &title = (*dochere).metadata["Title"].values[0];
339
340 disp.expandstring ("document", "_" + title + "width_", width);
341 if (width == ("_" + title + "width_")) {
342 disp.expandstring ("document", "_defaultwidth_", width);
343 }
344 iwidth += width.getint();
345 ++dochere;
346 }
347
348 if ((twidth - iwidth) < numc) swidth = 2;
349 else {
350 swidth = twidth - iwidth;
351 if (numc > 0) swidth = swidth / numc;
352 }
353 disp.setmacro ("widthtspace", displayclass::defaultpackage, swidth);
354}
355
356// set_navbarmacros sets _navigationbar_ and _httpbrowseXXX_ macros
357// reponse contains 1 metadata field (Title)
358void documentaction::set_navbarmacros (displayclass &disp, FilterResponse_t &response,
359 bool has_search_button, cgiargsclass &args,
360 ColInfoResponse_t &cinfo) {
361
362
363 bool use_pulldown = false;
364 text_tmap::iterator it = cinfo.format.find("NavigationBar");
365 if (it != cinfo.format.end()) {
366 if (it->second == "pulldown") {
367 use_pulldown = true;
368 }
369 }
370
371 text_t topparent;
372 text_t &arg_d = args["d"];
373 text_t navigationbar = "<!-- Navigation Bar -->\n";
374
375 text_t date_extra = g_EmptyText;
376 get_top (args["cl"], topparent);
377 int numc = response.docInfo.size();
378 ResultDocInfo_tarray::iterator dochere = response.docInfo.begin();
379 ResultDocInfo_tarray::iterator docend = response.docInfo.end();
380
381 if (!use_pulldown) {
382 navigationbar += "_navtabsearch_";
383 if (has_search_button) {
384 if (args["a"] == "q") {
385 navigationbar += "(selected)";
386 }
387 }
388
389 if (has_search_button || numc == 0) navigationbar += "_navbarspacer_";
390
391 bool first = true;
392 while (dochere != docend) {
393 date_extra = g_EmptyText;
394 if (!first) navigationbar += "_navbarspacer_";
395
396 text_t title = (*dochere).metadata["Title"].values[0];
397 if (title == "Date") { // a date list
398 text_t date_meta = (*dochere).metadata["mdtype"].values[0];
399 if (date_meta == g_EmptyText) {
400 date_meta = "Date";
401 }
402 date_extra = "&amp;dm="+date_meta;
403 }
404 bool unknown = false;
405
406 // test if the _tabtext$FIELD_ macro is defined, which means
407 // this is a "known" metadata type and we have a translation for it
408 text_t tmpwidth;
409 text_t macroname="_tabtext" + title + "_";
410 disp.expandstring ("document", macroname, tmpwidth);
411 if (tmpwidth == macroname) // it wasn't expanded
412 unknown = true;
413
414 // if we're inside a document all the classification buttons should be enabled
415 text_t this_tab;
416 bool is_top;
417
418 is_top = ((*dochere).OID == topparent);
419 // set default text fragment
420 this_tab = "_navtab_(";
421
422 if (unknown) { // just give the field name
423 if (!arg_d.empty() || !is_top) {
424 // work out the link for this classifier, as it isn't the
425 // current page
426 this_tab += "_httpdocument_&amp;cl=" + (*dochere).OID
427 + date_extra;
428 }
429 this_tab += "," + title + "," + title;
430 } else { // use the macro for this field so we get translations
431 this_tab += "_httpbrowse" + title;
432 this_tab += "_,_tabtext" + title;
433 this_tab += "_,_textdescr" + title + "_";
434 }
435
436 if (arg_d.empty() && is_top) {
437 // don't link to this classifier as it is the current one
438 this_tab += ",selected";
439 }
440
441 // set the _httpbrowseXXX_ macro for this classification
442 // set the correct url for this link
443 disp.setmacro ("httpbrowse" + title, displayclass::defaultpackage, "_httpdocument_&amp;cl=" + (*dochere).OID+date_extra);
444
445
446 this_tab += ")";
447
448 navigationbar += this_tab;
449
450 ++dochere;
451 first = false;
452 }
453
454 if (!has_search_button && numc == 1) navigationbar += "_navbarspacer_";
455
456 navigationbar += "\n<!-- End of Navigation Bar -->\n";
457
458 } else {
459
460 navigationbar = "<form method=\"get\" name=\"navform\">\n";
461 navigationbar += "<select name=\"navbar\" onChange=\"location.href=";
462 navigationbar += "document.navform.navbar.options[document.navform.navbar.selectedIndex].value\">\n";
463
464 if (args["a"] != "q" && args["cl"].empty()) {
465 navigationbar += "<option value=\"\" selected>_textselectpage_</option>\n";
466 }
467
468 if (has_search_button) {
469 navigationbar += "<option value=\"_httpquery_\"";
470 if (args["a"] == "q") {
471 navigationbar += " selected";
472 }
473 navigationbar += ">_labelSearch_</option>\n";
474 }
475
476 while (dochere != docend) {
477 text_t title = dochere->metadata["Title"].values[0];
478 if (title == "Date") { // a date list
479 text_t date_meta = (*dochere).metadata["mdtype"].values[0];
480 if (date_meta == "") {
481 date_meta = "Date";
482 }
483 date_extra = "&amp;dm="+date_meta;
484 }
485
486 navigationbar += "<option value=\"_httpdocument_&amp;cl=" + dochere->OID +date_extra+ "\"";
487 if (topparent == dochere->OID) {
488 navigationbar += " selected";
489 }
490 navigationbar += ">" + title + "</option>\n";
491 ++dochere;
492 }
493
494 navigationbar += "</select>\n";
495 navigationbar += "</form>\n";
496 }
497
498 disp.setmacro ("navigationbar", displayclass::defaultpackage, navigationbar);
499}
500
501// define all the macros which might be used by other actions
502// to produce pages.
503void documentaction::define_external_macros (displayclass &disp, cgiargsclass &args,
504 recptprotolistclass *protos, ostream &logout) {
505
506 // define_external_macros sets the following macros:
507
508 // _navigationbar_ this is the navigation bar containing the search button
509 // and any classification buttons - it goes at the top of
510 // most pages. for now we're assuming that there'll always
511 // be a search button - we should probably check that there
512 // is a query action before making this assumption
513
514 // _httpbrowseXXX_ the http macros for each classification (i.e. if there
515 // are Title and Creator classifications _httpbrowseTitle_
516 // and _httpbrowseCreator_ will be set
517
518 // _widthtspace_ the width of the spacers between buttons in navigation
519 // bar
520
521 // _httpdocument_ has '&f=1' added if displaying document inside a frame
522
523 // _gsdltop_ macro to replace _top targets with
524
525 // _httppagehome_ overridden home url if html collections have own homepage
526
527 // _usability_ macros for remote usability reporting: if
528 // _usabinterface_ "format Usability [multi|textonly|stepwise]" is in
529 // _usabilityscript_ collect.cfg
530
531 // must have a valid collection server to continue
532
533 text_t &collection = args["c"];
534 if (collection.empty()) return;
535 recptproto *collectproto = protos->getrecptproto (collection, logout);
536 if (collectproto == NULL) return;
537
538 if (recpt == NULL) {
539 logout << "ERROR (documentaction::define_external_macros): This action does not contain\n"
540 << " information about any receptionists. The method set_receptionist was\n"
541 << " probably not called from the module which instantiated this action.\n";
542 return;
543 }
544
545 outconvertclass text_t2ascii;
546 comerror_t err;
547 InfoFiltersResponse_t filterinfo;
548 FilterResponse_t response;
549 text_tset metadata;
550
551 // get info on current collection and load up formatinfo
552 // I'd prefer not to do this here as we're getting
553 // collection info every time (and probably also getting
554 // it in other places some of the time) - One day I'll
555 // fix it ... maybe - Stefan.
556 ColInfoResponse_t cinfo;
557
558 collectproto->get_collectinfo (collection, cinfo, err, logout);
559 load_formatinfo (cinfo.format, args.getintarg("gt"));
560 // ColInfoResponse_t *cinfo = recpt->get_collectinfo_ptr (collectproto, collection, logout);
561 // if (cinfo == NULL) {
562 // logout << "ERROR (documentaction::define_external_macros): get_collectinfo_ptr returned NULL\n";
563 // return;
564 // }
565 //load_formatinfo (cinfo->format, args.getintarg("gt"));
566
567 if (formatinfo.DocumentUseHTML) {
568
569 // frame stuff
570 if (args["fc"] == "1") {
571 text_t httpdocument;
572 disp.expandstring (displayclass::defaultpackage, "_httpdocument_", httpdocument);
573 httpdocument += "&amp;f=1";
574 disp.setmacro ("httpdocument", displayclass::defaultpackage, httpdocument);
575 disp.setmacro ("gsdltop", displayclass::defaultpackage, "documenttop");
576 formatinfo.DocumentText = "[Text]";
577 }
578 text_tmap::iterator it = cinfo.format.find ("homepage");
579 if (it != cinfo.format.end()) {
580 text_t httppagehome;
581 if (get_link (args, protos, (*it).second, httppagehome, logout))
582 disp.setmacro ("httppagehome", displayclass::defaultpackage, httppagehome);
583 }
584 }
585
586 // don't want navigation bar if page is 'detached'
587 if (!args.getintarg("x")) {
588
589 collectproto->get_filterinfo (collection, filterinfo, err, logout);
590 if (err == noError) {
591 // check that there's a browse filter
592 if (filterinfo.filterNames.find ("BrowseFilter") != filterinfo.filterNames.end()) {
593
594 metadata.insert ("Title");
595 metadata.insert ("mdtype"); // in case there is a datelist
596 bool getParents = false;
597 get_children ("", collection, args["l"], metadata, getParents, collectproto, response, logout);
598
599 bool has_search_button = true;
600 collectproto->is_searchable(collection, has_search_button, err, logout);
601 if (err != noError) has_search_button = true;
602
603 // calculate width of spacers and set _widthtspace_ macro
604 if (args.getintarg("v") == 0) set_spacemacro (disp, response, has_search_button);
605
606 // set _navigationbar_ macro
607 set_navbarmacros (disp, response, has_search_button, args, cinfo);
608
609 }
610 } else {
611 logout << text_t2ascii
612 << "Error (documentaction::define_external_macros()) in call to get_filterinfo() "
613 << get_comerror_string (err);
614 }
615 }
616
617 // send feedback button and pages
618 text_tmap::iterator usability = cinfo.format.find("Usability");
619 if(usability!=cinfo.format.end()){
620 disp.setmacro("usability",displayclass::defaultpackage,"_usablink_");
621 disp.setmacro("usabinterface",displayclass::defaultpackage,("_usab"+(*usability).second+"_"));
622 disp.setmacro("usabilityscript", displayclass::defaultpackage, "_usabshowscript_");
623 }
624
625}
626
627bool documentaction::get_link (cgiargsclass &args, recptprotolistclass *protos,
628 const text_t &inlink, text_t &outlink, ostream &logout) {
629
630 FilterResponse_t response;
631 text_tset metadata;
632 metadata.insert ("section");
633
634 // check current collection first
635 recptproto *collectproto = protos->getrecptproto (args["c"], logout);
636
637 if (get_info (inlink, args["c"], args["l"], metadata, false, collectproto, response, logout)) {
638 if (!response.docInfo[0].metadata["section"].values[0].empty()) {
639 outlink = "_httpdocument_&amp;d=" + response.docInfo[0].metadata["section"].values[0];
640 return true;
641 }
642 }
643
644 // check all the other enabled collections
645
646 if (args["ccs"] == "1" && !args["cc"].empty()) {
647 text_tarray collections;
648 splitchar (args["cc"].begin(), args["cc"].end(), ',', collections);
649
650 text_tarray::const_iterator col_here = collections.begin();
651 text_tarray::const_iterator col_end = collections.end();
652
653 while (col_here != col_end) {
654
655 // don't need to check current collection again
656 if (*col_here == args["c"]) {++col_here; continue;}
657
658 collectproto = protos->getrecptproto (*col_here, logout);
659
660 if (get_info (inlink, *col_here, args["l"], metadata, false, collectproto, response, logout)) {
661 if (!response.docInfo[0].metadata["section"].values[0].empty()) {
662 outlink = "_httpdocument_&amp;c=" + *col_here + "&amp;d=" +
663 response.docInfo[0].metadata["section"].values[0];
664 return true;
665 }
666 }
667 ++col_here;
668 }
669 }
670 return false;
671}
672
673void documentaction::load_formatinfo (const text_tmap &colformat, int gt) {
674
675 formatinfo.clear();
676 text_tmap::const_iterator format_here = colformat.begin();
677 text_tmap::const_iterator format_end = colformat.end();
678
679 while (format_here != format_end) {
680 if (((*format_here).first == "DocumentImages") &&
681 ((*format_here).second == "true"))
682 formatinfo.DocumentImages = true;
683 else if (((*format_here).first == "DocumentTitles") &&
684 ((*format_here).second == "false"))
685 formatinfo.DocumentTitles = false;
686 else if ((*format_here).first == "DocumentHeading")
687 formatinfo.DocumentHeading = (*format_here).second;
688 else if (((*format_here).first == "DocumentContents") &&
689 ((*format_here).second == "false"))
690 formatinfo.DocumentContents = false;
691 else if (((*format_here).first == "DocumentArrowsBottom") &&
692 ((*format_here).second == "false"))
693 formatinfo.DocumentArrowsBottom = false;
694 else if (((*format_here).first == "DocumentArrowsTop") &&
695 ((*format_here).second == "true"))
696 formatinfo.DocumentArrowsTop = true;
697 else if ((*format_here).first == "DocumentButtons")
698 splitchar ((*format_here).second.begin(), (*format_here).second.end(),
699 '|', formatinfo.DocumentButtons);
700 else if ((*format_here).first == "DocumentText")
701 formatinfo.DocumentText = (*format_here).second;
702 else if ((*format_here).first == "RelatedDocuments")
703 formatinfo.RelatedDocuments = (*format_here).second;
704 else if (((*format_here).first == "DocumentUseHTML") &&
705 ((*format_here).second == "true"))
706 formatinfo.DocumentUseHTML = true;
707 else if (((*format_here).first == "AllowExtendedOptions") &&
708 ((*format_here).second == "true"))
709 formatinfo.AllowExtendedOptions = true;
710 else
711 formatinfo.formatstrings[(*format_here).first] = (*format_here).second;
712
713 ++format_here;
714 }
715
716 // never want arrows when text is expanded
717 if (gt) {
718 formatinfo.DocumentArrowsBottom = false;
719 formatinfo.DocumentArrowsTop = false;
720 }
721}
722
723
724// define all the macros which are related to pages generated
725// by this action. we also load up the formatinfo structure
726// here (it's used in do_action as well as here)
727void documentaction::define_internal_macros (displayclass &disp, cgiargsclass &args,
728 recptprotolistclass *protos, ostream &logout) {
729
730 // define_internal_macros sets the following macros:
731
732 // _pagetitle_ the title to be displayed at the top of the browser window
733
734 // _imagethispage_ the title image to be displayed at top right of page
735
736 // _navarrowsbottom_ this may be overridden to "" when format option
737 // DocumentArrowsBottom is false
738
739 // _navarrowstop_ likewise for DocumentArrowsTop
740
741 // _httpprevarrow_ links to next and previous sections of document - used
742 // _httpnextarrow_ by DocumentArrowsBottom
743
744 // _header_ the header macro is overridden if we're not at a top level
745 // classification to remove the title block
746
747 // _thisOID_ the OID (directory) of the current document - this corresponds
748 // to the archivedir metadata element
749
750 // must have a valid collection server to continue
751
752 text_t &collection = args["c"];
753 if (collection.empty()) return;
754 recptproto *collectproto = protos->getrecptproto (collection, logout);
755 if (collectproto == NULL) return;
756
757 text_tset metadata;
758 FilterResponse_t response;
759 text_t &arg_d = args["d"];
760 text_t &arg_cl = args["cl"];
761
762 if (!formatinfo.DocumentArrowsBottom) {
763 disp.setmacro("navarrowsbottom", "document", "");
764 } else if (!formatinfo.DocumentArrowsBottom) {
765 disp.setmacro("navarrowstop", "document", "");
766 }
767
768 if (!arg_d.empty() && (formatinfo.DocumentArrowsBottom || formatinfo.DocumentArrowsTop)) {
769 // set _httpprevarrow_ and _httpnextarrow_
770 set_arrow_macros (args, collectproto, disp, logout);
771 }
772
773 metadata.insert ("Title");
774
775 bool fulltoc = false;
776
777 if (args["cl"] != "search") {
778 // see if there's a FullTOC string
779 text_t cl_top, full_toc;
780 get_top (arg_cl, cl_top);
781 if (get_formatstring (cl_top, "FullTOC", formatinfo.formatstrings, full_toc))
782 if (full_toc == "true") fulltoc = true;
783 }
784
785 if (!arg_d.empty() && !fulltoc) {
786 // we're at document level
787
788 metadata.insert ("archivedir");
789
790 comerror_t err;
791 OptionValue_tarray options;
792 // we need to do the query again for the z3950proto
793 if (collectproto->get_protocol_name(err)=="z3950proto") {
794 OptionValue_t opt;
795 opt.name="Term";opt.value=args["q"];options.push_back(opt);
796 opt.name="QueryType";
797 opt.value=(args.getintarg("t")) ? "ranked" : "boolean";
798 options.push_back(opt);
799 opt.name="Index";opt.value=args["h"];options.push_back(opt);
800 }
801
802 //do not display relation metadata
803 disp.setmacro ("relateddoc", "document", "");
804
805 //if preferences indicate relevant docs should be collected
806 //and there is no particular format specified then display
807 //this default format.
808 if(args["rd"] == "1" && formatinfo.RelatedDocuments.empty()){
809
810 text_t relation = g_EmptyText; //string for displaying relation metadata
811
812 //call function in formattools.cpp which will return the text of the
813 //related documents in a vertical list. This is the default format.
814
815 if (get_info (arg_d, collection, args["l"], metadata, options, false, collectproto, response, logout))
816 relation += get_related_docs(collection, collectproto, response.docInfo[0], logout);
817
818 //set macro to be the related document string
819
820 disp.setmacro ("relateddoc", "document", relation);
821 }
822
823
824 // get metadata for this document and it's parents
825 if (get_info (arg_d, collection, args["l"], metadata, options,
826 true, collectproto, response, logout)) {
827
828 disp.setmacro ("header", "document", "_textheader_");
829
830 text_tarray pagetitlearray;
831 if (!response.docInfo[0].metadata["Title"].values[0].empty())
832 pagetitlearray.push_back (response.docInfo[0].metadata["Title"].values[0]);
833
834 if (args["gt"] != "1") {
835 MetadataInfo_t *parenttitle = response.docInfo[0].metadata["Title"].parent;
836 while (parenttitle != NULL) {
837 if (!parenttitle->values[0].empty())
838 pagetitlearray.push_back (parenttitle->values[0]);
839 parenttitle = parenttitle->parent;
840 }
841 }
842 reverse (pagetitlearray.begin(), pagetitlearray.end());
843 text_t pagetitle;
844 joinchar (pagetitlearray, ": ", pagetitle);
845 // remove html tags from the title
846 text_t::iterator open_tag=pagetitle.begin();
847 while (open_tag < pagetitle.end()) {
848 if (*open_tag == '<') {
849 text_t::iterator close_tag=open_tag+1;
850 text_t::iterator donechar=pagetitle.end();
851 while (close_tag < donechar) {
852 if (*close_tag == '>')
853 break;
854 ++close_tag;
855 }
856 if (close_tag < donechar) // remove this html tag, replace with space
857 *close_tag=' ';
858 pagetitle.erase(open_tag, close_tag);
859 }
860 ++open_tag;
861 }
862 disp.setmacro ("pagetitle", "document", pagetitle);
863
864 if (is_top (arg_d))
865 disp.setmacro ("thisOID", displayclass::defaultpackage, dm_safe(response.docInfo[0].metadata["archivedir"].values[0]));
866 else {
867 MetadataInfo_t *parentad = response.docInfo[0].metadata["archivedir"].parent;
868 text_t thisOID;
869 while (parentad != NULL) {
870 thisOID = parentad->values[0];
871 parentad = parentad->parent;
872 }
873 disp.setmacro ("thisOID", displayclass::defaultpackage, dm_safe(thisOID));
874 }
875 }
876 } else {
877 if (!arg_cl.empty()) {
878
879 // create the currentnodevalue macro - this is the value of the node
880 // in the hierarchy that is currently open.
881 if (get_info (arg_cl, collection, args["l"], metadata, false, collectproto, response, logout)) {
882 text_t &title = response.docInfo[0].metadata["Title"].values[0];
883 disp.setmacro ("currentnodevalue", "document", title);
884 }
885 // get metadata for top level classification
886 text_t classtop;
887 get_top (arg_cl, classtop);
888 metadata.insert ("childtype");
889 metadata.insert ("parameters");
890
891 if (get_info (classtop, collection, args["l"], metadata, false, collectproto, response, logout)) {
892
893 text_t &title = response.docInfo[0].metadata["Title"].values[0];
894 bool unknown = false;
895
896 // test if we have macros defined for this classification's
897 // metadata name - if not we'll just display the name
898 text_t tmp;
899 text_t macroname="_label" + title + "_";
900 disp.expandstring ("Global", macroname, tmp);
901 if (tmp == macroname) unknown = true; // it wasn't expanded
902
903 if (unknown) {
904 disp.setmacro ("pagetitle", "document", title);
905 } else {
906 disp.setmacro ("pagetitle", "document", macroname);
907 }
908 /* for ns4/image layout compatibility. when this is no longer
909 * needed, set imagethispage to _label+title+_ */
910 text_t titlemacroname="_titleimage" + title + "_";
911 disp.expandstring ("Global", titlemacroname, tmp);
912 if (tmp == titlemacroname) { /* _titleimage$META_ isn't defined */
913 if (!unknown) /* _label$META_ is defined */
914 disp.setmacro ("imagethispage", "document", macroname);
915 else
916 disp.setmacro ("imagethispage", "document", title);
917 } else { /* _titleimage$META_ is defined */
918 disp.setmacro ("imagethispage", "document", titlemacroname);
919 }
920
921 //if the document is not a document from a collection
922 //we must set the macro to be an empty string
923 disp.setmacro ("relateddoc", "document", "");
924
925 // Add macros specific to the Collage/Phind classifiers
926 text_t &childtype = response.docInfo[0].metadata["childtype"].values[0];
927 if (childtype == "Collage") {
928
929 text_t::iterator a = arg_cl.begin();
930 text_t::iterator b = arg_cl.end();
931
932 bool collage = true;
933 while (a != b) {
934 if (*a == 46) collage = false;
935 ++a;
936 }
937
938 if (collage) {
939 disp.setmacro ("collageclassifier", "document", "_collageapplet_");
940
941 // Next, macros that control the way the classifier is displayed
942 text_t parameters = response.docInfo[0].metadata["parameters"].values[0];
943
944 // extract key=value pairs and set as macros
945 text_t::iterator here = parameters.begin();
946 text_t::iterator end = parameters.end();
947 text_t key, value;
948
949 while (here != end) {
950 // get the next key and value pair
951 here = getdelimitstr (here, end, '=', key);
952 here = getdelimitstr (here, end, ';', value);
953
954 // store this key=value pair
955 if (!key.empty() && !value.empty()) {
956 disp.setmacro ("collage"+key, "document", value);
957 }
958 }
959
960
961 }
962 }
963
964 if (childtype == "Phind") {
965
966 // First, a macro to display the phind classifier
967 disp.setmacro ("phindclassifier", "document", "_phindapplet_");
968
969 // Next, macros that control the way the classifier is displayed
970 text_t parameters = response.docInfo[0].metadata["parameters"].values[0];
971
972 // extract key=value pairs and set as macros
973 text_t::iterator here = parameters.begin();
974 text_t::iterator end = parameters.end();
975 text_t key, value;
976
977 while (here != end) {
978 // get the next key and value pair
979 here = getdelimitstr (here, end, '=', key);
980 here = getdelimitstr (here, end, ';', value);
981
982 // store this key=value pair
983 if (!key.empty() && !value.empty()) {
984 disp.setmacro (key, "document", value);
985 }
986 }
987 } // end if (childtype == "Phind")
988 }
989 } // end if (!arg_cl.empty()) {
990 }
991}
992
993
994bool documentaction::do_action (cgiargsclass &args, recptprotolistclass *protos,
995 browsermapclass *browsers, displayclass &disp,
996 outconvertclass &outconvert, ostream &textout,
997 ostream &logout) {
998
999 // must have a valid collection server
1000 recptproto *collectproto = protos->getrecptproto (args["c"], logout);
1001 if (collectproto == NULL) {
1002 logout << "documentaction::do_action called with NULL collectproto\n";
1003 textout << outconvert << disp << "_document:header_\n"
1004 << "Error: Attempt to get document without setting collection\n"
1005 << "_document:footer_\n";
1006 } else {
1007
1008 text_t OID = args["d"];
1009 if (OID.empty()) OID = args["cl"];
1010 if (OID.empty()) {
1011 textout << outconvert << disp << "Document contains no data_document:footer_\n";
1012 return true;
1013 }
1014
1015
1016 if (formatinfo.DocumentUseHTML && !args["d"].empty()) {
1017
1018 if (args["f"] == "1") {
1019 textout << outconvert << disp
1020 << "<html><head></head>\n"
1021 << "<frameset rows=\"68,*\" noresize border=0>\n"
1022 << "<frame scrolling=no frameborder=0 src=\"_gwcgi_?_optsite_e=_compressedoptions_&a=p&p=nav\">\n"
1023 << "<frame name=\"documenttop\" frameborder=0 src=\"_gwcgi_?_optsite_e=_compressedoptions_&a=d&d="
1024 << args["d"] << "\">"
1025 << "<noframes>\n"
1026 << "<p>You must have a frame enabled browser to view this.</p>\n"
1027 << "</noframes>\n"
1028 << "</frameset>\n"
1029 << "</html>\n";
1030 } else {
1031 output_document (OID, args, collectproto, browsers, disp, outconvert, textout, logout);
1032 }
1033 return true;
1034 }
1035
1036
1037 textout << outconvert << disp << "_document:header_\n"
1038 << "_document:content_\n";
1039
1040 // output the table of contents
1041 output_toc (args, browsers, formatinfo, collectproto,
1042 disp, outconvert, textout, logout);
1043
1044 if (formatinfo.DocumentArrowsTop && !args["d"].empty()) {
1045 textout << outconvert << disp << "_document:navarrowstop_\n";
1046 }
1047
1048 //output the related documents (may be the empty string)
1049 //will not output the docs if a format string is specified
1050 textout << outconvert << disp << "_document:relateddoc_\n";
1051
1052 // output the document text
1053 if (!args["d"].empty()) {
1054 textout << outconvert << "<p>\n";
1055 output_document (OID, args, collectproto, browsers, disp, outconvert, textout, logout);
1056 }
1057
1058 textout << outconvert << disp << "_document:footer_\n";
1059 }
1060 return true;
1061}
1062
1063void documentaction::output_text (ResultDocInfo_t &docinfo, format_t *formatlistptr,
1064 const TermInfo_tarray &terminfo, const text_t &OID,
1065 bool highlight, int hastxt, int wanttext,
1066 text_t &collection, recptproto *collectproto,
1067 browsermapclass *browsers, displayclass &disp,
1068 outconvertclass &outconvert, ostream &textout,
1069 ostream &logout, cgiargsclass &args) {
1070
1071 DocumentRequest_t docrequest;
1072 DocumentResponse_t docresponse;
1073 comerror_t err;
1074 if (hastxt == 1) {
1075
1076 if (wanttext) {
1077 // get the text
1078 docrequest.OID = OID;
1079 collectproto->get_document (collection, docrequest, docresponse, err, logout);
1080
1081 // cut down on overhead by not using formattools if we only want the text
1082 // (wanttext will equal 2 if we want text and other stuff too)
1083 if (wanttext == 1)
1084 if (highlight) {
1085 highlighttext(docresponse.doc, args, terminfo, disp, outconvert, textout);
1086 } else {
1087 textout << outconvert << disp << docresponse.doc;
1088 }
1089 }
1090
1091 if (wanttext != 1) {
1092 text_tmap options;
1093 options["text"] = docresponse.doc;
1094
1095 if (formatinfo.AllowExtendedOptions) {
1096 load_extended_options(options, args, browsers, formatinfo,
1097 collectproto, disp, outconvert, logout);
1098 }
1099
1100 text_t doctext
1101 = get_formatted_string (collection, collectproto, docinfo, disp,
1102 formatlistptr, options, logout);
1103
1104 if (highlight) {
1105 highlighttext(doctext, args, terminfo, disp, outconvert, textout);
1106 } else {
1107 textout << outconvert << disp << doctext;
1108 }
1109 }
1110 }
1111}
1112
1113
1114void documentaction::output_document (const text_t &OID, cgiargsclass &args,
1115 recptproto *collectproto, browsermapclass *browsers,
1116 displayclass &disp, outconvertclass &outconvert,
1117 ostream &textout, ostream &logout) {
1118 FilterResponse_t inforesponse;
1119 FilterResponse_t queryresponse;
1120 text_tset metadata;
1121 bool getParents = false;
1122 bool highlight = false;
1123 int wanttext = 0;
1124 int arg_gt = args.getintarg("gt");
1125 text_t &collection = args["c"];
1126
1127 // if we have a query string and highlighting is turned on we need
1128 // to redo the query to get the terms for highlighting
1129
1130 if (!args["q"].empty() && args.getintarg("hl")) {
1131
1132 ColInfoResponse_t *cinfo = recpt->get_collectinfo_ptr (collectproto, collection, logout);
1133 bool segment = false;
1134 if (cinfo != NULL) {
1135 segment = cinfo->isSegmented;
1136 }
1137 FilterRequest_t request;
1138 comerror_t err;
1139 request.filterResultOptions = FRmatchTerms;
1140 text_t formattedstring = args["q"];
1141 format_querystring (formattedstring, args.getintarg("b"), segment);
1142 set_queryfilter_options (request, formattedstring, args);
1143 args["q"] = formattedstring; // need to set this here for phrase
1144 // highlighting, where we look at the querystring
1145 collectproto->filter (args["c"], request, queryresponse, err, logout);
1146 if (err != noError) {
1147 outconvertclass text_t2ascii;
1148 logout << text_t2ascii
1149 << "documentaction::output_document: call to QueryFilter failed "
1150 << "for " << args["c"] << " collection (" << get_comerror_string (err) << ")\n";
1151 highlight = false;
1152 } else {
1153 highlight = true;
1154 }
1155 }
1156
1157 format_t *formatlistptr = new format_t();
1158 parse_formatstring (formatinfo.DocumentText, formatlistptr, metadata, getParents);
1159
1160 metadata.insert ("hastxt");
1161 metadata.insert ("haschildren");
1162
1163 if (formatinfo.DocumentText == "[Text]")
1164 wanttext = 1;
1165 else {
1166 char *docformat = formatinfo.DocumentText.getcstr();
1167 if (strstr (docformat, "[Text]") != NULL)
1168 wanttext = 2;
1169 delete []docformat;
1170 }
1171
1172 textout << outconvert << "<div class=\"documenttext\">\n";
1173
1174 if (get_info (OID, collection, args["l"], metadata, getParents, collectproto, inforesponse, logout)) {
1175 int hastxt = inforesponse.docInfo[0].metadata["hastxt"].values[0].getint();
1176 int haschildren = inforesponse.docInfo[0].metadata["haschildren"].values[0].getint();
1177
1178 if (arg_gt == 0) {
1179 output_text (inforesponse.docInfo[0], formatlistptr, queryresponse.termInfo,
1180 OID, highlight, hastxt, wanttext, collection, collectproto,
1181 browsers, disp, outconvert, textout, logout, args);
1182
1183 } else {
1184
1185 ResultDocInfo_t thisdocinfo = inforesponse.docInfo[0];
1186
1187 // text is to be expanded
1188 text_t exOID = OID;
1189 if (haschildren != 1) exOID = get_parent (OID);
1190 if (exOID.empty()) exOID = OID;
1191
1192 // if we're not in a document (i.e. we're in a top level classification)
1193 // we need to pass "is_classify = true" to get_contents so that it
1194 // doesn't recurse all the way through each document in the classification
1195 bool is_classify = false;
1196 if (args["d"].empty()) is_classify = true;
1197
1198 get_contents (exOID, is_classify, metadata, collection, args["l"],
1199 collectproto, inforesponse, logout);
1200
1201 ResultDocInfo_tarray::iterator sechere = inforesponse.docInfo.begin();
1202 ResultDocInfo_tarray::iterator secend = inforesponse.docInfo.end();
1203
1204 if (arg_gt == 1) {
1205 // check if there are more than 10 sections containing text to be expanded -
1206 // if there are output warning message - this isn't a great way to do this
1207 // since the sections may be very large or very small - one day I'll fix it
1208 // -- Stefan.
1209 int seccount = 0;
1210 while (sechere != secend) {
1211 int shastxt = (*sechere).metadata["hastxt"].values[0].getint();
1212 if (shastxt == 1) ++seccount;
1213 if (seccount > 10) break;
1214 ++sechere;
1215 }
1216 if (seccount > 10) {
1217 // more than 10 sections so output warning message and text
1218 // for current section only
1219 textout << outconvert << disp << "<div class=\"warning\">_document:textltwarning_</div>\n";
1220
1221 output_text (thisdocinfo, formatlistptr, queryresponse.termInfo,
1222 OID, highlight, hastxt, wanttext, collection,
1223 collectproto, browsers, disp, outconvert, textout, logout, args);
1224
1225 }
1226 else arg_gt = 2;
1227 }
1228
1229 if (arg_gt == 2) {
1230 // get the text for each section
1231 sechere = inforesponse.docInfo.begin();
1232 int count = 0;
1233 while (sechere != secend) {
1234 textout << outconvert << disp << "\n<p><a name=" << (*sechere).OID << "></a>\n";
1235
1236 int shastxt = (*sechere).metadata["hastxt"].values[0].getint();
1237
1238 output_text (*sechere, formatlistptr, queryresponse.termInfo,
1239 (*sechere).OID, highlight, shastxt, wanttext, collection,
1240 collectproto, browsers, disp, outconvert, textout, logout, args);
1241 ++count;
1242 ++sechere;
1243 }
1244 }
1245 }
1246 }
1247 textout << outconvert << "</div>\n";
1248 delete formatlistptr;
1249}
1250
1251void documentaction::set_arrow_macros (cgiargsclass &args, recptproto *collectproto,
1252 displayclass &disp, ostream &logout) {
1253
1254 text_tset metadata;
1255 FilterResponse_t response;
1256 FilterResponse_t presponse;
1257
1258 int haschildren = 0;
1259 text_tarray next_siblings;
1260 text_t previous_sibling;
1261 text_t &arg_d = args["d"];
1262
1263 // get info on current section
1264 metadata.insert("haschildren");
1265 if (!get_info(arg_d, args["c"], args["l"], metadata, false, collectproto, response, logout)) {
1266 logout << "error 1 in documentaction::set_arrow_macros\n";
1267 return;
1268 }
1269 haschildren = response.docInfo[0].metadata["haschildren"].values[0].getint();
1270
1271 // get OIDs of next and previous siblings of current section and
1272 // all it's parents
1273 int parentcount = countchar(arg_d.begin(), arg_d.end(), '.');
1274 text_t thisoid = arg_d;
1275 while (parentcount > 0) {
1276 get_children (get_parent(thisoid), args["c"], args["l"], metadata, false,
1277 collectproto, response, logout);
1278 ResultDocInfo_tarray::iterator this_sibling = response.docInfo.begin();
1279 ResultDocInfo_tarray::iterator last_sibling = response.docInfo.end();
1280 bool first = true;
1281 while (this_sibling != last_sibling) {
1282 if ((*this_sibling).OID == thisoid) {
1283 if (!first && next_siblings.empty()) {
1284 previous_sibling = (*(this_sibling-1)).OID;
1285 int section_has_children = (*(this_sibling-1)).metadata["haschildren"].values[0].getint();
1286 // if previous sibling has children we need to recurse
1287 // down to the last descendant
1288 while (section_has_children) {
1289 get_children (previous_sibling, args["c"], args["l"], metadata, false,
1290 collectproto, presponse, logout);
1291 if (!presponse.docInfo.empty()) {
1292 ResultDocInfo_tarray::iterator it = presponse.docInfo.end() - 1;
1293 previous_sibling = (*it).OID;
1294 section_has_children = (*it).metadata["haschildren"].values[0].getint();
1295 } else {
1296 section_has_children = 0; // this should never happen
1297 }
1298 }
1299 }
1300
1301 if ((this_sibling+1) != last_sibling) {
1302 next_siblings.push_back((*(this_sibling+1)).OID);
1303 } else {
1304 next_siblings.push_back("");
1305 }
1306 break;
1307 }
1308 ++this_sibling;
1309 first = false;
1310 }
1311 thisoid = get_parent(thisoid);
1312 --parentcount;
1313 }
1314
1315 // work out values for next link
1316 if (haschildren) {
1317 disp.setmacro ("httpnextarrow", "document", "_httpdocument_&amp;cl=" + args["cl"] +
1318 "&amp;d=" + arg_d + ".fc");
1319 } else {
1320 text_tarray::const_iterator h = next_siblings.begin();
1321 text_tarray::const_iterator e = next_siblings.end();
1322 while (h != e) {
1323 if (!(*h).empty()) {
1324 disp.setmacro ("httpnextarrow", "document", "_httpdocument_&amp;cl=" + args["cl"] +
1325 "&amp;d=" + *h);
1326 break;
1327 }
1328 ++h;
1329 }
1330 }
1331
1332 // work out value for previous link
1333 if (!previous_sibling.empty()) {
1334 disp.setmacro ("httpprevarrow", "document", "_httpdocument_&amp;cl=" + args["cl"] +
1335 "&amp;d=" + previous_sibling);
1336 } else {
1337 if (countchar(arg_d.begin(), arg_d.end(), '.')) {
1338 disp.setmacro ("httpprevarrow", "document", "_httpdocument_&amp;cl=" + args["cl"] +
1339 "&amp;d=" + get_parent(arg_d));
1340 }
1341 }
1342}
Note: See TracBrowser for help on using the repository browser.