Add nodelete flag to profile versions table, to lock down a profile

from being deleted. If a profile cannot be deleted, then the images
it references cannot be deleted either.

sql/database-create.sql

@@ -408,6 +408,7 @@ CREATE TABLE `apt_profile_versions` (
   `published` datetime default NULL,
   `deleted` datetime default NULL,
   `disabled` tinyint(1) NOT NULL default '0',
+  `nodelete` tinyint(1) NOT NULL default '0',
   `uuid` varchar(40) NOT NULL,
   `parent_profileid` int(8) unsigned default NULL,
   `parent_version` int(8) unsigned default NULL,

sql/updates/4/565

+use strict;
+use libdb;
+
+sub DoUpdate($$$)
+{
+    my ($dbhandle, $dbname, $version) = @_;
+
+    if (!DBSlotExists("apt_profile_versions", "nodelete")) {
+        DBQueryFatal("alter table apt_profile_versions " .
+		     " add `nodelete` tinyint(1) NOT NULL default '0' ".
+		     "    after disabled");
+    }
+    return 0;
+}
+
+# Local Variables:
+# mode:perl
+# End: