net/netrom/af_netrom.c

   1 /*
   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.
   6  *
   7  * Copyright Jonathan Naylor G4KLX (g4klx@g4klx.demon.co.uk)
   8  * Copyright Alan Cox GW4PTS (alan@lxorguk.ukuu.org.uk)
   9  * Copyright Darryl Miles G7LED (dlm@g7led.demon.co.uk)
  10  */
  11 #include <linux/config.h>
  12 #include <linux/module.h>
  13 #include <linux/moduleparam.h>
  14 #include <linux/capability.h>
  15 #include <linux/errno.h>
  16 #include <linux/types.h>
  17 #include <linux/socket.h>
  18 #include <linux/in.h>
  19 #include <linux/kernel.h>
  20 #include <linux/sched.h>
  21 #include <linux/timer.h>
  22 #include <linux/string.h>
  23 #include <linux/sockios.h>
  24 #include <linux/net.h>
  25 #include <linux/stat.h>
  26 #include <net/ax25.h>
  27 #include <linux/inet.h>
  28 #include <linux/netdevice.h>
  29 #include <linux/if_arp.h>
  30 #include <linux/skbuff.h>
  31 #include <net/sock.h>
  32 #include <asm/uaccess.h>
  33 #include <asm/system.h>
  34 #include <linux/fcntl.h>
  35 #include <linux/termios.h>      /* For TIOCINQ/OUTQ */
  36 #include <linux/mm.h>
  37 #include <linux/interrupt.h>
  38 #include <linux/notifier.h>
  39 #include <net/netrom.h>
  40 #include <linux/proc_fs.h>
  41 #include <linux/seq_file.h>
  42 #include <net/ip.h>
  43 #include <net/tcp_states.h>
  44 #include <net/arp.h>
  45 #include <linux/init.h>
  46
  47 static int nr_ndevs = 4;
  48
  49 int sysctl_netrom_default_path_quality            = NR_DEFAULT_QUAL;
  50 int sysctl_netrom_obsolescence_count_initialiser  = NR_DEFAULT_OBS;
  51 int sysctl_netrom_network_ttl_initialiser         = NR_DEFAULT_TTL;
  52 int sysctl_netrom_transport_timeout               = NR_DEFAULT_T1;
  53 int sysctl_netrom_transport_maximum_tries         = NR_DEFAULT_N2;
  54 int sysctl_netrom_transport_acknowledge_delay     = NR_DEFAULT_T2;
  55 int sysctl_netrom_transport_busy_delay            = NR_DEFAULT_T4;
  56 int sysctl_netrom_transport_requested_window_size = NR_DEFAULT_WINDOW;
  57 int sysctl_netrom_transport_no_activity_timeout   = NR_DEFAULT_IDLE;
  58 int sysctl_netrom_routing_control                 = NR_DEFAULT_ROUTING;
  59 int sysctl_netrom_link_fails_count                = NR_DEFAULT_FAILS;
  60 int sysctl_netrom_reset_circuit                   = NR_DEFAULT_RESET;
  61
  62 static unsigned short circuit = 0x101;
  63
  64 static HLIST_HEAD(nr_list);
  65 static DEFINE_SPINLOCK(nr_list_lock);
  66
  67 static const struct proto_ops nr_proto_ops;
  68
  69 /*
  70  *      Socket removal during an interrupt is now safe.
  71  */
  72 static void nr_remove_socket(struct sock *sk)
  73 {
  74         spin_lock_bh(&nr_list_lock);
  75         sk_del_node_init(sk);
  76         spin_unlock_bh(&nr_list_lock);
  77 }
  78
  79 /*
  80  *      Kill all bound sockets on a dropped device.
  81  */
  82 static void nr_kill_by_device(struct net_device *dev)
  83 {
  84         struct sock *s;
  85         struct hlist_node *node;
  86
  87         spin_lock_bh(&nr_list_lock);
  88         sk_for_each(s, node, &nr_list)
  89                 if (nr_sk(s)->device == dev)
  90                         nr_disconnect(s, ENETUNREACH);
  91         spin_unlock_bh(&nr_list_lock);
  92 }
  93
  94 /*
  95  *      Handle device status changes.
  96  */
  97 static int nr_device_event(struct notifier_block *this, unsigned long event, void *ptr)
  98 {
  99         struct net_device *dev = (struct net_device *)ptr;
 100
 101         if (event != NETDEV_DOWN)
 102                 return NOTIFY_DONE;
 103
 104         nr_kill_by_device(dev);
 105         nr_rt_device_down(dev);
 106
 107         return NOTIFY_DONE;
 108 }
 109
 110 /*
 111  *      Add a socket to the bound sockets list.
 112  */
 113 static void nr_insert_socket(struct sock *sk)
 114 {
 115         spin_lock_bh(&nr_list_lock);
 116         sk_add_node(sk, &nr_list);
 117         spin_unlock_bh(&nr_list_lock);
 118 }
 119
 120 /*
 121  *      Find a socket that wants to accept the Connect Request we just
 122  *      received.
 123  */
 124 static struct sock *nr_find_listener(ax25_address *addr)
 125 {
 126         struct sock *s;
 127         struct hlist_node *node;
 128
 129         spin_lock_bh(&nr_list_lock);
 130         sk_for_each(s, node, &nr_list)
 131                 if (!ax25cmp(&nr_sk(s)->source_addr, addr) &&
 132                     s->sk_state == TCP_LISTEN) {
 133                         bh_lock_sock(s);
 134                         goto found;
 135                 }
 136         s = NULL;
 137 found:
 138         spin_unlock_bh(&nr_list_lock);
 139         return s;
 140 }
 141
 142 /*
 143  *      Find a connected NET/ROM socket given my circuit IDs.
 144  */
 145 static struct sock *nr_find_socket(unsigned char index, unsigned char id)
 146 {
 147         struct sock *s;
 148         struct hlist_node *node;
 149
 150         spin_lock_bh(&nr_list_lock);
 151         sk_for_each(s, node, &nr_list) {
 152                 struct nr_sock *nr = nr_sk(s);
 153
 154                 if (nr->my_index == index && nr->my_id == id) {
 155                         bh_lock_sock(s);
 156                         goto found;
 157                 }
 158         }
 159         s = NULL;
 160 found:
 161         spin_unlock_bh(&nr_list_lock);
 162         return s;
 163 }
 164
 165 /*
 166  *      Find a connected NET/ROM socket given their circuit IDs.
 167  */
 168 static struct sock *nr_find_peer(unsigned char index, unsigned char id,
 169         ax25_address *dest)
 170 {
 171         struct sock *s;
 172         struct hlist_node *node;
 173
 174         spin_lock_bh(&nr_list_lock);
 175         sk_for_each(s, node, &nr_list) {
 176                 struct nr_sock *nr = nr_sk(s);
 177
 178                 if (nr->your_index == index && nr->your_id == id &&
 179                     !ax25cmp(&nr->dest_addr, dest)) {
 180                         bh_lock_sock(s);
 181                         goto found;
 182                 }
 183         }
 184         s = NULL;
 185 found:
 186         spin_unlock_bh(&nr_list_lock);
 187         return s;
 188 }
 189
 190 /*
 191  *      Find next free circuit ID.
 192  */
 193 static unsigned short nr_find_next_circuit(void)
 194 {
 195         unsigned short id = circuit;
 196         unsigned char i, j;
 197         struct sock *sk;
 198
 199         for (;;) {
 200                 i = id / 256;
 201                 j = id % 256;
 202
 203                 if (i != 0 && j != 0) {
 204                         if ((sk=nr_find_socket(i, j)) == NULL)
 205                                 break;
 206                         bh_unlock_sock(sk);
 207                 }
 208
 209                 id++;
 210         }
 211
 212         return id;
 213 }
 214
 215 /*
 216  *      Deferred destroy.
 217  */
 218 void nr_destroy_socket(struct sock *);
 219
 220 /*
 221  *      Handler for deferred kills.
 222  */
 223 static void nr_destroy_timer(unsigned long data)
 224 {
 225         struct sock *sk=(struct sock *)data;
 226         bh_lock_sock(sk);
 227         sock_hold(sk);
 228         nr_destroy_socket(sk);
 229         bh_unlock_sock(sk);
 230         sock_put(sk);
 231 }
 232
 233 /*
 234  *      This is called from user mode and the timers. Thus it protects itself
 235  *      against interrupt users but doesn't worry about being called during
 236  *      work. Once it is removed from the queue no interrupt or bottom half
 237  *      will touch it and we are (fairly 8-) ) safe.
 238  */
 239 void nr_destroy_socket(struct sock *sk)
 240 {
 241         struct sk_buff *skb;
 242
 243         nr_remove_socket(sk);
 244
 245         nr_stop_heartbeat(sk);
 246         nr_stop_t1timer(sk);
 247         nr_stop_t2timer(sk);
 248         nr_stop_t4timer(sk);
 249         nr_stop_idletimer(sk);
 250
 251         nr_clear_queues(sk);            /* Flush the queues */
 252
 253         while ((skb = skb_dequeue(&sk->sk_receive_queue)) != NULL) {
 254                 if (skb->sk != sk) { /* A pending connection */
 255                         /* Queue the unaccepted socket for death */
 256                         sock_set_flag(skb->sk, SOCK_DEAD);
 257                         nr_start_heartbeat(skb->sk);
 258                         nr_sk(skb->sk)->state = NR_STATE_0;
 259                 }
 260
 261                 kfree_skb(skb);
 262         }
 263
 264         if (atomic_read(&sk->sk_wmem_alloc) ||
 265             atomic_read(&sk->sk_rmem_alloc)) {
 266                 /* Defer: outstanding buffers */
 267                 sk->sk_timer.function = nr_destroy_timer;
 268                 sk->sk_timer.expires  = jiffies + 2 * HZ;
 269                 add_timer(&sk->sk_timer);
 270         } else
 271                 sock_put(sk);
 272 }
 273
 274 /*
 275  *      Handling for system calls applied via the various interfaces to a
 276  *      NET/ROM socket object.
 277  */
 278
 279 static int nr_setsockopt(struct socket *sock, int level, int optname,
 280         char __user *optval, int optlen)
 281 {
 282         struct sock *sk = sock->sk;
 283         struct nr_sock *nr = nr_sk(sk);
 284         int opt;
 285
 286         if (level != SOL_NETROM)
 287                 return -ENOPROTOOPT;
 288
 289         if (optlen < sizeof(int))
 290                 return -EINVAL;
 291
 292         if (get_user(opt, (int __user *)optval))
 293                 return -EFAULT;
 294
 295         switch (optname) {
 296         case NETROM_T1:
 297                 if (opt < 1)
 298                         return -EINVAL;
 299                 nr->t1 = opt * HZ;
 300                 return 0;
 301
 302         case NETROM_T2:
 303                 if (opt < 1)
 304                         return -EINVAL;
 305                 nr->t2 = opt * HZ;
 306                 return 0;
 307
 308         case NETROM_N2:
 309                 if (opt < 1 || opt > 31)
 310                         return -EINVAL;
 311                 nr->n2 = opt;
 312                 return 0;
 313
 314         case NETROM_T4:
 315                 if (opt < 1)
 316                         return -EINVAL;
 317                 nr->t4 = opt * HZ;
 318                 return 0;
 319
 320         case NETROM_IDLE:
 321                 if (opt < 0)
 322                         return -EINVAL;
 323                 nr->idle = opt * 60 * HZ;
 324                 return 0;
 325
 326         default:
 327                 return -ENOPROTOOPT;
 328         }
 329 }
 330
 331 static int nr_getsockopt(struct socket *sock, int level, int optname,
 332         char __user *optval, int __user *optlen)
 333 {
 334         struct sock *sk = sock->sk;
 335         struct nr_sock *nr = nr_sk(sk);
 336         int val = 0;
 337         int len;
 338
 339         if (level != SOL_NETROM)
 340                 return -ENOPROTOOPT;
 341
 342         if (get_user(len, optlen))
 343                 return -EFAULT;
 344
 345         if (len < 0)
 346                 return -EINVAL;
 347
 348         switch (optname) {
 349         case NETROM_T1:
 350                 val = nr->t1 / HZ;
 351                 break;
 352
 353         case NETROM_T2:
 354                 val = nr->t2 / HZ;
 355                 break;
 356
 357         case NETROM_N2:
 358                 val = nr->n2;
 359                 break;
 360
 361         case NETROM_T4:
 362                 val = nr->t4 / HZ;
 363                 break;
 364
 365         case NETROM_IDLE:
 366                 val = nr->idle / (60 * HZ);
 367                 break;
 368
 369         default:
 370                 return -ENOPROTOOPT;
 371         }
 372
 373         len = min_t(unsigned int, len, sizeof(int));
 374
 375         if (put_user(len, optlen))
 376                 return -EFAULT;
 377
 378         return copy_to_user(optval, &val, len) ? -EFAULT : 0;
 379 }
 380
 381 static int nr_listen(struct socket *sock, int backlog)
 382 {
 383         struct sock *sk = sock->sk;
 384
 385         lock_sock(sk);
 386         if (sk->sk_state != TCP_LISTEN) {
 387                 memset(&nr_sk(sk)->user_addr, 0, AX25_ADDR_LEN);
 388                 sk->sk_max_ack_backlog = backlog;
 389                 sk->sk_state           = TCP_LISTEN;
 390                 release_sock(sk);
 391                 return 0;
 392         }
 393         release_sock(sk);
 394
 395         return -EOPNOTSUPP;
 396 }
 397
 398 static struct proto nr_proto = {
 399         .name     = "NETROM",
 400         .owner    = THIS_MODULE,
 401         .obj_size = sizeof(struct nr_sock),
 402 };
 403
 404 static int nr_create(struct socket *sock, int protocol)
 405 {
 406         struct sock *sk;
 407         struct nr_sock *nr;
 408
 409         if (sock->type != SOCK_SEQPACKET || protocol != 0)
 410                 return -ESOCKTNOSUPPORT;
 411
 412         if ((sk = sk_alloc(PF_NETROM, GFP_ATOMIC, &nr_proto, 1)) == NULL)
 413                 return -ENOMEM;
 414
 415         nr = nr_sk(sk);
 416
 417         sock_init_data(sock, sk);
 418
 419         sock->ops    = &nr_proto_ops;
 420         sk->sk_protocol = protocol;
 421
 422         skb_queue_head_init(&nr->ack_queue);
 423         skb_queue_head_init(&nr->reseq_queue);
 424         skb_queue_head_init(&nr->frag_queue);
 425
 426         nr_init_timers(sk);
 427
 428         nr->t1     =
 429                 msecs_to_jiffies(sysctl_netrom_transport_timeout);
 430         nr->t2     =
 431                 msecs_to_jiffies(sysctl_netrom_transport_acknowledge_delay);
 432         nr->n2     =
 433                 msecs_to_jiffies(sysctl_netrom_transport_maximum_tries);
 434         nr->t4     =
 435                 msecs_to_jiffies(sysctl_netrom_transport_busy_delay);
 436         nr->idle   =
 437                 msecs_to_jiffies(sysctl_netrom_transport_no_activity_timeout);
 438         nr->window = sysctl_netrom_transport_requested_window_size;
 439
 440         nr->bpqext = 1;
 441         nr->state  = NR_STATE_0;
 442
 443         return 0;
 444 }
 445
 446 static struct sock *nr_make_new(struct sock *osk)
 447 {
 448         struct sock *sk;
 449         struct nr_sock *nr, *onr;
 450
 451         if (osk->sk_type != SOCK_SEQPACKET)
 452                 return NULL;
 453
 454         if ((sk = sk_alloc(PF_NETROM, GFP_ATOMIC, osk->sk_prot, 1)) == NULL)
 455                 return NULL;
 456
 457         nr = nr_sk(sk);
 458
 459         sock_init_data(NULL, sk);
 460
 461         sk->sk_type     = osk->sk_type;
 462         sk->sk_socket   = osk->sk_socket;
 463         sk->sk_priority = osk->sk_priority;
 464         sk->sk_protocol = osk->sk_protocol;
 465         sk->sk_rcvbuf   = osk->sk_rcvbuf;
 466         sk->sk_sndbuf   = osk->sk_sndbuf;
 467         sk->sk_state    = TCP_ESTABLISHED;
 468         sk->sk_sleep    = osk->sk_sleep;
 469         sock_copy_flags(sk, osk);
 470
 471         skb_queue_head_init(&nr->ack_queue);
 472         skb_queue_head_init(&nr->reseq_queue);
 473         skb_queue_head_init(&nr->frag_queue);
 474
 475         nr_init_timers(sk);
 476
 477         onr = nr_sk(osk);
 478
 479         nr->t1      = onr->t1;
 480         nr->t2      = onr->t2;
 481         nr->n2      = onr->n2;
 482         nr->t4      = onr->t4;
 483         nr->idle    = onr->idle;
 484         nr->window  = onr->window;
 485
 486         nr->device  = onr->device;
 487         nr->bpqext  = onr->bpqext;
 488
 489         return sk;
 490 }
 491
 492 static int nr_release(struct socket *sock)
 493 {
 494         struct sock *sk = sock->sk;
 495         struct nr_sock *nr;
 496
 497         if (sk == NULL) return 0;
 498
 499         sock_hold(sk);
 500         lock_sock(sk);
 501         nr = nr_sk(sk);
 502
 503         switch (nr->state) {
 504         case NR_STATE_0:
 505         case NR_STATE_1:
 506         case NR_STATE_2:
 507                 nr_disconnect(sk, 0);
 508                 nr_destroy_socket(sk);
 509                 break;
 510
 511         case NR_STATE_3:
 512                 nr_clear_queues(sk);
 513                 nr->n2count = 0;
 514                 nr_write_internal(sk, NR_DISCREQ);
 515                 nr_start_t1timer(sk);
 516                 nr_stop_t2timer(sk);
 517                 nr_stop_t4timer(sk);
 518                 nr_stop_idletimer(sk);
 519                 nr->state    = NR_STATE_2;
 520                 sk->sk_state    = TCP_CLOSE;
 521                 sk->sk_shutdown |= SEND_SHUTDOWN;
 522                 sk->sk_state_change(sk);
 523                 sock_orphan(sk);
 524                 sock_set_flag(sk, SOCK_DESTROY);
 525                 sk->sk_socket   = NULL;
 526                 break;
 527
 528         default:
 529                 sk->sk_socket = NULL;
 530                 break;
 531         }
 532
 533         sock->sk   = NULL;
 534         release_sock(sk);
 535         sock_put(sk);
 536
 537         return 0;
 538 }
 539
 540 static int nr_bind(struct socket *sock, struct sockaddr *uaddr, int addr_len)
 541 {
 542         struct sock *sk = sock->sk;
 543         struct nr_sock *nr = nr_sk(sk);
 544         struct full_sockaddr_ax25 *addr = (struct full_sockaddr_ax25 *)uaddr;
 545         struct net_device *dev;
 546         ax25_uid_assoc *user;
 547         ax25_address *source;
 548
 549         lock_sock(sk);
 550         if (!sock_flag(sk, SOCK_ZAPPED)) {
 551                 release_sock(sk);
 552                 return -EINVAL;
 553         }
 554         if (addr_len < sizeof(struct sockaddr_ax25) || addr_len > sizeof(struct full_sockaddr_ax25)) {
 555                 release_sock(sk);
 556                 return -EINVAL;
 557         }
 558         if (addr_len < (addr->fsa_ax25.sax25_ndigis * sizeof(ax25_address) + sizeof(struct sockaddr_ax25))) {
 559                 release_sock(sk);
 560                 return -EINVAL;
 561         }
 562         if (addr->fsa_ax25.sax25_family != AF_NETROM) {
 563                 release_sock(sk);
 564                 return -EINVAL;
 565         }
 566         if ((dev = nr_dev_get(&addr->fsa_ax25.sax25_call)) == NULL) {
 567                 SOCK_DEBUG(sk, "NET/ROM: bind failed: invalid node callsign\n");
 568                 release_sock(sk);
 569                 return -EADDRNOTAVAIL;
 570         }
 571
 572         /*
 573          * Only the super user can set an arbitrary user callsign.
 574          */
 575         if (addr->fsa_ax25.sax25_ndigis == 1) {
 576                 if (!capable(CAP_NET_BIND_SERVICE)) {
 577                         dev_put(dev);
 578                         release_sock(sk);
 579                         return -EACCES;
 580                 }
 581                 nr->user_addr   = addr->fsa_digipeater[0];
 582                 nr->source_addr = addr->fsa_ax25.sax25_call;
 583         } else {
 584                 source = &addr->fsa_ax25.sax25_call;
 585
 586                 user = ax25_findbyuid(current->euid);
 587                 if (user) {
 588                         nr->user_addr   = user->call;
 589                         ax25_uid_put(user);
 590                 } else {
 591                         if (ax25_uid_policy && !capable(CAP_NET_BIND_SERVICE)) {
 592                                 release_sock(sk);
 593                                 dev_put(dev);
 594                                 return -EPERM;
 595                         }
 596                         nr->user_addr   = *source;
 597                 }
 598
 599                 nr->source_addr = *source;
 600         }
 601
 602         nr->device = dev;
 603         nr_insert_socket(sk);
 604
 605         sock_reset_flag(sk, SOCK_ZAPPED);
 606         dev_put(dev);
 607         release_sock(sk);
 608         SOCK_DEBUG(sk, "NET/ROM: socket is bound\n");
 609         return 0;
 610 }
 611
 612 static int nr_connect(struct socket *sock, struct sockaddr *uaddr,
 613         int addr_len, int flags)
 614 {
 615         struct sock *sk = sock->sk;
 616         struct nr_sock *nr = nr_sk(sk);
 617         struct sockaddr_ax25 *addr = (struct sockaddr_ax25 *)uaddr;
 618         ax25_address *source = NULL;
 619         ax25_uid_assoc *user;
 620         struct net_device *dev;
 621
 622         lock_sock(sk);
 623         if (sk->sk_state == TCP_ESTABLISHED && sock->state == SS_CONNECTING) {
 624                 sock->state = SS_CONNECTED;
 625                 release_sock(sk);
 626                 return 0;       /* Connect completed during a ERESTARTSYS event */
 627         }
 628
 629         if (sk->sk_state == TCP_CLOSE && sock->state == SS_CONNECTING) {
 630                 sock->state = SS_UNCONNECTED;
 631                 release_sock(sk);
 632                 return -ECONNREFUSED;
 633         }
 634
 635         if (sk->sk_state == TCP_ESTABLISHED) {
 636                 release_sock(sk);
 637                 return -EISCONN;        /* No reconnect on a seqpacket socket */
 638         }
 639
 640         sk->sk_state   = TCP_CLOSE;
 641         sock->state = SS_UNCONNECTED;
 642
 643         if (addr_len != sizeof(struct sockaddr_ax25) && addr_len != sizeof(struct full_sockaddr_ax25)) {
 644                 release_sock(sk);
 645                 return -EINVAL;
 646         }
 647         if (addr->sax25_family != AF_NETROM) {
 648                 release_sock(sk);
 649                 return -EINVAL;
 650         }
 651         if (sock_flag(sk, SOCK_ZAPPED)) {       /* Must bind first - autobinding in this may or may not work */
 652                 sock_reset_flag(sk, SOCK_ZAPPED);
 653
 654                 if ((dev = nr_dev_first()) == NULL) {
 655                         release_sock(sk);
 656                         return -ENETUNREACH;
 657                 }
 658                 source = (ax25_address *)dev->dev_addr;
 659
 660                 user = ax25_findbyuid(current->euid);
 661                 if (user) {
 662                         nr->user_addr   = user->call;
 663                         ax25_uid_put(user);
 664                 } else {
 665                         if (ax25_uid_policy && !capable(CAP_NET_ADMIN)) {
 666                                 dev_put(dev);
 667                                 release_sock(sk);
 668                                 return -EPERM;
 669                         }
 670                         nr->user_addr   = *source;
 671                 }
 672
 673                 nr->source_addr = *source;
 674                 nr->device      = dev;
 675
 676                 dev_put(dev);
 677                 nr_insert_socket(sk);           /* Finish the bind */
 678         }
 679
 680         nr->dest_addr = addr->sax25_call;
 681
 682         release_sock(sk);
 683         circuit = nr_find_next_circuit();
 684         lock_sock(sk);
 685
 686         nr->my_index = circuit / 256;
 687         nr->my_id    = circuit % 256;
 688
 689         circuit++;
 690
 691         /* Move to connecting socket, start sending Connect Requests */
 692         sock->state  = SS_CONNECTING;
 693         sk->sk_state = TCP_SYN_SENT;
 694
 695         nr_establish_data_link(sk);
 696
 697         nr->state = NR_STATE_1;
 698
 699         nr_start_heartbeat(sk);
 700
 701         /* Now the loop */
 702         if (sk->sk_state != TCP_ESTABLISHED && (flags & O_NONBLOCK)) {
 703                 release_sock(sk);
 704                 return -EINPROGRESS;
 705         }
 706
 707         /*
 708          * A Connect Ack with Choke or timeout or failed routing will go to
 709          * closed.
 710          */
 711         if (sk->sk_state == TCP_SYN_SENT) {
 712                 struct task_struct *tsk = current;
 713                 DECLARE_WAITQUEUE(wait, tsk);
 714
 715                 add_wait_queue(sk->sk_sleep, &wait);
 716                 for (;;) {
 717                         set_current_state(TASK_INTERRUPTIBLE);
 718                         if (sk->sk_state != TCP_SYN_SENT)
 719                                 break;
 720                         release_sock(sk);
 721                         if (!signal_pending(tsk)) {
 722                                 schedule();
 723                                 lock_sock(sk);
 724                                 continue;
 725                         }
 726                         current->state = TASK_RUNNING;
 727                         remove_wait_queue(sk->sk_sleep, &wait);
 728                         return -ERESTARTSYS;
 729                 }
 730                 current->state = TASK_RUNNING;
 731                 remove_wait_queue(sk->sk_sleep, &wait);
 732         }
 733
 734         if (sk->sk_state != TCP_ESTABLISHED) {
 735                 sock->state = SS_UNCONNECTED;
 736                 release_sock(sk);
 737                 return sock_error(sk);  /* Always set at this point */
 738         }
 739
 740         sock->state = SS_CONNECTED;
 741         release_sock(sk);
 742
 743         return 0;
 744 }
 745
 746 static int nr_accept(struct socket *sock, struct socket *newsock, int flags)
 747 {
 748         struct task_struct *tsk = current;
 749         DECLARE_WAITQUEUE(wait, tsk);
 750         struct sk_buff *skb;
 751         struct sock *newsk;
 752         struct sock *sk;
 753         int err = 0;
 754
 755         if ((sk = sock->sk) == NULL)
 756                 return -EINVAL;
 757
 758         lock_sock(sk);
 759         if (sk->sk_type != SOCK_SEQPACKET) {
 760                 err = -EOPNOTSUPP;
 761                 goto out;
 762         }
 763
 764         if (sk->sk_state != TCP_LISTEN) {
 765                 err = -EINVAL;
 766                 goto out;
 767         }
 768
 769         /*
 770          *      The write queue this time is holding sockets ready to use
 771          *      hooked into the SABM we saved
 772          */
 773         add_wait_queue(sk->sk_sleep, &wait);
 774         for (;;) {
 775                 skb = skb_dequeue(&sk->sk_receive_queue);
 776                 if (skb)
 777                         break;
 778
 779                 current->state = TASK_INTERRUPTIBLE;
 780                 release_sock(sk);
 781                 if (flags & O_NONBLOCK) {
 782                         current->state = TASK_RUNNING;
 783                         remove_wait_queue(sk->sk_sleep, &wait);
 784                         return -EWOULDBLOCK;
 785                 }
 786                 if (!signal_pending(tsk)) {
 787                         schedule();
 788                         lock_sock(sk);
 789                         continue;
 790                 }
 791                 current->state = TASK_RUNNING;
 792                 remove_wait_queue(sk->sk_sleep, &wait);
 793                 return -ERESTARTSYS;
 794         }
 795         current->state = TASK_RUNNING;
 796         remove_wait_queue(sk->sk_sleep, &wait);
 797
 798         newsk = skb->sk;
 799         newsk->sk_socket = newsock;
 800         newsk->sk_sleep = &newsock->wait;
 801
 802         /* Now attach up the new socket */
 803         kfree_skb(skb);
 804         sk->sk_ack_backlog--;
 805         newsock->sk = newsk;
 806
 807 out:
 808         release_sock(sk);
 809         return err;
 810 }
 811
 812 static int nr_getname(struct socket *sock, struct sockaddr *uaddr,
 813         int *uaddr_len, int peer)
 814 {
 815         struct full_sockaddr_ax25 *sax = (struct full_sockaddr_ax25 *)uaddr;
 816         struct sock *sk = sock->sk;
 817         struct nr_sock *nr = nr_sk(sk);
 818
 819         lock_sock(sk);
 820         if (peer != 0) {
 821                 if (sk->sk_state != TCP_ESTABLISHED) {
 822                         release_sock(sk);
 823                         return -ENOTCONN;
 824                 }
 825                 sax->fsa_ax25.sax25_family = AF_NETROM;
 826                 sax->fsa_ax25.sax25_ndigis = 1;
 827                 sax->fsa_ax25.sax25_call   = nr->user_addr;
 828                 sax->fsa_digipeater[0]     = nr->dest_addr;
 829                 *uaddr_len = sizeof(struct full_sockaddr_ax25);
 830         } else {
 831                 sax->fsa_ax25.sax25_family = AF_NETROM;
 832                 sax->fsa_ax25.sax25_ndigis = 0;
 833                 sax->fsa_ax25.sax25_call   = nr->source_addr;
 834                 *uaddr_len = sizeof(struct sockaddr_ax25);
 835         }
 836         release_sock(sk);
 837
 838         return 0;
 839 }
 840
 841 int nr_rx_frame(struct sk_buff *skb, struct net_device *dev)
 842 {
 843         struct sock *sk;
 844         struct sock *make;
 845         struct nr_sock *nr_make;
 846         ax25_address *src, *dest, *user;
 847         unsigned short circuit_index, circuit_id;
 848         unsigned short peer_circuit_index, peer_circuit_id;
 849         unsigned short frametype, flags, window, timeout;
 850         int ret;
 851
 852         skb->sk = NULL;         /* Initially we don't know who it's for */
 853
 854         /*
 855          *      skb->data points to the netrom frame start
 856          */
 857
 858         src  = (ax25_address *)(skb->data + 0);
 859         dest = (ax25_address *)(skb->data + 7);
 860
 861         circuit_index      = skb->data[15];
 862         circuit_id         = skb->data[16];
 863         peer_circuit_index = skb->data[17];
 864         peer_circuit_id    = skb->data[18];
 865         frametype          = skb->data[19] & 0x0F;
 866         flags              = skb->data[19] & 0xF0;
 867
 868         /*
 869          * Check for an incoming IP over NET/ROM frame.
 870          */
 871         if (frametype == NR_PROTOEXT &&
 872             circuit_index == NR_PROTO_IP && circuit_id == NR_PROTO_IP) {
 873                 skb_pull(skb, NR_NETWORK_LEN + NR_TRANSPORT_LEN);
 874                 skb->h.raw = skb->data;
 875
 876                 return nr_rx_ip(skb, dev);
 877         }
 878
 879         /*
 880          * Find an existing socket connection, based on circuit ID, if it's
 881          * a Connect Request base it on their circuit ID.
 882          *
 883          * Circuit ID 0/0 is not valid but it could still be a "reset" for a
 884          * circuit that no longer exists at the other end ...
 885          */
 886
 887         sk = NULL;
 888
 889         if (circuit_index == 0 && circuit_id == 0) {
 890                 if (frametype == NR_CONNACK && flags == NR_CHOKE_FLAG)
 891                         sk = nr_find_peer(peer_circuit_index, peer_circuit_id, src);
 892         } else {
 893                 if (frametype == NR_CONNREQ)
 894                         sk = nr_find_peer(circuit_index, circuit_id, src);
 895                 else
 896                         sk = nr_find_socket(circuit_index, circuit_id);
 897         }
 898
 899         if (sk != NULL) {
 900                 skb->h.raw = skb->data;
 901
 902                 if (frametype == NR_CONNACK && skb->len == 22)
 903                         nr_sk(sk)->bpqext = 1;
 904                 else
 905                         nr_sk(sk)->bpqext = 0;
 906
 907                 ret = nr_process_rx_frame(sk, skb);
 908                 bh_unlock_sock(sk);
 909                 return ret;
 910         }
 911
 912         /*
 913          * Now it should be a CONNREQ.
 914          */
 915         if (frametype != NR_CONNREQ) {
 916                 /*
 917                  * Here it would be nice to be able to send a reset but
 918                  * NET/ROM doesn't have one.  We've tried to extend the protocol
 919                  * by sending NR_CONNACK | NR_CHOKE_FLAGS replies but that
 920                  * apparently kills BPQ boxes... :-(
 921                  * So now we try to follow the established behaviour of
 922                  * G8PZT's Xrouter which is sending packets with command type 7
 923                  * as an extension of the protocol.
 924                  */
 925                 if (sysctl_netrom_reset_circuit &&
 926                     (frametype != NR_RESET || flags != 0))
 927                         nr_transmit_reset(skb, 1);
 928
 929                 return 0;
 930         }
 931
 932         sk = nr_find_listener(dest);
 933
 934         user = (ax25_address *)(skb->data + 21);
 935
 936         if (sk == NULL || sk_acceptq_is_full(sk) ||
 937             (make = nr_make_new(sk)) == NULL) {
 938                 nr_transmit_refusal(skb, 0);
 939                 if (sk)
 940                         bh_unlock_sock(sk);
 941                 return 0;
 942         }
 943
 944         window = skb->data[20];
 945
 946         skb->sk             = make;
 947         make->sk_state      = TCP_ESTABLISHED;
 948
 949         /* Fill in his circuit details */
 950         nr_make = nr_sk(make);
 951         nr_make->source_addr = *dest;
 952         nr_make->dest_addr   = *src;
 953         nr_make->user_addr   = *user;
 954
 955         nr_make->your_index  = circuit_index;
 956         nr_make->your_id     = circuit_id;
 957
 958         bh_unlock_sock(sk);
 959         circuit = nr_find_next_circuit();
 960         bh_lock_sock(sk);
 961
 962         nr_make->my_index    = circuit / 256;
 963         nr_make->my_id       = circuit % 256;
 964
 965         circuit++;
 966
 967         /* Window negotiation */
 968         if (window < nr_make->window)
 969                 nr_make->window = window;
 970
 971         /* L4 timeout negotiation */
 972         if (skb->len == 37) {
 973                 timeout = skb->data[36] * 256 + skb->data[35];
 974                 if (timeout * HZ < nr_make->t1)
 975                         nr_make->t1 = timeout * HZ;
 976                 nr_make->bpqext = 1;
 977         } else {
 978                 nr_make->bpqext = 0;
 979         }
 980
 981         nr_write_internal(make, NR_CONNACK);
 982
 983         nr_make->condition = 0x00;
 984         nr_make->vs        = 0;
 985         nr_make->va        = 0;
 986         nr_make->vr        = 0;
 987         nr_make->vl        = 0;
 988         nr_make->state     = NR_STATE_3;
 989         sk->sk_ack_backlog++;
 990
 991         nr_insert_socket(make);
 992
 993         skb_queue_head(&sk->sk_receive_queue, skb);
 994
 995         nr_start_heartbeat(make);
 996         nr_start_idletimer(make);
 997
 998         if (!sock_flag(sk, SOCK_DEAD))
 999                 sk->sk_data_ready(sk, skb->len);
1000
1001         bh_unlock_sock(sk);
1002         return 1;
1003 }
1004
1005 static int nr_sendmsg(struct kiocb *iocb, struct socket *sock,
1006                       struct msghdr *msg, size_t len)
1007 {
1008         struct sock *sk = sock->sk;
1009         struct nr_sock *nr = nr_sk(sk);
1010         struct sockaddr_ax25 *usax = (struct sockaddr_ax25 *)msg->msg_name;
1011         int err;
1012         struct sockaddr_ax25 sax;
1013         struct sk_buff *skb;
1014         unsigned char *asmptr;
1015         int size;
1016
1017         if (msg->msg_flags & ~(MSG_DONTWAIT|MSG_EOR|MSG_CMSG_COMPAT))
1018                 return -EINVAL;
1019
1020         lock_sock(sk);
1021         if (sock_flag(sk, SOCK_ZAPPED)) {
1022                 err = -EADDRNOTAVAIL;
1023                 goto out;
1024         }
1025
1026         if (sk->sk_shutdown & SEND_SHUTDOWN) {
1027                 send_sig(SIGPIPE, current, 0);
1028                 err = -EPIPE;
1029                 goto out;
1030         }
1031
1032         if (nr->device == NULL) {
1033                 err = -ENETUNREACH;
1034                 goto out;
1035         }
1036
1037         if (usax) {
1038                 if (msg->msg_namelen < sizeof(sax)) {
1039                         err = -EINVAL;
1040                         goto out;
1041                 }
1042                 sax = *usax;
1043                 if (ax25cmp(&nr->dest_addr, &sax.sax25_call) != 0) {
1044                         err = -EISCONN;
1045                         goto out;
1046                 }
1047                 if (sax.sax25_family != AF_NETROM) {
1048                         err = -EINVAL;
1049                         goto out;
1050                 }
1051         } else {
1052                 if (sk->sk_state != TCP_ESTABLISHED) {
1053                         err = -ENOTCONN;
1054                         goto out;
1055                 }
1056                 sax.sax25_family = AF_NETROM;
1057                 sax.sax25_call   = nr->dest_addr;
1058         }
1059
1060         SOCK_DEBUG(sk, "NET/ROM: sendto: Addresses built.\n");
1061
1062         /* Build a packet */
1063         SOCK_DEBUG(sk, "NET/ROM: sendto: building packet.\n");
1064         size = len + NR_NETWORK_LEN + NR_TRANSPORT_LEN;
1065
1066         if ((skb = sock_alloc_send_skb(sk, size, msg->msg_flags & MSG_DONTWAIT, &err)) == NULL)
1067                 goto out;
1068
1069         skb_reserve(skb, size - len);
1070
1071         /*
1072          *      Push down the NET/ROM header
1073          */
1074
1075         asmptr = skb_push(skb, NR_TRANSPORT_LEN);
1076         SOCK_DEBUG(sk, "Building NET/ROM Header.\n");
1077
1078         /* Build a NET/ROM Transport header */
1079
1080         *asmptr++ = nr->your_index;
1081         *asmptr++ = nr->your_id;
1082         *asmptr++ = 0;          /* To be filled in later */
1083         *asmptr++ = 0;          /*      Ditto            */
1084         *asmptr++ = NR_INFO;
1085         SOCK_DEBUG(sk, "Built header.\n");
1086
1087         /*
1088          *      Put the data on the end
1089          */
1090
1091         skb->h.raw = skb_put(skb, len);
1092
1093         asmptr = skb->h.raw;
1094         SOCK_DEBUG(sk, "NET/ROM: Appending user data\n");
1095
1096         /* User data follows immediately after the NET/ROM transport header */
1097         if (memcpy_fromiovec(asmptr, msg->msg_iov, len)) {
1098                 kfree_skb(skb);
1099                 err = -EFAULT;
1100                 goto out;
1101         }
1102
1103         SOCK_DEBUG(sk, "NET/ROM: Transmitting buffer\n");
1104
1105         if (sk->sk_state != TCP_ESTABLISHED) {
1106                 kfree_skb(skb);
1107                 err = -ENOTCONN;
1108                 goto out;
1109         }
1110
1111         nr_output(sk, skb);     /* Shove it onto the queue */
1112
1113         err = len;
1114 out:
1115         release_sock(sk);
1116         return err;
1117 }
1118
1119 static int nr_recvmsg(struct kiocb *iocb, struct socket *sock,
1120                       struct msghdr *msg, size_t size, int flags)
1121 {
1122         struct sock *sk = sock->sk;
1123         struct sockaddr_ax25 *sax = (struct sockaddr_ax25 *)msg->msg_name;
1124         size_t copied;
1125         struct sk_buff *skb;
1126         int er;
1127
1128         /*
1129          * This works for seqpacket too. The receiver has ordered the queue for
1130          * us! We do one quick check first though
1131          */
1132
1133         lock_sock(sk);
1134         if (sk->sk_state != TCP_ESTABLISHED) {
1135                 release_sock(sk);
1136                 return -ENOTCONN;
1137         }
1138
1139         /* Now we can treat all alike */
1140         if ((skb = skb_recv_datagram(sk, flags & ~MSG_DONTWAIT, flags & MSG_DONTWAIT, &er)) == NULL) {
1141                 release_sock(sk);
1142                 return er;
1143         }
1144
1145         skb->h.raw = skb->data;
1146         copied     = skb->len;
1147
1148         if (copied > size) {
1149                 copied = size;
1150                 msg->msg_flags |= MSG_TRUNC;
1151         }
1152
1153         skb_copy_datagram_iovec(skb, 0, msg->msg_iov, copied);
1154
1155         if (sax != NULL) {
1156                 sax->sax25_family = AF_NETROM;
1157                 memcpy(sax->sax25_call.ax25_call, skb->data + 7, AX25_ADDR_LEN);
1158         }
1159
1160         msg->msg_namelen = sizeof(*sax);
1161
1162         skb_free_datagram(sk, skb);
1163
1164         release_sock(sk);
1165         return copied;
1166 }
1167
1168
1169 static int nr_ioctl(struct socket *sock, unsigned int cmd, unsigned long arg)
1170 {
1171         struct sock *sk = sock->sk;
1172         void __user *argp = (void __user *)arg;
1173         int ret;
1174
1175         switch (cmd) {
1176         case TIOCOUTQ: {
1177                 long amount;
1178
1179                 lock_sock(sk);
1180                 amount = sk->sk_sndbuf - atomic_read(&sk->sk_wmem_alloc);
1181                 if (amount < 0)
1182                         amount = 0;
1183                 release_sock(sk);
1184                 return put_user(amount, (int __user *)argp);
1185         }
1186
1187         case TIOCINQ: {
1188                 struct sk_buff *skb;
1189                 long amount = 0L;
1190
1191                 lock_sock(sk);
1192                 /* These two are safe on a single CPU system as only user tasks fiddle here */
1193                 if ((skb = skb_peek(&sk->sk_receive_queue)) != NULL)
1194                         amount = skb->len;
1195                 release_sock(sk);
1196                 return put_user(amount, (int __user *)argp);
1197         }
1198
1199         case SIOCGSTAMP:
1200                 lock_sock(sk);
1201                 ret = sock_get_timestamp(sk, argp);
1202                 release_sock(sk);
1203                 return ret;
1204
1205         case SIOCGIFADDR:
1206         case SIOCSIFADDR:
1207         case SIOCGIFDSTADDR:
1208         case SIOCSIFDSTADDR:
1209         case SIOCGIFBRDADDR:
1210         case SIOCSIFBRDADDR:
1211         case SIOCGIFNETMASK:
1212         case SIOCSIFNETMASK:
1213         case SIOCGIFMETRIC:
1214         case SIOCSIFMETRIC:
1215                 return -EINVAL;
1216
1217         case SIOCADDRT:
1218         case SIOCDELRT:
1219         case SIOCNRDECOBS:
1220                 if (!capable(CAP_NET_ADMIN)) return -EPERM;
1221                 return nr_rt_ioctl(cmd, argp);
1222
1223         default:
1224                 return -ENOIOCTLCMD;
1225         }
1226
1227         return 0;
1228 }
1229
1230 #ifdef CONFIG_PROC_FS
1231
1232 static void *nr_info_start(struct seq_file *seq, loff_t *pos)
1233 {
1234         struct sock *s;
1235         struct hlist_node *node;
1236         int i = 1;
1237
1238         spin_lock_bh(&nr_list_lock);
1239         if (*pos == 0)
1240                 return SEQ_START_TOKEN;
1241
1242         sk_for_each(s, node, &nr_list) {
1243                 if (i == *pos)
1244                         return s;
1245                 ++i;
1246         }
1247         return NULL;
1248 }
1249
1250 static void *nr_info_next(struct seq_file *seq, void *v, loff_t *pos)
1251 {
1252         ++*pos;
1253
1254         return (v == SEQ_START_TOKEN) ? sk_head(&nr_list)
1255                 : sk_next((struct sock *)v);
1256 }
1257
1258 static void nr_info_stop(struct seq_file *seq, void *v)
1259 {
1260         spin_unlock_bh(&nr_list_lock);
1261 }
1262
1263 static int nr_info_show(struct seq_file *seq, void *v)
1264 {
1265         struct sock *s = v;
1266         struct net_device *dev;
1267         struct nr_sock *nr;
1268         const char *devname;
1269         char buf[11];
1270
1271         if (v == SEQ_START_TOKEN)
1272                 seq_puts(seq,
1273 "user_addr dest_node src_node  dev    my  your  st  vs  vr  va    t1     t2     t4      idle   n2  wnd Snd-Q Rcv-Q inode\n");
1274
1275         else {
1276
1277                 bh_lock_sock(s);
1278                 nr = nr_sk(s);
1279
1280                 if ((dev = nr->device) == NULL)
1281                         devname = "???";
1282                 else
1283                         devname = dev->name;
1284
1285                 seq_printf(seq, "%-9s ", ax2asc(buf, &nr->user_addr));
1286                 seq_printf(seq, "%-9s ", ax2asc(buf, &nr->dest_addr));
1287                 seq_printf(seq,
1288 "%-9s %-3s  %02X/%02X %02X/%02X %2d %3d %3d %3d %3lu/%03lu %2lu/%02lu %3lu/%03lu %3lu/%03lu %2d/%02d %3d %5d %5d %ld\n",
1289                         ax2asc(buf, &nr->source_addr),
1290                         devname,
1291                         nr->my_index,
1292                         nr->my_id,
1293                         nr->your_index,
1294                         nr->your_id,
1295                         nr->state,
1296                         nr->vs,
1297                         nr->vr,
1298                         nr->va,
1299                         ax25_display_timer(&nr->t1timer) / HZ,
1300                         nr->t1 / HZ,
1301                         ax25_display_timer(&nr->t2timer) / HZ,
1302                         nr->t2 / HZ,
1303                         ax25_display_timer(&nr->t4timer) / HZ,
1304                         nr->t4 / HZ,
1305                         ax25_display_timer(&nr->idletimer) / (60 * HZ),
1306                         nr->idle / (60 * HZ),
1307                         nr->n2count,
1308                         nr->n2,
1309                         nr->window,
1310                         atomic_read(&s->sk_wmem_alloc),
1311                         atomic_read(&s->sk_rmem_alloc),
1312                         s->sk_socket ? SOCK_INODE(s->sk_socket)->i_ino : 0L);
1313
1314                 bh_unlock_sock(s);
1315         }
1316         return 0;
1317 }
1318
1319 static struct seq_operations nr_info_seqops = {
1320         .start = nr_info_start,
1321         .next = nr_info_next,
1322         .stop = nr_info_stop,
1323         .show = nr_info_show,
1324 };
1325
1326 static int nr_info_open(struct inode *inode, struct file *file)
1327 {
1328         return seq_open(file, &nr_info_seqops);
1329 }
1330
1331 static struct file_operations nr_info_fops = {
1332         .owner = THIS_MODULE,
1333         .open = nr_info_open,
1334         .read = seq_read,
1335         .llseek = seq_lseek,
1336         .release = seq_release,
1337 };
1338 #endif  /* CONFIG_PROC_FS */
1339
1340 static struct net_proto_family nr_family_ops = {
1341         .family         =       PF_NETROM,
1342         .create         =       nr_create,
1343         .owner          =       THIS_MODULE,
1344 };
1345
1346 static const struct proto_ops nr_proto_ops = {
1347         .family         =       PF_NETROM,
1348         .owner          =       THIS_MODULE,
1349         .release        =       nr_release,
1350         .bind           =       nr_bind,
1351         .connect        =       nr_connect,
1352         .socketpair     =       sock_no_socketpair,
1353         .accept         =       nr_accept,
1354         .getname        =       nr_getname,
1355         .poll           =       datagram_poll,
1356         .ioctl          =       nr_ioctl,
1357         .listen         =       nr_listen,
1358         .shutdown       =       sock_no_shutdown,
1359         .setsockopt     =       nr_setsockopt,
1360         .getsockopt     =       nr_getsockopt,
1361         .sendmsg        =       nr_sendmsg,
1362         .recvmsg        =       nr_recvmsg,
1363         .mmap           =       sock_no_mmap,
1364         .sendpage       =       sock_no_sendpage,
1365 };
1366
1367 static struct notifier_block nr_dev_notifier = {
1368         .notifier_call  =       nr_device_event,
1369 };
1370
1371 static struct net_device **dev_nr;
1372
1373 static char banner[] __initdata = KERN_INFO "G4KLX NET/ROM for Linux. Version 0.7 for AX25.037 Linux 2.4\n";
1374
1375 static int __init nr_proto_init(void)
1376 {
1377         int i;
1378         int rc = proto_register(&nr_proto, 0);
1379
1380         if (rc != 0)
1381                 goto out;
1382
1383         if (nr_ndevs > 0x7fffffff/sizeof(struct net_device *)) {
1384                 printk(KERN_ERR "NET/ROM: nr_proto_init - nr_ndevs parameter to large\n");
1385                 return -1;
1386         }
1387
1388         dev_nr = kmalloc(nr_ndevs * sizeof(struct net_device *), GFP_KERNEL);
1389         if (dev_nr == NULL) {
1390                 printk(KERN_ERR "NET/ROM: nr_proto_init - unable to allocate device array\n");
1391                 return -1;
1392         }
1393
1394         memset(dev_nr, 0x00, nr_ndevs * sizeof(struct net_device *));
1395
1396         for (i = 0; i < nr_ndevs; i++) {
1397                 char name[IFNAMSIZ];
1398                 struct net_device *dev;
1399
1400                 sprintf(name, "nr%d", i);
1401                 dev = alloc_netdev(sizeof(struct nr_private), name, nr_setup);
1402                 if (!dev) {
1403                         printk(KERN_ERR "NET/ROM: nr_proto_init - unable to allocate device structure\n");
1404                         goto fail;
1405                 }
1406
1407                 dev->base_addr = i;
1408                 if (register_netdev(dev)) {
1409                         printk(KERN_ERR "NET/ROM: nr_proto_init - unable to register network device\n");
1410                         free_netdev(dev);
1411                         goto fail;
1412                 }
1413                 dev_nr[i] = dev;
1414         }
1415
1416         if (sock_register(&nr_family_ops)) {
1417                 printk(KERN_ERR "NET/ROM: nr_proto_init - unable to register socket family\n");
1418                 goto fail;
1419         }
1420
1421         register_netdevice_notifier(&nr_dev_notifier);
1422         printk(banner);
1423
1424         ax25_protocol_register(AX25_P_NETROM, nr_route_frame);
1425         ax25_linkfail_register(nr_link_failed);
1426
1427 #ifdef CONFIG_SYSCTL
1428         nr_register_sysctl();
1429 #endif
1430
1431         nr_loopback_init();
1432
1433         proc_net_fops_create("nr", S_IRUGO, &nr_info_fops);
1434         proc_net_fops_create("nr_neigh", S_IRUGO, &nr_neigh_fops);
1435         proc_net_fops_create("nr_nodes", S_IRUGO, &nr_nodes_fops);
1436 out:
1437         return rc;
1438 fail:
1439         while (--i >= 0) {
1440                 unregister_netdev(dev_nr[i]);
1441                 free_netdev(dev_nr[i]);
1442         }
1443         kfree(dev_nr);
1444         proto_unregister(&nr_proto);
1445         rc = -1;
1446         goto out;
1447 }
1448
1449 module_init(nr_proto_init);
1450
1451 module_param(nr_ndevs, int, 0);
1452 MODULE_PARM_DESC(nr_ndevs, "number of NET/ROM devices");
1453
1454 MODULE_AUTHOR("Jonathan Naylor G4KLX <g4klx@g4klx.demon.co.uk>");
1455 MODULE_DESCRIPTION("The amateur radio NET/ROM network and transport layer protocol");
1456 MODULE_LICENSE("GPL");
1457 MODULE_ALIAS_NETPROTO(PF_NETROM);
1458
1459 static void __exit nr_exit(void)
1460 {
1461         int i;
1462
1463         proc_net_remove("nr");
1464         proc_net_remove("nr_neigh");
1465         proc_net_remove("nr_nodes");
1466         nr_loopback_clear();
1467
1468         nr_rt_free();
1469
1470 #ifdef CONFIG_SYSCTL
1471         nr_unregister_sysctl();
1472 #endif
1473
1474         ax25_linkfail_release(nr_link_failed);
1475         ax25_protocol_release(AX25_P_NETROM);
1476
1477         unregister_netdevice_notifier(&nr_dev_notifier);
1478
1479         sock_unregister(PF_NETROM);
1480
1481         for (i = 0; i < nr_ndevs; i++) {
1482                 struct net_device *dev = dev_nr[i];
1483                 if (dev) {
1484                         unregister_netdev(dev);
1485                         free_netdev(dev);
1486                 }
1487         }
1488
1489         kfree(dev_nr);
1490         proto_unregister(&nr_proto);
1491 }
1492 module_exit(nr_exit);