$start = substr $file[1],0,14;
   if ($debug == 1){ print "$chanid\n$start\n"};
if (! -e $directory."/".$file{
   print "Opps, the file ".$directory.$file." does not exist.\n";
   exit;
}

 /usr/local/bin/myth2xvid "%DIR%" "%FILE%"

$SQL = "SELECT title, subtitle, description, category, starttime FROM recorded WHERE chanid = $chanid AND DATE_FORMAT(starttime, '%Y%m%d%%H%i%s') = $start";
$statement =  $db_handle->prepare($sql)
    or die;
$statement->execute()    # this is line 96
or die "Couldn't execute query '$sql': $DBI::errstr\n";

#include <qapplication.h>
#include <qsqldatabase.h>
#include <qfile.h>
#include <qmap.h>
#include <qfileinfo.h>
#include <qregexp.h>

#include <unistd.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <iostream>
#include <fstream>
#include <sys/wait.h>
using namespace std;

#include "exitcodes.h"
#include "programinfo.h"
#include "mythcontext.h"
#include "mythdbcon.h"

void CompleteJob(ProgramInfo *pginfo, int status, QString &outfile);

int main(int argc, char *argv[])
{
    QString chanid, starttime, infile, outfile;
    QDateTime startts;
    QMap<QString, QString> settingsOverride;
    QMap<long long, int> deleteMap;
    QMap<long long, long long> posMap;
    srand(time(NULL));

    QApplication a(argc, argv, false);

    if( a.argc() != 2 )
    {
        cerr << "Incorrect number of arguments\n";
        return -1;
    }

    // filename from myth... format chanid_starttime.mpg
    infile = a.argv()[1];

    int base1, base2;

    base1 = infile.find( '_', 0 );
    base2 = infile.find( '.', 0 );
    if( base1 != -1 && base2 != -1 )
    {
        chanid = infile.left( base1 );
       starttime = infile.mid( base1 + 1, base2 - base1 - 1 );
    }
    else
    {
        cerr << "Could not get chanid and starttime\n";
        return -1;
    }

    //  Load the context
    gContext = NULL;
    gContext = new MythContext(MYTH_BINARY_VERSION);
    if (!gContext->Init(false))
    {
        cerr << "Failed to init MythContext, exiting.\n";
        return -1;
    }

    if (!MSqlQuery::testDBConnection())
    {
        cerr << "couldn't open db\n";
        return -1;
    }

    ProgramInfo *pginfo = NULL;

    pginfo = ProgramInfo::GetProgramFromRecorded(chanid, starttime);

    if (!pginfo)
    {
        cerr << "Couldn't find recording for chanid " << chanid << " @ "
             << starttime << endl;
        return -1;
    }

    QString mytmpfile, repStr;
    QRegExp regx( "[*?/\\\\<>]" );
    QFileInfo myfileinfo;
    int fileNum = 1;

    // make the outputfile Title - Subtitle
    if( pginfo->subtitle.isNull() || pginfo->subtitle.isEmpty() )
       outfile = pginfo->title;
    else
        outfile = pginfo->title + " - " + pginfo->subtitle;

    repStr = "'";
    outfile.replace( '"', repStr );
    repStr = " -";
    outfile.replace( ':', repStr );
    repStr = "";
    outfile.replace( regx, repStr );

    // make sure name is unique   
    mytmpfile = "/myth/tv/" + outfile + ".avi";
    myfileinfo.setFile( mytmpfile );
    while( myfileinfo.exists() )
    {
       fileNum++;
       mytmpfile.sprintf( "/myth/tv/%s.%d.avi", outfile.ascii(), fileNum );
       myfileinfo.setFile( mytmpfile );
    }

    if( fileNum > 1 )
        outfile.sprintf( "%s.%d", outfile.ascii(), fileNum );

    int pid, result;
    int status = 0;

   // fork nuvexport
   pid = fork();
   if( pid < 0 )
   {
        cerr << "fork failed\n";
      return -1;
   }
   else if (pid == 0 )
   {
      QString nuvChan, nuvStart, nuvFile;

      nuvChan.sprintf( "--chanid=%s", chanid.ascii() );
      nuvStart.sprintf( "--start=%s", starttime.ascii() );
      nuvFile.sprintf( "--filename=%s", outfile.ascii() );

      // Run nuvexport
      execl( "/usr/local/bin/nuvexport", "nuvexport", nuvChan.ascii(), nuvStart.ascii(),
         "--mode=XviD", "--nice=19", "--cutlist", "--nodenoise", "--multipass",
         "--force-aspect=1.33", "--transcode", "--path=/myth/tv",
         nuvFile.ascii(), (char*) 0 );
      exit(100);
   }
   else
   {
      // Make sure process terminated normally
      if (waitpid(pid, &result, 0) != pid)
      {
            cerr << "waitpid failed\n";
         status = -1;
      }
      else
      {
         if( !WIFEXITED( result ) || WEXITSTATUS( result ) != 0 )
            {
                cerr << "nuvexport errored\n";
            status = -1;
         }
      }
   }

    CompleteJob(pginfo, status, outfile);

    delete pginfo;
    delete gContext;

    return status;
}

void CompleteJob(ProgramInfo *pginfo, int status, QString &outfile)
{
    QString filename = pginfo->GetPlaybackURL();
    QString mybase = outfile + ".avi";
    QString myfilename = "/myth/tv/" + mybase;
    off_t filesize = 0;
    struct stat st;

    if( status == 0 )
    {
        if (stat(myfilename.ascii(), &st) == 0)
            filesize = st.st_size;

        // To save the original file...
        QString oldfile = filename + ".old";

        pginfo->SetRecordBasename(mybase);
        if (filesize > 0)
            pginfo->SetFilesize(filesize);

        if (rename(filename, oldfile) == -1)
            perror(QString("mythtranscode: Error Renaming '%1' to '%2'")
                   .arg(filename).arg(oldfile).ascii());

        int err;

        QFileInfo finfo(oldfile);
        if ((finfo.isSymLink()) &&
            (err = unlink(finfo.readLink().local8Bit())))
        {
             cerr << "Error deleting link\n";
        }

        if ((err = unlink(oldfile.local8Bit())))
            cerr << "Error deleting old file\n";

        oldfile = filename + ".png";
       myfilename += ".png";

        QFile checkFile(oldfile);
        if ((oldfile != myfilename) && (checkFile.exists()))
            rename(oldfile, myfilename);

        MSqlQuery query(MSqlQuery::InitCon());

        query.prepare("DELETE FROM recordedmarkup "
                      "WHERE chanid = :CHANID "
                      "AND starttime = :STARTTIME ");
        query.bindValue(":CHANID", pginfo->chanid);
        query.bindValue(":STARTTIME", pginfo->recstartts);
        query.exec();

        if (!query.isActive())
            MythContext::DBError("Error in mythtranscode", query);

       query.prepare("DELETE FROM recordedseek "
                      "WHERE chanid = :CHANID "
                      "AND starttime = :STARTTIME ");
        query.bindValue(":CHANID", pginfo->chanid);
        query.bindValue(":STARTTIME", pginfo->recstartts);
        query.exec();

        if (!query.isActive())
            MythContext::DBError("Error in mythtranscode", query);

        query.prepare("UPDATE recorded "
                      "SET cutlist = :CUTLIST, bookmark = :BOOKMARK "
                      "WHERE chanid = :CHANID "
                      "AND starttime = :STARTTIME ;");
        query.bindValue(":CUTLIST", "0");
        query.bindValue(":BOOKMARK", "0");
        query.bindValue(":CHANID", pginfo->chanid);
        query.bindValue(":STARTTIME", pginfo->recstartts);
        query.exec();

        if (!query.isActive())
            MythContext::DBError("Error in mythtranscode", query);

        pginfo->SetCommFlagged(COMM_FLAG_NOT_FLAGGED);

    }
    else
    {
        // Not a successful run, so remove the files we created
        unlink(myfilename);
    }
}

/* vim: set expandtab tabstop=4 shiftwidth=4: */