Open-ILS/src/templates/opac/parts/header.tt2

   1 [%- USE money = format(l('$%.2f'));
   2     USE date;
   3     USE CGI = CGI_utf8;
   4     USE POSIX;
   5     USE HTML;
   6     SET DATE_FORMAT = l('%m/%d/%Y');
   7     PROCESS "opac/parts/config.tt2";
   8
   9     # Don't wrap in l() here; do that where this format string is actually used.
  10     SET HUMAN_NAME_FORMAT = '[_1] [_2] [_3] [_4] [_5]';
  11
  12     is_advanced = CGI.param("_adv").size;
  13     is_special = CGI.param("_special").size;
  14
  15     #variables to use to remove parameters via mkurk
  16     expert_search_parms = ['tag','subfield','term','_special'];
  17     general_search_parms = ['page','sort','query'];
  18
  19     # -----------------------------------------------------------------------------
  20     # mkurl( destination_page, params_to_set, params_to_clear )
  21     #
  22     # Current page, updated params:
  23     # mkurl('', {foo => 'bar', boo => 'baz'});
  24     #
  25     # New page, one param is a list:
  26     # mkurl('http://flarg.baz/squz', {foo => 'bar', boo => ['baz', 'faz']});
  27     #
  28     # New page, clear all existing params before applying new ones:
  29     # mkurl('/fuz/buster', {foo => 'bar', boo => 'baz'}, 1);
  30     #
  31     # Current page, clear 'some_param' from the existing params:
  32     # mkurl('', {foo => 'bar', boo => 'baz'}, ['some_param']);
  33     #
  34     # Current page to a named anchor 'copies'
  35     # mkurl('', {}, [], 'copies');
  36     MACRO mkurl(page, params, clear_params, named_anchor) BLOCK;
  37
  38         # clone the query string to avoid clobberation
  39         cgi = CGI.new(CGI.query_string);
  40
  41         # remove requested params
  42         IF clear_params.0; # array
  43             FOR p IN clear_params; cgi.delete(p); END;
  44         ELSIF clear_params;
  45             cgi.delete_all();
  46         END;
  47
  48         # x and y are artifacts of using <input type="image" /> tags
  49         # instead of true submit buttons, and their values are never used.
  50         cgi.delete('x', 'y');
  51
  52         # apply user params
  53         FOR k IN params.keys;
  54             encoded = [];
  55             max = params.$k.max;
  56
  57             # The following commented-out line can be fooled. Its replacement
  58             # below is what you really mean.
  59             # list = (params.$k.0 OR max == -1) ? params.$k : [params.$k];
  60             list = params.$k.list;
  61
  62             IF list.size == 0; NEXT; END;
  63             # CGI croaks on already-decoded strings.  force-encode to be safe.
  64             FOR p IN list; encoded.push(ctx.encode_utf8(p)); END;
  65             foo = cgi.param("-name", k, "-values", encoded);
  66         END;
  67
  68         # for url brevity, remove any params that have no value
  69         FOR p IN cgi.param;
  70             val = cgi.param(p);
  71             IF val == ''; cgi.delete(p); END;
  72
  73             # Delete POST vars unless we asked for them
  74             UNLESS CGI.url_param(p).defined OR params.defined(p);
  75                 cgi.delete(p);
  76             END;
  77         END;
  78
  79         final = named_anchor ? '#' _ named_anchor : '';
  80
  81         IF page;
  82             IF cgi.query_string;
  83                 page _ '?' _ cgi.query_string _ final;
  84             ELSE;
  85                 page _ final;
  86             END;
  87         ELSE;
  88             # staying on the current page
  89             cgi.url("-absolute" => 1, "-path" => 1, "-query" => 1) _ final;
  90         END;
  91     END;
  92
  93     # Whether we want Dojo or not may one day be a wholly distinct
  94     # concern from whether we want autosuggest, so let's get used to
  95     # defining that separately.
  96     want_dojo = 0;
  97
  98     use_autosuggest = ctx.get_cgf("opac.use_autosuggest");
  99
 100     IF use_autosuggest.enabled == "t";
 101         want_dojo = 1;
 102     END;
 103
 104     IF ctx.google_books_preview;
 105         want_dojo = 1;
 106     END;
 107
 108     IF ENV.OILS_NOVELIST_URL;
 109         want_dojo = 1;
 110     END;
 111 %]