1  // SPDX-License-Identifier: GPL-2.0-or-later
2  /*
3   * av7110_ca.c: CA and CI stuff
4   *
5   * Copyright (C) 1999-2002 Ralph  Metzler
6   *                       & Marcus Metzler for convergence integrated media GmbH
7   *
8   * originally based on code by:
9   * Copyright (C) 1998,1999 Christian Theiss <mistert@rz.fh-augsburg.de>
10   *
11   * the project's page is at https://linuxtv.org
12   */
13  
14  #include <linux/kernel.h>
15  #include <linux/types.h>
16  #include <linux/delay.h>
17  #include <linux/fs.h>
18  #include <linux/timer.h>
19  #include <linux/poll.h>
20  #include <linux/gfp.h>
21  
22  #include "av7110.h"
23  #include "av7110_hw.h"
24  #include "av7110_ca.h"
25  
26  
CI_handle(struct av7110 * av7110,u8 * data,u16 len)27  void CI_handle(struct av7110 *av7110, u8 *data, u16 len)
28  {
29  	dprintk(8, "av7110:%p\n",av7110);
30  
31  	if (len < 3)
32  		return;
33  	switch (data[0]) {
34  	case CI_MSG_CI_INFO:
35  		if (data[2] != 1 && data[2] != 2)
36  			break;
37  		switch (data[1]) {
38  		case 0:
39  			av7110->ci_slot[data[2] - 1].flags = 0;
40  			break;
41  		case 1:
42  			av7110->ci_slot[data[2] - 1].flags |= CA_CI_MODULE_PRESENT;
43  			break;
44  		case 2:
45  			av7110->ci_slot[data[2] - 1].flags |= CA_CI_MODULE_READY;
46  			break;
47  		}
48  		break;
49  	case CI_SWITCH_PRG_REPLY:
50  		//av7110->ci_stat=data[1];
51  		break;
52  	default:
53  		break;
54  	}
55  }
56  
57  
ci_get_data(struct dvb_ringbuffer * cibuf,u8 * data,int len)58  void ci_get_data(struct dvb_ringbuffer *cibuf, u8 *data, int len)
59  {
60  	if (dvb_ringbuffer_free(cibuf) < len + 2)
61  		return;
62  
63  	DVB_RINGBUFFER_WRITE_BYTE(cibuf, len >> 8);
64  	DVB_RINGBUFFER_WRITE_BYTE(cibuf, len & 0xff);
65  	dvb_ringbuffer_write(cibuf, data, len);
66  	wake_up_interruptible(&cibuf->queue);
67  }
68  
69  
70  /******************************************************************************
71   * CI link layer file ops
72   ******************************************************************************/
73  
ci_ll_init(struct dvb_ringbuffer * cirbuf,struct dvb_ringbuffer * ciwbuf,int size)74  static int ci_ll_init(struct dvb_ringbuffer *cirbuf, struct dvb_ringbuffer *ciwbuf, int size)
75  {
76  	struct dvb_ringbuffer *tab[] = { cirbuf, ciwbuf, NULL }, **p;
77  	void *data;
78  
79  	for (p = tab; *p; p++) {
80  		data = vmalloc(size);
81  		if (!data) {
82  			while (p-- != tab) {
83  				vfree(p[0]->data);
84  				p[0]->data = NULL;
85  			}
86  			return -ENOMEM;
87  		}
88  		dvb_ringbuffer_init(*p, data, size);
89  	}
90  	return 0;
91  }
92  
ci_ll_flush(struct dvb_ringbuffer * cirbuf,struct dvb_ringbuffer * ciwbuf)93  static void ci_ll_flush(struct dvb_ringbuffer *cirbuf, struct dvb_ringbuffer *ciwbuf)
94  {
95  	dvb_ringbuffer_flush_spinlock_wakeup(cirbuf);
96  	dvb_ringbuffer_flush_spinlock_wakeup(ciwbuf);
97  }
98  
ci_ll_release(struct dvb_ringbuffer * cirbuf,struct dvb_ringbuffer * ciwbuf)99  static void ci_ll_release(struct dvb_ringbuffer *cirbuf, struct dvb_ringbuffer *ciwbuf)
100  {
101  	vfree(cirbuf->data);
102  	cirbuf->data = NULL;
103  	vfree(ciwbuf->data);
104  	ciwbuf->data = NULL;
105  }
106  
ci_ll_reset(struct dvb_ringbuffer * cibuf,struct file * file,int slots,struct ca_slot_info * slot)107  static int ci_ll_reset(struct dvb_ringbuffer *cibuf, struct file *file,
108  		       int slots, struct ca_slot_info *slot)
109  {
110  	int i;
111  	int len = 0;
112  	u8 msg[8] = { 0x00, 0x06, 0x00, 0x00, 0xff, 0x02, 0x00, 0x00 };
113  
114  	for (i = 0; i < 2; i++) {
115  		if (slots & (1 << i))
116  			len += 8;
117  	}
118  
119  	if (dvb_ringbuffer_free(cibuf) < len)
120  		return -EBUSY;
121  
122  	for (i = 0; i < 2; i++) {
123  		if (slots & (1 << i)) {
124  			msg[2] = i;
125  			dvb_ringbuffer_write(cibuf, msg, 8);
126  			slot[i].flags = 0;
127  		}
128  	}
129  
130  	return 0;
131  }
132  
ci_ll_write(struct dvb_ringbuffer * cibuf,struct file * file,const char __user * buf,size_t count,loff_t * ppos)133  static ssize_t ci_ll_write(struct dvb_ringbuffer *cibuf, struct file *file,
134  			   const char __user *buf, size_t count, loff_t *ppos)
135  {
136  	int free;
137  	int non_blocking = file->f_flags & O_NONBLOCK;
138  	u8 *page = (u8 *)__get_free_page(GFP_USER);
139  	int res;
140  
141  	if (!page)
142  		return -ENOMEM;
143  
144  	res = -EINVAL;
145  	if (count > 2048)
146  		goto out;
147  
148  	res = -EFAULT;
149  	if (copy_from_user(page, buf, count))
150  		goto out;
151  
152  	free = dvb_ringbuffer_free(cibuf);
153  	if (count + 2 > free) {
154  		res = -EWOULDBLOCK;
155  		if (non_blocking)
156  			goto out;
157  		res = -ERESTARTSYS;
158  		if (wait_event_interruptible(cibuf->queue,
159  					     (dvb_ringbuffer_free(cibuf) >= count + 2)))
160  			goto out;
161  	}
162  
163  	DVB_RINGBUFFER_WRITE_BYTE(cibuf, count >> 8);
164  	DVB_RINGBUFFER_WRITE_BYTE(cibuf, count & 0xff);
165  
166  	res = dvb_ringbuffer_write(cibuf, page, count);
167  out:
168  	free_page((unsigned long)page);
169  	return res;
170  }
171  
ci_ll_read(struct dvb_ringbuffer * cibuf,struct file * file,char __user * buf,size_t count,loff_t * ppos)172  static ssize_t ci_ll_read(struct dvb_ringbuffer *cibuf, struct file *file,
173  			  char __user *buf, size_t count, loff_t *ppos)
174  {
175  	int avail;
176  	int non_blocking = file->f_flags & O_NONBLOCK;
177  	ssize_t len;
178  
179  	if (!cibuf->data || !count)
180  		return 0;
181  	if (non_blocking && (dvb_ringbuffer_empty(cibuf)))
182  		return -EWOULDBLOCK;
183  	if (wait_event_interruptible(cibuf->queue,
184  				     !dvb_ringbuffer_empty(cibuf)))
185  		return -ERESTARTSYS;
186  	avail = dvb_ringbuffer_avail(cibuf);
187  	if (avail < 4)
188  		return 0;
189  	len = DVB_RINGBUFFER_PEEK(cibuf, 0) << 8;
190  	len |= DVB_RINGBUFFER_PEEK(cibuf, 1);
191  	if (avail < len + 2 || count < len)
192  		return -EINVAL;
193  	DVB_RINGBUFFER_SKIP(cibuf, 2);
194  
195  	return dvb_ringbuffer_read_user(cibuf, buf, len);
196  }
197  
dvb_ca_open(struct inode * inode,struct file * file)198  static int dvb_ca_open(struct inode *inode, struct file *file)
199  {
200  	struct dvb_device *dvbdev = file->private_data;
201  	struct av7110 *av7110 = dvbdev->priv;
202  	int err = dvb_generic_open(inode, file);
203  
204  	dprintk(8, "av7110:%p\n",av7110);
205  
206  	if (err < 0)
207  		return err;
208  	ci_ll_flush(&av7110->ci_rbuffer, &av7110->ci_wbuffer);
209  	return 0;
210  }
211  
dvb_ca_poll(struct file * file,poll_table * wait)212  static __poll_t dvb_ca_poll (struct file *file, poll_table *wait)
213  {
214  	struct dvb_device *dvbdev = file->private_data;
215  	struct av7110 *av7110 = dvbdev->priv;
216  	struct dvb_ringbuffer *rbuf = &av7110->ci_rbuffer;
217  	struct dvb_ringbuffer *wbuf = &av7110->ci_wbuffer;
218  	__poll_t mask = 0;
219  
220  	dprintk(8, "av7110:%p\n",av7110);
221  
222  	poll_wait(file, &rbuf->queue, wait);
223  	poll_wait(file, &wbuf->queue, wait);
224  
225  	if (!dvb_ringbuffer_empty(rbuf))
226  		mask |= (EPOLLIN | EPOLLRDNORM);
227  
228  	if (dvb_ringbuffer_free(wbuf) > 1024)
229  		mask |= (EPOLLOUT | EPOLLWRNORM);
230  
231  	return mask;
232  }
233  
dvb_ca_ioctl(struct file * file,unsigned int cmd,void * parg)234  static int dvb_ca_ioctl(struct file *file, unsigned int cmd, void *parg)
235  {
236  	struct dvb_device *dvbdev = file->private_data;
237  	struct av7110 *av7110 = dvbdev->priv;
238  	unsigned long arg = (unsigned long) parg;
239  	int ret = 0;
240  
241  	dprintk(8, "av7110:%p\n",av7110);
242  
243  	if (mutex_lock_interruptible(&av7110->ioctl_mutex))
244  		return -ERESTARTSYS;
245  
246  	switch (cmd) {
247  	case CA_RESET:
248  		ret = ci_ll_reset(&av7110->ci_wbuffer, file, arg,
249  				  &av7110->ci_slot[0]);
250  		break;
251  	case CA_GET_CAP:
252  	{
253  		struct ca_caps cap;
254  
255  		cap.slot_num = 2;
256  		cap.slot_type = (FW_CI_LL_SUPPORT(av7110->arm_app) ?
257  				 CA_CI_LINK : CA_CI) | CA_DESCR;
258  		cap.descr_num = 16;
259  		cap.descr_type = CA_ECD;
260  		memcpy(parg, &cap, sizeof(cap));
261  		break;
262  	}
263  
264  	case CA_GET_SLOT_INFO:
265  	{
266  		struct ca_slot_info *info=(struct ca_slot_info *)parg;
267  
268  		if (info->num < 0 || info->num > 1) {
269  			mutex_unlock(&av7110->ioctl_mutex);
270  			return -EINVAL;
271  		}
272  		av7110->ci_slot[info->num].num = info->num;
273  		av7110->ci_slot[info->num].type = FW_CI_LL_SUPPORT(av7110->arm_app) ?
274  							CA_CI_LINK : CA_CI;
275  		memcpy(info, &av7110->ci_slot[info->num], sizeof(struct ca_slot_info));
276  		break;
277  	}
278  
279  	case CA_GET_MSG:
280  		break;
281  
282  	case CA_SEND_MSG:
283  		break;
284  
285  	case CA_GET_DESCR_INFO:
286  	{
287  		struct ca_descr_info info;
288  
289  		info.num = 16;
290  		info.type = CA_ECD;
291  		memcpy(parg, &info, sizeof (info));
292  		break;
293  	}
294  
295  	case CA_SET_DESCR:
296  	{
297  		struct ca_descr *descr = (struct ca_descr*) parg;
298  
299  		if (descr->index >= 16 || descr->parity > 1) {
300  			mutex_unlock(&av7110->ioctl_mutex);
301  			return -EINVAL;
302  		}
303  		av7110_fw_cmd(av7110, COMTYPE_PIDFILTER, SetDescr, 5,
304  			      (descr->index<<8)|descr->parity,
305  			      (descr->cw[0]<<8)|descr->cw[1],
306  			      (descr->cw[2]<<8)|descr->cw[3],
307  			      (descr->cw[4]<<8)|descr->cw[5],
308  			      (descr->cw[6]<<8)|descr->cw[7]);
309  		break;
310  	}
311  
312  	default:
313  		ret = -EINVAL;
314  		break;
315  	}
316  
317  	mutex_unlock(&av7110->ioctl_mutex);
318  	return ret;
319  }
320  
dvb_ca_write(struct file * file,const char __user * buf,size_t count,loff_t * ppos)321  static ssize_t dvb_ca_write(struct file *file, const char __user *buf,
322  			    size_t count, loff_t *ppos)
323  {
324  	struct dvb_device *dvbdev = file->private_data;
325  	struct av7110 *av7110 = dvbdev->priv;
326  
327  	dprintk(8, "av7110:%p\n",av7110);
328  	return ci_ll_write(&av7110->ci_wbuffer, file, buf, count, ppos);
329  }
330  
dvb_ca_read(struct file * file,char __user * buf,size_t count,loff_t * ppos)331  static ssize_t dvb_ca_read(struct file *file, char __user *buf,
332  			   size_t count, loff_t *ppos)
333  {
334  	struct dvb_device *dvbdev = file->private_data;
335  	struct av7110 *av7110 = dvbdev->priv;
336  
337  	dprintk(8, "av7110:%p\n",av7110);
338  	return ci_ll_read(&av7110->ci_rbuffer, file, buf, count, ppos);
339  }
340  
341  static const struct file_operations dvb_ca_fops = {
342  	.owner		= THIS_MODULE,
343  	.read		= dvb_ca_read,
344  	.write		= dvb_ca_write,
345  	.unlocked_ioctl	= dvb_generic_ioctl,
346  	.open		= dvb_ca_open,
347  	.release	= dvb_generic_release,
348  	.poll		= dvb_ca_poll,
349  	.llseek		= default_llseek,
350  };
351  
352  static struct dvb_device dvbdev_ca = {
353  	.priv		= NULL,
354  	.users		= 1,
355  	.writers	= 1,
356  	.fops		= &dvb_ca_fops,
357  	.kernel_ioctl	= dvb_ca_ioctl,
358  };
359  
360  
av7110_ca_register(struct av7110 * av7110)361  int av7110_ca_register(struct av7110 *av7110)
362  {
363  	return dvb_register_device(&av7110->dvb_adapter, &av7110->ca_dev,
364  				   &dvbdev_ca, av7110, DVB_DEVICE_CA, 0);
365  }
366  
av7110_ca_unregister(struct av7110 * av7110)367  void av7110_ca_unregister(struct av7110 *av7110)
368  {
369  	dvb_unregister_device(av7110->ca_dev);
370  }
371  
av7110_ca_init(struct av7110 * av7110)372  int av7110_ca_init(struct av7110* av7110)
373  {
374  	return ci_ll_init(&av7110->ci_rbuffer, &av7110->ci_wbuffer, 8192);
375  }
376  
av7110_ca_exit(struct av7110 * av7110)377  void av7110_ca_exit(struct av7110* av7110)
378  {
379  	ci_ll_release(&av7110->ci_rbuffer, &av7110->ci_wbuffer);
380  }
381