aboutsummaryrefslogtreecommitdiffstats
path: root/parser.c (follow)
AgeCommit message (Expand)AuthorFilesLines
2003-11-11[lcd4linux @ 2003-11-11 04:40:20 by reinelt]reinelt1-1/+7
2003-10-12[lcd4linux @ 2003-10-12 06:08:28 by nicowallmeier]nicowallmeier1-1/+19
2003-10-05[lcd4linux @ 2003-10-05 17:58:50 by reinelt]reinelt1-4/+9
2003-09-01[lcd4linux @ 2003-09-01 04:09:34 by reinelt]reinelt1-1/+15
2003-06-21[lcd4linux @ 2003-06-21 05:46:18 by reinelt]reinelt1-1/+6
2002-12-05[lcd4linux @ 2002-12-05 19:23:01 by reinelt]reinelt1-3/+6
2002-08-19[lcd4linux @ 2002-08-19 04:41:20 by reinelt]reinelt1-1/+5
2001-03-16[lcd4linux @ 2001-03-16 16:40:17 by ltoetsch]ltoetsch1-2/+9
2001-03-14[lcd4linux @ 2001-03-14 13:19:29 by ltoetsch]ltoetsch1-1/+5
2001-03-13[lcd4linux @ 2001-03-13 08:34:15 by reinelt]reinelt1-2/+6
2001-03-08[lcd4linux @ 2001-03-08 15:25:38 by ltoetsch]ltoetsch1-2/+5
2001-03-07[lcd4linux @ 2001-03-07 18:10:21 by ltoetsch]ltoetsch1-1/+5
2001-03-02[lcd4linux @ 2001-03-02 10:18:03 by ltoetsch]ltoetsch1-1/+7
2001-02-19[lcd4linux @ 2001-02-19 00:15:46 by reinelt]reinelt1-24/+43
2001-02-16[lcd4linux @ 2001-02-16 08:23:09 by reinelt]reinelt1-1/+6
2001-02-14[lcd4linux @ 2001-02-14 07:40:16 by reinelt]reinelt1-3/+30
2000-08-10[lcd4linux @ 2000-08-10 09:44:09 by reinelt]reinelt1-9/+15
2000-05-21[lcd4linux @ 2000-05-21 06:20:35 by reinelt]reinelt1-5/+14
2000-03-24[lcd4linux @ 2000-03-24 11:36:56 by reinelt]reinelt1-2/+8
2000-03-19[lcd4linux @ 2000-03-19 08:41:28 by reinelt]reinelt1-2/+7
2000-03-18[lcd4linux @ 2000-03-18 10:31:06 by reinelt]reinelt1-55/+66
2000-03-17[lcd4linux @ 2000-03-17 09:21:42 by reinelt]reinelt1-8/+19
2000-03-13[lcd4linux @ 2000-03-13 15:58:24 by reinelt]reinelt1-0/+208
lass='lines'>
/* $Id: plugin_isdn.c,v 1.1 2004/05/19 05:23:25 reinelt Exp $
 *
 * plugin for ISDN subsystem
 *
 * Copyright 2003 Michael Reinelt <reinelt@eunet.at>
 * Copyright 2004 The LCD4Linux Team <lcd4linux-devel@users.sourceforge.net>
 *
 * Based on the old isdn client (isdn.c) which is
 * Copyright 1999, 2000 Michael Reinelt <reinelt@eunet.at>
 *
 * This file is part of LCD4Linux.
 *
 * LCD4Linux is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2, or (at your option)
 * any later version.
 *
 * LCD4Linux is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 *
 * $Log: plugin_isdn.c,v $
 * Revision 1.1  2004/05/19 05:23:25  reinelt
 *
 * plugin_isdn.c added (sorry, I forgot...)
 *
 */

/* 
 * exported functions:
 *
 * int plugin_init_isdn (void)
 *  adds functions to access ISDN information
 *
 */


#include "config.h"

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

#ifdef HAVE_LINUX_ISDN_H
#include <linux/isdn.h>
#else
#warning isdn.h not found. CPS support deactivated.
#endif

#include "debug.h"
#include "plugin.h"
#include "qprintf.h"
#include "hash.h"


typedef struct {
  unsigned long in;
  unsigned long out;
} CPS;


static HASH ISDN_INFO = { 0, };
static HASH ISDN_CPS  = { 0, };


static void hash_set_info (char *name, int channel, char *val)
{
  char key[16];

  qprintf (key, sizeof(key), "%s[%d]", name, channel);
  hash_set (&ISDN_INFO, key, val);
}

