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