Index: /trunk/ippMonitor/czartool/czartool/CzarDb.pm
===================================================================
--- /trunk/ippMonitor/czartool/czartool/CzarDb.pm	(revision 32734)
+++ /trunk/ippMonitor/czartool/czartool/CzarDb.pm	(revision 32735)
@@ -28,5 +28,4 @@
     bless $self, $class;
 
-    $self->update();    
     return $self;
 }
@@ -1342,432 +1341,4 @@
 }
 
-###########################################################################
-#
-# Update Db to newest version 
-#
-###########################################################################
-sub update { 
-    my ($self) = @_;
-
-    my $currentRevision = -1;
-
-    while (1) {
-
-        $currentRevision = $self->getRevision();
-        if ($self->{_verbose}) {print "* Current Db revision = $currentRevision\n";}
-
-        if ($currentRevision == 0) {$self->createRevision_1();}
-        elsif ($currentRevision == 1) {$self->createRevision_2();}
-        elsif ($currentRevision == 2) {$self->createRevision_3();}
-        elsif ($currentRevision == 3) {$self->createRevision_4();}
-        elsif ($currentRevision == 4) {$self->createRevision_5();}
-        elsif ($currentRevision == 5) {$self->createRevision_6();}
-        elsif ($currentRevision == 6) {$self->createRevision_7();}
-        elsif ($currentRevision == 7) {$self->createRevision_8();}
-        elsif ($currentRevision == 8) {$self->createRevision_9();}
-        elsif ($currentRevision == 9) {$self->createRevision_10();}
-        elsif ($currentRevision == 10) {$self->createRevision_11();}
-        elsif ($currentRevision == 11) {$self->createRevision_12();}
-        elsif ($currentRevision == 12) {$self->createRevision_13();}
-        else {last;}
-    }
-}
-
-#######################################################################################
-# 
-# Sets current revision of ippToPsps database
-#
-#######################################################################################
-sub setRevision {
-    my ($self, $revision) = @_;
-
-    my $query = $self->{_db}->prepare(<<SQL);
-    INSERT INTO revision (revision) VALUES ($revision);
-SQL
-        $query->execute;
-}
-
-#######################################################################################
-# 
-# Gets current revision of ippToPsps database
-#
-#######################################################################################
-sub getRevision {
-    my ($self) = @_;
-
-    if (!$self->SUPER::doesTableExist("revision")) {return 0;}
-
-    my $query = $self->{_db}->prepare(<<SQL);
-    SELECT revision
-        FROM revision
-        ORDER BY revision DESC LIMIT 1;
-SQL
-
-        $query->execute;
-    my @row = $query->fetchrow_array();
-
-    return $row[0];
-}
-
-#######################################################################################
-# 
-# Create revision 1 of the database 
-#
-#######################################################################################
-sub createRevision_1 {
-    my ($self) = @_;
-
-    print "* Creating revision 1 of '$self->{_dbName}'\n";
-
-    my $query = $self->{_db}->prepare(<<SQL);
-    CREATE TABLE revision (
-            revision INT, 
-            created TIMESTAMP DEFAULT NOW(),
-            primary key (revision)
-            );
-SQL
-        $query->execute;
-
-    my $stage = undef;
-    foreach $stage (@stages) {
-
-        my $query = $self->{_db}->prepare(<<SQL);
-        CREATE TABLE $stage (
-                timestamp TIMESTAMP DEFAULT NOW(),
-                label VARCHAR(128) DEFAULT "NONE", 
-                pending BIGINT NOT NULL,
-                faults BIGINT NOT NULL
-                );
-SQL
-            $query->execute;
-
-    }
-
-    $self->setRevision(1);
-}
-
-#######################################################################################
-# 
-# Create revision 2 of the database 
-#
-#######################################################################################
-sub createRevision_2 {
-    my ($self) = @_;
-
-    print "* Creating revision 2 of '$self->{_dbName}'\n";
-
-
-    my $stage = undef;
-    foreach $stage (@stages) {
-
-        my $query = $self->{_db}->prepare(<<SQL);
-        ALTER TABLE $stage 
-            ADD COLUMN reverting TINYINT NOT NULL DEFAULT 0;
-SQL
-            $query->execute;
-
-    }
-
-    $self->setRevision(2);
-}
-
-#######################################################################################
-# 
-# Create revision 3 of the database 
-#
-#######################################################################################
-sub createRevision_3 {
-    my ($self) = @_;
-
-    print "* Creating revision 3 of '$self->{_dbName}'\n";
-
-
-    my $stage = undef;
-    foreach $stage (@stages) {
-
-        my $query = $self->{_db}->prepare(<<SQL);
-        ALTER TABLE $stage 
-            ADD COLUMN processed BIGINT NOT NULL DEFAULT 0;
-SQL
-
-            $query->execute;
-    }
-
-    $self->setRevision(3);
-}
-
-#######################################################################################
-# 
-# Create revision 4 of the database 
-#
-#######################################################################################
-sub createRevision_4 {
-    my ($self) = @_;
-
-    print "* Creating revision 4 of '$self->{_dbName}'\n";
-
-    my $query = $self->{_db}->prepare(<<SQL);
-    CREATE TABLE current_labels (server VARCHAR(128), label VARCHAR(128));
-SQL
-
-        $query->execute;
-
-    $self->setRevision(4);
-}
-
-#######################################################################################
-# 
-# Create revision 5 of the database 
-#
-#######################################################################################
-sub createRevision_5 {
-    my ($self) = @_;
-
-    print "* Creating revision 5 of '$self->{_dbName}'\n";
-
-    my $query = $self->{_db}->prepare(<<SQL);
-    CREATE TABLE servers (
-            timestamp TIMESTAMP DEFAULT NOW(),
-            server VARCHAR(128), 
-            alive TINYINT, running TINYINT);
-SQL
-
-        $query->execute;
-
-    $self->setRevision(5);
-}
-
-#######################################################################################
-# 
-# Create revision 6 of the database 
-#
-#######################################################################################
-sub createRevision_6 {
-    my ($self) = @_;
-
-    print "* Creating revision 6 of '$self->{_dbName}'\n";
-
-    my $stage = undef;
-    my $index = undef;
-    foreach $stage (@stages) {
-
-        $index = $stage . "Index";
-        my $query = $self->{_db}->prepare(<<SQL);
-        CREATE INDEX $index ON $stage (timestamp, label);
-SQL
-
-            $query->execute;
-    }
-
-    my $query = $self->{_db}->prepare(<<SQL);
-    CREATE INDEX serverIndex ON servers (timestamp, server);
-SQL
-
-        $query->execute;
-
-
-    $self->setRevision(6);
-}
-
-#######################################################################################
-# 
-# Create revision 7 of the database 
-#
-#######################################################################################
-sub createRevision_7 {
-    my ($self) = @_;
-
-    print "* Creating revision 7 of '$self->{_dbName}'\n";
-
-    my $query = $self->{_db}->prepare(<<SQL);
-    ALTER TABLE current_labels 
-        ADD COLUMN priority INT NOT NULL DEFAULT 0;
-SQL
-
-        $query->execute;
-
-    $self->setRevision(7);
-}
-
-#######################################################################################
-# 
-# Create revision 8 of the database 
-#
-#######################################################################################
-sub createRevision_8 {
-    my ($self) = @_;
-
-    print "* Creating revision 8 of '$self->{_dbName}'\n";
-
-    # drop reverting column from all stages tables
-    my $stage = undef;
-    foreach $stage (@stages) {
-
-        my $query = $self->{_db}->prepare(<<SQL);
-        ALTER TABLE $stage 
-            DROP COLUMN reverting;
-SQL
-
-            $query->execute;
-    }
-
-    # create new 'revert' table
-    my $query = $self->{_db}->prepare(<<SQL);
-    CREATE TABLE reverts (
-            stage VARCHAR(128), 
-            reverting TINYINT);
-SQL
-
-        $query->execute;
-
-    # insert stages into revert table
-    foreach $stage (@stages) {
-        my $query = $self->{_db}->prepare(<<SQL);
-        INSERT INTO reverts
-            (stage, reverting)
-            VALUES
-            ('$stage', 0);
-SQL
-            $query->execute;
-    }
-
-    $self->setRevision(8);
-}
-
-#######################################################################################
-# 
-# Create revision 9 of the database 
-#
-#######################################################################################
-sub createRevision_9 {
-    my ($self) = @_;
-
-    print "* Creating revision 9 of '$self->{_dbName}'\n";
-
-    my $query = $self->{_db}->prepare(<<SQL);
-    CREATE TABLE cluster_space (
-            timestamp TIMESTAMP DEFAULT NOW(),
-            total FLOAT, 
-            available FLOAT, 
-            used FLOAT, 
-            hostsOver98 SMALLINT);
-SQL
-
-        $query->execute;
-    $query = $self->{_db}->prepare(<<SQL);
-    CREATE TABLE hosts (
-            host VARCHAR(128), 
-            total FLOAT, 
-            available FLOAT, 
-            used FLOAT); 
-SQL
-
-        $query->execute;
-
-    $query = $self->{_db}->prepare(<<SQL);
-    CREATE INDEX clusterSpaceIndex ON cluster_space (timestamp);
-SQL
-
-        $query->execute;
-
-    $self->setRevision(9);
-}
-
-#######################################################################################
-# 
-# Create revision 10 of the database 
-#
-#######################################################################################
-sub createRevision_10 {
-    my ($self) = @_;
-
-    print "* Creating revision 10 of '$self->{_dbName}'\n";
-
-    my $query = $self->{_db}->prepare(<<SQL);
-    ALTER TABLE hosts 
-        ADD COLUMN writable TINYINT NOT NULL DEFAULT 0,
-            ADD COLUMN readable TINYINT NOT NULL DEFAULT 0;
-SQL
-
-        $query->execute;
-
-    $self->setRevision(10);
-}
-
-#######################################################################################
-# 
-# Create revision 11 of the database 
-#
-#######################################################################################
-sub createRevision_11 {
-    my ($self) = @_;
-
-    print "* Creating revision 11 of '$self->{_dbName}'\n";
-
-    # same shape as other stage tables to enable easy update
-    #my $query = $self->{_db}->prepare(<<SQL);
-    #CREATE TABLE burntool (
-    #        timestamp TIMESTAMP DEFAULT NOW(),
-    #        label VARCHAR(128) DEFAULT "NONE", 
-    #        pending BIGINT NOT NULL,
-    #        processed BIGINT NOT NULL,
-    #        faults BIGINT NOT NULL);
-#SQL
-
-#        $query->execute;
-#    $query = $self->{_db}->prepare(<<SQL);
-#    CREATE INDEX burntoolIndex ON burntool (timestamp, label);
-#SQL
-
-#        $query->execute;
-
-    $self->setRevision(11);
-}
-
-#######################################################################################
-# 
-# Create revision 12 of the database 
-#
-# - adding nightlyscience table
-#
-#######################################################################################
-sub createRevision_12 {
-    my ($self) = @_;
-
-    print "* Creating revision 12 of '$self->{_dbName}'\n";
-
-    my $query = $self->{_db}->prepare(<<SQL);
-    CREATE TABLE nightlyscience (
-            timestamp TIMESTAMP DEFAULT NOW(),
-            status VARCHAR(128) DEFAULT "NONE"); 
-SQL
-
-        $query->execute;
-
-    $self->setRevision(12);
-}
-#######################################################################################
-# 
-# Create revision 13 of the database 
-#
-# adding server_dates table
-#
-#######################################################################################
-sub createRevision_13 {
-    my ($self) = @_;
-
-    print "* Creating revision 13 of '$self->{_dbName}'\n";
-
-    my $query = $self->{_db}->prepare(<<SQL);
-    CREATE TABLE server_dates (
-            timestamp TIMESTAMP DEFAULT NOW(),
-            server VARCHAR(64) DEFAULT "NONE", 
-            date VARCHAR(64) DEFAULT "NONE"); 
-SQL
-
-        $query->execute;
-
-    $self->setRevision(13);
-}
 1;