drivers/media/dvb-core/dvb_ca_en50221.c

   1 // SPDX-License-Identifier: GPL-2.0-or-later
   2 /*
   3  * dvb_ca.c: generic DVB functions for EN50221 CAM interfaces
   4  *
   5  * Copyright (C) 2004 Andrew de Quincey
   6  *
   7  * Parts of this file were based on sources as follows:
   8  *
   9  * Copyright (C) 2003 Ralph Metzler <[email protected]>
  10  *
  11  * based on code:
  12  *
  13  * Copyright (C) 1999-2002 Ralph  Metzler
  14  *                       & Marcus Metzler for convergence integrated media GmbH
  15  */
  16
  17 #define pr_fmt(fmt) "dvb_ca_en50221: " fmt
  18
  19 #include <linux/errno.h>
  20 #include <linux/slab.h>
  21 #include <linux/list.h>
  22 #include <linux/module.h>
  23 #include <linux/nospec.h>
  24 #include <linux/vmalloc.h>
  25 #include <linux/delay.h>
  26 #include <linux/spinlock.h>
  27 #include <linux/sched/signal.h>
  28 #include <linux/kthread.h>
  29
  30 #include <media/dvb_ca_en50221.h>
  31 #include <media/dvb_ringbuffer.h>
  32
  33 static int dvb_ca_en50221_debug;
  34
  35 module_param_named(cam_debug, dvb_ca_en50221_debug, int, 0644);
  36 MODULE_PARM_DESC(cam_debug, "enable verbose debug messages");
  37
  38 #define dprintk(fmt, arg...) do {                                       \
  39         if (dvb_ca_en50221_debug)                                       \
  40                 printk(KERN_DEBUG pr_fmt("%s: " fmt), __func__, ##arg);\
  41 } while (0)
  42
  43 #define INIT_TIMEOUT_SECS 10
  44
  45 #define HOST_LINK_BUF_SIZE 0x200
  46
  47 #define RX_BUFFER_SIZE 65535
  48
  49 #define MAX_RX_PACKETS_PER_ITERATION 10
  50
  51 #define CTRLIF_DATA      0
  52 #define CTRLIF_COMMAND   1
  53 #define CTRLIF_STATUS    1
  54 #define CTRLIF_SIZE_LOW  2
  55 #define CTRLIF_SIZE_HIGH 3
  56
  57 #define CMDREG_HC        1      /* Host control */
  58 #define CMDREG_SW        2      /* Size write */
  59 #define CMDREG_SR        4      /* Size read */
  60 #define CMDREG_RS        8      /* Reset interface */
  61 #define CMDREG_FRIE   0x40      /* Enable FR interrupt */
  62 #define CMDREG_DAIE   0x80      /* Enable DA interrupt */
  63 #define IRQEN (CMDREG_DAIE)
  64
  65 #define STATUSREG_RE     1      /* read error */
  66 #define STATUSREG_WE     2      /* write error */
  67 #define STATUSREG_FR  0x40      /* module free */
  68 #define STATUSREG_DA  0x80      /* data available */
  69
  70 #define DVB_CA_SLOTSTATE_NONE           0
  71 #define DVB_CA_SLOTSTATE_UNINITIALISED  1
  72 #define DVB_CA_SLOTSTATE_RUNNING        2
  73 #define DVB_CA_SLOTSTATE_INVALID        3
  74 #define DVB_CA_SLOTSTATE_WAITREADY      4
  75 #define DVB_CA_SLOTSTATE_VALIDATE       5
  76 #define DVB_CA_SLOTSTATE_WAITFR         6
  77 #define DVB_CA_SLOTSTATE_LINKINIT       7
  78
  79 /* Information on a CA slot */
  80 struct dvb_ca_slot {
  81         /* current state of the CAM */
  82         int slot_state;
  83
  84         /* mutex used for serializing access to one CI slot */
  85         struct mutex slot_lock;
  86
  87         /* Number of CAMCHANGES that have occurred since last processing */
  88         atomic_t camchange_count;
  89
  90         /* Type of last CAMCHANGE */
  91         int camchange_type;
  92
  93         /* base address of CAM config */
  94         u32 config_base;
  95
  96         /* value to write into Config Control register */
  97         u8 config_option;
  98
  99         /* if 1, the CAM supports DA IRQs */
 100         u8 da_irq_supported:1;
 101
 102         /* size of the buffer to use when talking to the CAM */
 103         int link_buf_size;
 104
 105         /* buffer for incoming packets */
 106         struct dvb_ringbuffer rx_buffer;
 107
 108         /* timer used during various states of the slot */
 109         unsigned long timeout;
 110 };
 111
 112 /* Private CA-interface information */
 113 struct dvb_ca_private {
 114         struct kref refcount;
 115
 116         /* pointer back to the public data structure */
 117         struct dvb_ca_en50221 *pub;
 118
 119         /* the DVB device */
 120         struct dvb_device *dvbdev;
 121
 122         /* Flags describing the interface (DVB_CA_FLAG_*) */
 123         u32 flags;
 124
 125         /* number of slots supported by this CA interface */
 126         unsigned int slot_count;
 127
 128         /* information on each slot */
 129         struct dvb_ca_slot *slot_info;
 130
 131         /* wait queues for read() and write() operations */
 132         wait_queue_head_t wait_queue;
 133
 134         /* PID of the monitoring thread */
 135         struct task_struct *thread;
 136
 137         /* Flag indicating if the CA device is open */
 138         unsigned int open:1;
 139
 140         /* Flag indicating the thread should wake up now */
 141         unsigned int wakeup:1;
 142
 143         /* Delay the main thread should use */
 144         unsigned long delay;
 145
 146         /*
 147          * Slot to start looking for data to read from in the next user-space
 148          * read operation
 149          */
 150         int next_read_slot;
 151
 152         /* mutex serializing ioctls */
 153         struct mutex ioctl_mutex;
 154 };
 155
 156 static void dvb_ca_private_free(struct dvb_ca_private *ca)
 157 {
 158         unsigned int i;
 159
 160         dvb_free_device(ca->dvbdev);
 161         for (i = 0; i < ca->slot_count; i++)
 162                 vfree(ca->slot_info[i].rx_buffer.data);
 163
 164         kfree(ca->slot_info);
 165         kfree(ca);
 166 }
 167
 168 static void dvb_ca_private_release(struct kref *ref)
 169 {
 170         struct dvb_ca_private *ca;
 171
 172         ca = container_of(ref, struct dvb_ca_private, refcount);
 173         dvb_ca_private_free(ca);
 174 }
 175
 176 static void dvb_ca_private_get(struct dvb_ca_private *ca)
 177 {
 178         kref_get(&ca->refcount);
 179 }
 180
 181 static void dvb_ca_private_put(struct dvb_ca_private *ca)
 182 {
 183         kref_put(&ca->refcount, dvb_ca_private_release);
 184 }
 185
 186 static void dvb_ca_en50221_thread_wakeup(struct dvb_ca_private *ca);
 187 static int dvb_ca_en50221_read_data(struct dvb_ca_private *ca, int slot,
 188                                     u8 *ebuf, int ecount);
 189 static int dvb_ca_en50221_write_data(struct dvb_ca_private *ca, int slot,
 190                                      u8 *ebuf, int ecount);
 191
 192 /**
 193  * Safely find needle in haystack.
 194  *
 195  * @haystack: Buffer to look in.
 196  * @hlen: Number of bytes in haystack.
 197  * @needle: Buffer to find.
 198  * @nlen: Number of bytes in needle.
 199  * return: Pointer into haystack needle was found at, or NULL if not found.
 200  */
 201 static char *findstr(char *haystack, int hlen, char *needle, int nlen)
 202 {
 203         int i;
 204
 205         if (hlen < nlen)
 206                 return NULL;
 207
 208         for (i = 0; i <= hlen - nlen; i++) {
 209                 if (!strncmp(haystack + i, needle, nlen))
 210                         return haystack + i;
 211         }
 212
 213         return NULL;
 214 }
 215
 216 /* ************************************************************************** */
 217 /* EN50221 physical interface functions */
 218
 219 /*
 220  * dvb_ca_en50221_check_camstatus - Check CAM status.
 221  */
 222 static int dvb_ca_en50221_check_camstatus(struct dvb_ca_private *ca, int slot)
 223 {
 224         struct dvb_ca_slot *sl = &ca->slot_info[slot];
 225         int slot_status;
 226         int cam_present_now;
 227         int cam_changed;
 228
 229         /* IRQ mode */
 230         if (ca->flags & DVB_CA_EN50221_FLAG_IRQ_CAMCHANGE)
 231                 return (atomic_read(&sl->camchange_count) != 0);
 232
 233         /* poll mode */
 234         slot_status = ca->pub->poll_slot_status(ca->pub, slot, ca->open);
 235
 236         cam_present_now = (slot_status & DVB_CA_EN50221_POLL_CAM_PRESENT) ? 1 : 0;
 237         cam_changed = (slot_status & DVB_CA_EN50221_POLL_CAM_CHANGED) ? 1 : 0;
 238         if (!cam_changed) {
 239                 int cam_present_old = (sl->slot_state != DVB_CA_SLOTSTATE_NONE);
 240
 241                 cam_changed = (cam_present_now != cam_present_old);
 242         }
 243
 244         if (cam_changed) {
 245                 if (!cam_present_now)
 246                         sl->camchange_type = DVB_CA_EN50221_CAMCHANGE_REMOVED;
 247                 else
 248                         sl->camchange_type = DVB_CA_EN50221_CAMCHANGE_INSERTED;
 249                 atomic_set(&sl->camchange_count, 1);
 250         } else {
 251                 if ((sl->slot_state == DVB_CA_SLOTSTATE_WAITREADY) &&
 252                     (slot_status & DVB_CA_EN50221_POLL_CAM_READY)) {
 253                         /* move to validate state if reset is completed */
 254                         sl->slot_state = DVB_CA_SLOTSTATE_VALIDATE;
 255                 }
 256         }
 257
 258         return cam_changed;
 259 }
 260
 261 /**
 262  * dvb_ca_en50221_wait_if_status - Wait for flags to become set on the STATUS
 263  *       register on a CAM interface, checking for errors and timeout.
 264  *
 265  * @ca: CA instance.
 266  * @slot: Slot on interface.
 267  * @waitfor: Flags to wait for.
 268  * @timeout_hz: Timeout in milliseconds.
 269  *
 270  * return: 0 on success, nonzero on error.
 271  */
 272 static int dvb_ca_en50221_wait_if_status(struct dvb_ca_private *ca, int slot,
 273                                          u8 waitfor, int timeout_hz)
 274 {
 275         unsigned long timeout;
 276         unsigned long start;
 277
 278         dprintk("%s\n", __func__);
 279
 280         /* loop until timeout elapsed */
 281         start = jiffies;
 282         timeout = jiffies + timeout_hz;
 283         while (1) {
 284                 int res;
 285
 286                 /* read the status and check for error */
 287                 res = ca->pub->read_cam_control(ca->pub, slot, CTRLIF_STATUS);
 288                 if (res < 0)
 289                         return -EIO;
 290
 291                 /* if we got the flags, it was successful! */
 292                 if (res & waitfor) {
 293                         dprintk("%s succeeded timeout:%lu\n",
 294                                 __func__, jiffies - start);
 295                         return 0;
 296                 }
 297
 298                 /* check for timeout */
 299                 if (time_after(jiffies, timeout))
 300                         break;
 301
 302                 /* wait for a bit */
 303                 usleep_range(1000, 1100);
 304         }
 305
 306         dprintk("%s failed timeout:%lu\n", __func__, jiffies - start);
 307
 308         /* if we get here, we've timed out */
 309         return -ETIMEDOUT;
 310 }
 311
 312 /**
 313  * dvb_ca_en50221_link_init - Initialise the link layer connection to a CAM.
 314  *
 315  * @ca: CA instance.
 316  * @slot: Slot id.
 317  *
 318  * return: 0 on success, nonzero on failure.
 319  */
 320 static int dvb_ca_en50221_link_init(struct dvb_ca_private *ca, int slot)
 321 {
 322         struct dvb_ca_slot *sl = &ca->slot_info[slot];
 323         int ret;
 324         int buf_size;
 325         u8 buf[2];
 326
 327         dprintk("%s\n", __func__);
 328
 329         /* we'll be determining these during this function */
 330         sl->da_irq_supported = 0;
 331
 332         /*
 333          * set the host link buffer size temporarily. it will be overwritten
 334          * with the real negotiated size later.
 335          */
 336         sl->link_buf_size = 2;
 337
 338         /* read the buffer size from the CAM */
 339         ret = ca->pub->write_cam_control(ca->pub, slot, CTRLIF_COMMAND,
 340                                          IRQEN | CMDREG_SR);
 341         if (ret)
 342                 return ret;
 343         ret = dvb_ca_en50221_wait_if_status(ca, slot, STATUSREG_DA, HZ);
 344         if (ret)
 345                 return ret;
 346         ret = dvb_ca_en50221_read_data(ca, slot, buf, 2);
 347         if (ret != 2)
 348                 return -EIO;
 349         ret = ca->pub->write_cam_control(ca->pub, slot, CTRLIF_COMMAND, IRQEN);
 350         if (ret)
 351                 return ret;
 352
 353         /*
 354          * store it, and choose the minimum of our buffer and the CAM's buffer
 355          * size
 356          */
 357         buf_size = (buf[0] << 8) | buf[1];
 358         if (buf_size > HOST_LINK_BUF_SIZE)
 359                 buf_size = HOST_LINK_BUF_SIZE;
 360         sl->link_buf_size = buf_size;
 361         buf[0] = buf_size >> 8;
 362         buf[1] = buf_size & 0xff;
 363         dprintk("Chosen link buffer size of %i\n", buf_size);
 364
 365         /* write the buffer size to the CAM */
 366         ret = ca->pub->write_cam_control(ca->pub, slot, CTRLIF_COMMAND,
 367                                          IRQEN | CMDREG_SW);
 368         if (ret)
 369                 return ret;
 370         ret = dvb_ca_en50221_wait_if_status(ca, slot, STATUSREG_FR, HZ / 10);
 371         if (ret)
 372                 return ret;
 373         ret = dvb_ca_en50221_write_data(ca, slot, buf, 2);
 374         if (ret != 2)
 375                 return -EIO;
 376         ret = ca->pub->write_cam_control(ca->pub, slot, CTRLIF_COMMAND, IRQEN);
 377         if (ret)
 378                 return ret;
 379
 380         /* success */
 381         return 0;
 382 }
 383
 384 /**
 385  * dvb_ca_en50221_read_tuple - Read a tuple from attribute memory.
 386  *
 387  * @ca: CA instance.
 388  * @slot: Slot id.
 389  * @address: Address to read from. Updated.
 390  * @tuple_type: Tuple id byte. Updated.
 391  * @tuple_length: Tuple length. Updated.
 392  * @tuple: Dest buffer for tuple (must be 256 bytes). Updated.
 393  *
 394  * return: 0 on success, nonzero on error.
 395  */
 396 static int dvb_ca_en50221_read_tuple(struct dvb_ca_private *ca, int slot,
 397                                      int *address, int *tuple_type,
 398                                      int *tuple_length, u8 *tuple)
 399 {
 400         int i;
 401         int _tuple_type;
 402         int _tuple_length;
 403         int _address = *address;
 404
 405         /* grab the next tuple length and type */
 406         _tuple_type = ca->pub->read_attribute_mem(ca->pub, slot, _address);
 407         if (_tuple_type < 0)
 408                 return _tuple_type;
 409         if (_tuple_type == 0xff) {
 410                 dprintk("END OF CHAIN TUPLE type:0x%x\n", _tuple_type);
 411                 *address += 2;
 412                 *tuple_type = _tuple_type;
 413                 *tuple_length = 0;
 414                 return 0;
 415         }
 416         _tuple_length = ca->pub->read_attribute_mem(ca->pub, slot,
 417                                                     _address + 2);
 418         if (_tuple_length < 0)
 419                 return _tuple_length;
 420         _address += 4;
 421
 422         dprintk("TUPLE type:0x%x length:%i\n", _tuple_type, _tuple_length);
 423
 424         /* read in the whole tuple */
 425         for (i = 0; i < _tuple_length; i++) {
 426                 tuple[i] = ca->pub->read_attribute_mem(ca->pub, slot,
 427                                                        _address + (i * 2));
 428                 dprintk("  0x%02x: 0x%02x %c\n",
 429                         i, tuple[i] & 0xff,
 430                         ((tuple[i] > 31) && (tuple[i] < 127)) ? tuple[i] : '.');
 431         }
 432         _address += (_tuple_length * 2);
 433
 434         /* success */
 435         *tuple_type = _tuple_type;
 436         *tuple_length = _tuple_length;
 437         *address = _address;
 438         return 0;
 439 }
 440
 441 /**
 442  * dvb_ca_en50221_parse_attributes - Parse attribute memory of a CAM module,
 443  *      extracting Config register, and checking it is a DVB CAM module.
 444  *
 445  * @ca: CA instance.
 446  * @slot: Slot id.
 447  *
 448  * return: 0 on success, <0 on failure.
 449  */
 450 static int dvb_ca_en50221_parse_attributes(struct dvb_ca_private *ca, int slot)
 451 {
 452         struct dvb_ca_slot *sl;
 453         int address = 0;
 454         int tuple_length;
 455         int tuple_type;
 456         u8 tuple[257];
 457         char *dvb_str;
 458         int rasz;
 459         int status;
 460         int got_cftableentry = 0;
 461         int end_chain = 0;
 462         int i;
 463         u16 manfid = 0;
 464         u16 devid = 0;
 465
 466         /* CISTPL_DEVICE_0A */
 467         status = dvb_ca_en50221_read_tuple(ca, slot, &address, &tuple_type,
 468                                            &tuple_length, tuple);
 469         if (status < 0)
 470                 return status;
 471         if (tuple_type != 0x1D)
 472                 return -EINVAL;
 473
 474         /* CISTPL_DEVICE_0C */
 475         status = dvb_ca_en50221_read_tuple(ca, slot, &address, &tuple_type,
 476                                            &tuple_length, tuple);
 477         if (status < 0)
 478                 return status;
 479         if (tuple_type != 0x1C)
 480                 return -EINVAL;
 481
 482         /* CISTPL_VERS_1 */
 483         status = dvb_ca_en50221_read_tuple(ca, slot, &address, &tuple_type,
 484                                            &tuple_length, tuple);
 485         if (status < 0)
 486                 return status;
 487         if (tuple_type != 0x15)
 488                 return -EINVAL;
 489
 490         /* CISTPL_MANFID */
 491         status = dvb_ca_en50221_read_tuple(ca, slot, &address, &tuple_type,
 492                                            &tuple_length, tuple);
 493         if (status < 0)
 494                 return status;
 495         if (tuple_type != 0x20)
 496                 return -EINVAL;
 497         if (tuple_length != 4)
 498                 return -EINVAL;
 499         manfid = (tuple[1] << 8) | tuple[0];
 500         devid = (tuple[3] << 8) | tuple[2];
 501
 502         /* CISTPL_CONFIG */
 503         status = dvb_ca_en50221_read_tuple(ca, slot, &address, &tuple_type,
 504                                            &tuple_length, tuple);
 505         if (status < 0)
 506                 return status;
 507         if (tuple_type != 0x1A)
 508                 return -EINVAL;
 509         if (tuple_length < 3)
 510                 return -EINVAL;
 511
 512         /* extract the configbase */
 513         rasz = tuple[0] & 3;
 514         if (tuple_length < (3 + rasz + 14))
 515                 return -EINVAL;
 516         sl = &ca->slot_info[slot];
 517         sl->config_base = 0;
 518         for (i = 0; i < rasz + 1; i++)
 519                 sl->config_base |= (tuple[2 + i] << (8 * i));
 520
 521         /* check it contains the correct DVB string */
 522         dvb_str = findstr((char *)tuple, tuple_length, "DVB_CI_V", 8);
 523         if (!dvb_str)
 524                 return -EINVAL;
 525         if (tuple_length < ((dvb_str - (char *)tuple) + 12))
 526                 return -EINVAL;
 527
 528         /* is it a version we support? */
 529         if (strncmp(dvb_str + 8, "1.00", 4)) {
 530                 pr_err("dvb_ca adapter %d: Unsupported DVB CAM module version %c%c%c%c\n",
 531                        ca->dvbdev->adapter->num, dvb_str[8], dvb_str[9],
 532                        dvb_str[10], dvb_str[11]);
 533                 return -EINVAL;
 534         }
 535
 536         /* process the CFTABLE_ENTRY tuples, and any after those */
 537         while ((!end_chain) && (address < 0x1000)) {
 538                 status = dvb_ca_en50221_read_tuple(ca, slot, &address,
 539                                                    &tuple_type, &tuple_length,
 540                                                    tuple);
 541                 if (status < 0)
 542                         return status;
 543                 switch (tuple_type) {
 544                 case 0x1B:      /* CISTPL_CFTABLE_ENTRY */
 545                         if (tuple_length < (2 + 11 + 17))
 546                                 break;
 547
 548                         /* if we've already parsed one, just use it */
 549                         if (got_cftableentry)
 550                                 break;
 551
 552                         /* get the config option */
 553                         sl->config_option = tuple[0] & 0x3f;
 554
 555                         /* OK, check it contains the correct strings */
 556                         if (!findstr((char *)tuple, tuple_length,
 557                                      "DVB_HOST", 8) ||
 558                             !findstr((char *)tuple, tuple_length,
 559                                      "DVB_CI_MODULE", 13))
 560                                 break;
 561
 562                         got_cftableentry = 1;
 563                         break;
 564
 565                 case 0x14:      /* CISTPL_NO_LINK */
 566                         break;
 567
 568                 case 0xFF:      /* CISTPL_END */
 569                         end_chain = 1;
 570                         break;
 571
 572                 default:        /* Unknown tuple type - just skip this tuple */
 573                         dprintk("dvb_ca: Skipping unknown tuple type:0x%x length:0x%x\n",
 574                                 tuple_type, tuple_length);
 575                         break;
 576                 }
 577         }
 578
 579         if ((address > 0x1000) || (!got_cftableentry))
 580                 return -EINVAL;
 581
 582         dprintk("Valid DVB CAM detected MANID:%x DEVID:%x CONFIGBASE:0x%x CONFIGOPTION:0x%x\n",
 583                 manfid, devid, sl->config_base, sl->config_option);
 584
 585         /* success! */
 586         return 0;
 587 }
 588
 589 /**
 590  * dvb_ca_en50221_set_configoption - Set CAM's configoption correctly.
 591  *
 592  * @ca: CA instance.
 593  * @slot: Slot containing the CAM.
 594  */
 595 static int dvb_ca_en50221_set_configoption(struct dvb_ca_private *ca, int slot)
 596 {
 597         struct dvb_ca_slot *sl = &ca->slot_info[slot];
 598         int configoption;
 599
 600         dprintk("%s\n", __func__);
 601
 602         /* set the config option */
 603         ca->pub->write_attribute_mem(ca->pub, slot, sl->config_base,
 604                                      sl->config_option);
 605
 606         /* check it */
 607         configoption = ca->pub->read_attribute_mem(ca->pub, slot,
 608                                                    sl->config_base);
 609         dprintk("Set configoption 0x%x, read configoption 0x%x\n",
 610                 sl->config_option, configoption & 0x3f);
 611
 612         /* fine! */
 613         return 0;
 614 }
 615
 616 /**
 617  * dvb_ca_en50221_read_data - This function talks to an EN50221 CAM control
 618  *      interface. It reads a buffer of data from the CAM. The data can either
 619  *      be stored in a supplied buffer, or automatically be added to the slot's
 620  *      rx_buffer.
 621  *
 622  * @ca: CA instance.
 623  * @slot: Slot to read from.
 624  * @ebuf: If non-NULL, the data will be written to this buffer. If NULL,
 625  *        the data will be added into the buffering system as a normal
 626  *        fragment.
 627  * @ecount: Size of ebuf. Ignored if ebuf is NULL.
 628  *
 629  * return: Number of bytes read, or < 0 on error
 630  */
 631 static int dvb_ca_en50221_read_data(struct dvb_ca_private *ca, int slot,
 632                                     u8 *ebuf, int ecount)
 633 {
 634         struct dvb_ca_slot *sl = &ca->slot_info[slot];
 635         int bytes_read;
 636         int status;
 637         u8 buf[HOST_LINK_BUF_SIZE];
 638         int i;
 639
 640         dprintk("%s\n", __func__);
 641
 642         /* check if we have space for a link buf in the rx_buffer */
 643         if (!ebuf) {
 644                 int buf_free;
 645
 646                 if (!sl->rx_buffer.data) {
 647                         status = -EIO;
 648                         goto exit;
 649                 }
 650                 buf_free = dvb_ringbuffer_free(&sl->rx_buffer);
 651
 652                 if (buf_free < (sl->link_buf_size +
 653                                 DVB_RINGBUFFER_PKTHDRSIZE)) {
 654                         status = -EAGAIN;
 655                         goto exit;
 656                 }
 657         }
 658
 659         if (ca->pub->read_data &&
 660             (sl->slot_state != DVB_CA_SLOTSTATE_LINKINIT)) {
 661                 if (!ebuf)
 662                         status = ca->pub->read_data(ca->pub, slot, buf,
 663                                                     sizeof(buf));
 664                 else
 665                         status = ca->pub->read_data(ca->pub, slot, buf, ecount);
 666                 if (status < 0)
 667                         return status;
 668                 bytes_read =  status;
 669                 if (status == 0)
 670                         goto exit;
 671         } else {
 672                 /* check if there is data available */
 673                 status = ca->pub->read_cam_control(ca->pub, slot,
 674                                                    CTRLIF_STATUS);
 675                 if (status < 0)
 676                         goto exit;
 677                 if (!(status & STATUSREG_DA)) {
 678                         /* no data */
 679                         status = 0;
 680                         goto exit;
 681                 }
 682
 683                 /* read the amount of data */
 684                 status = ca->pub->read_cam_control(ca->pub, slot,
 685                                                    CTRLIF_SIZE_HIGH);
 686                 if (status < 0)
 687                         goto exit;
 688                 bytes_read = status << 8;
 689                 status = ca->pub->read_cam_control(ca->pub, slot,
 690                                                    CTRLIF_SIZE_LOW);
 691                 if (status < 0)
 692                         goto exit;
 693                 bytes_read |= status;
 694
 695                 /* check it will fit */
 696                 if (!ebuf) {
 697                         if (bytes_read > sl->link_buf_size) {
 698                                 pr_err("dvb_ca adapter %d: CAM tried to send a buffer larger than the link buffer size (%i > %i)!\n",
 699                                        ca->dvbdev->adapter->num, bytes_read,
 700                                        sl->link_buf_size);
 701                                 sl->slot_state = DVB_CA_SLOTSTATE_LINKINIT;
 702                                 status = -EIO;
 703                                 goto exit;
 704                         }
 705                         if (bytes_read < 2) {
 706                                 pr_err("dvb_ca adapter %d: CAM sent a buffer that was less than 2 bytes!\n",
 707                                        ca->dvbdev->adapter->num);
 708                                 sl->slot_state = DVB_CA_SLOTSTATE_LINKINIT;
 709                                 status = -EIO;
 710                                 goto exit;
 711                         }
 712                 } else {
 713                         if (bytes_read > ecount) {
 714                                 pr_err("dvb_ca adapter %d: CAM tried to send a buffer larger than the ecount size!\n",
 715                                        ca->dvbdev->adapter->num);
 716                                 status = -EIO;
 717                                 goto exit;
 718                         }
 719                 }
 720
 721                 /* fill the buffer */
 722                 for (i = 0; i < bytes_read; i++) {
 723                         /* read byte and check */
 724                         status = ca->pub->read_cam_control(ca->pub, slot,
 725                                                            CTRLIF_DATA);
 726                         if (status < 0)
 727                                 goto exit;
 728
 729                         /* OK, store it in the buffer */
 730                         buf[i] = status;
 731                 }
 732
 733                 /* check for read error (RE should now be 0) */
 734                 status = ca->pub->read_cam_control(ca->pub, slot,
 735                                                    CTRLIF_STATUS);
 736                 if (status < 0)
 737                         goto exit;
 738                 if (status & STATUSREG_RE) {
 739                         sl->slot_state = DVB_CA_SLOTSTATE_LINKINIT;
 740                         status = -EIO;
 741                         goto exit;
 742                 }
 743         }
 744
 745         /*
 746          * OK, add it to the receive buffer, or copy into external buffer if
 747          * supplied
 748          */
 749         if (!ebuf) {
 750                 if (!sl->rx_buffer.data) {
 751                         status = -EIO;
 752                         goto exit;
 753                 }
 754                 dvb_ringbuffer_pkt_write(&sl->rx_buffer, buf, bytes_read);
 755         } else {
 756                 memcpy(ebuf, buf, bytes_read);
 757         }
 758
 759         dprintk("Received CA packet for slot %i connection id 0x%x last_frag:%i size:0x%x\n", slot,
 760                 buf[0], (buf[1] & 0x80) == 0, bytes_read);
 761
 762         /* wake up readers when a last_fragment is received */
 763         if ((buf[1] & 0x80) == 0x00)
 764                 wake_up_interruptible(&ca->wait_queue);
 765
 766         status = bytes_read;
 767
 768 exit:
 769         return status;
 770 }
 771
 772 /**
 773  * dvb_ca_en50221_write_data - This function talks to an EN50221 CAM control
 774  *                              interface. It writes a buffer of data to a CAM.
 775  *
 776  * @ca: CA instance.
 777  * @slot: Slot to write to.
 778  * @buf: The data in this buffer is treated as a complete link-level packet to
 779  *       be written.
 780  * @bytes_write: Size of ebuf.
 781  *
 782  * return: Number of bytes written, or < 0 on error.
 783  */
 784 static int dvb_ca_en50221_write_data(struct dvb_ca_private *ca, int slot,
 785                                      u8 *buf, int bytes_write)
 786 {
 787         struct dvb_ca_slot *sl = &ca->slot_info[slot];
 788         int status;
 789         int i;
 790
 791         dprintk("%s\n", __func__);
 792
 793         /* sanity check */
 794         if (bytes_write > sl->link_buf_size)
 795                 return -EINVAL;
 796
 797         if (ca->pub->write_data &&
 798             (sl->slot_state != DVB_CA_SLOTSTATE_LINKINIT))
 799                 return ca->pub->write_data(ca->pub, slot, buf, bytes_write);
 800
 801         /*
 802          * it is possible we are dealing with a single buffer implementation,
 803          * thus if there is data available for read or if there is even a read
 804          * already in progress, we do nothing but awake the kernel thread to
 805          * process the data if necessary.
 806          */
 807         status = ca->pub->read_cam_control(ca->pub, slot, CTRLIF_STATUS);
 808         if (status < 0)
 809                 goto exitnowrite;
 810         if (status & (STATUSREG_DA | STATUSREG_RE)) {
 811                 if (status & STATUSREG_DA)
 812                         dvb_ca_en50221_thread_wakeup(ca);
 813
 814                 status = -EAGAIN;
 815                 goto exitnowrite;
 816         }
 817
 818         /* OK, set HC bit */
 819         status = ca->pub->write_cam_control(ca->pub, slot, CTRLIF_COMMAND,
 820                                             IRQEN | CMDREG_HC);
 821         if (status)
 822                 goto exit;
 823
 824         /* check if interface is still free */
 825         status = ca->pub->read_cam_control(ca->pub, slot, CTRLIF_STATUS);
 826         if (status < 0)
 827                 goto exit;
 828         if (!(status & STATUSREG_FR)) {
 829                 /* it wasn't free => try again later */
 830                 status = -EAGAIN;
 831                 goto exit;
 832         }
 833
 834         /*
 835          * It may need some time for the CAM to settle down, or there might
 836          * be a race condition between the CAM, writing HC and our last
 837          * check for DA. This happens, if the CAM asserts DA, just after
 838          * checking DA before we are setting HC. In this case it might be
 839          * a bug in the CAM to keep the FR bit, the lower layer/HW
 840          * communication requires a longer timeout or the CAM needs more
 841          * time internally. But this happens in reality!
 842          * We need to read the status from the HW again and do the same
 843          * we did for the previous check for DA
 844          */
 845         status = ca->pub->read_cam_control(ca->pub, slot, CTRLIF_STATUS);
 846         if (status < 0)
 847                 goto exit;
 848
 849         if (status & (STATUSREG_DA | STATUSREG_RE)) {
 850                 if (status & STATUSREG_DA)
 851                         dvb_ca_en50221_thread_wakeup(ca);
 852
 853                 status = -EAGAIN;
 854                 goto exit;
 855         }
 856
 857         /* send the amount of data */
 858         status = ca->pub->write_cam_control(ca->pub, slot, CTRLIF_SIZE_HIGH,
 859                                             bytes_write >> 8);
 860         if (status)
 861                 goto exit;
 862         status = ca->pub->write_cam_control(ca->pub, slot, CTRLIF_SIZE_LOW,
 863                                             bytes_write & 0xff);
 864         if (status)
 865                 goto exit;
 866
 867         /* send the buffer */
 868         for (i = 0; i < bytes_write; i++) {
 869                 status = ca->pub->write_cam_control(ca->pub, slot, CTRLIF_DATA,
 870                                                     buf[i]);
 871                 if (status)
 872                         goto exit;
 873         }
 874
 875         /* check for write error (WE should now be 0) */
 876         status = ca->pub->read_cam_control(ca->pub, slot, CTRLIF_STATUS);
 877         if (status < 0)
 878                 goto exit;
 879         if (status & STATUSREG_WE) {
 880                 sl->slot_state = DVB_CA_SLOTSTATE_LINKINIT;
 881                 status = -EIO;
 882                 goto exit;
 883         }
 884         status = bytes_write;
 885
 886         dprintk("Wrote CA packet for slot %i, connection id 0x%x last_frag:%i size:0x%x\n", slot,
 887                 buf[0], (buf[1] & 0x80) == 0, bytes_write);
 888
 889 exit:
 890         ca->pub->write_cam_control(ca->pub, slot, CTRLIF_COMMAND, IRQEN);
 891
 892 exitnowrite:
 893         return status;
 894 }
 895
 896 /* ************************************************************************** */
 897 /* EN50221 higher level functions */
 898
 899 /**
 900  * dvb_ca_en50221_slot_shutdown - A CAM has been removed => shut it down.
 901  *
 902  * @ca: CA instance.
 903  * @slot: Slot to shut down.
 904  */
 905 static int dvb_ca_en50221_slot_shutdown(struct dvb_ca_private *ca, int slot)
 906 {
 907         dprintk("%s\n", __func__);
 908
 909         ca->pub->slot_shutdown(ca->pub, slot);
 910         ca->slot_info[slot].slot_state = DVB_CA_SLOTSTATE_NONE;
 911
 912         /*
 913          * need to wake up all processes to check if they're now trying to
 914          * write to a defunct CAM
 915          */
 916         wake_up_interruptible(&ca->wait_queue);
 917
 918         dprintk("Slot %i shutdown\n", slot);
 919
 920         /* success */
 921         return 0;
 922 }
 923
 924 /**
 925  * dvb_ca_en50221_camchange_irq - A CAMCHANGE IRQ has occurred.
 926  *
 927  * @pubca: CA instance.
 928  * @slot: Slot concerned.
 929  * @change_type: One of the DVB_CA_CAMCHANGE_* values.
 930  */
 931 void dvb_ca_en50221_camchange_irq(struct dvb_ca_en50221 *pubca, int slot,
 932                                   int change_type)
 933 {
 934         struct dvb_ca_private *ca = pubca->private;
 935         struct dvb_ca_slot *sl = &ca->slot_info[slot];
 936
 937         dprintk("CAMCHANGE IRQ slot:%i change_type:%i\n", slot, change_type);
 938
 939         switch (change_type) {
 940         case DVB_CA_EN50221_CAMCHANGE_REMOVED:
 941         case DVB_CA_EN50221_CAMCHANGE_INSERTED:
 942                 break;
 943
 944         default:
 945                 return;
 946         }
 947
 948         sl->camchange_type = change_type;
 949         atomic_inc(&sl->camchange_count);
 950         dvb_ca_en50221_thread_wakeup(ca);
 951 }
 952 EXPORT_SYMBOL(dvb_ca_en50221_camchange_irq);
 953
 954 /**
 955  * dvb_ca_en50221_camready_irq - A CAMREADY IRQ has occurred.
 956  *
 957  * @pubca: CA instance.
 958  * @slot: Slot concerned.
 959  */
 960 void dvb_ca_en50221_camready_irq(struct dvb_ca_en50221 *pubca, int slot)
 961 {
 962         struct dvb_ca_private *ca = pubca->private;
 963         struct dvb_ca_slot *sl = &ca->slot_info[slot];
 964
 965         dprintk("CAMREADY IRQ slot:%i\n", slot);
 966
 967         if (sl->slot_state == DVB_CA_SLOTSTATE_WAITREADY) {
 968                 sl->slot_state = DVB_CA_SLOTSTATE_VALIDATE;
 969                 dvb_ca_en50221_thread_wakeup(ca);
 970         }
 971 }
 972 EXPORT_SYMBOL(dvb_ca_en50221_camready_irq);
 973
 974 /**
 975  * dvb_ca_en50221_frda_irq - An FR or DA IRQ has occurred.
 976  *
 977  * @pubca: CA instance.
 978  * @slot: Slot concerned.
 979  */
 980 void dvb_ca_en50221_frda_irq(struct dvb_ca_en50221 *pubca, int slot)
 981 {
 982         struct dvb_ca_private *ca = pubca->private;
 983         struct dvb_ca_slot *sl = &ca->slot_info[slot];
 984         int flags;
 985
 986         dprintk("FR/DA IRQ slot:%i\n", slot);
 987
 988         switch (sl->slot_state) {
 989         case DVB_CA_SLOTSTATE_LINKINIT:
 990                 flags = ca->pub->read_cam_control(pubca, slot, CTRLIF_STATUS);
 991                 if (flags & STATUSREG_DA) {
 992                         dprintk("CAM supports DA IRQ\n");
 993                         sl->da_irq_supported = 1;
 994                 }
 995                 break;
 996
 997         case DVB_CA_SLOTSTATE_RUNNING:
 998                 if (ca->open)
 999                         dvb_ca_en50221_thread_wakeup(ca);
1000                 break;
1001         }
1002 }
1003 EXPORT_SYMBOL(dvb_ca_en50221_frda_irq);
1004
1005 /* ************************************************************************** */
1006 /* EN50221 thread functions */
1007
1008 /**
1009  * Wake up the DVB CA thread
1010  *
1011  * @ca: CA instance.
1012  */
1013 static void dvb_ca_en50221_thread_wakeup(struct dvb_ca_private *ca)
1014 {
1015         dprintk("%s\n", __func__);
1016
1017         ca->wakeup = 1;
1018         mb();
1019         wake_up_process(ca->thread);
1020 }
1021
1022 /**
1023  * Update the delay used by the thread.
1024  *
1025  * @ca: CA instance.
1026  */
1027 static void dvb_ca_en50221_thread_update_delay(struct dvb_ca_private *ca)
1028 {
1029         int delay;
1030         int curdelay = 100000000;
1031         int slot;
1032
1033         /*
1034          * Beware of too high polling frequency, because one polling
1035          * call might take several hundred milliseconds until timeout!
1036          */
1037         for (slot = 0; slot < ca->slot_count; slot++) {
1038                 struct dvb_ca_slot *sl = &ca->slot_info[slot];
1039
1040                 switch (sl->slot_state) {
1041                 default:
1042                 case DVB_CA_SLOTSTATE_NONE:
1043                         delay = HZ * 60;  /* 60s */
1044                         if (!(ca->flags & DVB_CA_EN50221_FLAG_IRQ_CAMCHANGE))
1045                                 delay = HZ * 5;  /* 5s */
1046                         break;
1047                 case DVB_CA_SLOTSTATE_INVALID:
1048                         delay = HZ * 60;  /* 60s */
1049                         if (!(ca->flags & DVB_CA_EN50221_FLAG_IRQ_CAMCHANGE))
1050                                 delay = HZ / 10;  /* 100ms */
1051                         break;
1052
1053                 case DVB_CA_SLOTSTATE_UNINITIALISED:
1054                 case DVB_CA_SLOTSTATE_WAITREADY:
1055                 case DVB_CA_SLOTSTATE_VALIDATE:
1056                 case DVB_CA_SLOTSTATE_WAITFR:
1057                 case DVB_CA_SLOTSTATE_LINKINIT:
1058                         delay = HZ / 10;  /* 100ms */
1059                         break;
1060
1061                 case DVB_CA_SLOTSTATE_RUNNING:
1062                         delay = HZ * 60;  /* 60s */
1063                         if (!(ca->flags & DVB_CA_EN50221_FLAG_IRQ_CAMCHANGE))
1064                                 delay = HZ / 10;  /* 100ms */
1065                         if (ca->open) {
1066                                 if ((!sl->da_irq_supported) ||
1067                                     (!(ca->flags & DVB_CA_EN50221_FLAG_IRQ_DA)))
1068                                         delay = HZ / 10;  /* 100ms */
1069                         }
1070                         break;
1071                 }
1072
1073                 if (delay < curdelay)
1074                         curdelay = delay;
1075         }
1076
1077         ca->delay = curdelay;
1078 }
1079
1080 /**
1081  * Poll if the CAM is gone.
1082  *
1083  * @ca: CA instance.
1084  * @slot: Slot to process.
1085  * return:: 0 .. no change
1086  *          1 .. CAM state changed
1087  */
1088
1089 static int dvb_ca_en50221_poll_cam_gone(struct dvb_ca_private *ca, int slot)
1090 {
1091         int changed = 0;
1092         int status;
1093
1094         /*
1095          * we need this extra check for annoying interfaces like the
1096          * budget-av
1097          */
1098         if ((!(ca->flags & DVB_CA_EN50221_FLAG_IRQ_CAMCHANGE)) &&
1099             (ca->pub->poll_slot_status)) {
1100                 status = ca->pub->poll_slot_status(ca->pub, slot, 0);
1101                 if (!(status &
1102                         DVB_CA_EN50221_POLL_CAM_PRESENT)) {
1103                         ca->slot_info[slot].slot_state = DVB_CA_SLOTSTATE_NONE;
1104                         dvb_ca_en50221_thread_update_delay(ca);
1105                         changed = 1;
1106                 }
1107         }
1108         return changed;
1109 }
1110
1111 /**
1112  * Thread state machine for one CA slot to perform the data transfer.
1113  *
1114  * @ca: CA instance.
1115  * @slot: Slot to process.
1116  */
1117 static void dvb_ca_en50221_thread_state_machine(struct dvb_ca_private *ca,
1118                                                 int slot)
1119 {
1120         struct dvb_ca_slot *sl = &ca->slot_info[slot];
1121         int flags;
1122         int pktcount;
1123         void *rxbuf;
1124
1125         mutex_lock(&sl->slot_lock);
1126
1127         /* check the cam status + deal with CAMCHANGEs */
1128         while (dvb_ca_en50221_check_camstatus(ca, slot)) {
1129                 /* clear down an old CI slot if necessary */
1130                 if (sl->slot_state != DVB_CA_SLOTSTATE_NONE)
1131                         dvb_ca_en50221_slot_shutdown(ca, slot);
1132
1133                 /* if a CAM is NOW present, initialise it */
1134                 if (sl->camchange_type == DVB_CA_EN50221_CAMCHANGE_INSERTED)
1135                         sl->slot_state = DVB_CA_SLOTSTATE_UNINITIALISED;
1136
1137                 /* we've handled one CAMCHANGE */
1138                 dvb_ca_en50221_thread_update_delay(ca);
1139                 atomic_dec(&sl->camchange_count);
1140         }
1141
1142         /* CAM state machine */
1143         switch (sl->slot_state) {
1144         case DVB_CA_SLOTSTATE_NONE:
1145         case DVB_CA_SLOTSTATE_INVALID:
1146                 /* no action needed */
1147                 break;
1148
1149         case DVB_CA_SLOTSTATE_UNINITIALISED:
1150                 sl->slot_state = DVB_CA_SLOTSTATE_WAITREADY;
1151                 ca->pub->slot_reset(ca->pub, slot);
1152                 sl->timeout = jiffies + (INIT_TIMEOUT_SECS * HZ);
1153                 break;
1154
1155         case DVB_CA_SLOTSTATE_WAITREADY:
1156                 if (time_after(jiffies, sl->timeout)) {
1157                         pr_err("dvb_ca adaptor %d: PC card did not respond :(\n",
1158                                ca->dvbdev->adapter->num);
1159                         sl->slot_state = DVB_CA_SLOTSTATE_INVALID;
1160                         dvb_ca_en50221_thread_update_delay(ca);
1161                         break;
1162                 }
1163                 /*
1164                  * no other action needed; will automatically change state when
1165                  * ready
1166                  */
1167                 break;
1168
1169         case DVB_CA_SLOTSTATE_VALIDATE:
1170                 if (dvb_ca_en50221_parse_attributes(ca, slot) != 0) {
1171                         if (dvb_ca_en50221_poll_cam_gone(ca, slot))
1172                                 break;
1173
1174                         pr_err("dvb_ca adapter %d: Invalid PC card inserted :(\n",
1175                                ca->dvbdev->adapter->num);
1176                         sl->slot_state = DVB_CA_SLOTSTATE_INVALID;
1177                         dvb_ca_en50221_thread_update_delay(ca);
1178                         break;
1179                 }
1180                 if (dvb_ca_en50221_set_configoption(ca, slot) != 0) {
1181                         pr_err("dvb_ca adapter %d: Unable to initialise CAM :(\n",
1182                                ca->dvbdev->adapter->num);
1183                         sl->slot_state = DVB_CA_SLOTSTATE_INVALID;
1184                         dvb_ca_en50221_thread_update_delay(ca);
1185                         break;
1186                 }
1187                 if (ca->pub->write_cam_control(ca->pub, slot,
1188                                                CTRLIF_COMMAND,
1189                                                CMDREG_RS) != 0) {
1190                         pr_err("dvb_ca adapter %d: Unable to reset CAM IF\n",
1191                                ca->dvbdev->adapter->num);
1192                         sl->slot_state = DVB_CA_SLOTSTATE_INVALID;
1193                         dvb_ca_en50221_thread_update_delay(ca);
1194                         break;
1195                 }
1196                 dprintk("DVB CAM validated successfully\n");
1197
1198                 sl->timeout = jiffies + (INIT_TIMEOUT_SECS * HZ);
1199                 sl->slot_state = DVB_CA_SLOTSTATE_WAITFR;
1200                 ca->wakeup = 1;
1201                 break;
1202
1203         case DVB_CA_SLOTSTATE_WAITFR:
1204                 if (time_after(jiffies, sl->timeout)) {
1205                         pr_err("dvb_ca adapter %d: DVB CAM did not respond :(\n",
1206                                ca->dvbdev->adapter->num);
1207                         sl->slot_state = DVB_CA_SLOTSTATE_INVALID;
1208                         dvb_ca_en50221_thread_update_delay(ca);
1209                         break;
1210                 }
1211
1212                 flags = ca->pub->read_cam_control(ca->pub, slot, CTRLIF_STATUS);
1213                 if (flags & STATUSREG_FR) {
1214                         sl->slot_state = DVB_CA_SLOTSTATE_LINKINIT;
1215                         ca->wakeup = 1;
1216                 }
1217                 break;
1218
1219         case DVB_CA_SLOTSTATE_LINKINIT:
1220                 if (dvb_ca_en50221_link_init(ca, slot) != 0) {
1221                         if (dvb_ca_en50221_poll_cam_gone(ca, slot))
1222                                 break;
1223
1224                         pr_err("dvb_ca adapter %d: DVB CAM link initialisation failed :(\n",
1225                                ca->dvbdev->adapter->num);
1226                         sl->slot_state = DVB_CA_SLOTSTATE_UNINITIALISED;
1227                         dvb_ca_en50221_thread_update_delay(ca);
1228                         break;
1229                 }
1230
1231                 if (!sl->rx_buffer.data) {
1232                         rxbuf = vmalloc(RX_BUFFER_SIZE);
1233                         if (!rxbuf) {
1234                                 pr_err("dvb_ca adapter %d: Unable to allocate CAM rx buffer :(\n",
1235                                        ca->dvbdev->adapter->num);
1236                                 sl->slot_state = DVB_CA_SLOTSTATE_INVALID;
1237                                 dvb_ca_en50221_thread_update_delay(ca);
1238                                 break;
1239                         }
1240                         dvb_ringbuffer_init(&sl->rx_buffer, rxbuf,
1241                                             RX_BUFFER_SIZE);
1242                 }
1243
1244                 ca->pub->slot_ts_enable(ca->pub, slot);
1245                 sl->slot_state = DVB_CA_SLOTSTATE_RUNNING;
1246                 dvb_ca_en50221_thread_update_delay(ca);
1247                 pr_info("dvb_ca adapter %d: DVB CAM detected and initialised successfully\n",
1248                         ca->dvbdev->adapter->num);
1249                 break;
1250
1251         case DVB_CA_SLOTSTATE_RUNNING:
1252                 if (!ca->open)
1253                         break;
1254
1255                 /* poll slots for data */
1256                 pktcount = 0;
1257                 while (dvb_ca_en50221_read_data(ca, slot, NULL, 0) > 0) {
1258                         if (!ca->open)
1259                                 break;
1260
1261                         /*
1262                          * if a CAMCHANGE occurred at some point, do not do any
1263                          * more processing of this slot
1264                          */
1265                         if (dvb_ca_en50221_check_camstatus(ca, slot)) {
1266                                 /*
1267                                  * we don't want to sleep on the next iteration
1268                                  * so we can handle the cam change
1269                                  */
1270                                 ca->wakeup = 1;
1271                                 break;
1272                         }
1273
1274                         /* check if we've hit our limit this time */
1275                         if (++pktcount >= MAX_RX_PACKETS_PER_ITERATION) {
1276                                 /*
1277                                  * don't sleep; there is likely to be more data
1278                                  * to read
1279                                  */
1280                                 ca->wakeup = 1;
1281                                 break;
1282                         }
1283                 }
1284                 break;
1285         }
1286
1287         mutex_unlock(&sl->slot_lock);
1288 }
1289
1290 /*
1291  * Kernel thread which monitors CA slots for CAM changes, and performs data
1292  * transfers.
1293  */
1294 static int dvb_ca_en50221_thread(void *data)
1295 {
1296         struct dvb_ca_private *ca = data;
1297         int slot;
1298
1299         dprintk("%s\n", __func__);
1300
1301         /* choose the correct initial delay */
1302         dvb_ca_en50221_thread_update_delay(ca);
1303
1304         /* main loop */
1305         while (!kthread_should_stop()) {
1306                 /* sleep for a bit */
1307                 if (!ca->wakeup) {
1308                         set_current_state(TASK_INTERRUPTIBLE);
1309                         schedule_timeout(ca->delay);
1310                         if (kthread_should_stop())
1311                                 return 0;
1312                 }
1313                 ca->wakeup = 0;
1314
1315                 /* go through all the slots processing them */
1316                 for (slot = 0; slot < ca->slot_count; slot++)
1317                         dvb_ca_en50221_thread_state_machine(ca, slot);
1318         }
1319
1320         return 0;
1321 }
1322
1323 /* ************************************************************************** */
1324 /* EN50221 IO interface functions */
1325
1326 /**
1327  * Real ioctl implementation.
1328  * NOTE: CA_SEND_MSG/CA_GET_MSG ioctls have userspace buffers passed to them.
1329  *
1330  * @file: File concerned.
1331  * @cmd: IOCTL command.
1332  * @parg: Associated argument.
1333  *
1334  * return: 0 on success, <0 on error.
1335  */
1336 static int dvb_ca_en50221_io_do_ioctl(struct file *file,
1337                                       unsigned int cmd, void *parg)
1338 {
1339         struct dvb_device *dvbdev = file->private_data;
1340         struct dvb_ca_private *ca = dvbdev->priv;
1341         int err = 0;
1342         int slot;
1343
1344         dprintk("%s\n", __func__);
1345
1346         if (mutex_lock_interruptible(&ca->ioctl_mutex))
1347                 return -ERESTARTSYS;
1348
1349         switch (cmd) {
1350         case CA_RESET:
1351                 for (slot = 0; slot < ca->slot_count; slot++) {
1352                         struct dvb_ca_slot *sl = &ca->slot_info[slot];
1353
1354                         mutex_lock(&sl->slot_lock);
1355                         if (sl->slot_state != DVB_CA_SLOTSTATE_NONE) {
1356                                 dvb_ca_en50221_slot_shutdown(ca, slot);
1357                                 if (ca->flags & DVB_CA_EN50221_FLAG_IRQ_CAMCHANGE)
1358                                         dvb_ca_en50221_camchange_irq(ca->pub,
1359                                                                      slot,
1360                                                                      DVB_CA_EN50221_CAMCHANGE_INSERTED);
1361                         }
1362                         mutex_unlock(&sl->slot_lock);
1363                 }
1364                 ca->next_read_slot = 0;
1365                 dvb_ca_en50221_thread_wakeup(ca);
1366                 break;
1367
1368         case CA_GET_CAP: {
1369                 struct ca_caps *caps = parg;
1370
1371                 caps->slot_num = ca->slot_count;
1372                 caps->slot_type = CA_CI_LINK;
1373                 caps->descr_num = 0;
1374                 caps->descr_type = 0;
1375                 break;
1376         }
1377
1378         case CA_GET_SLOT_INFO: {
1379                 struct ca_slot_info *info = parg;
1380                 struct dvb_ca_slot *sl;
1381
1382                 slot = info->num;
1383                 if ((slot >= ca->slot_count) || (slot < 0)) {
1384                         err = -EINVAL;
1385                         goto out_unlock;
1386                 }
1387
1388                 info->type = CA_CI_LINK;
1389                 info->flags = 0;
1390                 sl = &ca->slot_info[slot];
1391                 if ((sl->slot_state != DVB_CA_SLOTSTATE_NONE) &&
1392                     (sl->slot_state != DVB_CA_SLOTSTATE_INVALID)) {
1393                         info->flags = CA_CI_MODULE_PRESENT;
1394                 }
1395                 if (sl->slot_state == DVB_CA_SLOTSTATE_RUNNING)
1396                         info->flags |= CA_CI_MODULE_READY;
1397                 break;
1398         }
1399
1400         default:
1401                 err = -EINVAL;
1402                 break;
1403         }
1404
1405 out_unlock:
1406         mutex_unlock(&ca->ioctl_mutex);
1407         return err;
1408 }
1409
1410 /**
1411  * Wrapper for ioctl implementation.
1412  *
1413  * @file: File concerned.
1414  * @cmd: IOCTL command.
1415  * @arg: Associated argument.
1416  *
1417  * return: 0 on success, <0 on error.
1418  */
1419 static long dvb_ca_en50221_io_ioctl(struct file *file,
1420                                     unsigned int cmd, unsigned long arg)
1421 {
1422         return dvb_usercopy(file, cmd, arg, dvb_ca_en50221_io_do_ioctl);
1423 }
1424
1425 /**
1426  * Implementation of write() syscall.
1427  *
1428  * @file: File structure.
1429  * @buf: Source buffer.
1430  * @count: Size of source buffer.
1431  * @ppos: Position in file (ignored).
1432  *
1433  * return: Number of bytes read, or <0 on error.
1434  */
1435 static ssize_t dvb_ca_en50221_io_write(struct file *file,
1436                                        const char __user *buf, size_t count,
1437                                        loff_t *ppos)
1438 {
1439         struct dvb_device *dvbdev = file->private_data;
1440         struct dvb_ca_private *ca = dvbdev->priv;
1441         struct dvb_ca_slot *sl;
1442         u8 slot, connection_id;
1443         int status;
1444         u8 fragbuf[HOST_LINK_BUF_SIZE];
1445         int fragpos = 0;
1446         int fraglen;
1447         unsigned long timeout;
1448         int written;
1449
1450         dprintk("%s\n", __func__);
1451
1452         /*
1453          * Incoming packet has a 2 byte header.
1454          * hdr[0] = slot_id, hdr[1] = connection_id
1455          */
1456         if (count < 2)
1457                 return -EINVAL;
1458
1459         /* extract slot & connection id */
1460         if (copy_from_user(&slot, buf, 1))
1461                 return -EFAULT;
1462         if (copy_from_user(&connection_id, buf + 1, 1))
1463                 return -EFAULT;
1464         buf += 2;
1465         count -= 2;
1466
1467         if (slot >= ca->slot_count)
1468                 return -EINVAL;
1469         slot = array_index_nospec(slot, ca->slot_count);
1470         sl = &ca->slot_info[slot];
1471
1472         /* check if the slot is actually running */
1473         if (sl->slot_state != DVB_CA_SLOTSTATE_RUNNING)
1474                 return -EINVAL;
1475
1476         /* fragment the packets & store in the buffer */
1477         while (fragpos < count) {
1478                 fraglen = sl->link_buf_size - 2;
1479                 if (fraglen < 0)
1480                         break;
1481                 if (fraglen > HOST_LINK_BUF_SIZE - 2)
1482                         fraglen = HOST_LINK_BUF_SIZE - 2;
1483                 if ((count - fragpos) < fraglen)
1484                         fraglen = count - fragpos;
1485
1486                 fragbuf[0] = connection_id;
1487                 fragbuf[1] = ((fragpos + fraglen) < count) ? 0x80 : 0x00;
1488                 status = copy_from_user(fragbuf + 2, buf + fragpos, fraglen);
1489                 if (status) {
1490                         status = -EFAULT;
1491                         goto exit;
1492                 }
1493
1494                 timeout = jiffies + HZ / 2;
1495                 written = 0;
1496                 while (!time_after(jiffies, timeout)) {
1497                         /*
1498                          * check the CAM hasn't been removed/reset in the
1499                          * meantime
1500                          */
1501                         if (sl->slot_state != DVB_CA_SLOTSTATE_RUNNING) {
1502                                 status = -EIO;
1503                                 goto exit;
1504                         }
1505
1506                         mutex_lock(&sl->slot_lock);
1507                         status = dvb_ca_en50221_write_data(ca, slot, fragbuf,
1508                                                            fraglen + 2);
1509                         mutex_unlock(&sl->slot_lock);
1510                         if (status == (fraglen + 2)) {
1511                                 written = 1;
1512                                 break;
1513                         }
1514                         if (status != -EAGAIN)
1515                                 goto exit;
1516
1517                         usleep_range(1000, 1100);
1518                 }
1519                 if (!written) {
1520                         status = -EIO;
1521                         goto exit;
1522                 }
1523
1524                 fragpos += fraglen;
1525         }
1526         status = count + 2;
1527
1528 exit:
1529         return status;
1530 }
1531
1532 /*
1533  * Condition for waking up in dvb_ca_en50221_io_read_condition
1534  */
1535 static int dvb_ca_en50221_io_read_condition(struct dvb_ca_private *ca,
1536                                             int *result, int *_slot)
1537 {
1538         int slot;
1539         int slot_count = 0;
1540         int idx;
1541         size_t fraglen;
1542         int connection_id = -1;
1543         int found = 0;
1544         u8 hdr[2];
1545
1546         slot = ca->next_read_slot;
1547         while ((slot_count < ca->slot_count) && (!found)) {
1548                 struct dvb_ca_slot *sl = &ca->slot_info[slot];
1549
1550                 if (sl->slot_state != DVB_CA_SLOTSTATE_RUNNING)
1551                         goto nextslot;
1552
1553                 if (!sl->rx_buffer.data)
1554                         return 0;
1555
1556                 idx = dvb_ringbuffer_pkt_next(&sl->rx_buffer, -1, &fraglen);
1557                 while (idx != -1) {
1558                         dvb_ringbuffer_pkt_read(&sl->rx_buffer, idx, 0, hdr, 2);
1559                         if (connection_id == -1)
1560                                 connection_id = hdr[0];
1561                         if ((hdr[0] == connection_id) &&
1562                             ((hdr[1] & 0x80) == 0)) {
1563                                 *_slot = slot;
1564                                 found = 1;
1565                                 break;
1566                         }
1567
1568                         idx = dvb_ringbuffer_pkt_next(&sl->rx_buffer, idx,
1569                                                       &fraglen);
1570                 }
1571
1572 nextslot:
1573                 slot = (slot + 1) % ca->slot_count;
1574                 slot_count++;
1575         }
1576
1577         ca->next_read_slot = slot;
1578         return found;
1579 }
1580
1581 /**
1582  * Implementation of read() syscall.
1583  *
1584  * @file: File structure.
1585  * @buf: Destination buffer.
1586  * @count: Size of destination buffer.
1587  * @ppos: Position in file (ignored).
1588  *
1589  * return: Number of bytes read, or <0 on error.
1590  */
1591 static ssize_t dvb_ca_en50221_io_read(struct file *file, char __user *buf,
1592                                       size_t count, loff_t *ppos)
1593 {
1594         struct dvb_device *dvbdev = file->private_data;
1595         struct dvb_ca_private *ca = dvbdev->priv;
1596         struct dvb_ca_slot *sl;
1597         int status;
1598         int result = 0;
1599         u8 hdr[2];
1600         int slot;
1601         int connection_id = -1;
1602         size_t idx, idx2;
1603         int last_fragment = 0;
1604         size_t fraglen;
1605         int pktlen;
1606         int dispose = 0;
1607
1608         dprintk("%s\n", __func__);
1609
1610         /*
1611          * Outgoing packet has a 2 byte header.
1612          * hdr[0] = slot_id, hdr[1] = connection_id
1613          */
1614         if (count < 2)
1615                 return -EINVAL;
1616
1617         /* wait for some data */
1618         status = dvb_ca_en50221_io_read_condition(ca, &result, &slot);
1619         if (status == 0) {
1620                 /* if we're in nonblocking mode, exit immediately */
1621                 if (file->f_flags & O_NONBLOCK)
1622                         return -EWOULDBLOCK;
1623
1624                 /* wait for some data */
1625                 status = wait_event_interruptible(ca->wait_queue,
1626                                                   dvb_ca_en50221_io_read_condition
1627                                                   (ca, &result, &slot));
1628         }
1629         if ((status < 0) || (result < 0)) {
1630                 if (result)
1631                         return result;
1632                 return status;
1633         }
1634
1635         sl = &ca->slot_info[slot];
1636         idx = dvb_ringbuffer_pkt_next(&sl->rx_buffer, -1, &fraglen);
1637         pktlen = 2;
1638         do {
1639                 if (idx == -1) {
1640                         pr_err("dvb_ca adapter %d: BUG: read packet ended before last_fragment encountered\n",
1641                                ca->dvbdev->adapter->num);
1642                         status = -EIO;
1643                         goto exit;
1644                 }
1645
1646                 dvb_ringbuffer_pkt_read(&sl->rx_buffer, idx, 0, hdr, 2);
1647                 if (connection_id == -1)
1648                         connection_id = hdr[0];
1649                 if (hdr[0] == connection_id) {
1650                         if (pktlen < count) {
1651                                 if ((pktlen + fraglen - 2) > count)
1652                                         fraglen = count - pktlen;
1653                                 else
1654                                         fraglen -= 2;
1655
1656                                 status =
1657                                    dvb_ringbuffer_pkt_read_user(&sl->rx_buffer,
1658                                                                 idx, 2,
1659                                                                 buf + pktlen,
1660                                                                 fraglen);
1661                                 if (status < 0)
1662                                         goto exit;
1663
1664                                 pktlen += fraglen;
1665                         }
1666
1667                         if ((hdr[1] & 0x80) == 0)
1668                                 last_fragment = 1;
1669                         dispose = 1;
1670                 }
1671
1672                 idx2 = dvb_ringbuffer_pkt_next(&sl->rx_buffer, idx, &fraglen);
1673                 if (dispose)
1674                         dvb_ringbuffer_pkt_dispose(&sl->rx_buffer, idx);
1675                 idx = idx2;
1676                 dispose = 0;
1677         } while (!last_fragment);
1678
1679         hdr[0] = slot;
1680         hdr[1] = connection_id;
1681         status = copy_to_user(buf, hdr, 2);
1682         if (status) {
1683                 status = -EFAULT;
1684                 goto exit;
1685         }
1686         status = pktlen;
1687
1688 exit:
1689         return status;
1690 }
1691
1692 /**
1693  * Implementation of file open syscall.
1694  *
1695  * @inode: Inode concerned.
1696  * @file: File concerned.
1697  *
1698  * return: 0 on success, <0 on failure.
1699  */
1700 static int dvb_ca_en50221_io_open(struct inode *inode, struct file *file)
1701 {
1702         struct dvb_device *dvbdev = file->private_data;
1703         struct dvb_ca_private *ca = dvbdev->priv;
1704         int err;
1705         int i;
1706
1707         dprintk("%s\n", __func__);
1708
1709         if (!try_module_get(ca->pub->owner))
1710                 return -EIO;
1711
1712         err = dvb_generic_open(inode, file);
1713         if (err < 0) {
1714                 module_put(ca->pub->owner);
1715                 return err;
1716         }
1717
1718         for (i = 0; i < ca->slot_count; i++) {
1719                 struct dvb_ca_slot *sl = &ca->slot_info[i];
1720
1721                 if (sl->slot_state == DVB_CA_SLOTSTATE_RUNNING) {
1722                         if (!sl->rx_buffer.data) {
1723                                 /*
1724                                  * it is safe to call this here without locks
1725                                  * because ca->open == 0. Data is not read in
1726                                  * this case
1727                                  */
1728                                 dvb_ringbuffer_flush(&sl->rx_buffer);
1729                         }
1730                 }
1731         }
1732
1733         ca->open = 1;
1734         dvb_ca_en50221_thread_update_delay(ca);
1735         dvb_ca_en50221_thread_wakeup(ca);
1736
1737         dvb_ca_private_get(ca);
1738
1739         return 0;
1740 }
1741
1742 /**
1743  * Implementation of file close syscall.
1744  *
1745  * @inode: Inode concerned.
1746  * @file: File concerned.
1747  *
1748  * return: 0 on success, <0 on failure.
1749  */
1750 static int dvb_ca_en50221_io_release(struct inode *inode, struct file *file)
1751 {
1752         struct dvb_device *dvbdev = file->private_data;
1753         struct dvb_ca_private *ca = dvbdev->priv;
1754         int err;
1755
1756         dprintk("%s\n", __func__);
1757
1758         /* mark the CA device as closed */
1759         ca->open = 0;
1760         dvb_ca_en50221_thread_update_delay(ca);
1761
1762         err = dvb_generic_release(inode, file);
1763
1764         module_put(ca->pub->owner);
1765
1766         dvb_ca_private_put(ca);
1767
1768         return err;
1769 }
1770
1771 /**
1772  * Implementation of poll() syscall.
1773  *
1774  * @file: File concerned.
1775  * @wait: poll wait table.
1776  *
1777  * return: Standard poll mask.
1778  */
1779 static __poll_t dvb_ca_en50221_io_poll(struct file *file, poll_table *wait)
1780 {
1781         struct dvb_device *dvbdev = file->private_data;
1782         struct dvb_ca_private *ca = dvbdev->priv;
1783         __poll_t mask = 0;
1784         int slot;
1785         int result = 0;
1786
1787         dprintk("%s\n", __func__);
1788
1789         poll_wait(file, &ca->wait_queue, wait);
1790
1791         if (dvb_ca_en50221_io_read_condition(ca, &result, &slot) == 1)
1792                 mask |= EPOLLIN;
1793
1794         /* if there is something, return now */
1795         if (mask)
1796                 return mask;
1797
1798         if (dvb_ca_en50221_io_read_condition(ca, &result, &slot) == 1)
1799                 mask |= EPOLLIN;
1800
1801         return mask;
1802 }
1803
1804 static const struct file_operations dvb_ca_fops = {
1805         .owner = THIS_MODULE,
1806         .read = dvb_ca_en50221_io_read,
1807         .write = dvb_ca_en50221_io_write,
1808         .unlocked_ioctl = dvb_ca_en50221_io_ioctl,
1809         .open = dvb_ca_en50221_io_open,
1810         .release = dvb_ca_en50221_io_release,
1811         .poll = dvb_ca_en50221_io_poll,
1812         .llseek = noop_llseek,
1813 };
1814
1815 static const struct dvb_device dvbdev_ca = {
1816         .priv = NULL,
1817         .users = 1,
1818         .readers = 1,
1819         .writers = 1,
1820 #if defined(CONFIG_MEDIA_CONTROLLER_DVB)
1821         .name = "dvb-ca-en50221",
1822 #endif
1823         .fops = &dvb_ca_fops,
1824 };
1825
1826 /* ************************************************************************** */
1827 /* Initialisation/shutdown functions */
1828
1829 /**
1830  * Initialise a new DVB CA EN50221 interface device.
1831  *
1832  * @dvb_adapter: DVB adapter to attach the new CA device to.
1833  * @pubca: The dvb_ca instance.
1834  * @flags: Flags describing the CA device (DVB_CA_FLAG_*).
1835  * @slot_count: Number of slots supported.
1836  *
1837  * return: 0 on success, nonzero on failure
1838  */
1839 int dvb_ca_en50221_init(struct dvb_adapter *dvb_adapter,
1840                         struct dvb_ca_en50221 *pubca, int flags, int slot_count)
1841 {
1842         int ret;
1843         struct dvb_ca_private *ca = NULL;
1844         int i;
1845
1846         dprintk("%s\n", __func__);
1847
1848         if (slot_count < 1)
1849                 return -EINVAL;
1850
1851         /* initialise the system data */
1852         ca = kzalloc(sizeof(*ca), GFP_KERNEL);
1853         if (!ca) {
1854                 ret = -ENOMEM;
1855                 goto exit;
1856         }
1857         kref_init(&ca->refcount);
1858         ca->pub = pubca;
1859         ca->flags = flags;
1860         ca->slot_count = slot_count;
1861         ca->slot_info = kcalloc(slot_count, sizeof(struct dvb_ca_slot),
1862                                 GFP_KERNEL);
1863         if (!ca->slot_info) {
1864                 ret = -ENOMEM;
1865                 goto free_ca;
1866         }
1867         init_waitqueue_head(&ca->wait_queue);
1868         ca->open = 0;
1869         ca->wakeup = 0;
1870         ca->next_read_slot = 0;
1871         pubca->private = ca;
1872
1873         /* register the DVB device */
1874         ret = dvb_register_device(dvb_adapter, &ca->dvbdev, &dvbdev_ca, ca,
1875                                   DVB_DEVICE_CA, 0);
1876         if (ret)
1877                 goto free_slot_info;
1878
1879         /* now initialise each slot */
1880         for (i = 0; i < slot_count; i++) {
1881                 struct dvb_ca_slot *sl = &ca->slot_info[i];
1882
1883                 memset(sl, 0, sizeof(struct dvb_ca_slot));
1884                 sl->slot_state = DVB_CA_SLOTSTATE_NONE;
1885                 atomic_set(&sl->camchange_count, 0);
1886                 sl->camchange_type = DVB_CA_EN50221_CAMCHANGE_REMOVED;
1887                 mutex_init(&sl->slot_lock);
1888         }
1889
1890         mutex_init(&ca->ioctl_mutex);
1891
1892         if (signal_pending(current)) {
1893                 ret = -EINTR;
1894                 goto unregister_device;
1895         }
1896         mb();
1897
1898         /* create a kthread for monitoring this CA device */
1899         ca->thread = kthread_run(dvb_ca_en50221_thread, ca, "kdvb-ca-%i:%i",
1900                                  ca->dvbdev->adapter->num, ca->dvbdev->id);
1901         if (IS_ERR(ca->thread)) {
1902                 ret = PTR_ERR(ca->thread);
1903                 pr_err("dvb_ca_init: failed to start kernel_thread (%d)\n",
1904                        ret);
1905                 goto unregister_device;
1906         }
1907         return 0;
1908
1909 unregister_device:
1910         dvb_unregister_device(ca->dvbdev);
1911 free_slot_info:
1912         kfree(ca->slot_info);
1913 free_ca:
1914         kfree(ca);
1915 exit:
1916         pubca->private = NULL;
1917         return ret;
1918 }
1919 EXPORT_SYMBOL(dvb_ca_en50221_init);
1920
1921 /**
1922  * Release a DVB CA EN50221 interface device.
1923  *
1924  * @pubca: The associated dvb_ca instance.
1925  */
1926 void dvb_ca_en50221_release(struct dvb_ca_en50221 *pubca)
1927 {
1928         struct dvb_ca_private *ca = pubca->private;
1929         int i;
1930
1931         dprintk("%s\n", __func__);
1932
1933         /* shutdown the thread if there was one */
1934         kthread_stop(ca->thread);
1935
1936         for (i = 0; i < ca->slot_count; i++)
1937                 dvb_ca_en50221_slot_shutdown(ca, i);
1938
1939         dvb_remove_device(ca->dvbdev);
1940         dvb_ca_private_put(ca);
1941         pubca->private = NULL;
1942 }
1943 EXPORT_SYMBOL(dvb_ca_en50221_release);