r41552 - in /trunk/libaudio-flac-decoder-perl: Changes Decoder.pm Decoder.xs MANIFEST META.yml README debian/changelog t/ t/test.flac test.flac test.pl
diocles-guest at users.alioth.debian.org
diocles-guest at users.alioth.debian.org
Sat Aug 8 21:38:22 UTC 2009
Author: diocles-guest
Date: Sat Aug 8 21:38:16 2009
New Revision: 41552
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=41552
Log:
New upstream version.
Added:
trunk/libaudio-flac-decoder-perl/t/
- copied from r41547, branches/upstream/libaudio-flac-decoder-perl/current/t/
Removed:
trunk/libaudio-flac-decoder-perl/test.flac
trunk/libaudio-flac-decoder-perl/test.pl
Modified:
trunk/libaudio-flac-decoder-perl/Changes
trunk/libaudio-flac-decoder-perl/Decoder.pm
trunk/libaudio-flac-decoder-perl/Decoder.xs
trunk/libaudio-flac-decoder-perl/MANIFEST
trunk/libaudio-flac-decoder-perl/META.yml
trunk/libaudio-flac-decoder-perl/README
trunk/libaudio-flac-decoder-perl/debian/changelog
trunk/libaudio-flac-decoder-perl/t/test.flac
Modified: trunk/libaudio-flac-decoder-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-flac-decoder-perl/Changes?rev=41552&op=diff
==============================================================================
--- trunk/libaudio-flac-decoder-perl/Changes (original)
+++ trunk/libaudio-flac-decoder-perl/Changes Sat Aug 8 21:38:16 2009
@@ -1,4 +1,7 @@
Revision history for Perl extension Audio::FLAC::Decoder.
+
+0.3 Mon Nov 24 14:33:34 PST 2008
+ * Patch from Mark Glines to update to the latest FLAC version.
0.01 Fri Jan 3 17:33:52 2003
- original version; created by h2xs 1.21 with options
Modified: trunk/libaudio-flac-decoder-perl/Decoder.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-flac-decoder-perl/Decoder.pm?rev=41552&op=diff
==============================================================================
--- trunk/libaudio-flac-decoder-perl/Decoder.pm (original)
+++ trunk/libaudio-flac-decoder-perl/Decoder.pm Sat Aug 8 21:38:16 2009
@@ -3,7 +3,7 @@
use strict;
use vars qw($VERSION);
-$VERSION = '0.2';
+$VERSION = '0.3';
BOOT_XS: {
# If I inherit DynaLoader then I inherit AutoLoader
@@ -105,7 +105,7 @@
=head1 COPYRIGHT
-Copyright (c) 2004, Dan Sully. All Rights Reserved.
+Copyright (c) 2004-2008, Dan Sully. All Rights Reserved.
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
@@ -114,6 +114,6 @@
=head1 SEE ALSO
-L<Audio::FLAC>
+L<Audio::FLAC::Header>
=cut
Modified: trunk/libaudio-flac-decoder-perl/Decoder.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-flac-decoder-perl/Decoder.xs?rev=41552&op=diff
==============================================================================
--- trunk/libaudio-flac-decoder-perl/Decoder.xs (original)
+++ trunk/libaudio-flac-decoder-perl/Decoder.xs Sat Aug 8 21:38:16 2009
@@ -53,11 +53,20 @@
typedef FLAC__StreamDecoderReadStatus read_status_t;
#define FLACdecoder_new() FLAC__stream_decoder_new()
-#define FLACdecoder_init_stream(q, r, s, t, u, v, w, x, y, z) FLAC__stream_decoder_init_stream(q, r, s, t, u, v, w, x, y, z)
+#define FLACdecoder_init(a,b,c,d,e,f,g,h,i,j) FLAC__stream_decoder_init_stream(a,b,c,d,e,f,g,h,i,j)
#define FLACdecoder_process_metadata(x) FLAC__stream_decoder_process_until_end_of_metadata(x)
#define FLACdecoder_process_single(x) FLAC__stream_decoder_process_single(x)
#define FLACdecoder_finish(x) FLAC__stream_decoder_finish(x)
#define FLACdecoder_delete(x) FLAC__stream_decoder_delete(x)
+#define FLACdecoder_set_read_callback(x, y) FLAC__stream_decoder_set_read_callback(x, y)
+#define FLACdecoder_set_write_callback(x, y) FLAC__stream_decoder_set_write_callback(x, y)
+#define FLACdecoder_set_metadata_callback(x, y) FLAC__stream_decoder_set_metadata_callback(x, y)
+#define FLACdecoder_set_error_callback(x, y) FLAC__stream_decoder_set_error_callback(x, y)
+#define FLACdecoder_set_client_data(x, y) FLAC__stream_decoder_set_client_data(x, y)
+#define FLACdecoder_set_seek_callback(x, y) FLAC__stream_decoder_set_seek_callback(x, y)
+#define FLACdecoder_set_tell_callback(x, y) FLAC__stream_decoder_set_tell_callback(x, y)
+#define FLACdecoder_set_length_callback(x, y) FLAC__stream_decoder_set_length_callback(x, y)
+#define FLACdecoder_set_eof_callback(x, y) FLAC__stream_decoder_set_eof_callback(x, y)
#define FLACdecoder_seek_absolute(x, y) FLAC__stream_decoder_seek_absolute(x, y)
#define FLACdecoder_get_state(x) FLAC__stream_decoder_get_state(x)
@@ -250,7 +259,7 @@
static read_status_t read_callback(
const decoder_t *decoder,
- FLAC__byte buffer[], unsigned *bytes, void *client_data) {
+ FLAC__byte buffer[], size_t *bytes, void *client_data) {
flac_datasource *datasource = (flac_datasource *)client_data;
@@ -258,9 +267,10 @@
datasource->buffer_size = *bytes;
- if (*bytes <= 0) {
+ if (*bytes == 0)
+ return FLAC__STREAM_DECODER_READ_STATUS_END_OF_STREAM;
+ if (*bytes < 0)
return FLAC__STREAM_DECODER_READ_STATUS_ABORT;
- }
return FLAC__STREAM_DECODER_READ_STATUS_CONTINUE;
}
@@ -381,7 +391,16 @@
}
}
- if (FLACdecoder_init_stream(datasource->decoder, read_callback, seek_callback, tell_callback, length_callback, eof_callback, write_callback, meta_callback, error_callback, (void *)datasource) != FLAC__STREAM_DECODER_INIT_STATUS_OK) {
+ if (FLACdecoder_init(datasource->decoder,
+ read_callback,
+ seek_callback,
+ tell_callback,
+ length_callback,
+ eof_callback,
+ write_callback,
+ meta_callback,
+ error_callback,
+ datasource) != FLAC__STREAM_DECODER_INIT_STATUS_OK) {
warn("Failed on initializing the decoder: [%d]\n", FLACdecoder_get_state(datasource->decoder));
Modified: trunk/libaudio-flac-decoder-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-flac-decoder-perl/MANIFEST?rev=41552&op=diff
==============================================================================
--- trunk/libaudio-flac-decoder-perl/MANIFEST (original)
+++ trunk/libaudio-flac-decoder-perl/MANIFEST Sat Aug 8 21:38:16 2009
@@ -5,8 +5,9 @@
MANIFEST
README
TODO
-test.pl
-test.flac
+t/decoder.t
+t/pod.t
+t/test.flac
examples/decode
include/common.h
include/dither.h
Modified: trunk/libaudio-flac-decoder-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-flac-decoder-perl/META.yml?rev=41552&op=diff
==============================================================================
--- trunk/libaudio-flac-decoder-perl/META.yml (original)
+++ trunk/libaudio-flac-decoder-perl/META.yml Sat Aug 8 21:38:16 2009
@@ -1,10 +1,10 @@
# http://module-build.sourceforge.net/META-spec.html
#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
name: Audio-FLAC-Decoder
-version: 0.2
+version: 0.3
version_from: Decoder.pm
installdirs: site
requires:
distribution_type: module
-generated_by: ExtUtils::MakeMaker version 6.21
+generated_by: ExtUtils::MakeMaker version 6.30_01
Modified: trunk/libaudio-flac-decoder-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-flac-decoder-perl/README?rev=41552&op=diff
==============================================================================
--- trunk/libaudio-flac-decoder-perl/README (original)
+++ trunk/libaudio-flac-decoder-perl/README Sat Aug 8 21:38:16 2009
@@ -21,7 +21,7 @@
COPYRIGHT AND LICENCE
-Copyright (c) 2004, Dan Sully. All Rights Reserved.
+Copyright (c) 2004-2008, Dan Sully. All Rights Reserved.
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
Modified: trunk/libaudio-flac-decoder-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-flac-decoder-perl/debian/changelog?rev=41552&op=diff
==============================================================================
--- trunk/libaudio-flac-decoder-perl/debian/changelog (original)
+++ trunk/libaudio-flac-decoder-perl/debian/changelog Sat Aug 8 21:38:16 2009
@@ -1,5 +1,6 @@
-libaudio-flac-decoder-perl (0.2.dfsg-0.2) UNRELEASED; urgency=low
+libaudio-flac-decoder-perl (0.3.dfsg-1) UNRELEASED; urgency=low
+ * New upstream version.
* 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
Modified: trunk/libaudio-flac-decoder-perl/t/test.flac
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-flac-decoder-perl/t/test.flac?rev=41552&op=diff
==============================================================================
Binary files - no diff available.
More information about the Pkg-perl-cvs-commits
mailing list