2 * This program is free software; you can redistribute it and/or modify
3 * it under the terms of the GNU General Public License as published by
4 * the Free Software Foundation; either version 2 of the License, or
5 * (at your option) any later version.
7 * Copyright (C) Jonathan Naylor G4KLX (g4klx@g4klx.demon.co.uk)
8 * Copyright (C) Alan Cox GW4PTS (alan@lxorguk.ukuu.org.uk)
9 * Copyright (C) Terry Dawson VK2KTJ (terry@animats.net)
10 * Copyright (C) Tomi Manninen OH2BNS (oh2bns@sral.fi)
13 #include <linux/capability.h>
14 #include <linux/module.h>
15 #include <linux/moduleparam.h>
16 #include <linux/init.h>
17 #include <linux/errno.h>
18 #include <linux/types.h>
19 #include <linux/socket.h>
21 #include <linux/kernel.h>
22 #include <linux/sched.h>
23 #include <linux/spinlock.h>
24 #include <linux/timer.h>
25 #include <linux/string.h>
26 #include <linux/sockios.h>
27 #include <linux/net.h>
28 #include <linux/stat.h>
30 #include <linux/inet.h>
31 #include <linux/netdevice.h>
32 #include <linux/if_arp.h>
33 #include <linux/skbuff.h>
35 #include <asm/system.h>
36 #include <asm/uaccess.h>
37 #include <linux/fcntl.h>
38 #include <linux/termios.h>
40 #include <linux/interrupt.h>
41 #include <linux/notifier.h>
43 #include <linux/proc_fs.h>
44 #include <linux/seq_file.h>
45 #include <net/tcp_states.h>
49 static int rose_ndevs
= 10;
51 int sysctl_rose_restart_request_timeout
= ROSE_DEFAULT_T0
;
52 int sysctl_rose_call_request_timeout
= ROSE_DEFAULT_T1
;
53 int sysctl_rose_reset_request_timeout
= ROSE_DEFAULT_T2
;
54 int sysctl_rose_clear_request_timeout
= ROSE_DEFAULT_T3
;
55 int sysctl_rose_no_activity_timeout
= ROSE_DEFAULT_IDLE
;
56 int sysctl_rose_ack_hold_back_timeout
= ROSE_DEFAULT_HB
;
57 int sysctl_rose_routing_control
= ROSE_DEFAULT_ROUTING
;
58 int sysctl_rose_link_fail_timeout
= ROSE_DEFAULT_FAIL_TIMEOUT
;
59 int sysctl_rose_maximum_vcs
= ROSE_DEFAULT_MAXVC
;
60 int sysctl_rose_window_size
= ROSE_DEFAULT_WINDOW_SIZE
;
62 static HLIST_HEAD(rose_list
);
63 static DEFINE_SPINLOCK(rose_list_lock
);
65 static struct proto_ops rose_proto_ops
;
67 ax25_address rose_callsign
;
70 * ROSE network devices are virtual network devices encapsulating ROSE
71 * frames into AX.25 which will be sent through an AX.25 device, so form a
72 * special "super class" of normal net devices; split their locks off into a
73 * separate class since they always nest.
75 static struct lock_class_key rose_netdev_xmit_lock_key
;
78 * Convert a ROSE address into text.
80 const char *rose2asc(const rose_address
*addr
)
82 static char buffer
[11];
84 if (addr
->rose_addr
[0] == 0x00 && addr
->rose_addr
[1] == 0x00 &&
85 addr
->rose_addr
[2] == 0x00 && addr
->rose_addr
[3] == 0x00 &&
86 addr
->rose_addr
[4] == 0x00) {
89 sprintf(buffer
, "%02X%02X%02X%02X%02X", addr
->rose_addr
[0] & 0xFF,
90 addr
->rose_addr
[1] & 0xFF,
91 addr
->rose_addr
[2] & 0xFF,
92 addr
->rose_addr
[3] & 0xFF,
93 addr
->rose_addr
[4] & 0xFF);
100 * Compare two ROSE addresses, 0 == equal.
102 int rosecmp(rose_address
*addr1
, rose_address
*addr2
)
106 for (i
= 0; i
< 5; i
++)
107 if (addr1
->rose_addr
[i
] != addr2
->rose_addr
[i
])
114 * Compare two ROSE addresses for only mask digits, 0 == equal.
116 int rosecmpm(rose_address
*addr1
, rose_address
*addr2
, unsigned short mask
)
123 for (i
= 0; i
< mask
; i
++) {
127 if ((addr1
->rose_addr
[j
] & 0x0F) != (addr2
->rose_addr
[j
] & 0x0F))
130 if ((addr1
->rose_addr
[j
] & 0xF0) != (addr2
->rose_addr
[j
] & 0xF0))
139 * Socket removal during an interrupt is now safe.
141 static void rose_remove_socket(struct sock
*sk
)
143 spin_lock_bh(&rose_list_lock
);
144 sk_del_node_init(sk
);
145 spin_unlock_bh(&rose_list_lock
);
149 * Kill all bound sockets on a broken link layer connection to a
150 * particular neighbour.
152 void rose_kill_by_neigh(struct rose_neigh
*neigh
)
155 struct hlist_node
*node
;
157 spin_lock_bh(&rose_list_lock
);
158 sk_for_each(s
, node
, &rose_list
) {
159 struct rose_sock
*rose
= rose_sk(s
);
161 if (rose
->neighbour
== neigh
) {
162 rose_disconnect(s
, ENETUNREACH
, ROSE_OUT_OF_ORDER
, 0);
163 rose
->neighbour
->use
--;
164 rose
->neighbour
= NULL
;
167 spin_unlock_bh(&rose_list_lock
);
171 * Kill all bound sockets on a dropped device.
173 static void rose_kill_by_device(struct net_device
*dev
)
176 struct hlist_node
*node
;
178 spin_lock_bh(&rose_list_lock
);
179 sk_for_each(s
, node
, &rose_list
) {
180 struct rose_sock
*rose
= rose_sk(s
);
182 if (rose
->device
== dev
) {
183 rose_disconnect(s
, ENETUNREACH
, ROSE_OUT_OF_ORDER
, 0);
184 rose
->neighbour
->use
--;
188 spin_unlock_bh(&rose_list_lock
);
192 * Handle device status changes.
194 static int rose_device_event(struct notifier_block
*this, unsigned long event
,
197 struct net_device
*dev
= (struct net_device
*)ptr
;
199 if (event
!= NETDEV_DOWN
)
204 rose_kill_by_device(dev
);
207 rose_link_device_down(dev
);
208 rose_rt_device_down(dev
);
216 * Add a socket to the bound sockets list.
218 static void rose_insert_socket(struct sock
*sk
)
221 spin_lock_bh(&rose_list_lock
);
222 sk_add_node(sk
, &rose_list
);
223 spin_unlock_bh(&rose_list_lock
);
227 * Find a socket that wants to accept the Call Request we just
230 static struct sock
*rose_find_listener(rose_address
*addr
, ax25_address
*call
)
233 struct hlist_node
*node
;
235 spin_lock_bh(&rose_list_lock
);
236 sk_for_each(s
, node
, &rose_list
) {
237 struct rose_sock
*rose
= rose_sk(s
);
239 if (!rosecmp(&rose
->source_addr
, addr
) &&
240 !ax25cmp(&rose
->source_call
, call
) &&
241 !rose
->source_ndigis
&& s
->sk_state
== TCP_LISTEN
)
245 sk_for_each(s
, node
, &rose_list
) {
246 struct rose_sock
*rose
= rose_sk(s
);
248 if (!rosecmp(&rose
->source_addr
, addr
) &&
249 !ax25cmp(&rose
->source_call
, &null_ax25_address
) &&
250 s
->sk_state
== TCP_LISTEN
)
255 spin_unlock_bh(&rose_list_lock
);
260 * Find a connected ROSE socket given my LCI and device.
262 struct sock
*rose_find_socket(unsigned int lci
, struct rose_neigh
*neigh
)
265 struct hlist_node
*node
;
267 spin_lock_bh(&rose_list_lock
);
268 sk_for_each(s
, node
, &rose_list
) {
269 struct rose_sock
*rose
= rose_sk(s
);
271 if (rose
->lci
== lci
&& rose
->neighbour
== neigh
)
276 spin_unlock_bh(&rose_list_lock
);
281 * Find a unique LCI for a given device.
283 unsigned int rose_new_lci(struct rose_neigh
*neigh
)
287 if (neigh
->dce_mode
) {
288 for (lci
= 1; lci
<= sysctl_rose_maximum_vcs
; lci
++)
289 if (rose_find_socket(lci
, neigh
) == NULL
&& rose_route_free_lci(lci
, neigh
) == NULL
)
292 for (lci
= sysctl_rose_maximum_vcs
; lci
> 0; lci
--)
293 if (rose_find_socket(lci
, neigh
) == NULL
&& rose_route_free_lci(lci
, neigh
) == NULL
)
303 void rose_destroy_socket(struct sock
*);
306 * Handler for deferred kills.
308 static void rose_destroy_timer(unsigned long data
)
310 rose_destroy_socket((struct sock
*)data
);
314 * This is called from user mode and the timers. Thus it protects itself
315 * against interrupt users but doesn't worry about being called during
316 * work. Once it is removed from the queue no interrupt or bottom half
317 * will touch it and we are (fairly 8-) ) safe.
319 void rose_destroy_socket(struct sock
*sk
)
323 rose_remove_socket(sk
);
324 rose_stop_heartbeat(sk
);
325 rose_stop_idletimer(sk
);
328 rose_clear_queues(sk
); /* Flush the queues */
330 while ((skb
= skb_dequeue(&sk
->sk_receive_queue
)) != NULL
) {
331 if (skb
->sk
!= sk
) { /* A pending connection */
332 /* Queue the unaccepted socket for death */
333 sock_set_flag(skb
->sk
, SOCK_DEAD
);
334 rose_start_heartbeat(skb
->sk
);
335 rose_sk(skb
->sk
)->state
= ROSE_STATE_0
;
341 if (atomic_read(&sk
->sk_wmem_alloc
) ||
342 atomic_read(&sk
->sk_rmem_alloc
)) {
343 /* Defer: outstanding buffers */
344 init_timer(&sk
->sk_timer
);
345 sk
->sk_timer
.expires
= jiffies
+ 10 * HZ
;
346 sk
->sk_timer
.function
= rose_destroy_timer
;
347 sk
->sk_timer
.data
= (unsigned long)sk
;
348 add_timer(&sk
->sk_timer
);
354 * Handling for system calls applied via the various interfaces to a
355 * ROSE socket object.
358 static int rose_setsockopt(struct socket
*sock
, int level
, int optname
,
359 char __user
*optval
, int optlen
)
361 struct sock
*sk
= sock
->sk
;
362 struct rose_sock
*rose
= rose_sk(sk
);
365 if (level
!= SOL_ROSE
)
368 if (optlen
< sizeof(int))
371 if (get_user(opt
, (int __user
*)optval
))
376 rose
->defer
= opt
? 1 : 0;
406 rose
->idle
= opt
* 60 * HZ
;
410 rose
->qbitincl
= opt
? 1 : 0;
418 static int rose_getsockopt(struct socket
*sock
, int level
, int optname
,
419 char __user
*optval
, int __user
*optlen
)
421 struct sock
*sk
= sock
->sk
;
422 struct rose_sock
*rose
= rose_sk(sk
);
426 if (level
!= SOL_ROSE
)
429 if (get_user(len
, optlen
))
457 val
= rose
->idle
/ (60 * HZ
);
461 val
= rose
->qbitincl
;
468 len
= min_t(unsigned int, len
, sizeof(int));
470 if (put_user(len
, optlen
))
473 return copy_to_user(optval
, &val
, len
) ? -EFAULT
: 0;
476 static int rose_listen(struct socket
*sock
, int backlog
)
478 struct sock
*sk
= sock
->sk
;
480 if (sk
->sk_state
!= TCP_LISTEN
) {
481 struct rose_sock
*rose
= rose_sk(sk
);
483 rose
->dest_ndigis
= 0;
484 memset(&rose
->dest_addr
, 0, ROSE_ADDR_LEN
);
485 memset(&rose
->dest_call
, 0, AX25_ADDR_LEN
);
486 memset(rose
->dest_digis
, 0, AX25_ADDR_LEN
* ROSE_MAX_DIGIS
);
487 sk
->sk_max_ack_backlog
= backlog
;
488 sk
->sk_state
= TCP_LISTEN
;
495 static struct proto rose_proto
= {
497 .owner
= THIS_MODULE
,
498 .obj_size
= sizeof(struct rose_sock
),
501 static int rose_create(struct socket
*sock
, int protocol
)
504 struct rose_sock
*rose
;
506 if (sock
->type
!= SOCK_SEQPACKET
|| protocol
!= 0)
507 return -ESOCKTNOSUPPORT
;
509 if ((sk
= sk_alloc(PF_ROSE
, GFP_ATOMIC
, &rose_proto
, 1)) == NULL
)
514 sock_init_data(sock
, sk
);
516 skb_queue_head_init(&rose
->ack_queue
);
518 skb_queue_head_init(&rose
->frag_queue
);
522 sock
->ops
= &rose_proto_ops
;
523 sk
->sk_protocol
= protocol
;
525 init_timer(&rose
->timer
);
526 init_timer(&rose
->idletimer
);
528 rose
->t1
= msecs_to_jiffies(sysctl_rose_call_request_timeout
);
529 rose
->t2
= msecs_to_jiffies(sysctl_rose_reset_request_timeout
);
530 rose
->t3
= msecs_to_jiffies(sysctl_rose_clear_request_timeout
);
531 rose
->hb
= msecs_to_jiffies(sysctl_rose_ack_hold_back_timeout
);
532 rose
->idle
= msecs_to_jiffies(sysctl_rose_no_activity_timeout
);
534 rose
->state
= ROSE_STATE_0
;
539 static struct sock
*rose_make_new(struct sock
*osk
)
542 struct rose_sock
*rose
, *orose
;
544 if (osk
->sk_type
!= SOCK_SEQPACKET
)
547 if ((sk
= sk_alloc(PF_ROSE
, GFP_ATOMIC
, &rose_proto
, 1)) == NULL
)
552 sock_init_data(NULL
, sk
);
554 skb_queue_head_init(&rose
->ack_queue
);
556 skb_queue_head_init(&rose
->frag_queue
);
560 sk
->sk_type
= osk
->sk_type
;
561 sk
->sk_socket
= osk
->sk_socket
;
562 sk
->sk_priority
= osk
->sk_priority
;
563 sk
->sk_protocol
= osk
->sk_protocol
;
564 sk
->sk_rcvbuf
= osk
->sk_rcvbuf
;
565 sk
->sk_sndbuf
= osk
->sk_sndbuf
;
566 sk
->sk_state
= TCP_ESTABLISHED
;
567 sk
->sk_sleep
= osk
->sk_sleep
;
568 sock_copy_flags(sk
, osk
);
570 init_timer(&rose
->timer
);
571 init_timer(&rose
->idletimer
);
573 orose
= rose_sk(osk
);
574 rose
->t1
= orose
->t1
;
575 rose
->t2
= orose
->t2
;
576 rose
->t3
= orose
->t3
;
577 rose
->hb
= orose
->hb
;
578 rose
->idle
= orose
->idle
;
579 rose
->defer
= orose
->defer
;
580 rose
->device
= orose
->device
;
581 rose
->qbitincl
= orose
->qbitincl
;
586 static int rose_release(struct socket
*sock
)
588 struct sock
*sk
= sock
->sk
;
589 struct rose_sock
*rose
;
591 if (sk
== NULL
) return 0;
595 switch (rose
->state
) {
597 rose_disconnect(sk
, 0, -1, -1);
598 rose_destroy_socket(sk
);
602 rose
->neighbour
->use
--;
603 rose_disconnect(sk
, 0, -1, -1);
604 rose_destroy_socket(sk
);
611 rose_clear_queues(sk
);
612 rose_stop_idletimer(sk
);
613 rose_write_internal(sk
, ROSE_CLEAR_REQUEST
);
614 rose_start_t3timer(sk
);
615 rose
->state
= ROSE_STATE_2
;
616 sk
->sk_state
= TCP_CLOSE
;
617 sk
->sk_shutdown
|= SEND_SHUTDOWN
;
618 sk
->sk_state_change(sk
);
619 sock_set_flag(sk
, SOCK_DEAD
);
620 sock_set_flag(sk
, SOCK_DESTROY
);
632 static int rose_bind(struct socket
*sock
, struct sockaddr
*uaddr
, int addr_len
)
634 struct sock
*sk
= sock
->sk
;
635 struct rose_sock
*rose
= rose_sk(sk
);
636 struct sockaddr_rose
*addr
= (struct sockaddr_rose
*)uaddr
;
637 struct net_device
*dev
;
638 ax25_address
*source
;
639 ax25_uid_assoc
*user
;
642 if (!sock_flag(sk
, SOCK_ZAPPED
))
645 if (addr_len
!= sizeof(struct sockaddr_rose
) && addr_len
!= sizeof(struct full_sockaddr_rose
))
648 if (addr
->srose_family
!= AF_ROSE
)
651 if (addr_len
== sizeof(struct sockaddr_rose
) && addr
->srose_ndigis
> 1)
654 if (addr
->srose_ndigis
> ROSE_MAX_DIGIS
)
657 if ((dev
= rose_dev_get(&addr
->srose_addr
)) == NULL
) {
658 SOCK_DEBUG(sk
, "ROSE: bind failed: invalid address\n");
659 return -EADDRNOTAVAIL
;
662 source
= &addr
->srose_call
;
664 user
= ax25_findbyuid(current
->euid
);
666 rose
->source_call
= user
->call
;
669 if (ax25_uid_policy
&& !capable(CAP_NET_BIND_SERVICE
))
671 rose
->source_call
= *source
;
674 rose
->source_addr
= addr
->srose_addr
;
676 rose
->source_ndigis
= addr
->srose_ndigis
;
678 if (addr_len
== sizeof(struct full_sockaddr_rose
)) {
679 struct full_sockaddr_rose
*full_addr
= (struct full_sockaddr_rose
*)uaddr
;
680 for (n
= 0 ; n
< addr
->srose_ndigis
; n
++)
681 rose
->source_digis
[n
] = full_addr
->srose_digis
[n
];
683 if (rose
->source_ndigis
== 1) {
684 rose
->source_digis
[0] = addr
->srose_digi
;
688 rose_insert_socket(sk
);
690 sock_reset_flag(sk
, SOCK_ZAPPED
);
691 SOCK_DEBUG(sk
, "ROSE: socket is bound\n");
695 static int rose_connect(struct socket
*sock
, struct sockaddr
*uaddr
, int addr_len
, int flags
)
697 struct sock
*sk
= sock
->sk
;
698 struct rose_sock
*rose
= rose_sk(sk
);
699 struct sockaddr_rose
*addr
= (struct sockaddr_rose
*)uaddr
;
700 unsigned char cause
, diagnostic
;
701 struct net_device
*dev
;
702 ax25_uid_assoc
*user
;
705 if (sk
->sk_state
== TCP_ESTABLISHED
&& sock
->state
== SS_CONNECTING
) {
706 sock
->state
= SS_CONNECTED
;
707 return 0; /* Connect completed during a ERESTARTSYS event */
710 if (sk
->sk_state
== TCP_CLOSE
&& sock
->state
== SS_CONNECTING
) {
711 sock
->state
= SS_UNCONNECTED
;
712 return -ECONNREFUSED
;
715 if (sk
->sk_state
== TCP_ESTABLISHED
)
716 return -EISCONN
; /* No reconnect on a seqpacket socket */
718 sk
->sk_state
= TCP_CLOSE
;
719 sock
->state
= SS_UNCONNECTED
;
721 if (addr_len
!= sizeof(struct sockaddr_rose
) && addr_len
!= sizeof(struct full_sockaddr_rose
))
724 if (addr
->srose_family
!= AF_ROSE
)
727 if (addr_len
== sizeof(struct sockaddr_rose
) && addr
->srose_ndigis
> 1)
730 if (addr
->srose_ndigis
> ROSE_MAX_DIGIS
)
733 /* Source + Destination digis should not exceed ROSE_MAX_DIGIS */
734 if ((rose
->source_ndigis
+ addr
->srose_ndigis
) > ROSE_MAX_DIGIS
)
737 rose
->neighbour
= rose_get_neigh(&addr
->srose_addr
, &cause
,
739 if (!rose
->neighbour
)
742 rose
->lci
= rose_new_lci(rose
->neighbour
);
746 if (sock_flag(sk
, SOCK_ZAPPED
)) { /* Must bind first - autobinding in this may or may not work */
747 sock_reset_flag(sk
, SOCK_ZAPPED
);
749 if ((dev
= rose_dev_first()) == NULL
)
752 user
= ax25_findbyuid(current
->euid
);
756 memcpy(&rose
->source_addr
, dev
->dev_addr
, ROSE_ADDR_LEN
);
757 rose
->source_call
= user
->call
;
761 rose_insert_socket(sk
); /* Finish the bind */
764 rose
->dest_addr
= addr
->srose_addr
;
765 rose
->dest_call
= addr
->srose_call
;
766 rose
->rand
= ((long)rose
& 0xFFFF) + rose
->lci
;
767 rose
->dest_ndigis
= addr
->srose_ndigis
;
769 if (addr_len
== sizeof(struct full_sockaddr_rose
)) {
770 struct full_sockaddr_rose
*full_addr
= (struct full_sockaddr_rose
*)uaddr
;
771 for (n
= 0 ; n
< addr
->srose_ndigis
; n
++)
772 rose
->dest_digis
[n
] = full_addr
->srose_digis
[n
];
774 if (rose
->dest_ndigis
== 1) {
775 rose
->dest_digis
[0] = addr
->srose_digi
;
779 /* Move to connecting socket, start sending Connect Requests */
780 sock
->state
= SS_CONNECTING
;
781 sk
->sk_state
= TCP_SYN_SENT
;
783 rose
->state
= ROSE_STATE_1
;
785 rose
->neighbour
->use
++;
787 rose_write_internal(sk
, ROSE_CALL_REQUEST
);
788 rose_start_heartbeat(sk
);
789 rose_start_t1timer(sk
);
792 if (sk
->sk_state
!= TCP_ESTABLISHED
&& (flags
& O_NONBLOCK
))
796 * A Connect Ack with Choke or timeout or failed routing will go to
799 if (sk
->sk_state
== TCP_SYN_SENT
) {
800 struct task_struct
*tsk
= current
;
801 DECLARE_WAITQUEUE(wait
, tsk
);
803 add_wait_queue(sk
->sk_sleep
, &wait
);
805 set_current_state(TASK_INTERRUPTIBLE
);
806 if (sk
->sk_state
!= TCP_SYN_SENT
)
808 if (!signal_pending(tsk
)) {
812 current
->state
= TASK_RUNNING
;
813 remove_wait_queue(sk
->sk_sleep
, &wait
);
816 current
->state
= TASK_RUNNING
;
817 remove_wait_queue(sk
->sk_sleep
, &wait
);
820 if (sk
->sk_state
!= TCP_ESTABLISHED
) {
821 /* Try next neighbour */
822 rose
->neighbour
= rose_get_neigh(&addr
->srose_addr
, &cause
, &diagnostic
);
824 goto rose_try_next_neigh
;
825 /* No more neighbour */
826 sock
->state
= SS_UNCONNECTED
;
827 return sock_error(sk
); /* Always set at this point */
830 sock
->state
= SS_CONNECTED
;
835 static int rose_accept(struct socket
*sock
, struct socket
*newsock
, int flags
)
837 struct task_struct
*tsk
= current
;
838 DECLARE_WAITQUEUE(wait
, tsk
);
844 if ((sk
= sock
->sk
) == NULL
)
848 if (sk
->sk_type
!= SOCK_SEQPACKET
) {
853 if (sk
->sk_state
!= TCP_LISTEN
) {
859 * The write queue this time is holding sockets ready to use
860 * hooked into the SABM we saved
862 add_wait_queue(sk
->sk_sleep
, &wait
);
864 skb
= skb_dequeue(&sk
->sk_receive_queue
);
868 current
->state
= TASK_INTERRUPTIBLE
;
870 if (flags
& O_NONBLOCK
) {
871 current
->state
= TASK_RUNNING
;
872 remove_wait_queue(sk
->sk_sleep
, &wait
);
875 if (!signal_pending(tsk
)) {
882 current
->state
= TASK_RUNNING
;
883 remove_wait_queue(sk
->sk_sleep
, &wait
);
886 newsk
->sk_socket
= newsock
;
887 newsk
->sk_sleep
= &newsock
->wait
;
889 /* Now attach up the new socket */
892 sk
->sk_ack_backlog
--;
901 static int rose_getname(struct socket
*sock
, struct sockaddr
*uaddr
,
902 int *uaddr_len
, int peer
)
904 struct full_sockaddr_rose
*srose
= (struct full_sockaddr_rose
*)uaddr
;
905 struct sock
*sk
= sock
->sk
;
906 struct rose_sock
*rose
= rose_sk(sk
);
910 if (sk
->sk_state
!= TCP_ESTABLISHED
)
912 srose
->srose_family
= AF_ROSE
;
913 srose
->srose_addr
= rose
->dest_addr
;
914 srose
->srose_call
= rose
->dest_call
;
915 srose
->srose_ndigis
= rose
->dest_ndigis
;
916 for (n
= 0; n
< rose
->dest_ndigis
; n
++)
917 srose
->srose_digis
[n
] = rose
->dest_digis
[n
];
919 srose
->srose_family
= AF_ROSE
;
920 srose
->srose_addr
= rose
->source_addr
;
921 srose
->srose_call
= rose
->source_call
;
922 srose
->srose_ndigis
= rose
->source_ndigis
;
923 for (n
= 0; n
< rose
->source_ndigis
; n
++)
924 srose
->srose_digis
[n
] = rose
->source_digis
[n
];
927 *uaddr_len
= sizeof(struct full_sockaddr_rose
);
931 int rose_rx_call_request(struct sk_buff
*skb
, struct net_device
*dev
, struct rose_neigh
*neigh
, unsigned int lci
)
935 struct rose_sock
*make_rose
;
936 struct rose_facilities_struct facilities
;
939 skb
->sk
= NULL
; /* Initially we don't know who it's for */
942 * skb->data points to the rose frame start
944 memset(&facilities
, 0x00, sizeof(struct rose_facilities_struct
));
946 len
= (((skb
->data
[3] >> 4) & 0x0F) + 1) / 2;
947 len
+= (((skb
->data
[3] >> 0) & 0x0F) + 1) / 2;
948 if (!rose_parse_facilities(skb
->data
+ len
+ 4, &facilities
)) {
949 rose_transmit_clear_request(neigh
, lci
, ROSE_INVALID_FACILITY
, 76);
953 sk
= rose_find_listener(&facilities
.source_addr
, &facilities
.source_call
);
956 * We can't accept the Call Request.
958 if (sk
== NULL
|| sk_acceptq_is_full(sk
) ||
959 (make
= rose_make_new(sk
)) == NULL
) {
960 rose_transmit_clear_request(neigh
, lci
, ROSE_NETWORK_CONGESTION
, 120);
965 make
->sk_state
= TCP_ESTABLISHED
;
966 make_rose
= rose_sk(make
);
968 make_rose
->lci
= lci
;
969 make_rose
->dest_addr
= facilities
.dest_addr
;
970 make_rose
->dest_call
= facilities
.dest_call
;
971 make_rose
->dest_ndigis
= facilities
.dest_ndigis
;
972 for (n
= 0 ; n
< facilities
.dest_ndigis
; n
++)
973 make_rose
->dest_digis
[n
] = facilities
.dest_digis
[n
];
974 make_rose
->source_addr
= facilities
.source_addr
;
975 make_rose
->source_call
= facilities
.source_call
;
976 make_rose
->source_ndigis
= facilities
.source_ndigis
;
977 for (n
= 0 ; n
< facilities
.source_ndigis
; n
++)
978 make_rose
->source_digis
[n
]= facilities
.source_digis
[n
];
979 make_rose
->neighbour
= neigh
;
980 make_rose
->device
= dev
;
981 make_rose
->facilities
= facilities
;
983 make_rose
->neighbour
->use
++;
985 if (rose_sk(sk
)->defer
) {
986 make_rose
->state
= ROSE_STATE_5
;
988 rose_write_internal(make
, ROSE_CALL_ACCEPTED
);
989 make_rose
->state
= ROSE_STATE_3
;
990 rose_start_idletimer(make
);
993 make_rose
->condition
= 0x00;
998 sk
->sk_ack_backlog
++;
1000 rose_insert_socket(make
);
1002 skb_queue_head(&sk
->sk_receive_queue
, skb
);
1004 rose_start_heartbeat(make
);
1006 if (!sock_flag(sk
, SOCK_DEAD
))
1007 sk
->sk_data_ready(sk
, skb
->len
);
1012 static int rose_sendmsg(struct kiocb
*iocb
, struct socket
*sock
,
1013 struct msghdr
*msg
, size_t len
)
1015 struct sock
*sk
= sock
->sk
;
1016 struct rose_sock
*rose
= rose_sk(sk
);
1017 struct sockaddr_rose
*usrose
= (struct sockaddr_rose
*)msg
->msg_name
;
1019 struct full_sockaddr_rose srose
;
1020 struct sk_buff
*skb
;
1021 unsigned char *asmptr
;
1022 int n
, size
, qbit
= 0;
1024 if (msg
->msg_flags
& ~(MSG_DONTWAIT
|MSG_EOR
|MSG_CMSG_COMPAT
))
1027 if (sock_flag(sk
, SOCK_ZAPPED
))
1028 return -EADDRNOTAVAIL
;
1030 if (sk
->sk_shutdown
& SEND_SHUTDOWN
) {
1031 send_sig(SIGPIPE
, current
, 0);
1035 if (rose
->neighbour
== NULL
|| rose
->device
== NULL
)
1036 return -ENETUNREACH
;
1038 if (usrose
!= NULL
) {
1039 if (msg
->msg_namelen
!= sizeof(struct sockaddr_rose
) && msg
->msg_namelen
!= sizeof(struct full_sockaddr_rose
))
1041 memset(&srose
, 0, sizeof(struct full_sockaddr_rose
));
1042 memcpy(&srose
, usrose
, msg
->msg_namelen
);
1043 if (rosecmp(&rose
->dest_addr
, &srose
.srose_addr
) != 0 ||
1044 ax25cmp(&rose
->dest_call
, &srose
.srose_call
) != 0)
1046 if (srose
.srose_ndigis
!= rose
->dest_ndigis
)
1048 if (srose
.srose_ndigis
== rose
->dest_ndigis
) {
1049 for (n
= 0 ; n
< srose
.srose_ndigis
; n
++)
1050 if (ax25cmp(&rose
->dest_digis
[n
],
1051 &srose
.srose_digis
[n
]))
1054 if (srose
.srose_family
!= AF_ROSE
)
1057 if (sk
->sk_state
!= TCP_ESTABLISHED
)
1060 srose
.srose_family
= AF_ROSE
;
1061 srose
.srose_addr
= rose
->dest_addr
;
1062 srose
.srose_call
= rose
->dest_call
;
1063 srose
.srose_ndigis
= rose
->dest_ndigis
;
1064 for (n
= 0 ; n
< rose
->dest_ndigis
; n
++)
1065 srose
.srose_digis
[n
] = rose
->dest_digis
[n
];
1068 SOCK_DEBUG(sk
, "ROSE: sendto: Addresses built.\n");
1070 /* Build a packet */
1071 SOCK_DEBUG(sk
, "ROSE: sendto: building packet.\n");
1072 size
= len
+ AX25_BPQ_HEADER_LEN
+ AX25_MAX_HEADER_LEN
+ ROSE_MIN_LEN
;
1074 if ((skb
= sock_alloc_send_skb(sk
, size
, msg
->msg_flags
& MSG_DONTWAIT
, &err
)) == NULL
)
1077 skb_reserve(skb
, AX25_BPQ_HEADER_LEN
+ AX25_MAX_HEADER_LEN
+ ROSE_MIN_LEN
);
1080 * Put the data on the end
1082 SOCK_DEBUG(sk
, "ROSE: Appending user data\n");
1084 asmptr
= skb
->h
.raw
= skb_put(skb
, len
);
1086 err
= memcpy_fromiovec(asmptr
, msg
->msg_iov
, len
);
1093 * If the Q BIT Include socket option is in force, the first
1094 * byte of the user data is the logical value of the Q Bit.
1096 if (rose
->qbitincl
) {
1097 qbit
= skb
->data
[0];
1102 * Push down the ROSE header
1104 asmptr
= skb_push(skb
, ROSE_MIN_LEN
);
1106 SOCK_DEBUG(sk
, "ROSE: Building Network Header.\n");
1108 /* Build a ROSE Network header */
1109 asmptr
[0] = ((rose
->lci
>> 8) & 0x0F) | ROSE_GFI
;
1110 asmptr
[1] = (rose
->lci
>> 0) & 0xFF;
1111 asmptr
[2] = ROSE_DATA
;
1114 asmptr
[0] |= ROSE_Q_BIT
;
1116 SOCK_DEBUG(sk
, "ROSE: Built header.\n");
1118 SOCK_DEBUG(sk
, "ROSE: Transmitting buffer\n");
1120 if (sk
->sk_state
!= TCP_ESTABLISHED
) {
1126 #define ROSE_PACLEN (256-ROSE_MIN_LEN)
1127 if (skb
->len
- ROSE_MIN_LEN
> ROSE_PACLEN
) {
1128 unsigned char header
[ROSE_MIN_LEN
];
1129 struct sk_buff
*skbn
;
1133 /* Save a copy of the Header */
1134 memcpy(header
, skb
->data
, ROSE_MIN_LEN
);
1135 skb_pull(skb
, ROSE_MIN_LEN
);
1137 frontlen
= skb_headroom(skb
);
1139 while (skb
->len
> 0) {
1140 if ((skbn
= sock_alloc_send_skb(sk
, frontlen
+ ROSE_PACLEN
, 0, &err
)) == NULL
) {
1149 skb_reserve(skbn
, frontlen
);
1151 lg
= (ROSE_PACLEN
> skb
->len
) ? skb
->len
: ROSE_PACLEN
;
1153 /* Copy the user data */
1154 memcpy(skb_put(skbn
, lg
), skb
->data
, lg
);
1157 /* Duplicate the Header */
1158 skb_push(skbn
, ROSE_MIN_LEN
);
1159 memcpy(skbn
->data
, header
, ROSE_MIN_LEN
);
1162 skbn
->data
[2] |= M_BIT
;
1164 skb_queue_tail(&sk
->sk_write_queue
, skbn
); /* Throw it on the queue */
1170 skb_queue_tail(&sk
->sk_write_queue
, skb
); /* Throw it on the queue */
1173 skb_queue_tail(&sk
->sk_write_queue
, skb
); /* Shove it onto the queue */
1182 static int rose_recvmsg(struct kiocb
*iocb
, struct socket
*sock
,
1183 struct msghdr
*msg
, size_t size
, int flags
)
1185 struct sock
*sk
= sock
->sk
;
1186 struct rose_sock
*rose
= rose_sk(sk
);
1187 struct sockaddr_rose
*srose
= (struct sockaddr_rose
*)msg
->msg_name
;
1189 unsigned char *asmptr
;
1190 struct sk_buff
*skb
;
1194 * This works for seqpacket too. The receiver has ordered the queue for
1195 * us! We do one quick check first though
1197 if (sk
->sk_state
!= TCP_ESTABLISHED
)
1200 /* Now we can treat all alike */
1201 if ((skb
= skb_recv_datagram(sk
, flags
& ~MSG_DONTWAIT
, flags
& MSG_DONTWAIT
, &er
)) == NULL
)
1204 qbit
= (skb
->data
[0] & ROSE_Q_BIT
) == ROSE_Q_BIT
;
1206 skb_pull(skb
, ROSE_MIN_LEN
);
1208 if (rose
->qbitincl
) {
1209 asmptr
= skb_push(skb
, 1);
1213 skb
->h
.raw
= skb
->data
;
1216 if (copied
> size
) {
1218 msg
->msg_flags
|= MSG_TRUNC
;
1221 skb_copy_datagram_iovec(skb
, 0, msg
->msg_iov
, copied
);
1223 if (srose
!= NULL
) {
1224 srose
->srose_family
= AF_ROSE
;
1225 srose
->srose_addr
= rose
->dest_addr
;
1226 srose
->srose_call
= rose
->dest_call
;
1227 srose
->srose_ndigis
= rose
->dest_ndigis
;
1228 if (msg
->msg_namelen
>= sizeof(struct full_sockaddr_rose
)) {
1229 struct full_sockaddr_rose
*full_srose
= (struct full_sockaddr_rose
*)msg
->msg_name
;
1230 for (n
= 0 ; n
< rose
->dest_ndigis
; n
++)
1231 full_srose
->srose_digis
[n
] = rose
->dest_digis
[n
];
1232 msg
->msg_namelen
= sizeof(struct full_sockaddr_rose
);
1234 if (rose
->dest_ndigis
>= 1) {
1235 srose
->srose_ndigis
= 1;
1236 srose
->srose_digi
= rose
->dest_digis
[0];
1238 msg
->msg_namelen
= sizeof(struct sockaddr_rose
);
1242 skb_free_datagram(sk
, skb
);
1248 static int rose_ioctl(struct socket
*sock
, unsigned int cmd
, unsigned long arg
)
1250 struct sock
*sk
= sock
->sk
;
1251 struct rose_sock
*rose
= rose_sk(sk
);
1252 void __user
*argp
= (void __user
*)arg
;
1257 amount
= sk
->sk_sndbuf
- atomic_read(&sk
->sk_wmem_alloc
);
1260 return put_user(amount
, (unsigned int __user
*) argp
);
1264 struct sk_buff
*skb
;
1266 /* These two are safe on a single CPU system as only user tasks fiddle here */
1267 if ((skb
= skb_peek(&sk
->sk_receive_queue
)) != NULL
)
1269 return put_user(amount
, (unsigned int __user
*) argp
);
1273 return sock_get_timestamp(sk
, (struct timeval __user
*) argp
);
1277 case SIOCGIFDSTADDR
:
1278 case SIOCSIFDSTADDR
:
1279 case SIOCGIFBRDADDR
:
1280 case SIOCSIFBRDADDR
:
1281 case SIOCGIFNETMASK
:
1282 case SIOCSIFNETMASK
:
1290 if (!capable(CAP_NET_ADMIN
))
1292 return rose_rt_ioctl(cmd
, argp
);
1294 case SIOCRSGCAUSE
: {
1295 struct rose_cause_struct rose_cause
;
1296 rose_cause
.cause
= rose
->cause
;
1297 rose_cause
.diagnostic
= rose
->diagnostic
;
1298 return copy_to_user(argp
, &rose_cause
, sizeof(struct rose_cause_struct
)) ? -EFAULT
: 0;
1301 case SIOCRSSCAUSE
: {
1302 struct rose_cause_struct rose_cause
;
1303 if (copy_from_user(&rose_cause
, argp
, sizeof(struct rose_cause_struct
)))
1305 rose
->cause
= rose_cause
.cause
;
1306 rose
->diagnostic
= rose_cause
.diagnostic
;
1311 if (!capable(CAP_NET_ADMIN
)) return -EPERM
;
1312 if (ax25cmp(&rose_callsign
, &null_ax25_address
) != 0)
1313 ax25_listen_release(&rose_callsign
, NULL
);
1314 if (copy_from_user(&rose_callsign
, argp
, sizeof(ax25_address
)))
1316 if (ax25cmp(&rose_callsign
, &null_ax25_address
) != 0)
1317 ax25_listen_register(&rose_callsign
, NULL
);
1321 return copy_to_user(argp
, &rose_callsign
, sizeof(ax25_address
)) ? -EFAULT
: 0;
1324 if (rose
->state
== ROSE_STATE_5
) {
1325 rose_write_internal(sk
, ROSE_CALL_ACCEPTED
);
1326 rose_start_idletimer(sk
);
1327 rose
->condition
= 0x00;
1332 rose
->state
= ROSE_STATE_3
;
1337 return -ENOIOCTLCMD
;
1343 #ifdef CONFIG_PROC_FS
1344 static void *rose_info_start(struct seq_file
*seq
, loff_t
*pos
)
1348 struct hlist_node
*node
;
1350 spin_lock_bh(&rose_list_lock
);
1352 return SEQ_START_TOKEN
;
1355 sk_for_each(s
, node
, &rose_list
) {
1363 static void *rose_info_next(struct seq_file
*seq
, void *v
, loff_t
*pos
)
1367 return (v
== SEQ_START_TOKEN
) ? sk_head(&rose_list
)
1368 : sk_next((struct sock
*)v
);
1371 static void rose_info_stop(struct seq_file
*seq
, void *v
)
1373 spin_unlock_bh(&rose_list_lock
);
1376 static int rose_info_show(struct seq_file
*seq
, void *v
)
1380 if (v
== SEQ_START_TOKEN
)
1382 "dest_addr dest_call src_addr src_call dev lci neigh st vs vr va t t1 t2 t3 hb idle Snd-Q Rcv-Q inode\n");
1386 struct rose_sock
*rose
= rose_sk(s
);
1387 const char *devname
, *callsign
;
1388 const struct net_device
*dev
= rose
->device
;
1393 devname
= dev
->name
;
1395 seq_printf(seq
, "%-10s %-9s ",
1396 rose2asc(&rose
->dest_addr
),
1397 ax2asc(buf
, &rose
->dest_call
));
1399 if (ax25cmp(&rose
->source_call
, &null_ax25_address
) == 0)
1400 callsign
= "??????-?";
1402 callsign
= ax2asc(buf
, &rose
->source_call
);
1405 "%-10s %-9s %-5s %3.3X %05d %d %d %d %d %3lu %3lu %3lu %3lu %3lu %3lu/%03lu %5d %5d %ld\n",
1406 rose2asc(&rose
->source_addr
),
1410 (rose
->neighbour
) ? rose
->neighbour
->number
: 0,
1415 ax25_display_timer(&rose
->timer
) / HZ
,
1420 ax25_display_timer(&rose
->idletimer
) / (60 * HZ
),
1421 rose
->idle
/ (60 * HZ
),
1422 atomic_read(&s
->sk_wmem_alloc
),
1423 atomic_read(&s
->sk_rmem_alloc
),
1424 s
->sk_socket
? SOCK_INODE(s
->sk_socket
)->i_ino
: 0L);
1430 static struct seq_operations rose_info_seqops
= {
1431 .start
= rose_info_start
,
1432 .next
= rose_info_next
,
1433 .stop
= rose_info_stop
,
1434 .show
= rose_info_show
,
1437 static int rose_info_open(struct inode
*inode
, struct file
*file
)
1439 return seq_open(file
, &rose_info_seqops
);
1442 static struct file_operations rose_info_fops
= {
1443 .owner
= THIS_MODULE
,
1444 .open
= rose_info_open
,
1446 .llseek
= seq_lseek
,
1447 .release
= seq_release
,
1449 #endif /* CONFIG_PROC_FS */
1451 static struct net_proto_family rose_family_ops
= {
1453 .create
= rose_create
,
1454 .owner
= THIS_MODULE
,
1457 static struct proto_ops rose_proto_ops
= {
1459 .owner
= THIS_MODULE
,
1460 .release
= rose_release
,
1462 .connect
= rose_connect
,
1463 .socketpair
= sock_no_socketpair
,
1464 .accept
= rose_accept
,
1465 .getname
= rose_getname
,
1466 .poll
= datagram_poll
,
1467 .ioctl
= rose_ioctl
,
1468 .listen
= rose_listen
,
1469 .shutdown
= sock_no_shutdown
,
1470 .setsockopt
= rose_setsockopt
,
1471 .getsockopt
= rose_getsockopt
,
1472 .sendmsg
= rose_sendmsg
,
1473 .recvmsg
= rose_recvmsg
,
1474 .mmap
= sock_no_mmap
,
1475 .sendpage
= sock_no_sendpage
,
1478 static struct notifier_block rose_dev_notifier
= {
1479 .notifier_call
= rose_device_event
,
1482 static struct net_device
**dev_rose
;
1484 static int __init
rose_proto_init(void)
1489 if (rose_ndevs
> 0x7FFFFFFF/sizeof(struct net_device
*)) {
1490 printk(KERN_ERR
"ROSE: rose_proto_init - rose_ndevs parameter to large\n");
1495 rc
= proto_register(&rose_proto
, 0);
1499 rose_callsign
= null_ax25_address
;
1501 dev_rose
= kzalloc(rose_ndevs
* sizeof(struct net_device
*), GFP_KERNEL
);
1502 if (dev_rose
== NULL
) {
1503 printk(KERN_ERR
"ROSE: rose_proto_init - unable to allocate device structure\n");
1505 goto out_proto_unregister
;
1508 for (i
= 0; i
< rose_ndevs
; i
++) {
1509 struct net_device
*dev
;
1510 char name
[IFNAMSIZ
];
1512 sprintf(name
, "rose%d", i
);
1513 dev
= alloc_netdev(sizeof(struct net_device_stats
),
1516 printk(KERN_ERR
"ROSE: rose_proto_init - unable to allocate memory\n");
1520 rc
= register_netdev(dev
);
1522 printk(KERN_ERR
"ROSE: netdevice registration failed\n");
1526 lockdep_set_class(&dev
->_xmit_lock
, &rose_netdev_xmit_lock_key
);
1530 sock_register(&rose_family_ops
);
1531 register_netdevice_notifier(&rose_dev_notifier
);
1533 ax25_protocol_register(AX25_P_ROSE
, rose_route_frame
);
1534 ax25_linkfail_register(rose_link_failed
);
1536 #ifdef CONFIG_SYSCTL
1537 rose_register_sysctl();
1539 rose_loopback_init();
1541 rose_add_loopback_neigh();
1543 proc_net_fops_create("rose", S_IRUGO
, &rose_info_fops
);
1544 proc_net_fops_create("rose_neigh", S_IRUGO
, &rose_neigh_fops
);
1545 proc_net_fops_create("rose_nodes", S_IRUGO
, &rose_nodes_fops
);
1546 proc_net_fops_create("rose_routes", S_IRUGO
, &rose_routes_fops
);
1551 unregister_netdev(dev_rose
[i
]);
1552 free_netdev(dev_rose
[i
]);
1555 out_proto_unregister
:
1556 proto_unregister(&rose_proto
);
1559 module_init(rose_proto_init
);
1561 module_param(rose_ndevs
, int, 0);
1562 MODULE_PARM_DESC(rose_ndevs
, "number of ROSE devices");
1564 MODULE_AUTHOR("Jonathan Naylor G4KLX <g4klx@g4klx.demon.co.uk>");
1565 MODULE_DESCRIPTION("The amateur radio ROSE network layer protocol");
1566 MODULE_LICENSE("GPL");
1567 MODULE_ALIAS_NETPROTO(PF_ROSE
);
1569 static void __exit
rose_exit(void)
1573 proc_net_remove("rose");
1574 proc_net_remove("rose_neigh");
1575 proc_net_remove("rose_nodes");
1576 proc_net_remove("rose_routes");
1577 rose_loopback_clear();
1581 ax25_protocol_release(AX25_P_ROSE
);
1582 ax25_linkfail_release(rose_link_failed
);
1584 if (ax25cmp(&rose_callsign
, &null_ax25_address
) != 0)
1585 ax25_listen_release(&rose_callsign
, NULL
);
1587 #ifdef CONFIG_SYSCTL
1588 rose_unregister_sysctl();
1590 unregister_netdevice_notifier(&rose_dev_notifier
);
1592 sock_unregister(PF_ROSE
);
1594 for (i
= 0; i
< rose_ndevs
; i
++) {
1595 struct net_device
*dev
= dev_rose
[i
];
1598 unregister_netdev(dev
);
1604 proto_unregister(&rose_proto
);
1607 module_exit(rose_exit
);