root/tower_buoy/bin/meta_data/nccoos_page_info_orgtest.pm

#meta_data.pm
#Time-stamp: <2006-04-06 16:45:47 lstearns>
#
#Abstract: This module will read in tables of tower related meta data
#  and output hash arrays of the information based on param id.  Hacked
#  together from the subroutine in tower_parse.perl and perl_defs.pm,
#  a piece of code from Brian Blanton (Thanks Brian!!).

# perl defs and subroutines common to quoddy nc/fc runs
# v11/07/2001 B.O.B.
# v02/09/2002 B.O.B. to work out of dmf
# v06/04/2002 B.O.B. added initial da stuff
# v19/08/2002 B.O.B. fixes for changes to "edu" from "com"
# v13/09/2002 B.O.B. added truxton stuff
# v13/12/2002 B.O.B. version for casco4b inclusion/ ssh assim
# vxx/09/2003 B.O.B. modified for SEACOOS
# v15/02/2004 B.O.B. turned into perl package provider (seacoos_sab_defs)


package nccoos_page_info_orgtest;  # assumes seacoos_sab_defs.pm

use strict;
use warnings;
use vars qw();
#use lib '/opt/local/seacoos/bin/';
#use Web_dev;

BEGIN{
   use Exporter ();
   
   our($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);

   $VERSION="1.0";

   @ISA = qw(Exporter);

   @EXPORT = qw(
                %page %article
    );

   @EXPORT_OK=();
}


our(%page,%article
   );

#my(
#  );

######################################################################
# Enter Page Data 
######################################################################



######################################################################
## Platforms Main Page ## ~/obs/index_test.html ##
######################################################################

$page{'plats'} = Web->new_page();
$page{'plats'} -> afs_path     ( "plats/" );
$page{'plats'} -> path2main    ( "../" );
$page{'plats'} -> file_name    ( "index_test.html" );
$page{'plats'} -> short_title  ( "Platforms" );
$page{'plats'} -> long_title   ( "Observation Platforms Operated ".
                                 "by NC-COOS" );
$page{'plats'} -> menu_items   ( 'radar','tower_R4','buoy','jpop','neuse',
                                 'roof' );
$page{'plats'} -> menu_type    ( "vertical" );
$page{'plats'} -> script_files  ( "plats_page.js" );
$page{'plats'} -> content_files ( "plats.txt" );
#$page{'plats'} -> articles     ( 'radar','tower_R4','buoy','jpop','neuse',
#                                'roof' );

######################################################################
## Menu Entries ######################################################
######################################################################

$page{'radar'} = Web->new_page();
$page{'radar'} -> afs_path        ( "plats/radar/" );
$page{'radar'} -> short_title     ( "HF Radar" );
$page{'radar'} -> long_title      ( "Surface Current Radar" );
$page{'radar'} -> file_name       ( "index_test.html" );
$page{'radar'} -> path2main       ( "../../" );
$page{'radar'} -> parent          ( "plats" );
$page{'radar'} -> menu_items      ( 'radar_comp','radar_pub' );
$page{'radar'} -> content_files   ( "radar_1.txt",
                                    #"radar_2.txt",
                                    "technical.txt",
                                    "radar_3.txt");
                                    #"radar_4.txt");
#$page{'radar'} -> dynamic_table   ( "contents/tables/codar_suv.txt" );
#$page{'radar'} -> script_files    ( 'loc_data.js' );

$page{'radar_hist'} = Web->new_page();
$page{'radar_hist'} -> afs_path        ( "plats/radar/" );
$page{'radar_hist'} -> short_title     ( "HF Radar" );
$page{'radar_hist'} -> long_title      ( "Surface Current Radar (Historical)" );
$page{'radar_hist'} -> file_name       ( "historical_test.html" );
$page{'radar_hist'} -> path2main       ( "../../" );
$page{'radar_hist'} -> parent          ( "plats/radar" );
$page{'radar_hist'} -> content_files   ( "radar_1.txt",
                                         "radar_3.fix1",
                                         "radar_anim_script.txt",
                                         "radar_3.fix2",
                                         "radar_anim.txt",
                                         "radar_3.fix3");

$page{'radar_pub'} = Web->new_page();
$page{'radar_pub'} -> afs_path        ( "plats/radar/" );
$page{'radar_pub'} -> short_title     ( "Publications" );
$page{'radar_pub'} -> long_title      ( "Publications and Presentations" );
$page{'radar_pub'} -> file_name       ( "radar_pub_test.html" );
$page{'radar_pub'} -> path2main       ( "../../" );
$page{'radar_pub'} -> parent          ( "plats/radar" );
$page{'radar_pub'} -> content_files    ( "radar_1.txt","radar_pub.txt" );

