/*
 * targavfd plugin for VDR (C++)
 *
 * (C) 2010 Andreas Brachold <vdr07 AT deltab de>
 *
 * This targavfd plugin is free software: you can redistribute it and/or 
 * modify it under the terms of the GNU General Public License as published 
 * by the Free Software Foundation, version 3 of the License.
 *
 * See the files README and COPYING for details.
 *
 */

#include <vdr/plugin.h>
#include <getopt.h>
#include <string.h>

#include "vfd.h"
#include "watch.h"
#include "status.h"
#include "setup.h"

static const char *VERSION        = "0.0.5";

class cPluginTargaVFD : public cPlugin {
private:
  cVFDStatusMonitor *statusMonitor;
  cVFDWatch         m_dev;
  bool               m_bSuspend;
  char*              m_szIconHelpPage;
protected:
  bool resume();
  bool suspend();

  const char* SVDRPCommandOn(const char *Option, int &ReplyCode);
  const char* SVDRPCommandOff(const char *Option, int &ReplyCode);
  const char* SVDRPCommandIcon(const char *Option, int &ReplyCode);

public:
  cPluginTargaVFD(void);
  virtual ~cPluginTargaVFD();
  virtual const char *Version(void) { return VERSION; }
  virtual const char *Description(void) { return tr("Control a targa vfd"); }
  virtual const char *CommandLineHelp(void);
  virtual bool ProcessArgs(int argc, char *argv[]);
  virtual bool Initialize(void);
  virtual bool Start(void);
  virtual void Stop(void);
  virtual void Housekeeping(void);
  virtual void MainThreadHook(void);
  virtual cString Active(void);
  virtual time_t WakeupTime(void);
  virtual const char *MainMenuEntry(void) { return NULL; }
  virtual cOsdObject *MainMenuAction(void);
  virtual cMenuSetupPage *SetupMenu(void);
  virtual bool SetupParse(const char *Name, const char *Value);
  virtual bool Service(const char *Id, void *Data = NULL);
  virtual const char **SVDRPHelpPages(void);
  virtual cString SVDRPCommand(const char *Command, const char *Option, int &ReplyCode);
  };

cPluginTargaVFD::cPluginTargaVFD(void)
{
  m_bSuspend = true;
  statusMonitor = NULL;
  m_szIconHelpPage = NULL;
}

cPluginTargaVFD::~cPluginTargaVFD()
{
  //Cleanup if'nt throw housekeeping
  if(statusMonitor) {
    delete statusMonitor;
    statusMonitor = NULL;
  }

  if(m_szIconHelpPage) {
    free(m_szIconHelpPage);
    m_szIconHelpPage = NULL;
  }
}

const char *cPluginTargaVFD::CommandLineHelp(void)
{
  // Return a string that describes all known command line options.
  return "";
}

bool cPluginTargaVFD::ProcessArgs(int argc, char *argv[])
{
  return true;
}

bool cPluginTargaVFD::Initialize(void)
{
  // Initialize any background activities the plugin shall perform.
  return true;
}

bool cPluginTargaVFD::resume() {

  if(m_bSuspend
      && m_dev.open()) {
        m_bSuspend = false;
      return true;
  }
  return false;
}

bool cPluginTargaVFD::suspend() {
  if(!m_bSuspend) {
    m_dev.close();
    m_bSuspend = true;
    return true;
  }
  return false;
}

bool cPluginTargaVFD::Start(void)
{
  if(resume()) {
      statusMonitor = new cVFDStatusMonitor(&m_dev);
      if(NULL == statusMonitor){
        esyslog("targaVFD: can't create cVFDStatusMonitor!");
        return (false);
      }
  }
  return true;
}

void cPluginTargaVFD::Stop(void)
{
  if(statusMonitor) {
    delete statusMonitor;
    statusMonitor = NULL;
  }
  m_dev.close();
}

void cPluginTargaVFD::Housekeeping(void)
{
  // Perform any cleanup or other regular tasks.
}

void cPluginTargaVFD::MainThreadHook(void)
{
  // Perform actions in the context of the main program thread.
  // WARNING: Use with great care - see PLUGINS.html!
}

cString cPluginTargaVFD::Active(void)
{
  // Return a message string if shutdown should be postponed
  return NULL;
}

time_t cPluginTargaVFD::WakeupTime(void)
{
  // Return custom wakeup time for shutdown script
  return 0;
}

cOsdObject *cPluginTargaVFD::MainMenuAction(void)
{
  return NULL;
}

cMenuSetupPage *cPluginTargaVFD::SetupMenu(void)
{
  return new cVFDMenuSetup(&m_dev);
}

bool cPluginTargaVFD::SetupParse(const char *szName, const char *szValue)
{
  return theSetup.SetupParse(szName,szValue);
}

bool cPluginTargaVFD::Service(const char *Id, void *Data)
{
  // Handle custom service requests from other plugins
  return false;
}

const char* cPluginTargaVFD::SVDRPCommandOn(const char *Option, int &ReplyCode)
{
    if(!m_bSuspend) {
      ReplyCode=251; 
      return "driver already resumed";
    }
    if(resume()) {
      ReplyCode=250; 
      return "driver resumed";
    } else {
      ReplyCode=554; 
      return "driver could not resumed";
    }
}

const char* cPluginTargaVFD::SVDRPCommandOff(const char *Option, int &ReplyCode)
{
    if(suspend()) {
      ReplyCode=250; 
      return "driver suspended";
    } else {
      ReplyCode=251; 
      return "driver already suspended";
    }
}

