Differences From Artifact [fd3c73f7ce]:
- File dbfile.scm — part of check-in [637dd941e9] at 2024-03-12 17:10:17 on branch v1.8031 — removed wait for portlogger db journal file. Changed db lock expire time from 5 to 30 seconds. Added assert when no port can be found (user: mmgraham, size: 62041) [annotate] [blame] [check-ins using] [more...]
To Artifact [32ab28635d]:
- File dbfile.scm — part of check-in [13060ce126] at 2024-08-16 13:34:00 on branch v1.81-adjutant — Patched forward the adjutant code that got lost in v1.65 (user: matt, size: 62847) [annotate] [blame] [check-ins using] [more...]
| ︙ | |||
548 549 550 551 552 553 554 555 556 557 558 559 560 561 | 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 | + + + + + + + + + + + + + + + + |
;; I have been having trouble with init of no-sync.db so
;; doing the init in a transaction every time (no gating
;; on file existance.
(for-each
(lambda (stmt)
(sqlite3:execute db stmt))
(list
"CREATE TABLE IF NOT EXISTS jobs_queue
(id INTEGER PRIMARY KEY,
host_type TEXT,
cores INTEGER,
memory TEXT,
vars TEXT,
exekey TEXT,
cmdline TEXT,
state TEXT,
event_time INTEGER,
last_update INTEGER);"
"CREATE TABLE IF NOT EXISTS test_extra_data
(id INTEGER PRIMARY KEY,
run_id INTEGER,
test_id INTEGER,
last_seen_running INTEGER);"
"CREATE TABLE IF NOT EXISTS no_sync_metadat
(var TEXT,
val TEXT,
CONSTRAINT no_sync_metadat_constraint UNIQUE (var));"
"CREATE TABLE IF NOT EXISTS no_sync_locks
(key TEXT,
val TEXT,
|
| ︙ |