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