lcdproc/server/drivers/irmanin.c

/* 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 */