db/ImageAddMD5sum.pm

   1 =head1 NAME
   2
   3  ImageAddMD5sum.pm
   4
   5 =head1 SYNOPSIS
   6
   7 mx-run ImageAddMD5sum [options] -H hostname -D dbname -u username [-F]
   8
   9 this is a subclass of L<CXGN::Metadata::Dbpatch>
  10 see the perldoc of parent class for more details.
  11
  12 =head1 DESCRIPTION
  13
  14 Adds a md5sum field to the metadata.md_image table.
  15
  16 This subclass uses L<Moose>. The parent class uses L<MooseX::Runnable>
  17
  18 =head1 AUTHOR
  19
  20  Lukas Mueller <lam87@cornell.edu>
  21  Naama Menda<nm249@cornell.edu>
  22
  23 =head1 COPYRIGHT & LICENSE
  24
  25 Copyright 2010 Boyce Thompson Institute for Plant Research
  26
  27 This program is free software; you can redistribute it and/or modify
  28 it under the same terms as Perl itself.
  29
  30 =cut
  31
  32
  33 package ImageAddMD5sum;
  34
  35 use Moose;
  36 extends 'CXGN::Metadata::Dbpatch';
  37
  38
  39 sub init_patch {
  40     my $self=shift;
  41     my $name = __PACKAGE__;
  42     print "dbpatch name is ':" .  $name . "\n\n";
  43     my $description = 'Testing a Moose dbpatch';
  44     my @previous_requested_patches = (); #ADD HERE
  45
  46     $self->name($name);
  47     $self->description("Adds a md5sum field to the metadata.md_image table");
  48     $self->prereq(\@previous_requested_patches);
  49
  50 }
  51
  52 sub patch {
  53     my $self=shift;
  54
  55
  56     print STDOUT "Executing the patch:\n " .   $self->name . ".\n\nDescription:\n  ".  $self->description . ".\n\nExecuted by:\n " .  $self->username . " .";
  57
  58     print STDOUT "\nChecking if this db_patch was executed before or if previous db_patches have been executed.\n";
  59
  60
  61
  62     print STDOUT "\nExecuting the SQL commands.\n";
  63
  64     $self->dbh->do(<<EOSQL);
  65 --do your SQL here
  66 --
  67
  68 GRANT SELECT, UPDATE, INSERT, DELETE ON metadata.md_image TO web_usr;
  69
  70 ALTER TABLE metadata.md_image ADD COLUMN md5sum text
  71
  72 EOSQL
  73
  74
  75 print "You're done!\n";
  76
  77 }
  78
  79
  80 ####
  81 1; #
  82 ####