Update to 1.0703. No changes available, the included ChangeLog

stops at rev 402... :(

5 files changed, 330 insertions, 236 deletions

diff --git a/net/p5-Net/Makefile b/net/p5-Net/Makefile
index 6d32c576c9f..f8a2888d95e 100644
--- a/net/p5-Net/Makefile
+++ b/net/p5-Net/Makefile
@@ -1,9 +1,9 @@
-# $NetBSD: Makefile,v 1.14 1999/12/02 15:57:28 rh Exp $
+# $NetBSD: Makefile,v 1.15 2000/07/03 11:30:20 mjl Exp $
 # FreeBSD Id: Makefile,v 1.13 1997/06/27 18:38:15 jfitz Exp
 #
 
-DISTNAME=	libnet-1.0607
-PKGNAME=	p5-Net-1.0607
+DISTNAME=	libnet-1.0703
+PKGNAME=	p5-Net-1.0703
 CATEGORIES=	net perl5
 MASTER_SITES=	${MASTER_SITE_PERL_CPAN:=Net/}
 
diff --git a/net/p5-Net/files/md5 b/net/p5-Net/files/md5
index ba7b82363ed..141965d209c 100644
--- a/net/p5-Net/files/md5
+++ b/net/p5-Net/files/md5
@@ -1,3 +1,3 @@
-$NetBSD: md5,v 1.4 1999/12/02 15:57:29 rh Exp $
+$NetBSD: md5,v 1.5 2000/07/03 11:30:21 mjl Exp $
 
-MD5 (libnet-1.0607.tar.gz) = bce57ec6d44f711f6b6fd229efba457f
+MD5 (libnet-1.0703.tar.gz) = 78dc0672a735756ec3c2bba15498cfa0
diff --git a/net/p5-Net/files/patch-sum b/net/p5-Net/files/patch-sum
index 73b0bd5ff75..cb7b8a1eb96 100644
--- a/net/p5-Net/files/patch-sum
+++ b/net/p5-Net/files/patch-sum
@@ -1,3 +1,3 @@
-$NetBSD: patch-sum,v 1.2 1999/12/02 15:57:29 rh Exp $
+$NetBSD: patch-sum,v 1.3 2000/07/03 11:30:21 mjl Exp $
 
-MD5 (patch-aa) = df8bf2ec0cc89657dbc37313537178d6
+MD5 (patch-aa) = 96c1d6c76caebfe3353eb5831195331a
diff --git a/net/p5-Net/patches/patch-aa b/net/p5-Net/patches/patch-aa
index 6a681092914..119e0f0074d 100644
--- a/net/p5-Net/patches/patch-aa
+++ b/net/p5-Net/patches/patch-aa
@@ -1,217 +1,309 @@
-$NetBSD: patch-aa,v 1.5 1999/12/02 15:57:30 rh Exp $
-
---- Configure.orig	Sat Sep 18 17:28:55 1999
-+++ Configure	Thu Dec  2 16:28:54 1999
-@@ -241,18 +241,19 @@
- 
- #---------------------------------------------------------------------------
- 
--if($have_old && !$opt_d)
-- {
--  $msg = <<EDQ;
--
--Ah, I see you already have installed libnet before.
--
--Do you want to modify/update your configuration (y|n) ?
--EDQ
--
-- $opt_d = 1
--	unless get_bool($msg,0);
-- }
-+#if($have_old && !$opt_d)
-+# {
-+#  $msg = <<EDQ;
-+#
-+#Ah, I see you already have installed libnet before.
-+#
-+#Do you want to modify/update your configuration (y|n) ?
-+#EDQ
-+#
-+# $opt_d = 1
-+#	unless get_bool($msg,0);
-+# }
-+$opt_d = 0;
- 
- #---------------------------------------------------------------------------
- 
-@@ -269,7 +270,8 @@
- Do you want me to perform hostname lookups (y|n) ?
- EDQ
- 
--$cfg{'test_exist'} = get_bool($msg, $oldcfg{'test_exist'});
-+#$cfg{'test_exist'} = get_bool($msg, $oldcfg{'test_exist'});
-+$cfg{'test_exist'} = 1;
- 
- print <<EDQ unless $cfg{'test_exist'};
- 
-@@ -284,71 +286,71 @@
- 
- #---------------------------------------------------------------------------
- 
--print <<EDQ;
--
--The following questions all require a list of host names, separated
--with spaces. If you do not have a host available for any of the
--services, then enter a single space, followed by <CR>. To accept the
--default, hit <CR>
--
--EDQ
-+#print <<EDQ;
-+#
-+#The following questions all require a list of host names, separated
-+#with spaces. If you do not have a host available for any of the
-+#services, then enter a single space, followed by <CR>. To accept the
-+#default, hit <CR>
-+#
-+#EDQ
- 
- $msg = 'Enter a list of available NNTP hosts :';
- 
--$def = $oldcfg{'nntp_hosts'} ||
--	[ default_hostname($ENV{NNTPSERVER},$ENV{NEWSHOST},'news') ];
-+#$def = $oldcfg{'nntp_hosts'} ||
-+#	[ default_hostname($ENV{NNTPSERVER},$ENV{NEWSHOST},'news') ];
- 
--$cfg{'nntp_hosts'} = get_host_list($msg,$def);
-+$cfg{'nntp_hosts'} = [ default_hostname($ENV{NNTPSERVER},$ENV{NEWSHOST},'news') ];
- 
- #---------------------------------------------------------------------------
- 
- $msg = 'Enter a list of available SMTP hosts :';
- 
--$def = $oldcfg{'smtp_hosts'} ||
--	[ default_hostname(split(/:/,$ENV{SMTPHOSTS} || ""), 'mailhost') ];
-+#$def = $oldcfg{'smtp_hosts'} ||
-+#	[ default_hostname(split(/:/,$ENV{SMTPHOSTS} || ""), 'mailhost') ];
- 
--$cfg{'smtp_hosts'} = get_host_list($msg,$def);
-+$cfg{'smtp_hosts'} = [ default_hostname(split(/:/,$ENV{SMTPHOSTS} || ""), 'mailhost') ];
- 
- #---------------------------------------------------------------------------
- 
- $msg = 'Enter a list of available POP3 hosts :';
- 
--$def = $oldcfg{'pop3_hosts'} || [];
-+# $def = $oldcfg{'pop3_hosts'} || [];
- 
--$cfg{'pop3_hosts'} = get_host_list($msg,$def);
-+$cfg{'pop3_hosts'} = [];
- 
- #---------------------------------------------------------------------------
- 
- $msg = 'Enter a list of available SNPP hosts :';
- 
--$def = $oldcfg{'snpp_hosts'} || [];
-+#$def = $oldcfg{'snpp_hosts'} || [];
- 
--$cfg{'snpp_hosts'} = get_host_list($msg,$def);
-+$cfg{'snpp_hosts'} = [];
- 
- #---------------------------------------------------------------------------
- 
- $msg = 'Enter a list of available PH Hosts   :'  ;
- 
--$def = $oldcfg{'ph_hosts'} ||
--	[ default_hostname('dirserv') ];
-+#$def = $oldcfg{'ph_hosts'} ||
-+#	[ default_hostname('dirserv') ];
- 
--$cfg{'ph_hosts'}   =  get_host_list($msg,$def);
-+$cfg{'ph_hosts'}   =  [ default_hostname('dirserv') ];
- 
- #---------------------------------------------------------------------------
- 
- $msg = 'Enter a list of available TIME Hosts   :'  ;
- 
--$def = $oldcfg{'time_hosts'} || [];
-+#$def = $oldcfg{'time_hosts'} || [];
- 
--$cfg{'time_hosts'} = get_host_list($msg,$def);
-+$cfg{'time_hosts'} = [];
- 
- #---------------------------------------------------------------------------
- 
- $msg = 'Enter a list of available DAYTIME Hosts   :'  ;
- 
--$def = $oldcfg{'daytime_hosts'} || $oldcfg{'time_hosts'};
-+#$def = $oldcfg{'daytime_hosts'} || $oldcfg{'time_hosts'};
- 
--$cfg{'daytime_hosts'} = get_host_list($msg,$def);
-+$cfg{'daytime_hosts'} = [];
- 
- #---------------------------------------------------------------------------
- 
-@@ -364,9 +366,9 @@
- FTP proxy hostname :
- EDQ
- 
--$def = $oldcfg{'ftp_firewall'} || $ENV{FTP_FIREWALL};
-+#$def = $oldcfg{'ftp_firewall'} || $ENV{FTP_FIREWALL};
- 
--$cfg{'ftp_firewall'} = get_hostname($msg,$def);
-+$cfg{'ftp_firewall'} = $ENV{FTP_FIREWALL};
- 
- #---------------------------------------------------------------------------
- 
-@@ -414,37 +416,37 @@
- 
- #---------------------------------------------------------------------------
- 
--print <<EDQ;
--
--Normally when FTP needs a data connection the client tells the server
--a port to connect to, and the server initiates a connection to the client.
--
--Some setups, in particular firewall setups, can/do not work using this
--protocol. In these situations the client must make the connection to the
--server, this is called a passive transfer.
--EDQ
-+#print <<EDQ;
-+#
-+#Normally when FTP needs a data connection the client tells the server
-+#a port to connect to, and the server initiates a connection to the client.
-+#
-+#Some setups, in particular firewall setups, can/do not work using this
-+#protocol. In these situations the client must make the connection to the
-+#server, this is called a passive transfer.
-+#EDQ
- 
- $msg = "\nShould all FTP connections via a firewall/proxy be passive (y|n) ?";
- 
--$def = $oldcfg{'ftp_ext_passive'} || 0;
-+#$def = $oldcfg{'ftp_ext_passive'} || 0;
- 
--$cfg{'ftp_ext_passive'} = get_bool($msg,$def);
-+$cfg{'ftp_ext_passive'} = 0;
- 
- 
--$def = $oldcfg{'ftp_int_passive'} || 0;
-+#$def = $oldcfg{'ftp_int_passive'} || 0;
- 
- $msg = "\nShould all other FTP connections be passive (y|n) ?";
- 
--$cfg{'ftp_int_passive'} = get_bool($msg,$def);
-+$cfg{'ftp_int_passive'} = 1;
- 
- 
- #---------------------------------------------------------------------------
- 
- $def = $oldcfg{'inet_domain'} || $ENV{LOCALDOMAIN};
- 
--$ans = Prompt("\nWhat is your local internet domain name :",$def);
-+#$ans = Prompt("\nWhat is your local internet domain name :",$def);
- 
--$cfg{'inet_domain'} = ($ans =~ /(\S+)/)[0];
-+$cfg{'inet_domain'} = "";
- 
- #---------------------------------------------------------------------------
- 
-@@ -460,7 +462,7 @@
- Do you want me to run these tests (y|n) ?
- EDQ
- 
--$cfg{'test_hosts'} = get_bool($msg,$oldcfg{'test_hosts'});
-+$cfg{'test_hosts'} = 0;
- 
- #---------------------------------------------------------------------------
- 
+*** Configure.orig	Mon Jan 17 17:44:18 2000
+--- Configure	Mon Jul  3 12:23:05 2000
+***************
+*** 258,275 ****
+  
+  #---------------------------------------------------------------------------
+  
+! if($have_old && !$opt_d)
+!  {
+!   $msg = <<EDQ;
+! 
+! Ah, I see you already have installed libnet before.
+! 
+! Do you want to modify/update your configuration (y|n) ?
+! EDQ
+! 
+!  $opt_d = 1
+! 	unless get_bool($msg,0);
+!  }
+  
+  #---------------------------------------------------------------------------
+  
+--- 258,276 ----
+  
+  #---------------------------------------------------------------------------
+  
+! #if($have_old && !$opt_d)
+! # {
+! #  $msg = <<EDQ;
+! #
+! #Ah, I see you already have installed libnet before.
+! #
+! #Do you want to modify/update your configuration (y|n) ?
+! #EDQ
+! #
+! # $opt_d = 1
+! #	unless get_bool($msg,0);
+! # }
+! $opt_d = 0;
+  
+  #---------------------------------------------------------------------------
+  
+***************
+*** 286,292 ****
+  Do you want me to perform hostname lookups (y|n) ?
+  EDQ
+  
+! $cfg{'test_exist'} = get_bool($msg, $oldcfg{'test_exist'});
+  
+  print <<EDQ unless $cfg{'test_exist'};
+  
+--- 287,293 ----
+  Do you want me to perform hostname lookups (y|n) ?
+  EDQ
+  
+! $cfg{'test_exist'} = 1;
+  
+  print <<EDQ unless $cfg{'test_exist'};
+  
+***************
+*** 301,321 ****
+  
+  #---------------------------------------------------------------------------
+  
+! print <<EDQ;
+! 
+! The following questions all require a list of host names, separated
+! with spaces. If you do not have a host available for any of the
+! services, then enter a single space, followed by <CR>. To accept the
+! default, hit <CR>
+! 
+! EDQ
+  
+  $msg = 'Enter a list of available NNTP hosts :';
+  
+  $def = $oldcfg{'nntp_hosts'} ||
+  	[ default_hostname($ENV{NNTPSERVER},$ENV{NEWSHOST},'news') ];
+  
+! $cfg{'nntp_hosts'} = get_host_list($msg,$def);
+  
+  #---------------------------------------------------------------------------
+  
+--- 302,322 ----
+  
+  #---------------------------------------------------------------------------
+  
+! # print <<EDQ;
+! # 
+! # The following questions all require a list of host names, separated
+! # with spaces. If you do not have a host available for any of the
+! # services, then enter a single space, followed by <CR>. To accept the
+! # default, hit <CR>
+! # 
+! # EDQ
+  
+  $msg = 'Enter a list of available NNTP hosts :';
+  
+  $def = $oldcfg{'nntp_hosts'} ||
+  	[ default_hostname($ENV{NNTPSERVER},$ENV{NEWSHOST},'news') ];
+  
+! $cfg{'nntp_hosts'} = $def;
+  
+  #---------------------------------------------------------------------------
+  
+***************
+*** 324,330 ****
+  $def = $oldcfg{'smtp_hosts'} ||
+  	[ default_hostname(split(/:/,$ENV{SMTPHOSTS} || ""), 'mailhost') ];
+  
+! $cfg{'smtp_hosts'} = get_host_list($msg,$def);
+  
+  #---------------------------------------------------------------------------
+  
+--- 325,331 ----
+  $def = $oldcfg{'smtp_hosts'} ||
+  	[ default_hostname(split(/:/,$ENV{SMTPHOSTS} || ""), 'mailhost') ];
+  
+! $cfg{'smtp_hosts'} = $def;
+  
+  #---------------------------------------------------------------------------
+  
+***************
+*** 332,338 ****
+  
+  $def = $oldcfg{'pop3_hosts'} || [];
+  
+! $cfg{'pop3_hosts'} = get_host_list($msg,$def);
+  
+  #---------------------------------------------------------------------------
+  
+--- 333,339 ----
+  
+  $def = $oldcfg{'pop3_hosts'} || [];
+  
+! $cfg{'pop3_hosts'} = $def;
+  
+  #---------------------------------------------------------------------------
+  
+***************
+*** 340,346 ****
+  
+  $def = $oldcfg{'snpp_hosts'} || [];
+  
+! $cfg{'snpp_hosts'} = get_host_list($msg,$def);
+  
+  #---------------------------------------------------------------------------
+  
+--- 341,347 ----
+  
+  $def = $oldcfg{'snpp_hosts'} || [];
+  
+! $cfg{'snpp_hosts'} = $def;
+  
+  #---------------------------------------------------------------------------
+  
+***************
+*** 349,355 ****
+  $def = $oldcfg{'ph_hosts'} ||
+  	[ default_hostname('dirserv') ];
+  
+! $cfg{'ph_hosts'}   =  get_host_list($msg,$def);
+  
+  #---------------------------------------------------------------------------
+  
+--- 350,356 ----
+  $def = $oldcfg{'ph_hosts'} ||
+  	[ default_hostname('dirserv') ];
+  
+! $cfg{'ph_hosts'}   =  $def;
+  
+  #---------------------------------------------------------------------------
+  
+***************
+*** 357,363 ****
+  
+  $def = $oldcfg{'time_hosts'} || [];
+  
+! $cfg{'time_hosts'} = get_host_list($msg,$def);
+  
+  #---------------------------------------------------------------------------
+  
+--- 358,364 ----
+  
+  $def = $oldcfg{'time_hosts'} || [];
+  
+! $cfg{'time_hosts'} = $def;
+  
+  #---------------------------------------------------------------------------
+  
+***************
+*** 365,371 ****
+  
+  $def = $oldcfg{'daytime_hosts'} || $oldcfg{'time_hosts'};
+  
+! $cfg{'daytime_hosts'} = get_host_list($msg,$def);
+  
+  #---------------------------------------------------------------------------
+  
+--- 366,372 ----
+  
+  $def = $oldcfg{'daytime_hosts'} || $oldcfg{'time_hosts'};
+  
+! $cfg{'daytime_hosts'} = $def;
+  
+  #---------------------------------------------------------------------------
+  
+***************
+*** 378,384 ****
+  (y|n) ?
+  EDQ
+  
+! if(get_bool($msg,0)) {
+  
+    $msg = <<'EDQ';
+  What series of FTP commands do you need to send to your
+--- 379,386 ----
+  (y|n) ?
+  EDQ
+  
+! # XXX Should probably honor USE_SOCKS? --mjl
+! if(0 && get_bool($msg,0)) {
+  
+    $msg = <<'EDQ';
+  What series of FTP commands do you need to send to your
+***************
+*** 489,503 ****
+  
+  #---------------------------------------------------------------------------
+  
+! print <<EDQ;
+! 
+! Normally when FTP needs a data connection the client tells the server
+! a port to connect to, and the server initiates a connection to the client.
+! 
+! Some setups, in particular firewall setups, can/do not work using this
+! protocol. In these situations the client must make the connection to the
+! server, this is called a passive transfer.
+! EDQ
+  
+  if (defined $cfg{'ftp_firewall'}) {
+    $msg = "\nShould all FTP connections via a firewall/proxy be passive (y|n) ?";
+--- 491,505 ----
+  
+  #---------------------------------------------------------------------------
+  
+! # print <<EDQ;
+! # 
+! # Normally when FTP needs a data connection the client tells the server
+! # a port to connect to, and the server initiates a connection to the client.
+! # 
+! # Some setups, in particular firewall setups, can/do not work using this
+! # protocol. In these situations the client must make the connection to the
+! # server, this is called a passive transfer.
+! # EDQ
+  
+  if (defined $cfg{'ftp_firewall'}) {
+    $msg = "\nShould all FTP connections via a firewall/proxy be passive (y|n) ?";
+***************
+*** 515,530 ****
+  
+  $def = $oldcfg{'ftp_int_passive'} || 0;
+  
+! $cfg{'ftp_int_passive'} = get_bool($msg,$def);
+  
+  
+  #---------------------------------------------------------------------------
+  
+! $def = $oldcfg{'inet_domain'} || $ENV{LOCALDOMAIN};
+  
+! $ans = Prompt("\nWhat is your local internet domain name :",$def);
+  
+! $cfg{'inet_domain'} = ($ans =~ /(\S+)/)[0];
+  
+  #---------------------------------------------------------------------------
+  
+--- 517,532 ----
+  
+  $def = $oldcfg{'ftp_int_passive'} || 0;
+  
+! $cfg{'ftp_int_passive'} = 0;
+  
+  
+  #---------------------------------------------------------------------------
+  
+! $def = $oldcfg{'inet_domain'} || $ENV{DOMAIN_NAME};
+  
+! # $ans = Prompt("\nWhat is your local internet domain name :",$def);
+  
+! $cfg{'inet_domain'} = $def;
+  
+  #---------------------------------------------------------------------------
+  
+***************
+*** 540,546 ****
+  Do you want me to run these tests (y|n) ?
+  EDQ
+  
+! $cfg{'test_hosts'} = get_bool($msg,$oldcfg{'test_hosts'});
+  
+  #---------------------------------------------------------------------------
+  
+--- 542,548 ----
+  Do you want me to run these tests (y|n) ?
+  EDQ
+  
+! $cfg{'test_hosts'} = 0;
+  
+  #---------------------------------------------------------------------------
+  
diff --git a/net/p5-Net/pkg/PLIST b/net/p5-Net/pkg/PLIST
index a416998667a..1fdb489c988 100644
--- a/net/p5-Net/pkg/PLIST
+++ b/net/p5-Net/pkg/PLIST
@@ -1,4 +1,16 @@
-@comment $NetBSD: PLIST,v 1.6 1999/12/02 15:57:30 rh Exp $
+@comment $NetBSD: PLIST,v 1.7 2000/07/03 11:30:22 mjl Exp $
+lib/perl5/man/man3/Net::Cmd.3
+lib/perl5/man/man3/Net::Domain.3
+lib/perl5/man/man3/Net::DummyInetd.3
+lib/perl5/man/man3/Net::FTP.3
+lib/perl5/man/man3/Net::NNTP.3
+lib/perl5/man/man3/Net::Netrc.3
+lib/perl5/man/man3/Net::PH.3
+lib/perl5/man/man3/Net::POP3.3
+lib/perl5/man/man3/Net::SMTP.3
+lib/perl5/man/man3/Net::SNPP.3
+lib/perl5/man/man3/Net::Time.3
+lib/perl5/man/man3/Net::libnetFAQ.3
 lib/perl5/site_perl/Net/Cmd.pm
 lib/perl5/site_perl/Net/Config.pm
 lib/perl5/site_perl/Net/Domain.pm
@@ -17,17 +29,7 @@ lib/perl5/site_perl/Net/SMTP.pm
 lib/perl5/site_perl/Net/SNPP.pm
 lib/perl5/site_perl/Net/Time.pm
 lib/perl5/site_perl/Net/libnet.cfg
-lib/perl5/man/man3/Net::Time.3
-lib/perl5/man/man3/Net::DummyInetd.3
-lib/perl5/man/man3/Net::NNTP.3
-lib/perl5/man/man3/Net::SNPP.3
-lib/perl5/man/man3/Net::POP3.3
-lib/perl5/man/man3/Net::SMTP.3
-lib/perl5/man/man3/Net::Domain.3
-lib/perl5/man/man3/Net::FTP.3
-lib/perl5/man/man3/Net::Netrc.3
-lib/perl5/man/man3/Net::Cmd.3
-lib/perl5/man/man3/Net::PH.3
+lib/perl5/site_perl/Net/libnetFAQ.pod
 lib/perl5/site_perl/${MACHINE_ARCH}-${LOWER_OPSYS}/auto/Net/.packlist
 @dirrm lib/perl5/site_perl/Net/FTP
 @dirrm lib/perl5/site_perl/Net