stream/stream_dvb.c

   1 /*
   2
   3 dvbstream
   4 (C) Dave Chapman <dave@dchapman.com> 2001, 2002.
   5
   6 The latest version can be found at http://www.linuxstb.org/dvbstream
   7
   8 Modified for use with MPlayer, for details see the changelog at
   9 http://svn.mplayerhq.hu/mplayer/trunk/
  10 $Id$
  11
  12 Copyright notice:
  13
  14 This program is free software; you can redistribute it and/or modify
  15 it under the terms of the GNU General Public License as published by
  16 the Free Software Foundation; either version 2 of the License, or
  17 (at your option) any later version.
  18
  19 This program is distributed in the hope that it will be useful,
  20 but WITHOUT ANY WARRANTY; without even the implied warranty of
  21 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  22 GNU General Public License for more details.
  23
  24 You should have received a copy of the GNU General Public License
  25 along with this program; if not, write to the Free Software
  26 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  27
  28 */
  29
  30 #include "config.h"
  31 #include <stdio.h>
  32 #include <stdlib.h>
  33 #include <string.h>
  34 #include <ctype.h>
  35 #include <sys/ioctl.h>
  36 #include <sys/time.h>
  37 #include <sys/poll.h>
  38 #include <unistd.h>
  39 #include <fcntl.h>
  40 #include <errno.h>
  41
  42 #include "stream.h"
  43 #include "libmpdemux/demuxer.h"
  44 #include "help_mp.h"
  45 #include "m_option.h"
  46 #include "m_struct.h"
  47
  48 #include "dvbin.h"
  49
  50
  51 #define MAX_CHANNELS 8
  52 #define CHANNEL_LINE_LEN 256
  53 #define min(a, b) ((a) <= (b) ? (a) : (b))
  54
  55
  56 //TODO: CAMBIARE list_ptr e da globale a per_priv
  57
  58
  59 static struct stream_priv_s
  60 {
  61         char *prog;
  62         int card;
  63         char *type;
  64         int vid, aid;
  65         int timeout;
  66         char *file;
  67 }
  68 stream_defaults =
  69 {
  70         "", 1, "", 0, 0, 30, NULL
  71 };
  72
  73 #define ST_OFF(f) M_ST_OFF(struct stream_priv_s, f)
  74
  75 /// URL definition
  76 static m_option_t stream_params[] = {
  77         {"prog", ST_OFF(prog), CONF_TYPE_STRING, 0, 0 ,0, NULL},
  78         {"card", ST_OFF(card), CONF_TYPE_INT, M_OPT_RANGE, 1, 4, NULL},
  79         {"type", ST_OFF(type), CONF_TYPE_STRING, 0, 0 ,0, NULL},
  80         {"vid",  ST_OFF(vid),  CONF_TYPE_INT, 0, 0 ,0, NULL},
  81         {"aid",  ST_OFF(aid),  CONF_TYPE_INT, 0, 0 ,0, NULL},
  82         {"timeout",ST_OFF(timeout),  CONF_TYPE_INT, M_OPT_RANGE, 1, 30, NULL},
  83         {"file", ST_OFF(file), CONF_TYPE_STRING, 0, 0 ,0, NULL},
  84
  85         {"hostname",    ST_OFF(prog), CONF_TYPE_STRING, 0, 0, 0, NULL },
  86         {"username",    ST_OFF(card), CONF_TYPE_INT, M_OPT_RANGE, 1, 4, NULL},
  87         {NULL, NULL, 0, 0, 0, 0, NULL}
  88 };
  89
  90 static struct m_struct_st stream_opts = {
  91         "dvbin",
  92         sizeof(struct stream_priv_s),
  93         &stream_defaults,
  94         stream_params
  95 };
  96
  97
  98
  99 m_option_t dvbin_opts_conf[] = {
 100         {"prog", &stream_defaults.prog, CONF_TYPE_STRING, 0, 0 ,0, NULL},
 101         {"card", &stream_defaults.card, CONF_TYPE_INT, M_OPT_RANGE, 1, 4, NULL},
 102         {"type", "DVB card type is autodetected and can't be overridden\n", CONF_TYPE_PRINT, CONF_NOCFG, 0 ,0, NULL},
 103         {"vid",  &stream_defaults.vid,  CONF_TYPE_INT, 0, 0 ,0, NULL},
 104         {"aid",  &stream_defaults.aid,  CONF_TYPE_INT, 0, 0 ,0, NULL},
 105         {"timeout",  &stream_defaults.timeout,  CONF_TYPE_INT, M_OPT_RANGE, 1, 30, NULL},
 106         {"file", &stream_defaults.file, CONF_TYPE_STRING, 0, 0 ,0, NULL},
 107
 108         {NULL, NULL, 0, 0, 0, 0, NULL}
 109 };
 110
 111
 112
 113
 114 extern int dvb_set_ts_filt(int fd, uint16_t pid, dmx_pes_type_t pestype);
 115 extern int dvb_demux_stop(int fd);
 116 extern int dvb_get_tuner_type(int fd);
 117 int dvb_open_devices(dvb_priv_t *priv, int n, int demux_cnt, int *pids);
 118 int dvb_fix_demuxes(dvb_priv_t *priv, int cnt, int *pids);
 119
 120 extern int dvb_tune(dvb_priv_t *priv, int freq, char pol, int srate, int diseqc, int tone,
 121                 fe_spectral_inversion_t specInv, fe_modulation_t modulation, fe_guard_interval_t guardInterval,
 122                 fe_transmit_mode_t TransmissionMode, fe_bandwidth_t bandWidth, fe_code_rate_t HP_CodeRate,
 123                 fe_code_rate_t LP_CodeRate, fe_hierarchy_t hier, int timeout);
 124 extern char *dvb_dvrdev[4], *dvb_demuxdev[4], *dvb_frontenddev[4];
 125
 126 static dvb_config_t *dvb_config = NULL;
 127
 128
 129 static dvb_channels_list *dvb_get_channels(char *filename, int type)
 130 {
 131         dvb_channels_list  *list;
 132         FILE *f;
 133         char line[CHANNEL_LINE_LEN], *colon;
 134
 135         int fields, cnt, pcnt, k;
 136         int has8192, has0;
 137         dvb_channel_t *ptr, *tmp, chn;
 138         char tmp_lcr[256], tmp_hier[256], inv[256], bw[256], cr[256], mod[256], transm[256], gi[256], vpid_str[256], apid_str[256];
 139         const char *cbl_conf = "%d:%255[^:]:%d:%255[^:]:%255[^:]:%255[^:]:%255[^:]\n";
 140         const char *sat_conf = "%d:%c:%d:%d:%255[^:]:%255[^:]\n";
 141         const char *ter_conf = "%d:%255[^:]:%255[^:]:%255[^:]:%255[^:]:%255[^:]:%255[^:]:%255[^:]:%255[^:]:%255[^:]:%255[^:]\n";
 142         const char *atsc_conf = "%d:%255[^:]:%255[^:]:%255[^:]\n";
 143
 144         mp_msg(MSGT_DEMUX, MSGL_V, "CONFIG_READ FILE: %s, type: %d\n", filename, type);
 145         if((f=fopen(filename, "r"))==NULL)
 146         {
 147                 mp_msg(MSGT_DEMUX, MSGL_FATAL, "CAN'T READ CONFIG FILE %s\n", filename);
 148                 return NULL;
 149         }
 150
 151         list = malloc(sizeof(dvb_channels_list));
 152         if(list == NULL)
 153         {
 154                 fclose(f);
 155                 mp_msg(MSGT_DEMUX, MSGL_V, "DVB_GET_CHANNELS: couldn't malloc enough memory\n");
 156                 return NULL;
 157         }
 158
 159         ptr = &chn;
 160         list->NUM_CHANNELS = 0;
 161         list->channels = NULL;
 162         while(! feof(f))
 163         {
 164                 if( fgets(line, CHANNEL_LINE_LEN, f) == NULL )
 165                         continue;
 166
 167                 if((line[0] == '#') || (strlen(line) == 0))
 168                         continue;
 169
 170                 colon = strchr(line, ':');
 171                 if(colon)
 172                 {
 173                         k = colon - line;
 174                         if(!k)
 175                                 continue;
 176                         ptr->name = (char*) malloc(k+1);
 177                         if(! ptr->name)
 178                                 continue;
 179                         strlcpy(ptr->name, line, k+1);
 180                 }
 181                 else
 182                         continue;
 183                 k++;
 184                 apid_str[0] = vpid_str[0] = 0;
 185                 ptr->pids_cnt = 0;
 186                 ptr->freq = 0;
 187                 if(type == TUNER_TER)
 188                 {
 189                         fields = sscanf(&line[k], ter_conf,
 190                                 &ptr->freq, inv, bw, cr, tmp_lcr, mod,
 191                                 transm, gi, tmp_hier, vpid_str, apid_str);
 192                         mp_msg(MSGT_DEMUX, MSGL_V,
 193                                 "TER, NUM: %d, NUM_FIELDS: %d, NAME: %s, FREQ: %d",
 194                                 list->NUM_CHANNELS, fields, ptr->name, ptr->freq);
 195                 }
 196                 else if(type == TUNER_CBL)
 197                 {
 198                         fields = sscanf(&line[k], cbl_conf,
 199                                 &ptr->freq, inv, &ptr->srate,
 200                                 cr, mod, vpid_str, apid_str);
 201                         mp_msg(MSGT_DEMUX, MSGL_V,
 202                                 "CBL, NUM: %d, NUM_FIELDS: %d, NAME: %s, FREQ: %d, SRATE: %d",
 203                                 list->NUM_CHANNELS, fields, ptr->name, ptr->freq, ptr->srate);
 204                 }
 205 #ifdef DVB_ATSC
 206                 else if(type == TUNER_ATSC)
 207                 {
 208                         fields = sscanf(&line[k], atsc_conf,
 209                                  &ptr->freq, mod, vpid_str, apid_str);
 210                         mp_msg(MSGT_DEMUX, MSGL_V,
 211                                 "ATSC, NUM: %d, NUM_FIELDS: %d, NAME: %s, FREQ: %d\n",
 212                                 list->NUM_CHANNELS, fields, ptr->name, ptr->freq);
 213                 }
 214 #endif
 215                 else //SATELLITE
 216                 {
 217                         fields = sscanf(&line[k], sat_conf,
 218                                 &ptr->freq, &ptr->pol, &ptr->diseqc, &ptr->srate, vpid_str, apid_str);
 219                         ptr->pol = toupper(ptr->pol);
 220                         ptr->freq *=  1000UL;
 221                         ptr->srate *=  1000UL;
 222                         ptr->tone = -1;
 223                         ptr->inv = INVERSION_AUTO;
 224                         ptr->cr = FEC_AUTO;
 225                         if((ptr->diseqc > 4) || (ptr->diseqc < 0))
 226                             continue;
 227                         if(ptr->diseqc > 0)
 228                             ptr->diseqc--;
 229                         mp_msg(MSGT_DEMUX, MSGL_V,
 230                                 "SAT, NUM: %d, NUM_FIELDS: %d, NAME: %s, FREQ: %d, SRATE: %d, POL: %c, DISEQC: %d",
 231                                 list->NUM_CHANNELS, fields, ptr->name, ptr->freq, ptr->srate, ptr->pol, ptr->diseqc);
 232                 }
 233
 234                 if(vpid_str[0])
 235                 {
 236                         pcnt = sscanf(vpid_str, "%d+%d+%d+%d+%d+%d+%d", &ptr->pids[0], &ptr->pids[1], &ptr->pids[2], &ptr->pids[3],
 237                                 &ptr->pids[4], &ptr->pids[5], &ptr->pids[6]);
 238                         if(pcnt > 0)
 239                         {
 240                                 ptr->pids_cnt = pcnt;
 241                                 fields++;
 242                         }
 243                 }
 244
 245                 if(apid_str[0])
 246                 {
 247                         cnt = ptr->pids_cnt;
 248                         pcnt = sscanf(apid_str, "%d+%d+%d+%d+%d+%d+%d+%d", &ptr->pids[cnt], &ptr->pids[cnt+1], &ptr->pids[cnt+2],
 249                                 &ptr->pids[cnt+3], &ptr->pids[cnt+4], &ptr->pids[cnt+5], &ptr->pids[cnt+6], &ptr->pids[cnt+7]);
 250                         if(pcnt > 0)
 251                         {
 252                                 ptr->pids_cnt += pcnt;
 253                                 fields++;
 254                         }
 255                 }
 256
 257                 if((fields < 2) || (ptr->pids_cnt <= 0) || (ptr->freq == 0) || (strlen(ptr->name) == 0))
 258                         continue;
 259
 260                 has8192 = has0 = 0;
 261                 for(cnt = 0; cnt < ptr->pids_cnt; cnt++)
 262                 {
 263                         if(ptr->pids[cnt] == 8192)
 264                                 has8192 = 1;
 265                         if(ptr->pids[cnt] == 0)
 266                                 has0 = 1;
 267                 }
 268                 if(has8192)
 269                 {
 270                         ptr->pids[0] = 8192;
 271                         ptr->pids_cnt = 1;
 272                 }
 273                 else if(! has0)
 274                 {
 275                         ptr->pids[ptr->pids_cnt] = 0;   //PID 0 is the PAT
 276                         ptr->pids_cnt++;
 277                 }
 278                 mp_msg(MSGT_DEMUX, MSGL_V, " PIDS: ");
 279                 for(cnt = 0; cnt < ptr->pids_cnt; cnt++)
 280                         mp_msg(MSGT_DEMUX, MSGL_V, " %d ", ptr->pids[cnt]);
 281                 mp_msg(MSGT_DEMUX, MSGL_V, "\n");
 282
 283                 if((type == TUNER_TER) || (type == TUNER_CBL))
 284                 {
 285                         if(! strcmp(inv, "INVERSION_ON"))
 286                                 ptr->inv = INVERSION_ON;
 287                         else if(! strcmp(inv, "INVERSION_OFF"))
 288                                 ptr->inv = INVERSION_OFF;
 289                         else
 290                                 ptr->inv = INVERSION_AUTO;
 291
 292
 293                         if(! strcmp(cr, "FEC_1_2"))
 294                                 ptr->cr =FEC_1_2;
 295                         else if(! strcmp(cr, "FEC_2_3"))
 296                                 ptr->cr =FEC_2_3;
 297                         else if(! strcmp(cr, "FEC_3_4"))
 298                                 ptr->cr =FEC_3_4;
 299 #ifdef HAVE_DVB_HEAD
 300                         else if(! strcmp(cr, "FEC_4_5"))
 301                                 ptr->cr =FEC_4_5;
 302                         else if(! strcmp(cr, "FEC_6_7"))
 303                                 ptr->cr =FEC_6_7;
 304                         else if(! strcmp(cr, "FEC_8_9"))
 305                                 ptr->cr =FEC_8_9;
 306 #endif
 307                         else if(! strcmp(cr, "FEC_5_6"))
 308                                 ptr->cr =FEC_5_6;
 309                         else if(! strcmp(cr, "FEC_7_8"))
 310                                 ptr->cr =FEC_7_8;
 311                         else if(! strcmp(cr, "FEC_NONE"))
 312                                 ptr->cr =FEC_NONE;
 313                         else ptr->cr =FEC_AUTO;
 314                 }
 315
 316
 317                 if((type == TUNER_TER) || (type == TUNER_CBL) || (type == TUNER_ATSC))
 318                 {
 319                         if(! strcmp(mod, "QAM_128"))
 320                                 ptr->mod = QAM_128;
 321                         else if(! strcmp(mod, "QAM_256"))
 322                                 ptr->mod = QAM_256;
 323                         else if(! strcmp(mod, "QAM_64"))
 324                                 ptr->mod = QAM_64;
 325                         else if(! strcmp(mod, "QAM_32"))
 326                                 ptr->mod = QAM_32;
 327                         else if(! strcmp(mod, "QAM_16"))
 328                                 ptr->mod = QAM_16;
 329 #ifdef DVB_ATSC
 330                         else if(! strcmp(mod, "VSB_8") || ! strcmp(mod, "8VSB"))
 331                                 ptr->mod = VSB_8;
 332                         else if(! strcmp(mod, "VSB_16") || !strcmp(mod, "16VSB"))
 333                                 ptr->mod = VSB_16;
 334
 335                         ptr->inv = INVERSION_AUTO;
 336 #endif
 337                 }
 338
 339                 if(type == TUNER_TER)
 340                 {
 341                         if(! strcmp(bw, "BANDWIDTH_6_MHZ"))
 342                                 ptr->bw = BANDWIDTH_6_MHZ;
 343                         else if(! strcmp(bw, "BANDWIDTH_7_MHZ"))
 344                                 ptr->bw = BANDWIDTH_7_MHZ;
 345                         else if(! strcmp(bw, "BANDWIDTH_8_MHZ"))
 346                                 ptr->bw = BANDWIDTH_8_MHZ;
 347
 348
 349                         if(! strcmp(transm, "TRANSMISSION_MODE_2K"))
 350                                 ptr->trans = TRANSMISSION_MODE_2K;
 351                         else if(! strcmp(transm, "TRANSMISSION_MODE_8K"))
 352                                 ptr->trans = TRANSMISSION_MODE_8K;
 353
 354
 355                         if(! strcmp(gi, "GUARD_INTERVAL_1_32"))
 356                                 ptr->gi = GUARD_INTERVAL_1_32;
 357                         else if(! strcmp(gi, "GUARD_INTERVAL_1_16"))
 358                                 ptr->gi = GUARD_INTERVAL_1_16;
 359                         else if(! strcmp(gi, "GUARD_INTERVAL_1_8"))
 360                                 ptr->gi = GUARD_INTERVAL_1_8;
 361                         else ptr->gi = GUARD_INTERVAL_1_4;
 362
 363                         if(! strcmp(tmp_lcr, "FEC_1_2"))
 364                                 ptr->cr_lp =FEC_1_2;
 365                         else if(! strcmp(tmp_lcr, "FEC_2_3"))
 366                                 ptr->cr_lp =FEC_2_3;
 367                         else if(! strcmp(tmp_lcr, "FEC_3_4"))
 368                                 ptr->cr_lp =FEC_3_4;
 369 #ifdef HAVE_DVB_HEAD
 370                         else if(! strcmp(tmp_lcr, "FEC_4_5"))
 371                                 ptr->cr_lp =FEC_4_5;
 372                         else if(! strcmp(tmp_lcr, "FEC_6_7"))
 373                                 ptr->cr_lp =FEC_6_7;
 374                         else if(! strcmp(tmp_lcr, "FEC_8_9"))
 375                                 ptr->cr_lp =FEC_8_9;
 376 #endif
 377                         else if(! strcmp(tmp_lcr, "FEC_5_6"))
 378                                 ptr->cr_lp =FEC_5_6;
 379                         else if(! strcmp(tmp_lcr, "FEC_7_8"))
 380                                 ptr->cr_lp =FEC_7_8;
 381                         else if(! strcmp(tmp_lcr, "FEC_NONE"))
 382                                 ptr->cr_lp =FEC_NONE;
 383                         else ptr->cr_lp =FEC_AUTO;
 384
 385
 386                         if(! strcmp(tmp_hier, "HIERARCHY_1"))
 387                                 ptr->hier = HIERARCHY_1;
 388                         else if(! strcmp(tmp_hier, "HIERARCHY_2"))
 389                                 ptr->hier = HIERARCHY_2;
 390                         else if(! strcmp(tmp_hier, "HIERARCHY_4"))
 391                                 ptr->hier = HIERARCHY_4;
 392 #ifdef HAVE_DVB_HEAD
 393                         else if(! strcmp(tmp_hier, "HIERARCHY_AUTO"))
 394                                 ptr->hier = HIERARCHY_AUTO;
 395 #endif
 396                         else    ptr->hier = HIERARCHY_NONE;
 397                 }
 398
 399                 tmp = (dvb_channel_t*)realloc(list->channels, sizeof(dvb_channel_t) * (list->NUM_CHANNELS + 1));
 400                 if(tmp == NULL)
 401                         break;
 402
 403                 list->channels = tmp;
 404                 memcpy(&(list->channels[list->NUM_CHANNELS]), ptr, sizeof(dvb_channel_t));
 405                 list->NUM_CHANNELS++;
 406                 if(sizeof(dvb_channel_t) * list->NUM_CHANNELS >= 1024*1024)
 407                 {
 408                         mp_msg(MSGT_DEMUX, MSGL_V, "dvbin.c, > 1MB allocated for channels struct, dropping the rest of the file\r\n");
 409                         break;
 410                 }
 411         }
 412
 413         fclose(f);
 414         if(list->NUM_CHANNELS == 0)
 415         {
 416                 if(list->channels != NULL)
 417                         free(list->channels);
 418                 free(list);
 419                 return NULL;
 420         }
 421
 422         list->current = 0;
 423         return list;
 424 }
 425
 426
 427
 428 static int dvb_streaming_read(stream_t *stream, char *buffer, int size)
 429 {
 430         struct pollfd pfds[1];
 431         int pos=0, tries, rk, fd;
 432         dvb_priv_t *priv  = (dvb_priv_t *) stream->priv;
 433
 434         mp_msg(MSGT_DEMUX, MSGL_DBG3, "dvb_streaming_read(%d)\n", size);
 435
 436         tries = priv->retry + 1;
 437
 438         fd = stream->fd;
 439         while(pos < size)
 440         {
 441                 pfds[0].fd = fd;
 442                 pfds[0].events = POLLIN | POLLPRI;
 443
 444                 rk = size - pos;
 445                 if(poll(pfds, 1, 500) <= 0)
 446                 {
 447                         errno = 0;
 448                         mp_msg(MSGT_DEMUX, MSGL_ERR, "dvb_streaming_read, attempt N. %d failed with errno %d when reading %d bytes\n", tries, errno, size-pos);
 449                         if(--tries > 0)
 450                                 continue;
 451                         else
 452                                 break;
 453                 }
 454                 if((rk = read(fd, &buffer[pos], rk)) > 0)
 455                 {
 456                         pos += rk;
 457                         mp_msg(MSGT_DEMUX, MSGL_DBG3, "ret (%d) bytes\n", pos);
 458                 }
 459         }
 460
 461
 462         if(! pos)
 463                 mp_msg(MSGT_DEMUX, MSGL_ERR, "dvb_streaming_read, return %d bytes\n", pos);
 464
 465         return pos;
 466 }
 467
 468 static void dvbin_close(stream_t *stream);
 469
 470 int dvb_set_channel(dvb_priv_t *priv, int card, int n)
 471 {
 472         dvb_channels_list *new_list;
 473         dvb_channel_t *channel;
 474         stream_t *stream  = (stream_t*) priv->stream;
 475         char buf[4096];
 476         dvb_config_t *conf = (dvb_config_t *) priv->config;
 477         int devno;
 478         int i;
 479
 480         if((card < 0) || (card > conf->count))
 481         {
 482                 mp_msg(MSGT_DEMUX, MSGL_ERR, "dvb_set_channel: INVALID CARD NUMBER: %d vs %d, abort\n", card, conf->count);
 483                 return 0;
 484         }
 485
 486         devno = conf->cards[card].devno;
 487         new_list = conf->cards[card].list;
 488         if((n > new_list->NUM_CHANNELS) || (n < 0))
 489         {
 490                 mp_msg(MSGT_DEMUX, MSGL_ERR, "dvb_set_channel: INVALID CHANNEL NUMBER: %d, for card %d, abort\n", n, card);
 491                 return 0;
 492         }
 493         channel = &(new_list->channels[n]);
 494
 495         if(priv->is_on) //the fds are already open and we have to stop the demuxers
 496         {
 497                 for(i = 0; i < priv->demux_fds_cnt; i++)
 498                         dvb_demux_stop(priv->demux_fds[i]);
 499
 500                 priv->retry = 0;
 501                 while(dvb_streaming_read(stream, buf, 4096) > 0);       //empty both the stream's and driver's buffer
 502                 if(priv->card != card)
 503                 {
 504                         dvbin_close(stream);
 505                         if(! dvb_open_devices(priv, devno, channel->pids_cnt, channel->pids))
 506                         {
 507                                 mp_msg(MSGT_DEMUX, MSGL_ERR, "DVB_SET_CHANNEL, COULDN'T OPEN DEVICES OF CARD: %d, EXIT\n", card);
 508                                 return 0;
 509                         }
 510                 }
 511                 else    //close all demux_fds with pos > pids required for the new channel or open other demux_fds if we have too few
 512                 {
 513                         if(! dvb_fix_demuxes(priv, channel->pids_cnt, channel->pids))
 514                                 return 0;
 515                 }
 516         }
 517         else
 518         {
 519                 if(! dvb_open_devices(priv, devno, channel->pids_cnt, channel->pids))
 520                 {
 521                         mp_msg(MSGT_DEMUX, MSGL_ERR, "DVB_SET_CHANNEL2, COULDN'T OPEN DEVICES OF CARD: %d, EXIT\n", card);
 522                         return 0;
 523                 }
 524         }
 525
 526         dvb_config->priv = priv;
 527         priv->card = card;
 528         priv->list = new_list;
 529         priv->retry = 5;
 530         new_list->current = n;
 531         stream->fd = priv->dvr_fd;
 532         mp_msg(MSGT_DEMUX, MSGL_V, "DVB_SET_CHANNEL: new channel name=%s, card: %d, channel %d\n", channel->name, card, n);
 533
 534         stream->eof=1;
 535         stream_reset(stream);
 536
 537
 538         if(channel->freq != priv->last_freq)
 539                 if (! dvb_tune(priv, channel->freq, channel->pol, channel->srate, channel->diseqc, channel->tone,
 540                         channel->inv, channel->mod, channel->gi, channel->trans, channel->bw, channel->cr, channel->cr_lp, channel->hier, priv->timeout))
 541                         return 0;
 542
 543         priv->last_freq = channel->freq;
 544         priv->is_on = 1;
 545
 546         //sets demux filters and restart the stream
 547         for(i = 0; i < channel->pids_cnt; i++)
 548         {
 549                 if(! dvb_set_ts_filt(priv->demux_fds[i], channel->pids[i], DMX_PES_OTHER))
 550                         return 0;
 551         }
 552
 553         return 1;
 554 }
 555
 556
 557
 558 int dvb_step_channel(dvb_priv_t *priv, int dir)
 559 {
 560         int new_current;
 561         dvb_channels_list *list;
 562
 563         mp_msg(MSGT_DEMUX, MSGL_V, "DVB_STEP_CHANNEL dir %d\n", dir);
 564
 565         if(priv == NULL)
 566         {
 567                 mp_msg(MSGT_DEMUX, MSGL_ERR, "dvb_step_channel: NULL priv_ptr, quit\n");
 568                 return 0;
 569         }
 570
 571         list = priv->list;
 572         if(list == NULL)
 573         {
 574                 mp_msg(MSGT_DEMUX, MSGL_ERR, "dvb_step_channel: NULL list_ptr, quit\n");
 575                 return 0;
 576         }
 577
 578         new_current = (list->NUM_CHANNELS + list->current + (dir == DVB_CHANNEL_HIGHER ? 1 : -1)) % list->NUM_CHANNELS;
 579
 580         return dvb_set_channel(priv, priv->card, new_current);
 581 }
 582
 583
 584
 585
 586 extern char *get_path(const char *);
 587
 588 static void dvbin_close(stream_t *stream)
 589 {
 590         int i;
 591         dvb_priv_t *priv  = (dvb_priv_t *) stream->priv;
 592
 593         for(i = priv->demux_fds_cnt-1; i >= 0; i--)
 594         {
 595                 priv->demux_fds_cnt--;
 596                 mp_msg(MSGT_DEMUX, MSGL_V, "DVBIN_CLOSE, close(%d), fd=%d, COUNT=%d\n", i, priv->demux_fds[i], priv->demux_fds_cnt);
 597                 close(priv->demux_fds[i]);
 598         }
 599         close(priv->dvr_fd);
 600
 601         close(priv->fe_fd);
 602 #ifdef HAVE_DVB
 603         close(priv->sec_fd);
 604 #endif
 605
 606         priv->is_on = 0;
 607         dvb_config->priv = NULL;
 608 }
 609
 610
 611 static int dvb_streaming_start(dvb_priv_t *priv, struct stream_priv_s *opts, int tuner_type, char *progname)
 612 {
 613         int i;
 614         dvb_channel_t *channel = NULL;
 615         stream_t *stream  = (stream_t*) priv->stream;
 616
 617         mp_msg(MSGT_DEMUX, MSGL_V, "\r\ndvb_streaming_start(PROG: %s, CARD: %d, VID: %d, AID: %d, TYPE: %s, FILE: %s)\r\n",
 618             opts->prog, opts->card, opts->vid, opts->aid,  opts->type, opts->file);
 619
 620         priv->is_on = 0;
 621
 622         i = 0;
 623         while((channel == NULL) && i < priv->list->NUM_CHANNELS)
 624         {
 625                 if(! strcmp(priv->list->channels[i].name, progname))
 626                         channel = &(priv->list->channels[i]);
 627
 628                 i++;
 629         }
 630
 631         if(channel != NULL)
 632         {
 633                 priv->list->current = i-1;
 634                 mp_msg(MSGT_DEMUX, MSGL_V, "PROGRAM NUMBER %d: name=%s, freq=%u\n", i-1, channel->name, channel->freq);
 635         }
 636         else
 637         {
 638                 mp_msg(MSGT_DEMUX, MSGL_ERR, "\n\nDVBIN: no such channel \"%s\"\n\n", progname);
 639                 return 0;
 640         }
 641
 642
 643         if(!dvb_set_channel(priv, priv->card, priv->list->current))
 644         {
 645                 mp_msg(MSGT_DEMUX, MSGL_ERR, "ERROR, COULDN'T SET CHANNEL  %i: ", priv->list->current);
 646                 dvbin_close(stream);
 647                 return 0;
 648         }
 649
 650         mp_msg(MSGT_DEMUX, MSGL_V,  "SUCCESSFUL EXIT from dvb_streaming_start\n");
 651
 652         return 1;
 653 }
 654
 655
 656
 657
 658 static int dvb_open(stream_t *stream, int mode, void *opts, int *file_format)
 659 {
 660         // I don't force  the file format bacause, although it's almost always TS,
 661         // there are some providers that stream an IP multicast with M$ Mpeg4 inside
 662         struct stream_priv_s* p = (struct stream_priv_s*)opts;
 663         dvb_priv_t *priv;
 664         char *progname;
 665         int tuner_type = 0, i;
 666
 667
 668         if(mode != STREAM_READ)
 669                 return STREAM_UNSUPORTED;
 670
 671         stream->priv = (dvb_priv_t*) calloc(1, sizeof(dvb_priv_t));
 672         if(stream->priv ==  NULL)
 673                 return STREAM_ERROR;
 674
 675         priv = (dvb_priv_t *)stream->priv;
 676         priv->stream = stream;
 677         dvb_config = dvb_get_config();
 678         if(dvb_config == NULL)
 679         {
 680                 free(priv);
 681                 mp_msg(MSGT_DEMUX, MSGL_ERR, "DVB CONFIGURATION IS EMPTY, exit\n");
 682                 return STREAM_ERROR;
 683         }
 684         dvb_config->priv = priv;
 685         priv->config = dvb_config;
 686
 687         priv->card = -1;
 688         for(i=0; i<priv->config->count; i++)
 689         {
 690                 if(priv->config->cards[i].devno+1 == p->card)
 691                 {
 692                         priv->card = i;
 693                         break;
 694                 }
 695         }
 696
 697         if(priv->card == -1)
 698         {
 699                 free(priv);
 700                 mp_msg(MSGT_DEMUX, MSGL_ERR, "NO CONFIGURATION FOUND FOR CARD N. %d, exit\n", p->card);
 701                 return STREAM_ERROR;
 702         }
 703         priv->timeout = p->timeout;
 704
 705         tuner_type = priv->config->cards[priv->card].type;
 706
 707         if(tuner_type == 0)
 708         {
 709                 free(priv);
 710                 mp_msg(MSGT_DEMUX, MSGL_V, "OPEN_DVB: UNKNOWN OR UNDETECTABLE TUNER TYPE, EXIT\n");
 711                 return STREAM_ERROR;
 712         }
 713
 714
 715         priv->tuner_type = tuner_type;
 716
 717         mp_msg(MSGT_DEMUX, MSGL_V, "OPEN_DVB: prog=%s, card=%d, type=%d, vid=%d, aid=%d\n",
 718                 p->prog, priv->card+1, priv->tuner_type, p->vid, p->aid);
 719
 720         priv->list = priv->config->cards[priv->card].list;
 721
 722         if((! strcmp(p->prog, "")) && (priv->list != NULL))
 723                 progname = priv->list->channels[0].name;
 724         else
 725                 progname = p->prog;
 726
 727
 728         if(! dvb_streaming_start(priv, p, tuner_type, progname))
 729         {
 730                 free(stream->priv);
 731                 stream->priv = NULL;
 732                 return STREAM_ERROR;
 733         }
 734
 735         stream->type = STREAMTYPE_DVB;
 736         stream->fill_buffer = dvb_streaming_read;
 737         stream->close = dvbin_close;
 738         m_struct_free(&stream_opts, opts);
 739
 740         *file_format = DEMUXER_TYPE_MPEG_TS;
 741
 742         return STREAM_OK;
 743 }
 744
 745 #define MAX_CARDS 4
 746 dvb_config_t *dvb_get_config(void)
 747 {
 748         int i, fd, type, size;
 749         char filename[30], *conf_file, *name;
 750         dvb_channels_list *list;
 751         dvb_card_config_t *cards = NULL, *tmp;
 752         dvb_config_t *conf = NULL;
 753
 754         if(dvb_config != NULL)
 755                 return dvb_config;
 756
 757         conf = (dvb_config_t*) malloc(sizeof(dvb_config_t));
 758         if(conf == NULL)
 759                 return NULL;
 760
 761         conf->priv = NULL;
 762         conf->count = 0;
 763         conf->cards = NULL;
 764         for(i=0; i<MAX_CARDS; i++)
 765         {
 766                 snprintf(filename, sizeof(filename), "/dev/dvb/adapter%d/frontend0", i);
 767                 fd = open(filename, O_RDONLY|O_NONBLOCK);
 768                 if(fd < 0)
 769                 {
 770                         mp_msg(MSGT_DEMUX, MSGL_V, "DVB_CONFIG, can't open device %s, skipping\n", filename);
 771                         continue;
 772                 }
 773
 774                 type = dvb_get_tuner_type(fd);
 775                 close(fd);
 776                 if(type != TUNER_SAT && type != TUNER_TER && type != TUNER_CBL && type != TUNER_ATSC)
 777                 {
 778                         mp_msg(MSGT_DEMUX, MSGL_V, "DVB_CONFIG, can't detect tuner type of card %d, skipping\n", i);
 779                         continue;
 780                 }
 781
 782                 switch(type)
 783                 {
 784                         case TUNER_TER:
 785                         conf_file = get_path("channels.conf.ter");
 786                                 break;
 787                         case TUNER_CBL:
 788                         conf_file = get_path("channels.conf.cbl");
 789                                 break;
 790                         case TUNER_SAT:
 791                         conf_file = get_path("channels.conf.sat");
 792                                 break;
 793                         case TUNER_ATSC:
 794                         conf_file = get_path("channels.conf.atsc");
 795                                 break;
 796                 }
 797
 798                 if((access(conf_file, F_OK | R_OK) != 0))
 799                         conf_file = get_path("channels.conf");
 800
 801                 list = dvb_get_channels(conf_file, type);
 802                 if(list == NULL)
 803                         continue;
 804
 805                 size = sizeof(dvb_card_config_t) * (conf->count + 1);
 806                 tmp = realloc(conf->cards, size);
 807
 808                 if(tmp == NULL)
 809                 {
 810                         fprintf(stderr, "DVB_CONFIG, can't realloc %d bytes, skipping\n", size);
 811                         continue;
 812                 }
 813                 cards = tmp;
 814
 815                 name = (char*) malloc(20);
 816                 if(name==NULL)
 817                 {
 818                         fprintf(stderr, "DVB_CONFIG, can't realloc 20 bytes, skipping\n");
 819                         continue;
 820                 }
 821
 822                 conf->cards = cards;
 823                 conf->cards[conf->count].devno = i;
 824                 conf->cards[conf->count].list = list;
 825                 conf->cards[conf->count].type = type;
 826                 snprintf(name, 20, "DVB-%c card n. %d", type==TUNER_TER ? 'T' : (type==TUNER_CBL ? 'C' : 'S'), conf->count+1);
 827                 conf->cards[conf->count].name = name;
 828                 conf->count++;
 829         }
 830
 831         if(conf->count == 0)
 832         {
 833                 free(conf);
 834                 conf = NULL;
 835         }
 836
 837         dvb_config = conf;
 838         return conf;
 839 }
 840
 841
 842
 843 stream_info_t stream_info_dvb = {
 844         "Dvb Input",
 845         "dvbin",
 846         "Nico",
 847         "based on the code from ??? (probably Arpi)",
 848         dvb_open,
 849         { "dvb", NULL },
 850         &stream_opts,
 851         1                               // Urls are an option string
 852 };