/* irmanin.c - test/demo of LIBIR's to interface with lcdproc (LCDd) */
/* Copyright (C) 1999 David Glaude loosely based on workmanir.c */
/* workmanir.c - test/demo of LIBIR's high level command functions */
/* Copyright (C) 1998 Tom Wheeley, see file COPYING for details    */
#include <config.h>
#include <stdlib.h>
#include <stdio.h>
#include <unistd.h>
#include <termios.h>
#include <fcntl.h>
#include <string.h>
#include <sys/errno.h>
#include <sys/ioctl.h>
#include <sys/types.h>
#include <errno.h>


#define __u32 unsigned int
#define __u8 unsigned char


#include "../../shared/debug.h"
#include "../../shared/str.h"

#define NAME_LENGTH 128

#include "lcd.h"
#include "irmanin.h"
#include "../../../libirman-0.4.1b/irman.h"


char *progname = "irmanin";

char *codes[] = {
	/* dummy */	NULL,
	/* KeyToLcd */	"lcdproc-A",
	/* KeyToLcd */	"lcdproc-B",
	/* KeyToLcd */	"lcdproc-C",
	/* KeyToLcd */	"lcdproc-D",
	/* KeyToLcd */	"lcdproc-E",
	/* KeyToLcd */	"lcdproc-F",
	/* KeyToLcd */	"lcdproc-G",
	/* KeyToLcd */	"lcdproc-H",
	/* KeyToLcd */	"lcdproc-I",
	/* KeyToLcd */	"lcdproc-J",
	/* KeyToLcd */	"lcdproc-K",
	/* KeyToLcd */	"lcdproc-L",
	/* KeyToLcd */	"lcdproc-M",
	/* KeyToLcd */	"lcdproc-N",
	/* KeyToLcd */	"lcdproc-O",
	/* KeyToLcd */	"lcdproc-P",
	/* KeyToLcd */	"lcdproc-Q",
	/* KeyToLcd */	"lcdproc-R",
	/* KeyToLcd */	"lcdproc-S",
	/* KeyToLcd */	"lcdproc-T",
	/* KeyToLcd */	"lcdproc-U",
	/* KeyToLcd */	"lcdproc-V",
	/* KeyToLcd */	"lcdproc-W",
	/* KeyToLcd */	"lcdproc-X",
	/* KeyToLcd */	"lcdproc-Y",
	/* KeyToLcd */	"lcdproc-Z",
	/* end */	NULL
};



//////////////////////////////////////////////////////////////////////////
////////////////////// Base "class" to derive from ///////////////////////
//////////////////////////////////////////////////////////////////////////

lcd_logical_driver *irmanin;

//void sigterm(int sig)
//{
//  ir_free_commands();
//  ir_finish();
//  raise(sig);
//}

////////////////////////////////////////////////////////////
// init() should set up any device-specific stuff, and
// point all the function pointers.
int irmanin_init(struct lcd_logical_driver *driver, char *args) 
{
   char device[256];
   char *ptrdevice;
   char config[256];
   char *ptrconfig;

   char *portname;

   char *argv[64];
   int argc, i, j;
   char *filename;

   ptrconfig=NULL;
   ptrdevice=NULL;
   
   irmanin = driver;

   argc = get_args(argv, args, 64);

   for(i=0; i<argc; i++)
   {
      //printf("Arg(%i): %s\n", i, argv[i]);
      if(0 == strcmp(argv[i], "-d")  ||
	 0 == strcmp(argv[i], "--device"))
      {
	 if(i + 1 > argc) {
	    fprintf(stderr, "irmanin_init: %s requires an argument\n",
		    argv[i]);
	    return -1;
	 }
	 strcpy(device, argv[++i]);
	 ptrdevice=device;
      }
      else if(0 == strcmp(argv[i], "-c")  ||
	 0 == strcmp(argv[i], "--config"))
      {
	 if(i + 1 > argc) {
	    fprintf(stderr, "irmanin_init: %s requires an argument\n",
		    argv[i]);
	    return -1;
	 }
	 strcpy(config, argv[++i]);
	 ptrconfig=config;
      }
      else if(0 == strcmp(argv[i], "-h")  ||
	 0 == strcmp(argv[i], "--help"))
      {
	 printf("LCDproc IrMan input driver\n"
		"\t-d\t--device\tSelect the input device to use\n"
		"\t-d\t--config\tSelect the configuration file to use\n"
		"\t-h\t--help\t\tShow this help information\n");
	 return -1;
      }
      else
      {
	 printf("Invalid parameter: %s\n", argv[i]);
      }
   }
   
   if (ir_init_commands(ptrconfig, 1) < 0) {
     fprintf(stderr, "error initialising commands: %s\n", strerror(errno));
     exit(1);
   }

   portname = ir_default_portname();
   if(portname==NULL){
     if(ptrdevice==NULL){
       portname=ptrdevice;
     }else{
       fprintf(stderr, "error no device defined\n");
       exit(1);
     }
   }

   driver->getkey = irmanin_getkey;
   driver->close = irmanin_close;

   for (i=1; codes[i] != NULL; i++) {
     if (ir_register_command(codes[i], i) < 0) {
       if (errno == ENOENT) {
         fprintf(stderr, "%s: no code set for `%s'\n", progname, codes[i]);
       } else {
         fprintf(stderr, "error registering `%s': `%s'\n", codes[i], strerror(errno));
       }
     }
   }

   errno = 0;  
   if (ir_init(portname) < 0) {
     fprintf(stderr, "%s: error initialising Irman: `%s'\n", strerror(errno), portname);
     exit(1);
   }

   return 1;  // 200 is arbitrary.  (must be 1 or more)
}


void irmanin_close() 
{
  if(irmanin->framebuf != NULL) free(irmanin->framebuf);
  
  irmanin->framebuf = NULL;

  ir_free_commands();
  ir_finish();
}


//////////////////////////////////////////////////////////////////////
// Tries to read a character from an input device...
//
// Return 0 for "nothing available".
//
char irmanin_getkey()
{
  int i;
  int cmd;
  char key;

  key=(char)0;
  switch (cmd=ir_poll_command()) {
    case IR_CMD_ERROR:
      fprintf(stderr, "%s: error reading command: %s\n", progname, strerror(errno));
      break;
    case IR_CMD_UNKNOWN:
      break;
    default:
      key=(char)('A'-1+cmd);
      break;
  }

  return key;
}

/* end of irmanin.c */