--- libaudio-flac-decoder-perl-0.3+dfsg.orig/debian/watch +++ libaudio-flac-decoder-perl-0.3+dfsg/debian/watch @@ -0,0 +1,6 @@ +# format version number, currently 3; this line is compulsory! +version=3 +opts="dversionmangle=s/\+dfsg//" \ +http://search.cpan.org/dist/Audio-FLAC-Decoder/ \ +.*/Audio-FLAC-Decoder-v?(\d[\d.-]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)$ \ +debian sh debian/repack.stub --- libaudio-flac-decoder-perl-0.3+dfsg.orig/debian/README.source +++ libaudio-flac-decoder-perl-0.3+dfsg/debian/README.source @@ -0,0 +1,16 @@ +1. Repacking upstream tarballs + +The upstream tarball of this package has been repacked to replace the +non-free t/test.flac file. + +Repacking is automated via the repack.stub/repack.local mechanism, +which will be called by uscan. See the documentation in +debian/repack.stub for more details about getting this working. + +2. Patch system + +This package uses quilt to manage all modifications to the upstream +source. Changes are stored in the source package as diffs in +debian/patches and applied during the build. + +See /usr/share/doc/quilt/README.source for a detailed explanation. --- libaudio-flac-decoder-perl-0.3+dfsg.orig/debian/rules +++ libaudio-flac-decoder-perl-0.3+dfsg/debian/rules @@ -0,0 +1,4 @@ +#!/usr/bin/make -f + +%: + dh --with quilt $@ --- libaudio-flac-decoder-perl-0.3+dfsg.orig/debian/libaudio-flac-decoder-perl.examples +++ libaudio-flac-decoder-perl-0.3+dfsg/debian/libaudio-flac-decoder-perl.examples @@ -0,0 +1 @@ +examples/* --- libaudio-flac-decoder-perl-0.3+dfsg.orig/debian/copyright +++ libaudio-flac-decoder-perl-0.3+dfsg/debian/copyright @@ -0,0 +1,51 @@ +Format-Specification: http://svn.debian.org/wsvn/dep/web/deps/dep5.mdwn?op=file&rev=59 +Maintainer: Dan Sully +Source: http://search.cpan.org/dist/Audio-FLAC-Decoder/ +Name: Audio-FLAC-Decoder + +Files: * +Copyright: 2004-2008, Dan Sully +License: GPL-2+ + +Files: dither.c +Copyright: 2002,2003,2004 Josh Coalson + 2000-2001 Robert Leslie +License: GPL-2+ + +Files: replaygain_synthesis.c +Copyright: 2002,2003,2004 Josh Coalson + 2002, John Edwards +License: GPL-2+ + +Files: debian/* +Copyright: 2005, 2006, Timo Schneider + 2008, Aurelien Jarno + 2008, Niko Tyni + 2008, Riku Voipio + 2009, Tim Retout +License: Artistic or GPL-1+ + +License: Artistic + This program is free software; you can redistribute it and/or modify + it under the terms of the Artistic License, which comes with Perl. + . + On Debian GNU/Linux systems, the complete text of the Artistic License + can be found in `/usr/share/common-licenses/Artistic' + +License: GPL-1+ + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 1, or (at your option) + any later version. + . + On Debian GNU/Linux systems, the complete text of the GNU General + Public License can be found in `/usr/share/common-licenses/GPL' + +License: GPL-2+ + This program is free software; you can redistribute it and/or modify it + under the terms of the GNU General Public License as published by the + Free Software Foundation; either version 2 of the License, or (at + your option) any later version. + . + On Debian GNU/Linux systems, the complete text of the GNU General + Public License, version 2 can be found in `/usr/share/common-licenses/GPL-2' --- libaudio-flac-decoder-perl-0.3+dfsg.orig/debian/repack.stub +++ libaudio-flac-decoder-perl-0.3+dfsg/debian/repack.stub @@ -0,0 +1,82 @@ +#!/bin/sh + +: <<=cut +=pod + +=head1 NAME + +repack.stub - script to repack upstream tarballs from uscan + +=head1 INSTRUCTIONS + +put this in debian/repack.stub and add "debian sh debian/repack.stub" to +the end of the line in debian/watch. you will also need to add a version +mangle to debian/watch. + +then create a debian/repack.local. this is a shell script that is +sources under "set -e", so be careful to check returns codes. + +=head1 FUNCTIONS + +=over 4 + +=item rm + +rm is replaced by a function that does some magic ("rm -rv" by default), but also changes MANIFEST if $MANIFEST is 1 + +=item mv + +mv is replaced by a function that just does mv (by default), but also changes MANIFEST if $MANIFEST is 1 + +=item requires_version + +requires_version is there for future usage for requiring certain versions of the script + +=back + +=head1 VARIABLES + +=over 4 + +=item SUFFIX + +defaults to +dfsg + +what to append to the upstream version + +=item RM_OPTS + +defaults to -vrf + +options to pass to rm + +=item MANIFEST + +defaults to 0, set to 1 to turn on. + +this will manipulate MANIFEST files in CPAN tarballs. + +=item UP_BASE + +this is the directory where the upstream source is. + +=back + +=cut + +if [ -z "$REPACK_SH" ]; then + if [ -f ../../scripts/repack.sh ]; then + REPACK_SH=../../scripts/repack.sh + fi + if [ -z "$REPACK_SH" ] && which repack.sh > /dev/null; then + REPACK_SH=$(which repack.sh) + fi +fi + +if [ ! -f "$REPACK_SH" ]; then + echo "Couldn't find a repack.sh. please put it in your PATH, put it at ../../scripts/repack.sh, or put it somewhere else and set the REPACK_SH variable" + echo "You can get it from http://svn.debian.org/viewsvn/pkg-perl/scripts/repack.sh" + exit 1 +fi + +exec "$REPACK_SH" "$@" --- libaudio-flac-decoder-perl-0.3+dfsg.orig/debian/compat +++ libaudio-flac-decoder-perl-0.3+dfsg/debian/compat @@ -0,0 +1 @@ +7 --- libaudio-flac-decoder-perl-0.3+dfsg.orig/debian/control +++ libaudio-flac-decoder-perl-0.3+dfsg/debian/control @@ -0,0 +1,26 @@ +Source: libaudio-flac-decoder-perl +Section: perl +Priority: optional +Build-Depends: debhelper (>= 7.0.8), quilt (>= 0.46-7), libflac-dev, perl, + libtest-pod-perl +Maintainer: Debian Perl Group +Uploaders: Tim Retout +Standards-Version: 3.8.3 +Homepage: http://search.cpan.org/dist/Audio-FLAC-Decoder/ +Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libaudio-flac-decoder-perl/ +Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libaudio-flac-decoder-perl/ + +Package: libaudio-flac-decoder-perl +Architecture: any +Depends: ${misc:Depends}, ${perl:Depends}, ${shlibs:Depends} +Description: Perl module providing an object-oriented FLAC decoder + The Audio::FLAC::Decoder module provides users with Decoder objects for FLAC + files. One can read data in PCM format from the stream, seek by pcm samples, + or time. + . + FLAC stands for Free Lossless Audio Codec. Grossly oversimplified, FLAC is + similar to MP3, but lossless, meaning that audio is compressed in FLAC without + any loss in quality. This is similar to how Zip works, except with FLAC you + will get much better compression because it is designed specifically for audio + and you can play back compressed FLAC files in your favorite player just like + you would an MP3 file. --- libaudio-flac-decoder-perl-0.3+dfsg.orig/debian/changelog +++ libaudio-flac-decoder-perl-0.3+dfsg/debian/changelog @@ -0,0 +1,88 @@ +libaudio-flac-decoder-perl (0.3+dfsg-1build3) trusty; urgency=low + + * Rebuild for Perl 5.18. + + -- Colin Watson Mon, 21 Oct 2013 09:43:25 +0100 + +libaudio-flac-decoder-perl (0.3+dfsg-1build2) precise; urgency=low + + * Rebuild for Perl 5.14. + + -- Colin Watson Tue, 15 Nov 2011 17:10:50 +0000 + +libaudio-flac-decoder-perl (0.3+dfsg-1build1) oneiric; urgency=low + + * Rebuild for Perl 5.12. + + -- Colin Watson Sun, 08 May 2011 07:08:55 +0100 + +libaudio-flac-decoder-perl (0.3+dfsg-1) unstable; urgency=low + + [ Tim Retout ] + * New maintainer. (Closes: #507386) + * New upstream version. + * Remove changes to Decoder.xs from Debian diff; fixed upstream. + * Move test fixes from diff into dfsg-fix-tests.patch + * debian/compat: Bump debhelper compatibility level to 7. + * debian/control: + + Added: Vcs-Svn field (source stanza); Vcs-Browser field + (source stanza); Homepage field (source stanza); ${misc:Depends} + to Depends: field. Changed: Maintainer set to Debian Perl Group + (was: Timo + Schneider ) + + Add quilt to build dependencies. Bump required debhelper version. + + Add libtest-pod-perl to Build-Depends. + + Bump Standards-Version to 3.8.3. + + Add self to Uploaders. + + Remove version from perl Build-Depends. + * debian/rules: Use short dh7/quilt rules file. + * debian/watch: use dist-based URL, dversionmangle and repack stub. + * debian/repack.stub, debian/repack.local: New scripts to repack tarball. + * debian/README.source: Add standard quilt instructions, and details of + repacking upstream tarballs. + * debian/copyright: Use DEP-5 format copyright file. + * debian/libaudio-flac-decoder-perl.examples: New file. + * debian/patches/dithering.patch: New patch to fix problem in dithering + code. (Closes: #501250) + + [ gregor herrmann ] + * debian/control: mention module name in long description. + + -- Tim Retout Mon, 02 Nov 2009 23:54:34 +0000 + +libaudio-flac-decoder-perl (0.2.dfsg-0.1) unstable; urgency=medium + + * Non-maintainer upload. + * Replace copyrighted test.flac with a snip of recording of RMS singing + the free software song, closes: #501301 + * Adjust testsuite to match new testfile + + -- Riku Voipio Mon, 27 Oct 2008 21:18:25 +0200 + +libaudio-flac-decoder-perl (0.2-2.2) unstable; urgency=low + + * Non-maintainer upload for the Perl 5.10 transition. + * Don't try to remove /usr/share/perl5 if it doesn't exist. (Closes: #463554) + + -- Niko Tyni Thu, 03 Apr 2008 14:32:26 +0300 + +libaudio-flac-decoder-perl (0.2-2.1) unstable; urgency=low + + * Non-maintainer upload. + * Update to FLAC 1.1.4 API (Closes: #427748, #451862, #426665). + + -- Aurelien Jarno Tue, 15 Jan 2008 17:25:16 +0100 + +libaudio-flac-decoder-perl (0.2-2) unstable; urgency=low + + * Updated standards-version to 3.7.2. + * Added binary-indep target to debian/rules (Closes: #395704). + + -- Timo Schneider Thu, 16 Nov 2006 19:23:04 +0100 + +libaudio-flac-decoder-perl (0.2-1) unstable; urgency=low + + * Initial Release (Closes: #295989). + + -- Timo Schneider Mon, 31 Oct 2005 13:29:38 +0100 + --- libaudio-flac-decoder-perl-0.3+dfsg.orig/debian/repack.local +++ libaudio-flac-decoder-perl-0.3+dfsg/debian/repack.local @@ -0,0 +1,4 @@ +# I suppose the alternative to this is encoding the new test.flac in +# this script. -- Tim Retout , 2009-10-26 + +wget -O t/test.flac http://svn.debian.org/viewsvn/pkg-perl/branches/upstream/libaudio-flac-decoder-perl/0.2.dfsg/test.flac?revision=41525 --- libaudio-flac-decoder-perl-0.3+dfsg.orig/debian/patches/dithering.patch +++ libaudio-flac-decoder-perl-0.3+dfsg/debian/patches/dithering.patch @@ -0,0 +1,44 @@ +Author: Daniel Barlow +Origin: http://bugs.debian.org/cgi-bin/bugreport.cgi?msg=10;filename=Decoder.patch;att=1;bug=501250 +Description: Fix broken dithering. +Bug-Debian: http://bugs.debian.org/501250 + +Index: libaudio-flac-decoder-perl/Decoder.xs +=================================================================== +--- libaudio-flac-decoder-perl.orig/Decoder.xs 2009-11-01 19:31:59.000000000 +0000 ++++ libaudio-flac-decoder-perl/Decoder.xs 2009-11-02 22:33:15.000000000 +0000 +@@ -489,11 +489,32 @@ + const unsigned n = min(datasource->wide_samples_in_reservoir, SAMPLES_PER_WRITE); + const unsigned delta = n * channels; + unsigned i; +- ++ FLAC__byte *out=datasource->sample_buffer; ++ /* + int bytes = (int)pack_pcm_signed_little_endian( + datasource->sample_buffer, datasource->reservoir, n, channels, bps, bps + ); +- ++ bps==bps (trivially) so all the fancy dithering stuff ++ that pack_pcm_signed_little_endian might do will ++ never get called. Let's just do it inline ++ */ ++ int bytes; ++ for(i=0; ireservoir)[i]; ++ switch(bps) { ++ case 8: ++ out[0] = sample ^ 0x80; ++ break; ++ case 24: ++ out[2] = (FLAC__byte)(sample >> 16); ++ /* fall through */ ++ case 16: ++ out[1] = (FLAC__byte)(sample >> 8); ++ out[0] = (FLAC__byte)sample; ++ } ++ out+=bps/8; ++ } ++ bytes=(out-datasource->sample_buffer); + for (i = delta; i < datasource->wide_samples_in_reservoir * channels; i++) { + datasource->reservoir[i-delta] = datasource->reservoir[i]; + } --- libaudio-flac-decoder-perl-0.3+dfsg.orig/debian/patches/series +++ libaudio-flac-decoder-perl-0.3+dfsg/debian/patches/series @@ -0,0 +1,2 @@ +dfsg-fix-tests.patch +dithering.patch --- libaudio-flac-decoder-perl-0.3+dfsg.orig/debian/patches/dfsg-fix-tests.patch +++ libaudio-flac-decoder-perl-0.3+dfsg/debian/patches/dfsg-fix-tests.patch @@ -0,0 +1,37 @@ +Author: Riku Voipio +Description: Adjust tests to match new dfsg test.flac. +Bug-Debian: http://bugs.debian.org/501301 + +--- libaudio-flac-decoder-perl-0.3.dfsg.orig/t/decoder.t ++++ libaudio-flac-decoder-perl-0.3.dfsg/t/decoder.t +@@ -13,14 +13,14 @@ + my $buffer; + ok($flac->sysread($buffer)); + ok($flac->bits_per_sample == 16); +-ok($flac->channels == 2); +-ok($flac->sample_rate == 44100); ++ok($flac->channels == 1); ++ok($flac->sample_rate == 8000); + + #ok($flac->raw_total); + #ok($flac->pcm_total); + #ok($flac->time_total); + +-ok($flac->raw_tell(), 14403); ++ok($flac->raw_tell(), 10800); + + #ok($flac->time_tell); + +@@ -31,10 +31,10 @@ + # seek 5 seconds in. + # Windows seems to be off by 1 byte. Why? + if ($^O !~ /win32/i) { +- ok($flac->time_seek(5), 437488); ++ ok($flac->time_seek(4), 10800); + + # XXX - should check time_tell +- ok($flac->raw_tell(), 437488); ++ ok($flac->raw_tell(), 142501); + } + + # test opening from a glob