r50965 - in /trunk/libquota-perl: CHANGES MANIFEST META.yml Quota.pm Quota.xs README debian/changelog

jawnsy-guest at users.alioth.debian.org jawnsy-guest at users.alioth.debian.org
Thu Jan 14 21:52:13 UTC 2010


Author: jawnsy-guest
Date: Thu Jan 14 21:52:05 2010
New Revision: 50965

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=50965
Log:
New upstream release

Modified:
    trunk/libquota-perl/CHANGES
    trunk/libquota-perl/MANIFEST
    trunk/libquota-perl/META.yml
    trunk/libquota-perl/Quota.pm
    trunk/libquota-perl/Quota.xs
    trunk/libquota-perl/README
    trunk/libquota-perl/debian/changelog

Modified: trunk/libquota-perl/CHANGES
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libquota-perl/CHANGES?rev=50965&op=diff
==============================================================================
--- trunk/libquota-perl/CHANGES (original)
+++ trunk/libquota-perl/CHANGES Thu Jan 14 21:52:05 2010
@@ -1,3 +1,7 @@
+Changes in 1.6.4 (January 2010)
+- Fixed RPC quota block count truncation to 32bit (CPAN ticket 52813 )
+  Thanks to Lloyd Brown for reporting the bug
+
 Changes in 1.6.3 (December 2008)
 - Fixed SEG fault for 32-bit Linux clients on top of 64-bit kernels
   Thanks to Jani Ollikainen (pronetko.fi) for reporting and debugging this.

Modified: trunk/libquota-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libquota-perl/MANIFEST?rev=50965&op=diff
==============================================================================
--- trunk/libquota-perl/MANIFEST (original)
+++ trunk/libquota-perl/MANIFEST Thu Jan 14 21:52:05 2010
@@ -7,7 +7,6 @@
 Quota.xs
 linuxapi.c
 afsquota.c
-vxquotactl.c
 stdio_wrap.c
 README
 test.pl

Modified: trunk/libquota-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libquota-perl/META.yml?rev=50965&op=diff
==============================================================================
--- trunk/libquota-perl/META.yml (original)
+++ trunk/libquota-perl/META.yml Thu Jan 14 21:52:05 2010
@@ -1,7 +1,7 @@
 --- #YAML:1.0
 name: Quota
 abstract: Quota - Perl interface to file system quotas
-version: 1.6.3
+version: 1.6.4
 author:
   - Tom Zoerner <tomzo at users.sourceforge.net>
 license: perl

Modified: trunk/libquota-perl/Quota.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libquota-perl/Quota.pm?rev=50965&op=diff
==============================================================================
--- trunk/libquota-perl/Quota.pm (original)
+++ trunk/libquota-perl/Quota.pm Thu Jan 14 21:52:05 2010
@@ -1,5 +1,5 @@
 # ------------------------------------------------------------------------ #
-# Quota.pm - Copyright (C) 1995-2007 Tom Zoerner
+# Quota.pm - Copyright (C) 1995-2010 Tom Zoerner
 # ------------------------------------------------------------------------ #
 # This program is free software: you can redistribute it and/or modify
 # it either under the terms of the Perl Artistic License or the GNU
@@ -22,7 +22,7 @@
 @ISA = qw(Exporter DynaLoader);
 @EXPORT = ();
 
-$VERSION = '1.6.3';
+$VERSION = '1.6.4';
 
 bootstrap Quota;
 

Modified: trunk/libquota-perl/Quota.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libquota-perl/Quota.xs?rev=50965&op=diff
==============================================================================
--- trunk/libquota-perl/Quota.xs (original)
+++ trunk/libquota-perl/Quota.xs Thu Jan 14 21:52:05 2010
@@ -190,12 +190,18 @@
       dqp->QS_BCUR = gq_rslt.GQR_RQUOTA.rq_curblocks;
 #else /* not buggy */
       if (gq_rslt.GQR_RQUOTA.rq_bsize >= DEV_QBSIZE) {
+        /* assign first, multiply later:
+        ** so that mult works with the possibly larger type in dqp */
+        dqp->QS_BHARD = gq_rslt.GQR_RQUOTA.rq_bhardlimit;
+        dqp->QS_BSOFT = gq_rslt.GQR_RQUOTA.rq_bsoftlimit;
+        dqp->QS_BCUR = gq_rslt.GQR_RQUOTA.rq_curblocks;
+
 	/* we rely on the fact that block sizes are always powers of 2 */
 	/* so the conversion factor will never be a fraction */
         int qb_fac = gq_rslt.GQR_RQUOTA.rq_bsize / DEV_QBSIZE;
-	dqp->QS_BHARD = gq_rslt.GQR_RQUOTA.rq_bhardlimit * qb_fac;
-	dqp->QS_BSOFT = gq_rslt.GQR_RQUOTA.rq_bsoftlimit * qb_fac;
-	dqp->QS_BCUR = gq_rslt.GQR_RQUOTA.rq_curblocks * qb_fac;
+	dqp->QS_BHARD *= qb_fac;
+	dqp->QS_BSOFT *= qb_fac;
+	dqp->QS_BCUR *= qb_fac;
       }
       else {
         int qb_fac = DEV_QBSIZE / gq_rslt.GQR_RQUOTA.rq_bsize;

Modified: trunk/libquota-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libquota-perl/README?rev=50965&op=diff
==============================================================================
--- trunk/libquota-perl/README (original)
+++ trunk/libquota-perl/README Thu Jan 14 21:52:05 2010
@@ -3,8 +3,8 @@
 
 Author:    Tom Zoerner (tomzo AT users.sourceforge.net)
 
-Version:   1.6.3
-Date:      December 2008
+Version:   1.6.4
+Date:      January 2010
 DLSIP-Code:Rcdfg
            - stable release
            - C compiler required for installation

Modified: trunk/libquota-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libquota-perl/debian/changelog?rev=50965&op=diff
==============================================================================
--- trunk/libquota-perl/debian/changelog (original)
+++ trunk/libquota-perl/debian/changelog Thu Jan 14 21:52:05 2010
@@ -1,8 +1,12 @@
-libquota-perl (1.6.3+dfsg-3) UNRELEASED; urgency=low
+libquota-perl (1.6.4+dfsg-1) UNRELEASED; urgency=low
 
+  [ Jonathan Yu ]
+  * New upstream release
+
+  [ Ryan Niebur ]
   * Update ryan52's email address
 
- -- Ryan Niebur <ryan at debian.org>  Fri, 25 Sep 2009 00:26:10 -0700
+ -- Jonathan Yu <jawnsy at cpan.org>  Thu, 14 Jan 2010 16:57:12 -0500
 
 libquota-perl (1.6.3+dfsg-2) unstable; urgency=low
 




More information about the Pkg-perl-cvs-commits mailing list