File perl-MP3-Info.spec of Package perl-MP3-Info
#
# spec file for package perl-MP3-Info
#
# Copyright (c) 2019 SUSE LINUX GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
# upon. The license for this file, and modifications and additions to the
# file, is the same license as for the pristine package itself (unless the
# license for the pristine package is not an Open Source License, in which
# case the license is the MIT License). An "Open Source License" is a
# license that conforms to the Open Source Definition (Version 1.9)
# published by the Open Source Initiative.
# Please submit bugfixes or comments via https://bugs.opensuse.org/
#
Name: perl-MP3-Info
Version: 1.26
Release: 0
%define cpan_name MP3-Info
Summary: Manipulate / fetch info from MP3 audio files
License: Artistic-1.0 OR GPL-1.0-or-later
Group: Development/Libraries/Perl
Url: https://metacpan.org/release/%{cpan_name}
Source0: https://cpan.metacpan.org/authors/id/J/JM/JMERELO/%{cpan_name}-%{version}.tar.gz
BuildArch: noarch
BuildRoot: %{_tmppath}/%{name}-%{version}-build
BuildRequires: perl
BuildRequires: perl-macros
%{perl_requires}
%description
* $mp3 = MP3::Info->new(FILE)
OOP interface to the rest of the module. The same keys available via
get_mp3info and get_mp3tag are available via the returned object (using
upper case or lower case; but note that all-caps "VERSION" will return the
module version, not the MP3 version).
Passing a value to one of the methods will set the value for that tag in
the MP3 file, if applicable.
* use_mp3_utf8([STATUS])
Tells MP3::Info to (or not) return TAG info in UTF-8. TRUE is 1, FALSE is
0. Default is TRUE, if available.
Will only be able to turn it on if Encode is available. ID3v2 tags will be
converted to UTF-8 according to the encoding specified in each tag; ID3v1
tags will be assumed Latin-1 and converted to UTF-8.
Function returns status (TRUE/FALSE). If no argument is supplied, or an
unaccepted argument is supplied, function merely returns status.
This function is not exported by default, but may be exported with the
':utf8' or ':all' export tag.
* use_winamp_genres()
Puts WinAmp genres into '@mp3_genres' and '%mp3_genres' (adds 68 additional
genres to the default list of 80). This is a separate function because
these are non-standard genres, but they are included because they are
widely used.
You can import the data structures with one of:
use MP3::Info qw(:genres);
use MP3::Info qw(:DEFAULT :genres);
use MP3::Info qw(:all);
* remove_mp3tag (FILE [, VERSION, BUFFER])
Can remove ID3v1 or ID3v2 tags. VERSION should be '1' for ID3v1 (the
default), '2' for ID3v2, and 'ALL' for both.
For ID3v1, removes last 128 bytes from file if those last 128 bytes begin
with the text 'TAG'. File will be 128 bytes shorter.
For ID3v2, removes ID3v2 tag. Because an ID3v2 tag is at the beginning of
the file, we rewrite the file after removing the tag data. The buffer for
rewriting the file is 4MB. BUFFER (in bytes) ca change the buffer size.
Returns the number of bytes removed, or -1 if no tag removed, or undef if
there is an error.
* set_mp3tag (FILE, TITLE, ARTIST, ALBUM, YEAR, COMMENT, GENRE [,
TRACKNUM])
* set_mp3tag (FILE, $HASHREF)
Adds/changes tag information in an MP3 audio file. Will clobber any
existing information in file.
Fields are TITLE, ARTIST, ALBUM, YEAR, COMMENT, GENRE. All fields have a
30-byte limit, except for YEAR, which has a four-byte limit, and GENRE,
which is one byte in the file. The GENRE passed in the function is a
case-insensitive text string representing a genre found in '@mp3_genres'.
Will accept either a list of values, or a hashref of the type returned by
'get_mp3tag'.
If TRACKNUM is present (for ID3v1.1), then the COMMENT field can only be 28
bytes.
ID3v2 support may come eventually. Note that if you set a tag on a file
with ID3v2, the set tag will be for ID3v1[.1] only, and if you call
'get_mp3tag' on the file, it will show you the (unchanged) ID3v2 tags,
unless you specify ID3v1.
* get_mp3tag (FILE [, VERSION, RAW_V2, APE2])
Returns hash reference containing tag information in MP3 file. The keys
returned are the same as those supplied for 'set_mp3tag', except in the
case of RAW_V2 being set.
If VERSION is '1', the information is taken from the ID3v1 tag (if
present). If VERSION is '2', the information is taken from the ID3v2 tag
(if present). If VERSION is not supplied, or is false, the ID3v1 tag is
read if present, and then, if present, the ID3v2 tag information will
override any existing ID3v1 tag info.
If RAW_V2 is '1', the raw ID3v2 tag data is returned, without any
manipulation of text encoding. The key name is the same as the frame ID (ID
to name mappings are in the global %v2_tag_names).
If RAW_V2 is '2', the ID3v2 tag data is returned, manipulating for Unicode
if necessary, etc. It also takes multiple values for a given key (such as
comments) and puts them in an arrayref.
If APE is '1', an APE tag will be located before all other tags.
If the ID3v2 version is older than ID3v2.2.0 or newer than ID3v2.4.0, it
will not be read.
Strings returned will be in Latin-1, unless UTF-8 is specified
(use_mp3_utf8), (unless RAW_V2 is '1').
Also returns a TAGVERSION key, containing the ID3 version used for the
returned data (if TAGVERSION argument is '0', may contain two versions).
* get_mp3info (FILE)
Returns hash reference containing file information for MP3 file. This data
cannot be changed. Returned data:
VERSION MPEG audio version (1, 2, 2.5)
LAYER MPEG layer description (1, 2, 3)
STEREO boolean for audio is in stereo
VBR boolean for variable bitrate
BITRATE bitrate in kbps (average for VBR files)
FREQUENCY frequency in kHz
SIZE bytes in audio stream
OFFSET bytes offset that stream begins
SECS total seconds
MM minutes
SS leftover seconds
MS leftover milliseconds
TIME time in MM:SS
COPYRIGHT boolean for audio is copyrighted
PADDING boolean for MP3 frames are padded
MODE channel mode (0 = stereo, 1 = joint stereo,
2 = dual channel, 3 = single channel)
FRAMES approximate number of frames
FRAME_LENGTH approximate length of a frame
VBR_SCALE VBR scale from VBR header
On error, returns nothing and sets '$@'.
%prep
%setup -q -n %{cpan_name}-%{version}
%build
PERL_USE_UNSAFE_INC=1 perl Makefile.PL INSTALLDIRS=vendor
make %{?_smp_mflags}
%check
make test
%install
%perl_make_install
%perl_process_packlist
%perl_gen_filelist
%files -f %{name}.files
%defattr(-,root,root,755)
%doc Changes README.md
%changelog
