mirror of
https://github.com/ElvishArtisan/rivendell.git
synced 2025-11-26 15:20:29 +01:00
Initial import of CVS-v2_8_branch
This commit is contained in:
Fred Gleason
219
rlm/rlm_serial.c
Normal file
219
rlm/rlm_serial.c
Normal file
@@ -0,0 +1,219 @@
|
||||
/* rlm_serial.c
|
||||
*
|
||||
* (C) Copyright 2008 Fred Gleason <fredg@paravelsystems.com>
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU General Public License version 2
|
||||
* as published by the Free Software Foundation.
|
||||
*
|
||||
* This program 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.
|
||||
*
|
||||
* This is a Rivendell Loadable Module. It sends Now&Next PAD data
|
||||
* to the tty device specified in the configuration file pointed to by the
|
||||
* plugin argument.
|
||||
*
|
||||
* To compile this module, just do:
|
||||
*
|
||||
* gcc -shared -o rlm_serial.rlm rlm_serial.c
|
||||
*/
|
||||
|
||||
#include <stdlib.h>
|
||||
#include <stdio.h>
|
||||
#include <string.h>
|
||||
#include <strings.h>
|
||||
#include <rlm/rlm.h>
|
||||
|
||||
int rlm_serial_devs;
|
||||
int *rlm_serial_handles;
|
||||
char *rlm_serial_formats;
|
||||
int *rlm_serial_encodings;
|
||||
int *rlm_serial_null_updates;
|
||||
int *rlm_serial_masters;
|
||||
int *rlm_serial_aux1s;
|
||||
int *rlm_serial_aux2s;
|
||||
|
||||
int rlm_serial_GetLogStatus(void *ptr,const char *arg,const char *section,
|
||||
const char *logname)
|
||||
{
|
||||
const char *tag=RLMGetStringValue(ptr,arg,section,logname,"");
|
||||
if(strcasecmp(tag,"yes")==0) {
|
||||
return 1;
|
||||
}
|
||||
if(strcasecmp(tag,"on")==0) {
|
||||
return 1;
|
||||
}
|
||||
if(strcasecmp(tag,"true")==0) {
|
||||
return 1;
|
||||
}
|
||||
if(strcasecmp(tag,"no")==0) {
|
||||
return 0;
|
||||
}
|
||||
if(strcasecmp(tag,"off")==0) {
|
||||
return 0;
|
||||
}
|
||||
if(strcasecmp(tag,"false")==0) {
|
||||
return 0;
|
||||
}
|
||||
if(strcasecmp(tag,"onair")==0) {
|
||||
return 2;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
||||
void rlm_serial_RLMStart(void *ptr,const char *arg)
|
||||
{
|
||||
int handle;
|
||||
char device[256];
|
||||
int speed;
|
||||
int parity;
|
||||
int wsize;
|
||||
char section[256];
|
||||
char errtext[256];
|
||||
int i=1;
|
||||
|
||||
rlm_serial_devs=0;
|
||||
rlm_serial_handles=NULL;
|
||||
rlm_serial_formats=NULL;
|
||||
rlm_serial_encodings=NULL;
|
||||
rlm_serial_null_updates=NULL;
|
||||
rlm_serial_masters=NULL;
|
||||
rlm_serial_aux1s=NULL;
|
||||
rlm_serial_aux2s=NULL;
|
||||
|
||||
sprintf(section,"Serial%d",i++);
|
||||
strncpy(device,RLMGetStringValue(ptr,arg,section,"Device",""),256);
|
||||
if(strlen(device)==0) {
|
||||
RLMLog(ptr,LOG_WARNING,"rlm_serial: no serial devices specified");
|
||||
return;
|
||||
}
|
||||
while(strlen(device)>0) {
|
||||
speed=RLMGetIntegerValue(ptr,arg,section,"Speed",9600);
|
||||
parity=RLMGetIntegerValue(ptr,arg,section,"Parity",0);
|
||||
wsize=RLMGetIntegerValue(ptr,arg,section,"WordSize",8);
|
||||
if((handle=RLMOpenSerial(ptr,device,speed,parity,wsize))>=0) {
|
||||
rlm_serial_handles=realloc(rlm_serial_handles,
|
||||
(rlm_serial_devs+1)*sizeof(int));
|
||||
rlm_serial_handles[rlm_serial_devs]=handle;
|
||||
rlm_serial_formats=realloc(rlm_serial_formats,(rlm_serial_devs+1)*256);
|
||||
strncpy(rlm_serial_formats+256*rlm_serial_devs,
|
||||
RLMGetStringValue(ptr,arg,section,"FormatString",""),256);
|
||||
rlm_serial_masters=realloc(rlm_serial_masters,
|
||||
(rlm_serial_devs+1)*sizeof(int));
|
||||
rlm_serial_masters[rlm_serial_devs]=
|
||||
rlm_serial_GetLogStatus(ptr,arg,section,"MasterLog");
|
||||
rlm_serial_encodings=realloc(rlm_serial_encodings,
|
||||
(rlm_serial_devs+1)*sizeof(int));
|
||||
rlm_serial_encodings[rlm_serial_devs]=
|
||||
RLMGetIntegerValue(ptr,arg,section,"Encoding",RLM_ENCODE_NONE);
|
||||
|
||||
rlm_serial_null_updates=realloc(rlm_serial_null_updates,
|
||||
(rlm_serial_devs+1)*sizeof(int));
|
||||
rlm_serial_null_updates[rlm_serial_devs]=
|
||||
RLMGetIntegerValue(ptr,arg,section,"ProcessNullUpdates",0);
|
||||
|
||||
|
||||
|
||||
rlm_serial_aux1s=realloc(rlm_serial_aux1s,
|
||||
(rlm_serial_devs+1)*sizeof(int));
|
||||
rlm_serial_aux1s[rlm_serial_devs]=
|
||||
rlm_serial_GetLogStatus(ptr,arg,section,"Aux1Log");
|
||||
rlm_serial_aux2s=realloc(rlm_serial_aux2s,
|
||||
(rlm_serial_devs+1)*sizeof(int));
|
||||
rlm_serial_aux2s[rlm_serial_devs]=
|
||||
rlm_serial_GetLogStatus(ptr,arg,section,"Aux2Log");
|
||||
rlm_serial_devs++;
|
||||
sprintf(errtext,"rlm_serial: opened device \"%s\"",device);
|
||||
RLMLog(ptr,LOG_INFO,errtext);
|
||||
}
|
||||
else {
|
||||
sprintf(errtext,"unable to open tty \"%s\"",device);
|
||||
RLMLog(ptr,LOG_WARNING,errtext);
|
||||
}
|
||||
sprintf(section,"Serial%d",i++);
|
||||
strncpy(device,RLMGetStringValue(ptr,arg,section,"Device",""),256);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
void rlm_serial_RLMFree(void *ptr)
|
||||
{
|
||||
int i;
|
||||
|
||||
for(i=0;i<rlm_serial_devs;i++) {
|
||||
RLMCloseSerial(ptr,rlm_serial_handles[i]);
|
||||
}
|
||||
free(rlm_serial_handles);
|
||||
free(rlm_serial_formats);
|
||||
free(rlm_serial_encodings);
|
||||
free(rlm_serial_null_updates);
|
||||
free(rlm_serial_masters);
|
||||
free(rlm_serial_aux1s);
|
||||
free(rlm_serial_aux2s);
|
||||
}
|
||||
|
||||
|
||||
void rlm_serial_RLMPadDataSent(void *ptr,const struct rlm_svc *svc,
|
||||
const struct rlm_log *log,
|
||||
const struct rlm_pad *now,
|
||||
const struct rlm_pad *next)
|
||||
{
|
||||
int i;
|
||||
int flag=0;
|
||||
char msg[1500];
|
||||
|
||||
for(i=0;i<rlm_serial_devs;i++) {
|
||||
switch(rlm_serial_null_updates[i]) {
|
||||
case 0: /* Process all updates */
|
||||
break;
|
||||
|
||||
case 1: /* Process only non-null NOW updates */
|
||||
if(now->rlm_cartnum==0) {
|
||||
return;
|
||||
}
|
||||
break;
|
||||
|
||||
case 2: /* Process only non-null NEXT updates */
|
||||
if(next->rlm_cartnum==0) {
|
||||
return;
|
||||
}
|
||||
break;
|
||||
|
||||
case 3: /* Process only non-null NOW and NEXT updates */
|
||||
if((now->rlm_cartnum==0)||(next->rlm_cartnum==0)) {
|
||||
return;
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
switch(log->log_mach) {
|
||||
case 0:
|
||||
flag=rlm_serial_masters[i];
|
||||
break;
|
||||
|
||||
case 1:
|
||||
flag=rlm_serial_aux1s[i];
|
||||
break;
|
||||
|
||||
case 2:
|
||||
flag=rlm_serial_aux2s[i];
|
||||
break;
|
||||
}
|
||||
if((flag==1)||((flag==2)&&(log->log_onair!=0))) {
|
||||
const char *str=
|
||||
RLMResolveNowNextEncoded(ptr,now,next,rlm_serial_formats+256*i,
|
||||
rlm_serial_encodings[i]);
|
||||
RLMSendSerial(ptr,rlm_serial_handles[i],str,strlen(str));
|
||||
snprintf(msg,1500,"rlm_serial: sending pad update: \"%s\"",
|
||||
(const char *)str);
|
||||
RLMLog(ptr,LOG_INFO,msg);
|
||||
}
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user