source: npl/mediabox/lcdproc_edwin/src/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 */