]> git.treefish.org Git - fex.git/blobdiff - cgi-bin/fup
Original release 20160919
[fex.git] / cgi-bin / fup
index 2a799acd3293d2d2cf7768dbfdc2762ae4664f04..9ba0ef27ecc8118654520e4072b6ff655778f9bd 100755 (executable)
@@ -1613,7 +1613,10 @@ sub parse_request {
 
     &check_space($cl) if $cl > 0;
 
 
     &check_space($cl) if $cl > 0;
 
-    $SIG{ALRM} = sub { die "TIMEOUT\n" };
+    $SIG{ALRM} = sub {
+      $SIG{__DIE__} = 'DEFAULT';
+      die "TIMEOUT\n";
+    };
     alarm($timeout);
     binmode(STDIN,':raw');
 
     alarm($timeout);
     binmode(STDIN,':raw');
 
@@ -1942,7 +1945,10 @@ sub showstatus {
     exit;
   }
 
     exit;
   }
 
-  $SIG{ALRM} = sub { die "TIMEOUT in showstatus: no (more) data received\n" };
+  $SIG{ALRM} = sub {
+    $SIG{__DIE__} = 'DEFAULT';
+    die "TIMEOUT in showstatus: no (more) data received\n";
+  };
   alarm($timeout*2);
 
   $t0 = $t1 = time;
   alarm($timeout*2);
 
   $t0 = $t1 = time;