net-analyzer/chaosreader: remove unused patches

Signed-off-by: Michael Mair-Keimberger <m.mairkeimberger@gmail.com>
Closes: https://github.com/gentoo/gentoo/pull/12450
Signed-off-by: Michał Górny <mgorny@gentoo.org>
This commit is contained in:
Michael Mair-Keimberger
2019-07-15 20:55:37 +02:00
committed by Michał Górny
parent bebd2316cf
commit c591db2cc6
5 changed files with 0 additions and 82 deletions

View File

@@ -1,27 +0,0 @@
--- chaosreader 2011-11-10 19:17:50.000000000 +0100
+++ chaosreader-0.94 2012-03-09 18:15:21.096105305 +0100
@@ -5350,6 +5353,24 @@
next if length($http_data) < 8;
$partnum++;
$parttext = sprintf("%02d",$partnum);
+
+ ## from https://sourceforge.net/tracker/?func=detail&aid=2019799&group_id=107384&atid=647491
+ ### Chunk Check
+ if ( $http_header =~ /Transfer-Encoding: chunked/ ) {
+ my $new_http_data="";
+ my $chunksize=-1;
+ my $pos=0;
+ until ($chunksize==0) {
+ my $eolpos=index($http_data,"\r\n",$pos);
+ $chunksize=hex(substr($http_data,$pos,$eolpos - $pos));
+ $pos=($eolpos+2);
+ if ($chunksize > 0) {
+ $new_http_data.=substr($http_data,$pos,$chunksize);
+ }
+ $pos+=($chunksize+2);
+ }
+ $http_data=$new_http_data;
+ }
### Part - Checks
$http_type = &File_Type($http_data);

View File

@@ -1,11 +0,0 @@
--- chaosreader 2011-11-10 19:17:50.000000000 +0100
+++ chaosreader-0.94 2012-03-09 18:15:21.096105305 +0100
@@ -6233,6 +6254,8 @@
$command = "tcpdump -s9999 -w";
} elsif ($^O eq "solaris") {
$command = "snoop -o";
+ } elsif ($^O eq "darwin") {
+ $command = "tcpdump -i en1 -s9999 -w";
} else {
die "ERROR54: Can't find the sniffer command for \"$^O\".\n" .
"\t Please use log mode instead.\n";

View File

@@ -1,18 +0,0 @@
--- chaosreader 2011-11-10 19:17:50.000000000 +0100
+++ chaosreader-0.94 2012-03-09 18:15:21.096105305 +0100
@@ -4028,7 +4024,14 @@
### This causes the replay program to pause
print REPLAY "ms($timediff1);\n";
}
- $speed = sprintf("%.2f",$bytes / (1024 * $duration));
+ # avoid division by zero
+ # from https://sourceforge.net/tracker/?func=detail&aid=2210488&group_id=107384&atid=647489
+ if ( $duration > 0 ) {
+ $speed = sprintf("%.2f",$bytes / (1024 * $duration));
+ }
+ else {
+ $speed = "unknown";
+ }
print REPLAY "print \"\n\n" .
"Summary: $duration2 seconds, $bytes bytes, $speed Kb/sec\\n\";";
close REPLAY;

View File

@@ -1,15 +0,0 @@
--- chaosreader 2012-01-18 21:47:02.000000000 +0100
+++ chaosreader-0.94 2012-03-13 12:10:44.740136742 +0100
@@ -259,12 +259,6 @@
$| = 1; # flush output
#
-# The following is needed for old perl5 multiline matching. New perl5 uses
-# a "/s" on the RE (which is used in this program as well).
-#
-$* = 1; # old perl5
-
-#
# These ports have been selected to be saved as coloured 2-way HTML files
#
@Save_As_HTML_TCP_Ports = (21,23,25,79,80,109,110,119,143,513,514,1080,

View File

@@ -1,11 +0,0 @@
--- chaosreader-orig 2006-12-24 15:12:23.000000000 +0100
+++ chaosreader-0.94 2006-12-24 15:11:56.000000000 +0100
@@ -396,6 +395,8 @@ if ($Arg{normal}) {
elsif ($Arg{standalone}) {
+ $SIG{CHLD} = "IGNORE";
+
############################################################
# --- STANDALONE - Create Packet Logs and Process them ---
#