#!/bin/sh

# Rudimentary tests for CopyAudio (and CompAudio)

# $Id: tCopyAudio,v 1.1 1994/02/13 AFsp-V1R2 $

AUDIOFILES=audiofiles
export AUDIOFILES
CA=../bin/CompAudio
CP=../bin/CopyAudio


echo ""
$CP --version
$CA --version

echo ""
echo "========== CopyAudio: deliberate error:"
$CP -s 10000 -D float --chanA="0.5*A +B" -cB "0.5A" 2>&1

echo ""
echo "========== CopyAudio: scale by 2, scale by 0.5, expect File A = File B"
# scale and cross channels
$CP -Dfloat --chanA "0.5*B" -cB"2*A" addf8.au addf8.au xx.au
echo "------"
# test gain expression and channel extraction
$CP --chanA="B - 0.5*B" xx.au yy.au
echo "------"
$CA addf8.au yy.au
rm -rf xx.au yy.au

echo ""
echo "========== CopyAudio: apply mu-law, expect max diff 254"
$CP -D mu-law addf8.au xx.au
echo "------"
$CA addf8.au xx.au

echo ""
echo "========== CopyAudio: apply mu-law again, expect File A = File B"
$CP -D mu-law xx.au yy.au
echo "------"
$CA xx.au yy.au
rm -rf xx.au yy.au

echo ""
echo "========== CopyAudio: headerless output, expect File A = File B"
$CP -D float --noheader addf8.au xx.au
echo "------"
$CA --param="float,0,,big-endian,,32.768e3" addf8.au xx.au
rm -rf xx.au
