diff options
Diffstat (limited to 'perl/perl-Net-Packet/pod.patch')
-rw-r--r-- | perl/perl-Net-Packet/pod.patch | 162 |
1 files changed, 0 insertions, 162 deletions
diff --git a/perl/perl-Net-Packet/pod.patch b/perl/perl-Net-Packet/pod.patch deleted file mode 100644 index a897c22f8fa1f..0000000000000 --- a/perl/perl-Net-Packet/pod.patch +++ /dev/null @@ -1,162 +0,0 @@ -diff -Nur Net-Packet-3.27.orig/lib/Net/Packet/ARP.pm Net-Packet-3.27/lib/Net/Packet/ARP.pm ---- Net-Packet-3.27.orig/lib/Net/Packet/ARP.pm 2009-11-10 00:58:28.000000000 +0700 -+++ Net-Packet-3.27/lib/Net/Packet/ARP.pm 2013-11-07 22:29:47.938688696 +0700 -@@ -152,7 +152,7 @@ - use Net::Packet::Consts qw(:arp); - require Net::Packet::ARP; - -- # Build a layer -+ # Build a layer - my $layer = Net::Packet::ARP->new( - dstIp => "192.168.0.1", - ); -diff -Nur Net-Packet-3.27.orig/lib/Net/Packet/Consts.pm Net-Packet-3.27/lib/Net/Packet/Consts.pm ---- Net-Packet-3.27.orig/lib/Net/Packet/Consts.pm 2009-11-10 00:58:28.000000000 +0700 -+++ Net-Packet-3.27/lib/Net/Packet/Consts.pm 2013-11-07 22:31:46.338040470 +0700 -@@ -482,10 +482,10 @@ - # Load IPv4 layer constants - use Net::Packet::Consts qw(:ipv4); - -- # Load Ethernet layer constants -+ # Load Ethernet layer constants - use Net::Packet::Consts qw(:eth); - -- # Load Ethernet, IPv6 and TCP layers constants -+ # Load Ethernet, IPv6 and TCP layers constants - use Net::Packet::Consts qw(:eth :ipv6 :tcp); - - =head1 DESCRIPTION -diff -Nur Net-Packet-3.27.orig/lib/Net/Packet/ETH.pm Net-Packet-3.27/lib/Net/Packet/ETH.pm ---- Net-Packet-3.27.orig/lib/Net/Packet/ETH.pm 2009-11-10 00:58:28.000000000 +0700 -+++ Net-Packet-3.27/lib/Net/Packet/ETH.pm 2013-11-07 22:27:54.205272530 +0700 -@@ -137,7 +137,7 @@ - use Net::Packet::Consts qw(:eth); - require Net::Packet::ETH; - -- # Build a layer -+ # Build a layer - my $layer = Net::Packet::ETH->new( - type => NP_ETH_TYPE_IPv6, - dst => "00:11:22:33:44:55", -diff -Nur Net-Packet-3.27.orig/lib/Net/Packet/Frame.pm Net-Packet-3.27/lib/Net/Packet/Frame.pm ---- Net-Packet-3.27.orig/lib/Net/Packet/Frame.pm 2009-11-10 00:58:28.000000000 +0700 -+++ Net-Packet-3.27/lib/Net/Packet/Frame.pm 2013-11-07 22:31:54.161931581 +0700 -@@ -615,8 +615,8 @@ - # will be created automatically, by default. See Net::Packet::Env - # regarding changing this behaviour. Same for Net::Packet::Dump. - my $frame = Net::Packet::Frame->new( -- l3 => $ipv4, # Net::Packet::IPv4 object -- l4 => $tcp, # Net::Packet::TCP object -+ l3 => $ipv4, # Net::Packet::IPv4 object -+ l4 => $tcp, # Net::Packet::TCP object - # (here, a SYN request, for example) - ); - -diff -Nur Net-Packet-3.27.orig/lib/Net/Packet/IPv4.pm Net-Packet-3.27/lib/Net/Packet/IPv4.pm ---- Net-Packet-3.27.orig/lib/Net/Packet/IPv4.pm 2009-11-10 00:58:28.000000000 +0700 -+++ Net-Packet-3.27/lib/Net/Packet/IPv4.pm 2013-11-07 22:27:07.653921003 +0700 -@@ -284,7 +284,7 @@ - use Net::Packet::Consts qw(:ipv4); - require Net::Packet::IPv4; - -- # Build a layer -+ # Build a layer - my $ip = Net::Packet::IPv4->new( - flags => NP_IPv4_DONT_FRAGMENT, - dst => "192.168.0.1", -diff -Nur Net-Packet-3.27.orig/lib/Net/Packet/IPv6.pm Net-Packet-3.27/lib/Net/Packet/IPv6.pm ---- Net-Packet-3.27.orig/lib/Net/Packet/IPv6.pm 2009-11-10 00:58:28.000000000 +0700 -+++ Net-Packet-3.27/lib/Net/Packet/IPv6.pm 2013-11-07 22:29:37.659831761 +0700 -@@ -149,7 +149,7 @@ - use Net::Packet::Consts qw(:ipv6); - require Net::Packet::IPv6; - -- # Build a layer -+ # Build a layer - my $layer = Net::Packet::IPv6->new( - dst => $hostname6, - ); -diff -Nur Net-Packet-3.27.orig/lib/Net/Packet/Layer7.pm Net-Packet-3.27/lib/Net/Packet/Layer7.pm ---- Net-Packet-3.27.orig/lib/Net/Packet/Layer7.pm 2009-11-10 00:58:28.000000000 +0700 -+++ Net-Packet-3.27/lib/Net/Packet/Layer7.pm 2013-11-07 22:26:52.198136331 +0700 -@@ -73,7 +73,7 @@ - - use Net::Packet::Layer7; - -- # Build layer to inject to network -+ # Build layer to inject to network - my $l7a = Net::Packet::Layer7->new(data => "GET / HTTP/1.0\r\n\r\n"); - - # Decode from network to create the object -diff -Nur Net-Packet-3.27.orig/lib/Net/Packet/NULL.pm Net-Packet-3.27/lib/Net/Packet/NULL.pm ---- Net-Packet-3.27.orig/lib/Net/Packet/NULL.pm 2009-11-10 00:58:28.000000000 +0700 -+++ Net-Packet-3.27/lib/Net/Packet/NULL.pm 2013-11-07 22:27:21.244731668 +0700 -@@ -88,7 +88,7 @@ - use Net::Packet::Consts qw(:null); - require Net::Packet::NULL; - -- # Build a layer -+ # Build a layer - my $layer = Net::Packet::NULL->new; - $layer->pack; - -diff -Nur Net-Packet-3.27.orig/lib/Net/Packet/RAW.pm Net-Packet-3.27/lib/Net/Packet/RAW.pm ---- Net-Packet-3.27.orig/lib/Net/Packet/RAW.pm 2009-11-10 00:58:28.000000000 +0700 -+++ Net-Packet-3.27/lib/Net/Packet/RAW.pm 2013-11-07 22:28:29.971774372 +0700 -@@ -59,7 +59,7 @@ - # No constants for RAW - require Net::Packet::RAW; - -- # Build a layer -+ # Build a layer - my $layer = Net::Packet::RAW->new; - $layer->pack; - -diff -Nur Net-Packet-3.27.orig/lib/Net/Packet/SLL.pm Net-Packet-3.27/lib/Net/Packet/SLL.pm ---- Net-Packet-3.27.orig/lib/Net/Packet/SLL.pm 2009-11-10 00:58:28.000000000 +0700 -+++ Net-Packet-3.27/lib/Net/Packet/SLL.pm 2013-11-07 22:28:18.515933924 +0700 -@@ -116,7 +116,7 @@ - use Net::Packet::Consts qw(:sll); - require Net::Packet::SLL; - -- # Build a layer -+ # Build a layer - my $layer = Net::Packet::SLL->new; - $layer->pack; - -diff -Nur Net-Packet-3.27.orig/lib/Net/Packet/TCP.pm Net-Packet-3.27/lib/Net/Packet/TCP.pm ---- Net-Packet-3.27.orig/lib/Net/Packet/TCP.pm 2009-11-10 00:58:28.000000000 +0700 -+++ Net-Packet-3.27/lib/Net/Packet/TCP.pm 2013-11-07 22:32:06.696757148 +0700 -@@ -306,10 +306,10 @@ - use Net::Packet::Consts qw(:tcp); - require Net::Packet::TCP; - -- # Build a layer -+ # Build a layer - my $layer = Net::Packet::TCP->new( - dst => 22, -- options => "\x02\x04\x05\xb4", # MSS=1460 -+ options => "\x02\x04\x05\xb4", # MSS=1460 - ); - $layer->pack; - -diff -Nur Net-Packet-3.27.orig/lib/Net/Packet.pm Net-Packet-3.27/lib/Net/Packet.pm ---- Net-Packet-3.27.orig/lib/Net/Packet.pm 2009-11-10 01:21:00.000000000 +0700 -+++ Net-Packet-3.27/lib/Net/Packet.pm 2013-11-07 22:34:00.512173471 +0700 -@@ -69,13 +69,13 @@ - # WARNING: this is not the prefered way to use Net::Packet - use Net::Packet; - -- # Build IPv4 header -+ # Build IPv4 header - my $ip = Net::Packet::IPv4->new(dst => '192.168.0.1'); - -- # Build TCP header -+ # Build TCP header - my $tcp = Net::Packet::TCP->new(dst => 22); - -- # Assamble frame, it will also open a Net::Packet::DescL3 descriptor -+ # Assamble frame, it will also open a Net::Packet::DescL3 descriptor - # and a Net::Packet::Dump object - my $frame = Net::Packet::Frame->new(l3 => $ip, l4 => $tcp); - |