diff options
Diffstat (limited to 'tests/list1.at')
| -rw-r--r-- | tests/list1.at | 64 |
1 files changed, 64 insertions, 0 deletions
diff --git a/tests/list1.at b/tests/list1.at new file mode 100644 index 0000000..80d869b --- /dev/null +++ b/tests/list1.at @@ -0,0 +1,64 @@ +# This file is part of idest -*- autotest -*- +# Copyright (C) 2011 Sergey Poznyakoff +# +# Idest 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 3, or (at your option) +# any later version. +# +# Idest 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 idest. If not, see <http://www.gnu.org/licenses/>. + +AT_SETUP([examples: list1]) +AT_KEYWORDS([script examples list1]) + +AT_CHECK([ +PREREQ_GUILE + +genfile -f file1 -s $abs_srcdir/id3v1 10k +genfile -f file2 -p $abs_srcdir/id3v2 10k + +idest -N -S $abs_top_srcdir/examples/list1.scm file1 file2 +], +[0], +[file1 +(TIT2 (descr . Title/songname/content description) (text . File)) +(TPE1 (descr . Lead performer(s)/soloist(s)) (text . Sergey Poznyakoff)) +(TALB (descr . Album/movie/show title) (text . Idest Test Suite)) +(TDRC (descr . Recording time) (text . 2011)) +(TRCK (descr . Track number/position in set) (text . 1)) +(TCON (descr . Content type) (text . Other)) +(COMM (descr . Comments) (text . Sample ID3 headers for idest) (lang . XXX) (condesc . )) +file2 +(TIT2 (descr . Title/songname/content description) (text . File)) +(TALB (descr . Album/movie/show title) (text . Idest Test Suite)) +(TRCK (descr . Track number/position in set) (text . 1)) +(COMM (descr . Comments) (text . Sample ID3 headers for idest testsuite) (lang . eng) (condesc . )) +(TPE1 (descr . Lead performer(s)/soloist(s)) (text . Sergey Poznyakoff)) +(TDRC (descr . Recording time) (text . 2011)) +(TCON (descr . Content type) (text . Sample headers)) +(TCOP (descr . Copyright message) (text . This file is part of Idest Copyright (C) 2009-2011 Sergey Poznyakoff Idest 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 3, or (at your option) any later version. Idest 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 Idest. If not, see <http://www.gnu.org/licenses/>.)) +(TENC (descr . Encoded by) (text . Idest)) +(USLT (descr . Unsynchronised lyric/text transcription) (text . IdEst is an ID3 Edit and Scripting Tool, a command line utility for +manipulating ID3 tags. ID3 tag is a metadata container which supplies +related information for a MP3 audio file. It allows information such +as the title, artist, album, track number, etc. to be stored in the file +itself. + +The idest utility allows to create new tags, and to view, +modify or delete the existing ones. When compiled with Guile, +IdEst allows you to write programs of arbitrary complexity for +manipulating ID3 tags and to apply them to any number of files.) (lang . eng) (condesc . )) +(WPUB (descr . Publishers official webpage) (text . http://www.gnu.org.ua/software/idest)) +(WXXX (descr . User defined URL link frame) (text . http://www.gnu.org.ua/software/idest/manual) (condesc . documentation)) +(WXXX (descr . User defined URL link frame) (text . http://gray.gnu.org.ua) (condesc . author)) +(APIC (descr . Attached picture) (text . 89504E470D0A1A0A0000000D4948445200000020000000200806000000737A7AF4000000017352474200AECE1CE900000006624B474400FF00FF00FFA0BDA793000000097048597300000B1300000B1301009A9C180000000774494D4507DB071C093A2D7365CBF80000001974455874436F6D6D656E74004372656174656420776974682047494D5057810E17000000954944415458C3ED56D10A002108D3E8FF7F79F7D421125D696107FA16452E5D6E0C00141885826309003313339BF7AFAC40F55EB0FAE2AD1568C9019095CBFF226102D0D1FA6EF97E2F8F72122680049000AE96E3DE749B9D5B5229DD7EE0E4B07419125D21A90DF2CCE801653691169C911991EBE32D98EDF5F65FA0135AE5D8ED07BC04ADAB64EB116DD4822F12A6214900E1001E26BD48441311DC6B0000000049454E44AE426082) (mime-type . image/png) (pic-type . 5) (condesc . 32x32 sample image)) +(APIC (descr . Attached picture) (text . 89504E470D0A1A0A0000000D4948445200000044000000440806000000381393B2000000017352474200AECE1CE900000006624B474400FF00FF00FFA0BDA793000000097048597300000B1300000B1301009A9C180000000774494D4507DB071C0A0032D982A62D0000001974455874436F6D6D656E74004372656174656420776974682047494D5057810E17000000FE4944415478DAEDDADB0E82300C005047F8FF5FAE6F8410196C949B397D3266A9DDB1EB345A22223E628A0101102040800001020408102040800001020408100104081020408000B923C6EC84A594E9F11B7F141CFF7573BDB53B32404E9C21F3B63C7AACF6E65AAEFBB57EB9A6A5CE316B03B5625BF3CC9FAF6DF4311DB2267EB4E0963CB5773922EE1BAAF3176B3D326B455FDD15A77E0EC93C8257CDAFD7DE32B54D6775D2F886CDD6D6651FA921B3D55B8BDB9A15A59443F92FEB90E514CF2A744F9E8CABBDD68D43668BF70CB688D8BC427B72F40ED9E27FAABECB0001020408102040800001020408102040800820408000010204081020401E1F5F46586895430352C20000000049454E44AE426082) (mime-type . image/png) (pic-type . 0) (condesc . 68x68 sample image)) +]) + +AT_CLEANUP |