drivers/media/dvb/dvb-core/dvb_demux.c

   1 /*
   2  * dvb_demux.c - DVB kernel demux API
   3  *
   4  * Copyright (C) 2000-2001 Ralph  Metzler <ralph@convergence.de>
   5  *                     & Marcus Metzler <marcus@convergence.de>
   6  *                       for convergence integrated media GmbH
   7  *
   8  * This program is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU Lesser General Public License
  10  * as published by the Free Software Foundation; either version 2.1
  11  * of the License, or (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU Lesser General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  21  *
  22  */
  23
  24 #include <linux/spinlock.h>
  25 #include <linux/slab.h>
  26 #include <linux/vmalloc.h>
  27 #include <linux/module.h>
  28 #include <linux/poll.h>
  29 #include <linux/string.h>
  30         #include <linux/crc32.h>
  31 #include <asm/uaccess.h>
  32
  33 #include "dvb_demux.h"
  34 #include "dvb_functions.h"
  35
  36 #define NOBUFS
  37
  38 LIST_HEAD(dmx_muxs);
  39
  40
  41 int dmx_register_demux(struct dmx_demux *demux)
  42 {
  43         demux->users = 0;
  44         list_add(&demux->reg_list, &dmx_muxs);
  45         return 0;
  46 }
  47
  48 int dmx_unregister_demux(struct dmx_demux* demux)
  49 {
  50         struct list_head *pos, *n, *head=&dmx_muxs;
  51
  52         list_for_each_safe (pos, n, head) {
  53                 if (DMX_DIR_ENTRY(pos) == demux) {
  54                         if (demux->users>0)
  55                                 return -EINVAL;
  56                         list_del(pos);
  57                         return 0;
  58                 }
  59         }
  60
  61         return -ENODEV;
  62 }
  63
  64
  65 struct list_head *dmx_get_demuxes(void)
  66 {
  67         if (list_empty(&dmx_muxs))
  68                 return NULL;
  69
  70         return &dmx_muxs;
  71 }
  72
  73 /******************************************************************************
  74  * static inlined helper functions
  75  ******************************************************************************/
  76
  77
  78 static inline u16 section_length(const u8 *buf)
  79 {
  80         return 3+((buf[1]&0x0f)<<8)+buf[2];
  81 }
  82
  83
  84 static inline u16 ts_pid(const u8 *buf)
  85 {
  86         return ((buf[1]&0x1f)<<8)+buf[2];
  87 }
  88
  89
  90 static inline int payload(const u8 *tsp)
  91 {
  92         if (!(tsp[3]&0x10)) // no payload?
  93                 return 0;
  94         if (tsp[3]&0x20) {  // adaptation field?
  95                 if (tsp[4]>183)    // corrupted data?
  96                         return 0;
  97                 else
  98                         return 184-1-tsp[4];
  99         }
 100         return 184;
 101 }
 102
 103
 104 void dvb_set_crc32(u8 *data, int length)
 105 {
 106         u32 crc;
 107
 108         crc = crc32_le(~0, data, length);
 109
 110         data[length]   = (crc >> 24) & 0xff;
 111         data[length+1] = (crc >> 16) & 0xff;
 112         data[length+2] = (crc >>  8) & 0xff;
 113         data[length+3] = (crc)       & 0xff;
 114 }
 115
 116
 117 static u32 dvb_dmx_crc32 (struct dvb_demux_feed *f, const u8 *src, size_t len)
 118 {
 119         return (f->feed.sec.crc_val = crc32_le (f->feed.sec.crc_val, src, len));
 120 }
 121
 122
 123 static void dvb_dmx_memcopy (struct dvb_demux_feed *f, u8 *d, const u8 *s, size_t len)
 124 {
 125         memcpy (d, s, len);
 126 }
 127
 128
 129 /******************************************************************************
 130  * Software filter functions
 131  ******************************************************************************/
 132
 133 static inline int dvb_dmx_swfilter_payload (struct dvb_demux_feed *feed, const u8 *buf)
 134 {
 135         int count = payload(buf);
 136         int p;
 137         //int ccok;
 138         //u8 cc;
 139
 140         if (count == 0)
 141                 return -1;
 142
 143         p = 188-count;
 144
 145         /*
 146         cc=buf[3]&0x0f;
 147         ccok=((dvbdmxfeed->cc+1)&0x0f)==cc ? 1 : 0;
 148         dvbdmxfeed->cc=cc;
 149         if (!ccok)
 150                 printk("missed packet!\n");
 151         */
 152
 153         if (buf[1] & 0x40)  // PUSI ?
 154                 feed->peslen = 0xfffa;
 155
 156         feed->peslen += count;
 157
 158         return feed->cb.ts (&buf[p], count, 0, 0, &feed->feed.ts, DMX_OK);
 159 }
 160
 161
 162 static int dvb_dmx_swfilter_sectionfilter (struct dvb_demux_feed *feed,
 163                                     struct dvb_demux_filter *f)
 164 {
 165         u8 neq = 0;
 166         int i;
 167
 168         for (i=0; i<DVB_DEMUX_MASK_MAX; i++) {
 169                 u8 xor = f->filter.filter_value[i] ^ feed->feed.sec.secbuf[i];
 170
 171                 if (f->maskandmode[i] & xor)
 172                         return 0;
 173
 174                 neq |= f->maskandnotmode[i] & xor;
 175         }
 176
 177         if (f->doneq & !neq)
 178                 return 0;
 179
 180         return feed->cb.sec (feed->feed.sec.secbuf, feed->feed.sec.seclen,
 181                              0, 0, &f->filter, DMX_OK);
 182 }
 183
 184
 185 static inline int dvb_dmx_swfilter_section_feed (struct dvb_demux_feed *feed)
 186 {
 187         struct dvb_demux *demux = feed->demux;
 188         struct dvb_demux_filter *f = feed->filter;
 189         struct dmx_section_feed *sec = &feed->feed.sec;
 190         u8 *buf = sec->secbuf;
 191
 192         if (sec->secbufp != sec->seclen)
 193                 return -1;
 194
 195         if (!sec->is_filtering)
 196                 return 0;
 197
 198         if (!f)
 199                 return 0;
 200
 201         if (sec->check_crc && demux->check_crc32(feed, sec->secbuf, sec->seclen))
 202                 return -1;
 203
 204         do {
 205                 if (dvb_dmx_swfilter_sectionfilter(feed, f) < 0)
 206                         return -1;
 207         } while ((f = f->next) && sec->is_filtering);
 208
 209         sec->secbufp = sec->seclen = 0;
 210
 211         memset(buf, 0, DVB_DEMUX_MASK_MAX);
 212
 213         return 0;
 214 }
 215
 216
 217 static int dvb_dmx_swfilter_section_packet(struct dvb_demux_feed *feed, const u8 *buf)
 218 {
 219         struct dvb_demux *demux = feed->demux;
 220         struct dmx_section_feed *sec = &feed->feed.sec;
 221         int p, count;
 222         int ccok, rest;
 223         u8 cc;
 224
 225         if (!(count = payload(buf)))
 226                 return -1;
 227
 228         p = 188-count;
 229
 230         cc = buf[3] & 0x0f;
 231         ccok = ((feed->cc+1) & 0x0f) == cc ? 1 : 0;
 232         feed->cc = cc;
 233
 234         if (buf[1] & 0x40) { // PUSI set
 235                 // offset to start of first section is in buf[p]
 236                 if (p+buf[p]>187) // trash if it points beyond packet
 237                         return -1;
 238
 239                 if (buf[p] && ccok) { // rest of previous section?
 240                         // did we have enough data in last packet to calc length?
 241                         int tmp = 3 - sec->secbufp;
 242
 243                         if (tmp > 0 && tmp != 3) {
 244                                 if (p + tmp >= 187)
 245                                         return -1;
 246
 247                                 demux->memcopy (feed, sec->secbuf+sec->secbufp,
 248                                                buf+p+1, tmp);
 249
 250                                 sec->seclen = section_length(sec->secbuf);
 251
 252                                 if (sec->seclen > 4096)
 253                                         return -1;
 254                         }
 255
 256                         rest = sec->seclen - sec->secbufp;
 257
 258                         if (rest == buf[p] && sec->seclen) {
 259                                 demux->memcopy (feed, sec->secbuf + sec->secbufp,
 260                                                buf+p+1, buf[p]);
 261                                 sec->secbufp += buf[p];
 262                                 dvb_dmx_swfilter_section_feed(feed);
 263                         }
 264                 }
 265
 266                 p += buf[p] + 1;                // skip rest of last section
 267                 count = 188 - p;
 268
 269                 while (count) {
 270
 271                         sec->crc_val = ~0;
 272
 273                         if ((count>2) && // enough data to determine sec length?
 274                             ((sec->seclen = section_length(buf+p)) <= count)) {
 275                                 if (sec->seclen>4096)
 276                                         return -1;
 277
 278                                 demux->memcopy (feed, sec->secbuf, buf+p,
 279                                                sec->seclen);
 280
 281                                 sec->secbufp = sec->seclen;
 282                                 p += sec->seclen;
 283                                 count = 188 - p;
 284
 285                                 dvb_dmx_swfilter_section_feed(feed);
 286
 287                                 // filling bytes until packet end?
 288                                 if (count && buf[p]==0xff)
 289                                         count=0;
 290
 291                         } else { // section continues to following TS packet
 292                                 demux->memcopy(feed, sec->secbuf, buf+p, count);
 293                                 sec->secbufp+=count;
 294                                 count=0;
 295                         }
 296                 }
 297
 298                 return 0;
 299         }
 300
 301         // section continued below
 302         if (!ccok)
 303                 return -1;
 304
 305         if (!sec->secbufp) // any data in last ts packet?
 306                 return -1;
 307
 308         // did we have enough data in last packet to calc section length?
 309         if (sec->secbufp < 3) {
 310                 int tmp = 3 - sec->secbufp;
 311
 312                 if (tmp>count)
 313                         return -1;
 314
 315                 sec->crc_val = ~0;
 316
 317                 demux->memcopy (feed, sec->secbuf + sec->secbufp, buf+p, tmp);
 318
 319                 sec->seclen = section_length(sec->secbuf);
 320
 321                 if (sec->seclen > 4096)
 322                         return -1;
 323         }
 324
 325         rest = sec->seclen - sec->secbufp;
 326
 327         if (rest < 0)
 328                 return -1;
 329
 330         if (rest <= count) {    // section completed in this TS packet
 331                 demux->memcopy (feed, sec->secbuf + sec->secbufp, buf+p, rest);
 332                 sec->secbufp += rest;
 333                 dvb_dmx_swfilter_section_feed(feed);
 334         } else  {       // section continues in following ts packet
 335                 demux->memcopy (feed, sec->secbuf + sec->secbufp, buf+p, count);
 336                 sec->secbufp += count;
 337         }
 338
 339         return 0;
 340 }
 341
 342
 343 static inline void dvb_dmx_swfilter_packet_type(struct dvb_demux_feed *feed, const u8 *buf)
 344 {
 345         switch(feed->type) {
 346         case DMX_TYPE_TS:
 347                 if (!feed->feed.ts.is_filtering)
 348                         break;
 349                 if (feed->ts_type & TS_PACKET) {
 350                         if (feed->ts_type & TS_PAYLOAD_ONLY)
 351                                 dvb_dmx_swfilter_payload(feed, buf);
 352                         else
 353                                 feed->cb.ts(buf, 188, 0, 0, &feed->feed.ts, DMX_OK);
 354                 }
 355                 if (feed->ts_type & TS_DECODER)
 356                         if (feed->demux->write_to_decoder)
 357                                 feed->demux->write_to_decoder(feed, buf, 188);
 358                 break;
 359
 360         case DMX_TYPE_SEC:
 361                 if (!feed->feed.sec.is_filtering)
 362                         break;
 363                 if (dvb_dmx_swfilter_section_packet(feed, buf) < 0)
 364                         feed->feed.sec.seclen = feed->feed.sec.secbufp=0;
 365                 break;
 366
 367         default:
 368                 break;
 369         }
 370 }
 371
 372
 373 void dvb_dmx_swfilter_packet(struct dvb_demux *demux, const u8 *buf)
 374 {
 375         struct dvb_demux_feed *feed;
 376         struct list_head *pos, *head=&demux->feed_list;
 377         u16 pid = ts_pid(buf);
 378
 379         list_for_each(pos, head) {
 380                 feed = list_entry(pos, struct dvb_demux_feed, list_head);
 381                 if (feed->pid == pid)
 382                         dvb_dmx_swfilter_packet_type (feed, buf);
 383                 if (feed->pid == 0x2000)
 384                         feed->cb.ts(buf, 188, 0, 0, &feed->feed.ts, DMX_OK);
 385         }
 386 }
 387
 388
 389 void dvb_dmx_swfilter_packets(struct dvb_demux *demux, const u8 *buf, size_t count)
 390 {
 391         spin_lock(&demux->lock);
 392
 393         while (count--) {
 394                 dvb_dmx_swfilter_packet(demux, buf);
 395                 buf += 188;
 396         }
 397
 398         spin_unlock(&demux->lock);
 399 }
 400
 401
 402 void dvb_dmx_swfilter(struct dvb_demux *demux, const u8 *buf, size_t count)
 403 {
 404         int p = 0,i, j;
 405
 406         if ((i = demux->tsbufp)) {
 407                 if (count < (j=188-i)) {
 408                         memcpy(&demux->tsbuf[i], buf, count);
 409                         demux->tsbufp += count;
 410                         return;
 411                 }
 412                 memcpy(&demux->tsbuf[i], buf, j);
 413                 dvb_dmx_swfilter_packet(demux, demux->tsbuf);
 414                 demux->tsbufp = 0;
 415                 p += j;
 416         }
 417
 418         while (p < count) {
 419                 if (buf[p] == 0x47) {
 420                         if (count-p >= 188) {
 421                                 dvb_dmx_swfilter_packet(demux, buf+p);
 422                                 p += 188;
 423                         } else {
 424                                 i = count-p;
 425                                 memcpy(demux->tsbuf, buf+p, i);
 426                                 demux->tsbufp=i;
 427                                 return;
 428                         }
 429                 } else
 430                         p++;
 431         }
 432 }
 433
 434
 435 static struct dvb_demux_filter * dvb_dmx_filter_alloc(struct dvb_demux *demux)
 436 {
 437         int i;
 438
 439         for (i=0; i<demux->filternum; i++)
 440                 if (demux->filter[i].state == DMX_STATE_FREE)
 441                         break;
 442
 443         if (i == demux->filternum)
 444                 return NULL;
 445
 446         demux->filter[i].state = DMX_STATE_ALLOCATED;
 447
 448         return &demux->filter[i];
 449 }
 450
 451 static struct dvb_demux_feed * dvb_dmx_feed_alloc(struct dvb_demux *demux)
 452 {
 453         int i;
 454
 455         for (i=0; i<demux->feednum; i++)
 456                 if (demux->feed[i].state == DMX_STATE_FREE)
 457                         break;
 458
 459         if (i == demux->feednum)
 460                 return NULL;
 461
 462         demux->feed[i].state = DMX_STATE_ALLOCATED;
 463
 464         return &demux->feed[i];
 465 }
 466
 467
 468 static int dmx_pid_set (u16 pid, struct dvb_demux_feed *feed)
 469 {
 470         struct dvb_demux *demux = feed->demux;
 471         struct list_head *pos, *n, *head=&demux->feed_list;
 472
 473         if (pid > DMX_MAX_PID)
 474                 return -EINVAL;
 475
 476         if (pid == feed->pid)
 477                 return 0;
 478
 479         if (feed->pid <= DMX_MAX_PID) {
 480                 list_for_each_safe(pos, n, head) {
 481                         if (DMX_FEED_ENTRY(pos)->pid == feed->pid) {
 482                                 list_del(pos);
 483                                 break;
 484                         }
 485                 }
 486         }
 487
 488         list_add(&feed->list_head, head);
 489         feed->pid = pid;
 490
 491         return 0;
 492 }
 493
 494
 495 static int dmx_ts_feed_set (struct dmx_ts_feed* ts_feed, u16 pid, int ts_type,
 496                      enum dmx_ts_pes pes_type, size_t callback_length,
 497                      size_t circular_buffer_size, int descramble,
 498                      struct timespec timeout)
 499 {
 500         struct dvb_demux_feed *feed = (struct dvb_demux_feed *) ts_feed;
 501         struct dvb_demux *demux = feed->demux;
 502         int ret;
 503
 504         if (down_interruptible (&demux->mutex))
 505                 return -ERESTARTSYS;
 506
 507         if (ts_type & TS_DECODER) {
 508                 if (pes_type >= DMX_TS_PES_OTHER) {
 509                         up(&demux->mutex);
 510                         return -EINVAL;
 511                 }
 512
 513                 if (demux->pesfilter[pes_type] &&
 514                     demux->pesfilter[pes_type] != feed) {
 515                         up(&demux->mutex);
 516                         return -EINVAL;
 517                 }
 518
 519                 if ((pes_type != DMX_TS_PES_PCR0) &&
 520                     (pes_type != DMX_TS_PES_PCR1) &&
 521                     (pes_type != DMX_TS_PES_PCR2) &&
 522                     (pes_type != DMX_TS_PES_PCR3)) {
 523                         if ((ret = dmx_pid_set(pid, feed))<0) {
 524                                 up(&demux->mutex);
 525                                 return ret;
 526                         }
 527                 } else
 528                         feed->pid = pid;
 529
 530                 demux->pesfilter[pes_type] = feed;
 531                 demux->pids[pes_type] = feed->pid;
 532         } else {
 533                 if ((ret = dmx_pid_set(pid, feed))<0) {
 534                         up(&demux->mutex);
 535                         return ret;
 536                 }
 537         }
 538
 539         feed->buffer_size = circular_buffer_size;
 540         feed->descramble = descramble;
 541         feed->timeout = timeout;
 542         feed->cb_length = callback_length;
 543         feed->ts_type = ts_type;
 544         feed->pes_type = pes_type;
 545
 546         if (feed->descramble) {
 547                 up(&demux->mutex);
 548                 return -ENOSYS;
 549         }
 550
 551         if (feed->buffer_size) {
 552 #ifdef NOBUFS
 553                 feed->buffer=0;
 554 #else
 555                 feed->buffer = vmalloc(feed->buffer_size);
 556                 if (!feed->buffer) {
 557                         up(&demux->mutex);
 558                         return -ENOMEM;
 559                 }
 560 #endif
 561         }
 562
 563         feed->state = DMX_STATE_READY;
 564         up(&demux->mutex);
 565
 566         return 0;
 567 }
 568
 569
 570 static int dmx_ts_feed_start_filtering(struct dmx_ts_feed* ts_feed)
 571 {
 572         struct dvb_demux_feed *feed = (struct dvb_demux_feed *) ts_feed;
 573         struct dvb_demux *demux = feed->demux;
 574         int ret;
 575
 576         if (down_interruptible (&demux->mutex))
 577                 return -ERESTARTSYS;
 578
 579         if (feed->state != DMX_STATE_READY || feed->type != DMX_TYPE_TS) {
 580                 up(&demux->mutex);
 581                 return -EINVAL;
 582         }
 583
 584         if (!demux->start_feed) {
 585                 up(&demux->mutex);
 586                 return -ENODEV;
 587         }
 588
 589         if ((ret = demux->start_feed(feed)) < 0) {
 590                 up(&demux->mutex);
 591                 return ret;
 592         }
 593
 594         spin_lock_irq(&demux->lock);
 595         ts_feed->is_filtering = 1;
 596         feed->state = DMX_STATE_GO;
 597         spin_unlock_irq(&demux->lock);
 598         up(&demux->mutex);
 599
 600         return 0;
 601 }
 602
 603 static int dmx_ts_feed_stop_filtering(struct dmx_ts_feed* ts_feed)
 604 {
 605         struct dvb_demux_feed *feed = (struct dvb_demux_feed *) ts_feed;
 606         struct dvb_demux *demux = feed->demux;
 607         int ret;
 608
 609         if (down_interruptible (&demux->mutex))
 610                 return -ERESTARTSYS;
 611
 612         if (feed->state<DMX_STATE_GO) {
 613                 up(&demux->mutex);
 614                 return -EINVAL;
 615         }
 616
 617         if (!demux->stop_feed) {
 618                 up(&demux->mutex);
 619                 return -ENODEV;
 620         }
 621
 622         ret = demux->stop_feed(feed);
 623
 624         spin_lock_irq(&demux->lock);
 625         ts_feed->is_filtering = 0;
 626         feed->state = DMX_STATE_ALLOCATED;
 627         spin_unlock_irq(&demux->lock);
 628         up(&demux->mutex);
 629
 630         return ret;
 631 }
 632
 633 static int dvbdmx_allocate_ts_feed (struct dmx_demux *dmx, struct dmx_ts_feed **ts_feed,
 634                              dmx_ts_cb callback)
 635 {
 636         struct dvb_demux *demux = (struct dvb_demux *) dmx;
 637         struct dvb_demux_feed *feed;
 638
 639         if (down_interruptible (&demux->mutex))
 640                 return -ERESTARTSYS;
 641
 642         if (!(feed = dvb_dmx_feed_alloc(demux))) {
 643                 up(&demux->mutex);
 644                 return -EBUSY;
 645         }
 646
 647         feed->type = DMX_TYPE_TS;
 648         feed->cb.ts = callback;
 649         feed->demux = demux;
 650         feed->pid = 0xffff;
 651         feed->peslen = 0xfffa;
 652         feed->buffer = 0;
 653
 654         (*ts_feed) = &feed->feed.ts;
 655         (*ts_feed)->parent = dmx;
 656         (*ts_feed)->priv = 0;
 657         (*ts_feed)->is_filtering = 0;
 658         (*ts_feed)->start_filtering = dmx_ts_feed_start_filtering;
 659         (*ts_feed)->stop_filtering = dmx_ts_feed_stop_filtering;
 660         (*ts_feed)->set = dmx_ts_feed_set;
 661
 662
 663         if (!(feed->filter = dvb_dmx_filter_alloc(demux))) {
 664                 feed->state = DMX_STATE_FREE;
 665                 up(&demux->mutex);
 666                 return -EBUSY;
 667         }
 668
 669         feed->filter->type = DMX_TYPE_TS;
 670         feed->filter->feed = feed;
 671         feed->filter->state = DMX_STATE_READY;
 672
 673         up(&demux->mutex);
 674
 675         return 0;
 676 }
 677
 678 static int dvbdmx_release_ts_feed(struct dmx_demux *dmx, struct dmx_ts_feed *ts_feed)
 679 {
 680         struct dvb_demux *demux = (struct dvb_demux *) dmx;
 681         struct dvb_demux_feed *feed = (struct dvb_demux_feed *) ts_feed;
 682         struct list_head *pos, *n, *head=&demux->feed_list;
 683
 684         if (down_interruptible (&demux->mutex))
 685                 return -ERESTARTSYS;
 686
 687         if (feed->state == DMX_STATE_FREE) {
 688                 up(&demux->mutex);
 689                 return -EINVAL;
 690         }
 691
 692 #ifndef NOBUFS
 693         if (feed->buffer) {
 694                 vfree(feed->buffer);
 695                 feed->buffer=0;
 696         }
 697 #endif
 698
 699         feed->state = DMX_STATE_FREE;
 700         feed->filter->state = DMX_STATE_FREE;
 701
 702         if (feed->pid <= DMX_MAX_PID) {
 703                 list_for_each_safe(pos, n, head)
 704                         if (DMX_FEED_ENTRY(pos)->pid == feed->pid) {
 705                                 list_del(pos);
 706                                 break;
 707                         }
 708                 feed->pid = 0xffff;
 709         }
 710
 711         if (feed->ts_type & TS_DECODER)
 712                 demux->pesfilter[feed->pes_type] = NULL;
 713
 714         up(&demux->mutex);
 715         return 0;
 716 }
 717
 718
 719 /******************************************************************************
 720  * dmx_section_feed API calls
 721  ******************************************************************************/
 722
 723 static int dmx_section_feed_allocate_filter(struct dmx_section_feed* feed,
 724                                      struct dmx_section_filter** filter)
 725 {
 726         struct dvb_demux_feed *dvbdmxfeed=(struct dvb_demux_feed *) feed;
 727         struct dvb_demux *dvbdemux=dvbdmxfeed->demux;
 728         struct dvb_demux_filter *dvbdmxfilter;
 729
 730         if (down_interruptible (&dvbdemux->mutex))
 731                 return -ERESTARTSYS;
 732
 733         dvbdmxfilter=dvb_dmx_filter_alloc(dvbdemux);
 734         if (!dvbdmxfilter) {
 735                 up(&dvbdemux->mutex);
 736                 return -EBUSY;
 737         }
 738
 739         spin_lock_irq(&dvbdemux->lock);
 740         *filter=&dvbdmxfilter->filter;
 741         (*filter)->parent=feed;
 742         (*filter)->priv=0;
 743         dvbdmxfilter->feed=dvbdmxfeed;
 744         dvbdmxfilter->type=DMX_TYPE_SEC;
 745         dvbdmxfilter->state=DMX_STATE_READY;
 746
 747         dvbdmxfilter->next=dvbdmxfeed->filter;
 748         dvbdmxfeed->filter=dvbdmxfilter;
 749         spin_unlock_irq(&dvbdemux->lock);
 750         up(&dvbdemux->mutex);
 751         return 0;
 752 }
 753
 754
 755 static int dmx_section_feed_set(struct dmx_section_feed* feed,
 756                      u16 pid, size_t circular_buffer_size,
 757                      int descramble, int check_crc)
 758 {
 759         struct dvb_demux_feed *dvbdmxfeed=(struct dvb_demux_feed *) feed;
 760         struct dvb_demux *dvbdmx=dvbdmxfeed->demux;
 761         struct list_head *pos, *n, *head=&dvbdmx->feed_list;
 762
 763         if (pid>0x1fff)
 764                 return -EINVAL;
 765
 766         if (down_interruptible (&dvbdmx->mutex))
 767                 return -ERESTARTSYS;
 768
 769         if (dvbdmxfeed->pid <= DMX_MAX_PID) {
 770                 list_for_each_safe(pos, n, head) {
 771                         if (DMX_FEED_ENTRY(pos)->pid == dvbdmxfeed->pid) {
 772                                 list_del(pos);
 773                                 break;
 774                         }
 775                 }
 776         }
 777
 778         list_add(&dvbdmxfeed->list_head, head);
 779
 780         dvbdmxfeed->pid = pid;
 781         dvbdmxfeed->buffer_size=circular_buffer_size;
 782         dvbdmxfeed->descramble=descramble;
 783         if (dvbdmxfeed->descramble) {
 784                 up(&dvbdmx->mutex);
 785                 return -ENOSYS;
 786         }
 787
 788         dvbdmxfeed->feed.sec.check_crc=check_crc;
 789 #ifdef NOBUFS
 790         dvbdmxfeed->buffer=0;
 791 #else
 792         dvbdmxfeed->buffer=vmalloc(dvbdmxfeed->buffer_size);
 793         if (!dvbdmxfeed->buffer) {
 794                 up(&dvbdmx->mutex);
 795                 return -ENOMEM;
 796         }
 797 #endif
 798         dvbdmxfeed->state=DMX_STATE_READY;
 799         up(&dvbdmx->mutex);
 800         return 0;
 801 }
 802
 803 static void prepare_secfilters(struct dvb_demux_feed *dvbdmxfeed)
 804 {
 805         int i;
 806         struct dvb_demux_filter *f;
 807         struct dmx_section_filter *sf;
 808         u8 mask, mode, doneq;
 809
 810         if (!(f=dvbdmxfeed->filter))
 811                 return;
 812         do {
 813                 sf=&f->filter;
 814                 doneq=0;
 815                 for (i=0; i<DVB_DEMUX_MASK_MAX; i++) {
 816                         mode=sf->filter_mode[i];
 817                         mask=sf->filter_mask[i];
 818                         f->maskandmode[i]=mask&mode;
 819                         doneq|=f->maskandnotmode[i]=mask&~mode;
 820                 }
 821                 f->doneq=doneq ? 1 : 0;
 822         } while ((f=f->next));
 823 }
 824
 825
 826 static int dmx_section_feed_start_filtering(struct dmx_section_feed *feed)
 827 {
 828         struct dvb_demux_feed *dvbdmxfeed=(struct dvb_demux_feed *) feed;
 829         struct dvb_demux *dvbdmx=dvbdmxfeed->demux;
 830         int ret;
 831
 832         if (down_interruptible (&dvbdmx->mutex))
 833                 return -ERESTARTSYS;
 834
 835         if (feed->is_filtering) {
 836                 up(&dvbdmx->mutex);
 837                 return -EBUSY;
 838         }
 839         if (!dvbdmxfeed->filter) {
 840                 up(&dvbdmx->mutex);
 841                 return -EINVAL;
 842         }
 843         dvbdmxfeed->feed.sec.secbufp=0;
 844         dvbdmxfeed->feed.sec.seclen=0;
 845
 846         if (!dvbdmx->start_feed) {
 847                 up(&dvbdmx->mutex);
 848                 return -ENODEV;
 849         }
 850
 851         prepare_secfilters(dvbdmxfeed);
 852
 853         if ((ret = dvbdmx->start_feed(dvbdmxfeed)) < 0) {
 854                 up(&dvbdmx->mutex);
 855                 return ret;
 856         }
 857
 858         spin_lock_irq(&dvbdmx->lock);
 859         feed->is_filtering=1;
 860         dvbdmxfeed->state=DMX_STATE_GO;
 861         spin_unlock_irq(&dvbdmx->lock);
 862         up(&dvbdmx->mutex);
 863         return 0;
 864 }
 865
 866
 867 static int dmx_section_feed_stop_filtering(struct dmx_section_feed* feed)
 868 {
 869         struct dvb_demux_feed *dvbdmxfeed=(struct dvb_demux_feed *) feed;
 870         struct dvb_demux *dvbdmx=dvbdmxfeed->demux;
 871         int ret;
 872
 873         if (down_interruptible (&dvbdmx->mutex))
 874                 return -ERESTARTSYS;
 875
 876         if (!dvbdmx->stop_feed) {
 877                 up(&dvbdmx->mutex);
 878                 return -ENODEV;
 879         }
 880         ret=dvbdmx->stop_feed(dvbdmxfeed);
 881         spin_lock_irq(&dvbdmx->lock);
 882         dvbdmxfeed->state=DMX_STATE_READY;
 883         feed->is_filtering=0;
 884         spin_unlock_irq(&dvbdmx->lock);
 885         up(&dvbdmx->mutex);
 886         return ret;
 887 }
 888
 889
 890 static int dmx_section_feed_release_filter(struct dmx_section_feed *feed,
 891                                 struct dmx_section_filter* filter)
 892 {
 893         struct dvb_demux_filter *dvbdmxfilter=(struct dvb_demux_filter *) filter, *f;
 894         struct dvb_demux_feed *dvbdmxfeed=(struct dvb_demux_feed *) feed;
 895         struct dvb_demux *dvbdmx=dvbdmxfeed->demux;
 896
 897         if (down_interruptible (&dvbdmx->mutex))
 898                 return -ERESTARTSYS;
 899
 900         if (dvbdmxfilter->feed!=dvbdmxfeed) {
 901                 up(&dvbdmx->mutex);
 902                 return -EINVAL;
 903         }
 904         if (feed->is_filtering)
 905                 feed->stop_filtering(feed);
 906
 907         spin_lock_irq(&dvbdmx->lock);
 908         f=dvbdmxfeed->filter;
 909
 910         if (f == dvbdmxfilter) {
 911                 dvbdmxfeed->filter=dvbdmxfilter->next;
 912         } else {
 913                 while(f->next!=dvbdmxfilter)
 914                         f=f->next;
 915                 f->next=f->next->next;
 916         }
 917         dvbdmxfilter->state=DMX_STATE_FREE;
 918         spin_unlock_irq(&dvbdmx->lock);
 919         up(&dvbdmx->mutex);
 920         return 0;
 921 }
 922
 923 static int dvbdmx_allocate_section_feed(struct dmx_demux *demux,
 924                                         struct dmx_section_feed **feed,
 925                                         dmx_section_cb callback)
 926 {
 927         struct dvb_demux *dvbdmx=(struct dvb_demux *) demux;
 928         struct dvb_demux_feed *dvbdmxfeed;
 929
 930         if (down_interruptible (&dvbdmx->mutex))
 931                 return -ERESTARTSYS;
 932
 933         if (!(dvbdmxfeed=dvb_dmx_feed_alloc(dvbdmx))) {
 934                 up(&dvbdmx->mutex);
 935                 return -EBUSY;
 936         }
 937         dvbdmxfeed->type=DMX_TYPE_SEC;
 938         dvbdmxfeed->cb.sec=callback;
 939         dvbdmxfeed->demux=dvbdmx;
 940         dvbdmxfeed->pid=0xffff;
 941         dvbdmxfeed->feed.sec.secbufp=0;
 942         dvbdmxfeed->filter=0;
 943         dvbdmxfeed->buffer=0;
 944
 945         (*feed)=&dvbdmxfeed->feed.sec;
 946         (*feed)->is_filtering=0;
 947         (*feed)->parent=demux;
 948         (*feed)->priv=0;
 949
 950         (*feed)->set=dmx_section_feed_set;
 951         (*feed)->allocate_filter=dmx_section_feed_allocate_filter;
 952         (*feed)->start_filtering=dmx_section_feed_start_filtering;
 953         (*feed)->stop_filtering=dmx_section_feed_stop_filtering;
 954         (*feed)->release_filter = dmx_section_feed_release_filter;
 955
 956         up(&dvbdmx->mutex);
 957         return 0;
 958 }
 959
 960 static int dvbdmx_release_section_feed(struct dmx_demux *demux,
 961                                        struct dmx_section_feed *feed)
 962 {
 963         struct dvb_demux_feed *dvbdmxfeed=(struct dvb_demux_feed *) feed;
 964         struct dvb_demux *dvbdmx=(struct dvb_demux *) demux;
 965         struct list_head *pos, *n, *head=&dvbdmx->feed_list;
 966
 967         if (down_interruptible (&dvbdmx->mutex))
 968                 return -ERESTARTSYS;
 969
 970         if (dvbdmxfeed->state==DMX_STATE_FREE) {
 971                 up(&dvbdmx->mutex);
 972                 return -EINVAL;
 973         }
 974 #ifndef NOBUFS
 975         if (dvbdmxfeed->buffer) {
 976                 vfree(dvbdmxfeed->buffer);
 977                 dvbdmxfeed->buffer=0;
 978         }
 979 #endif
 980         dvbdmxfeed->state=DMX_STATE_FREE;
 981
 982         if (dvbdmxfeed->pid <= DMX_MAX_PID) {
 983                 list_for_each_safe(pos, n, head) {
 984                         if (DMX_FEED_ENTRY(pos)->pid == dvbdmxfeed->pid) {
 985                                 list_del(pos);
 986                                 break;
 987                         }
 988                 }
 989                 dvbdmxfeed->pid = 0xffff;
 990         }
 991
 992         up(&dvbdmx->mutex);
 993         return 0;
 994 }
 995
 996
 997 /******************************************************************************
 998  * dvb_demux kernel data API calls
 999  ******************************************************************************/
