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