mirror of
https://github.com/ElvishArtisan/rivendell.git
synced 2025-04-24 09:28:54 +02:00
305 lines
8.7 KiB
C
305 lines
8.7 KiB
C
/* rlm_xmpad.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 an XM radio channel, using XM's in-house format.
|
|
* plugin argument.
|
|
*
|
|
* To compile this module, just do:
|
|
*
|
|
* gcc -shared -o rlm_xmpad.rlm rlm_xmpad.c
|
|
*/
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <strings.h>
|
|
#include <rlm/rlm.h>
|
|
|
|
#define RLM_XMPAD_DELIMITER 0x02
|
|
//#define RLM_XMPAD_DELIMITER 0x7C
|
|
|
|
|
|
int rlm_xmpad_devs;
|
|
int *rlm_xmpad_ids;
|
|
int *rlm_xmpad_handles;
|
|
int *rlm_xmpad_recordings;
|
|
char *rlm_xmpad_format1s;
|
|
char *rlm_xmpad_format2s;
|
|
int *rlm_xmpad_display_size1s;
|
|
int *rlm_xmpad_display_size2s;
|
|
int *rlm_xmpad_masters;
|
|
int *rlm_xmpad_aux1s;
|
|
int *rlm_xmpad_aux2s;
|
|
|
|
int rlm_xmpad_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_xmpad_SendPad(void *ptr,int config,const char *line1,
|
|
const char *line2,int len)
|
|
{
|
|
char str[1024];
|
|
char sline1[17];
|
|
char sline2[17];
|
|
char flag1[1024];
|
|
char flag2[1024];
|
|
int i;
|
|
|
|
//
|
|
// Log it
|
|
//
|
|
sprintf(str,"rlm_xmpad: sending pad update: |%s|%s|%d|",line1,line2,len);
|
|
RLMLog(ptr,LOG_INFO,str);
|
|
|
|
//
|
|
// Generate Display Strings and Flags
|
|
//
|
|
strncpy(sline1,line1,16);
|
|
sline1[16]=0;
|
|
flag1[0]=0;
|
|
for(i=0;i<rlm_xmpad_display_size1s[config];i++) {
|
|
strcat(flag1,"1");
|
|
}
|
|
strncpy(sline2,line2,16);
|
|
sline2[16]=0;
|
|
flag2[0]=0;
|
|
for(i=0;i<rlm_xmpad_display_size2s[config];i++) {
|
|
strcat(flag2,"1");
|
|
}
|
|
|
|
//
|
|
// Generate PAD Data
|
|
// The B-4 packet
|
|
//
|
|
sprintf(str,"B-4%c%d%c%d%c%d%c%d%c%d%c%d%c%s%c%s%c%s%c%s%c%s%c%s%c%u\n",
|
|
RLM_XMPAD_DELIMITER,!(rlm_xmpad_recordings[config]),
|
|
RLM_XMPAD_DELIMITER,1,
|
|
RLM_XMPAD_DELIMITER,len/432,
|
|
RLM_XMPAD_DELIMITER,0,
|
|
RLM_XMPAD_DELIMITER,rlm_xmpad_display_size1s[config],
|
|
RLM_XMPAD_DELIMITER,rlm_xmpad_display_size2s[config],
|
|
RLM_XMPAD_DELIMITER,flag1,
|
|
RLM_XMPAD_DELIMITER,flag2,
|
|
RLM_XMPAD_DELIMITER,sline2,
|
|
RLM_XMPAD_DELIMITER,flag1,
|
|
RLM_XMPAD_DELIMITER,flag2,
|
|
RLM_XMPAD_DELIMITER,sline1,
|
|
RLM_XMPAD_DELIMITER,rlm_xmpad_ids[config]);
|
|
RLMSendSerial(ptr,rlm_xmpad_handles[config],str,strlen(str));
|
|
RLMSendSerial(ptr,rlm_xmpad_handles[config],str,strlen(str));
|
|
RLMSendSerial(ptr,rlm_xmpad_handles[config],str,strlen(str));
|
|
|
|
//
|
|
// The A4 Packet
|
|
//
|
|
sprintf(str,"A4%c%d%c%s\n",RLM_XMPAD_DELIMITER,1,RLM_XMPAD_DELIMITER,line1);
|
|
RLMSendSerial(ptr,rlm_xmpad_handles[config],str,strlen(str));
|
|
|
|
//
|
|
// The A5 Packet
|
|
//
|
|
sprintf(str,"A5%c%d%c%s\n",RLM_XMPAD_DELIMITER,1,RLM_XMPAD_DELIMITER,line2);
|
|
RLMSendSerial(ptr,rlm_xmpad_handles[config],str,strlen(str));
|
|
}
|
|
|
|
|
|
void rlm_xmpad_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;
|
|
int interval;
|
|
|
|
rlm_xmpad_devs=0;
|
|
rlm_xmpad_ids=NULL;
|
|
rlm_xmpad_handles=NULL;
|
|
rlm_xmpad_recordings=NULL;
|
|
rlm_xmpad_format1s=NULL;
|
|
rlm_xmpad_format2s=NULL;
|
|
rlm_xmpad_display_size1s=NULL;
|
|
rlm_xmpad_display_size2s=NULL;
|
|
rlm_xmpad_masters=NULL;
|
|
rlm_xmpad_aux1s=NULL;
|
|
rlm_xmpad_aux2s=NULL;
|
|
|
|
sprintf(section,"Serial%d",i++);
|
|
strncpy(device,RLMGetStringValue(ptr,arg,section,"Device",""),256);
|
|
if(strlen(device)==0) {
|
|
RLMLog(ptr,LOG_WARNING,"rlm_xmpad: 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_xmpad_handles=realloc(rlm_xmpad_handles,
|
|
(rlm_xmpad_devs+1)*sizeof(int));
|
|
rlm_xmpad_handles[rlm_xmpad_devs]=handle;
|
|
rlm_xmpad_ids=realloc(rlm_xmpad_ids,(rlm_xmpad_devs+1)*sizeof(int));
|
|
rlm_xmpad_ids[rlm_xmpad_devs]=
|
|
RLMGetIntegerValue(ptr,arg,section,"ProgramID",0);
|
|
rlm_xmpad_format1s=realloc(rlm_xmpad_format1s,(rlm_xmpad_devs+1)*256);
|
|
strncpy(rlm_xmpad_format1s+256*rlm_xmpad_devs,
|
|
RLMGetStringValue(ptr,arg,section,"FormatString1",""),256);
|
|
rlm_xmpad_format2s=realloc(rlm_xmpad_format2s,(rlm_xmpad_devs+1)*256);
|
|
strncpy(rlm_xmpad_format2s+256*rlm_xmpad_devs,
|
|
RLMGetStringValue(ptr,arg,section,"FormatString2",""),256);
|
|
rlm_xmpad_display_size1s=realloc(rlm_xmpad_display_size1s,
|
|
(rlm_xmpad_devs+1)*sizeof(int));
|
|
rlm_xmpad_display_size1s[rlm_xmpad_devs]=
|
|
RLMGetIntegerValue(ptr,arg,section,"DisplaySize1",8);
|
|
rlm_xmpad_display_size2s=realloc(rlm_xmpad_display_size2s,
|
|
(rlm_xmpad_devs+1)*sizeof(int));
|
|
rlm_xmpad_display_size2s[rlm_xmpad_devs]=
|
|
RLMGetIntegerValue(ptr,arg,section,"DisplaySize2",10);
|
|
rlm_xmpad_recordings=realloc(rlm_xmpad_recordings,
|
|
(rlm_xmpad_devs+1)*sizeof(int));
|
|
rlm_xmpad_recordings[rlm_xmpad_devs]=
|
|
RLMGetBooleanValue(ptr,arg,section,"Recording",1);
|
|
rlm_xmpad_masters=realloc(rlm_xmpad_masters,
|
|
(rlm_xmpad_devs+1)*sizeof(int));
|
|
rlm_xmpad_masters[rlm_xmpad_devs]=
|
|
rlm_xmpad_GetLogStatus(ptr,arg,section,"MasterLog");
|
|
rlm_xmpad_aux1s=realloc(rlm_xmpad_aux1s,
|
|
(rlm_xmpad_devs+1)*sizeof(int));
|
|
rlm_xmpad_aux1s[rlm_xmpad_devs]=
|
|
rlm_xmpad_GetLogStatus(ptr,arg,section,"Aux1Log");
|
|
rlm_xmpad_aux2s=realloc(rlm_xmpad_aux2s,
|
|
(rlm_xmpad_devs+1)*sizeof(int));
|
|
rlm_xmpad_aux2s[rlm_xmpad_devs]=
|
|
rlm_xmpad_GetLogStatus(ptr,arg,section,"Aux2Log");
|
|
interval=RLMGetIntegerValue(ptr,arg,section,"HeartbeatInterval",30);
|
|
if(interval>0) {
|
|
RLMStartTimer(ptr,rlm_xmpad_devs,1000*interval,RLM_TIMER_REPEATING);
|
|
}
|
|
rlm_xmpad_devs++;
|
|
sprintf(errtext,"rlm_xmpad: 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_xmpad_RLMFree(void *ptr)
|
|
{
|
|
int i;
|
|
|
|
for(i=0;i<rlm_xmpad_devs;i++) {
|
|
RLMCloseSerial(ptr,rlm_xmpad_handles[i]);
|
|
}
|
|
free(rlm_xmpad_handles);
|
|
free(rlm_xmpad_ids);
|
|
free(rlm_xmpad_format1s);
|
|
free(rlm_xmpad_format2s);
|
|
free(rlm_xmpad_display_size1s);
|
|
free(rlm_xmpad_display_size2s);
|
|
free(rlm_xmpad_recordings);
|
|
free(rlm_xmpad_masters);
|
|
free(rlm_xmpad_aux1s);
|
|
free(rlm_xmpad_aux2s);
|
|
}
|
|
|
|
/*
|
|
void rlm_xmpad_RLMPadDataSent(void *ptr,const char *svcname,int onair,
|
|
int lognum,const struct rlm_pad *now,
|
|
const struct rlm_pad *next)
|
|
*/
|
|
void rlm_xmpad_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 str1[33];
|
|
char str2[33];
|
|
char msg[1500];
|
|
|
|
if(now->rlm_cartnum==0) { // Suppress null PAD frames
|
|
return;
|
|
}
|
|
for(i=0;i<rlm_xmpad_devs;i++) {
|
|
switch(log->log_mach) {
|
|
case 0:
|
|
flag=rlm_xmpad_masters[i];
|
|
break;
|
|
|
|
case 1:
|
|
flag=rlm_xmpad_aux1s[i];
|
|
break;
|
|
|
|
case 2:
|
|
flag=rlm_xmpad_aux2s[i];
|
|
break;
|
|
}
|
|
if((flag==1)||((flag==2)&&(log->log_onair!=0))) {
|
|
strncpy(str1,RLMResolveNowNext(ptr,now,next,rlm_xmpad_format1s+256*i),32);
|
|
str1[32]=0;
|
|
strncpy(str2,RLMResolveNowNext(ptr,now,next,rlm_xmpad_format2s+256*i),32);
|
|
str2[32]=0;
|
|
rlm_xmpad_SendPad(ptr,i,str1,str2,now->rlm_len);
|
|
snprintf(msg,1500,"rlm_xmpad: sending pad update: \"%s | %s\"",
|
|
(const char *)str1,(const char *)str2);
|
|
RLMLog(ptr,LOG_INFO,msg);
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
void rlm_xmpad_RLMTimerExpired(void *ptr,int timernum)
|
|
{
|
|
RLMSendSerial(ptr,rlm_xmpad_handles[timernum],"H0\n",3);
|
|
}
|