31
|
1 |
CREATE TABLE inodes (
|
|
2 |
ino serial4 primary key,
|
|
3 |
type char(3) NOT NULL,
|
|
4 |
mode int2 NOT NULL,
|
|
5 |
data oid
|
|
6 |
);
|
24
|
7 |
|
31
|
8 |
CREATE TABLE file_tree (
|
|
9 |
"offset" serial4 primary key,
|
|
10 |
name varchar(256),
|
|
11 |
parent int4 references inodes(ino),
|
|
12 |
inode int4 references inodes(ino) NOT NULL
|
|
13 |
);
|
24
|
14 |
|
31
|
15 |
INSERT INTO inodes VALUES
|
|
16 |
(1, 'DIR', 365, NULL),
|
|
17 |
(2, 'REG', 292, lo_create(0));
|
27
|
18 |
|
31
|
19 |
INSERT INTO file_tree (name, parent, inode) VALUES
|
|
20 |
(NULL, NULL, 1 ),
|
|
21 |
('foo', 1, 2 );
|
|
22 |
|
|
23 |
CREATE FUNCTION lo_size (oid) RETURNS int4 LANGUAGE SQL STABLE RETURNS NULL ON NULL INPUT AS 'select lo_lseek(lo_open($1, 262144), 0, 2);';
|
|
24 |
CREATE FUNCTION lo_pread (IN fd int4, IN len int4, IN "off" int4) RETURNS bytea LANGUAGE SQL STRICT AS 'select lo_lseek($1, $3, 0); select loread($1, $2);';
|
|
25 |
CREATE FUNCTION lo_pwrite (IN fd int4, IN buf bytea, IN "off" int4) RETURNS int4 LANGUAGE SQL STRICT AS 'select lo_lseek($1, $3, 0); select lowrite($1, $2);';
|
|
26 |
CREATE FUNCTION lo_otruncate (IN oid, IN len int4) RETURNS oid LANGUAGE SQL STRICT AS 'select lo_truncate(lo_open($1, 393216), $2); select $1;';
|
|
27 |
|
33
|
28 |
ALTER TABLE inodes ADD COLUMN link varchar(512);
|
|
29 |
|
|
30 |
CREATE SEQUENCE ino_seq START 64;
|
|
31 |
ALTER TABLE inodes ALTER COLUMN ino SET DEFAULT nextval('ino_seq'::regclass);
|
|
32 |
|
|
33 |
ALTER TABLE file_tree ADD COLUMN ino int4;
|
|
34 |
UPDATE file_tree SET ino = inode;
|
|
35 |
ALTER TABLE file_tree DROP COLUMN inode;
|
|
36 |
|
|
37 |
CREATE FUNCTION dbfs_size (type char, oid, link varchar) RETURNS int4 LANGUAGE SQL STABLE AS $$
|
|
38 |
SELECT CASE $1
|
|
39 |
WHEN 'LNK' THEN char_length($3)
|
|
40 |
WHEN 'REG' THEN lo_size($2)
|
|
41 |
ELSE 0
|
|
42 |
END;
|
|
43 |
$$;
|
|
44 |
|