ftp://ftp.kernel.org/pub/linux/kernel/v2.6/linux-2.6.6.tar.bz2
[linux-2.6.git] / drivers / media / dvb / ttpci / av7110_ca.c
1 /*
2  * av7110_ca.c: CA and CI stuff
3  *
4  * Copyright (C) 1999-2002 Ralph  Metzler
5  *                       & Marcus Metzler for convergence integrated media GmbH
6  *
7  * originally based on code by:
8  * Copyright (C) 1998,1999 Christian Theiss <mistert@rz.fh-augsburg.de>
9  *
10  * This program is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU General Public License
12  * as published by the Free Software Foundation; either version 2
13  * of the License, or (at your option) any later version.
14  *
15  *
16  * This program is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19  * GNU General Public License for more details.
20  *
21  *
22  * You should have received a copy of the GNU General Public License
23  * along with this program; if not, write to the Free Software
24  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
25  * Or, point your browser to http://www.gnu.org/copyleft/gpl.html
26  *
27  *
28  * the project's page is at http://www.linuxtv.org/dvb/
29  */
30
31 #include <linux/kernel.h>
32 #include <linux/sched.h>
33 #include <linux/types.h>
34 #include <linux/delay.h>
35 #include <linux/fs.h>
36 #include <linux/timer.h>
37 #include <linux/poll.h>
38 #include <linux/byteorder/swabb.h>
39 #include <linux/smp_lock.h>
40
41 #define DEBUG_VARIABLE av7110_debug
42 extern int av7110_debug;
43
44 #include "dvb_i2c.h"
45 #include "av7110.h"
46 #include "av7110_hw.h"
47 #include "dvb_functions.h"
48
49
50 void CI_handle(struct av7110 *av7110, u8 *data, u16 len)
51 {
52         DEB_EE(("av7110: %p\n", av7110));
53
54         if (len < 3)
55                 return;
56         switch (data[0]) {
57         case CI_MSG_CI_INFO:
58                 if (data[2] != 1 && data[2] != 2)
59                         break;
60                 switch (data[1]) {
61                 case 0:
62                         av7110->ci_slot[data[2] - 1].flags = 0;
63                         break;
64                 case 1:
65                         av7110->ci_slot[data[2] - 1].flags |= CA_CI_MODULE_PRESENT;
66                         break;
67                 case 2:
68                         av7110->ci_slot[data[2] - 1].flags |= CA_CI_MODULE_READY;
69                         break;
70                 }
71                 break;
72         case CI_SWITCH_PRG_REPLY:
73                 //av7110->ci_stat=data[1];
74                 break;
75         default:
76                 break;
77         }
78 }
79
80
81 void ci_get_data(struct dvb_ringbuffer *cibuf, u8 *data, int len)
82 {
83         if (dvb_ringbuffer_free(cibuf) < len + 2)
84                 return;
85
86         DVB_RINGBUFFER_WRITE_BYTE(cibuf, len >> 8);
87         DVB_RINGBUFFER_WRITE_BYTE(cibuf, len & 0xff);
88         dvb_ringbuffer_write(cibuf, data, len, 0);
89         wake_up_interruptible(&cibuf->queue);
90 }
91
92
93 /******************************************************************************
94  * CI link layer file ops
95  ******************************************************************************/
96
97 int ci_ll_init(struct dvb_ringbuffer *cirbuf, struct dvb_ringbuffer *ciwbuf, int size)
98 {
99         dvb_ringbuffer_init(cirbuf, vmalloc(size), size);
100         dvb_ringbuffer_init(ciwbuf, vmalloc(size), size);
101         return 0;
102 }
103
104 void ci_ll_flush(struct dvb_ringbuffer *cirbuf, struct dvb_ringbuffer *ciwbuf)
105 {
106         dvb_ringbuffer_flush_spinlock_wakeup(cirbuf);
107         dvb_ringbuffer_flush_spinlock_wakeup(ciwbuf);
108 }
109
110 void ci_ll_release(struct dvb_ringbuffer *cirbuf, struct dvb_ringbuffer *ciwbuf)
111 {
112         vfree(cirbuf->data);
113         cirbuf->data = 0;
114         vfree(ciwbuf->data);
115         ciwbuf->data = 0;
116 }
117
118 int ci_ll_reset(struct dvb_ringbuffer *cibuf, struct file *file,
119                 int slots, ca_slot_info_t *slot)
120 {
121         int i;
122         int len = 0;
123         u8 msg[8] = { 0x00, 0x06, 0x00, 0x00, 0xff, 0x02, 0x00, 0x00 };
124
125         for (i = 0; i < 2; i++) {
126                 if (slots & (1 << i))
127                         len += 8;
128         }
129
130         if (dvb_ringbuffer_free(cibuf) < len)
131                 return -EBUSY;
132
133         for (i = 0; i < 2; i++) {
134                 if (slots & (1 << i)) {
135                         msg[2] = i;
136                         dvb_ringbuffer_write(cibuf, msg, 8, 0);
137                         slot[i].flags = 0;
138                 }
139         }
140
141         return 0;
142 }
143
144 static ssize_t ci_ll_write(struct dvb_ringbuffer *cibuf, struct file *file,
145                            const char *buf, size_t count, loff_t *ppos)
146 {
147         int free;
148         int non_blocking = file->f_flags & O_NONBLOCK;
149
150         if (count > 2048)
151                 return -EINVAL;
152         free = dvb_ringbuffer_free(cibuf);
153         if (count + 2 > free) {
154                 if (non_blocking)
155                         return -EWOULDBLOCK;
156                 if (wait_event_interruptible(cibuf->queue,
157                                              (dvb_ringbuffer_free(cibuf) >= count + 2)))
158                         return -ERESTARTSYS;
159         }
160
161         DVB_RINGBUFFER_WRITE_BYTE(cibuf, count >> 8);
162         DVB_RINGBUFFER_WRITE_BYTE(cibuf, count & 0xff);
163
164         return dvb_ringbuffer_write(cibuf, buf, count, 1);
165 }
166
167 static ssize_t ci_ll_read(struct dvb_ringbuffer *cibuf, struct file *file,
168                           char *buf, size_t count, loff_t *ppos)
169 {
170         int avail;
171         int non_blocking = file->f_flags & O_NONBLOCK;
172         ssize_t len;
173
174         if (!cibuf->data || !count)
175                 return 0;
176         if (non_blocking && (dvb_ringbuffer_empty(cibuf)))
177                 return -EWOULDBLOCK;
178         if (wait_event_interruptible(cibuf->queue,
179                                      !dvb_ringbuffer_empty(cibuf)))
180                 return -ERESTARTSYS;
181         avail = dvb_ringbuffer_avail(cibuf);
182         if (avail < 4)
183                 return 0;
184         len = DVB_RINGBUFFER_PEEK(cibuf, 0) << 8;
185         len |= DVB_RINGBUFFER_PEEK(cibuf, 1);
186         if (avail < len + 2 || count < len)
187                 return -EINVAL;
188         DVB_RINGBUFFER_SKIP(cibuf, 2);
189
190         return dvb_ringbuffer_read(cibuf, buf, len, 1);
191 }
192
193 static int dvb_ca_open(struct inode *inode, struct file *file)
194 {
195         struct dvb_device *dvbdev = (struct dvb_device *) file->private_data;
196         struct av7110 *av7110 = (struct av7110 *) dvbdev->priv;
197         int err = dvb_generic_open(inode, file);
198
199         DEB_EE(("av7110: %p\n", av7110));
200
201         if (err < 0)
202                 return err;
203         ci_ll_flush(&av7110->ci_rbuffer, &av7110->ci_wbuffer);
204         return 0;
205 }
206
207 static unsigned int dvb_ca_poll (struct file *file, poll_table *wait)
208 {
209         struct dvb_device *dvbdev = (struct dvb_device *) file->private_data;
210         struct av7110 *av7110 = (struct av7110 *) dvbdev->priv;
211         struct dvb_ringbuffer *rbuf = &av7110->ci_rbuffer;
212         struct dvb_ringbuffer *wbuf = &av7110->ci_wbuffer;
213         unsigned int mask = 0;
214
215         DEB_EE(("av7110: %p\n", av7110));
216
217         poll_wait(file, &rbuf->queue, wait);
218         if (!dvb_ringbuffer_empty(rbuf))
219                 mask |= POLLIN;
220         if (dvb_ringbuffer_avail(wbuf) > 1024)
221                 mask |= POLLOUT;
222
223         return mask;
224 }
225
226 static int dvb_ca_ioctl(struct inode *inode, struct file *file,
227                  unsigned int cmd, void *parg)
228 {
229         struct dvb_device *dvbdev = (struct dvb_device *) file->private_data;
230         struct av7110 *av7110 = (struct av7110 *) dvbdev->priv;
231         unsigned long arg = (unsigned long) parg;
232
233         DEB_EE(("av7110: %p\n", av7110));
234
235         switch (cmd) {
236         case CA_RESET:
237                 return ci_ll_reset(&av7110->ci_wbuffer, file, arg, &av7110->ci_slot[0]);
238                 break;
239         case CA_GET_CAP:
240         {
241                 ca_caps_t cap;
242
243                 cap.slot_num = 2;
244                 cap.slot_type = (FW_CI_LL_SUPPORT(av7110->arm_app) ?
245                                  CA_CI_LINK : CA_CI) | CA_DESCR;
246                 cap.descr_num = 16;
247                 cap.descr_type = CA_ECD;
248                 memcpy(parg, &cap, sizeof(cap));
249                 break;
250         }
251
252         case CA_GET_SLOT_INFO:
253         {
254                 ca_slot_info_t *info=(ca_slot_info_t *)parg;
255
256                 if (info->num > 1)
257                         return -EINVAL;
258                 av7110->ci_slot[info->num].num = info->num;
259                 av7110->ci_slot[info->num].type = FW_CI_LL_SUPPORT(av7110->arm_app) ?
260                                                         CA_CI_LINK : CA_CI;
261                 memcpy(info, &av7110->ci_slot[info->num], sizeof(ca_slot_info_t));
262                 break;
263         }
264
265         case CA_GET_MSG:
266                 break;
267
268         case CA_SEND_MSG:
269                 break;
270
271         case CA_GET_DESCR_INFO:
272         {
273                 ca_descr_info_t info;
274
275                 info.num = 16;
276                 info.type = CA_ECD;
277                 memcpy(parg, &info, sizeof (info));
278                 break;
279         }
280
281         case CA_SET_DESCR:
282         {
283                 ca_descr_t *descr = (ca_descr_t*) parg;
284
285                 if (descr->index >= 16)
286                         return -EINVAL;
287                 if (descr->parity > 1)
288                         return -EINVAL;
289                 av7110_fw_cmd(av7110, COMTYPE_PIDFILTER, SetDescr, 5,
290                               (descr->index<<8)|descr->parity,
291                               (descr->cw[0]<<8)|descr->cw[1],
292                               (descr->cw[2]<<8)|descr->cw[3],
293                               (descr->cw[4]<<8)|descr->cw[5],
294                               (descr->cw[6]<<8)|descr->cw[7]);
295                 break;
296         }
297
298         default:
299                 return -EINVAL;
300         }
301         return 0;
302 }
303
304 static ssize_t dvb_ca_write(struct file *file, const char *buf,
305                             size_t count, loff_t *ppos)
306 {
307         struct dvb_device *dvbdev = (struct dvb_device *) file->private_data;
308         struct av7110 *av7110 = (struct av7110 *) dvbdev->priv;
309
310         DEB_EE(("av7110: %p\n", av7110));
311         return ci_ll_write(&av7110->ci_wbuffer, file, buf, count, ppos);
312 }
313
314 static ssize_t dvb_ca_read(struct file *file, char *buf,
315                            size_t count, loff_t *ppos)
316 {
317         struct dvb_device *dvbdev = (struct dvb_device *) file->private_data;
318         struct av7110 *av7110 = (struct av7110 *) dvbdev->priv;
319
320         DEB_EE(("av7110: %p\n", av7110));
321         return ci_ll_read(&av7110->ci_rbuffer, file, buf, count, ppos);
322 }
323
324
325
326 static struct file_operations dvb_ca_fops = {
327         .owner          = THIS_MODULE,
328         .read           = dvb_ca_read,
329         .write          = dvb_ca_write,
330         .ioctl          = dvb_generic_ioctl,
331         .open           = dvb_ca_open,
332         .release        = dvb_generic_release,
333         .poll           = dvb_ca_poll,
334 };
335
336 static struct dvb_device dvbdev_ca = {
337         .priv           = 0,
338         .users          = 1,
339         .writers        = 1,
340         .fops           = &dvb_ca_fops,
341         .kernel_ioctl   = dvb_ca_ioctl,
342 };
343
344
345 int av7110_ca_register(struct av7110 *av7110)
346 {
347         return dvb_register_device(av7110->dvb_adapter, &av7110->ca_dev,
348                                    &dvbdev_ca, av7110, DVB_DEVICE_CA);
349 }
350
351 void av7110_ca_unregister(struct av7110 *av7110)
352 {
353         dvb_unregister_device(av7110->ca_dev);
354 }
355
356 void av7110_ca_init(struct av7110* av7110)
357 {
358         ci_ll_init(&av7110->ci_rbuffer, &av7110->ci_wbuffer, 8192);
359 }
360
361 void av7110_ca_exit(struct av7110* av7110)
362 {
363         ci_ll_release(&av7110->ci_rbuffer, &av7110->ci_wbuffer);
364 }