[Bio] / SeedViewer / seedviewer.cgi Repository:
ViewVC logotype

Diff of /SeedViewer/seedviewer.cgi

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4, Wed Nov 7 17:09:12 2007 UTC revision 1.15, Sun Mar 23 16:04:27 2008 UTC
# Line 1  Line 1 
1  use strict;  use strict;
2  use warnings;  use warnings;
3    no warnings 'once';
4    
5  use DBMaster;  use DBMaster;
6  use WebApplication;  use WebApplication;
7  use WebMenu;  use WebMenu;
8  use WebLayout;  use WebLayout;
9    use Tracer;
10    use FIGRules;
11    use FIG_Config;
12    
13  eval {  eval {
14      &main;      &main;
# Line 28  Line 32 
32    
33      # initialize cgi      # initialize cgi
34      my $cgi = new CGI();      my $cgi = new CGI();
35        ETracing($cgi);
     # initialize db-master  
     my $dbmaster = DBMaster->new(-database => 'WebAppBackend');  
36    
37      # initialize layout      # initialize layout
38      my $layout = WebLayout->new('./Html/SeedViewer.tmpl');      # Use the template file for the current mode-- NMPDR or SEED
39      $layout->add_css('./Html/default.css');      my $templateFile = (FIGRules::nmpdr_mode($cgi) ? './Html/NmpdrViewer.tmpl' : './Html/SeedViewer.tmpl');
40        Trace("Template file is $templateFile") if T(3);
41        my $layout = WebLayout->new($templateFile);
42        # Choose the body/header style sheet according to the mode.
43        if (FIGRules::nmpdr_mode($cgi)) {
44            # NMPDR mode.
45            $layout->add_css('./Html/nmpdrviewer.css');
46            # Show the NMPDR version in the header.
47            $layout->set_variable(VERSION => "Sprout version $FIG_Config::nmpdr_version on $ENV{HTTP_HOST}.");
48        } else {
49            # SEED mode.
50      $layout->add_css('./Html/seedviewer.css');      $layout->add_css('./Html/seedviewer.css');
51       }
52        # Add the common styles.
53        $layout->add_css('./Html/commonviewer.css');
54        # Add the normal style.
55        $layout->add_css('./Html/default.css');
56        # add site meter
57        my $site_meter = $FIG_Config::site_meter;
58        if ($site_meter) {
59            $layout->add_javascript("http://s20.sitemeter.com/js/counter.js?site=s20nmpdr");
60        }
61    
62      # build menu      # build menu
63      my $menu = WebMenu->new();      my $menu;
64        $menu = WebMenu->new();
65                if (FIGRules::nmpdr_mode($cgi)) {
66      $menu->add_category('»Navigate', '?page=Home');      $menu->add_category('»Navigate', '?page=Home');
67      $menu->add_entry('»Navigate', 'Search', '?page=Home');          $menu->add_entry('»Navigate', 'NMPDR home', "$FIG_Config::nmpdr_site_url/index.php");
68      $menu->add_entry('»Navigate', 'Subsystems', '?page=SubsystemSelect');          $menu->add_entry('»Navigate', 'Organisms', "$FIG_Config::nmpdr_site_url/content/organisms.php");
69            $menu->add_entry('»Navigate', 'Subsystems', "$FIG_Config::nmpdr_site_url/content/subsystems.php");
70            $menu->add_entry('»Navigate', 'FigFams', '?page=FigFamViewer');
71        } else {
72        $menu->add_category('»Navigate', '?page=Home');
73        $menu->add_entry('»Navigate', 'Startpage', '?page=Home');
74      $menu->add_entry('»Navigate', 'Organisms', '?page=OrganismSelect');      $menu->add_entry('»Navigate', 'Organisms', '?page=OrganismSelect');
75        $menu->add_entry('»Navigate', 'Subsystems', '?page=SubsystemSelect');
76        $menu->add_entry('»Navigate', 'FigFams', '?page=FigFamViewer');
77        $menu->add_entry('&raquo;Navigate', '<a>Jump to Feature by</a>');
78        $menu->add_entry('&raquo;Navigate', '&nbsp;&nbsp;BLAST Search', '?page=BlastRun');
79        $menu->add_entry('&raquo;Navigate', "<form style='margin: 0px 0px 0px 6px;'>&nbsp;&nbsp;ID&nbsp;&nbsp;<input type='text' name='pattern' style='border: 1px solid #5da668; width: 100px; height: 17px; margin-top: 2px; font-size: 11px;'><input type='hidden' name='page' value='SearchResult'><input type='hidden' name='action' value='check_search'><input type='submit' style='display:none;'></form>");
80        }
81        if (defined($FIG_Config::teacher_db)) {
82      $menu->add_category('&raquo;Teacher', '?page=Teach', undef, ['edit', 'problem_list'], 96);      $menu->add_category('&raquo;Teacher', '?page=Teach', undef, ['edit', 'problem_list'], 96);
83      $menu->add_category('&raquo;Admin', '?page=Admin', undef, ['edit', 'scope', '*'], 99);          $menu->add_entry('&raquo;Teacher', 'Class Performance', '?page=Teach');
84            $menu->add_entry('&raquo;Teacher', 'Class Management', '?page=ManageClass');
85            $menu->add_entry('&raquo;Teacher', 'Problem Sets', '?page=ManageProblemSets');
86            $menu->add_entry('&raquo;Teacher', 'Annotation Resolve', '?page=ClassAnnotationResolve');
87        }
88        #$menu->add_category('&raquo;Admin', '?page=Admin', undef, ['edit', 'scope', '*'], 99);
89        if (FIGRules::nmpdr_mode($cgi)) {
90            $menu->add_category('Help', "$FIG_Config::nmpdr_site_url/content/help.php", 'help', undef, 98);
91            $menu->add_entry('Help', 'Searching NMPDR', "$FIG_Config::nmpdr_site_url/content/find.php");
92            $menu->add_entry('Help', 'Contact', "$FIG_Config::nmpdr_site_url/content/contactus.php");
93        } else {
94      $menu->add_category('&raquo;Help', 'http://www.theseed.org', 'help', undef, 98);      $menu->add_category('&raquo;Help', 'http://www.theseed.org', 'help', undef, 98);
95      $menu->add_entry('&raquo;Help', 'What is the SEED', 'http://www.theseed.org/wiki/Home_of_the_SEED');      $menu->add_entry('&raquo;Help', 'What is the SEED', 'http://www.theseed.org/wiki/Home_of_the_SEED');
96      $menu->add_entry('&raquo;Help', 'HowTo use the SEED Viewer', 'http://www.theseed.org/wiki/SEED_Viewer_Tutorial');      $menu->add_entry('&raquo;Help', 'HowTo use the SEED Viewer', 'http://www.theseed.org/wiki/SEED_Viewer_Tutorial');
97      $menu->add_entry('&raquo;Help', 'Submitting Data to SEED', 'http://www.theseed.org/wiki/RAST_Tutorial');      $menu->add_entry('&raquo;Help', 'Submitting Data to SEED', 'http://www.theseed.org/wiki/RAST_Tutorial');
98      $menu->add_entry('&raquo;Help', 'Contact', 'http://www.theseed.org/wiki/Contact');      $menu->add_entry('&raquo;Help', 'Contact', 'http://www.theseed.org/wiki/Contact');
99      $menu->add_entry('&raquo;Help', 'Register', '?page=Register');      $menu->add_entry('&raquo;Help', 'Register', '?page=Register');
100            $menu->add_entry('&raquo;Help', 'I forgot my Password', '?page=RequestNewPassword');
101        }
102      # initialize application      # initialize application
103      my $WebApp = WebApplication->new( { id => 'SeedViewer',      my $WebApp = WebApplication->new( { id => 'SeedViewer',
                                         dbmaster => $dbmaster,  
104                                          menu     => $menu,                                          menu     => $menu,
105                                          layout   => $layout,                                          layout   => $layout,
106                                          default  => 'Home',                                          default  => 'Home',
107                                        } );                                        } );
108        $WebApp->page_title_prefix('SEED Viewer - ');
109        $WebApp->show_login_user_info(1);
110    
111      # run application      # run application
112      $WebApp->run();      $WebApp->run();

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.15

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3