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

More quick VM additions.

parent fa7daffe
......@@ -375,6 +375,18 @@ CREATE TABLE `quickvms` (
`name` tinytext,
`status` varchar(32) default NULL,
`profile` tinytext,
`extension_code` varchar(32) default NULL,
`manifest` mediumtext,
PRIMARY KEY (`uuid`)
) ENGINE=MyISAM DEFAULT CHARSET=latin1;
DROP TABLE IF EXISTS `quickvm_rspecs`;
CREATE TABLE `quickvm_rspecs` (
`name` varchar(64) NOT NULL default '',
`idx` int(10) unsigned NOT NULL auto_increment,
`created` datetime default NULL,
`description` mediumtext,
`rspec` mediumtext,
PRIMARY KEY (`idx`),
UNIQUE KEY `name` (`name`)
) ENGINE=MyISAM DEFAULT CHARSET=latin1;
#
# Changes for quick containers.
#
use strict;
use GeniDB;
sub DoUpdate($$$)
{
my ($dbhandle, $dbname, $version) = @_;
DBSetDefault($dbhandle);
if (!DBSlotExists("quickvms", "extension_code")) {
DBQueryFatal("alter table quickvms add ".
" `extension_code` varchar(32) default NULL ".
" after profile");
}
if (!DBTableExists("quickvm_rspecs")) {
DBQueryFatal("CREATE TABLE `quickvm_rspecs` ( ".
" `name` varchar(64) NOT NULL default '', ".
" `idx` int(10) unsigned NOT NULL auto_increment, ".
" `created` datetime default NULL, ".
" `description` mediumtext, ".
" `rspec` mediumtext, ".
" PRIMARY KEY (`idx`), ".
" UNIQUE KEY `name` (`name`) ".
") ENGINE=MyISAM DEFAULT CHARSET=latin1");
}
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