Skip to content
qstream-tv 947 B
Newer Older
Jon Kåre Hellan's avatar
Jon Kåre Hellan committed
#!/bin/bash

ulimit -c unlimited  # for debugging of hangup problem og qstream

Jon Kåre Hellan's avatar
Jon Kåre Hellan committed
y=`date +%Y`
m=`date +%m`
d=`date +%d`
h=`date +%H`


tv=/var/lib/qstream/data/tv
ydir=$tv/$y
test -d $ydir || mkdir $ydir
mdir=$ydir/$m
test -d $mdir || mkdir $mdir
ddir=$mdir/$d
test -d $ddir || mkdir $ddir
#hdir=$ddir/$h
#test -d $hdir || mkdir $hdir

tmpdir=$tv/tmp
test -d $tmpdir || mkdir $tmpdir
tmp=$tmpdir/qstream-$$
Jon Kåre Hellan's avatar
Jon Kåre Hellan committed

cd $ddir

export IFS=";"
# export MALLOC_CHECK_=1   # write comprehensive error message when fail
ulimit -c 500000000

while read kanal mcaddr rest; do

  echo $kanal | egrep -q '^\s*#'
  if test $? = 1 ; then # no comment
     log=`echo $kanal | sed -e 's/ /_/g'`
     /usr/bin/qstream -format full -nohead -v -last 10 -net $mcaddr > $tmp.log  2>>$log.error
     if test $? = 0 ; then  # probably OK - keep data
	 cat $tmp.log >> $log.log
     else
	 cat $tmp.log >> $tmpdir/qstream.error
     fi
     echo >$tmp.log
Jon Kåre Hellan's avatar
Jon Kåre Hellan committed
  fi
done