1000
1001 static int dvbdmx_open(struct dmx_demux *demux)
1002 {
1003         struct dvb_demux *dvbdemux=(struct dvb_demux *) demux;
1004
1005         if (dvbdemux->users>=MAX_DVB_DEMUX_USERS)
1006                 return -EUSERS;
1007         dvbdemux->users++;
1008         return 0;
1009 }
1010
1011
1012 static int dvbdmx_close(struct dmx_demux *demux)
1013 {
1014         struct dvb_demux *dvbdemux=(struct dvb_demux *) demux;
1015
1016         if (dvbdemux->users==0)
1017                 return -ENODEV;
1018         dvbdemux->users--;
1019         //FIXME: release any unneeded resources if users==0
1020         return 0;
1021 }
1022
1023
1024 static int dvbdmx_write(struct dmx_demux *demux, const char *buf, size_t count)
1025 {
1026         struct dvb_demux *dvbdemux=(struct dvb_demux *) demux;
1027
1028         if ((!demux->frontend) || (demux->frontend->source != DMX_MEMORY_FE))
1029                 return -EINVAL;
1030
1031         if (down_interruptible (&dvbdemux->mutex))
1032                 return -ERESTARTSYS;
1033
1034         dvb_dmx_swfilter(dvbdemux, buf, count);
1035         up(&dvbdemux->mutex);
1036         return count;
1037 }
1038
1039
1040 static int dvbdmx_add_frontend(struct dmx_demux *demux, struct dmx_frontend *frontend)
1041 {
1042         struct dvb_demux *dvbdemux=(struct dvb_demux *) demux;
1043         struct list_head *head = &dvbdemux->frontend_list;
1044
1045         list_add(&(frontend->connectivity_list), head);
1046
1047         return 0;
1048 }
1049
1050
1051 static int dvbdmx_remove_frontend(struct dmx_demux *demux, struct dmx_frontend *frontend)
1052 {
1053         struct dvb_demux *dvbdemux=(struct dvb_demux *) demux;
1054         struct list_head *pos, *n, *head=&dvbdemux->frontend_list;
1055
1056         list_for_each_safe (pos, n, head) {
1057                 if (DMX_FE_ENTRY(pos) == frontend) {
1058                         list_del(pos);
1059                         return 0;
1060                 }
1061         }
1062         return -ENODEV;
1063 }
1064
1065
1066 static struct list_head * dvbdmx_get_frontends(struct dmx_demux *demux)
1067 {
1068         struct dvb_demux *dvbdemux=(struct dvb_demux *) demux;
1069
1070         if (list_empty(&dvbdemux->frontend_list))
1071                 return NULL;
1072         return &dvbdemux->frontend_list;
1073 }
1074
1075
1076 int dvbdmx_connect_frontend(struct dmx_demux *demux, struct dmx_frontend *frontend)
1077 {
1078         struct dvb_demux *dvbdemux=(struct dvb_demux *) demux;
1079
1080         if (demux->frontend)
1081                 return -EINVAL;
1082
1083         if (down_interruptible (&dvbdemux->mutex))
1084                 return -ERESTARTSYS;
1085
1086         demux->frontend=frontend;
1087         up(&dvbdemux->mutex);
1088         return 0;
1089 }
1090
1091
1092 int dvbdmx_disconnect_frontend(struct dmx_demux *demux)
1093 {
1094         struct dvb_demux *dvbdemux=(struct dvb_demux *) demux;
1095
1096         if (down_interruptible (&dvbdemux->mutex))
1097                 return -ERESTARTSYS;
1098
1099         demux->frontend=NULL;
1100         up(&dvbdemux->mutex);
1101         return 0;
1102 }
1103
1104
1105 static int dvbdmx_get_pes_pids(struct dmx_demux *demux, u16 *pids)
1106 {
1107         struct dvb_demux *dvbdemux=(struct dvb_demux *) demux;
1108
1109         memcpy(pids, dvbdemux->pids, 5*sizeof(u16));
1110         return 0;
1111 }
1112
1113 int
1114 dvb_dmx_init(struct dvb_demux *dvbdemux)
1115 {
1116         int i, err;
1117         struct dmx_demux *dmx = &dvbdemux->dmx;
1118
1119         dvbdemux->users=0;
1120         dvbdemux->filter=vmalloc(dvbdemux->filternum*sizeof(struct dvb_demux_filter));
1121         if (!dvbdemux->filter)
1122                 return -ENOMEM;
1123
1124         dvbdemux->feed=vmalloc(dvbdemux->feednum*sizeof(struct dvb_demux_feed));
1125         if (!dvbdemux->feed) {
1126                 vfree(dvbdemux->filter);
1127                 return -ENOMEM;
1128         }
1129         for (i=0; i<dvbdemux->filternum; i++) {
1130                 dvbdemux->filter[i].state=DMX_STATE_FREE;
1131                 dvbdemux->filter[i].index=i;
1132         }
1133         for (i=0; i<dvbdemux->feednum; i++)
1134                 dvbdemux->feed[i].state=DMX_STATE_FREE;
1135         dvbdemux->frontend_list.next=
1136           dvbdemux->frontend_list.prev=
1137             &dvbdemux->frontend_list;
1138         for (i=0; i<DMX_TS_PES_OTHER; i++) {
1139                 dvbdemux->pesfilter[i]=NULL;
1140                 dvbdemux->pids[i]=0xffff;
1141         }
1142
1143         INIT_LIST_HEAD(&dvbdemux->feed_list);
1144
1145         dvbdemux->playing = 0;
1146         dvbdemux->recording = 0;
1147         dvbdemux->tsbufp=0;
1148
1149         if (!dvbdemux->check_crc32)
1150                 dvbdemux->check_crc32 = dvb_dmx_crc32;
1151
1152          if (!dvbdemux->memcopy)
1153                  dvbdemux->memcopy = dvb_dmx_memcopy;
1154
1155         dmx->frontend=0;
1156         dmx->reg_list.prev = dmx->reg_list.next = &dmx->reg_list;
1157         dmx->priv=(void *) dvbdemux;
1158         dmx->open=dvbdmx_open;
1159         dmx->close=dvbdmx_close;
1160         dmx->write=dvbdmx_write;
1161         dmx->allocate_ts_feed=dvbdmx_allocate_ts_feed;
1162         dmx->release_ts_feed=dvbdmx_release_ts_feed;
1163         dmx->allocate_section_feed=dvbdmx_allocate_section_feed;
1164         dmx->release_section_feed=dvbdmx_release_section_feed;
1165
1166         dmx->descramble_mac_address=NULL;
1167         dmx->descramble_section_payload=NULL;
1168
1169         dmx->add_frontend=dvbdmx_add_frontend;
1170         dmx->remove_frontend=dvbdmx_remove_frontend;
1171         dmx->get_frontends=dvbdmx_get_frontends;
1172         dmx->connect_frontend=dvbdmx_connect_frontend;
1173         dmx->disconnect_frontend=dvbdmx_disconnect_frontend;
1174         dmx->get_pes_pids=dvbdmx_get_pes_pids;
1175         sema_init(&dvbdemux->mutex, 1);
1176         spin_lock_init(&dvbdemux->lock);
1177
1178         if ((err = dmx_register_demux(dmx)) < 0)
1179                 return err;
1180
1181         return 0;
1182 }
1183
1184 int
1185 dvb_dmx_release(struct dvb_demux *dvbdemux)
1186 {
1187         struct dmx_demux *dmx = &dvbdemux->dmx;
1188
1189         dmx_unregister_demux(dmx);
1190         if (dvbdemux->filter)
1191                 vfree(dvbdemux->filter);
1192         if (dvbdemux->feed)
1193                 vfree(dvbdemux->feed);
1194         return 0;
1195 }