-/* $Id: imon.c,v 1.1 2003/10/12 06:08:28 nicowallmeier Exp $
+/* $Id: imon.c,v 1.2 2004/01/06 22:33:14 reinelt Exp $
*
* imond/telmond data processing
*
+ * Copyright 2003 Nico Wallmeier <nico.wallmeier@post.rwth-aachen.de>
+ *
* This file is part of LCD4Linux.
*
* LCD4Linux is free software; you can redistribute it and/or modify
*
*
* $Log: imon.c,v $
+ * Revision 1.2 2004/01/06 22:33:14 reinelt
+ * Copyright statements cleaned up
+ *
* Revision 1.1 2003/10/12 06:08:28 nicowallmeier
* imond/telmond support
*
*/
-\r
-#include <stdio.h>\r
-#include <string.h>\r
-#include <unistd.h>\r
-#include <stdlib.h>\r
-#include <sys/types.h>\r
-#include <sys/fcntl.h>\r
-#include <sys/ioctl.h>\r
-#include <sys/time.h>\r
-#include <linux/errno.h>\r
-#include <sys/stat.h>\r
-#include <string.h>\r
-#include <time.h>\r
-\r
-#include <netdb.h>\r
-#include <netinet/in.h>\r
-#include <netinet/tcp.h>\r
-#include <arpa/inet.h> /* decl of inet_addr() */\r
-#include <sys/socket.h>\r
-\r
-#include "cfg.h"\r
-#include "debug.h"\r
-#include "parser.h"\r
-#include "imon.h"\r
-\r
-#define TRUE 1\r
-#define FALSE 0\r
-\r
-static int fd;\r
-\r
- /*----------------------------------------------------------------------------\r
- * service_connect (host_name, port) - connect to tcp-service\r
- *----------------------------------------------------------------------------\r
- */\r
-static int\r
-service_connect (char * host_name, int port)\r
-{\r
- struct sockaddr_in addr;\r
- struct hostent * host_p;\r
- int fd;\r
- int opt = 1;\r
-\r
- (void) memset ((char *) &addr, 0, sizeof (addr));\r
-\r
- if ((addr.sin_addr.s_addr = inet_addr ((char *) host_name)) == INADDR_NONE)\r
- {\r
- host_p = gethostbyname (host_name);\r
-\r
- if (! host_p)\r
- {\r
- error ("%s: host not found\n", host_name);\r
- return (-1);\r
- }\r
-\r
- (void) memcpy ((char *) (&addr.sin_addr), host_p->h_addr,\r
- host_p->h_length);\r
- }\r
-\r
- addr.sin_family = AF_INET;\r
- addr.sin_port = htons ((unsigned short) port);\r
-\r
- if ((fd = socket (AF_INET, SOCK_STREAM, 0)) < 0)\r
- { /* open socket */\r
- perror ("socket");\r
- return (-1);\r
- }\r
- \r
- (void) setsockopt (fd, IPPROTO_TCP, TCP_NODELAY,\r
- (char *) &opt, sizeof (opt));\r
-\r
- if (connect (fd, (struct sockaddr *) &addr, sizeof (addr)) != 0)\r
- {\r
- (void) close (fd);\r
- perror (host_name);\r
- return (-1);\r
- }\r
-\r
- return (fd);\r
-} /* service_connect (char * host_name, int port) */\r
-\r
-\r
-/*----------------------------------------------------------------------------\r
- * send_command (int fd, char * str) - send command to imond\r
- *----------------------------------------------------------------------------\r
- */\r
-static void\r
-send_command (int fd, char * str)\r
-{\r
- char buf[256];\r
- int len = strlen (str);\r
-\r
- sprintf (buf, "%s\r\n", str);\r
- write (fd, buf, len + 2);\r
-\r
- return;\r
-} /* send_command (int fd, char * str) */\r
-\r
-\r
-/*----------------------------------------------------------------------------\r
- * get_answer (int fd) - get answer from imond\r
- *----------------------------------------------------------------------------\r
- */\r
-static char *\r
-get_answer (int fd)\r
-{\r
- static char buf[8192];\r
- int len;\r
-\r
- len = read (fd, buf, 8192);\r
-\r
- if (len <= 0)\r
- {\r
- return ((char *) NULL);\r
- }\r
-\r
- while (len > 1 && (buf[len - 1] == '\n' || buf[len - 1] == '\r'))\r
- {\r
- buf[len - 1] = '\0';\r
- len--;\r
- }\r
-\r
- if (! strncmp (buf, "OK ", 3)) /* OK xxxx */\r
- {\r
- return (buf + 3);\r
- }\r
- else if (len > 2 && ! strcmp (buf + len - 2, "OK"))\r
- {\r
- *(buf + len - 2) = '\0';\r
- return (buf);\r
- }\r
- else if (len == 2 && ! strcmp (buf + len - 2, "OK"))\r
- {\r
- return (buf);\r
- }\r
-\r
- return ((char *) NULL); /* ERR xxxx */\r
-} /* get_answer (int fd) */\r
-\r
-\r
-/*----------------------------------------------------------------------------\r
- * get_numerical_value (char * cmd) - send cmd, get numval\r
- *----------------------------------------------------------------------------\r
- */\r
-static int\r
-get_numerical_value (char * cmd)\r
-{\r
- char * answer;\r
- int rtc;\r
-\r
- send_command (fd, cmd);\r
-\r
- answer = get_answer (fd);\r
-\r
- if (answer)\r
- {\r
- rtc = atoi (answer);\r
- }\r
- else\r
- {\r
- rtc = -1;\r
- }\r
- return (rtc);\r
-} /* get_numerical_value (char * cmd, int arg) */\r
-\r
-\r
-/*----------------------------------------------------------------------------\r
- * get_value (char * cmd) - send command, get value\r
- *----------------------------------------------------------------------------\r
- */\r
-static char *\r
-get_value (char * cmd)\r
-{\r
- char * answer;\r
-\r
- send_command (fd, cmd);\r
-\r
- answer = get_answer (fd);\r
-\r
- if (answer)\r
- {\r
- return (answer);\r
- }\r
-\r
- return ("");\r
-} /* get_value (char * cmd, int arg) */\r
-\r
-\r
-int init(){\r
- char *s, *host;\r
- int port;\r
- int connect;\r
-\r
- host=cfg_get ("Imon_Host","127.0.0.1");\r
- if (*host=='\0') {\r
- error ("Imon: no 'Imon_Host' entry in %s", cfg_source());\r
- return -1;\r
- } \r
-\r
- if (cfg_number("Imon_Port",5000,1,65536,&port)<0){\r
- return -1; \r
- }\r
- \r
- connect=service_connect(host,port);\r
-\r
- s=cfg_get ("Imon_Pass",NULL);\r
- if ((s!=NULL) && (*s!='\0')) { // Passwort senden\r
- char buf[40];\r
- sprintf(buf,"pass %s",s);\r
- send_command(connect,buf);\r
- s=get_answer(connect); \r
- }\r
- \r
- return connect; \r
-}\r
- \r
-int ImonCh(int index, struct imonchannel *ch, int token_usage[]) {\r
- static int err[CHANNELS+1];\r
- char *s;\r
- char buf[40];\r
- int result=0;\r
- \r
- if (err[index]) return -1;\r
- if ((fd==0) && ((fd=init())<0)) return -1;\r
- \r
- if ((*ch).max_in == 0){ // not initializied\r
- sprintf(buf, "Imon_%d_Dev", index);\r
- s=cfg_get(buf,NULL);\r
- if (s==NULL) {\r
- error ("Imon: no 'Imon_%i_Dev' entry in %s", index, cfg_source());\r
- err[index]=1;\r
- return -1;\r
- } \r
- strcpy((*ch).dev,s);\r
- \r
- sprintf(buf, "Imon_%d_MaxIn", index);\r
- cfg_number(buf,768,1,65536,&(*ch).max_in);\r
-\r
- sprintf(buf, "Imon_%d_MaxOut", index);\r
- cfg_number(buf,128,1,65536,&(*ch).max_out);\r
- }\r
-\r
- sprintf(buf, "status %s", (*ch).dev);\r
- s=get_value(buf);\r
- strcpy((*ch).status,s);\r
- \r
- if ((1<<index) & token_usage[T_IMON_CHARGE]) {\r
- sprintf(buf, "charge %s", (*ch).dev);\r
- s=get_value(buf);\r
- strcpy((*ch).charge,s);\r
- }\r
- \r
- \r
- if (strcmp("Online",(*ch).status)==0){\r
- if ((1<<index) & token_usage[T_IMON_PHONE]) {\r
- sprintf(buf, "phone %s", (*ch).dev);\r
- s=get_value(buf);\r
- strcpy((*ch).phone,s);\r
- }\r
-\r
- if (((1<<index) & token_usage[T_IMON_RIN]) ||\r
- ((1<<index) & token_usage[T_IMON_ROUT])) {\r
- sprintf(buf, "rate %s", (*ch).dev);\r
- s=get_value(buf);\r
- if (sscanf(s,"%d %d",&((*ch).rate_in), &((*ch).rate_out))!=2) result--;\r
- }\r
- \r
- if ((1<<index) & token_usage[T_IMON_IP]) {\r
- sprintf(buf, "ip %s", (*ch).dev);\r
- s=get_value(buf);\r
- strcpy((*ch).ip,s);\r
- }\r
- \r
- if ((1<<index) & token_usage[T_IMON_OTIME]) {\r
- sprintf(buf, "online-time %s", (*ch).dev);\r
- s=get_value(buf);\r
- strcpy((*ch).otime,s);\r
- }\r
- } else {\r
- if (strcmp("Dialing",(*ch).status)==0){\r
- if ((1<<index) & token_usage[T_IMON_PHONE]) {\r
- sprintf(buf, "phone %s", (*ch).dev);\r
- s=get_value(buf);\r
- strcpy((*ch).phone,s);\r
- }\r
- } else {\r
- if ((1<<index) & token_usage[T_IMON_PHONE]) (*ch).phone[0]='\0';\r
- }\r
- if ((1<<index) & token_usage[T_IMON_IP]) (*ch).ip[0]='\0'; \r
- if ((1<<index) & token_usage[T_IMON_OTIME]) (*ch).otime[0]='\0';\r
- if (((1<<index) & token_usage[T_IMON_RIN]) ||\r
- ((1<<index) & token_usage[T_IMON_ROUT])) {\r
- (*ch).rate_in=0;\r
- (*ch).rate_out=0; \r
- }\r
- }\r
- return result;\r
-} \r
- \r
- \r
-int Imon(struct imon *i, int cpu, int datetime){\r
- static int hb;\r
- static int tick;\r
- char *s;\r
- char day[4];\r
- char d[13];\r
- \r
- if (tick++ % 5 != 0) return 0;\r
- \r
- if ((fd==0) && ((fd=init())<0)) return -1;\r
- \r
- if (cpu) (*i).cpu = get_numerical_value("cpu");\r
-\r
- if (datetime){ \r
- s = get_value ("date");\r
- sscanf (s, "%s %s %s", day, d, (*i).time);\r
- strncpy ((*i).date, d, 6);\r
- strcpy ((*i).date + 6, d + 8);\r
- (*i).date[2]='.';\r
- (*i).date[5]='.';\r
- if (hb) (*i).time[5] =' ';\r
- hb=!hb;\r
- }\r
- return 0;\r
-}\r
-\r
-char* ImonVer(){\r
- static char buffer[32]="";\r
-\r
- if (*buffer=='\0') {\r
- char *s;\r
- if ((fd==0) && ((fd=init())<0)) return "";\r
- s=get_value("version");\r
- for (;;){ // interne Versionsnummer killen\r
- if (s[0]==' '){\r
- s=s+1;\r
- break;\r
- }\r
- s=s+1; \r
- }\r
- strcpy(buffer,s); \r
- }\r
- return buffer;\r
-}\r
-\r
-void phonebook(char *number){\r
- FILE * fp;\r
- char line[256];\r
- \r
- fp = fopen (cfg_get ("Telmon_Phonebook","/etc/phonebook"), "r");\r
- \r
- if (! fp) return;\r
- \r
- while (fgets (line, 128, fp)){\r
- if (*line == '#') continue;\r
- if (!strncmp(line,number,strlen(number))){\r
- char *komma=strchr(line,',');\r
- char *beginn=strchr(line,'=');\r
- if (!beginn) return;\r
- while (strrchr(line,'\r')) strrchr(line,'\r')[0]='\0';\r
- while (strrchr(line,'\n')) strrchr(line,'\n')[0]='\0';\r
- if (komma) komma[0]='\0';\r
- strcpy(number,beginn+1);\r
- break;\r
- } \r
- }\r
- \r
- fclose(fp);\r
-}\r
-\r
-int Telmon(struct telmon *t){\r
- static int tick;\r
- static int telmond_fd=-2;\r
- static char oldanswer[128];\r
- static char host[256];\r
- static int port;\r
- \r
- if (tick++ % 50 != 0) return 0;\r
-\r
- if (telmond_fd == -2){ //not initializied\r
- char *s=cfg_get ("Telmon_Host","127.0.0.1");\r
- if (*s=='\0') {\r
- error ("Telmon: no 'Telmon_Host' entry in %s", cfg_source());\r
- telmond_fd=-1;\r
- return -1;\r
- } \r
- strcpy(host,s);\r
- \r
- if (cfg_number("Telmon_Port",5000,1,65536,&port)<0){\r
- telmond_fd=-1;\r
- return -1; \r
- }\r
- }\r
- \r
- if (telmond_fd != -1){\r
- char telbuf[128];\r
-\r
- telmond_fd = service_connect (host, port);\r
- if (telmond_fd >= 0){\r
- int l = read (telmond_fd, telbuf, 127);\r
- if ((l > 0) && (strcmp(telbuf,oldanswer))){\r
- char date[11]; \r
- sscanf(telbuf,"%s %s %s %s",date,(*t).time,(*t).number,(*t).msn);\r
- date[4]='\0';\r
- date[7]='\0';\r
- sprintf((*t).date,"%s.%s.%s",date+8,date+5,date);\r
- phonebook((*t).number);\r
- phonebook((*t).msn);\r
- }\r
- close (telmond_fd);\r
- strcpy(oldanswer,telbuf);\r
- }\r
- }\r
- return 0;\r
-}\r
- \r
-\r
+
+#include <stdio.h>
+#include <string.h>
+#include <unistd.h>
+#include <stdlib.h>
+#include <sys/types.h>
+#include <sys/fcntl.h>
+#include <sys/ioctl.h>
+#include <sys/time.h>
+#include <linux/errno.h>
+#include <sys/stat.h>
+#include <string.h>
+#include <time.h>
+
+#include <netdb.h>
+#include <netinet/in.h>
+#include <netinet/tcp.h>
+#include <arpa/inet.h> /* decl of inet_addr() */
+#include <sys/socket.h>
+
+#include "cfg.h"
+#include "debug.h"
+#include "parser.h"
+#include "imon.h"
+
+#define TRUE 1
+#define FALSE 0
+
+static int fd;
+
+ /*----------------------------------------------------------------------------
+ * service_connect (host_name, port) - connect to tcp-service
+ *----------------------------------------------------------------------------
+ */
+static int
+service_connect (char * host_name, int port)
+{
+ struct sockaddr_in addr;
+ struct hostent * host_p;
+ int fd;
+ int opt = 1;
+
+ (void) memset ((char *) &addr, 0, sizeof (addr));
+
+ if ((addr.sin_addr.s_addr = inet_addr ((char *) host_name)) == INADDR_NONE)
+ {
+ host_p = gethostbyname (host_name);
+
+ if (! host_p)
+ {
+ error ("%s: host not found\n", host_name);
+ return (-1);
+ }
+
+ (void) memcpy ((char *) (&addr.sin_addr), host_p->h_addr,
+ host_p->h_length);
+ }
+
+ addr.sin_family = AF_INET;
+ addr.sin_port = htons ((unsigned short) port);
+
+ if ((fd = socket (AF_INET, SOCK_STREAM, 0)) < 0)
+ { /* open socket */
+ perror ("socket");
+ return (-1);
+ }
+
+ (void) setsockopt (fd, IPPROTO_TCP, TCP_NODELAY,
+ (char *) &opt, sizeof (opt));
+
+ if (connect (fd, (struct sockaddr *) &addr, sizeof (addr)) != 0)
+ {
+ (void) close (fd);
+ perror (host_name);
+ return (-1);
+ }
+
+ return (fd);
+} /* service_connect (char * host_name, int port) */
+
+
+/*----------------------------------------------------------------------------
+ * send_command (int fd, char * str) - send command to imond
+ *----------------------------------------------------------------------------
+ */
+static void
+send_command (int fd, char * str)
+{
+ char buf[256];
+ int len = strlen (str);
+
+ sprintf (buf, "%s\r\n", str);
+ write (fd, buf, len + 2);
+
+ return;
+} /* send_command (int fd, char * str) */
+
+
+/*----------------------------------------------------------------------------
+ * get_answer (int fd) - get answer from imond
+ *----------------------------------------------------------------------------
+ */
+static char *
+get_answer (int fd)
+{
+ static char buf[8192];
+ int len;
+
+ len = read (fd, buf, 8192);
+
+ if (len <= 0)
+ {
+ return ((char *) NULL);
+ }
+
+ while (len > 1 && (buf[len - 1] == '\n' || buf[len - 1] == '\r'))
+ {
+ buf[len - 1] = '\0';
+ len--;
+ }
+
+ if (! strncmp (buf, "OK ", 3)) /* OK xxxx */
+ {
+ return (buf + 3);
+ }
+ else if (len > 2 && ! strcmp (buf + len - 2, "OK"))
+ {
+ *(buf + len - 2) = '\0';
+ return (buf);
+ }
+ else if (len == 2 && ! strcmp (buf + len - 2, "OK"))
+ {
+ return (buf);
+ }
+
+ return ((char *) NULL); /* ERR xxxx */
+} /* get_answer (int fd) */
+
+
+/*----------------------------------------------------------------------------
+ * get_numerical_value (char * cmd) - send cmd, get numval
+ *----------------------------------------------------------------------------
+ */
+static int
+get_numerical_value (char * cmd)
+{
+ char * answer;
+ int rtc;
+
+ send_command (fd, cmd);
+
+ answer = get_answer (fd);
+
+ if (answer)
+ {
+ rtc = atoi (answer);
+ }
+ else
+ {
+ rtc = -1;
+ }
+ return (rtc);
+} /* get_numerical_value (char * cmd, int arg) */
+
+
+/*----------------------------------------------------------------------------
+ * get_value (char * cmd) - send command, get value
+ *----------------------------------------------------------------------------
+ */
+static char *
+get_value (char * cmd)
+{
+ char * answer;
+
+ send_command (fd, cmd);
+
+ answer = get_answer (fd);
+
+ if (answer)
+ {
+ return (answer);
+ }
+
+ return ("");
+} /* get_value (char * cmd, int arg) */
+
+
+int init(){
+ char *s, *host;
+ int port;
+ int connect;
+
+ host=cfg_get ("Imon_Host","127.0.0.1");
+ if (*host=='\0') {
+ error ("Imon: no 'Imon_Host' entry in %s", cfg_source());
+ return -1;
+ }
+
+ if (cfg_number("Imon_Port",5000,1,65536,&port)<0){
+ return -1;
+ }
+
+ connect=service_connect(host,port);
+
+ s=cfg_get ("Imon_Pass",NULL);
+ if ((s!=NULL) && (*s!='\0')) { // Passwort senden
+ char buf[40];
+ sprintf(buf,"pass %s",s);
+ send_command(connect,buf);
+ s=get_answer(connect);
+ }
+
+ return connect;
+}
+
+int ImonCh(int index, struct imonchannel *ch, int token_usage[]) {
+ static int err[CHANNELS+1];
+ char *s;
+ char buf[40];
+ int result=0;
+
+ if (err[index]) return -1;
+ if ((fd==0) && ((fd=init())<0)) return -1;
+
+ if ((*ch).max_in == 0){ // not initializied
+ sprintf(buf, "Imon_%d_Dev", index);
+ s=cfg_get(buf,NULL);
+ if (s==NULL) {
+ error ("Imon: no 'Imon_%i_Dev' entry in %s", index, cfg_source());
+ err[index]=1;
+ return -1;
+ }
+ strcpy((*ch).dev,s);
+
+ sprintf(buf, "Imon_%d_MaxIn", index);
+ cfg_number(buf,768,1,65536,&(*ch).max_in);
+
+ sprintf(buf, "Imon_%d_MaxOut", index);
+ cfg_number(buf,128,1,65536,&(*ch).max_out);
+ }
+
+ sprintf(buf, "status %s", (*ch).dev);
+ s=get_value(buf);
+ strcpy((*ch).status,s);
+
+ if ((1<<index) & token_usage[T_IMON_CHARGE]) {
+ sprintf(buf, "charge %s", (*ch).dev);
+ s=get_value(buf);
+ strcpy((*ch).charge,s);
+ }
+
+
+ if (strcmp("Online",(*ch).status)==0){
+ if ((1<<index) & token_usage[T_IMON_PHONE]) {
+ sprintf(buf, "phone %s", (*ch).dev);
+ s=get_value(buf);
+ strcpy((*ch).phone,s);
+ }
+
+ if (((1<<index) & token_usage[T_IMON_RIN]) ||
+ ((1<<index) & token_usage[T_IMON_ROUT])) {
+ sprintf(buf, "rate %s", (*ch).dev);
+ s=get_value(buf);
+ if (sscanf(s,"%d %d",&((*ch).rate_in), &((*ch).rate_out))!=2) result--;
+ }
+
+ if ((1<<index) & token_usage[T_IMON_IP]) {
+ sprintf(buf, "ip %s", (*ch).dev);
+ s=get_value(buf);
+ strcpy((*ch).ip,s);
+ }
+
+ if ((1<<index) & token_usage[T_IMON_OTIME]) {
+ sprintf(buf, "online-time %s", (*ch).dev);
+ s=get_value(buf);
+ strcpy((*ch).otime,s);
+ }
+ } else {
+ if (strcmp("Dialing",(*ch).status)==0){
+ if ((1<<index) & token_usage[T_IMON_PHONE]) {
+ sprintf(buf, "phone %s", (*ch).dev);
+ s=get_value(buf);
+ strcpy((*ch).phone,s);
+ }
+ } else {
+ if ((1<<index) & token_usage[T_IMON_PHONE]) (*ch).phone[0]='\0';
+ }
+ if ((1<<index) & token_usage[T_IMON_IP]) (*ch).ip[0]='\0';
+ if ((1<<index) & token_usage[T_IMON_OTIME]) (*ch).otime[0]='\0';
+ if (((1<<index) & token_usage[T_IMON_RIN]) ||
+ ((1<<index) & token_usage[T_IMON_ROUT])) {
+ (*ch).rate_in=0;
+ (*ch).rate_out=0;
+ }
+ }
+ return result;
+}
+
+
+int Imon(struct imon *i, int cpu, int datetime){
+ static int hb;
+ static int tick;
+ char *s;
+ char day[4];
+ char d[13];
+
+ if (tick++ % 5 != 0) return 0;
+
+ if ((fd==0) && ((fd=init())<0)) return -1;
+
+ if (cpu) (*i).cpu = get_numerical_value("cpu");
+
+ if (datetime){
+ s = get_value ("date");
+ sscanf (s, "%s %s %s", day, d, (*i).time);
+ strncpy ((*i).date, d, 6);
+ strcpy ((*i).date + 6, d + 8);
+ (*i).date[2]='.';
+ (*i).date[5]='.';
+ if (hb) (*i).time[5] =' ';
+ hb=!hb;
+ }
+ return 0;
+}
+
+char* ImonVer(){
+ static char buffer[32]="";
+
+ if (*buffer=='\0') {
+ char *s;
+ if ((fd==0) && ((fd=init())<0)) return "";
+ s=get_value("version");
+ for (;;){ // interne Versionsnummer killen
+ if (s[0]==' '){
+ s=s+1;
+ break;
+ }
+ s=s+1;
+ }
+ strcpy(buffer,s);
+ }
+ return buffer;
+}
+
+void phonebook(char *number){
+ FILE * fp;
+ char line[256];
+
+ fp = fopen (cfg_get ("Telmon_Phonebook","/etc/phonebook"), "r");
+
+ if (! fp) return;
+
+ while (fgets (line, 128, fp)){
+ if (*line == '#') continue;
+ if (!strncmp(line,number,strlen(number))){
+ char *komma=strchr(line,',');
+ char *beginn=strchr(line,'=');
+ if (!beginn) return;
+ while (strrchr(line,'\r')) strrchr(line,'\r')[0]='\0';
+ while (strrchr(line,'\n')) strrchr(line,'\n')[0]='\0';
+ if (komma) komma[0]='\0';
+ strcpy(number,beginn+1);
+ break;
+ }
+ }
+
+ fclose(fp);
+}
+
+int Telmon(struct telmon *t){
+ static int tick;
+ static int telmond_fd=-2;
+ static char oldanswer[128];
+ static char host[256];
+ static int port;
+
+ if (tick++ % 50 != 0) return 0;
+
+ if (telmond_fd == -2){ //not initializied
+ char *s=cfg_get ("Telmon_Host","127.0.0.1");
+ if (*s=='\0') {
+ error ("Telmon: no 'Telmon_Host' entry in %s", cfg_source());
+ telmond_fd=-1;
+ return -1;
+ }
+ strcpy(host,s);
+
+ if (cfg_number("Telmon_Port",5000,1,65536,&port)<0){
+ telmond_fd=-1;
+ return -1;
+ }
+ }
+
+ if (telmond_fd != -1){
+ char telbuf[128];
+
+ telmond_fd = service_connect (host, port);
+ if (telmond_fd >= 0){
+ int l = read (telmond_fd, telbuf, 127);
+ if ((l > 0) && (strcmp(telbuf,oldanswer))){
+ char date[11];
+ sscanf(telbuf,"%s %s %s %s",date,(*t).time,(*t).number,(*t).msn);
+ date[4]='\0';
+ date[7]='\0';
+ sprintf((*t).date,"%s.%s.%s",date+8,date+5,date);
+ phonebook((*t).number);
+ phonebook((*t).msn);
+ }
+ close (telmond_fd);
+ strcpy(oldanswer,telbuf);
+ }
+ }
+ return 0;
+}
+
+