blob: 94c594193e1c53ad99031f69820d04572fbe5546 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
package local::db::dbi;
use base 'Class::DBI';
local::db::dbi->connection('dbi:SQLite:/srv/nzbget/datenbank.sqlite', '', '');
package local::db::download;
use base 'local::db::dbi';
local::db::download->table('download');
local::db::download->columns(All => qw/download_id owner size time category name description completed/);
local::db::download->has_a(owner => 'local::db::owner');
local::db::download->has_a(category => 'local::db::category');
local::db::download->has_many(seen => 'local::db::seen');
package local::db::category;
use base 'local::db::dbi';
local::db::category->table('category');
local::db::category->columns(All => qw/category_id name/);
local::db::category->has_many(download => 'local::db::download');
package local::db::owner;
use base 'local::db::dbi';
local::db::owner->table('owner');
local::db::owner->columns(All => qw/owner_id name quoata quota_used/);
local::db::owner->has_many(download => 'local::db::download');
local::db::owner->has_many(seen => 'local::db::seen');
package local::db::seen;
use base 'local::db::dbi';
local::db::seen->table('seen');
local::db::seen->columns(All => qw/seen_id download user/);
local::db::seen->has_a(download => 'local::db::download');
local::db::seen->has_a(user => 'local::db::owner');
|
