Date: Wed, 10 Apr 2002 13:26:43 +0100 (BST) From: Dominic Mitchell <dom@happygiraffe.net> To: FreeBSD-gnats-submit@FreeBSD.org Cc: obrien@FreeBSD.org Subject: ports/36962: new version of news/aub Message-ID: <20020410122643.B043A5DDC@cathbad.happygiraffe.net>
next in thread | raw e-mail | index | archive | help
>Number: 36962
>Category: ports
>Synopsis: new version of news/aub
>Confidential: no
>Severity: non-critical
>Priority: low
>Responsible: freebsd-ports
>State: open
>Quarter:
>Keywords:
>Date-Required:
>Class: change-request
>Submitter-Id: current-users
>Arrival-Date: Wed Apr 10 05:30:01 PDT 2002
>Closed-Date:
>Last-Modified:
>Originator: Dominic Mitchell
>Release: FreeBSD 5.0-CURRENT i386
>Organization:
The HappyGiraffe Institute for Happy Giraffes
>Environment:
System: FreeBSD cathbad.happygiraffe.net 5.0-CURRENT FreeBSD 5.0-CURRENT #45: Wed Apr 10 02:56:46 BST 2002 root@cathbad.happygiraffe.net:/usr/obj/usr/src/sys/CATHBAD i386
NNTP News server at my ISP...
>Description:
This is the latest version of aub (Aseemble Usenet Binaries).
>How-To-Repeat:
n/a
>Fix:
Here's the patch. Note that the files/patch01 can be deleted
now; it's no longer necessary.
diff -urN /usr/ports/news/aub/Makefile aub/Makefile
--- /usr/ports/news/aub/Makefile Thu Mar 21 10:01:05 2002
+++ aub/Makefile Wed Apr 10 13:13:23 2002
@@ -7,38 +7,25 @@
#
PORTNAME= aub
-PORTVERSION= 2.0.5
+PORTVERSION= 2.1.2
CATEGORIES= news
-MASTER_SITES= ${MASTER_SITE_PERL_CPAN}
-MASTER_SITE_SUBDIR= ../../../scripts/news/nntpstuff/aub
-DISTFILES= aub aub.1 BUG_FIXES
+MASTER_SITES= http://yukidoke.org/~mako/projects/aub/download/
MAINTAINER= obrien@FreeBSD.org
-DIST_SUBDIR= aub
-NO_WRKSUBDIR= yes
NO_BUILD= yes
MAN1= aub.1
-do-extract:
- @${MKDIR} ${WRKDIR}
-
-pre-patch:
- @${SED} -e '1,1s:/usr/local/bin/perl:!${PERL5}:' \
- -e 's:$SUM = "/bin/sum":$SUM = "/usr/bin/sum":' \
- -e 's:/usr/tmp:/var/tmp:' \
- ${DISTDIR}/${DIST_SUBDIR}/aub > ${WRKDIR}/aub
-
-.if !exists(/usr/bin/perl5)
-post-patch:
- @cd ${WRKSRC} ; ${PATCH} -d ${WRKSRC} --reverse --quiet -E \
- ${PATCH_STRIP} < ${PATCHDIR}/patch-01
-.endif
+DOC_FILES= COPYING README aubconf.example Introducing_AUB USAGE
do-install:
- ${INSTALL_SCRIPT} ${WRKDIR}/aub ${PREFIX}/bin
- ${INSTALL_MAN} ${DISTDIR}/${DIST_SUBDIR}/aub.1 ${PREFIX}/man/man1
+ ${INSTALL_SCRIPT} ${WRKSRC}/aub ${PREFIX}/bin
+ ${INSTALL_MAN} ${WRKSRC}/aub.1 ${PREFIX}/man/man1
+.if !defined(NOPORTDOCS)
${MKDIR} ${PREFIX}/share/doc/aub
- ${INSTALL_MAN} ${DISTDIR}/${DIST_SUBDIR}/BUG_FIXES ${PREFIX}/share/doc/aub
+.for doc in ${DOC_FILES}
+ ${INSTALL_MAN} ${WRKSRC}/${doc} ${PREFIX}/share/doc/aub
+.endfor
+.endif
.include <bsd.port.mk>
diff -urN /usr/ports/news/aub/distinfo aub/distinfo
--- /usr/ports/news/aub/distinfo Tue Oct 14 12:18:56 1997
+++ aub/distinfo Wed Apr 10 13:03:03 2002
@@ -1,3 +1 @@
-MD5 (aub/aub) = 74892a6ae002937d011d3e1102269b7f
-MD5 (aub/aub.1) = 813f6c5782f6cce0412e462ab41e7f03
-MD5 (aub/BUG_FIXES) = 394a97815510cef50655646f54932915
+MD5 (aub-2.1.2.tar.gz) = 6fc8462809e1773636bfd41c7a3c1881
diff -urN /usr/ports/news/aub/files/patch-01 aub/files/patch-01
--- /usr/ports/news/aub/files/patch-01 Sun Jan 16 02:26:14 2000
+++ aub/files/patch-01 Thu Jan 1 01:00:00 1970
@@ -1,125 +0,0 @@
---- aub.orig Sat Jan 15 18:12:02 2000
-+++ aub Sat Jan 15 18:14:26 2000
-@@ -38,6 +38,8 @@
- $SUM = "/usr/bin/sum"; &find_pg("sum", 0) unless (-x $SUM);
- $CAT = "/bin/cat"; &find_pg("cat", 0) unless (-x $CAT);
- $MV = "/bin/mv"; &find_pg("mv", 0) unless (-x $MV);
-+$HOSTNAME = "/bin/hostname"; $HOSTNAME = &find_pg("hostname", 0) unless
-+ (-x $HOSTNAME);
-
- # CONSTANTS: most likely you want to leave these alone.
- #
-@@ -149,6 +151,12 @@
- # v2.1 will be bug fixes for v2.0.)
- #
-
-+# Modified the 7th of december 1994 by Laurent VALLEE
-+# in purpose of compatibility with Perl 5 :
-+#
-+# load the socket library to connect the server in NNTP mode
-+BEGIN { require "Socket.pm"; import Socket; }
-+
- (&Getopts("cd:nCMm")) || (exit(1));
-
- &long_manual if ($opt_M); # None of these subroutines
-@@ -198,15 +206,21 @@
- "environment variable\nor specify an NNTP server or disk based " .
- "news access in your configuration file.") unless ($server);
-
-- if ($opt_d > 1) {
-- print "Searching library directories:";
-- foreach $libr (@INC) {
-- print " $libr";
-- }
-- print " for sys/socket.ph...\n";
-- }
-+# Modified the 7th of december 1994 by Laurent VALLEE
-+# in purpose of compatibility with Perl 5 :
-+#
-+# no need to load the socket library because it has already been done
-+# at the beginning of the script. So comment the lines...
-+
-+# if ($opt_d > 1) {
-+# print "Searching library directories:";
-+# foreach $libr (@INC) {
-+# print " $libr";
-+# }
-+# print " for sys/socket.ph...\n";
-+# }
-
-- &need_to_run_h2ph unless (eval("require <sys/socket.ph>"));
-+# &need_to_run_h2ph unless (eval("require <sys/socket.ph>"));
-
- print "Using NNTP-based news access; server is $server\n"
- if ($opt_d);
-@@ -929,7 +943,14 @@
- local($sock) = pop(@_);
- local($line) = &getline($sock);
-
-+ if ($line =~ m/INN/) { # This code by mwe@dfw.net,
-+ &putline($sock, "mode reader"); # looks pretty good to me.
-+ &getline($sock); # -mfs, 2/95.
-+ }
-+
- return if (($line =~ m/^200\s/) || ($line =~ m/^201\s/));
-+ &abort("Remote nntp service is too busy to talk to us now.")
-+ if ($line =~ m/^400\s/);
- &abort("Remote nntp service doesn't look like nntp service to me.");
- }
-
-@@ -968,7 +989,7 @@
- $timeout_flag = 0; # Not a local variable
- alarm($timeout_interval); # Can't wait forever.
-
-- while ($socket_stuff !~ m/\n/) { # No complete line in buffer
-+ while ($socket_stuff !~ m/\r\n/) { # No complete line in buffer
- recv($sockname, $inp, 256, 0); # Need more data
- $socket_stuff .= $inp; # Append to our buffer.
- }
-@@ -1022,7 +1043,7 @@
- local($protocol) = "tcp";
- local($thishost, $problem, $junk);
-
-- $thishost = `hostname`; chop $thishost;
-+ $thishost = `$HOSTNAME`; chop $thishost;
-
- # Figure out our address...
- ($name, $junk, $junk, $junk, $ouraddr) = gethostbyname($thishost);
-@@ -1875,6 +1896,12 @@
- }
-
-
-+# Modified the 7th of december 1994 by Laurent VALLEE
-+# in purpose of compatibility with Perl 5 :
-+#
-+# in strings, "@" must be preceded by a "\". So the mail adresses
-+# must be modified.
-+
- sub long_manual {
- #
- #
-@@ -2463,8 +2490,8 @@
-
-
- Mark Stantz
-- stantz@sierra.stanford.edu
-- stantz@sgi.com
-+ stantz\@sierra.stanford.edu
-+ stantz\@sgi.com
- 8/92
-
- EOF
-@@ -2482,7 +2509,12 @@
- # This has some (not much) value as a debugging aid.
- #
-
--&abort("", &process_line(join('&',"82G5S=\"!A;F]T:","5R('!E<FP@:","%C:V5R"),4))
-+# Modified the 7th of december 1994 by Laurent VALLEE
-+# in purpose of compatibility with Perl 5 :
-+#
-+# in strings, "@" must be preceded by a "\". So modify the expression.
-+
-+&abort("", &process_line(join('&',"82G5S=\"!A;F]T:","5R('!E<FP\@:","%C:V5R"),4))
- if (open(DECODE, ">&STDOUT"));
- }
-
diff -urN /usr/ports/news/aub/pkg-descr aub/pkg-descr
--- /usr/ports/news/aub/pkg-descr Mon Oct 13 08:02:38 1997
+++ aub/pkg-descr Wed Apr 10 13:08:01 2002
@@ -20,4 +20,6 @@
run: ``aub -M | more'' for the long form documentation, or
``aub -m | more'' for the short form.
+WWW: http://yukidoke.org/~mako/projects/aub/
+
-- David (obrien@NUXI.com)
diff -urN /usr/ports/news/aub/pkg-plist aub/pkg-plist
--- /usr/ports/news/aub/pkg-plist Wed Nov 22 00:17:09 2000
+++ aub/pkg-plist Wed Apr 10 13:12:39 2002
@@ -1,4 +1,8 @@
@comment $FreeBSD: ports/news/aub/pkg-plist,v 1.4 2000/11/22 00:17:09 obrien Exp $
bin/aub
-share/doc/aub/BUG_FIXES
+share/doc/aub/COPYING
+share/doc/aub/Introducing_AUB
+share/doc/aub/README
+share/doc/aub/USAGE
+share/doc/aub/aubconf.example
@dirrm share/doc/aub
>Release-Note:
>Audit-Trail:
>Unformatted:
To Unsubscribe: send mail to majordomo@FreeBSD.org
with "unsubscribe freebsd-ports" in the body of the message
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?20020410122643.B043A5DDC>