cgi-bin/cview/map.pl

   1
   2 use strict;
   3 use warnings;
   4
   5 use CXGN::Page;
   6 use CXGN::DB::Connection;
   7
   8 use CatalystX::GlobalContext qw( $c );
   9
  10 my $page = CXGN::Page->new();
  11 my ( $map_id, $map_version_id, $size, $hilite, $physical, $force, $map_items ) =
  12   $page->get_encoded_arguments(
  13       qw(
  14          map_id
  15          map_version_id
  16          size
  17          hilite
  18          physical
  19          force
  20          map_items
  21         ));
  22
  23 my $dbh = CXGN::DB::Connection->new;
  24
  25 my $referer = $c->request->referer;
  26
  27 $c->forward_to_mason_view(
  28     '/cview/map/index.mas',
  29     dbh            => $dbh,
  30     map_version_id => $map_version_id,
  31     map_id         => $map_id,
  32     hilite         => $hilite,
  33     physical       => $physical,
  34     size           => $size,
  35     referer        => $referer,
  36     force          => $force,
  37     map_items      => $map_items,
  38     tempdir        => $c->tempfiles_subdir('cview'),
  39     basepath       => $c->path_to(),
  40 );
  41
  42 =head1 NAME
  43
  44 map.pl - display top level map web page
  45
  46 =head1 DESCRIPTION
  47
  48 A script that displays a web page with an overview graph of a map, an abstract and some statistics about the map, using map_id or map_version_id as a parameter.
  49
  50 Older versions of this script accepted other parameters, such as the mysterious legacy_id or the more cumbersome map short name. Support for these has been scrapped. Sorry!
  51
  52 As well, older versions supported a parameter called "physical", which then, through some inextricable hack displayed a physical map. This parameter has been deprecated but is still supported.
  53
  54 On the other hand, a new parameter was added, called "force", which, if set to true, will force the cached images and stats to be re-calculated. Normally, the map overview image and associated image map and the map statistics are cached.
  55
  56 Parameters summary:
  57
  58 =over 15
  59
  60 =item map_id
  61
  62 The map_id of the map to display.
  63
  64 =item map_version_id
  65
  66 the map_version_id of the map to display. Note that map_id and map_version_id are mutually exclusive.
  67
  68 =item hilite
  69
  70 a space separated, url-encoded string that gives the markers to be highlighted.
  71
  72 =item size
  73
  74 the size of the map to display. 0 denotes the standard size (smallest), 10 denotes the largest size.
  75
  76 =item force
  77
  78 if set to true, force the image and map stats caches to be re-calculated.
  79
  80 =back
  81
  82 =head1 AUTHOR(S)
  83
  84 Early versions were written by Robert Ahrens, with later additions by Lukas Mueller and John Binns <zombieite@gmail.com>.
  85
  86 Currently maintained by Lukas Mueller <lam87@cornell.edu>.
  87
  88 =cut