vndb/fu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Minor changes & fixes

Browse source
This commit is contained in:
Yorhel 2025-04-23 16:12:39 +02:00
parent 8096de7497
commit 13271fa413
3 changed files with 8 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

7
FU/DebugImpl.pm
View file

@ -4,7 +4,7 @@ use v5.36;
use experimental 'for_list';
use FU;
use FU::XMLWriter ':html5_', 'fragment', 'xml_escape';
use Time::HiRes 'time';
use Time::HiRes 'time', 'clock_gettime', 'CLOCK_MONOTONIC';
use POSIX 'strftime';
sub fmtts { strftime '%Y-%m-%d %H:%M:%S UTC', gmtime shift }
@ -15,7 +15,8 @@ sub loc_($loc) {
br_ if $_;
my $l = $loc->[$_];
my $f = $_ == $#$loc ? '(main)' : $loc->[$_+1][3];
txt_ "$l->[1]:$l->[2] $f";
$f = "$l->[0]::$f" if $f !~ /^\Q$l->[0]/;
txt_ "$f @ $l->[1]:$l->[2]";
}
}
@ -35,7 +36,7 @@ my @tabs = (
tr_ sub { td_ 'Path'; td_ fu->path };
tr_ sub { td_ 'Query'; td_ fu->query };
tr_ sub { td_ 'Client IP'; td_ fu->ip };
tr_ sub { td_ 'Received'; td_ fmtts $FU::REQ->{trace_start} };
tr_ sub { td_ 'Received'; td_ fmtts(time - (($FU::REQ->{trace_end}||clock_gettime(CLOCK_MONOTONIC)) - $FU::REQ->{trace_start})) };
};
h2_ 'Headers';
table_ sub {