tvheadend/dvb.c
Andreas Öman 6eca66a297 Change the thresholds for stopping subscriptions due to DVB errors.
We need to have 10 seconds of consecutive errors in order to abort.
2008-02-28 15:28:09 +00:00

395 lines
8.8 KiB
C

/*
* TV Input - Linux DVB interface
* Copyright (C) 2007 Andreas Öman
*
* This program 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 3 of the License, or
* (at your option) any later version.
*
* 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, see <http://www.gnu.org/licenses/>.
*/
#include <pthread.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/ioctl.h>
#include <fcntl.h>
#include <errno.h>
#include <ctype.h>
#include <stdio.h>
#include <unistd.h>
#include <stdlib.h>
#include <string.h>
#include <linux/dvb/frontend.h>
#include <linux/dvb/dmx.h>
#include <libhts/htscfg.h>
#include "tvhead.h"
#include "dispatch.h"
#include "dvb.h"
#include "channels.h"
#include "transports.h"
#include "subscriptions.h"
#include "teletext.h"
#include "epg.h"
#include "psi.h"
#include "dvb_support.h"
#include "dvb_dvr.h"
#include "dvb_muxconfig.h"
struct th_dvb_mux_list dvb_muxes;
struct th_dvb_adapter_list dvb_adapters_probing;
struct th_dvb_adapter_list dvb_adapters_running;
static void dvb_start_initial_scan(th_dvb_mux_instance_t *tdmi);
static void tdmi_activate(th_dvb_mux_instance_t *tdmi);
static void dvb_mux_scanner(void *aux, int64_t now);
static void dvb_fec_monitor(void *aux, int64_t now);
static void
dvb_add_adapter(const char *path)
{
char fname[256];
int fe, i, r;
th_dvb_adapter_t *tda, *x;
char c;
char buf[400], *cp;
snprintf(fname, sizeof(fname), "%s/frontend0", path);
fe = open(fname, O_RDWR | O_NONBLOCK);
if(fe == -1) {
if(errno != ENOENT)
syslog(LOG_ALERT, "Unable to open %s -- %s\n", fname, strerror(errno));
return;
}
tda = calloc(1, sizeof(th_dvb_adapter_t));
tda->tda_rootpath = strdup(path);
tda->tda_demux_path = malloc(256);
snprintf(tda->tda_demux_path, 256, "%s/demux0", path);
tda->tda_dvr_path = malloc(256);
snprintf(tda->tda_dvr_path, 256, "%s/dvr0", path);
tda->tda_fe_fd = fe;
tda->tda_fe_info = malloc(sizeof(struct dvb_frontend_info));
if(ioctl(tda->tda_fe_fd, FE_GET_INFO, tda->tda_fe_info)) {
syslog(LOG_ALERT, "%s: Unable to query adapter\n", fname);
close(fe);
free(tda);
return;
}
if(dvb_dvr_init(tda) < 0) {
close(fe);
free(tda);
return;
}
pthread_mutex_init(&tda->tda_lock, NULL);
pthread_cond_init(&tda->tda_cond, NULL);
TAILQ_INIT(&tda->tda_fe_cmd_queue);
startupcounter++;
tda->tda_info = strdup(tda->tda_fe_info->name);
/*
* Generate a decent unique name for the adapter.
* If multiple adapters with the same name is found, we add
* a sequence number at the end
*/
for(i = 0; i < strlen(tda->tda_info); i++) {
c = tolower(tda->tda_info[i]);
if(isalnum(c))
buf[i] = c;
else
buf[i] = '_';
}
cp = &buf[i];
r = 0;
again:
if(r)
sprintf(cp, "-%d", r);
else
*cp = 0;
LIST_FOREACH(x, &dvb_adapters_probing, tda_link) {
if(!strcmp(buf, x->tda_sname)) {
r++;
goto again;
}
}
tda->tda_sname = strdup(buf);
LIST_INSERT_HEAD(&dvb_adapters_probing, tda, tda_link);
syslog(LOG_INFO, "Adding adapter %s (%s)", path, tda->tda_fe_info->name);
dtimer_arm(&tda->tda_fec_monitor_timer, dvb_fec_monitor, tda, 1);
dvb_fe_start(tda);
}
void
dvb_init(void)
{
th_dvb_adapter_t *tda;
th_dvb_mux_instance_t *tdmi;
char path[200];
int i;
for(i = 0; i < 32; i++) {
snprintf(path, sizeof(path), "/dev/dvb/adapter%d", i);
dvb_add_adapter(path);
}
dvb_mux_setup();
LIST_FOREACH(tda, &dvb_adapters_probing, tda_link) {
tdmi = LIST_FIRST(&tda->tda_muxes_configured);
if(tdmi == NULL) {
syslog(LOG_WARNING,
"No muxes configured on \"%s\" DVB adapter unused",
tda->tda_rootpath);
startupcounter--;
} else {
dvb_start_initial_scan(tdmi);
}
}
}
/**
* Based on the gived transport id and service id on the given mux
* try to locate the transport.
*
* If it cannot be found we create it
*/
th_transport_t *
dvb_find_transport(th_dvb_mux_instance_t *tdmi, uint16_t tid,
uint16_t sid, int pmt_pid)
{
th_transport_t *t;
char tmp[100];
/* XXX: Minimize this search */
LIST_FOREACH(t, &all_transports, tht_global_link) {
if(t->tht_dvb_mux_instance == tdmi &&
t->tht_dvb_transport_id == tid &&
t->tht_dvb_service_id == sid)
return t;
}
if(pmt_pid == 0)
return NULL;
t = calloc(1, sizeof(th_transport_t));
transport_init(t, THT_MPEG_TS);
t->tht_dvb_transport_id = tid;
t->tht_dvb_service_id = sid;
t->tht_type = TRANSPORT_DVB;
t->tht_start_feed = dvb_start_feed;
t->tht_stop_feed = dvb_stop_feed;
t->tht_dvb_mux_instance = tdmi;
snprintf(tmp, sizeof(tmp), "%s/%04x", tdmi->tdmi_uniquename, sid);
free((void *)t->tht_uniquename);
t->tht_uniquename = strdup(tmp);
snprintf(tmp, sizeof(tmp), "%s/%04x", tdmi->tdmi_shortname, sid);
free((void *)t->tht_name);
t->tht_name = strdup(tmp);
LIST_INSERT_HEAD(&all_transports, t, tht_global_link);
dvb_table_add_transport(tdmi, t, pmt_pid);
return t;
}
/**
*
*/
static void
tdmi_activate(th_dvb_mux_instance_t *tdmi)
{
th_dvb_adapter_t *tda = tdmi->tdmi_adapter;
dtimer_disarm(&tdmi->tdmi_initial_scan_timer);
tdmi->tdmi_state = TDMI_IDLE;
LIST_REMOVE(tdmi, tdmi_adapter_link);
LIST_INSERT_HEAD(&tda->tda_muxes_active, tdmi, tdmi_adapter_link);
/* tune to next configured (but not yet active) mux */
tdmi = LIST_FIRST(&tda->tda_muxes_configured);
if(tdmi == NULL) {
startupcounter--;
syslog(LOG_INFO,
"\"%s\" Initial scan completed, adapter available",
tda->tda_rootpath);
/* no more muxes to probe, link adapter to the world */
LIST_REMOVE(tda, tda_link);
LIST_INSERT_HEAD(&dvb_adapters_running, tda, tda_link);
dtimer_arm(&tda->tda_mux_scanner_timer, dvb_mux_scanner, tda, 10);
return;
}
dvb_start_initial_scan(tdmi);
}
/**
*
*/
static void
tdmi_initial_scan_timeout(void *aux, int64_t now)
{
th_dvb_mux_instance_t *tdmi = aux;
const char *err;
#if 0
th_dvb_table_t *tdt;
LIST_FOREACH(tdt, &tdmi->tdmi_tables, tdt_link) {
printf("%s: %d\n", tdt->tdt_name, tdt->tdt_count);
}
#endif
dtimer_disarm(&tdmi->tdmi_initial_scan_timer);
if(tdmi->tdmi_status != NULL)
err = tdmi->tdmi_status;
else
err = "Missing PSI tables, scan will continue";
syslog(LOG_DEBUG, "\"%s\" Initial scan timed out -- %s",
tdmi->tdmi_uniquename, err);
tdmi_activate(tdmi);
}
/**
*
*/
void
tdmi_check_scan_status(th_dvb_mux_instance_t *tdmi)
{
th_dvb_table_t *tdt;
if(tdmi->tdmi_state >= TDMI_IDLE)
return;
LIST_FOREACH(tdt, &tdmi->tdmi_tables, tdt_link)
if(tdt->tdt_count == 0)
return;
/* All tables seen at least once */
syslog(LOG_DEBUG, "\"%s\" Initial scan completed",
tdmi->tdmi_uniquename);
tdmi_activate(tdmi);
}
/**
*
*/
static void
dvb_start_initial_scan(th_dvb_mux_instance_t *tdmi)
{
dvb_tune_tdmi(tdmi, 1, TDMI_INITIAL_SCAN);
dtimer_arm(&tdmi->tdmi_initial_scan_timer,
tdmi_initial_scan_timeout, tdmi, 5);
}
/**
*
*/
static void
dvb_fec_monitor(void *aux, int64_t now)
{
th_dvb_adapter_t *tda = aux;
th_dvb_mux_instance_t *tdmi;
int i, v, vv;
dtimer_arm(&tda->tda_fec_monitor_timer, dvb_fec_monitor, tda, 1);
tdmi = tda->tda_mux_current;
if(tdmi != NULL && tdmi->tdmi_status == NULL) {
v = vv = 0;
for(i = 0; i < TDMI_FEC_ERR_HISTOGRAM_SIZE; i++) {
if(tdmi->tdmi_fec_err_histogram[i] > DVB_FEC_ERROR_LIMIT)
v++;
vv += tdmi->tdmi_fec_err_histogram[i];
}
vv /= TDMI_FEC_ERR_HISTOGRAM_SIZE;
if(v == TDMI_FEC_ERR_HISTOGRAM_SIZE) {
if(LIST_FIRST(&tda->tda_transports) != NULL) {
syslog(LOG_ERR,
"\"%s\": Constant rate of FEC errors (average at %d / s), "
"last %d seconds, flushing subscribers\n",
tdmi->tdmi_uniquename, vv,
TDMI_FEC_ERR_HISTOGRAM_SIZE);
dvb_adapter_clean(tdmi->tdmi_adapter);
}
}
}
}
/**
* If nobody is subscribing, cycle thru all muxes to get some stats
* and EIT updates
*/
static void
dvb_mux_scanner(void *aux, int64_t now)
{
th_dvb_adapter_t *tda = aux;
th_dvb_mux_instance_t *tdmi;
dtimer_arm(&tda->tda_mux_scanner_timer, dvb_mux_scanner, tda, 10);
if(transport_compute_weight(&tda->tda_transports) > 0)
return; /* someone is here */
tdmi = tda->tda_mux_current;
tdmi = tdmi != NULL ? LIST_NEXT(tdmi, tdmi_adapter_link) : NULL;
tdmi = tdmi != NULL ? tdmi : LIST_FIRST(&tda->tda_muxes_active);
if(tdmi == NULL)
return; /* no instances */
dvb_tune_tdmi(tdmi, 0, TDMI_IDLESCAN);
}