$page{'radar_comp'} = Web->new_page();
$page{'radar_comp'} -> afs_path        ( "plats/radar/" );
$page{'radar_comp'} -> short_title     ( "Compare" );
$page{'radar_comp'} -> long_title      ( "Data Comparissons" );
$page{'radar_comp'} -> file_name       ( "radar_comp_test.html" );
$page{'radar_comp'} -> path2main       ( "../../" );
$page{'radar_comp'} -> parent          ( "plats/radar" );
$page{'radar_comp'} -> content_files    ( "radar_1.txt","radar_comp.txt" );

$page{'radar_analysis'} = Web->new_page();
$page{'radar_analysis'} -> afs_path        ( "plats/radar/" );
$page{'radar_analysis'} -> short_title     ( "Analysis" );
$page{'radar_analysis'} -> long_title      ( "Data Analysis" );
$page{'radar_analysis'} -> file_name       ( "radar_analysis_test.html" );
$page{'radar_analysis'} -> path2main       ( "../../" );
$page{'radar_analysis'} -> parent          ( "plats/radar" );
$page{'radar_analysis'} -> content_files    ( "radar_1.txt","radar_analysis.txt" );

$page{'tower_R4'} = Web->new_page();
$page{'tower_R4'} -> afs_path        ( "plats/tower_R4/" );
$page{'tower_R4'} -> short_title     ( "R4 Tower" );
$page{'tower_R4'} -> long_title      ( "Navy Tower R4" );
$page{'tower_R4'} -> file_name       ( "index_test.html" );
$page{'tower_R4'} -> path2main       ( "../../" );
$page{'tower_R4'} -> menu_items      ( 'tower_R4_sys','tower_R4_pkg' );
$page{'tower_R4'} -> parent          ( "plats" );
$page{'tower_R4'} -> content_files   ( "tower_R4.txt" );
$page{'tower_R4'} -> dynamic_table   ( "contents/tables/tower_r4.txt" );

$page{'tower_R4_sys'} = Web->new_page();
$page{'tower_R4_sys'} -> afs_path        ( "plats/tower_R4/" );
$page{'tower_R4_sys'} -> short_title     ( "System" );
$page{'tower_R4_sys'} -> long_title      ( "System Info" );
$page{'tower_R4_sys'} -> file_name       ( "sys_info_test.html" );
$page{'tower_R4_sys'} -> path2main       ( "../../" );
$page{'tower_R4_sys'} -> parent          ( "plats/tower_R4" );
$page{'tower_R4_sys'} -> content_files   ( "tower_R4.txt" );
$page{'tower_R4_sys'} -> dynamic_table   ( "contents/tables/tower_r4_sys.txt" );


$page{'buoy'} = Web->new_page();
$page{'buoy'} -> afs_path        ( "plats/buoy/" );
$page{'buoy'} -> short_title     ( "Buoy" );
$page{'buoy'} -> long_title      ( "Lookout Shoals Research Buoy" );
$page{'buoy'} -> file_name       ( "index_test.html" );
$page{'buoy'} -> path2main       ( "../../" );
$page{'buoy'} -> parent          ( "plats" );
$page{'buoy'} -> menu_items      ( 'buoy_sys','buoy_pkg' );
$page{'buoy'} -> content_files   ( "buoy_lsrb.txt" );
#                                  "buoy_down.txt" );
#                                  "technical.txt" );
$page{'buoy'} -> script_files    ( "popup.js" );
$page{'buoy'} -> dynamic_table   ( "contents/tables/buoy_lsrb.txt");
                                   #"contents/tables/buoy_lsrb_surf.txt",
                                   #"contents/tables/buoy_lsrb_midw.txt");

$page{'buoy_sys'} = Web->new_page();
$page{'buoy_sys'} -> afs_path        ( "plats/buoy/" );
$page{'buoy_sys'} -> short_title     ( "System" );
$page{'buoy_sys'} -> long_title      ( "Buoy System Data" );
$page{'buoy_sys'} -> file_name       ( "sys_test.html" );
$page{'buoy_sys'} -> path2main       ( "../../" );
$page{'buoy_sys'} -> parent          ( "plats/buoy" );
$page{'buoy_sys'} -> content_files   ( "buoy_lsrb.txt" );#,"buoy_down.txt");
$page{'buoy_sys'} -> dynamic_table   ( "contents/tables/buoy_lsrb_sys.txt" );

