get everything in

10 files changed, 296 insertions, 0 deletions

diff --git a/net/mirror/Makefile b/net/mirror/Makefile
new file mode 100644
index 00000000000..88c3839de2c
--- /dev/null
+++ b/net/mirror/Makefile
@@ -0,0 +1,23 @@
+# New ports collection makefile for:	mirror
+# Version required:	2.8
+# Date created:		15 May 1995
+# Whom:			torstenb
+#
+# $NetBSD: Makefile,v 1.1.1.1 1997/10/27 05:01:30 hubertf Exp $
+# FreeBSD Id: Makefile,v 1.6 1996/12/01 01:22:54 obrien Exp 
+#
+
+DISTNAME=	mirror-2.8
+CATEGORIES=	net
+MASTER_SITES=	ftp://src.doc.ic.ac.uk/computing/archiving/mirror/
+
+MAINTAINER=	torstenb@FreeBSD.ORG
+
+NO_WRKSUBDIR=	yes
+MAKEFILE=	makefile
+MAN1=		mirror.1 mirrormaster.1
+
+pre-install:
+	${MKDIR} ${PREFIX}/lib/mirror
+
+.include <bsd.port.mk>
diff --git a/net/mirror/files/md5 b/net/mirror/files/md5
new file mode 100644
index 00000000000..382496c7f2c
--- /dev/null
+++ b/net/mirror/files/md5
@@ -0,0 +1 @@
+MD5 (mirror-2.8.tar.gz) = a0a3ffec4b8e0fd71034cab8a0b1b010
diff --git a/net/mirror/patches/patch-aa b/net/mirror/patches/patch-aa
new file mode 100644
index 00000000000..da43444ff3d
--- /dev/null
+++ b/net/mirror/patches/patch-aa
@@ -0,0 +1,75 @@
+*** makefile.orig	Thu Jun  1 21:26:26 1995
+--- makefile	Sat Mar 16 16:19:59 1996
+***************
+*** 6,12 ****
+  	support/cyber-patches support/lstest.pl new-patches-by
+  
+  all:
+! 	echo try make mirror.tar
+  
+  mirror.tar: $(FILES)
+  	rev=`./mirror -v | perl -ane 'print "$$F[2]\n";'`; echo $rev; \
+--- 6,12 ----
+  	support/cyber-patches support/lstest.pl new-patches-by
+  
+  all:
+! #	echo try make mirror.tar
+  
+  mirror.tar: $(FILES)
+  	rev=`./mirror -v | perl -ane 'print "$$F[2]\n";'`; echo $rev; \
+***************
+*** 25,50 ****
+  # mode to install executables
+  EXMODE = 755
+  # group to own all the files
+! GRP = gnu
+  # directory to install .pl (perl library) files
+! PLDIR = /usr/local/perl5/lib/perl5
+  # directory to install public executables
+! BINDIR = /usr/local/sbin
+  # directory to install man pages
+! MANDIR = /usr/local/man/man1
+  
+  install:
+! 	install -m $(PLMODE) -g $(GRP) lchat.pl $(PLDIR)
+! 	install -m $(PLMODE) -g $(GRP) chat2.pl $(PLDIR)
+! 	install -m $(PLMODE) -g $(GRP) dateconv.pl $(PLDIR)
+! 	install -m $(PLMODE) -g $(GRP) ftp.pl $(PLDIR)
+! 	install -m $(PLMODE) -g $(GRP) lsparse.pl $(PLDIR)
+! 	install -m $(EXMODE) -g $(GRP) mirror.pl $(PLDIR)
+! 	install -m $(EXMODE) -g $(GRP) do_unlinks $(BINDIR)
+! 	install -m $(EXMODE) -g $(GRP) pkgs_to_mmin $(BINDIR)
+! 	install -m $(EXMODE) -g $(GRP) mm $(BINDIR)/mirror-master
+! 	install -m $(PLMODE) -g $(GRP) mirror.man $(MANDIR)/mirror.1
+! 	install -m $(PLMODE) -g $(GRP) mm.man $(MANDIR)/mirror-master.1
+  
+  # directory to install .pl (perl library) files for rperl
+  RPLDIR = /usr/local/rperl5/lib/perl5
+--- 25,51 ----
+  # mode to install executables
+  EXMODE = 755
+  # group to own all the files
+! GRP = bin
+  # directory to install .pl (perl library) files
+! PLDIR = ${PREFIX}/lib/mirror
+  # directory to install public executables
+! BINDIR = ${PREFIX}/bin
+  # directory to install man pages
+! MANDIR = ${PREFIX}/man/man1
+  
+  install:
+! 	install -c -m $(PLMODE) -g $(GRP) lchat.pl $(PLDIR)
+! #	install -c -m $(PLMODE) -g $(GRP) chat2.pl $(PLDIR)
+! 	install -c -m $(PLMODE) -g $(GRP) dateconv.pl $(PLDIR)
+! 	install -c -m $(PLMODE) -g $(GRP) ftp.pl $(PLDIR)
+! 	install -c -m $(PLMODE) -g $(GRP) lsparse.pl $(PLDIR)
+! 	install -c -m $(EXMODE) -g $(GRP) mirror.pl $(BINDIR)/mirror
+! 	install -c -m $(EXMODE) -g $(GRP) do_unlinks $(BINDIR)
+! 	install -c -m $(EXMODE) -g $(GRP) pkgs_to_mmin $(BINDIR)
+! 	install -c -m $(EXMODE) -g $(GRP) mm $(BINDIR)/mirrormaster
+! 	install -c -m $(PLMODE) -g $(GRP) mirror.man $(MANDIR)/mirror.1
+! 	install -c -m $(PLMODE) -g $(GRP) mm.man $(MANDIR)/mirrormaster.1
+! 	install -c -m $(PLMODE) -g $(GRP) mirror.defaults $(PLDIR)/mirror.defaults.sample
+  
+  # directory to install .pl (perl library) files for rperl
+  RPLDIR = /usr/local/rperl5/lib/perl5
diff --git a/net/mirror/patches/patch-ab b/net/mirror/patches/patch-ab
new file mode 100644
index 00000000000..5eece767c7a
--- /dev/null
+++ b/net/mirror/patches/patch-ab
@@ -0,0 +1,76 @@
+*** mirror.defaults.orig	Sat Mar 16 15:42:36 1996
+--- mirror.defaults	Sat Mar 16 15:45:41 1996
+***************
+*** 11,37 ****
+  	# The LOCAL hostname - if not the same as `hostname`
+  	# (I advertise the name sunsite.doc.ic.ac.uk but the machine is
+  	#  really phoenix.doc.ic.ac.uk.)
+! 	hostname=sunsite.doc.ic.ac.uk
+  	# Keep all local_dirs relative to here
+! 	local_dir=/public/
+! 	remote_password=ukuug-soft@doc.ic.ac.uk
+  	mail_to=
+  	# Don't mirror file modes.  Set all dirs/files to these
+  	dir_mode=0755
+  	file_mode=0444
+! 	# By defaults files are owned by root.zero
+! 	user=0
+! 	group=0
+  #	# Keep a log file in each updated directory
+  #	update_log=.mirror
+! 	update_log=
+  	# Don't overwrite my mirror log with the remote one.
+  	# Don't pull back any of their mirror temporary files.
+  	# nor any FSP or gopher files...
+  	exclude_patt=(^|/)(\.mirror$|core$|\.cap|\.in\..*\.$|MIRROR\.LOG|#.*#|\.FSP|\.cache|\.zipped|\.notar|\.message|lost\+found/|Network Trash Folder)
+  	# Try to compress everything
+  	compress_patt=.
+! 	compress_prog=compress
+  	# Don't compress information files, files that don't benifit from
+  	# being compressed, files that tell ftpd, gopher, wais... to do things,
+  	# the sources for compression programs...
+--- 11,37 ----
+  	# The LOCAL hostname - if not the same as `hostname`
+  	# (I advertise the name sunsite.doc.ic.ac.uk but the machine is
+  	#  really phoenix.doc.ic.ac.uk.)
+! 	# hostname=sunsite.doc.ic.ac.uk
+  	# Keep all local_dirs relative to here
+! 	local_dir=/home/ftp/pub
+! 	# remote_password=ukuug-soft@doc.ic.ac.uk
+  	mail_to=
+  	# Don't mirror file modes.  Set all dirs/files to these
+  	dir_mode=0755
+  	file_mode=0444
+! 	# By defaults files are owned by root.wheel
+! 	# user=0
+! 	# group=0
+  #	# Keep a log file in each updated directory
+  #	update_log=.mirror
+! 	# update_log=
+  	# Don't overwrite my mirror log with the remote one.
+  	# Don't pull back any of their mirror temporary files.
+  	# nor any FSP or gopher files...
+  	exclude_patt=(^|/)(\.mirror$|core$|\.cap|\.in\..*\.$|MIRROR\.LOG|#.*#|\.FSP|\.cache|\.zipped|\.notar|\.message|lost\+found/|Network Trash Folder)
+  	# Try to compress everything
+  	compress_patt=.
+! 	compress_prog=gzip
+  	# Don't compress information files, files that don't benifit from
+  	# being compressed, files that tell ftpd, gopher, wais... to do things,
+  	# the sources for compression programs...
+***************
+*** 44,50 ****
+  	# shk is multimedia? used on apple2s.
+  	compress_excl+|-z(\d+)?$|\.tgz|_tgz|\.tar\.Z|\.tar\.gz|\.taz$|\.arc$|\.zip$|\.lzh$|\.zoo$|\.exe$|\.lha$|\.zom$|\.gif$|\.jpeg$|\.jpg$|\.mpeg$|\.au$|\.shk$|read.*me|index|info|faq|gzip|compress|(^|/)\.\.?$
+  	# Don't delete own mirror log, .notar or .cache files (incl in subdirs)
+! #	delete_excl=(^|/)\.(mirror|notar|cache)$
+  	# Ignore any local readme and .mirror files
+  	local_ignore=README.doc.ic|(^|/)\.(mirror|notar)$
+  	# Automatically delete local copies of files that the
+--- 44,50 ----
+  	# shk is multimedia? used on apple2s.
+  	compress_excl+|-z(\d+)?$|\.tgz|_tgz|\.tar\.Z|\.tar\.gz|\.taz$|\.arc$|\.zip$|\.lzh$|\.zoo$|\.exe$|\.lha$|\.zom$|\.gif$|\.jpeg$|\.jpg$|\.mpeg$|\.au$|\.shk$|read.*me|index|info|faq|gzip|compress|(^|/)\.\.?$
+  	# Don't delete own mirror log, .notar or .cache files (incl in subdirs)
+! 	delete_excl=(^|/)\.(mirror|notar|cache)$
+  	# Ignore any local readme and .mirror files
+  	local_ignore=README.doc.ic|(^|/)\.(mirror|notar)$
+  	# Automatically delete local copies of files that the
diff --git a/net/mirror/patches/patch-ac b/net/mirror/patches/patch-ac
new file mode 100644
index 00000000000..427f851fb0e
--- /dev/null
+++ b/net/mirror/patches/patch-ac
@@ -0,0 +1,61 @@
+*** mirror.pl.orig	Sat Mar 16 15:46:09 1996
+--- mirror.pl	Sat Mar 16 15:51:49 1996
+***************
+*** 75,81 ****
+  
+  # Try to find the default localation of various programs via
+  # the users PATH then using $extra_path
+! $extra_path = '/usr/local/bin:/usr/new/bin:/usr/public/bin:/usr/ucb:/usr/bin:/bin:/etc:/usr/etc:/usr/local/etc';
+  $ENV{ 'PATH' } .= ':' . $extra_path;
+  
+  &trap_signals();
+--- 75,81 ----
+  
+  # Try to find the default localation of various programs via
+  # the users PATH then using $extra_path
+! $extra_path = '/bin:/sbin:/usr/bin:/usr/sbin:/usr/local/bin:/usr/local/sbin';
+  $ENV{ 'PATH' } .= ':' . $extra_path;
+  
+  &trap_signals();
+***************
+*** 128,146 ****
+  $rm_prog = &find_prog( 'rm' );
+  
+  # Generate checksums
+! $sum_prog = &find_prog( 'sum' );
+  
+  # SPECIAL NOTE: This is eval'd, so DONT put double-quotes (") in it.
+  # You can get local variables to appear as in the second example:
+! $mail_subject = '-s \'mirror update\'';
+! # $mail_subject = ' -s \'mirror update of $package\'';
+  
+  # When scanning the local directory, how often to prod the remote
+  # system to keep the connection alive
+  $prod_interval = 60;
+  
+  # Put the directory that mirror is actually in at the start of PERLLIB.
+! $dir = &real_dir_from_path( $0 );
+  unshift( @INC, $dir );
+  
+  # Make sure that your PERLLIB environment variable can get you
+--- 128,147 ----
+  $rm_prog = &find_prog( 'rm' );
+  
+  # Generate checksums
+! $sum_prog = &find_prog( 'md5' );
+  
+  # SPECIAL NOTE: This is eval'd, so DONT put double-quotes (") in it.
+  # You can get local variables to appear as in the second example:
+! # $mail_subject = '-s \'mirror update\'';
+! $mail_subject = ' -s \'mirror update of $package\'';
+  
+  # When scanning the local directory, how often to prod the remote
+  # system to keep the connection alive
+  $prod_interval = 60;
+  
+  # Put the directory that mirror is actually in at the start of PERLLIB.
+! # $dir = &real_dir_from_path( $0 );
+! $dir = "!!PREFIX!!/lib/mirror";
+  unshift( @INC, $dir );
+  
+  # Make sure that your PERLLIB environment variable can get you
diff --git a/net/mirror/patches/patch-ad b/net/mirror/patches/patch-ad
new file mode 100644
index 00000000000..5ac74eb07ea
--- /dev/null
+++ b/net/mirror/patches/patch-ad
@@ -0,0 +1,36 @@
+*** mirror.pl.orig	Sat Aug 10 12:28:16 1996
+--- mirror.pl	Sat Aug 10 12:28:54 1996
+***************
+*** 3228,3234 ****
+  
+  	&msg( "creating assocs ...\n" ) if $debug > 2;
+  	foreach $map ( @assocs ){
+! 		eval "\$$map = \"\$big_tmp/$map.$$\"";
+  		eval "dbmopen( $map, \$$map, 0644 )";
+  	}
+  	&msg( "creating assocs done\n" ) if $debug > 2;
+--- 3228,3234 ----
+  
+  	&msg( "creating assocs ...\n" ) if $debug > 2;
+  	foreach $map ( @assocs ){
+! 		eval "\$$map = \"\$big_temp/$map.$$\"";
+  		eval "dbmopen( $map, \$$map, 0644 )";
+  	}
+  	&msg( "creating assocs done\n" ) if $debug > 2;
+***************
+*** 3240,3246 ****
+  
+  	&msg( "deleting assocs ...\n" ) if $debug > 2;
+  	foreach $map ( @assocs ){
+! 		eval "\$$map = \"\$big_tmp/$map.$$\"";
+  		eval "dbmclose( $map )";
+  		&unlink_dbm( eval "\$$map" );
+  		eval "\%$map = ()";
+--- 3240,3246 ----
+  
+  	&msg( "deleting assocs ...\n" ) if $debug > 2;
+  	foreach $map ( @assocs ){
+! 		eval "\$$map = \"\$big_temp/$map.$$\"";
+  		eval "dbmclose( $map )";
+  		&unlink_dbm( eval "\$$map" );
+  		eval "\%$map = ()";
diff --git a/net/mirror/pkg/COMMENT b/net/mirror/pkg/COMMENT
new file mode 100644
index 00000000000..96ae71ccb59
--- /dev/null
+++ b/net/mirror/pkg/COMMENT
@@ -0,0 +1 @@
+Mirror packages on remote sites.
diff --git a/net/mirror/pkg/DESCR b/net/mirror/pkg/DESCR
new file mode 100644
index 00000000000..7392d28afd7
--- /dev/null
+++ b/net/mirror/pkg/DESCR
@@ -0,0 +1,5 @@
+Mirror is a package written in Perl that uses the ftp protocol to
+duplicate a directory hierarchy between the machine it is run on and a
+remote host.  It avoids copying files unnecessarily by comparing the
+file timestamps and sizes before transfering.  Amongst other things
+can optionally compress, gzip, and split files.
diff --git a/net/mirror/pkg/PLIST b/net/mirror/pkg/PLIST
new file mode 100644
index 00000000000..3673f7ebedf
--- /dev/null
+++ b/net/mirror/pkg/PLIST
@@ -0,0 +1,11 @@
+bin/mirror
+bin/do_unlinks
+bin/pkgs_to_mmin
+bin/mirrormaster
+lib/mirror/lchat.pl
+lib/mirror/dateconv.pl
+lib/mirror/ftp.pl
+lib/mirror/lsparse.pl
+lib/mirror/mirror.defaults.sample
+man/man1/mirror.1.gz
+man/man1/mirrormaster.1.gz
diff --git a/net/mirror/scripts/configure b/net/mirror/scripts/configure
new file mode 100644
index 00000000000..4bc8105c90f
--- /dev/null
+++ b/net/mirror/scripts/configure
@@ -0,0 +1,7 @@
+#!/bin/sh
+#
+# $Id: configure,v 1.1.1.1 1997/10/27 05:01:31 hubertf Exp $
+#
+
+mv ${WRKSRC}/mirror.pl ${WRKSRC}/mirror.pl.bak
+sed <${WRKSRC}/mirror.pl.bak >${WRKSRC}/mirror.pl s+!!PREFIX!!+$PREFIX+g