static const struct  {
    unsigned int nIcon;
    const char* szIcon;    
} icontable[] = {
    { eIconPLAY  , "Play" },
    { eIconPAUSE  , "Pause" },
    { eIconRECORD  , "Record" },
    { eIconMESSAGE  , "Msg" },
    { eIconMSGAT  , "MsgAt" },
    { eIconMUTE  , "Mute" },
    { eIconWLAN1  , "WLAN1" },
    { eIconWLAN2  , "WLAN2" },
    { eIconWLAN3  , "WLAN3" },
    { eIconWLAN4  , "WLAN4" },
    { eIconVOLUME  , "Volume" },
    { eIconVOL1  , "Level1" },
    { eIconVOL2  , "Level2" },
    { eIconVOL3  , "Level3" },
    { eIconVOL4  , "Level4" },
    { eIconVOL5  , "Level5" },
    { eIconVOL6  , "Level6" },
    { eIconVOL7  , "Level7" },
    { eIconVOL8  , "Level8" },
    { eIconVOL9  ,  "Level9" },
    { eIconVOL10  , "Level10" },
    { eIconVOL11  , "Level11" },
    { eIconVOL12  , "Level12" },
    { eIconVOL13  , "Level13" },
    { eIconVOL14  , "Level14" }
};

const char* cPluginTargaVFD::SVDRPCommandIcon(const char *Option, int &ReplyCode)
{
  if(m_bSuspend) {
      ReplyCode=251; 
      return "driver suspended";
  }
  if( Option && strlen(Option) < 256) {
    char* request = strdup(Option);
    char* cmd = NULL;
    if( request ) {
      char* tmp = request;
      eIconState m = eIconStateQuery;
      cmd = strtok_r(request, " ", &tmp);
      if(cmd) {
        char* param = strtok_r(0, " ", &tmp);
        if(param) {
          if(!strcasecmp(param,"ON")) {
            m = eIconStateOn;
          } else if(!strcasecmp(param,"OFF")) {
            m = eIconStateOff;
          } else if(!strcasecmp(param,"AUTO")) {
            m = eIconStateAuto;
          } else {
            ReplyCode=501; 
            free(request);
            return "unknown icon state";
          }
        }
      }

      ReplyCode=501; 
      const char* szReplay = "unknown icon title";
      if(cmd) {
        unsigned int i;
        for(i = 0; i < (sizeof(icontable)/sizeof(*icontable));++i)
        {
            if(0 == strcasecmp(cmd,icontable[i].szIcon))    
            {
                eIconState r = m_dev.ForceIcon(icontable[i].nIcon, m);
                switch(r) {
                  case eIconStateAuto:
                    ReplyCode=250; 
                    szReplay = "icon state 'auto'";
                    break;
                  case eIconStateOn:
                    ReplyCode=251; 
                    szReplay = "icon state 'on'";
                    break;
                  case eIconStateOff:
                    ReplyCode=252; 
                    szReplay = "icon state 'off'";
                    break;
                  default:
                    break;
                }
                break;
            }
        }
      }
      free(request);
      return szReplay;
    }
  }
  ReplyCode=501; 
  return "wrong parameter";
}

cString cPluginTargaVFD::SVDRPCommand(const char *Command, const char *Option, int &ReplyCode)
{
  ReplyCode=501; 
  const char* szReplay = "unknown command";

  if(!strcasecmp(Command, "ON")) {
    szReplay = SVDRPCommandOn(Option,ReplyCode);
  } else if(!strcasecmp(Command, "OFF")) {
    szReplay = SVDRPCommandOff(Option,ReplyCode);
  } else if(!strcasecmp(Command, "ICON")) {
    szReplay = SVDRPCommandIcon(Option,ReplyCode);
  } 

  dsyslog("targaVFD:  SVDRP %s %s - %d (%s)", Command, Option, ReplyCode, szReplay);
  return szReplay;
}

const char **cPluginTargaVFD::SVDRPHelpPages(void)
{
  if(!m_szIconHelpPage) {
    unsigned int i,l,k;
    for(i = 0,l = 0, k = (sizeof(icontable)/sizeof(*icontable)); i < k;++i) {
      l += strlen(icontable[i].szIcon);
      l += 2;
    }
    l += 80;

    m_szIconHelpPage = (char*) calloc(l + 1,1);
    if(m_szIconHelpPage) {
      strncat(m_szIconHelpPage, "ICON [name] [on|off|auto]\n    Force state of icon. Names of icons are:", l);
      for(i = 0; i < k;++i) {
        if((i % 7) == 0) {
          strncat(m_szIconHelpPage, "\n    ", l - (strlen(m_szIconHelpPage) + 5));
        } else {
          strncat(m_szIconHelpPage, ",", l - (strlen(m_szIconHelpPage) + 1));
        }
        strncat(m_szIconHelpPage, icontable[i].szIcon, 
          l - (strlen(m_szIconHelpPage) + strlen(icontable[i].szIcon)));
      }
    }
  }

  // Return help text for SVDRP commands this plugin implements
  static const char *HelpPages[] = {
    "ON\n"
    "    Resume driver of display.\n",
    "OFF\n"
    "    Suspend driver of display.\n",
    "ICON [name] [on|off|auto]\n"
    "    Force state of icon.\n",
    NULL
    };
  if(m_szIconHelpPage)
    HelpPages[2] = m_szIconHelpPage;
  return HelpPages;
}
VDRPLUGINCREATOR(cPluginTargaVFD); // Don't touch this!