michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-06-01 18:50:26 +01:00
Code Issues Actions 3 Packages Projects Releases Wiki Activity

Give better responses to RPC read failures

Browse Source
This commit is contained in:
Jamie Cameron
2013-02-05 23:08:47 -08:00
parent 84d5d0dd85
commit 90ab177f80
1 changed files with 10 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
web-lib-funcs.pl
View File

@@ -6484,9 +6484,16 @@ if ($serv->{'fast'} || !$sn) {
my $rlen = int($rstr);
my ($fromstr, $got);
while(length($fromstr) < $rlen) {
return &$main::remote_error_handler(
"Failed to read from fastrpc.cgi : $!")
if (read($fh, $got, $rlen - length($fromstr)) <= 0);
my $want = $rlen - length($fromstr);
my $readrv = read($fh, $got, $want);
if ($readrv < 0 || !defined($readrv)) {
return &$main::remote_error_handler(
"Failed to read from fastrpc.cgi : $!")
}
elsif ($readrv == 0) {
return &$main::remote_error_handler(
"Read of $want bytes from fastrpc.cgi failed")
}
$fromstr .= $got;
}
my $from = &unserialise_variable($fromstr);