#!/bin/bash

IFS="
"

bold=`tput bold`
normal=`tput sgr0`

for file in ./*.htm* ; do

 moddate=`stat -c %y $file | sed 's/\(:[0-9]\{2\}\)\.[0-9]* /\1 /'`
 moddate=`echo ${moddate:0:17}`
 moddate=`echo ${moddate//\:/}`
 moddate=`echo ${moddate//\ /}`
 moddate=`echo ${moddate//-/}`
 
 sed -i 's/*1\/0//' $file
 sed -i 's/*2\/0//' $file
 sed -i 's/*3\/0//' $file
 sed -i 's/*4\/0//' $file
 sed -i 's/*5\/0//' $file
 sed -i 's/*6\/0//' $file
 sed -i 's/*7\/0//' $file
 sed -i 's/*8\/0//' $file
 sed -i 's/*9\/0//' $file
 sed -i 's/*10\/0//' $file
 sed -i 's/*11\/0//' $file
 sed -i 's/*12\/0//' $file
 sed -i 's/*13\/0//' $file
 sed -i 's/*14\/0//' $file
 sed -i 's/*15\/0//' $file
 sed -i 's/*16\/0//' $file
 sed -i 's/*17\/0//' $file
 sed -i 's/*18\/0//' $file
 sed -i 's/*19\/0//' $file
 sed -i 's/*20\/0//' $file
 sed -i 's/*21\/0//' $file
 sed -i 's/*22\/0//' $file
 sed -i 's/*23\/0//' $file
 sed -i 's/*24\/0//' $file
 sed -i 's/*25\/0//' $file
 sed -i 's/*26\/0//' $file
 sed -i 's/*27\/0//' $file
 sed -i 's/*28\/0//' $file
 sed -i 's/*29\/0//' $file
 sed -i 's/*30\/0//' $file
 sed -i 's/*31\/0//' $file
 sed -i 's/*32\/0//' $file
 sed -i 's/*33\/0//' $file
 sed -i 's/*34\/0//' $file
 sed -i 's/*35\/0//' $file
 sed -i 's/*36\/0//' $file
 sed -i 's/*37\/0//' $file
 sed -i 's/*38\/0//' $file
 sed -i 's/*39\/0//' $file
 sed -i 's/*40\/0//' $file
 sed -i 's/*41\/0//' $file
 sed -i 's/*42\/0//' $file
 sed -i 's/*43\/0//' $file
 sed -i 's/*44\/0//' $file
 sed -i 's/*45\/0//' $file
 sed -i 's/*46\/0//' $file
 sed -i 's/*47\/0//' $file
 sed -i 's/*48\/0//' $file
 sed -i 's/*49\/0//' $file
 sed -i 's/*50\/0//' $file
 sed -i 's/*51\/0//' $file
 sed -i 's/*52\/0//' $file
 sed -i 's/*53\/0//' $file
 sed -i 's/*54\/0//' $file
 sed -i 's/*55\/0//' $file
 sed -i 's/*56\/0//' $file
 sed -i 's/*57\/0//' $file
 sed -i 's/*58\/0//' $file
 sed -i 's/*59\/0//' $file
 sed -i 's/*60\/0//' $file
 sed -i 's/*61\/0//' $file
 sed -i 's/*62\/0//' $file
 sed -i 's/*63\/0//' $file
 sed -i 's/*64\/0//' $file
 sed -i 's/*65\/0//' $file
 sed -i 's/*66\/0//' $file
 sed -i 's/*67\/0//' $file
 sed -i 's/*68\/0//' $file
 sed -i 's/*69\/0//' $file

 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_1">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_2">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_3">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_4">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_5">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_6">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_7">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_8">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_9">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_10">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_11">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_12">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_13">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_14">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_15">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_16">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_17">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_18">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_19">EIT Link<\/A><\/FONT>//' $file
 sed -i 's/<FONT SIZE="-1"><A HREF="#eit_20">EIT Link<\/A><\/FONT>//' $file

 sed -i 's/<H3>Event Information Table<\/H3>/\n<H3>Event Information Table<\/H3>/' $file
 sed -i 's/<H3>MPEG-2 Statistics<\/H3>/\n<H3>MPEG-2 Statistics<\/H3>/' $file
 perl -i -e '$i = 1; while(<>) { $i = 0 if /<H3>Event Information Table<\/H3>/; $i = 1 if /<H3>MPEG-2 Statistics<\/H3>/; print $_ if $i; }' $file
 #perl -i -e '$i = 1; while(<>) { $i = 0 if /<IMG SRC/; $i = 1 if /Stream/; print $_ if $i; }' $file

 touch -t $moddate $file


 if grep -q "TEI errors: " $file; then
   e=`grep "TEI errors:" $file`
   temp=${e#*TEI errors: }
   ee=${temp%%[!0-9]*}
 fi

 if grep -q "Transport Stream ID" $file; then
   t=`grep "Transport Stream ID:" $file`
   temp=${t#*Transport Stream ID: }
   tt=${temp%%[!0-9]*}
 fi

 if grep -q "Tuner: Channel" $file; then
   h=`grep "Tuner: Channel" $file`
   temp=${h#*Tuner: Channel }
   hh=${temp%%[!0-9]*}
 elif grep -q "Tuner:" $file; then
   h=`grep "Tuner:" $file`
   temp=${h#*Tuner: }
   hh=${temp%%[!0-9]*}
 fi

 mh="N"
 sb="N"

 if grep -q "0x1ff6" $file; then
   h=`grep "0x1ff6" $file`
   mh="Y"
 fi

 if grep -q "0x1ff9" $file; then
   h=`grep "0x1ff9" $file`
   mh="Y"
 fi

 if grep -q "0x1eee" $file; then
   h=`grep "0x1eee" $file`
   mh="Y"
 fi

 if grep -q "0x17ac" $file; then
   b=`grep "0x17ac" $file`
   sb="Y"
 fi
 
 addr="www.rabbitears.info/tsrinfo.php?tsid=$tt&ch=$hh"
 
 res=`wget -q -O - $addr`
 restest=${res%%[&]*}
 newname="$restest.htm"

 if [ $res = "NR" ]; then
   echo -e " * The current file, \E[31m${bold}${file#*./}${normal}, is being skipped since no results were found."
   continue
 fi

 if [ $res = "ER" ]; then
   echo -e " * The current file, \E[31m${bold}${file#*./}${normal}, is being skipped since its TSID is invalid."
   continue
 fi

 fullname="./$newname"
 if [ "$fullname" = "$file" ]; then
  echo -e " * The current file, \E[31m${bold}${file#*./}${normal}, is being skipped since it is already corrected named."
  continue
 fi

 if [ $ee == 0 ]; then
  echo -e " + There are \E[31m${bold}no TEI errors${normal} in this file."
 else echo -e " - There are \E[31m${bold}$ee TEI errors${normal} in this file."
 fi

 if [ $mh == "Y" ]; then
  echo -e " + This station may have \E[31m${bold}Mobile DTV${normal}."
 fi

 if [ $sb == "Y" ]; then
  echo -e " + This station may have \E[31m${bold}SyncBak${normal}."
 fi

 echo -e " + The current file is \E[31m${bold}${file#*./}${normal}."
 echo -e " + It has been detected as \E[31m${bold}${res#*&}${normal} and will be renamed \E[31m${bold}$newname${normal}."
 echo " == Is this correct? (${bold}Y${normal}es/${bold}N${normal}ame Wrong/${bold}C${normal}hange/${bold}S${normal}kip/${bold}Q${normal}uit)"
 
 read right
 
 if [ `echo $right | tr [:upper:] [:lower:]` = `echo 'S' | tr [:upper:] [:lower:]` ]; then
   echo "Alright then, moving right along..."
   echo " "
   continue
 elif [ `echo $right | tr [:upper:] [:lower:]` = `echo 'N' | tr [:upper:] [:lower:]` ]; then
    echo "Let's try again..."
    echo " "

    not1=${res#*&}
    addr="www.rabbitears.info/tsrinfo.php?tsid=$tt&ch=$hh&not1=$not1"
 
    res=`wget -q -O - $addr`
    restest=${res%%[&]*}
    newname="$restest.htm"

    if [ $res = "NR" ]; then
      echo "No more results! Name it by hand."
      echo " "
      continue
    fi

    echo -e " + The current file is \E[31m${bold}${file#*./}${normal}."
    echo -e " + It has been detected as \E[31m${bold}${res#*&}${normal} and will be renamed \E[31m${bold}$newname${normal}."
    echo " == Is this correct? (${bold}Y${normal}es/${bold}N${normal}o)"
 
    read right

    if [ `echo $right | tr [:upper:] [:lower:]` = `echo 'N' | tr [:upper:] [:lower:]` ]; then
      echo "Let's try again..."
      echo " "

      not2=${res#*&}
      addr="www.rabbitears.info/tsrinfo.php?tsid=$tt&ch=$hh&not1=$not1&not2=$not2"
 
      res=`wget -q -O - $addr`
      restest=${res%%[&]*}
      newname="$restest.htm"

      if [ $res = "NR" ]; then
        echo "No more results! Name it by hand."
        echo " "
        continue
      fi

      echo -e " + The current file is \E[31m${bold}${file#*./}${normal}."
      echo -e " + It has been detected as \E[31m${bold}${res#*&}${normal} and will be renamed \E[31m${bold}$newname${normal}."
      echo " == Is this correct? (${bold}Y${normal}es/${bold}N${normal}o)"
 
      read right

      if [ `echo $right | tr [:upper:] [:lower:]` = `echo 'N' | tr [:upper:] [:lower:]` ]; then
        echo "Three tries, name it by hand."
        echo " "
        continue
      else
         echo "Moving data for ${res#*&} to $newname..."
         mv $file $newname
         echo " "
      fi
    else
       echo "Moving data for ${res#*&} to $newname..."
       mv $file $newname
       echo " "
    fi
    
 elif [ `echo $right | tr [:upper:] [:lower:]` = `echo 'C' | tr [:upper:] [:lower:]` ]; then
   echo "Enter the preferred name (without the .htm)."
   read newname
   newname="$newname.htm"
   echo -e "The new name is \E[31m${bold}$newname${normal}, is this right? (${bold}Y${normal}es/${bold}N${normal}o)"
   read nameapr
   if [ `echo $right | tr [:upper:] [:lower:]` = `echo 'Y' | tr [:upper:] [:lower:]` ]; then
     echo "Moving data for ${res#*&} to $newname..."
     mv $file $newname
     echo " "
   else 
     echo "I'll just let you rerun the script to rename it."
     echo " "
     continue
   fi
 elif [ `echo $right | tr [:upper:] [:lower:]` = `echo 'Q' | tr [:upper:] [:lower:]` ]; then
   echo "So long!"
   echo " "
   exit 1
 else
    echo "Moving data for ${res#*&} to $newname..."
    mv $file $newname
    echo " "
 fi

shopt -u nocasematch

done

echo "That's all the data!"