function dakcleanup() {
log "Cleanup old packages/files"
dak clean-suites -m 10000
- # XXX: reactivate once clean-queues is fixed
- #dak clean-queues
+ dak clean-queues -i "$unchecked"
}
function buildd_dir() {
log 'Creating Maintainers index ... '
cd $indices
- dak make-maintainers ${scriptdir}/masterfiles/pseudo-packages.maintainers
+ dak make-maintainers -a ftp-master ${scriptdir}/masterfiles/pseudo-packages.maintainers
gzip -9v --rsyncable <Maintainers >Maintainers.gz
gzip -9v --rsyncable <Uploaders >Uploaders.gz
}
log "Querying postgres"
local query="
- SELECT CONCAT('./pool/', c.name, '/', f.filename) AS path, a.arch_string AS arch_string
+ SELECT './pool/' || c.name || '/' || f.filename AS path, a.arch_string AS arch_string
FROM files f
JOIN files_archive_map af ON f.id = af.file_id
JOIN component c ON af.component_id = c.id
local suite_id="$(printf %d $1)"
local query
query="
- SELECT DISTINCT CONCAT('./pool/', c.name, '/', f.filename)
+ SELECT DISTINCT './pool/' || c.name || '/' || f.filename
FROM
(SELECT sa.source AS source
FROM src_associations sa
psql -F' ' -A -t -c "$query"
query="
- SELECT CONCAT('./pool/', c.name, '/', f.filename)
+ SELECT './pool/' || c.name || '/' || f.filename
FROM bin_associations ba
JOIN binaries b ON ba.bin = b.id
JOIN files f ON b.file = f.id
function dm() {
log "Updating DM html page"
$scriptsdir/dm-monitor >$webdir/dm-uploaders.html
+ dak acl export-per-source dm >$exportdir/dm.txt
}
function bts() {