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