1/* net/atm/common.c - ATM sockets (common part for PVC and SVC) */
2
3/* Written 1995-2000 by Werner Almesberger, EPFL LRC/ICA */
4
5
6#include <linux/module.h>
7#include <linux/kmod.h>
8#include <linux/net.h>		/* struct socket, struct proto_ops */
9#include <linux/atm.h>		/* ATM stuff */
10#include <linux/atmdev.h>
11#include <linux/socket.h>	/* SOL_SOCKET */
12#include <linux/errno.h>	/* error codes */
13#include <linux/capability.h>
14#include <linux/mm.h>
15#include <linux/sched.h>
16#include <linux/time.h>		/* struct timeval */
17#include <linux/skbuff.h>
18#include <linux/bitops.h>
19#include <linux/init.h>
20#include <net/sock.h>		/* struct sock */
21
22#include <asm/uaccess.h>
23#include <asm/atomic.h>
24#include <asm/poll.h>
25
26
27#include "resources.h"		/* atm_find_dev */
28#include "common.h"		/* prototypes */
29#include "protocols.h"		/* atm_init_<transport> */
30#include "addr.h"		/* address registry */
31#include "signaling.h"		/* for WAITING and sigd_attach */
32
33
34#define DPRINTK(format,args...)
35
36struct hlist_head vcc_hash[VCC_HTABLE_SIZE];
37DEFINE_RWLOCK(vcc_sklist_lock);
38
39static void __vcc_insert_socket(struct sock *sk)
40{
41	struct atm_vcc *vcc = atm_sk(sk);
42	struct hlist_head *head = &vcc_hash[vcc->vci &
43					(VCC_HTABLE_SIZE - 1)];
44	sk->sk_hash = vcc->vci & (VCC_HTABLE_SIZE - 1);
45	sk_add_node(sk, head);
46}
47
48void vcc_insert_socket(struct sock *sk)
49{
50	write_lock_irq(&vcc_sklist_lock);
51	__vcc_insert_socket(sk);
52	write_unlock_irq(&vcc_sklist_lock);
53}
54
55static void vcc_remove_socket(struct sock *sk)
56{
57	write_lock_irq(&vcc_sklist_lock);
58	sk_del_node_init(sk);
59	write_unlock_irq(&vcc_sklist_lock);
60}
61
62
63static struct sk_buff *alloc_tx(struct atm_vcc *vcc,unsigned int size)
64{
65	struct sk_buff *skb;
66	struct sock *sk = sk_atm(vcc);
67
68	if (atomic_read(&sk->sk_wmem_alloc) && !atm_may_send(vcc, size)) {
69		DPRINTK("Sorry: wmem_alloc = %d, size = %d, sndbuf = %d\n",
70			atomic_read(&sk->sk_wmem_alloc), size,
71			sk->sk_sndbuf);
72		return NULL;
73	}
74	while (!(skb = alloc_skb(size,GFP_KERNEL))) schedule();
75	DPRINTK("AlTx %d += %d\n", atomic_read(&sk->sk_wmem_alloc),
76		skb->truesize);
77	atomic_add(skb->truesize, &sk->sk_wmem_alloc);
78	return skb;
79}
80
81
82EXPORT_SYMBOL(vcc_hash);
83EXPORT_SYMBOL(vcc_sklist_lock);
84EXPORT_SYMBOL(vcc_insert_socket);
85
86static void vcc_sock_destruct(struct sock *sk)
87{
88	if (atomic_read(&sk->sk_rmem_alloc))
89		printk(KERN_DEBUG "vcc_sock_destruct: rmem leakage (%d bytes) detected.\n", atomic_read(&sk->sk_rmem_alloc));
90
91	if (atomic_read(&sk->sk_wmem_alloc))
92		printk(KERN_DEBUG "vcc_sock_destruct: wmem leakage (%d bytes) detected.\n", atomic_read(&sk->sk_wmem_alloc));
93}
94
95static void vcc_def_wakeup(struct sock *sk)
96{
97	read_lock(&sk->sk_callback_lock);
98	if (sk->sk_sleep && waitqueue_active(sk->sk_sleep))
99		wake_up(sk->sk_sleep);
100	read_unlock(&sk->sk_callback_lock);
101}
102
103static inline int vcc_writable(struct sock *sk)
104{
105	struct atm_vcc *vcc = atm_sk(sk);
106
107	return (vcc->qos.txtp.max_sdu +
108		atomic_read(&sk->sk_wmem_alloc)) <= sk->sk_sndbuf;
109}
110
111static void vcc_write_space(struct sock *sk)
112{
113	read_lock(&sk->sk_callback_lock);
114
115	if (vcc_writable(sk)) {
116		if (sk->sk_sleep && waitqueue_active(sk->sk_sleep))
117			wake_up_interruptible(sk->sk_sleep);
118
119		sk_wake_async(sk, 2, POLL_OUT);
120	}
121
122	read_unlock(&sk->sk_callback_lock);
123}
124
125static struct proto vcc_proto = {
126	.name	  = "VCC",
127	.owner	  = THIS_MODULE,
128	.obj_size = sizeof(struct atm_vcc),
129};
130
131int vcc_create(struct socket *sock, int protocol, int family)
132{
133	struct sock *sk;
134	struct atm_vcc *vcc;
135
136	sock->sk = NULL;
137	if (sock->type == SOCK_STREAM)
138		return -EINVAL;
139	sk = sk_alloc(family, GFP_KERNEL, &vcc_proto, 1);
140	if (!sk)
141		return -ENOMEM;
142	sock_init_data(sock, sk);
143	sk->sk_state_change = vcc_def_wakeup;
144	sk->sk_write_space = vcc_write_space;
145
146	vcc = atm_sk(sk);
147	vcc->dev = NULL;
148	memset(&vcc->local,0,sizeof(struct sockaddr_atmsvc));
149	memset(&vcc->remote,0,sizeof(struct sockaddr_atmsvc));
150	vcc->qos.txtp.max_sdu = 1 << 16; /* for meta VCs */
151	atomic_set(&sk->sk_wmem_alloc, 0);
152	atomic_set(&sk->sk_rmem_alloc, 0);
153	vcc->push = NULL;
154	vcc->pop = NULL;
155	vcc->push_oam = NULL;
156	vcc->vpi = vcc->vci = 0; /* no VCI/VPI yet */
157	vcc->atm_options = vcc->aal_options = 0;
158	sk->sk_destruct = vcc_sock_destruct;
159	return 0;
160}
161
162
163static void vcc_destroy_socket(struct sock *sk)
164{
165	struct atm_vcc *vcc = atm_sk(sk);
166	struct sk_buff *skb;
167
168	set_bit(ATM_VF_CLOSE, &vcc->flags);
169	clear_bit(ATM_VF_READY, &vcc->flags);
170	if (vcc->dev) {
171		if (vcc->dev->ops->close)
172			vcc->dev->ops->close(vcc);
173		if (vcc->push)
174			vcc->push(vcc, NULL); /* atmarpd has no push */
175
176		while ((skb = skb_dequeue(&sk->sk_receive_queue)) != NULL) {
177			atm_return(vcc,skb->truesize);
178			kfree_skb(skb);
179		}
180
181		module_put(vcc->dev->ops->owner);
182		atm_dev_put(vcc->dev);
183	}
184
185	vcc_remove_socket(sk);
186}
187
188
189int vcc_release(struct socket *sock)
190{
191	struct sock *sk = sock->sk;
192
193	if (sk) {
194		lock_sock(sk);
195		vcc_destroy_socket(sock->sk);
196		release_sock(sk);
197		sock_put(sk);
198	}
199
200	return 0;
201}
202
203
204void vcc_release_async(struct atm_vcc *vcc, int reply)
205{
206	struct sock *sk = sk_atm(vcc);
207
208	set_bit(ATM_VF_CLOSE, &vcc->flags);
209	sk->sk_shutdown |= RCV_SHUTDOWN;
210	sk->sk_err = -reply;
211	clear_bit(ATM_VF_WAITING, &vcc->flags);
212	sk->sk_state_change(sk);
213}
214
215
216EXPORT_SYMBOL(vcc_release_async);
217
218
219void atm_dev_release_vccs(struct atm_dev *dev)
220{
221	int i;
222
223	write_lock_irq(&vcc_sklist_lock);
224	for (i = 0; i < VCC_HTABLE_SIZE; i++) {
225		struct hlist_head *head = &vcc_hash[i];
226		struct hlist_node *node, *tmp;
227		struct sock *s;
228		struct atm_vcc *vcc;
229
230		sk_for_each_safe(s, node, tmp, head) {
231			vcc = atm_sk(s);
232			if (vcc->dev == dev) {
233				vcc_release_async(vcc, -EPIPE);
234				sk_del_node_init(s);
235			}
236		}
237	}
238	write_unlock_irq(&vcc_sklist_lock);
239}
240
241
242static int adjust_tp(struct atm_trafprm *tp,unsigned char aal)
243{
244	int max_sdu;
245
246	if (!tp->traffic_class) return 0;
247	switch (aal) {
248		case ATM_AAL0:
249			max_sdu = ATM_CELL_SIZE-1;
250			break;
251		case ATM_AAL34:
252			max_sdu = ATM_MAX_AAL34_PDU;
253			break;
254		default:
255			printk(KERN_WARNING "ATM: AAL problems ... "
256			    "(%d)\n",aal);
257			/* fall through */
258		case ATM_AAL5:
259			max_sdu = ATM_MAX_AAL5_PDU;
260	}
261	if (!tp->max_sdu) tp->max_sdu = max_sdu;
262	else if (tp->max_sdu > max_sdu) return -EINVAL;
263	if (!tp->max_cdv) tp->max_cdv = ATM_MAX_CDV;
264	return 0;
265}
266
267
268static int check_ci(struct atm_vcc *vcc, short vpi, int vci)
269{
270	struct hlist_head *head = &vcc_hash[vci &
271					(VCC_HTABLE_SIZE - 1)];
272	struct hlist_node *node;
273	struct sock *s;
274	struct atm_vcc *walk;
275
276	sk_for_each(s, node, head) {
277		walk = atm_sk(s);
278		if (walk->dev != vcc->dev)
279			continue;
280		if (test_bit(ATM_VF_ADDR, &walk->flags) && walk->vpi == vpi &&
281		    walk->vci == vci && ((walk->qos.txtp.traffic_class !=
282		    ATM_NONE && vcc->qos.txtp.traffic_class != ATM_NONE) ||
283		    (walk->qos.rxtp.traffic_class != ATM_NONE &&
284		    vcc->qos.rxtp.traffic_class != ATM_NONE)))
285			return -EADDRINUSE;
286	}
287
288	/* allow VCCs with same VPI/VCI iff they don't collide on
289	   TX/RX (but we may refuse such sharing for other reasons,
290	   e.g. if protocol requires to have both channels) */
291
292	return 0;
293}
294
295
296static int find_ci(struct atm_vcc *vcc, short *vpi, int *vci)
297{
298	static short p;        /* poor man's per-device cache */
299	static int c;
300	short old_p;
301	int old_c;
302	int err;
303
304	if (*vpi != ATM_VPI_ANY && *vci != ATM_VCI_ANY) {
305		err = check_ci(vcc, *vpi, *vci);
306		return err;
307	}
308	/* last scan may have left values out of bounds for current device */
309	if (*vpi != ATM_VPI_ANY)
310		p = *vpi;
311	else if (p >= 1 << vcc->dev->ci_range.vpi_bits)
312		p = 0;
313	if (*vci != ATM_VCI_ANY)
314		c = *vci;
315	else if (c < ATM_NOT_RSV_VCI || c >= 1 << vcc->dev->ci_range.vci_bits)
316			c = ATM_NOT_RSV_VCI;
317	old_p = p;
318	old_c = c;
319	do {
320		if (!check_ci(vcc, p, c)) {
321			*vpi = p;
322			*vci = c;
323			return 0;
324		}
325		if (*vci == ATM_VCI_ANY) {
326			c++;
327			if (c >= 1 << vcc->dev->ci_range.vci_bits)
328				c = ATM_NOT_RSV_VCI;
329		}
330		if ((c == ATM_NOT_RSV_VCI || *vci != ATM_VCI_ANY) &&
331		    *vpi == ATM_VPI_ANY) {
332			p++;
333			if (p >= 1 << vcc->dev->ci_range.vpi_bits) p = 0;
334		}
335	}
336	while (old_p != p || old_c != c);
337	return -EADDRINUSE;
338}
339
340
341static int __vcc_connect(struct atm_vcc *vcc, struct atm_dev *dev, short vpi,
342			 int vci)
343{
344	struct sock *sk = sk_atm(vcc);
345	int error;
346
347	if ((vpi != ATM_VPI_UNSPEC && vpi != ATM_VPI_ANY &&
348	    vpi >> dev->ci_range.vpi_bits) || (vci != ATM_VCI_UNSPEC &&
349	    vci != ATM_VCI_ANY && vci >> dev->ci_range.vci_bits))
350		return -EINVAL;
351	if (vci > 0 && vci < ATM_NOT_RSV_VCI && !capable(CAP_NET_BIND_SERVICE))
352		return -EPERM;
353	error = -ENODEV;
354	if (!try_module_get(dev->ops->owner))
355		return error;
356	vcc->dev = dev;
357	write_lock_irq(&vcc_sklist_lock);
358	if (test_bit(ATM_DF_REMOVED, &dev->flags) ||
359	    (error = find_ci(vcc, &vpi, &vci))) {
360		write_unlock_irq(&vcc_sklist_lock);
361		goto fail_module_put;
362	}
363	vcc->vpi = vpi;
364	vcc->vci = vci;
365	__vcc_insert_socket(sk);
366	write_unlock_irq(&vcc_sklist_lock);
367	switch (vcc->qos.aal) {
368		case ATM_AAL0:
369			error = atm_init_aal0(vcc);
370			vcc->stats = &dev->stats.aal0;
371			break;
372		case ATM_AAL34:
373			error = atm_init_aal34(vcc);
374			vcc->stats = &dev->stats.aal34;
375			break;
376		case ATM_NO_AAL:
377			/* ATM_AAL5 is also used in the "0 for default" case */
378			vcc->qos.aal = ATM_AAL5;
379			/* fall through */
380		case ATM_AAL5:
381			error = atm_init_aal5(vcc);
382			vcc->stats = &dev->stats.aal5;
383			break;
384		default:
385			error = -EPROTOTYPE;
386	}
387	if (!error) error = adjust_tp(&vcc->qos.txtp,vcc->qos.aal);
388	if (!error) error = adjust_tp(&vcc->qos.rxtp,vcc->qos.aal);
389	if (error)
390		goto fail;
391	DPRINTK("VCC %d.%d, AAL %d\n",vpi,vci,vcc->qos.aal);
392	DPRINTK("  TX: %d, PCR %d..%d, SDU %d\n",vcc->qos.txtp.traffic_class,
393	    vcc->qos.txtp.min_pcr,vcc->qos.txtp.max_pcr,vcc->qos.txtp.max_sdu);
394	DPRINTK("  RX: %d, PCR %d..%d, SDU %d\n",vcc->qos.rxtp.traffic_class,
395	    vcc->qos.rxtp.min_pcr,vcc->qos.rxtp.max_pcr,vcc->qos.rxtp.max_sdu);
396
397	if (dev->ops->open) {
398		if ((error = dev->ops->open(vcc)))
399			goto fail;
400	}
401	return 0;
402
403fail:
404	vcc_remove_socket(sk);
405fail_module_put:
406	module_put(dev->ops->owner);
407	/* ensure we get dev module ref count correct */
408	vcc->dev = NULL;
409	return error;
410}
411
412
413int vcc_connect(struct socket *sock, int itf, short vpi, int vci)
414{
415	struct atm_dev *dev;
416	struct atm_vcc *vcc = ATM_SD(sock);
417	int error;
418
419	DPRINTK("vcc_connect (vpi %d, vci %d)\n",vpi,vci);
420	if (sock->state == SS_CONNECTED)
421		return -EISCONN;
422	if (sock->state != SS_UNCONNECTED)
423		return -EINVAL;
424	if (!(vpi || vci))
425		return -EINVAL;
426
427	if (vpi != ATM_VPI_UNSPEC && vci != ATM_VCI_UNSPEC)
428		clear_bit(ATM_VF_PARTIAL,&vcc->flags);
429	else
430		if (test_bit(ATM_VF_PARTIAL,&vcc->flags))
431			return -EINVAL;
432	DPRINTK("vcc_connect (TX: cl %d,bw %d-%d,sdu %d; "
433	    "RX: cl %d,bw %d-%d,sdu %d,AAL %s%d)\n",
434	    vcc->qos.txtp.traffic_class,vcc->qos.txtp.min_pcr,
435	    vcc->qos.txtp.max_pcr,vcc->qos.txtp.max_sdu,
436	    vcc->qos.rxtp.traffic_class,vcc->qos.rxtp.min_pcr,
437	    vcc->qos.rxtp.max_pcr,vcc->qos.rxtp.max_sdu,
438	    vcc->qos.aal == ATM_AAL5 ? "" : vcc->qos.aal == ATM_AAL0 ? "" :
439	    " ??? code ",vcc->qos.aal == ATM_AAL0 ? 0 : vcc->qos.aal);
440	if (!test_bit(ATM_VF_HASQOS, &vcc->flags))
441		return -EBADFD;
442	if (vcc->qos.txtp.traffic_class == ATM_ANYCLASS ||
443	    vcc->qos.rxtp.traffic_class == ATM_ANYCLASS)
444		return -EINVAL;
445	if (likely(itf != ATM_ITF_ANY)) {
446		dev = try_then_request_module(atm_dev_lookup(itf), "atm-device-%d", itf);
447	} else {
448		dev = NULL;
449		mutex_lock(&atm_dev_mutex);
450		if (!list_empty(&atm_devs)) {
451			dev = list_entry(atm_devs.next, struct atm_dev, dev_list);
452			atm_dev_hold(dev);
453		}
454		mutex_unlock(&atm_dev_mutex);
455	}
456	if (!dev)
457		return -ENODEV;
458	error = __vcc_connect(vcc, dev, vpi, vci);
459	if (error) {
460		atm_dev_put(dev);
461		return error;
462	}
463	if (vpi == ATM_VPI_UNSPEC || vci == ATM_VCI_UNSPEC)
464		set_bit(ATM_VF_PARTIAL,&vcc->flags);
465	if (test_bit(ATM_VF_READY,&ATM_SD(sock)->flags))
466		sock->state = SS_CONNECTED;
467	return 0;
468}
469
470
471int vcc_recvmsg(struct kiocb *iocb, struct socket *sock, struct msghdr *msg,
472		size_t size, int flags)
473{
474	struct sock *sk = sock->sk;
475	struct atm_vcc *vcc;
476	struct sk_buff *skb;
477	int copied, error = -EINVAL;
478
479	if (sock->state != SS_CONNECTED)
480		return -ENOTCONN;
481	if (flags & ~MSG_DONTWAIT)		/* only handle MSG_DONTWAIT */
482		return -EOPNOTSUPP;
483	vcc = ATM_SD(sock);
484	if (test_bit(ATM_VF_RELEASED,&vcc->flags) ||
485	    test_bit(ATM_VF_CLOSE,&vcc->flags) ||
486	    !test_bit(ATM_VF_READY, &vcc->flags))
487		return 0;
488
489	skb = skb_recv_datagram(sk, flags, flags & MSG_DONTWAIT, &error);
490	if (!skb)
491		return error;
492
493	copied = skb->len;
494	if (copied > size) {
495		copied = size;
496		msg->msg_flags |= MSG_TRUNC;
497	}
498
499	error = skb_copy_datagram_iovec(skb, 0, msg->msg_iov, copied);
500	if (error)
501		return error;
502	sock_recv_timestamp(msg, sk, skb);
503	DPRINTK("RcvM %d -= %d\n", atomic_read(&sk->rmem_alloc), skb->truesize);
504	atm_return(vcc, skb->truesize);
505	skb_free_datagram(sk, skb);
506	return copied;
507}
508
509
510int vcc_sendmsg(struct kiocb *iocb, struct socket *sock, struct msghdr *m,
511		size_t total_len)
512{
513	struct sock *sk = sock->sk;
514	DEFINE_WAIT(wait);
515	struct atm_vcc *vcc;
516	struct sk_buff *skb;
517	int eff,error;
518	const void __user *buff;
519	int size;
520
521	lock_sock(sk);
522	if (sock->state != SS_CONNECTED) {
523		error = -ENOTCONN;
524		goto out;
525	}
526	if (m->msg_name) {
527		error = -EISCONN;
528		goto out;
529	}
530	if (m->msg_iovlen != 1) {
531		error = -ENOSYS; /* fix this later @@@ */
532		goto out;
533	}
534	buff = m->msg_iov->iov_base;
535	size = m->msg_iov->iov_len;
536	vcc = ATM_SD(sock);
537	if (test_bit(ATM_VF_RELEASED, &vcc->flags) ||
538	    test_bit(ATM_VF_CLOSE, &vcc->flags) ||
539	    !test_bit(ATM_VF_READY, &vcc->flags)) {
540		error = -EPIPE;
541		send_sig(SIGPIPE, current, 0);
542		goto out;
543	}
544	if (!size) {
545		error = 0;
546		goto out;
547	}
548	if (size < 0 || size > vcc->qos.txtp.max_sdu) {
549		error = -EMSGSIZE;
550		goto out;
551	}
552
553	eff = (size+3) & ~3; /* align to word boundary */
554	prepare_to_wait(sk->sk_sleep, &wait, TASK_INTERRUPTIBLE);
555	error = 0;
556	while (!(skb = alloc_tx(vcc,eff))) {
557		if (m->msg_flags & MSG_DONTWAIT) {
558			error = -EAGAIN;
559			break;
560		}
561		schedule();
562		if (signal_pending(current)) {
563			error = -ERESTARTSYS;
564			break;
565		}
566		if (test_bit(ATM_VF_RELEASED,&vcc->flags) ||
567		    test_bit(ATM_VF_CLOSE,&vcc->flags) ||
568		    !test_bit(ATM_VF_READY,&vcc->flags)) {
569			error = -EPIPE;
570			send_sig(SIGPIPE, current, 0);
571			break;
572		}
573		prepare_to_wait(sk->sk_sleep, &wait, TASK_INTERRUPTIBLE);
574	}
575	finish_wait(sk->sk_sleep, &wait);
576	if (error)
577		goto out;
578	skb->dev = NULL; /* for paths shared with net_device interfaces */
579	ATM_SKB(skb)->atm_options = vcc->atm_options;
580	if (copy_from_user(skb_put(skb,size),buff,size)) {
581		kfree_skb(skb);
582		error = -EFAULT;
583		goto out;
584	}
585	if (eff != size) memset(skb->data+size,0,eff-size);
586	error = vcc->dev->ops->send(vcc,skb);
587	error = error ? error : size;
588out:
589	release_sock(sk);
590	return error;
591}
592
593
594unsigned int vcc_poll(struct file *file, struct socket *sock, poll_table *wait)
595{
596	struct sock *sk = sock->sk;
597	struct atm_vcc *vcc;
598	unsigned int mask;
599
600	poll_wait(file, sk->sk_sleep, wait);
601	mask = 0;
602
603	vcc = ATM_SD(sock);
604
605	/* exceptional events */
606	if (sk->sk_err)
607		mask = POLLERR;
608
609	if (test_bit(ATM_VF_RELEASED, &vcc->flags) ||
610	    test_bit(ATM_VF_CLOSE, &vcc->flags))
611		mask |= POLLHUP;
612
613	/* readable? */
614	if (!skb_queue_empty(&sk->sk_receive_queue))
615		mask |= POLLIN | POLLRDNORM;
616
617	/* writable? */
618	if (sock->state == SS_CONNECTING &&
619	    test_bit(ATM_VF_WAITING, &vcc->flags))
620		return mask;
621
622	if (vcc->qos.txtp.traffic_class != ATM_NONE &&
623	    vcc_writable(sk))
624		mask |= POLLOUT | POLLWRNORM | POLLWRBAND;
625
626	return mask;
627}
628
629
630static int atm_change_qos(struct atm_vcc *vcc,struct atm_qos *qos)
631{
632	int error;
633
634	/*
635	 * Don't let the QoS change the already connected AAL type nor the
636	 * traffic class.
637	 */
638	if (qos->aal != vcc->qos.aal ||
639	    qos->rxtp.traffic_class != vcc->qos.rxtp.traffic_class ||
640	    qos->txtp.traffic_class != vcc->qos.txtp.traffic_class)
641		return -EINVAL;
642	error = adjust_tp(&qos->txtp,qos->aal);
643	if (!error) error = adjust_tp(&qos->rxtp,qos->aal);
644	if (error) return error;
645	if (!vcc->dev->ops->change_qos) return -EOPNOTSUPP;
646	if (sk_atm(vcc)->sk_family == AF_ATMPVC)
647		return vcc->dev->ops->change_qos(vcc,qos,ATM_MF_SET);
648	return svc_change_qos(vcc,qos);
649}
650
651
652static int check_tp(struct atm_trafprm *tp)
653{
654	/* @@@ Should be merged with adjust_tp */
655	if (!tp->traffic_class || tp->traffic_class == ATM_ANYCLASS) return 0;
656	if (tp->traffic_class != ATM_UBR && !tp->min_pcr && !tp->pcr &&
657	    !tp->max_pcr) return -EINVAL;
658	if (tp->min_pcr == ATM_MAX_PCR) return -EINVAL;
659	if (tp->min_pcr && tp->max_pcr && tp->max_pcr != ATM_MAX_PCR &&
660	    tp->min_pcr > tp->max_pcr) return -EINVAL;
661	/*
662	 * We allow pcr to be outside [min_pcr,max_pcr], because later
663	 * adjustment may still push it in the valid range.
664	 */
665	return 0;
666}
667
668
669static int check_qos(struct atm_qos *qos)
670{
671	int error;
672
673	if (!qos->txtp.traffic_class && !qos->rxtp.traffic_class)
674		return -EINVAL;
675	if (qos->txtp.traffic_class != qos->rxtp.traffic_class &&
676	    qos->txtp.traffic_class && qos->rxtp.traffic_class &&
677	    qos->txtp.traffic_class != ATM_ANYCLASS &&
678	    qos->rxtp.traffic_class != ATM_ANYCLASS) return -EINVAL;
679	error = check_tp(&qos->txtp);
680	if (error) return error;
681	return check_tp(&qos->rxtp);
682}
683
684int vcc_setsockopt(struct socket *sock, int level, int optname,
685		   char __user *optval, int optlen)
686{
687	struct atm_vcc *vcc;
688	unsigned long value;
689	int error;
690
691	if (__SO_LEVEL_MATCH(optname, level) && optlen != __SO_SIZE(optname))
692		return -EINVAL;
693
694	vcc = ATM_SD(sock);
695	switch (optname) {
696		case SO_ATMQOS:
697			{
698				struct atm_qos qos;
699
700				if (copy_from_user(&qos,optval,sizeof(qos)))
701					return -EFAULT;
702				error = check_qos(&qos);
703				if (error) return error;
704				if (sock->state == SS_CONNECTED)
705					return atm_change_qos(vcc,&qos);
706				if (sock->state != SS_UNCONNECTED)
707					return -EBADFD;
708				vcc->qos = qos;
709				set_bit(ATM_VF_HASQOS,&vcc->flags);
710				return 0;
711			}
712		case SO_SETCLP:
713			if (get_user(value,(unsigned long __user *)optval))
714				return -EFAULT;
715			if (value) vcc->atm_options |= ATM_ATMOPT_CLP;
716			else vcc->atm_options &= ~ATM_ATMOPT_CLP;
717			return 0;
718		default:
719			if (level == SOL_SOCKET) return -EINVAL;
720			break;
721	}
722	if (!vcc->dev || !vcc->dev->ops->setsockopt) return -EINVAL;
723	return vcc->dev->ops->setsockopt(vcc,level,optname,optval,optlen);
724}
725
726
727int vcc_getsockopt(struct socket *sock, int level, int optname,
728		   char __user *optval, int __user *optlen)
729{
730	struct atm_vcc *vcc;
731	int len;
732
733	if (get_user(len, optlen))
734		return -EFAULT;
735	if (__SO_LEVEL_MATCH(optname, level) && len != __SO_SIZE(optname))
736		return -EINVAL;
737
738	vcc = ATM_SD(sock);
739	switch (optname) {
740		case SO_ATMQOS:
741			if (!test_bit(ATM_VF_HASQOS,&vcc->flags))
742				return -EINVAL;
743			return copy_to_user(optval,&vcc->qos,sizeof(vcc->qos)) ?
744			    -EFAULT : 0;
745		case SO_SETCLP:
746			return put_user(vcc->atm_options & ATM_ATMOPT_CLP ? 1 :
747			  0,(unsigned long __user *)optval) ? -EFAULT : 0;
748		case SO_ATMPVC:
749			{
750				struct sockaddr_atmpvc pvc;
751
752				if (!vcc->dev ||
753				    !test_bit(ATM_VF_ADDR,&vcc->flags))
754					return -ENOTCONN;
755				pvc.sap_family = AF_ATMPVC;
756				pvc.sap_addr.itf = vcc->dev->number;
757				pvc.sap_addr.vpi = vcc->vpi;
758				pvc.sap_addr.vci = vcc->vci;
759				return copy_to_user(optval,&pvc,sizeof(pvc)) ?
760				    -EFAULT : 0;
761			}
762		default:
763			if (level == SOL_SOCKET) return -EINVAL;
764			break;
765	}
766	if (!vcc->dev || !vcc->dev->ops->getsockopt) return -EINVAL;
767	return vcc->dev->ops->getsockopt(vcc, level, optname, optval, len);
768}
769
770static int __init atm_init(void)
771{
772	int error;
773
774	if ((error = proto_register(&vcc_proto, 0)) < 0)
775		goto out;
776
777	if ((error = atmpvc_init()) < 0) {
778		printk(KERN_ERR "atmpvc_init() failed with %d\n", error);
779		goto out_unregister_vcc_proto;
780	}
781	if ((error = atmsvc_init()) < 0) {
782		printk(KERN_ERR "atmsvc_init() failed with %d\n", error);
783		goto out_atmpvc_exit;
784	}
785	if ((error = atm_proc_init()) < 0) {
786		printk(KERN_ERR "atm_proc_init() failed with %d\n",error);
787		goto out_atmsvc_exit;
788	}
789	if ((error = atm_sysfs_init()) < 0) {
790		printk(KERN_ERR "atm_sysfs_init() failed with %d\n",error);
791		goto out_atmproc_exit;
792	}
793out:
794	return error;
795out_atmproc_exit:
796	atm_proc_exit();
797out_atmsvc_exit:
798	atmsvc_exit();
799out_atmpvc_exit:
800	atmsvc_exit();
801out_unregister_vcc_proto:
802	proto_unregister(&vcc_proto);
803	goto out;
804}
805
806static void __exit atm_exit(void)
807{
808	atm_proc_exit();
809	atm_sysfs_exit();
810	atmsvc_exit();
811	atmpvc_exit();
812	proto_unregister(&vcc_proto);
813}
814
815subsys_initcall(atm_init);
816
817module_exit(atm_exit);
818
819MODULE_LICENSE("GPL");
820MODULE_ALIAS_NETPROTO(PF_ATMPVC);
821MODULE_ALIAS_NETPROTO(PF_ATMSVC);
822