Commit ec7b6907 authored by Leigh B Stoller's avatar Leigh B Stoller

Add slots to geni_slices that help to point back to portal experiment.

parent 38c82737
......@@ -77,6 +77,8 @@ CREATE TABLE `geni_slices` (
`async_mode` tinyint(1) NOT NULL default '0',
`async_code` int(11) default '0',
`async_output` mediumtext,
`portal_tag` varchar(64) default NULL,
`portal_url` tinytext,
PRIMARY KEY (`idx`),
UNIQUE KEY `hrn` (`hrn`),
UNIQUE KEY `uuid` (`uuid`)
......
use strict;
use GeniDB;
sub DoUpdate($$$)
{
my ($dbhandle, $dbname, $version) = @_;
DBSetDefault($dbhandle);
if (! DBSlotExists("geni_slices", "portal_tag")) {
DBQueryFatal("alter table geni_slices add ".
" `portal_tag` varchar(64) default NULL ".
" after async_code");
}
if (! DBSlotExists("geni_slices", "portal_url")) {
DBQueryFatal("alter table geni_slices add ".
" `portal_url` tinytext after portal_tag");
}
return 0;
}
1;
# Local Variables:
# mode:perl
# End:
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment