/*
 *
 * IRBOX, an Ivy driver for infra-red remote controls
 *
 * Copyright 1998-1999 
 * Centre d'Etudes de la Navigation Aerienne
 *
 * Main file
 *
 * $Id$
 *
 */

#include <stdio.h>
#include <stdlib.h>
#include <sys/types.h>
#include <sys/ioctl.h>
#include <sys/errno.h>
#include <sys/fcntl.h>
#include <unistd.h>
#include <string.h>

#include "timer.h"
#include "ivy.h"
#include "ivychannel.h"

#include "irdev.h"
#include "irtable.h"

#define DEFAULT_DEVICE "/dev/ttyS1"

typedef struct {
	int num;
	int state;		/* State */
	int period[2];	/* time on, time off */
	TimerId timerid;	/* TimerId */
} Button;

static const char* app_name;
static IrState *ir;


static void
Handle (Channel channel, int fd, void *data)
{
	IrState *ir = (IrState*) data;
	IrIntr (ir);
}

static void*
IrTimeout (IrTimerCallback cb, long value, void *data )
{
	return TimerRepeatAfter (1, value, (TimerCb) cb, ir);
}

static void
IrUntimeout (void *id)
{
	TimerRemove ((TimerId) id);
}

static void
IrEventCb (IrState *ir, const unsigned char* code)
{
	IrTable* t;
	const char* key;
	if (IrTableTranslateCode (code, &t, &key)) {
		IvySendMsg ("%s Down control=%s button=%s", app_name, t->name, key);
	} else {
		IvySendMsg ("%s unknown code %.3d %.3d %.3d %.3d %.3d %.3d", app_name, code[0], code[1],code[2],code[3],code[4],code[5]);
		fprintf (stderr, "unknown code %.3d %.3d %.3d %.3d %.3d %.3d\n", code[0], code[1],code[2],code[3],code[4],code[5]);
	}
}

static void
IrFailCb (IrState* ir)
{
	fprintf(stderr,"IR box not responding.\n");
	IvySendMsg ("%s Failed", app_name);
	IvyStop ();
}

int
main (int argc, char *argv[])
{
	unsigned short bport = DEFAULT_BUS;
	int c;
	const char* dev = DEFAULT_DEVICE;
	const char* domains = 0;
	static char app_name_buf [1024];

	while ((c = getopt(argc, argv, "s:b:n:")) != EOF)
		switch (c)	{
		case 'b':
			bport = atoi(optarg) ;
			break;
		case 's':
			dev = optarg;
			break;
		case 'd':
			domains = optarg;
			break;
		case 'n':
			app_name = optarg;
			break;
		}

	if (!app_name) {
		gethostname (app_name_buf, 1024);
		strcat (app_name_buf, ".IRBOX");
		app_name = app_name_buf;
	}

	ir = IrOpen (dev);
	if (!ir) {
		fprintf (stderr, "Can't open %s\n", dev);
		return -1;
	}

	if (!IrInit (ir, IrEventCb, IrFailCb, IrTimeout, IrUntimeout))
		return -1;

	IrTableReadFile ("tables/akaiVCR1.ir");
	IrTableReadFile ("tables/akaiVCR2.ir");
	IrTableReadFile ("tables/rcaTV1.ir");
	IrTableReadFile ("tables/rcaVCR1.ir");
	IrTableReadFile ("tables/sonyTV.ir");
	IrTableReadFile ("tables/sonyVCR1.ir");

	IvyInit (app_name, bport, 0, 0, 0, 0, 0);
	IvyChannelSetUp (IrGetFd (ir), ir, 0, Handle);

	IvyStart (domains);
	IvyMainLoop (0);

	return 0 ; 
}