/usr/local/CPAN/Audio-SndFile/Audio/SndFile/Constants.pm

• package Audio::SndFile::Constants
• EOF

# Audio::SndFile - perl glue to libsndfile
#
# Copyright (C) 2006 by Joost Diepenmaat, Zeekat Softwareontwikkeling
#
# 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.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.


#
# Note: do not use this module directly. you won't need to, and this code 
# is subject to change without notice.
# 

package Audio::SndFile::Constants;
use strict;
use base 'Exporter';
our @FORMAT_TYPES = qw(
        SF_FORMAT_WAV SF_FORMAT_AIFF SF_FORMAT_AU SF_FORMAT_RAW SF_FORMAT_PAF SF_FORMAT_SVX SF_FORMAT_NIST
        SF_FORMAT_VOC SF_FORMAT_IRCAM SF_FORMAT_W64 SF_FORMAT_MAT4 SF_FORMAT_MAT5 SF_FORMAT_PVF SF_FORMAT_XI
        SF_FORMAT_HTK SF_FORMAT_SDS SF_FORMAT_AVR SF_FORMAT_WAVEX SF_FORMAT_SD2 SF_FORMAT_FLAC SF_FORMAT_CAF
);

our @FORMAT_SUBTYPES = qw(
        SF_FORMAT_PCM_S8 SF_FORMAT_PCM_16 SF_FORMAT_PCM_24 SF_FORMAT_PCM_32 SF_FORMAT_PCM_U8 
        SF_FORMAT_FLOAT SF_FORMAT_DOUBLE SF_FORMAT_ULAW SF_FORMAT_ALAW SF_FORMAT_IMA_ADPCM
        SF_FORMAT_MS_ADPCM SF_FORMAT_GSM610 SF_FORMAT_VOX_ADPCM SF_FORMAT_G721_32 SF_FORMAT_G723_24
        SF_FORMAT_G723_40 SF_FORMAT_DWVW_12 SF_FORMAT_DWVW_16 SF_FORMAT_DWVW_24 SF_FORMAT_DWVW_N
        SF_FORMAT_DPCM_8 SF_FORMAT_DPCM_16 
);

our @ENDIANNESS = qw(SF_ENDIAN_FILE SF_ENDIAN_LITTLE SF_ENDIAN_BIG SF_ENDIAN_CPU);

our @FORMAT_MASKS = qw( SF_FORMAT_SUBMASK SF_FORMAT_TYPEMASK SF_FORMAT_ENDMASK );

our @OPEN_MODES = qw(SFM_READ SFM_WRITE SFM_RDWR); 

our @EXPORT_OK = (@FORMAT_TYPES, @FORMAT_SUBTYPES, @ENDIANNESS, @FORMAT_MASKS, @OPEN_MODES);

our %EXPORT_TAGS = (
    format_types => \@FORMAT_TYPES, 
    format_subtypes => \@FORMAT_SUBTYPES, 
    endianness => \@ENDIANNESS, 
    format_masks => \@FORMAT_MASKS,
    open_modes => \@OPEN_MODES,
    all => \@EXPORT_OK,
);

1;