1
0
mirror of https://github.com/VDR4Arch/vdr.git synced 2023-10-10 13:36:52 +02:00
vdr/remote.c

427 lines
9.1 KiB
C
Raw Normal View History

2000-02-19 13:36:48 +01:00
/*
* remote.c: Interface to the Remote Control Unit
*
2000-04-24 09:46:05 +02:00
* See the main source file 'vdr.c' for copyright information and
2000-02-19 13:36:48 +01:00
* how to reach the author.
*
2000-07-15 12:39:20 +02:00
* Ported to LIRC by Carsten Koch <Carsten.Koch@icem.de> 2000-06-16.
*
2000-07-29 16:23:47 +02:00
* $Id: remote.c 1.11 2000/07/29 16:23:47 kls Exp $
2000-02-19 13:36:48 +01:00
*/
#include "remote.h"
#include <fcntl.h>
#include <netinet/in.h>
#include <string.h>
#include <sys/types.h>
#include <sys/time.h>
#include <termios.h>
#include <unistd.h>
2000-07-15 12:39:20 +02:00
#if defined REMOTE_LIRC
#include <sys/socket.h>
#include <sys/stat.h>
#include <sys/un.h>
#endif
#include "config.h"
2000-02-19 13:36:48 +01:00
#include "tools.h"
2000-04-16 13:54:16 +02:00
#define REPEATLIMIT 100 // ms
#define REPEATDELAY 250 // ms
2000-07-15 12:39:20 +02:00
// --- cRcIoBase -------------------------------------------------------------
cRcIoBase::cRcIoBase(void)
{
t = 0;
firstTime = lastTime = 0;
lastCommand = 0;
}
cRcIoBase::~cRcIoBase()
{
}
// --- cRcIoKBD --------------------------------------------------------------
#if defined REMOTE_KBD
cRcIoKBD::cRcIoKBD(void)
{
}
cRcIoKBD::~cRcIoKBD()
{
}
void cRcIoKBD::Flush(int WaitSeconds)
{
time_t t0 = time(NULL);
timeout(10);
for (;;) {
while (getch() > 0)
t0 = time(NULL);
if (time(NULL) - t0 >= WaitSeconds)
break;
}
}
bool cRcIoKBD::InputAvailable(bool Wait)
{
timeout(Wait ? 1000 : 10);
2000-07-29 16:23:47 +02:00
int ch = getch();
if (ch == ERR)
return false;
ungetch(ch);
return true;
2000-07-15 12:39:20 +02:00
}
bool cRcIoKBD::GetCommand(unsigned int *Command, unsigned short *)
{
if (Command) {
*Command = getch();
return *Command > 0;
}
return false;
}
// --- cRcIoRCU --------------------------------------------------------------
#elif defined REMOTE_RCU
cRcIoRCU::cRcIoRCU(char *DeviceName)
2000-02-19 13:36:48 +01:00
{
dp = 0;
mode = modeB;
code = 0;
address = 0xFFFF;
lastNumber = 0;
2000-02-19 13:36:48 +01:00
if ((f = open(DeviceName, O_RDWR | O_NONBLOCK)) >= 0) {
struct termios t;
if (tcgetattr(f, &t) == 0) {
cfsetspeed(&t, B9600);
cfmakeraw(&t);
if (tcsetattr(f, TCSAFLUSH, &t) == 0)
return;
}
2000-04-16 13:54:16 +02:00
LOG_ERROR_STR(DeviceName);
2000-02-19 13:36:48 +01:00
close(f);
}
2000-04-16 13:54:16 +02:00
else
LOG_ERROR_STR(DeviceName);
2000-02-19 13:36:48 +01:00
f = -1;
}
2000-07-15 12:39:20 +02:00
cRcIoRCU::~cRcIoRCU()
2000-02-19 13:36:48 +01:00
{
if (f >= 0)
close(f);
}
2000-07-15 12:39:20 +02:00
int cRcIoRCU::ReceiveByte(bool Wait)
2000-04-23 15:38:16 +02:00
{
// Returns the byte if one was received within a timeout, -1 otherwise
if (InputAvailable(Wait)) {
unsigned char b;
if (read(f, &b, 1) == 1)
return b;
2000-06-17 17:43:05 +02:00
else
LOG_ERROR;
2000-02-19 13:36:48 +01:00
}
return -1;
}
2000-07-15 12:39:20 +02:00
bool cRcIoRCU::SendByteHandshake(unsigned char c)
2000-02-19 13:36:48 +01:00
{
2000-06-17 17:43:05 +02:00
if (f >= 0) {
int w = write(f, &c, 1);
if (w == 1) {
for (int reply = ReceiveByte(); reply >= 0;) {
if (reply == c)
return true;
else if (reply == 'X') {
// skip any incoming RC code - it will come again
for (int i = 6; i--;) {
if (ReceiveByte(false) < 0)
return false;
}
}
else
return false;
2000-02-19 13:36:48 +01:00
}
2000-06-17 17:43:05 +02:00
}
LOG_ERROR;
2000-02-19 13:36:48 +01:00
}
return false;
}
2000-07-15 12:39:20 +02:00
bool cRcIoRCU::SendByte(unsigned char c)
2000-02-19 13:36:48 +01:00
{
for (int retry = 5; retry--;) {
if (SendByteHandshake(c))
return true;
}
return false;
}
2000-07-15 12:39:20 +02:00
bool cRcIoRCU::SetCode(unsigned char Code, unsigned short Address)
{
code = Code;
address = Address;
return SendCommand(code);
}
bool cRcIoRCU::SetMode(unsigned char Mode)
{
mode = Mode;
return SendCommand(mode);
}
void cRcIoRCU::Flush(int WaitSeconds)
2000-02-19 13:36:48 +01:00
{
time_t t0 = time(NULL);
for (;;) {
while (ReceiveByte(false) >= 0)
t0 = time(NULL);
if (time(NULL) - t0 >= WaitSeconds)
break;
}
}
2000-07-15 12:39:20 +02:00
bool cRcIoRCU::InputAvailable(bool Wait)
2000-02-19 13:36:48 +01:00
{
2000-07-15 12:39:20 +02:00
return DataAvailable(f, Wait);
2000-02-19 13:36:48 +01:00
}
2000-07-15 12:39:20 +02:00
bool cRcIoRCU::GetCommand(unsigned int *Command, unsigned short *Address)
2000-02-19 13:36:48 +01:00
{
#pragma pack(1)
union {
struct {
unsigned short address;
unsigned int command;
} data;
unsigned char raw[6];
} buffer;
#pragma pack()
Flush();
if (Command && ReceiveByte() == 'X') {
for (int i = 0; i < 6; i++) {
int b = ReceiveByte(false);
if (b >= 0)
buffer.raw[i] = b;
else
return false;
}
if (Address)
*Address = ntohs(buffer.data.address); // the PIC sends bytes in "network order"
else if (address != ntohs(buffer.data.address))
return false;
*Command = ntohl(buffer.data.command);
if (code == 'B' && address == 0x0000 && *Command == 0x00004000)
// Well, well, if it isn't the "d-box"...
// This remote control sends the above command before and after
// each keypress - let's just drop this:
return false;
if (*Command == lastCommand) {
// let's have a timeout to avoid getting overrun by commands
int now = time_ms();
int delta = now - lastTime;
lastTime = now;
2000-04-16 13:54:16 +02:00
if (delta < REPEATLIMIT) { // if commands come in rapidly...
if (now - firstTime < REPEATDELAY)
return false; // ...repeat function kicks in after a short delay
2000-02-19 13:36:48 +01:00
return true;
}
}
lastTime = firstTime = time_ms();
lastCommand = *Command;
return true;
}
if (time(NULL) - t > 60) {
SendCommand(code); // in case the PIC listens to the wrong code
t = time(NULL);
}
return false;
}
2000-07-15 12:39:20 +02:00
bool cRcIoRCU::SendCommand(unsigned char Cmd)
2000-02-19 13:36:48 +01:00
{
return SendByte(Cmd | 0x80);
}
2000-07-15 12:39:20 +02:00
bool cRcIoRCU::Digit(int n, int v)
2000-02-19 13:36:48 +01:00
{
return SendByte(((n & 0x03) << 5) | (v & 0x0F) | (((dp >> n) & 0x01) << 4));
}
2000-07-15 12:39:20 +02:00
bool cRcIoRCU::Number(int n, bool Hex)
2000-02-19 13:36:48 +01:00
{
if (!Hex) {
char buf[8];
sprintf(buf, "%4d", n & 0xFFFF);
n = 0;
for (char *d = buf; *d; d++) {
if (*d == ' ')
*d = 0xF;
n = (n << 4) | ((*d - '0') & 0x0F);
}
}
lastNumber = n;
2000-02-19 13:36:48 +01:00
for (int i = 0; i < 4; i++) {
if (!Digit(i, n))
return false;
n >>= 4;
}
return SendCommand(mode);
}
2000-07-15 12:39:20 +02:00
bool cRcIoRCU::String(char *s)
2000-02-19 13:36:48 +01:00
{
2000-04-22 15:21:41 +02:00
const char *chars = mode == modeH ? "0123456789ABCDEF" : "0123456789-EHLP ";
2000-02-19 13:36:48 +01:00
int n = 0;
for (int i = 0; *s && i < 4; s++, i++) {
n <<= 4;
2000-04-22 15:21:41 +02:00
for (const char *c = chars; *c; c++) {
2000-02-19 13:36:48 +01:00
if (*c == *s) {
n |= c - chars;
break;
}
}
}
return Number(n, true);
2000-02-19 13:36:48 +01:00
}
2000-07-15 12:39:20 +02:00
void cRcIoRCU::SetPoints(unsigned char Dp, bool On)
{
if (On)
dp |= Dp;
else
dp &= ~Dp;
Number(lastNumber, true);
}
2000-07-15 12:39:20 +02:00
bool cRcIoRCU::DetectCode(unsigned char *Code, unsigned short *Address)
2000-02-19 13:36:48 +01:00
{
// Caller should initialize 'Code' to 0 and call DetectCode()
// until it returns true. Whenever DetectCode() returns false
// and 'Code' is not 0, the caller can use 'Code' to display
// a message like "Trying code '%c'". If false is returned and
// 'Code' is 0, all possible codes have been tried and the caller
// can either stop calling DetectCode() (and give some error
// message), or start all over again.
if (*Code < 'A' || *Code > 'D') {
*Code = 'A';
return false;
}
if (*Code <= 'D') {
SetMode(modeH);
char buf[5];
sprintf(buf, "C0D%c", *Code);
String(buf);
SetCode(*Code, 0);
unsigned int Command;
if (GetCommand(&Command, Address)) {
SetMode(modeB);
String("----");
2000-02-19 13:36:48 +01:00
return true;
}
2000-02-19 13:36:48 +01:00
if (*Code < 'D') {
(*Code)++;
return false;
}
}
*Code = 0;
return false;
}
2000-07-15 12:39:20 +02:00
// --- cRcIoLIRC -------------------------------------------------------------
#elif defined REMOTE_LIRC
cRcIoLIRC::cRcIoLIRC(char *DeviceName)
{
struct sockaddr_un addr;
addr.sun_family = AF_UNIX;
strcpy(addr.sun_path, DeviceName);
f = socket(AF_UNIX, SOCK_STREAM, 0);
if (f >= 0) {
if (connect(f, (struct sockaddr *)&addr, sizeof(addr)) >= 0)
return;
LOG_ERROR_STR(DeviceName);
close(f);
}
else
LOG_ERROR_STR(DeviceName);
f = -1;
}
cRcIoLIRC::~cRcIoLIRC()
{
if (f >= 0)
close(f);
}
const char *cRcIoLIRC::ReceiveString(void)
{
2000-07-15 16:35:18 +02:00
char buf[LIRC_BUFFER_SIZE];
2000-07-15 12:39:20 +02:00
while (InputAvailable(true)) {
if (read(f, buf, sizeof(buf)) > 21) {
const int now = time_ms();
2000-07-15 16:35:18 +02:00
int repeat;
sscanf(buf, "%*s %x %7s", &repeat, keyName); // '7' in '%7s' is LIRC_KEY_BUF-1!
2000-07-15 12:39:20 +02:00
if (repeat == 0) {
firstTime = lastTime = now;
2000-07-15 16:35:18 +02:00
return keyName;
2000-07-15 12:39:20 +02:00
}
else if ((now > firstTime + REPEATDELAY) && (now > lastTime + REPEATLIMIT)) {
lastTime = now;
2000-07-15 16:35:18 +02:00
return keyName;
2000-07-15 12:39:20 +02:00
}
}
}
return NULL;
}
void cRcIoLIRC::Flush(int WaitSeconds)
{
2000-07-15 16:35:18 +02:00
char buf[LIRC_BUFFER_SIZE];
2000-07-15 12:39:20 +02:00
time_t t0 = time(NULL);
for (;;) {
while (InputAvailable(false)) {
read(f, buf, sizeof(buf));
t0 = time(NULL);
}
if (time(NULL) - t0 >= WaitSeconds)
break;
}
}
bool cRcIoLIRC::InputAvailable(bool Wait)
{
return DataAvailable(f, Wait);
}
bool cRcIoLIRC::GetCommand(unsigned int *Command, unsigned short *)
{
Flush();
if (Command) {
const char *cmd = ReceiveString();
if (cmd) {
*Command = Keys.Encode(cmd);
return true;
}
}
return false;
}
#endif