1 /* net/atm/svc.c - ATM SVC sockets */
3 /* Written 1995-2000 by Werner Almesberger, EPFL LRC/ICA */
5 #define pr_fmt(fmt) KBUILD_MODNAME ":%s: " fmt, __func__
7 #include <linux/string.h>
8 #include <linux/net.h> /* struct socket, struct proto_ops */
9 #include <linux/errno.h> /* error codes */
10 #include <linux/kernel.h> /* printk */
11 #include <linux/skbuff.h>
12 #include <linux/wait.h>
13 #include <linux/sched.h> /* jiffies and HZ */
14 #include <linux/fcntl.h> /* O_NONBLOCK */
15 #include <linux/init.h>
16 #include <linux/atm.h> /* ATM stuff */
17 #include <linux/atmsap.h>
18 #include <linux/atmsvc.h>
19 #include <linux/atmdev.h>
20 #include <linux/bitops.h>
21 #include <net/sock.h> /* for sock_no_* */
22 #include <linux/uaccess.h>
23 #include <linux/export.h>
25 #include "resources.h"
26 #include "common.h" /* common for PVCs and SVCs */
27 #include "signaling.h"
30 static int svc_create(struct net
*net
, struct socket
*sock
, int protocol
,
34 * Note: since all this is still nicely synchronized with the signaling demon,
35 * there's no need to protect sleep loops with clis. If signaling is
36 * moved into the kernel, that would change.
40 static int svc_shutdown(struct socket
*sock
, int how
)
45 static void svc_disconnect(struct atm_vcc
*vcc
)
49 struct sock
*sk
= sk_atm(vcc
);
51 pr_debug("%p\n", vcc
);
52 if (test_bit(ATM_VF_REGIS
, &vcc
->flags
)) {
53 prepare_to_wait(sk_sleep(sk
), &wait
, TASK_UNINTERRUPTIBLE
);
54 sigd_enq(vcc
, as_close
, NULL
, NULL
, NULL
);
55 while (!test_bit(ATM_VF_RELEASED
, &vcc
->flags
) && sigd
) {
57 prepare_to_wait(sk_sleep(sk
), &wait
,
58 TASK_UNINTERRUPTIBLE
);
60 finish_wait(sk_sleep(sk
), &wait
);
62 /* beware - socket is still in use by atmsigd until the last
63 as_indicate has been answered */
64 while ((skb
= skb_dequeue(&sk
->sk_receive_queue
)) != NULL
) {
65 atm_return(vcc
, skb
->truesize
);
66 pr_debug("LISTEN REL\n");
67 sigd_enq2(NULL
, as_reject
, vcc
, NULL
, NULL
, &vcc
->qos
, 0);
70 clear_bit(ATM_VF_REGIS
, &vcc
->flags
);
71 /* ... may retry later */
74 static int svc_release(struct socket
*sock
)
76 struct sock
*sk
= sock
->sk
;
81 pr_debug("%p\n", vcc
);
82 clear_bit(ATM_VF_READY
, &vcc
->flags
);
84 * VCC pointer is used as a reference,
85 * so we must not free it (thereby subjecting it to re-use)
86 * before all pending connections are closed
94 static int svc_bind(struct socket
*sock
, struct sockaddr
*sockaddr
,
98 struct sock
*sk
= sock
->sk
;
99 struct sockaddr_atmsvc
*addr
;
103 if (sockaddr_len
!= sizeof(struct sockaddr_atmsvc
))
106 if (sock
->state
== SS_CONNECTED
) {
110 if (sock
->state
!= SS_UNCONNECTED
) {
115 addr
= (struct sockaddr_atmsvc
*) sockaddr
;
116 if (addr
->sas_family
!= AF_ATMSVC
) {
117 error
= -EAFNOSUPPORT
;
120 clear_bit(ATM_VF_BOUND
, &vcc
->flags
);
121 /* failing rebind will kill old binding */
122 /* @@@ check memory (de)allocation on rebind */
123 if (!test_bit(ATM_VF_HASQOS
, &vcc
->flags
)) {
128 set_bit(ATM_VF_WAITING
, &vcc
->flags
);
129 prepare_to_wait(sk_sleep(sk
), &wait
, TASK_UNINTERRUPTIBLE
);
130 sigd_enq(vcc
, as_bind
, NULL
, NULL
, &vcc
->local
);
131 while (test_bit(ATM_VF_WAITING
, &vcc
->flags
) && sigd
) {
133 prepare_to_wait(sk_sleep(sk
), &wait
, TASK_UNINTERRUPTIBLE
);
135 finish_wait(sk_sleep(sk
), &wait
);
136 clear_bit(ATM_VF_REGIS
, &vcc
->flags
); /* doesn't count */
142 set_bit(ATM_VF_BOUND
, &vcc
->flags
);
149 static int svc_connect(struct socket
*sock
, struct sockaddr
*sockaddr
,
150 int sockaddr_len
, int flags
)
153 struct sock
*sk
= sock
->sk
;
154 struct sockaddr_atmsvc
*addr
;
155 struct atm_vcc
*vcc
= ATM_SD(sock
);
158 pr_debug("%p\n", vcc
);
160 if (sockaddr_len
!= sizeof(struct sockaddr_atmsvc
)) {
165 switch (sock
->state
) {
173 if (test_bit(ATM_VF_WAITING
, &vcc
->flags
)) {
177 sock
->state
= SS_UNCONNECTED
;
184 addr
= (struct sockaddr_atmsvc
*) sockaddr
;
185 if (addr
->sas_family
!= AF_ATMSVC
) {
186 error
= -EAFNOSUPPORT
;
189 if (!test_bit(ATM_VF_HASQOS
, &vcc
->flags
)) {
193 if (vcc
->qos
.txtp
.traffic_class
== ATM_ANYCLASS
||
194 vcc
->qos
.rxtp
.traffic_class
== ATM_ANYCLASS
) {
198 if (!vcc
->qos
.txtp
.traffic_class
&&
199 !vcc
->qos
.rxtp
.traffic_class
) {
204 set_bit(ATM_VF_WAITING
, &vcc
->flags
);
205 prepare_to_wait(sk_sleep(sk
), &wait
, TASK_INTERRUPTIBLE
);
206 sigd_enq(vcc
, as_connect
, NULL
, NULL
, &vcc
->remote
);
207 if (flags
& O_NONBLOCK
) {
208 finish_wait(sk_sleep(sk
), &wait
);
209 sock
->state
= SS_CONNECTING
;
210 error
= -EINPROGRESS
;
214 while (test_bit(ATM_VF_WAITING
, &vcc
->flags
) && sigd
) {
216 if (!signal_pending(current
)) {
217 prepare_to_wait(sk_sleep(sk
), &wait
,
221 pr_debug("*ABORT*\n");
224 * Kernel ---close--> Demon
225 * Kernel <--close--- Demon
227 * Kernel ---close--> Demon
228 * Kernel <--error--- Demon
230 * Kernel ---close--> Demon
231 * Kernel <--okay---- Demon
232 * Kernel <--close--- Demon
234 sigd_enq(vcc
, as_close
, NULL
, NULL
, NULL
);
235 while (test_bit(ATM_VF_WAITING
, &vcc
->flags
) && sigd
) {
236 prepare_to_wait(sk_sleep(sk
), &wait
,
241 while (!test_bit(ATM_VF_RELEASED
, &vcc
->flags
) &&
243 prepare_to_wait(sk_sleep(sk
), &wait
,
247 clear_bit(ATM_VF_REGIS
, &vcc
->flags
);
248 clear_bit(ATM_VF_RELEASED
, &vcc
->flags
);
249 clear_bit(ATM_VF_CLOSE
, &vcc
->flags
);
250 /* we're gone now but may connect later */
254 finish_wait(sk_sleep(sk
), &wait
);
267 vcc
->qos
.txtp
.max_pcr
= SELECT_TOP_PCR(vcc
->qos
.txtp
);
268 vcc
->qos
.txtp
.pcr
= 0;
269 vcc
->qos
.txtp
.min_pcr
= 0;
271 error
= vcc_connect(sock
, vcc
->itf
, vcc
->vpi
, vcc
->vci
);
273 sock
->state
= SS_CONNECTED
;
275 (void)svc_disconnect(vcc
);
281 static int svc_listen(struct socket
*sock
, int backlog
)
284 struct sock
*sk
= sock
->sk
;
285 struct atm_vcc
*vcc
= ATM_SD(sock
);
288 pr_debug("%p\n", vcc
);
290 /* let server handle listen on unbound sockets */
291 if (test_bit(ATM_VF_SESSION
, &vcc
->flags
)) {
295 if (test_bit(ATM_VF_LISTEN
, &vcc
->flags
)) {
299 set_bit(ATM_VF_WAITING
, &vcc
->flags
);
300 prepare_to_wait(sk_sleep(sk
), &wait
, TASK_UNINTERRUPTIBLE
);
301 sigd_enq(vcc
, as_listen
, NULL
, NULL
, &vcc
->local
);
302 while (test_bit(ATM_VF_WAITING
, &vcc
->flags
) && sigd
) {
304 prepare_to_wait(sk_sleep(sk
), &wait
, TASK_UNINTERRUPTIBLE
);
306 finish_wait(sk_sleep(sk
), &wait
);
311 set_bit(ATM_VF_LISTEN
, &vcc
->flags
);
312 vcc_insert_socket(sk
);
313 sk
->sk_max_ack_backlog
= backlog
> 0 ? backlog
: ATM_BACKLOG_DEFAULT
;
320 static int svc_accept(struct socket
*sock
, struct socket
*newsock
, int flags
)
322 struct sock
*sk
= sock
->sk
;
324 struct atmsvc_msg
*msg
;
325 struct atm_vcc
*old_vcc
= ATM_SD(sock
);
326 struct atm_vcc
*new_vcc
;
331 error
= svc_create(sock_net(sk
), newsock
, 0, 0);
335 new_vcc
= ATM_SD(newsock
);
337 pr_debug("%p -> %p\n", old_vcc
, new_vcc
);
341 prepare_to_wait(sk_sleep(sk
), &wait
, TASK_INTERRUPTIBLE
);
342 while (!(skb
= skb_dequeue(&sk
->sk_receive_queue
)) &&
344 if (test_bit(ATM_VF_RELEASED
, &old_vcc
->flags
))
346 if (test_bit(ATM_VF_CLOSE
, &old_vcc
->flags
)) {
350 if (flags
& O_NONBLOCK
) {
357 if (signal_pending(current
)) {
358 error
= -ERESTARTSYS
;
361 prepare_to_wait(sk_sleep(sk
), &wait
,
364 finish_wait(sk_sleep(sk
), &wait
);
371 msg
= (struct atmsvc_msg
*)skb
->data
;
372 new_vcc
->qos
= msg
->qos
;
373 set_bit(ATM_VF_HASQOS
, &new_vcc
->flags
);
374 new_vcc
->remote
= msg
->svc
;
375 new_vcc
->local
= msg
->local
;
376 new_vcc
->sap
= msg
->sap
;
377 error
= vcc_connect(newsock
, msg
->pvc
.sap_addr
.itf
,
378 msg
->pvc
.sap_addr
.vpi
,
379 msg
->pvc
.sap_addr
.vci
);
381 sk
->sk_ack_backlog
--;
383 sigd_enq2(NULL
, as_reject
, old_vcc
, NULL
, NULL
,
384 &old_vcc
->qos
, error
);
385 error
= error
== -EAGAIN
? -EBUSY
: error
;
388 /* wait should be short, so we ignore the non-blocking flag */
389 set_bit(ATM_VF_WAITING
, &new_vcc
->flags
);
390 prepare_to_wait(sk_sleep(sk_atm(new_vcc
)), &wait
,
391 TASK_UNINTERRUPTIBLE
);
392 sigd_enq(new_vcc
, as_accept
, old_vcc
, NULL
, NULL
);
393 while (test_bit(ATM_VF_WAITING
, &new_vcc
->flags
) && sigd
) {
397 prepare_to_wait(sk_sleep(sk_atm(new_vcc
)), &wait
,
398 TASK_UNINTERRUPTIBLE
);
400 finish_wait(sk_sleep(sk_atm(new_vcc
)), &wait
);
405 if (!sk_atm(new_vcc
)->sk_err
)
407 if (sk_atm(new_vcc
)->sk_err
!= ERESTARTSYS
) {
408 error
= -sk_atm(new_vcc
)->sk_err
;
412 newsock
->state
= SS_CONNECTED
;
418 static int svc_getname(struct socket
*sock
, struct sockaddr
*sockaddr
,
419 int *sockaddr_len
, int peer
)
421 struct sockaddr_atmsvc
*addr
;
423 *sockaddr_len
= sizeof(struct sockaddr_atmsvc
);
424 addr
= (struct sockaddr_atmsvc
*) sockaddr
;
425 memcpy(addr
, peer
? &ATM_SD(sock
)->remote
: &ATM_SD(sock
)->local
,
426 sizeof(struct sockaddr_atmsvc
));
430 int svc_change_qos(struct atm_vcc
*vcc
, struct atm_qos
*qos
)
432 struct sock
*sk
= sk_atm(vcc
);
435 set_bit(ATM_VF_WAITING
, &vcc
->flags
);
436 prepare_to_wait(sk_sleep(sk
), &wait
, TASK_UNINTERRUPTIBLE
);
437 sigd_enq2(vcc
, as_modify
, NULL
, NULL
, &vcc
->local
, qos
, 0);
438 while (test_bit(ATM_VF_WAITING
, &vcc
->flags
) &&
439 !test_bit(ATM_VF_RELEASED
, &vcc
->flags
) && sigd
) {
441 prepare_to_wait(sk_sleep(sk
), &wait
, TASK_UNINTERRUPTIBLE
);
443 finish_wait(sk_sleep(sk
), &wait
);
449 static int svc_setsockopt(struct socket
*sock
, int level
, int optname
,
450 char __user
*optval
, unsigned int optlen
)
452 struct sock
*sk
= sock
->sk
;
453 struct atm_vcc
*vcc
= ATM_SD(sock
);
454 int value
, error
= 0;
459 if (level
!= SOL_ATM
|| optlen
!= sizeof(struct atm_sap
)) {
463 if (copy_from_user(&vcc
->sap
, optval
, optlen
)) {
467 set_bit(ATM_VF_HASSAP
, &vcc
->flags
);
470 if (level
!= SOL_ATM
|| optlen
!= sizeof(int)) {
474 if (get_user(value
, (int __user
*)optval
)) {
479 set_bit(ATM_VF_SESSION
, &vcc
->flags
);
481 clear_bit(ATM_VF_SESSION
, &vcc
->flags
);
486 error
= vcc_setsockopt(sock
, level
, optname
, optval
, optlen
);
494 static int svc_getsockopt(struct socket
*sock
, int level
, int optname
,
495 char __user
*optval
, int __user
*optlen
)
497 struct sock
*sk
= sock
->sk
;
501 if (!__SO_LEVEL_MATCH(optname
, level
) || optname
!= SO_ATMSAP
) {
502 error
= vcc_getsockopt(sock
, level
, optname
, optval
, optlen
);
505 if (get_user(len
, optlen
)) {
509 if (len
!= sizeof(struct atm_sap
)) {
513 if (copy_to_user(optval
, &ATM_SD(sock
)->sap
, sizeof(struct atm_sap
))) {
522 static int svc_addparty(struct socket
*sock
, struct sockaddr
*sockaddr
,
523 int sockaddr_len
, int flags
)
526 struct sock
*sk
= sock
->sk
;
527 struct atm_vcc
*vcc
= ATM_SD(sock
);
531 set_bit(ATM_VF_WAITING
, &vcc
->flags
);
532 prepare_to_wait(sk_sleep(sk
), &wait
, TASK_INTERRUPTIBLE
);
533 sigd_enq(vcc
, as_addparty
, NULL
, NULL
,
534 (struct sockaddr_atmsvc
*) sockaddr
);
535 if (flags
& O_NONBLOCK
) {
536 finish_wait(sk_sleep(sk
), &wait
);
537 error
= -EINPROGRESS
;
540 pr_debug("added wait queue\n");
541 while (test_bit(ATM_VF_WAITING
, &vcc
->flags
) && sigd
) {
543 prepare_to_wait(sk_sleep(sk
), &wait
, TASK_INTERRUPTIBLE
);
545 finish_wait(sk_sleep(sk
), &wait
);
546 error
= xchg(&sk
->sk_err_soft
, 0);
552 static int svc_dropparty(struct socket
*sock
, int ep_ref
)
555 struct sock
*sk
= sock
->sk
;
556 struct atm_vcc
*vcc
= ATM_SD(sock
);
560 set_bit(ATM_VF_WAITING
, &vcc
->flags
);
561 prepare_to_wait(sk_sleep(sk
), &wait
, TASK_INTERRUPTIBLE
);
562 sigd_enq2(vcc
, as_dropparty
, NULL
, NULL
, NULL
, NULL
, ep_ref
);
563 while (test_bit(ATM_VF_WAITING
, &vcc
->flags
) && sigd
) {
565 prepare_to_wait(sk_sleep(sk
), &wait
, TASK_INTERRUPTIBLE
);
567 finish_wait(sk_sleep(sk
), &wait
);
572 error
= xchg(&sk
->sk_err_soft
, 0);
578 static int svc_ioctl(struct socket
*sock
, unsigned int cmd
, unsigned long arg
)
581 struct sockaddr_atmsvc sa
;
582 struct atm_vcc
*vcc
= ATM_SD(sock
);
586 if (!test_bit(ATM_VF_SESSION
, &vcc
->flags
))
588 if (copy_from_user(&sa
, (void __user
*) arg
, sizeof(sa
)))
590 error
= svc_addparty(sock
, (struct sockaddr
*)&sa
, sizeof(sa
),
594 if (!test_bit(ATM_VF_SESSION
, &vcc
->flags
))
596 if (copy_from_user(&ep_ref
, (void __user
*) arg
, sizeof(int)))
598 error
= svc_dropparty(sock
, ep_ref
);
601 error
= vcc_ioctl(sock
, cmd
, arg
);
608 static int svc_compat_ioctl(struct socket
*sock
, unsigned int cmd
,
611 /* The definition of ATM_ADDPARTY uses the size of struct atm_iobuf.
612 But actually it takes a struct sockaddr_atmsvc, which doesn't need
613 compat handling. So all we have to do is fix up cmd... */
614 if (cmd
== COMPAT_ATM_ADDPARTY
)
617 if (cmd
== ATM_ADDPARTY
|| cmd
== ATM_DROPPARTY
)
618 return svc_ioctl(sock
, cmd
, arg
);
620 return vcc_compat_ioctl(sock
, cmd
, arg
);
622 #endif /* CONFIG_COMPAT */
624 static const struct proto_ops svc_proto_ops
= {
626 .owner
= THIS_MODULE
,
628 .release
= svc_release
,
630 .connect
= svc_connect
,
631 .socketpair
= sock_no_socketpair
,
632 .accept
= svc_accept
,
633 .getname
= svc_getname
,
637 .compat_ioctl
= svc_compat_ioctl
,
639 .listen
= svc_listen
,
640 .shutdown
= svc_shutdown
,
641 .setsockopt
= svc_setsockopt
,
642 .getsockopt
= svc_getsockopt
,
643 .sendmsg
= vcc_sendmsg
,
644 .recvmsg
= vcc_recvmsg
,
645 .mmap
= sock_no_mmap
,
646 .sendpage
= sock_no_sendpage
,
650 static int svc_create(struct net
*net
, struct socket
*sock
, int protocol
,
655 if (!net_eq(net
, &init_net
))
656 return -EAFNOSUPPORT
;
658 sock
->ops
= &svc_proto_ops
;
659 error
= vcc_create(net
, sock
, protocol
, AF_ATMSVC
);
662 ATM_SD(sock
)->local
.sas_family
= AF_ATMSVC
;
663 ATM_SD(sock
)->remote
.sas_family
= AF_ATMSVC
;
667 static const struct net_proto_family svc_family_ops
= {
669 .create
= svc_create
,
670 .owner
= THIS_MODULE
,
675 * Initialize the ATM SVC protocol family
678 int __init
atmsvc_init(void)
680 return sock_register(&svc_family_ops
);
683 void atmsvc_exit(void)
685 sock_unregister(PF_ATMSVC
);