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                 free(list->channels);
 406                 free(list);
 407                 return NULL;
 408         }
 409
 410         list->current = 0;
 411         return list;
 412 }
 413
 414 void dvb_free_config(dvb_config_t *config)
 415 {
 416         int i, j;
 417
 418         for(i=0; i<config->count; i++)
 419         {
 420                 free(config->cards[i].name);
 421                 if(!config->cards[i].list)
 422                         continue;
 423                 if(config->cards[i].list->channels)
 424                 {
 425                         for(j=0; j<config->cards[i].list->NUM_CHANNELS; j++)
 426                                 free(config->cards[i].list->channels[j].name);
 427                         free(config->cards[i].list->channels);
 428                 }
 429                 free(config->cards[i].list);
 430         }
 431         free(config);
 432 }
 433
 434 static int dvb_streaming_read(stream_t *stream, char *buffer, int size)
 435 {
 436         struct pollfd pfds[1];
 437         int pos=0, tries, rk, fd;
 438         dvb_priv_t *priv  = (dvb_priv_t *) stream->priv;
 439
 440         mp_msg(MSGT_DEMUX, MSGL_DBG3, "dvb_streaming_read(%d)\n", size);
 441
 442         tries = priv->retry + 1;
 443
 444         fd = stream->fd;
 445         while(pos < size)
 446         {
 447                 pfds[0].fd = fd;
 448                 pfds[0].events = POLLIN | POLLPRI;
 449
 450                 rk = size - pos;
 451                 if(poll(pfds, 1, 500) <= 0)
 452                 {
 453                         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);
 454                         errno = 0;
 455                         if(--tries > 0)
 456                                 continue;
 457                         else
 458                                 break;
 459                 }
 460                 if((rk = read(fd, &buffer[pos], rk)) > 0)
 461                 {
 462                         pos += rk;
 463                         mp_msg(MSGT_DEMUX, MSGL_DBG3, "ret (%d) bytes\n", pos);
 464                 }
 465         }
 466
 467
 468         if(! pos)
 469                 mp_msg(MSGT_DEMUX, MSGL_ERR, "dvb_streaming_read, return %d bytes\n", pos);
 470
 471         return pos;
 472 }
 473
 474 static void dvbin_close(stream_t *stream);
 475
 476 int dvb_set_channel(stream_t *stream, int card, int n)
 477 {
 478         dvb_channels_list *new_list;
 479         dvb_channel_t *channel;
 480         dvb_priv_t *priv = stream->priv;
 481         char buf[4096];
 482         dvb_config_t *conf = (dvb_config_t *) priv->config;
 483         int devno;
 484         int i;
 485
 486         if((card < 0) || (card > conf->count))
 487         {
 488                 mp_msg(MSGT_DEMUX, MSGL_ERR, "dvb_set_channel: INVALID CARD NUMBER: %d vs %d, abort\n", card, conf->count);
 489                 return 0;
 490         }
 491
 492         devno = conf->cards[card].devno;
 493         new_list = conf->cards[card].list;
 494         if((n > new_list->NUM_CHANNELS) || (n < 0))
 495         {
 496                 mp_msg(MSGT_DEMUX, MSGL_ERR, "dvb_set_channel: INVALID CHANNEL NUMBER: %d, for card %d, abort\n", n, card);
 497                 return 0;
 498         }
 499         channel = &(new_list->channels[n]);
 500
 501         if(priv->is_on) //the fds are already open and we have to stop the demuxers
 502         {
 503                 for(i = 0; i < priv->demux_fds_cnt; i++)
 504                         dvb_demux_stop(priv->demux_fds[i]);
 505
 506                 priv->retry = 0;
 507                 while(dvb_streaming_read(stream, buf, 4096) > 0);       //empty both the stream's and driver's buffer
 508                 if(priv->card != card)
 509                 {
 510                         dvbin_close(stream);
 511                         if(! dvb_open_devices(priv, devno, channel->pids_cnt))
 512                         {
 513                                 mp_msg(MSGT_DEMUX, MSGL_ERR, "DVB_SET_CHANNEL, COULDN'T OPEN DEVICES OF CARD: %d, EXIT\n", card);
 514                                 return 0;
 515                         }
 516                 }
 517                 else    //close all demux_fds with pos > pids required for the new channel or open other demux_fds if we have too few
 518                 {
 519                         if(! dvb_fix_demuxes(priv, channel->pids_cnt))
 520                                 return 0;
 521                 }
 522         }
 523         else
 524         {
 525                 if(! dvb_open_devices(priv, devno, channel->pids_cnt))
 526                 {
 527                         mp_msg(MSGT_DEMUX, MSGL_ERR, "DVB_SET_CHANNEL2, COULDN'T OPEN DEVICES OF CARD: %d, EXIT\n", card);
 528                         return 0;
 529                 }
 530         }
 531
 532         priv->card = card;
 533         priv->list = new_list;
 534         priv->retry = 5;
 535         new_list->current = n;
 536         stream->fd = priv->dvr_fd;
 537         mp_msg(MSGT_DEMUX, MSGL_V, "DVB_SET_CHANNEL: new channel name=%s, card: %d, channel %d\n", channel->name, card, n);
 538
 539         stream->buf_pos = stream->buf_len = 0;
 540         stream->pos = 0;
 541         stream->eof = 0;
 542
 543         if(channel->freq != priv->last_freq)
 544                 if (! dvb_tune(priv, channel->freq, channel->pol, channel->srate, channel->diseqc, channel->tone,
 545                         channel->inv, channel->mod, channel->gi, channel->trans, channel->bw, channel->cr, channel->cr_lp, channel->hier, priv->timeout))
 546                         return 0;
 547
 548         priv->last_freq = channel->freq;
 549         priv->is_on = 1;
 550
 551         //sets demux filters and restart the stream
 552         for(i = 0; i < channel->pids_cnt; i++)
 553         {
 554                 if(! dvb_set_ts_filt(priv->demux_fds[i], channel->pids[i], DMX_PES_OTHER))
 555                         return 0;
 556         }
 557
 558         return 1;
 559 }
 560
 561
 562
 563 int dvb_step_channel(stream_t *stream, int dir)
 564 {
 565         int new_current;
 566         dvb_channels_list *list;
 567         dvb_priv_t *priv = stream->priv;
 568
 569         mp_msg(MSGT_DEMUX, MSGL_V, "DVB_STEP_CHANNEL dir %d\n", dir);
 570
 571         if(priv == NULL)
 572         {
 573                 mp_msg(MSGT_DEMUX, MSGL_ERR, "dvb_step_channel: NULL priv_ptr, quit\n");
 574                 return 0;
 575         }
 576
 577         list = priv->list;
 578         if(list == NULL)
 579         {
 580                 mp_msg(MSGT_DEMUX, MSGL_ERR, "dvb_step_channel: NULL list_ptr, quit\n");
 581                 return 0;
 582         }
 583
 584         new_current = (list->NUM_CHANNELS + list->current + (dir == DVB_CHANNEL_HIGHER ? 1 : -1)) % list->NUM_CHANNELS;
 585
 586         return dvb_set_channel(stream, priv->card, new_current);
 587 }
 588
 589
 590
 591
 592 static void dvbin_close(stream_t *stream)
 593 {
 594         int i;
 595         dvb_priv_t *priv  = (dvb_priv_t *) stream->priv;
 596
 597         for(i = priv->demux_fds_cnt-1; i >= 0; i--)
 598         {
 599                 priv->demux_fds_cnt--;
 600                 mp_msg(MSGT_DEMUX, MSGL_V, "DVBIN_CLOSE, close(%d), fd=%d, COUNT=%d\n", i, priv->demux_fds[i], priv->demux_fds_cnt);
 601                 close(priv->demux_fds[i]);
 602         }
 603         close(priv->dvr_fd);
 604
 605         close(priv->fe_fd);
 606         priv->fe_fd = priv->sec_fd = priv->dvr_fd = -1;
 607
 608         priv->is_on = 0;
 609         dvb_free_config(priv->config);
 610 }
 611
 612
 613 static int dvb_streaming_start(stream_t *stream, struct stream_priv_s *opts, int tuner_type, char *progname)
 614 {
 615         int i;
 616         dvb_channel_t *channel = NULL;
 617         dvb_priv_t *priv = stream->priv;
 618
 619         mp_msg(MSGT_DEMUX, MSGL_V, "\r\ndvb_streaming_start(PROG: %s, CARD: %d, FILE: %s)\r\n",
 620             opts->prog, opts->card, opts->file);
 621
 622         priv->is_on = 0;
 623
 624         i = 0;
 625         while((channel == NULL) && i < priv->list->NUM_CHANNELS)
 626         {
 627                 if(! strcmp(priv->list->channels[i].name, progname))
 628                         channel = &(priv->list->channels[i]);
 629
 630                 i++;
 631         }
 632
 633         if(channel != NULL)
 634         {
 635                 priv->list->current = i-1;
 636                 mp_msg(MSGT_DEMUX, MSGL_V, "PROGRAM NUMBER %d: name=%s, freq=%u\n", i-1, channel->name, channel->freq);
 637         }
 638         else
 639         {
 640                 mp_msg(MSGT_DEMUX, MSGL_ERR, "\n\nDVBIN: no such channel \"%s\"\n\n", progname);
 641                 return 0;
 642         }
 643
 644
 645         if(!dvb_set_channel(stream, priv->card, priv->list->current))
 646         {
 647                 mp_msg(MSGT_DEMUX, MSGL_ERR, "ERROR, COULDN'T SET CHANNEL  %i: ", priv->list->current);
 648                 dvbin_close(stream);
 649                 return 0;
 650         }
 651
 652         mp_msg(MSGT_DEMUX, MSGL_V,  "SUCCESSFUL EXIT from dvb_streaming_start\n");
 653
 654         return 1;
 655 }
 656
 657
 658
 659
 660 static int dvb_open(stream_t *stream, int mode, void *opts, int *file_format)
 661 {
 662         // I don't force  the file format bacause, although it's almost always TS,
 663         // there are some providers that stream an IP multicast with M$ Mpeg4 inside
 664         struct stream_priv_s* p = (struct stream_priv_s*)opts;
 665         dvb_priv_t *priv;
 666         char *progname;
 667         int tuner_type = 0, i;
 668
 669
 670         if(mode != STREAM_READ)
 671                 return STREAM_UNSUPPORTED;
 672
 673         stream->priv = calloc(1, sizeof(dvb_priv_t));
 674         if(stream->priv ==  NULL)
 675                 return STREAM_ERROR;
 676
 677         priv = (dvb_priv_t *)stream->priv;
 678         priv->fe_fd = priv->sec_fd = priv->dvr_fd = -1;
 679         priv->config = dvb_get_config();
 680         if(priv->config == NULL)
 681         {
 682                 free(priv);
 683                 mp_msg(MSGT_DEMUX, MSGL_ERR, "DVB CONFIGURATION IS EMPTY, exit\n");
 684                 return STREAM_ERROR;
 685         }
 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\n",
 718                 p->prog, priv->card+1, priv->tuner_type);
 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(stream, 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
 755         conf = malloc(sizeof(dvb_config_t));
 756         if(conf == NULL)
 757                 return NULL;
 758
 759         conf->priv = NULL;
 760         conf->count = 0;
 761         conf->cards = NULL;
 762         for(i=0; i<MAX_CARDS; i++)
 763         {
 764                 snprintf(filename, sizeof(filename), "/dev/dvb/adapter%d/frontend0", i);
 765                 fd = open(filename, O_RDONLY|O_NONBLOCK);
 766                 if(fd < 0)
 767                 {
 768                         mp_msg(MSGT_DEMUX, MSGL_V, "DVB_CONFIG, can't open device %s, skipping\n", filename);
 769                         continue;
 770                 }
 771
 772                 type = dvb_get_tuner_type(fd);
 773                 close(fd);
 774                 if(type != TUNER_SAT && type != TUNER_TER && type != TUNER_CBL && type != TUNER_ATSC)
 775                 {
 776                         mp_msg(MSGT_DEMUX, MSGL_V, "DVB_CONFIG, can't detect tuner type of card %d, skipping\n", i);
 777                         continue;
 778                 }
 779
 780                 conf_file = get_path("channels.conf");
 781                 switch(type)
 782                 {
 783                         case TUNER_TER:
 784                         conf_file = get_path("channels.conf.ter");
 785                                 break;
 786                         case TUNER_CBL:
 787                         conf_file = get_path("channels.conf.cbl");
 788                                 break;
 789                         case TUNER_SAT:
 790                         conf_file = get_path("channels.conf.sat");
 791                                 break;
 792                         case TUNER_ATSC:
 793                         conf_file = get_path("channels.conf.atsc");
 794                                 break;
 795                 }
 796
 797                 if((access(conf_file, F_OK | R_OK) != 0))
 798                 {
 799                         free(conf_file);
 800                         conf_file = get_path("channels.conf");
 801                         if((access(conf_file, F_OK | R_OK) != 0))
 802                         {
 803                                 free(conf_file);
 804                                 conf_file = strdup(MPLAYER_CONFDIR "/channels.conf");
 805                         }
 806                 }
 807
 808                 list = dvb_get_channels(conf_file, type);
 809                 free(conf_file);
 810                 if(list == NULL)
 811                         continue;
 812
 813                 size = sizeof(dvb_card_config_t) * (conf->count + 1);
 814                 tmp = realloc(conf->cards, size);
 815
 816                 if(tmp == NULL)
 817                 {
 818                         fprintf(stderr, "DVB_CONFIG, can't realloc %d bytes, skipping\n", size);
 819                         continue;
 820                 }
 821                 cards = tmp;
 822
 823                 name = malloc(20);
 824                 if(name==NULL)
 825                 {
 826                         fprintf(stderr, "DVB_CONFIG, can't realloc 20 bytes, skipping\n");
 827                         continue;
 828                 }
 829
 830                 conf->cards = cards;
 831                 conf->cards[conf->count].devno = i;
 832                 conf->cards[conf->count].list = list;
 833                 conf->cards[conf->count].type = type;
 834                 snprintf(name, 20, "DVB-%c card n. %d", type==TUNER_TER ? 'T' : (type==TUNER_CBL ? 'C' : 'S'), conf->count+1);
 835                 conf->cards[conf->count].name = name;
 836                 conf->count++;
 837         }
 838
 839         if(conf->count == 0)
 840         {
 841                 free(conf);
 842                 conf = NULL;
 843         }
 844
 845         return conf;
 846 }
 847
 848
 849
 850 const stream_info_t stream_info_dvb = {
 851         "Dvb Input",
 852         "dvbin",
 853         "Nico",
 854         "based on the code from ??? (probably Arpi)",
 855         dvb_open,
 856         { "dvb", NULL },
 857         &stream_opts,
 858         1                               // Urls are an option string
 859 };