c section (e.g. libs or utils)
P previous state
E in case of Dep-Wait the packages being waited on, in case of Needs-Build the number in the queue
+F in case of Failed the fail reason
D in case of BD-Uninstallable the reason for the uninstallability
d distribution
t time of state change
'E' => make_fmt( sub { return $pkg->{'depends'} if $pkg->{'state'} eq "Dep-Wait";
return $var->{scnt}{'Needs-Build'} + 1 if $pkg->{'state'} eq 'Needs-Build';
return ""; }, $pkg, $var),
+ 'F' => make_fmt( sub { return "" unless $pkg->{'failed'};
+ return $pkg->{'package'}."#".$arch."-failure\n ".
+ join("\\0a",split("\n",$pkg->{'failed'}))."\\0a\n"; }, $pkg, $var),
'D' => make_fmt( sub { return "" unless $pkg->{'bd_problem'};
return $pkg->{'package'}."#".$arch."-bd-problem\n".
join("\\0a",split("\n",$pkg->{'bd_problem'}))."\\0a\n"; }, $pkg, $var),
sub get_readonly_source_info {
my $name = shift;
# SELECT FLOOR(EXTRACT('epoch' FROM age(localtimestamp, '2010-01-22 23:45')) / 86400) -- change to that?
- my $pkg = $dbh->selectrow_hashref('SELECT *, extract(days from date_trunc(\'days\', now() - state_change::timestamp)) as state_days FROM ' .
+ my $pkg = $dbh->selectrow_hashref('SELECT *, extract(days from date_trunc(\'days\', now() - state_change)) as state_days FROM ' .
table_name() . ' WHERE package = ? AND distribution = ?',
undef, $name, $distribution);
return $pkg;
sub get_source_info {
my $name = shift;
- my $pkg = $dbh->selectrow_hashref('SELECT *, extract(days from date_trunc(\'days\', now() - state_change::timestamp)) as state_days FROM ' .
+ my $pkg = $dbh->selectrow_hashref('SELECT *, extract(days from date_trunc(\'days\', now() - state_change)) as state_days FROM ' .
table_name() . ' WHERE package = ? AND distribution = ?' .
' FOR UPDATE',
undef, $name, $distribution);
my %options = @_;
my $q = 'SELECT *, '.
- 'extract(days from date_trunc(\'days\', now() - state_change::timestamp)) as state_days, '.
- 'date_trunc(\'seconds\', now() - state_change::timestamp) as state_time'.
+ 'extract(days from date_trunc(\'days\', now() - state_change)) as state_days, '.
+ 'date_trunc(\'seconds\', now() - state_change) as state_time'.
' FROM ' . table_name()
. ' WHERE distribution = ? ';
my @args = ($distribution);
}
if ($options{list_min_age} > 0) {
- $q .= ' AND age(state_change::timestamp) > ? ';
+ $q .= ' AND age(state_change) > ? ';
push @args, $options{list_min_age} . " days";
}
if ($options{list_min_age} < 0) {
- $q .= ' AND age(state_change::timestamp) < ? ';
+ $q .= ' AND age(state_change) < ? ';
push @args, -$options{list_min_age} . " days";
}