PRAGMA user_version = 1;
-- should be faster with rowid due to the blob content
+-- these are really just blobs of data
+-- TODO copyright and license information should probably
+-- go here
CREATE TABLE files (
- hash text primary key,
- size integer,
- compression text,
+ hash text primary key, -- sha256 of content
+ size integer, -- bigint? certainly need > 2GB
+ compression text, -- always xz?
content blob
)
;
+-- information about packages
+-- a package is identified by a package,version,release triple
create table packages (
- package text,
- version text, -- the upstream version string
- release integer, -- the local release number
+ -- primary key columns
+ package text not null,
+ version text not null, -- the upstream version string
+ release integer not null, -- the local release number
+-- pkgid text, -- the three above joined with '-'
+
+ -- metadata columns
description text,
architecture text,
url text,
+ status text,
licenses text, -- hash of actual license? need table for more than one?
packager text,
build_time integer default (strftime('%s', 'now')),
install_time integer,
checksum text, -- checksum of package contents. null for incompleted packages
- primary key (package,version,release)
+ primary key (package,version,release),
+ check (typeof(package) = 'text'),
+ check (typeof(version) = 'text'),
+ check (typeof(release) = 'integer'),
+ check (release > 0)
+ -- TODO enforce name and version conventions
+ -- check(instr(version,'-') = 0)
+ -- check(instr(package,'/') = 0)
+ -- check(instr(package,'/') = 0)
+ -- check(instr(version,' ') = 0)
+ -- check(instr(package,' ') = 0)
+ -- check(instr(package,' ') = 0)
+ -- check(length(package) < 64)
+ -- check(length(version) < 32)
)
without rowid
;
+create view packages_pkgid as
+select printf('%s-%s-%s', package, version, release) as pkgid, *
+from packages;
+
+-- handle package status history with a logging trigger.
+create trigger logpkgstatus after update of status on packages
+begin insert into zpmlog (action,target,info)
+ values (printf('status change %s %s', OLD.status, NEW.status),
+ printf('%s-%s-%s', NEW.package, NEW.version, NEW.release),
+ NULL); END;
+
+create table packagetags (
+ -- package id triple
+ package text,
+ version text,
+ release integer,
+ tag text,
+ set_time integer default (strftime('%s', 'now')),
+ primary key (package,version,release,tag),
+ foreign key (package,version,release) references packages (package,version,release) on delete cascade
+);
+
+-- packagefile hash is columns as text, joined with null bytes, then
+-- sha256 sum of that
+-- package checksum is package columns as text, joined with null bytes,
+-- other than the checksum and install_time column
+-- then that hashed. finally, that hash, plus the ascii sorted
+-- hashes of the package files all joined with newlines, hashed.
+-- really don't like this.
+
+-- files contained in a package
create table packagefiles (
+ -- package id triple
package text,
version text,
release integer,
- path text,
- mode text, -- perms, use text for octal rep?
- username text, -- name of owner
- groupname text, -- group of owner
- --filetype integer default 0, -- 0 regular file, 1 directory, 2 symlink
- -- regular file if null target and not null hash
- -- except that we could not know the hash, or care
- -- directory if null hash and null target
- -- symlink if null hash and not null target
- -- hard link if not null hash and not null target
- -- device special files add dev number column
- -- fifos add mode? Can encode filetype in mode.
- target text, -- link target
- hash text, -- what should go here, null for dir?
- mtime integer, -- seconds since epoch, but allow finer?
+
+ path text, -- filesystem path
+ mode text not null, -- perms, use text for octal rep?
+ username text not null, -- name of owner
+ groupname text not null, -- group of owner
+ uid integer, -- numeric uid, generally ignored
+ gid integer, -- numeric gid, generally ignored
+ configuration integer not null default 0, -- boolean if config file
+ filetype varchar not null default 'r',
+ -- r regular file
+ -- d directory
+ -- s symlink
+ -- h hard link -- not supported
+ -- c character special and b device special files add dev number column
+ -- b block special
+ -- p fifos (i.e. pipe)
+ target text, -- link target for links
+ -- device file dev numbers, should probably be a separate table
+ devmajor integer,
+ devminor integer,
+ hash text, -- null if no actual content, i.e. anything but a regular file
+ mtime integer, -- seconds since epoch, finer resolution probably not needed
primary key (package,version,release,path),
- foreign key (package,version,release) references packages (package,version,release) on delete cascade
+ foreign key (package,version,release) references packages (package,version,release) on delete 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)))
+)
+without rowid
+;
+
+create view packagefiles_pkgid as
+select printf('%s-%s-%s', package, version, release) as pkgid, *
+from packagefiles
+;
+
+create view installed_ref_count as
+select I.path, count(*) as refcount
+from installedfiles I
+group by I.path
+;
+
+create view packagefiles_status as
+select P.status, PF.*
+from packagefiles_pkgid PF
+left join packages_pkgid P on P.pkgid = PF.pkgid
+;
+
+create view installedfiles as
+select * from packagefiles_status
+where status = 'installed'
+;
+
+create view install_status as
+select 'new' as op, PN.*
+from packagefiles_status PN
+left join installed_ref_count RC on RC.path = PN.path
+where RC.refcount is null
+and PN.status = 'installing'
+
+union all
+
+select 'update' as op, PN.*
+from packagefiles_status PN
+inner join installedfiles PI on PI.path = PN.path and PI.package = PN.package
+left join installed_ref_count RC on RC.path = PN.path
+where RC.refcount = 1
+and PN.status = 'installing'
+
+union all
+
+select 'conflict' as op, PI.*
+from packagefiles_status PN
+inner join installedfiles PI on PI.path = PN.path and PI.package != PN.package
+where PN.status = 'installing'
+
+union all
+
+select 'remove' as op, PI.*
+from installedfiles PI
+left join packagefiles_status PN
+ on PI.path = PN.path and PI.package = PN.package
+where PN.path is null
+and PN.status = 'installing'
+;
+
+create table pathtags (
+ -- package id triple
+ package text,
+ version text,
+ release integer,
+
+ path text, -- filesystem path
+ tag text,
+ primary key (package,version,release,path,tag)
+)
+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
;
-- TODO just elf information?
-- and just hash, not package?
-create table libraries (
- package text,
- subpackage text,
- path text,
+create table elflibraries (
+ file text primary key,
soname text
)
+without rowid
;
-create table librarydeps (
- package text,
- subpackage text,
- path text,
- soname text -- soname of dependency
-);
+create table elfneeded (
+ file text,
+ needed text, -- soname of dependency
+ primary key (file, needed)
+)
+without rowid
+;
-- package scripts: table of package, stage, file
create table scripts (
package text,
- subpackage text,
+ version text,
+ release integer,
stage text,
- hash text
+ hash text,
+ primary key (package,version,release,stage),
+ foreign key (package,version,release) references packages (package,version,release) on delete cascade
);
+create view scripts_pkgid as
+select printf('%s-%s-%s', package, version, release) as pkgid, *
+from scripts
+;
+
-- package dependencies: table of package, dependency, dep type (package, soname)
create table packagedeps (
package text,
- subpackage text,
- requires text, -- package name
- subreq text, -- if requires only a sub package, probably most common for libs
+ version text,
+ release integer,
+ required text, -- package name
+ -- following can be null for not checked
minversion text,
- maxversion text
+ minrelease integer,
+ maxversion text,
+ maxrelease integer
);
-- capability labels
package text,
"group" text
);
+
+-- zpm actions
+-- not sure how machine readable this needs to be,
+-- do not at all for now, figure it out later
+-- could be worth logging all commands in a history table,
+-- the zpm driver could do that and capture the exit status
+-- as well
+-- might want the history table to note a "group" to tie together
+-- sub-invocations, probably an environment variable set if not
+-- already set by zpm, probably a uuid or a timestamp
+create table zpmlog (
+ ts text default (strftime('%Y-%m-%d %H:%M:%f', 'now')),
+ -- timestamp of action
+ action text,
+ target text, -- packagename, repo name, etc
+ info text -- human readable
+);
+
+create table history (
+ ts integer, -- again, probably needs timestamp sub second
+ cmd text,
+ args text,
+ status integer
+);
+
+create table repository (
+ name text primary key, -- our name for a repo
+ url text not null,
+ priority integer not null default 1,
+ refreshed integer -- last refresh time
+);
+
+-- urls for downloading packages. possibly unneeded
+create table repository_packages (
+ repo text,
+ pkg text, -- glob pattern? in which case others not needed
+ version text,
+ release text,
+ url text
+);
+
+-- track which repository a package was cloned from, i.e. where we got it
+create table packagesource (
+ name text,
+ version text,
+ release integer,
+ repository text references repository
+);
+
commit;