[Bio] / WebApplication / DataHandler / OOD.pm Repository:
ViewVC logotype

View of /WebApplication/DataHandler/OOD.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.6 - (download) (as text) (annotate)
Wed Mar 17 23:04:33 2010 UTC (9 years, 11 months ago) by wilke
Branch: MAIN
CVS Tags: mgrast_dev_08112011, mgrast_dev_08022011, rast_rel_2014_0912, mgrast_dev_03052011, mobedac_release_05302012, mgrast_dev_05262011, mgrast_dev_04082011, rast_rel_2010_0928, mgrast_version_3_2, mgrast_dev_12152011, mgrast_dev_06072011, rast_rel_2010_0526, rast_rel_2014_0729, mgrast_dev_02212011, rast_rel_2010_1206, mgrast_release_3_0, mgrast_dev_03252011, rast_rel_2011_0119, mgrast_release_3_0_4, mgrast_release_3_0_2, mgrast_release_3_0_3, mgrast_release_3_0_1, mgrast_dev_03312011, mgrast_release_3_1_2, mgrast_release_3_1_1, mgrast_release_3_1_0, mgrast_dev_04132011, mgrast_dev_04012011, rast_rel_2010_0827, myrast_33, rast_rel_2011_0928, mgrast_dev_04052011, mgrast_dev_02222011, mgrast_dev_10262011, HEAD
Changes since 1.5: +7 -7 lines
*** empty log message ***

package DataHandler::OOD;

# DataHandler::OOD - data handler to the PPO OOD database

# $Id: OOD.pm,v 1.6 2010/03/17 23:04:33 wilke Exp $

use strict;
use warnings;

use base qw( DataHandler );

use DBMaster;
use FIG_Config;


=pod

=head1 NAME

DataHandler::RAST - data handler to the PPO RAST database

=head1 DESCRIPTION

This module returns the DBMaster object to the RAST database stored in the root
job directory of a RAST server. It requires the FIG_Config.pm to specify the  
$rast_jobs directory.

Refer to WebApplication/DataHandler.pm for the full documentation.

=head1 METHODS

=over 4

=item * B<handle> ()

Returns the enclosed data handle. Returns undef if it fails to open the Jobs database

=cut

sub handle {

  unless ($FIG_Config::OOD_ontology_db) {
    warn "Unable to read DataHandler::OOD database: OOD_ontology_db not defined in FIG_Config.pm\n";
    return undef;
  }
  unless ($FIG_Config::OOD_ontology_dbuser) {
    warn "Unable to read DataHandler::OOD database: OOD_ontology_dbuser not defined in FIG_Config.pm\n";
    return undef;
  }
  unless ($FIG_Config::OOD_ontology_dbhost) {
    warn "Unable to read DataHandler::OOD database: OOD_ontology_dbhost not defined in FIG_Config.pm\n";
    return undef;
  }

  unless (exists $_[0]->{_handle}) {
  
    eval {
      $_[0]->{_handle} = DBMaster->new( -database => $FIG_Config::OOD_ontology_db,
 					-host     => $FIG_Config::OOD_ontology_dbhost,
 					-user     => $FIG_Config::OOD_ontology_dbuser,
 					-backend  => 'MySQL',
				      );
   #    $_[0]->{_handle} = DBMaster->new( -database => $FIG_Config::mgrast_ontology,
					
# 				      );
    };
    if ($@) {
      warn "Unable to read DataHandler::OOD database: $@\n";
      $_[0]->{_handle} = undef;
    }
  }
  return $_[0]->{_handle};
}

1;

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3