1#!/bin/sh 2 3# FLAC - Free Lossless Audio Codec 4# Copyright (C) 2002,2003,2004,2005,2006,2007 Josh Coalson 5# 6# This file is part the FLAC project. FLAC is comprised of several 7# components distributed under difference licenses. The codec libraries 8# are distributed under Xiph.Org's BSD-like license (see the file 9# COPYING.Xiph in this distribution). All other programs, libraries, and 10# plugins are distributed under the GPL (see COPYING.GPL). The documentation 11# is distributed under the Gnu FDL (see COPYING.FDL). Each file in the 12# FLAC distribution contains at the top the terms under which it may be 13# distributed. 14# 15# Since this particular file is relevant to all components of FLAC, 16# it may be distributed under the Xiph.Org license, which is the least 17# restrictive of those mentioned above. See the file COPYING.Xiph in this 18# distribution. 19 20die () 21{ 22 echo $* 1>&2 23 exit 1 24} 25 26if [ x = x"$1" ] ; then 27 BUILD=debug 28else 29 BUILD="$1" 30fi 31 32# change to 'false' to show all flac/metaflac output (useful for debugging) 33if true ; then 34 SILENT='--silent' 35 TOTALLY_SILENT='--totally-silent' 36else 37 SILENT='' 38 TOTALLY_SILENT='' 39fi 40 41LD_LIBRARY_PATH=`pwd`/../src/libFLAC/.libs:$LD_LIBRARY_PATH 42LD_LIBRARY_PATH=`pwd`/../src/share/grabbag/.libs:$LD_LIBRARY_PATH 43LD_LIBRARY_PATH=`pwd`/../src/share/getopt/.libs:$LD_LIBRARY_PATH 44LD_LIBRARY_PATH=`pwd`/../src/share/replaygain_analysis/.libs:$LD_LIBRARY_PATH 45LD_LIBRARY_PATH=`pwd`/../src/share/replaygain_synthesis/.libs:$LD_LIBRARY_PATH 46LD_LIBRARY_PATH=`pwd`/../src/share/utf8/.libs:$LD_LIBRARY_PATH 47LD_LIBRARY_PATH=`pwd`/../obj/$BUILD/lib:$LD_LIBRARY_PATH 48export LD_LIBRARY_PATH 49PATH=`pwd`/../src/flac:$PATH 50PATH=`pwd`/../src/metaflac:$PATH 51PATH=`pwd`/../obj/$BUILD/bin:$PATH 52 53if echo a | (grep -E '(a|b)') >/dev/null 2>&1 54 then EGREP='grep -E' 55 else EGREP='egrep' 56fi 57 58testdir="metaflac-test-files" 59flacfile="metaflac.flac" 60 61flac --help 1>/dev/null 2>/dev/null || die "ERROR can't find flac executable" 62metaflac --help 1>/dev/null 2>/dev/null || die "ERROR can't find metaflac executable" 63 64run_flac () 65{ 66 if [ x"$FLAC__TEST_WITH_VALGRIND" = xyes ] ; then 67 echo "valgrind --leak-check=yes --show-reachable=yes --num-callers=100 flac $*" >>test_metaflac.valgrind.log 68 valgrind --leak-check=yes --show-reachable=yes --num-callers=100 --log-fd=4 flac $* 4>>test_metaflac.valgrind.log 69 else 70 flac $* 71 fi 72} 73 74run_metaflac () 75{ 76 if [ x"$FLAC__TEST_WITH_VALGRIND" = xyes ] ; then 77 echo "valgrind --leak-check=yes --show-reachable=yes --num-callers=100 metaflac $*" >>test_metaflac.valgrind.log 78 valgrind --leak-check=yes --show-reachable=yes --num-callers=100 --log-fd=4 metaflac $* 4>>test_metaflac.valgrind.log 79 else 80 metaflac $* 81 fi 82} 83 84run_metaflac_silent () 85{ 86 if [ -z "$SILENT" ] ; then 87 run_metaflac $* 88 else 89 if [ x"$FLAC__TEST_WITH_VALGRIND" = xyes ] ; then 90 echo "valgrind --leak-check=yes --show-reachable=yes --num-callers=100 metaflac $*" >>test_metaflac.valgrind.log 91 valgrind --leak-check=yes --show-reachable=yes --num-callers=100 --log-fd=4 metaflac $* 2>/dev/null 4>>test_metaflac.valgrind.log 92 else 93 metaflac $* 2>/dev/null 94 fi 95 fi 96} 97 98check_flac () 99{ 100 run_flac --silent --test $flacfile || die "ERROR in $flacfile" 1>&2 101} 102 103echo "Generating stream..." 104bytes=80000 105if dd if=/dev/zero ibs=1 count=$bytes | flac --force --verify -0 --input-size=$bytes --output-name=$flacfile --force-raw-format --endian=big --sign=signed --channels=1 --bps=8 --sample-rate=8000 - ; then 106 chmod +w $flacfile 107else 108 die "ERROR during generation" 109fi 110 111check_flac 112 113echo 114 115filter () 116{ 117 # minor danger, changing vendor strings will change the length of the 118 # VORBIS_COMMENT block, but if we add "^ length: " to the patterns, 119 # we lose info about PADDING size that we need 120 # grep pattern 1: remove vendor string 121 # grep pattern 2: remove minimum/maximum frame and block size from STREAMINFO 122 # grep pattern 3: remove hexdump data from PICTURE metadata blocks 123 # sed pattern 1: remove stream offset values from SEEKTABLE points 124 $EGREP -v '^ vendor string: |^ m..imum .....size: |^ 0000[0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F]: ' | sed -e 's/, stream_offset.*//' 125} 126metaflac_test () 127{ 128 case="$1" 129 desc="$2" 130 args="$3" 131 expect="$testdir/$case-expect.meta" 132 echo -n "test $case: $desc... " 133 run_metaflac $args $flacfile | filter > $testdir/out.meta || die "ERROR running metaflac" 134 diff -w $expect $testdir/out.meta > /dev/null 2>&1 || die "ERROR: metadata does not match expected $expect" 135 echo OK 136} 137 138metaflac_test case00 "--list" "--list" 139 140metaflac_test case01 "STREAMINFO --show-* shortcuts" " 141 --show-md5sum 142 --show-min-blocksize 143 --show-max-blocksize 144 --show-min-framesize 145 --show-max-framesize 146 --show-sample-rate 147 --show-channels 148 --show-bps 149 --show-total-samples" 150 151run_metaflac --preserve-modtime --add-padding=12345 $flacfile 152check_flac 153metaflac_test case02 "--add-padding" "--list" 154 155# some flavors of /bin/sh (e.g. Darwin's) won't even handle quoted spaces, so we underscore: 156run_metaflac --set-tag="ARTIST=The_artist_formerly_known_as_the_artist..." $flacfile 157check_flac 158metaflac_test case03 "--set-tag=ARTIST" "--list" 159 160run_metaflac --set-tag="ARTIST=Chuck_Woolery" $flacfile 161check_flac 162metaflac_test case04 "--set-tag=ARTIST" "--list" 163 164run_metaflac --set-tag="ARTIST=Vern" $flacfile 165check_flac 166metaflac_test case05 "--set-tag=ARTIST" "--list" 167 168run_metaflac --set-tag="TITLE=He_who_smelt_it_dealt_it" $flacfile 169check_flac 170metaflac_test case06 "--set-tag=TITLE" "--list" 171 172metaflac_test case07 "--show-vendor-tag --show-tag=ARTIST" "--show-vendor-tag --show-tag=ARTIST" 173 174run_metaflac --remove-first-tag=ARTIST $flacfile 175check_flac 176metaflac_test case08 "--remove-first-tag=ARTIST" "--list" 177 178run_metaflac --remove-tag=ARTIST $flacfile 179check_flac 180metaflac_test case09 "--remove-tag=ARTIST" "--list" 181 182metaflac_test case10 "--list --block-type=VORBIS_COMMENT" "--list --block-type=VORBIS_COMMENT" 183metaflac_test case11 "--list --block-number=0" "--list --block-number=0" 184metaflac_test case12 "--list --block-number=1,2,999" "--list --block-number=1,2,999" 185metaflac_test case13 "--list --block-type=VORBIS_COMMENT,PADDING" "--list --block-type=VORBIS_COMMENT,PADDING" 186metaflac_test case14 "--list --except-block-type=SEEKTABLE,VORBIS_COMMENT" "--list --except-block-type=SEEKTABLE,VORBIS_COMMENT" 187metaflac_test case15 "--list --except-block-type=STREAMINFO" "--list --except-block-type=STREAMINFO" 188 189run_metaflac --add-padding=4321 $flacfile $flacfile 190check_flac 191metaflac_test case16 "--add-padding=4321 * 2" "--list" 192 193run_metaflac --merge-padding $flacfile 194check_flac 195metaflac_test case17 "--merge-padding" "--list" 196 197run_metaflac --add-padding=0 $flacfile 198check_flac 199metaflac_test case18 "--add-padding=0" "--list" 200 201run_metaflac --sort-padding $flacfile 202check_flac 203metaflac_test case19 "--sort-padding" "--list" 204 205run_metaflac --add-padding=0 $flacfile 206check_flac 207metaflac_test case20 "--add-padding=0" "--list" 208 209run_metaflac --remove-all-tags $flacfile 210check_flac 211metaflac_test case21 "--remove-all-tags" "--list" 212 213run_metaflac --remove --block-number=1,99 --dont-use-padding $flacfile 214check_flac 215metaflac_test case22 "--remove --block-number=1,99 --dont-use-padding" "--list" 216 217run_metaflac --remove --block-number=99 --dont-use-padding $flacfile 218check_flac 219metaflac_test case23 "--remove --block-number=99 --dont-use-padding" "--list" 220 221run_metaflac --remove --block-type=PADDING $flacfile 222check_flac 223metaflac_test case24 "--remove --block-type=PADDING" "--list" 224 225run_metaflac --remove --block-type=PADDING --dont-use-padding $flacfile 226check_flac 227metaflac_test case25 "--remove --block-type=PADDING --dont-use-padding" "--list" 228 229run_metaflac --add-padding=0 $flacfile $flacfile 230check_flac 231metaflac_test case26 "--add-padding=0 * 2" "--list" 232 233run_metaflac --remove --except-block-type=PADDING $flacfile 234check_flac 235metaflac_test case27 "--remove --except-block-type=PADDING" "--list" 236 237run_metaflac --remove-all $flacfile 238check_flac 239metaflac_test case28 "--remove-all" "--list" 240 241run_metaflac --remove-all --dont-use-padding $flacfile 242check_flac 243metaflac_test case29 "--remove-all --dont-use-padding" "--list" 244 245run_metaflac --remove-all --dont-use-padding $flacfile 246check_flac 247metaflac_test case30 "--remove-all --dont-use-padding" "--list" 248 249run_metaflac --set-tag="f=0123456789abcdefghij" $flacfile 250check_flac 251metaflac_test case31 "--set-tag=..." "--list" 252 253run_metaflac --remove-all-tags --set-tag="f=0123456789abcdefghi" $flacfile 254check_flac 255metaflac_test case32 "--remove-all-tags --set-tag=..." "--list" 256 257run_metaflac --remove-all-tags --set-tag="f=0123456789abcde" $flacfile 258check_flac 259metaflac_test case33 "--remove-all-tags --set-tag=..." "--list" 260 261run_metaflac --remove-all-tags --set-tag="f=0" $flacfile 262check_flac 263metaflac_test case34 "--remove-all-tags --set-tag=..." "--list" 264 265run_metaflac --remove-all-tags --set-tag="f=0123456789" $flacfile 266check_flac 267metaflac_test case35 "--remove-all-tags --set-tag=..." "--list" 268 269run_metaflac --remove-all-tags --set-tag="f=0123456789abcdefghi" $flacfile 270check_flac 271metaflac_test case36 "--remove-all-tags --set-tag=..." "--list" 272 273run_metaflac --remove-all-tags --set-tag="f=0123456789" $flacfile 274check_flac 275metaflac_test case37 "--remove-all-tags --set-tag=..." "--list" 276 277run_metaflac --remove-all-tags --set-tag="f=0123456789abcdefghij" $flacfile 278check_flac 279metaflac_test case38 "--remove-all-tags --set-tag=..." "--list" 280 281echo "TITLE=Tittle" | run_metaflac --import-tags-from=- $flacfile 282check_flac 283metaflac_test case39 "--import-tags-from=-" "--list" 284 285cat > vc.txt << EOF 286artist=Fartist 287artist=artits 288EOF 289run_metaflac --import-tags-from=vc.txt $flacfile 290check_flac 291metaflac_test case40 "--import-tags-from=[FILE]" "--list" 292 293rm vc.txt 294 295run_metaflac --add-replay-gain $flacfile 296check_flac 297metaflac_test case41 "--add-replay-gain" "--list" 298 299run_metaflac --remove-replay-gain $flacfile 300check_flac 301metaflac_test case42 "--remove-replay-gain" "--list" 302 303# CUESHEET blocks 304cs_in=cuesheets/good.000.cue 305cs_out=metaflac.cue 306cs_out2=metaflac2.cue 307run_metaflac --import-cuesheet-from="$cs_in" $flacfile 308check_flac 309metaflac_test case43 "--import-cuesheet-from" "--list" 310run_metaflac --export-cuesheet-to=$cs_out $flacfile 311run_metaflac --remove --block-type=CUESHEET $flacfile 312check_flac 313metaflac_test case44 "--remove --block-type=CUESHEET" "--list" 314run_metaflac --import-cuesheet-from=$cs_out $flacfile 315check_flac 316metaflac_test case45 "--import-cuesheet-from" "--list" 317run_metaflac --export-cuesheet-to=$cs_out2 $flacfile 318echo "comparing cuesheets:" 319diff $cs_out $cs_out2 || die "ERROR, cuesheets should be identical" 320echo identical 321 322rm -f $cs_out $cs_out2 323 324# PICTURE blocks 325ncase=46 326for f in \ 327 0.gif \ 328 1.gif \ 329 2.gif \ 330; do 331 run_metaflac --import-picture-from="|image/gif|$f||pictures/$f" $flacfile 332 check_flac 333 metaflac_test "case$ncase" "--import-picture-from" "--list" 334 ncase=`expr $ncase + 1` 335done 336for f in \ 337 0.jpg \ 338 4.jpg \ 339; do 340 run_metaflac --import-picture-from="4|image/jpeg|$f||pictures/$f" $flacfile 341 check_flac 342 metaflac_test "case$ncase" "--import-picture-from" "--list" 343 ncase=`expr $ncase + 1` 344done 345for f in \ 346 0.png \ 347 1.png \ 348 2.png \ 349 3.png \ 350 4.png \ 351 5.png \ 352 6.png \ 353 7.png \ 354 8.png \ 355; do 356 run_metaflac --import-picture-from="5|image/png|$f||pictures/$f" $flacfile 357 check_flac 358 metaflac_test "case$ncase" "--import-picture-from" "--list" 359 ncase=`expr $ncase + 1` 360done 361[ $ncase = 60 ] || die "expected case# to be 60" 362 363fn=export-picture-check 364echo -n "Testing --export-picture-to... " 365run_metaflac --export-picture-to=$fn $flacfile 366check_flac 367cmp $fn pictures/0.gif || die "ERROR, exported picture file and original differ" 368echo OK 369rm -f $fn 370echo -n "Testing --block-number --export-picture-to... " 371run_metaflac --block-number=9 --export-picture-to=$fn $flacfile 372check_flac 373cmp $fn pictures/0.png || die "ERROR, exported picture file and original differ" 374echo OK 375rm -f $fn 376 377run_metaflac --remove --block-type=PICTURE $flacfile 378check_flac 379metaflac_test case60 "--remove --block-type=PICTURE" "--list" 380run_metaflac --import-picture-from="1|image/png|standard_icon|32x32x24|pictures/0.png" $flacfile 381check_flac 382metaflac_test case61 "--import-picture-from" "--list" 383run_metaflac --import-picture-from="2|image/png|icon|64x64x24|pictures/1.png" $flacfile 384check_flac 385metaflac_test case62 "--import-picture-from" "--list" 386 387# UNKNOWN blocks 388echo -n "Testing FLAC file with unknown metadata... " 389cp -p metaflac.flac.in $flacfile 390# remove the VORBIS_COMMENT block so vendor string changes don't interfere with the comparison: 391run_metaflac --remove --block-type=VORBIS_COMMENT --dont-use-padding $flacfile 392cmp $flacfile metaflac.flac.ok || die "ERROR, $flacfile and metaflac.flac.ok differ" 393echo OK 394 395rm -f $testdir/out.flac $testdir/out.meta 396 397exit 0 398