remove unused elf tables, add elf summary view

[zpackage] / db.sql

diff --git a/db.sql b/db.sql
index bf6fd22a07c01b886d9d6e26a9dc1557d5132c03..a9e2a5e0e10f4626003c227709b93658b5a29ad2 100644 (file)
--- a/db.sql
+++ b/db.sql
@@ -52,6 +52,8 @@ create table packages (
 without rowid
 ;
 
+create index package_status_index on packages (status);
+
 create view packages_pkgid as
 select printf('%s-%s-%s', package, version, release) as pkgid, *
 from packages;
@@ -137,22 +139,60 @@ create table packagefiles (
        foreign key (package,version,release) references packages (package,version,release) on delete cascade on update cascade,
        check (not (filetype = 'l' and target is null)),
        check (not (filetype = 'r' and hash is null)),
-       check (not (filetype = 'c' and (devmajor is null or devminor is null)))
+       check (not (filetype = 'c' and (devmajor is null or devminor is null))),
+       check (not (filetype = 'b' and (devmajor is null or devminor is null))),
+       check (configuration = 0 or configuration = 1)
 )
 without rowid
 ;
 
 create view packagefiles_pkgid as
-select printf('%s-%s-%s', package, version, release) as pkgid, *
+select printf('%s-%s-%s', package, version, release) as pkgid, *,
+printf('%s:%o:%s:%s', filetype, mode, username, groupname) as mds
 from packagefiles
 ;
 
+create trigger packagefiles_update_trigger instead of
+update on packagefiles_pkgid
+begin
+       update packagefiles
+       set package = NEW.package,
+       version = NEW.version,
+       release = NEW.release,
+       path = NEW.path,
+       mode = NEW.mode,
+       username = NEW.username,
+       groupname = NEW.groupname,
+       uid = NEW.uid,
+       gid = NEW.gid,
+       configuration = NEW.configuration,
+       filetype = NEW.filetype,
+       target = NEW.target,
+       devmajor = NEW.devmajor,
+       devminor = NEW.devminor,
+       hash = NEW.hash,
+       mtime = NEW.mtime
+       where package = OLD.package
+       and version = OLD.version
+       and release = OLD.release
+       and path = OLD.path
+       ;
+end
+;
+
 create view installed_ref_count as
 select I.path, count(*) as refcount
 from installedfiles I
 group by I.path
 ;
 
+create view sync_status_ref_count as
+select path, status, count(*) as refcount
+from packagefiles_status
+where status in ('installed', 'installing', 'removing')
+group by path, status
+;
+
 create view packagefiles_status as
 select P.status, PF.*
 from packagefiles_pkgid PF
@@ -197,6 +237,16 @@ left join packagefiles_status PN
        and PI.pkgid != PN.pkgid
 where PN.path is null
 and PI.package in (select package from packages where status = 'installing')
+
+union all
+-- remove files in removing, but not installing
+select distinct 'remove' as op, PR.*
+from packagefiles_status PR
+left join packagefiles_status PN
+on PR.path = PN.path
+and PR.pkgid != PN.pkgid and PN.status in ('installing', 'installed')
+where PN.path is null
+and PR.status = 'removing'
 ;
 
 create table pathtags (
@@ -214,30 +264,20 @@ create table pathtags (
 without rowid
 ;
 
-create table elfinfo (
-       file    text primary key, -- hash of blob
-       elftype text,
-       foreign key (file) references files on delete cascade
-)
-without rowid
-;
-
-create table elfdeps (
-       file    text,
-       soname  text,
-       dependency text,
-       primary key (file, soname, dependency),
-       foreign key (file) references files on delete cascade
-)
-without rowid
+create view elfdeps as
+select PF.pkgid, PF.status, PF.path, N.needed as needs,
+PL.path as library, PL.pkgid provider, PL.status as library_status
+from packagefiles_status PF
+join elfneeded N on N.file = PF.hash
+left join elflibraries L on N.needed = L.soname
+left join packagefiles_status PL on PL.hash = L.file
 ;
 
 -- TODO just elf information?
 -- and just hash, not package?
 create table elflibraries (
        file    text primary key,
-       soname  text,
-       foreign key (file) references files on delete cascade
+       soname  text
 )
 without rowid
 ;
@@ -245,8 +285,7 @@ without rowid
 create table elfneeded (
        file    text,
        needed  text, -- soname of dependency
-       primary key (file, needed),
-       foreign key (file) references files on delete cascade
+       primary key (file, needed)
 )
 without rowid
 ;