static int parse_isdninfo (void)
{
  int age;
  FILE *stream;
  long flags;
  
  // reread every 10 msec only
  age = hash_age(&ISDN_INFO, NULL, NULL);
  if (age > 0 && age <= 10) return 0;

  // open file
  stream = fopen ("/dev/isdninfo", "r");
  if (stream == NULL) {
    error ("open(/dev/isdninfo) failed: %s", strerror(errno));
    return -1;
  }
  
  // get flags
  flags = fcntl(fileno(stream), F_GETFL);
  if (flags < 0) {
    error ("fcntl(/dev/isdninfo, F_GETFL) failed: %s", strerror(errno));
    return -1;
  }
  
  // set O_NONBLOCK
  if (fcntl (fileno(stream), F_SETFL, flags | O_NONBLOCK) < 0) {
    error ("fcntl(/dev/isdninfo, F_SETFL, O_NONBLOCK) failed: %s", strerror(errno));
    return -1;
  }

  while (!feof(stream)) {
    char buffer[4096];
    char *beg, *end;
    if (fgets (buffer, sizeof(buffer), stream) == NULL) break;
    beg = strchr(buffer, ':');
    if (beg!=NULL) {
      char delim[] = " \t\n";
      int i = 0;
      *beg++ = '\0';
      while (*beg && strchr(delim, *beg)) beg++; 
      while (beg && *beg) {
	if ((end = strpbrk(beg, delim))) *end = '\0'; 
	hash_set_info(buffer, i, beg);
	beg = end ? end+1 : NULL;
	while (*beg && strchr(delim, *beg)) beg++; 
	i++;
      }
    } else {
      error ("Huh? no colon found in <%s>", buffer);
    }
  }

  fclose (stream);

  return 0;
}  


static void my_isdn_info (RESULT *result, RESULT *arg1, RESULT *arg2)
{
  char key[16], *val;

  if (parse_isdninfo()<0) {
    SetResult(&result, R_STRING, ""); 
    return;
  }
  
  qprintf(key, sizeof(key), "%s[%d]", R2S(arg1), (int)R2N(arg2));
  val = hash_get(&ISDN_INFO, key);
  if (val == NULL) val = "";
  SetResult(&result, R_STRING, val); 
}


#ifdef HAVE_LINUX_ISDN_H

static void hash_set_cps (int channel, CPS *cps)
{
  char key[16], val[16];

  qprintf (key, sizeof(key), channel < 0 ? "i" : "i%d", channel);
  qprintf (val, sizeof(val), "%u", cps->in);
  hash_set_delta (&ISDN_CPS, key, val);

  qprintf (key, sizeof(key), channel < 0 ? "o" : "o%d", channel);
  qprintf (val, sizeof(val), "%u", cps->out);
  hash_set_delta (&ISDN_CPS, key, val);
}


static int get_cps(void)
{
  int age, i;
  static int fd = -2;
  CPS cps[ISDN_MAX_CHANNELS];
  CPS sum;

  // reread every 10 msec only
  age = hash_age(&ISDN_CPS, NULL, NULL);
  if (age > 0 && age <= 10) return 0;
  
  if (fd == -1) return -1;
  
  if (fd == -2) {
    fd = open("/dev/isdninfo", O_RDONLY | O_NDELAY);
    if (fd == -1) {
      error ("open(/dev/isdninfo) failed: %s", strerror(errno));
      return -1;
    }
  }
  
  if (ioctl(fd, IIOCGETCPS, &cps)) {
    error("ioctl(IIOCGETCPS) failed: %s", strerror(errno));
    fd = -1;
    return -1;
  }

  sum.in  = 0;
  sum.out = 0;
  for (i = 0; i < ISDN_MAX_CHANNELS; i++) {
    sum.in  += cps[i].in;
    sum.out += cps[i].out;
    hash_set_cps (i, &cps[i]);
  }
  hash_set_cps (-1, &sum);

  return 0;
}


static void my_isdn_cps (RESULT *result, RESULT *arg1, RESULT *arg2)
{
  double value;
  
  if (get_cps()<0) {
    SetResult(&result, R_STRING, ""); 
    return;
  }
  
  value = hash_get_delta(&ISDN_CPS, R2S(arg1), R2N(arg2));
  SetResult(&result, R_NUMBER, &value); 

}

#endif


int plugin_init_isdn (void)
{
  AddFunction ("isdn::info", 2, my_isdn_info);

#ifdef HAVE_LINUX_ISDN_H
  AddFunction ("isdn::cps",  2, my_isdn_cps);
#endif

  return 0;
}


void plugin_exit_isdn(void) 
{
  hash_destroy(&ISDN_INFO);
  hash_destroy(&ISDN_CPS);
}