Page 1 of 1
change or bug?
Posted: 06 Feb 2007, 12:58
by Snarfster
not sure what changed but used to be able to download .exe files from explorer when clicking on file name OR right click on file name then choose save target as...
now I get this when clicking on file...
[url]https://xxx.xx.xxx.xxx:xxxx/cgi/addon_cse.cgi?do=view&p=/home/bob/tester&f=snarfer.0.7.2.exe#new[/url]
and it opens a window with file as a text file
OR
right-click method brings up file name/type as addon_cse.htm
thoughts? thanks much.
Bug on managing content-type declaration
Posted: 15 Apr 2007, 13:27
by matteo
It seems a bug to me.
Find below the way I fixed it:
Code: Select all
$ diff -u addon_cse.cgi.orig addon_cse.cgi
--- addon_cse.cgi.orig 2007-01-08 10:12:10.000000000 +0100
+++ addon_cse.cgi 2007-04-15 14:10:45.392933920 +0200
@@ -14,7 +14,7 @@
require 'parseform.pl';
if (!$ACL{all}) {
- print "Content-type: text/html\r\n\r\n";
+ print "Content-type: text/html\n\n";
print "You do not have access to access the ConfigServer Explorer.\n";
exit;
}
@@ -24,8 +24,6 @@
my %form = parseform();
-print "Content-type: text/html\r\n\r\n";
-
$webpath = '/';
$script = 'addon_cse.cgi';
$demo = 0;
@@ -35,9 +33,11 @@
exit;
}
elsif ($form{do} eq "console") {
+ print "Content-type: text/html\n\n";
defheader("ConfigServer Explorer Console Command Output");
}
else {
+ print "Content-type: text/html\n\n";
defheader("ConfigServer Explorer");
}
@@ -771,8 +771,8 @@
my @data = <IN>;
close (IN);
-print STDOUT "content-type: application/octet-stream\n";
-print STDOUT "content-disposition: inline; filename=$form{f}\n\n";
+print STDOUT "Content-type: application/octet-stream\n";
+print STDOUT "Content-disposition: inline; filename=$form{f}\n\n";
binmode (STDOUT);
print STDOUT @data;
HTH,
Matteo
Managing also the Content-size header
Posted: 15 Apr 2007, 14:04
by matteo
Here is the previous patch proposal plus Content-size header to help browser progress bar:
Code: Select all
$ diff -u addon_cse.cgi.orig addon_cse.cgi
--- addon_cse.cgi.orig 2007-01-08 10:12:10.000000000 +0100
+++ addon_cse.cgi 2007-04-15 14:55:18.994484704 +0200
@@ -14,7 +14,7 @@
require 'parseform.pl';
if (!$ACL{all}) {
- print "Content-type: text/html\r\n\r\n";
+ print "Content-type: text/html\n\n";
print "You do not have access to access the ConfigServer Explorer.\n";
exit;
}
@@ -24,8 +24,6 @@
my %form = parseform();
-print "Content-type: text/html\r\n\r\n";
-
$webpath = '/';
$script = 'addon_cse.cgi';
$demo = 0;
@@ -35,9 +33,11 @@
exit;
}
elsif ($form{do} eq "console") {
+ print "Content-type: text/html\n\n";
defheader("ConfigServer Explorer Console Command Output");
}
else {
+ print "Content-type: text/html\n\n";
defheader("ConfigServer Explorer");
}
@@ -766,13 +766,16 @@
# start view
sub view {
-open (IN, "<$webpath$form{p}/$form{f}") or die $!;
+my $file = "$webpath$form{p}/$form{f}";
+open (IN, "< $file") or die $!;
+my $size = (-s "$file");
binmode (IN);
my @data = <IN>;
close (IN);
-print STDOUT "content-type: application/octet-stream\n";
-print STDOUT "content-disposition: inline; filename=$form{f}\n\n";
+print STDOUT "Content-type: application/octet-stream\n";
+print STDOUT "Content-length: $size\n";
+print STDOUT "Content-disposition: inline; filename=$form{f}\n\n";
binmode (STDOUT);
print STDOUT @data;