100 lines
1.5 KiB
Bash
Executable file
100 lines
1.5 KiB
Bash
Executable file
#!/bin/rc
|
|
rfork e
|
|
|
|
out=/dev/audio
|
|
typ=()
|
|
tmp=()
|
|
argv0=$0
|
|
|
|
fn cleanup {
|
|
if(! ~ $#tmp 0)
|
|
rm -f $tmp
|
|
tmp=()
|
|
}
|
|
|
|
fn sigint {
|
|
cleanup
|
|
exit
|
|
}
|
|
|
|
fn sigexit {
|
|
cleanup
|
|
}
|
|
|
|
fn play1 {
|
|
if(! ~ $#* 2){
|
|
tmp=(/tmp/play.$pid.$#tmp.tmp $tmp)
|
|
dd -bs 8192 -count 1 >$tmp(1) >[2]/dev/null
|
|
cat $tmp(1) /fd/0 | play1 $1 `{file -m $tmp(1)}
|
|
cleanup
|
|
}
|
|
if not {
|
|
switch($2){
|
|
case *plain*
|
|
sed 's/
|
|
//g' | while(j=`{read}){
|
|
echo $"j >[1=2]
|
|
if(~ $"j http:* https:* HTTP:* HTTPS:*){
|
|
hget -r 'User-Agent: play' -r 'Icy-MetaData: 0' $"j | play1 $"j
|
|
}
|
|
if not {
|
|
if(test -r $"j)
|
|
play1 <$"j $"j
|
|
if not {
|
|
echo $argv0: 'can''t open file:' $"j >[1=2]
|
|
}
|
|
}
|
|
}
|
|
case *ogg* *vorbis*
|
|
audio/oggdec
|
|
case *mp3* *mpeg*
|
|
audio/mp3dec
|
|
case *wave*
|
|
audio/wavdec
|
|
case *flac*
|
|
audio/flacdec
|
|
case *audio/basic*
|
|
audio/sundec
|
|
case *pls*
|
|
awk 'BEGIN {FS="="} /^File/{print $2}' | play1 list plain
|
|
case *
|
|
switch($1){
|
|
case *.mp3 *.MP3
|
|
audio/mp3dec
|
|
case *.ogg *.OGG
|
|
audio/oggdec
|
|
case *.wav *.WAV
|
|
audio/wavdec
|
|
case *.flac *.FLAC
|
|
audio/flacdec
|
|
case *.au *.AU
|
|
audio/sundec
|
|
case *
|
|
echo $argv0: $1: unknown format: $2 >[1=2]
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
fn usage {
|
|
echo usage: $argv0 [ -o file ] [ file ... ] >[1=2]
|
|
exit usage
|
|
}
|
|
|
|
while(~ $1 -*){
|
|
switch($1){
|
|
case -o
|
|
out=$2
|
|
shift
|
|
case *
|
|
usage
|
|
}
|
|
shift
|
|
}
|
|
|
|
# boost priority
|
|
@{echo pri 13 >/proc/$pid/ctl} >/dev/null >[2=1]
|
|
|
|
>$out {
|
|
if(~ $#* 0){play1 stdin; exit}
|
|
for(i){echo $i} | play1 args plain
|
|
}
|