1 /* net/atm/common.c - ATM sockets (common part for PVC and SVC) */
3 /* Written 1995-2000 by Werner Almesberger, EPFL LRC/ICA */
5 #define pr_fmt(fmt) KBUILD_MODNAME ":%s: " fmt, __func__
7 #include <linux/module.h>
8 #include <linux/kmod.h>
9 #include <linux/net.h> /* struct socket, struct proto_ops */
10 #include <linux/atm.h> /* ATM stuff */
11 #include <linux/atmdev.h>
12 #include <linux/socket.h> /* SOL_SOCKET */
13 #include <linux/errno.h> /* error codes */
14 #include <linux/capability.h>
16 #include <linux/sched.h>
17 #include <linux/time.h> /* struct timeval */
18 #include <linux/skbuff.h>
19 #include <linux/bitops.h>
20 #include <linux/init.h>
21 #include <net/sock.h> /* struct sock */
22 #include <linux/uaccess.h>
23 #include <linux/poll.h>
25 #include <asm/atomic.h>
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 */
33 struct hlist_head vcc_hash[VCC_HTABLE_SIZE];
34 EXPORT_SYMBOL(vcc_hash);
36 DEFINE_RWLOCK(vcc_sklist_lock);
37 EXPORT_SYMBOL(vcc_sklist_lock);
39 static void __vcc_insert_socket(struct sock *sk)
41 struct atm_vcc *vcc = atm_sk(sk);
42 struct hlist_head *head = &vcc_hash[vcc->vci & (VCC_HTABLE_SIZE - 1)];
43 sk->sk_hash = vcc->vci & (VCC_HTABLE_SIZE - 1);
44 sk_add_node(sk, head);
47 void vcc_insert_socket(struct sock *sk)
49 write_lock_irq(&vcc_sklist_lock);
50 __vcc_insert_socket(sk);
51 write_unlock_irq(&vcc_sklist_lock);
53 EXPORT_SYMBOL(vcc_insert_socket);
55 static void vcc_remove_socket(struct sock *sk)
57 write_lock_irq(&vcc_sklist_lock);
59 write_unlock_irq(&vcc_sklist_lock);
62 static struct sk_buff *alloc_tx(struct atm_vcc *vcc, unsigned int size)
65 struct sock *sk = sk_atm(vcc);
67 if (sk_wmem_alloc_get(sk) && !atm_may_send(vcc, size)) {
68 pr_debug("Sorry: wmem_alloc = %d, size = %d, sndbuf = %d\n",
69 sk_wmem_alloc_get(sk), size, sk->sk_sndbuf);
72 while (!(skb = alloc_skb(size, GFP_KERNEL)))
74 pr_debug("%d += %d\n", sk_wmem_alloc_get(sk), skb->truesize);
75 atomic_add(skb->truesize, &sk->sk_wmem_alloc);
79 static void vcc_sock_destruct(struct sock *sk)
81 if (atomic_read(&sk->sk_rmem_alloc))
82 printk(KERN_DEBUG "%s: rmem leakage (%d bytes) detected.\n",
83 __func__, atomic_read(&sk->sk_rmem_alloc));
85 if (atomic_read(&sk->sk_wmem_alloc))
86 printk(KERN_DEBUG "%s: wmem leakage (%d bytes) detected.\n",
87 __func__, atomic_read(&sk->sk_wmem_alloc));
90 static void vcc_def_wakeup(struct sock *sk)
92 read_lock(&sk->sk_callback_lock);
93 if (sk_has_sleeper(sk))
94 wake_up(sk->sk_sleep);
95 read_unlock(&sk->sk_callback_lock);
98 static inline int vcc_writable(struct sock *sk)
100 struct atm_vcc *vcc = atm_sk(sk);
102 return (vcc->qos.txtp.max_sdu +
103 atomic_read(&sk->sk_wmem_alloc)) <= sk->sk_sndbuf;
106 static void vcc_write_space(struct sock *sk)
108 read_lock(&sk->sk_callback_lock);
110 if (vcc_writable(sk)) {
111 if (sk_has_sleeper(sk))
112 wake_up_interruptible(sk->sk_sleep);
114 sk_wake_async(sk, SOCK_WAKE_SPACE, POLL_OUT);
117 read_unlock(&sk->sk_callback_lock);
120 static struct proto vcc_proto = {
122 .owner = THIS_MODULE,
123 .obj_size = sizeof(struct atm_vcc),
126 int vcc_create(struct net *net, struct socket *sock, int protocol, int family)
132 if (sock->type == SOCK_STREAM)
134 sk = sk_alloc(net, family, GFP_KERNEL, &vcc_proto);
137 sock_init_data(sock, sk);
138 sk->sk_state_change = vcc_def_wakeup;
139 sk->sk_write_space = vcc_write_space;
143 memset(&vcc->local, 0, sizeof(struct sockaddr_atmsvc));
144 memset(&vcc->remote, 0, sizeof(struct sockaddr_atmsvc));
145 vcc->qos.txtp.max_sdu = 1 << 16; /* for meta VCs */
146 atomic_set(&sk->sk_wmem_alloc, 1);
147 atomic_set(&sk->sk_rmem_alloc, 0);
150 vcc->push_oam = NULL;
151 vcc->vpi = vcc->vci = 0; /* no VCI/VPI yet */
152 vcc->atm_options = vcc->aal_options = 0;
153 sk->sk_destruct = vcc_sock_destruct;
157 static void vcc_destroy_socket(struct sock *sk)
159 struct atm_vcc *vcc = atm_sk(sk);
162 set_bit(ATM_VF_CLOSE, &vcc->flags);
163 clear_bit(ATM_VF_READY, &vcc->flags);
165 if (vcc->dev->ops->close)
166 vcc->dev->ops->close(vcc);
168 vcc->push(vcc, NULL); /* atmarpd has no push */
170 while ((skb = skb_dequeue(&sk->sk_receive_queue)) != NULL) {
171 atm_return(vcc, skb->truesize);
175 module_put(vcc->dev->ops->owner);
176 atm_dev_put(vcc->dev);
179 vcc_remove_socket(sk);
182 int vcc_release(struct socket *sock)
184 struct sock *sk = sock->sk;
188 vcc_destroy_socket(sock->sk);
196 void vcc_release_async(struct atm_vcc *vcc, int reply)
198 struct sock *sk = sk_atm(vcc);
200 set_bit(ATM_VF_CLOSE, &vcc->flags);
201 sk->sk_shutdown |= RCV_SHUTDOWN;
203 clear_bit(ATM_VF_WAITING, &vcc->flags);
204 sk->sk_state_change(sk);
206 EXPORT_SYMBOL(vcc_release_async);
209 void atm_dev_release_vccs(struct atm_dev *dev)
213 write_lock_irq(&vcc_sklist_lock);
214 for (i = 0; i < VCC_HTABLE_SIZE; i++) {
215 struct hlist_head *head = &vcc_hash[i];
216 struct hlist_node *node, *tmp;
220 sk_for_each_safe(s, node, tmp, head) {
222 if (vcc->dev == dev) {
223 vcc_release_async(vcc, -EPIPE);
228 write_unlock_irq(&vcc_sklist_lock);
231 static int adjust_tp(struct atm_trafprm *tp, unsigned char aal)
235 if (!tp->traffic_class)
239 max_sdu = ATM_CELL_SIZE-1;
242 max_sdu = ATM_MAX_AAL34_PDU;
245 pr_warning("AAL problems ... (%d)\n", aal);
248 max_sdu = ATM_MAX_AAL5_PDU;
251 tp->max_sdu = max_sdu;
252 else if (tp->max_sdu > max_sdu)
255 tp->max_cdv = ATM_MAX_CDV;
259 static int check_ci(const struct atm_vcc *vcc, short vpi, int vci)
261 struct hlist_head *head = &vcc_hash[vci & (VCC_HTABLE_SIZE - 1)];
262 struct hlist_node *node;
264 struct atm_vcc *walk;
266 sk_for_each(s, node, head) {
268 if (walk->dev != vcc->dev)
270 if (test_bit(ATM_VF_ADDR, &walk->flags) && walk->vpi == vpi &&
271 walk->vci == vci && ((walk->qos.txtp.traffic_class !=
272 ATM_NONE && vcc->qos.txtp.traffic_class != ATM_NONE) ||
273 (walk->qos.rxtp.traffic_class != ATM_NONE &&
274 vcc->qos.rxtp.traffic_class != ATM_NONE)))
278 /* allow VCCs with same VPI/VCI iff they don't collide on
279 TX/RX (but we may refuse such sharing for other reasons,
280 e.g. if protocol requires to have both channels) */
285 static int find_ci(const struct atm_vcc *vcc, short *vpi, int *vci)
287 static short p; /* poor man's per-device cache */
293 if (*vpi != ATM_VPI_ANY && *vci != ATM_VCI_ANY) {
294 err = check_ci(vcc, *vpi, *vci);
297 /* last scan may have left values out of bounds for current device */
298 if (*vpi != ATM_VPI_ANY)
300 else if (p >= 1 << vcc->dev->ci_range.vpi_bits)
302 if (*vci != ATM_VCI_ANY)
304 else if (c < ATM_NOT_RSV_VCI || c >= 1 << vcc->dev->ci_range.vci_bits)
309 if (!check_ci(vcc, p, c)) {
314 if (*vci == ATM_VCI_ANY) {
316 if (c >= 1 << vcc->dev->ci_range.vci_bits)
319 if ((c == ATM_NOT_RSV_VCI || *vci != ATM_VCI_ANY) &&
320 *vpi == ATM_VPI_ANY) {
322 if (p >= 1 << vcc->dev->ci_range.vpi_bits)
325 } while (old_p != p || old_c != c);
329 static int __vcc_connect(struct atm_vcc *vcc, struct atm_dev *dev, short vpi,
332 struct sock *sk = sk_atm(vcc);
335 if ((vpi != ATM_VPI_UNSPEC && vpi != ATM_VPI_ANY &&
336 vpi >> dev->ci_range.vpi_bits) || (vci != ATM_VCI_UNSPEC &&
337 vci != ATM_VCI_ANY && vci >> dev->ci_range.vci_bits))
339 if (vci > 0 && vci < ATM_NOT_RSV_VCI && !capable(CAP_NET_BIND_SERVICE))
342 if (!try_module_get(dev->ops->owner))
345 write_lock_irq(&vcc_sklist_lock);
346 if (test_bit(ATM_DF_REMOVED, &dev->flags) ||
347 (error = find_ci(vcc, &vpi, &vci))) {
348 write_unlock_irq(&vcc_sklist_lock);
349 goto fail_module_put;
353 __vcc_insert_socket(sk);
354 write_unlock_irq(&vcc_sklist_lock);
355 switch (vcc->qos.aal) {
357 error = atm_init_aal0(vcc);
358 vcc->stats = &dev->stats.aal0;
361 error = atm_init_aal34(vcc);
362 vcc->stats = &dev->stats.aal34;
365 /* ATM_AAL5 is also used in the "0 for default" case */
366 vcc->qos.aal = ATM_AAL5;
369 error = atm_init_aal5(vcc);
370 vcc->stats = &dev->stats.aal5;
376 error = adjust_tp(&vcc->qos.txtp, vcc->qos.aal);
378 error = adjust_tp(&vcc->qos.rxtp, vcc->qos.aal);
381 pr_debug("VCC %d.%d, AAL %d\n", vpi, vci, vcc->qos.aal);
382 pr_debug(" TX: %d, PCR %d..%d, SDU %d\n",
383 vcc->qos.txtp.traffic_class,
384 vcc->qos.txtp.min_pcr,
385 vcc->qos.txtp.max_pcr,
386 vcc->qos.txtp.max_sdu);
387 pr_debug(" RX: %d, PCR %d..%d, SDU %d\n",
388 vcc->qos.rxtp.traffic_class,
389 vcc->qos.rxtp.min_pcr,
390 vcc->qos.rxtp.max_pcr,
391 vcc->qos.rxtp.max_sdu);
393 if (dev->ops->open) {
394 error = dev->ops->open(vcc);
401 vcc_remove_socket(sk);
403 module_put(dev->ops->owner);
404 /* ensure we get dev module ref count correct */
409 int vcc_connect(struct socket *sock, int itf, short vpi, int vci)
412 struct atm_vcc *vcc = ATM_SD(sock);
415 pr_debug("(vpi %d, vci %d)\n", vpi, vci);
416 if (sock->state == SS_CONNECTED)
418 if (sock->state != SS_UNCONNECTED)
423 if (vpi != ATM_VPI_UNSPEC && vci != ATM_VCI_UNSPEC)
424 clear_bit(ATM_VF_PARTIAL, &vcc->flags);
426 if (test_bit(ATM_VF_PARTIAL, &vcc->flags))
428 pr_debug("(TX: cl %d,bw %d-%d,sdu %d; "
429 "RX: cl %d,bw %d-%d,sdu %d,AAL %s%d)\n",
430 vcc->qos.txtp.traffic_class, vcc->qos.txtp.min_pcr,
431 vcc->qos.txtp.max_pcr, vcc->qos.txtp.max_sdu,
432 vcc->qos.rxtp.traffic_class, vcc->qos.rxtp.min_pcr,
433 vcc->qos.rxtp.max_pcr, vcc->qos.rxtp.max_sdu,
434 vcc->qos.aal == ATM_AAL5 ? "" :
435 vcc->qos.aal == ATM_AAL0 ? "" : " ??? code ",
436 vcc->qos.aal == ATM_AAL0 ? 0 : vcc->qos.aal);
437 if (!test_bit(ATM_VF_HASQOS, &vcc->flags))
439 if (vcc->qos.txtp.traffic_class == ATM_ANYCLASS ||
440 vcc->qos.rxtp.traffic_class == ATM_ANYCLASS)
442 if (likely(itf != ATM_ITF_ANY)) {
443 dev = try_then_request_module(atm_dev_lookup(itf),
444 "atm-device-%d", itf);
447 mutex_lock(&atm_dev_mutex);
448 if (!list_empty(&atm_devs)) {
449 dev = list_entry(atm_devs.next,
450 struct atm_dev, dev_list);
453 mutex_unlock(&atm_dev_mutex);
457 error = __vcc_connect(vcc, dev, vpi, vci);
462 if (vpi == ATM_VPI_UNSPEC || vci == ATM_VCI_UNSPEC)
463 set_bit(ATM_VF_PARTIAL, &vcc->flags);
464 if (test_bit(ATM_VF_READY, &ATM_SD(sock)->flags))
465 sock->state = SS_CONNECTED;
469 int vcc_recvmsg(struct kiocb *iocb, struct socket *sock, struct msghdr *msg,
470 size_t size, int flags)
472 struct sock *sk = sock->sk;
475 int copied, error = -EINVAL;
477 if (sock->state != SS_CONNECTED)
479 if (flags & ~MSG_DONTWAIT) /* only handle MSG_DONTWAIT */
482 if (test_bit(ATM_VF_RELEASED, &vcc->flags) ||
483 test_bit(ATM_VF_CLOSE, &vcc->flags) ||
484 !test_bit(ATM_VF_READY, &vcc->flags))
487 skb = skb_recv_datagram(sk, flags, flags & MSG_DONTWAIT, &error);
494 msg->msg_flags |= MSG_TRUNC;
497 error = skb_copy_datagram_iovec(skb, 0, msg->msg_iov, copied);
500 sock_recv_ts_and_drops(msg, sk, skb);
501 pr_debug("%d -= %d\n", atomic_read(&sk->sk_rmem_alloc), skb->truesize);
502 atm_return(vcc, skb->truesize);
503 skb_free_datagram(sk, skb);
507 int vcc_sendmsg(struct kiocb *iocb, struct socket *sock, struct msghdr *m,
510 struct sock *sk = sock->sk;
515 const void __user *buff;
519 if (sock->state != SS_CONNECTED) {
527 if (m->msg_iovlen != 1) {
528 error = -ENOSYS; /* fix this later @@@ */
531 buff = m->msg_iov->iov_base;
532 size = m->msg_iov->iov_len;
534 if (test_bit(ATM_VF_RELEASED, &vcc->flags) ||
535 test_bit(ATM_VF_CLOSE, &vcc->flags) ||
536 !test_bit(ATM_VF_READY, &vcc->flags)) {
538 send_sig(SIGPIPE, current, 0);
545 if (size < 0 || size > vcc->qos.txtp.max_sdu) {
550 eff = (size+3) & ~3; /* align to word boundary */
551 prepare_to_wait(sk->sk_sleep, &wait, TASK_INTERRUPTIBLE);
553 while (!(skb = alloc_tx(vcc, eff))) {
554 if (m->msg_flags & MSG_DONTWAIT) {
559 if (signal_pending(current)) {
560 error = -ERESTARTSYS;
563 if (test_bit(ATM_VF_RELEASED, &vcc->flags) ||
564 test_bit(ATM_VF_CLOSE, &vcc->flags) ||
565 !test_bit(ATM_VF_READY, &vcc->flags)) {
567 send_sig(SIGPIPE, current, 0);
570 prepare_to_wait(sk->sk_sleep, &wait, TASK_INTERRUPTIBLE);
572 finish_wait(sk->sk_sleep, &wait);
575 skb->dev = NULL; /* for paths shared with net_device interfaces */
576 ATM_SKB(skb)->atm_options = vcc->atm_options;
577 if (copy_from_user(skb_put(skb, size), buff, size)) {
583 memset(skb->data + size, 0, eff-size);
584 error = vcc->dev->ops->send(vcc, skb);
585 error = error ? error : size;
591 unsigned int vcc_poll(struct file *file, struct socket *sock, poll_table *wait)
593 struct sock *sk = sock->sk;
597 sock_poll_wait(file, sk->sk_sleep, wait);
602 /* exceptional events */
606 if (test_bit(ATM_VF_RELEASED, &vcc->flags) ||
607 test_bit(ATM_VF_CLOSE, &vcc->flags))
611 if (!skb_queue_empty(&sk->sk_receive_queue))
612 mask |= POLLIN | POLLRDNORM;
615 if (sock->state == SS_CONNECTING &&
616 test_bit(ATM_VF_WAITING, &vcc->flags))
619 if (vcc->qos.txtp.traffic_class != ATM_NONE &&
621 mask |= POLLOUT | POLLWRNORM | POLLWRBAND;
626 static int atm_change_qos(struct atm_vcc *vcc, struct atm_qos *qos)
631 * Don't let the QoS change the already connected AAL type nor the
634 if (qos->aal != vcc->qos.aal ||
635 qos->rxtp.traffic_class != vcc->qos.rxtp.traffic_class ||
636 qos->txtp.traffic_class != vcc->qos.txtp.traffic_class)
638 error = adjust_tp(&qos->txtp, qos->aal);
640 error = adjust_tp(&qos->rxtp, qos->aal);
643 if (!vcc->dev->ops->change_qos)
645 if (sk_atm(vcc)->sk_family == AF_ATMPVC)
646 return vcc->dev->ops->change_qos(vcc, qos, ATM_MF_SET);
647 return svc_change_qos(vcc, qos);
650 static int check_tp(const struct atm_trafprm *tp)
652 /* @@@ Should be merged with adjust_tp */
653 if (!tp->traffic_class || tp->traffic_class == ATM_ANYCLASS)
655 if (tp->traffic_class != ATM_UBR && !tp->min_pcr && !tp->pcr &&
658 if (tp->min_pcr == ATM_MAX_PCR)
660 if (tp->min_pcr && tp->max_pcr && tp->max_pcr != ATM_MAX_PCR &&
661 tp->min_pcr > tp->max_pcr)
664 * We allow pcr to be outside [min_pcr,max_pcr], because later
665 * adjustment may still push it in the valid range.
670 static int check_qos(const struct atm_qos *qos)
674 if (!qos->txtp.traffic_class && !qos->rxtp.traffic_class)
676 if (qos->txtp.traffic_class != qos->rxtp.traffic_class &&
677 qos->txtp.traffic_class && qos->rxtp.traffic_class &&
678 qos->txtp.traffic_class != ATM_ANYCLASS &&
679 qos->rxtp.traffic_class != ATM_ANYCLASS)
681 error = check_tp(&qos->txtp);
684 return check_tp(&qos->rxtp);
687 int vcc_setsockopt(struct socket *sock, int level, int optname,
688 char __user *optval, unsigned int optlen)
694 if (__SO_LEVEL_MATCH(optname, level) && optlen != __SO_SIZE(optname))
703 if (copy_from_user(&qos, optval, sizeof(qos)))
705 error = check_qos(&qos);
708 if (sock->state == SS_CONNECTED)
709 return atm_change_qos(vcc, &qos);
710 if (sock->state != SS_UNCONNECTED)
713 set_bit(ATM_VF_HASQOS, &vcc->flags);
717 if (get_user(value, (unsigned long __user *)optval))
720 vcc->atm_options |= ATM_ATMOPT_CLP;
722 vcc->atm_options &= ~ATM_ATMOPT_CLP;
725 if (level == SOL_SOCKET)
729 if (!vcc->dev || !vcc->dev->ops->setsockopt)
731 return vcc->dev->ops->setsockopt(vcc, level, optname, optval, optlen);
734 int vcc_getsockopt(struct socket *sock, int level, int optname,
735 char __user *optval, int __user *optlen)
740 if (get_user(len, optlen))
742 if (__SO_LEVEL_MATCH(optname, level) && len != __SO_SIZE(optname))
748 if (!test_bit(ATM_VF_HASQOS, &vcc->flags))
750 return copy_to_user(optval, &vcc->qos, sizeof(vcc->qos))
753 return put_user(vcc->atm_options & ATM_ATMOPT_CLP ? 1 : 0,
754 (unsigned long __user *)optval) ? -EFAULT : 0;
757 struct sockaddr_atmpvc pvc;
759 if (!vcc->dev || !test_bit(ATM_VF_ADDR, &vcc->flags))
761 pvc.sap_family = AF_ATMPVC;
762 pvc.sap_addr.itf = vcc->dev->number;
763 pvc.sap_addr.vpi = vcc->vpi;
764 pvc.sap_addr.vci = vcc->vci;
765 return copy_to_user(optval, &pvc, sizeof(pvc)) ? -EFAULT : 0;
768 if (level == SOL_SOCKET)
772 if (!vcc->dev || !vcc->dev->ops->getsockopt)
774 return vcc->dev->ops->getsockopt(vcc, level, optname, optval, len);
777 static int __init atm_init(void)
781 error = proto_register(&vcc_proto, 0);
784 error = atmpvc_init();
786 pr_err("atmpvc_init() failed with %d\n", error);
787 goto out_unregister_vcc_proto;
789 error = atmsvc_init();
791 pr_err("atmsvc_init() failed with %d\n", error);
792 goto out_atmpvc_exit;
794 error = atm_proc_init();
796 pr_err("atm_proc_init() failed with %d\n", error);
797 goto out_atmsvc_exit;
799 error = atm_sysfs_init();
801 pr_err("atm_sysfs_init() failed with %d\n", error);
802 goto out_atmproc_exit;
812 out_unregister_vcc_proto:
813 proto_unregister(&vcc_proto);
817 static void __exit atm_exit(void)
823 proto_unregister(&vcc_proto);
826 subsys_initcall(atm_init);
828 module_exit(atm_exit);
830 MODULE_LICENSE("GPL");
831 MODULE_ALIAS_NETPROTO(PF_ATMPVC);
832 MODULE_ALIAS_NETPROTO(PF_ATMSVC);