$page{'buoy_pkg'} = Web->new_page();
$page{'buoy_pkg'} -> afs_path        ( "plats/buoy/" );
$page{'buoy_pkg'} -> short_title     ( "Package" );
$page{'buoy_pkg'} -> long_title      ( "Buoy Package Info" );
$page{'buoy_pkg'} -> file_name       ( "pkg_test_test.html" );
$page{'buoy_pkg'} -> path2main       ( "../../" );
$page{'buoy_pkg'} -> parent          ( "plats/buoy" );
$page{'buoy_pkg'} -> content_files   ( "buoy_lsrb.txt", "buoy_pkg.txt" );


$page{'jpop'} = Web->new_page();
$page{'jpop'} -> afs_path        ( "plats/jpop/" );
$page{'jpop'} -> short_title     ( "JPOP" );
$page{'jpop'} -> long_title      ( "Jennette's Pier Observing Partnership" );
$page{'jpop'} -> file_name       ( "index_test.html" );
$page{'jpop'} -> path2main       ( "../../" );
$page{'jpop'} -> parent          ( "plats" );
$page{'jpop'} -> content_files   ( "jpop.txt" );


$page{'neuse'} = Web->new_page();
$page{'neuse'} -> afs_path        ( "plats/neuse/" );
$page{'neuse'} -> short_title     ( "Neuse" );
$page{'neuse'} -> long_title      ( "Neuse River Profiling Station" );
$page{'neuse'} -> file_name       ( "index_test.html" );
$page{'neuse'} -> path2main       ( "../../" );
$page{'neuse'} -> parent          ( "plats" );
$page{'neuse'} -> content_files   ( "neuse.txt" );


$page{'roof'} = Web->new_page();
$page{'roof'} -> afs_path        ( "plats/roof/" );
$page{'roof'} -> short_title     ( "Roof" );
$page{'roof'} -> long_title      ( "Roof Development Package" );
$page{'roof'} -> file_name       ( "index_test.html" );
$page{'roof'} -> path2main       ( "../../" );
$page{'roof'} -> parent          ( "plats" );
$page{'roof'} -> menu_items      ( 'roof_sys','roof_pkg' );
$page{'roof'} -> content_files   ( "roof.txt" );
$page{'roof'} -> dynamic_table   ( "contents/tables/roof.txt" );

$page{'roof_sys'} = Web->new_page();
$page{'roof_sys'} -> afs_path        ( "plats/roof/" );
$page{'roof_sys'} -> short_title     ( "System" );
$page{'roof_sys'} -> long_title      ( "System Info" );
$page{'roof_sys'} -> file_name       ( "sys_info_test.html" );
$page{'roof_sys'} -> path2main       ( "../../" );
$page{'roof_sys'} -> parent          ( "plats/roof" );
$page{'roof_sys'} -> content_files   ( "roof.txt","roof_sys.txt" );
$page{'roof_sys'} -> dynamic_table   ( "contents/tables/roof_sys.txt" );

$page{'roof_pkg'} = Web->new_page();
$page{'roof_pkg'} -> afs_path        ( "plats/roof/" );
$page{'roof_pkg'} -> short_title     ( "Package" );
$page{'roof_pkg'} -> long_title      ( "Package Details" );
$page{'roof_pkg'} -> file_name       ( "pkg_info_test.html" );
$page{'roof_pkg'} -> path2main       ( "../../" );
$page{'roof_pkg'} -> parent          ( "plats/roof" );
#$page{'roof_pkg'} -> articles       ( 'roof_daq','roof_com','roof_trans' );
$page{'roof_pkg'} -> content_files   ( "roof.txt","roof_pkg.txt" );



$page{'blank'} = Web->new_page();
$page{'blank'} -> afs_path       ( "" );
$page{'blank'} -> short_title    ( '' );
$page{'blank'} -> long_title     ( "" );
$page{'blank'} -> path2main      ( "" );


$article{'radar'} = Web->new_article();
$article{'radar'} -> short_title     ( "Radar" );
$article{'radar'} -> long_title      ( "Surface Current Radar Observations" );
$article{'radar'} -> target_url      ( "plats/radar/" );
#$article{'radar'} -> thumbnail       ( "radar_thumb.png" );
$article{'radar'} -> thumbnail       ( "img/thumbnails/codar_receive.jpg" );
$article{'radar'} -> content_files    ( "radar.txt" );