Date: Sun, 5 Apr 2009 16:50:08 -0500 From: "Zane C.B." <vvelox@vvelox.net> To: "FreeBSD gnats submit" <FreeBSD-gnats-submit@FreeBSD.org> Subject: ports/133404: net-port: ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates Finds upgraded and downgraded packages using the ports INDEX. Message-ID: <1238968208.56039@vixen42.vulpes> Resent-Message-ID: <200904052150.n35Lo1fE042670@freefall.freebsd.org>
next in thread | raw e-mail | index | archive | help
>Number: 133404
>Category: ports
>Synopsis: net-port: ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates Finds upgraded and downgraded packages using the ports INDEX.
>Confidential: no
>Severity: non-critical
>Priority: low
>Responsible: freebsd-ports-bugs
>State: open
>Quarter:
>Keywords:
>Date-Required:
>Class: change-request
>Submitter-Id: current-users
>Arrival-Date: Sun Apr 05 21:50:00 UTC 2009
>Closed-Date:
>Last-Modified:
>Originator: Zane C.B.
>Release: FreeBSD 6.4-STABLE i386
>Organization:
>Environment:
System: FreeBSD 6.4-STABLE #3: Sun Mar 29 22:03:29 CDT 2009
kitsune@vixen42.vulpes:/usr/obj/usr/src/sys/vixen42
>Description:
http://search.cpan.org/~vvelox/FreeBSD-Pkgs-FindUpdates-0.2.1/lib/FreeBSD/Pkgs/FindUpdates.pm
SYNOPSIS
This does use FreeBSD::Ports::INDEXhash. Thus if you want to specifiy the location of the index file, you will want to see the supported methodes for it in that module.
use FreeBSD::Pkgs::FindUpdates;
#initiates the module
my $pkgsupdate = FreeBSD::Pkgs::FindUpdates->new();
#finds changes
my %changes=$pkgsupdate->find();
#prints the upgraded stuff
while(my ($name, $pkg) = each %{$changes{upgrade}}){
print $name.' updated from "'.
$pkg->{oldversion}.'" to "'.
$pkg->{newversion}."\"\n";
}
#prints the downgraded stuff
while(my ($name, $pkg) = each %{$changes{upgrade}}){
print $name.' updated from "'.
$pkg->{oldversion}.'" to "'.
$pkg->{newversion}."\"\n";
}
>How-To-Repeat:
1: Check to see if it exists in the ports tree.
2:
3: See it does not.
4: Unshar and enjoy.
>Fix:
--- FreeBSD-Pkgs-FindUpdates.shar begins here ---
# This is a shell archive. Save it in a file, remove anything before
# this line, and then unpack it by entering "sh file". Note, it may
# create directories; files and directories will be owned by you and
# have default permissions.
#
# This archive contains:
#
# ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/
# ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/distinfo
# ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/pkg-descr
# ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/pkg-plist
# ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/Makefile
#
echo c - ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/
mkdir -p ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/ > /dev/null 2>&1
echo x - ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/distinfo
sed 's/^X//' >ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/distinfo << '443a63a5d77bbcf062dab73903d826d6'
XMD5 (FreeBSD-Pkgs-FindUpdates-0.2.1.tar.gz) = 41073a1cc3e2a78a17dbb5559d10692f
XSHA256 (FreeBSD-Pkgs-FindUpdates-0.2.1.tar.gz) = 5f2da445b54e75cf2ef0ab7d7224422fcb7bfe4ee6ce44a02bec74e4d0729a22
XSIZE (FreeBSD-Pkgs-FindUpdates-0.2.1.tar.gz) = 7544
443a63a5d77bbcf062dab73903d826d6
echo x - ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/pkg-descr
sed 's/^X//' >ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/pkg-descr << 'e0561b8eafb81be0ec959c184fd9be88'
XFinds updates for FreeBSD pkgs by checking the ports index.
X
Xpkg_findupdates - Finds updated packages.
Xpkg_bupdate - Perform a binary packages update.
X
XWWW: http://search.cpan.org/dist/FreeBSD-Pkgs-FindUpdates/
e0561b8eafb81be0ec959c184fd9be88
echo x - ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/pkg-plist
sed 's/^X//' >ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/pkg-plist << '6c4dd202f88456538cfa433e32cbf3ff'
X%%SITE_PERL%%/FreeBSD/Pkgs/FindUpdates.pm
X%%SITE_PERL%%/%%PERL_ARCH%%/auto/FreeBSD/Pkgs/FindUpdates/.packlist
X@dirrmtry %%SITE_PERL%%/%%PERL_ARCH%%/auto/FreeBSD/Pkgs
X@dirrmtry %%SITE_PERL%%/%%PERL_ARCH%%/auto/FreeBSD
X@dirrmtry %%SITE_PERL%%/FreeBSD/Pkgs
X@dirrmtry %%SITE_PERL%%/FreeBSD
Xbin/pkg_findupdates
Xbin/pkg_bupdate
6c4dd202f88456538cfa433e32cbf3ff
echo x - ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/Makefile
sed 's/^X//' >ports-mgmt/p5-FreeBSD-Pkgs-FindUpdates/Makefile << '8006c60db0cb093854e7302de2639817'
X# New ports collection makefile for: p5-FreeBSD-Pkgs-Findupdates
X# Date created: 2009-04-01
X# Whom: Zane C, Bowers <vvelox@vvelox.net>
X#
X# $FreeBSD$
X#
X
XPORTNAME= FreeBSD-Pkgs-FindUpdates
XPORTVERSION= 0.2.1
XCATEGORIES= ports-mgmt sysutils perl5
XMASTER_SITES= CPAN
XMASTER_SITE_SUBDIR= ../../authors/id/V/VV/VVELOX
XPKGNAMEPREFIX= p5-
XDISTNAME= ${PORTNAME}-${PORTVERSION}
X
XMAINTAINER= vvelox@vvelox.net
XCOMMENT= Finds updates for FreeBSD pkgs by checking the ports index
X
XRUN_DEPENDS= ${SITE_PERL}/FreeBSD/Ports/INDEXhash.pm:${PORTSDIR}/ports-mgmt/p5-FreeBSD-Ports-INDEXhash \
X ${SITE_PERL}/FreeBSD/Pkgs.pm:${PORTSDIR}/ports-mgmt/p5-FreeBSD-Pkgs \
X ${SITE_PERL}/Sort/Versions.pm:${PORTSDIR}/devel/p5-Sort-Versions
X
XPERL_CONFIGURE= yes
X
XMAN3= FreeBSD::Pkgs::FindUpdates.3
X
X.include <bsd.port.mk>
8006c60db0cb093854e7302de2639817
exit
--- FreeBSD-Pkgs-FindUpdates.shar ends here ---
>Release-Note:
>Audit-Trail:
>Unformatted:
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?1238968208.56039>