GNU Linux-libre 5.10.153-gnu1
[releases.git] / net / llc / af_llc.c
1 /*
2  * af_llc.c - LLC User Interface SAPs
3  * Description:
4  *   Functions in this module are implementation of socket based llc
5  *   communications for the Linux operating system. Support of llc class
6  *   one and class two is provided via SOCK_DGRAM and SOCK_STREAM
7  *   respectively.
8  *
9  *   An llc2 connection is (mac + sap), only one llc2 sap connection
10  *   is allowed per mac. Though one sap may have multiple mac + sap
11  *   connections.
12  *
13  * Copyright (c) 2001 by Jay Schulist <jschlst@samba.org>
14  *               2002-2003 by Arnaldo Carvalho de Melo <acme@conectiva.com.br>
15  *
16  * This program can be redistributed or modified under the terms of the
17  * GNU General Public License as published by the Free Software Foundation.
18  * This program is distributed without any warranty or implied warranty
19  * of merchantability or fitness for a particular purpose.
20  *
21  * See the GNU General Public License for more details.
22  */
23 #include <linux/compiler.h>
24 #include <linux/kernel.h>
25 #include <linux/module.h>
26 #include <linux/rtnetlink.h>
27 #include <linux/init.h>
28 #include <linux/slab.h>
29 #include <linux/sched/signal.h>
30
31 #include <net/llc.h>
32 #include <net/llc_sap.h>
33 #include <net/llc_pdu.h>
34 #include <net/llc_conn.h>
35 #include <net/tcp_states.h>
36
37 /* remember: uninitialized global data is zeroed because its in .bss */
38 static u16 llc_ui_sap_last_autoport = LLC_SAP_DYN_START;
39 static u16 llc_ui_sap_link_no_max[256];
40 static struct sockaddr_llc llc_ui_addrnull;
41 static const struct proto_ops llc_ui_ops;
42
43 static bool llc_ui_wait_for_conn(struct sock *sk, long timeout);
44 static int llc_ui_wait_for_disc(struct sock *sk, long timeout);
45 static int llc_ui_wait_for_busy_core(struct sock *sk, long timeout);
46
47 #if 0
48 #define dprintk(args...) printk(KERN_DEBUG args)
49 #else
50 #define dprintk(args...) do {} while (0)
51 #endif
52
53 /* Maybe we'll add some more in the future. */
54 #define LLC_CMSG_PKTINFO        1
55
56
57 /**
58  *      llc_ui_next_link_no - return the next unused link number for a sap
59  *      @sap: Address of sap to get link number from.
60  *
61  *      Return the next unused link number for a given sap.
62  */
63 static inline u16 llc_ui_next_link_no(int sap)
64 {
65         return llc_ui_sap_link_no_max[sap]++;
66 }
67
68 /**
69  *      llc_proto_type - return eth protocol for ARP header type
70  *      @arphrd: ARP header type.
71  *
72  *      Given an ARP header type return the corresponding ethernet protocol.
73  */
74 static inline __be16 llc_proto_type(u16 arphrd)
75 {
76         return htons(ETH_P_802_2);
77 }
78
79 /**
80  *      llc_ui_addr_null - determines if a address structure is null
81  *      @addr: Address to test if null.
82  */
83 static inline u8 llc_ui_addr_null(struct sockaddr_llc *addr)
84 {
85         return !memcmp(addr, &llc_ui_addrnull, sizeof(*addr));
86 }
87
88 /**
89  *      llc_ui_header_len - return length of llc header based on operation
90  *      @sk: Socket which contains a valid llc socket type.
91  *      @addr: Complete sockaddr_llc structure received from the user.
92  *
93  *      Provide the length of the llc header depending on what kind of
94  *      operation the user would like to perform and the type of socket.
95  *      Returns the correct llc header length.
96  */
97 static inline u8 llc_ui_header_len(struct sock *sk, struct sockaddr_llc *addr)
98 {
99         u8 rc = LLC_PDU_LEN_U;
100
101         if (addr->sllc_test)
102                 rc = LLC_PDU_LEN_U;
103         else if (addr->sllc_xid)
104                 /* We need to expand header to sizeof(struct llc_xid_info)
105                  * since llc_pdu_init_as_xid_cmd() sets 4,5,6 bytes of LLC header
106                  * as XID PDU. In llc_ui_sendmsg() we reserved header size and then
107                  * filled all other space with user data. If we won't reserve this
108                  * bytes, llc_pdu_init_as_xid_cmd() will overwrite user data
109                  */
110                 rc = LLC_PDU_LEN_U_XID;
111         else if (sk->sk_type == SOCK_STREAM)
112                 rc = LLC_PDU_LEN_I;
113         return rc;
114 }
115
116 /**
117  *      llc_ui_send_data - send data via reliable llc2 connection
118  *      @sk: Connection the socket is using.
119  *      @skb: Data the user wishes to send.
120  *      @noblock: can we block waiting for data?
121  *
122  *      Send data via reliable llc2 connection.
123  *      Returns 0 upon success, non-zero if action did not succeed.
124  *
125  *      This function always consumes a reference to the skb.
126  */
127 static int llc_ui_send_data(struct sock* sk, struct sk_buff *skb, int noblock)
128 {
129         struct llc_sock* llc = llc_sk(sk);
130
131         if (unlikely(llc_data_accept_state(llc->state) ||
132                      llc->remote_busy_flag ||
133                      llc->p_flag)) {
134                 long timeout = sock_sndtimeo(sk, noblock);
135                 int rc;
136
137                 rc = llc_ui_wait_for_busy_core(sk, timeout);
138                 if (rc) {
139                         kfree_skb(skb);
140                         return rc;
141                 }
142         }
143         return llc_build_and_send_pkt(sk, skb);
144 }
145
146 static void llc_ui_sk_init(struct socket *sock, struct sock *sk)
147 {
148         sock_graft(sk, sock);
149         sk->sk_type     = sock->type;
150         sock->ops       = &llc_ui_ops;
151 }
152
153 static struct proto llc_proto = {
154         .name     = "LLC",
155         .owner    = THIS_MODULE,
156         .obj_size = sizeof(struct llc_sock),
157         .slab_flags = SLAB_TYPESAFE_BY_RCU,
158 };
159
160 /**
161  *      llc_ui_create - alloc and init a new llc_ui socket
162  *      @net: network namespace (must be default network)
163  *      @sock: Socket to initialize and attach allocated sk to.
164  *      @protocol: Unused.
165  *      @kern: on behalf of kernel or userspace
166  *
167  *      Allocate and initialize a new llc_ui socket, validate the user wants a
168  *      socket type we have available.
169  *      Returns 0 upon success, negative upon failure.
170  */
171 static int llc_ui_create(struct net *net, struct socket *sock, int protocol,
172                          int kern)
173 {
174         struct sock *sk;
175         int rc = -ESOCKTNOSUPPORT;
176
177         if (!ns_capable(net->user_ns, CAP_NET_RAW))
178                 return -EPERM;
179
180         if (!net_eq(net, &init_net))
181                 return -EAFNOSUPPORT;
182
183         if (likely(sock->type == SOCK_DGRAM || sock->type == SOCK_STREAM)) {
184                 rc = -ENOMEM;
185                 sk = llc_sk_alloc(net, PF_LLC, GFP_KERNEL, &llc_proto, kern);
186                 if (sk) {
187                         rc = 0;
188                         llc_ui_sk_init(sock, sk);
189                 }
190         }
191         return rc;
192 }
193
194 /**
195  *      llc_ui_release - shutdown socket
196  *      @sock: Socket to release.
197  *
198  *      Shutdown and deallocate an existing socket.
199  */
200 static int llc_ui_release(struct socket *sock)
201 {
202         struct sock *sk = sock->sk;
203         struct llc_sock *llc;
204
205         if (unlikely(sk == NULL))
206                 goto out;
207         sock_hold(sk);
208         lock_sock(sk);
209         llc = llc_sk(sk);
210         dprintk("%s: closing local(%02X) remote(%02X)\n", __func__,
211                 llc->laddr.lsap, llc->daddr.lsap);
212         if (!llc_send_disc(sk))
213                 llc_ui_wait_for_disc(sk, sk->sk_rcvtimeo);
214         if (!sock_flag(sk, SOCK_ZAPPED)) {
215                 struct llc_sap *sap = llc->sap;
216
217                 /* Hold this for release_sock(), so that llc_backlog_rcv()
218                  * could still use it.
219                  */
220                 llc_sap_hold(sap);
221                 llc_sap_remove_socket(llc->sap, sk);
222                 release_sock(sk);
223                 llc_sap_put(sap);
224         } else {
225                 release_sock(sk);
226         }
227         if (llc->dev)
228                 dev_put(llc->dev);
229         sock_put(sk);
230         llc_sk_free(sk);
231 out:
232         return 0;
233 }
234
235 /**
236  *      llc_ui_autoport - provide dynamically allocate SAP number
237  *
238  *      Provide the caller with a dynamically allocated SAP number according
239  *      to the rules that are set in this function. Returns: 0, upon failure,
240  *      SAP number otherwise.
241  */
242 static int llc_ui_autoport(void)
243 {
244         struct llc_sap *sap;
245         int i, tries = 0;
246
247         while (tries < LLC_SAP_DYN_TRIES) {
248                 for (i = llc_ui_sap_last_autoport;
249                      i < LLC_SAP_DYN_STOP; i += 2) {
250                         sap = llc_sap_find(i);
251                         if (!sap) {
252                                 llc_ui_sap_last_autoport = i + 2;
253                                 goto out;
254                         }
255                         llc_sap_put(sap);
256                 }
257                 llc_ui_sap_last_autoport = LLC_SAP_DYN_START;
258                 tries++;
259         }
260         i = 0;
261 out:
262         return i;
263 }
264
265 /**
266  *      llc_ui_autobind - automatically bind a socket to a sap
267  *      @sock: socket to bind
268  *      @addr: address to connect to
269  *
270  *      Used by llc_ui_connect and llc_ui_sendmsg when the user hasn't
271  *      specifically used llc_ui_bind to bind to an specific address/sap
272  *
273  *      Returns: 0 upon success, negative otherwise.
274  */
275 static int llc_ui_autobind(struct socket *sock, struct sockaddr_llc *addr)
276 {
277         struct sock *sk = sock->sk;
278         struct llc_sock *llc = llc_sk(sk);
279         struct net_device *dev = NULL;
280         struct llc_sap *sap;
281         int rc = -EINVAL;
282
283         if (!sock_flag(sk, SOCK_ZAPPED))
284                 goto out;
285         if (!addr->sllc_arphrd)
286                 addr->sllc_arphrd = ARPHRD_ETHER;
287         if (addr->sllc_arphrd != ARPHRD_ETHER)
288                 goto out;
289         rc = -ENODEV;
290         if (sk->sk_bound_dev_if) {
291                 dev = dev_get_by_index(&init_net, sk->sk_bound_dev_if);
292                 if (dev && addr->sllc_arphrd != dev->type) {
293                         dev_put(dev);
294                         dev = NULL;
295                 }
296         } else
297                 dev = dev_getfirstbyhwtype(&init_net, addr->sllc_arphrd);
298         if (!dev)
299                 goto out;
300         rc = -EUSERS;
301         llc->laddr.lsap = llc_ui_autoport();
302         if (!llc->laddr.lsap)
303                 goto out;
304         rc = -EBUSY; /* some other network layer is using the sap */
305         sap = llc_sap_open(llc->laddr.lsap, NULL);
306         if (!sap)
307                 goto out;
308
309         /* Note: We do not expect errors from this point. */
310         llc->dev = dev;
311         dev = NULL;
312
313         memcpy(llc->laddr.mac, llc->dev->dev_addr, IFHWADDRLEN);
314         memcpy(&llc->addr, addr, sizeof(llc->addr));
315         /* assign new connection to its SAP */
316         llc_sap_add_socket(sap, sk);
317         sock_reset_flag(sk, SOCK_ZAPPED);
318         rc = 0;
319 out:
320         dev_put(dev);
321         return rc;
322 }
323
324 /**
325  *      llc_ui_bind - bind a socket to a specific address.
326  *      @sock: Socket to bind an address to.
327  *      @uaddr: Address the user wants the socket bound to.
328  *      @addrlen: Length of the uaddr structure.
329  *
330  *      Bind a socket to a specific address. For llc a user is able to bind to
331  *      a specific sap only or mac + sap.
332  *      If the user desires to bind to a specific mac + sap, it is possible to
333  *      have multiple sap connections via multiple macs.
334  *      Bind and autobind for that matter must enforce the correct sap usage
335  *      otherwise all hell will break loose.
336  *      Returns: 0 upon success, negative otherwise.
337  */
338 static int llc_ui_bind(struct socket *sock, struct sockaddr *uaddr, int addrlen)
339 {
340         struct sockaddr_llc *addr = (struct sockaddr_llc *)uaddr;
341         struct sock *sk = sock->sk;
342         struct llc_sock *llc = llc_sk(sk);
343         struct net_device *dev = NULL;
344         struct llc_sap *sap;
345         int rc = -EINVAL;
346
347         lock_sock(sk);
348         if (unlikely(!sock_flag(sk, SOCK_ZAPPED) || addrlen != sizeof(*addr)))
349                 goto out;
350         rc = -EAFNOSUPPORT;
351         if (!addr->sllc_arphrd)
352                 addr->sllc_arphrd = ARPHRD_ETHER;
353         if (unlikely(addr->sllc_family != AF_LLC || addr->sllc_arphrd != ARPHRD_ETHER))
354                 goto out;
355         dprintk("%s: binding %02X\n", __func__, addr->sllc_sap);
356         rc = -ENODEV;
357         rcu_read_lock();
358         if (sk->sk_bound_dev_if) {
359                 dev = dev_get_by_index_rcu(&init_net, sk->sk_bound_dev_if);
360                 if (dev) {
361                         if (is_zero_ether_addr(addr->sllc_mac))
362                                 memcpy(addr->sllc_mac, dev->dev_addr,
363                                        IFHWADDRLEN);
364                         if (addr->sllc_arphrd != dev->type ||
365                             !ether_addr_equal(addr->sllc_mac,
366                                               dev->dev_addr)) {
367                                 rc = -EINVAL;
368                                 dev = NULL;
369                         }
370                 }
371         } else {
372                 dev = dev_getbyhwaddr_rcu(&init_net, addr->sllc_arphrd,
373                                            addr->sllc_mac);
374         }
375         if (dev)
376                 dev_hold(dev);
377         rcu_read_unlock();
378         if (!dev)
379                 goto out;
380         if (!addr->sllc_sap) {
381                 rc = -EUSERS;
382                 addr->sllc_sap = llc_ui_autoport();
383                 if (!addr->sllc_sap)
384                         goto out;
385         }
386         sap = llc_sap_find(addr->sllc_sap);
387         if (!sap) {
388                 sap = llc_sap_open(addr->sllc_sap, NULL);
389                 rc = -EBUSY; /* some other network layer is using the sap */
390                 if (!sap)
391                         goto out;
392         } else {
393                 struct llc_addr laddr, daddr;
394                 struct sock *ask;
395
396                 memset(&laddr, 0, sizeof(laddr));
397                 memset(&daddr, 0, sizeof(daddr));
398                 /*
399                  * FIXME: check if the address is multicast,
400                  *        only SOCK_DGRAM can do this.
401                  */
402                 memcpy(laddr.mac, addr->sllc_mac, IFHWADDRLEN);
403                 laddr.lsap = addr->sllc_sap;
404                 rc = -EADDRINUSE; /* mac + sap clash. */
405                 ask = llc_lookup_established(sap, &daddr, &laddr);
406                 if (ask) {
407                         sock_put(ask);
408                         goto out_put;
409                 }
410         }
411
412         /* Note: We do not expect errors from this point. */
413         llc->dev = dev;
414         dev = NULL;
415
416         llc->laddr.lsap = addr->sllc_sap;
417         memcpy(llc->laddr.mac, addr->sllc_mac, IFHWADDRLEN);
418         memcpy(&llc->addr, addr, sizeof(llc->addr));
419         /* assign new connection to its SAP */
420         llc_sap_add_socket(sap, sk);
421         sock_reset_flag(sk, SOCK_ZAPPED);
422         rc = 0;
423 out_put:
424         llc_sap_put(sap);
425 out:
426         dev_put(dev);
427         release_sock(sk);
428         return rc;
429 }
430
431 /**
432  *      llc_ui_shutdown - shutdown a connect llc2 socket.
433  *      @sock: Socket to shutdown.
434  *      @how: What part of the socket to shutdown.
435  *
436  *      Shutdown a connected llc2 socket. Currently this function only supports
437  *      shutting down both sends and receives (2), we could probably make this
438  *      function such that a user can shutdown only half the connection but not
439  *      right now.
440  *      Returns: 0 upon success, negative otherwise.
441  */
442 static int llc_ui_shutdown(struct socket *sock, int how)
443 {
444         struct sock *sk = sock->sk;
445         int rc = -ENOTCONN;
446
447         lock_sock(sk);
448         if (unlikely(sk->sk_state != TCP_ESTABLISHED))
449                 goto out;
450         rc = -EINVAL;
451         if (how != 2)
452                 goto out;
453         rc = llc_send_disc(sk);
454         if (!rc)
455                 rc = llc_ui_wait_for_disc(sk, sk->sk_rcvtimeo);
456         /* Wake up anyone sleeping in poll */
457         sk->sk_state_change(sk);
458 out:
459         release_sock(sk);
460         return rc;
461 }
462
463 /**
464  *      llc_ui_connect - Connect to a remote llc2 mac + sap.
465  *      @sock: Socket which will be connected to the remote destination.
466  *      @uaddr: Remote and possibly the local address of the new connection.
467  *      @addrlen: Size of uaddr structure.
468  *      @flags: Operational flags specified by the user.
469  *
470  *      Connect to a remote llc2 mac + sap. The caller must specify the
471  *      destination mac and address to connect to. If the user hasn't previously
472  *      called bind(2) with a smac the address of the first interface of the
473  *      specified arp type will be used.
474  *      This function will autobind if user did not previously call bind.
475  *      Returns: 0 upon success, negative otherwise.
476  */
477 static int llc_ui_connect(struct socket *sock, struct sockaddr *uaddr,
478                           int addrlen, int flags)
479 {
480         struct sock *sk = sock->sk;
481         struct llc_sock *llc = llc_sk(sk);
482         struct sockaddr_llc *addr = (struct sockaddr_llc *)uaddr;
483         int rc = -EINVAL;
484
485         lock_sock(sk);
486         if (unlikely(addrlen != sizeof(*addr)))
487                 goto out;
488         rc = -EAFNOSUPPORT;
489         if (unlikely(addr->sllc_family != AF_LLC))
490                 goto out;
491         if (unlikely(sk->sk_type != SOCK_STREAM))
492                 goto out;
493         rc = -EALREADY;
494         if (unlikely(sock->state == SS_CONNECTING))
495                 goto out;
496         /* bind connection to sap if user hasn't done it. */
497         if (sock_flag(sk, SOCK_ZAPPED)) {
498                 /* bind to sap with null dev, exclusive */
499                 rc = llc_ui_autobind(sock, addr);
500                 if (rc)
501                         goto out;
502         }
503         llc->daddr.lsap = addr->sllc_sap;
504         memcpy(llc->daddr.mac, addr->sllc_mac, IFHWADDRLEN);
505         sock->state = SS_CONNECTING;
506         sk->sk_state   = TCP_SYN_SENT;
507         llc->link   = llc_ui_next_link_no(llc->sap->laddr.lsap);
508         rc = llc_establish_connection(sk, llc->dev->dev_addr,
509                                       addr->sllc_mac, addr->sllc_sap);
510         if (rc) {
511                 dprintk("%s: llc_ui_send_conn failed :-(\n", __func__);
512                 sock->state  = SS_UNCONNECTED;
513                 sk->sk_state = TCP_CLOSE;
514                 goto out;
515         }
516
517         if (sk->sk_state == TCP_SYN_SENT) {
518                 const long timeo = sock_sndtimeo(sk, flags & O_NONBLOCK);
519
520                 if (!timeo || !llc_ui_wait_for_conn(sk, timeo))
521                         goto out;
522
523                 rc = sock_intr_errno(timeo);
524                 if (signal_pending(current))
525                         goto out;
526         }
527
528         if (sk->sk_state == TCP_CLOSE)
529                 goto sock_error;
530
531         sock->state = SS_CONNECTED;
532         rc = 0;
533 out:
534         release_sock(sk);
535         return rc;
536 sock_error:
537         rc = sock_error(sk) ? : -ECONNABORTED;
538         sock->state = SS_UNCONNECTED;
539         goto out;
540 }
541
542 /**
543  *      llc_ui_listen - allow a normal socket to accept incoming connections
544  *      @sock: Socket to allow incoming connections on.
545  *      @backlog: Number of connections to queue.
546  *
547  *      Allow a normal socket to accept incoming connections.
548  *      Returns 0 upon success, negative otherwise.
549  */
550 static int llc_ui_listen(struct socket *sock, int backlog)
551 {
552         struct sock *sk = sock->sk;
553         int rc = -EINVAL;
554
555         lock_sock(sk);
556         if (unlikely(sock->state != SS_UNCONNECTED))
557                 goto out;
558         rc = -EOPNOTSUPP;
559         if (unlikely(sk->sk_type != SOCK_STREAM))
560                 goto out;
561         rc = -EAGAIN;
562         if (sock_flag(sk, SOCK_ZAPPED))
563                 goto out;
564         rc = 0;
565         if (!(unsigned int)backlog)     /* BSDism */
566                 backlog = 1;
567         sk->sk_max_ack_backlog = backlog;
568         if (sk->sk_state != TCP_LISTEN) {
569                 sk->sk_ack_backlog = 0;
570                 sk->sk_state       = TCP_LISTEN;
571         }
572         sk->sk_socket->flags |= __SO_ACCEPTCON;
573 out:
574         release_sock(sk);
575         return rc;
576 }
577
578 static int llc_ui_wait_for_disc(struct sock *sk, long timeout)
579 {
580         DEFINE_WAIT_FUNC(wait, woken_wake_function);
581         int rc = 0;
582
583         add_wait_queue(sk_sleep(sk), &wait);
584         while (1) {
585                 if (sk_wait_event(sk, &timeout, sk->sk_state == TCP_CLOSE, &wait))
586                         break;
587                 rc = -ERESTARTSYS;
588                 if (signal_pending(current))
589                         break;
590                 rc = -EAGAIN;
591                 if (!timeout)
592                         break;
593                 rc = 0;
594         }
595         remove_wait_queue(sk_sleep(sk), &wait);
596         return rc;
597 }
598
599 static bool llc_ui_wait_for_conn(struct sock *sk, long timeout)
600 {
601         DEFINE_WAIT_FUNC(wait, woken_wake_function);
602
603         add_wait_queue(sk_sleep(sk), &wait);
604         while (1) {
605                 if (sk_wait_event(sk, &timeout, sk->sk_state != TCP_SYN_SENT, &wait))
606                         break;
607                 if (signal_pending(current) || !timeout)
608                         break;
609         }
610         remove_wait_queue(sk_sleep(sk), &wait);
611         return timeout;
612 }
613
614 static int llc_ui_wait_for_busy_core(struct sock *sk, long timeout)
615 {
616         DEFINE_WAIT_FUNC(wait, woken_wake_function);
617         struct llc_sock *llc = llc_sk(sk);
618         int rc;
619
620         add_wait_queue(sk_sleep(sk), &wait);
621         while (1) {
622                 rc = 0;
623                 if (sk_wait_event(sk, &timeout,
624                                   (sk->sk_shutdown & RCV_SHUTDOWN) ||
625                                   (!llc_data_accept_state(llc->state) &&
626                                    !llc->remote_busy_flag &&
627                                    !llc->p_flag), &wait))
628                         break;
629                 rc = -ERESTARTSYS;
630                 if (signal_pending(current))
631                         break;
632                 rc = -EAGAIN;
633                 if (!timeout)
634                         break;
635         }
636         remove_wait_queue(sk_sleep(sk), &wait);
637         return rc;
638 }
639
640 static int llc_wait_data(struct sock *sk, long timeo)
641 {
642         int rc;
643
644         while (1) {
645                 /*
646                  * POSIX 1003.1g mandates this order.
647                  */
648                 rc = sock_error(sk);
649                 if (rc)
650                         break;
651                 rc = 0;
652                 if (sk->sk_shutdown & RCV_SHUTDOWN)
653                         break;
654                 rc = -EAGAIN;
655                 if (!timeo)
656                         break;
657                 rc = sock_intr_errno(timeo);
658                 if (signal_pending(current))
659                         break;
660                 rc = 0;
661                 if (sk_wait_data(sk, &timeo, NULL))
662                         break;
663         }
664         return rc;
665 }
666
667 static void llc_cmsg_rcv(struct msghdr *msg, struct sk_buff *skb)
668 {
669         struct llc_sock *llc = llc_sk(skb->sk);
670
671         if (llc->cmsg_flags & LLC_CMSG_PKTINFO) {
672                 struct llc_pktinfo info;
673
674                 memset(&info, 0, sizeof(info));
675                 info.lpi_ifindex = llc_sk(skb->sk)->dev->ifindex;
676                 llc_pdu_decode_dsap(skb, &info.lpi_sap);
677                 llc_pdu_decode_da(skb, info.lpi_mac);
678                 put_cmsg(msg, SOL_LLC, LLC_OPT_PKTINFO, sizeof(info), &info);
679         }
680 }
681
682 /**
683  *      llc_ui_accept - accept a new incoming connection.
684  *      @sock: Socket which connections arrive on.
685  *      @newsock: Socket to move incoming connection to.
686  *      @flags: User specified operational flags.
687  *      @kern: If the socket is kernel internal
688  *
689  *      Accept a new incoming connection.
690  *      Returns 0 upon success, negative otherwise.
691  */
692 static int llc_ui_accept(struct socket *sock, struct socket *newsock, int flags,
693                          bool kern)
694 {
695         struct sock *sk = sock->sk, *newsk;
696         struct llc_sock *llc, *newllc;
697         struct sk_buff *skb;
698         int rc = -EOPNOTSUPP;
699
700         dprintk("%s: accepting on %02X\n", __func__,
701                 llc_sk(sk)->laddr.lsap);
702         lock_sock(sk);
703         if (unlikely(sk->sk_type != SOCK_STREAM))
704                 goto out;
705         rc = -EINVAL;
706         if (unlikely(sock->state != SS_UNCONNECTED ||
707                      sk->sk_state != TCP_LISTEN))
708                 goto out;
709         /* wait for a connection to arrive. */
710         if (skb_queue_empty(&sk->sk_receive_queue)) {
711                 rc = llc_wait_data(sk, sk->sk_rcvtimeo);
712                 if (rc)
713                         goto out;
714         }
715         dprintk("%s: got a new connection on %02X\n", __func__,
716                 llc_sk(sk)->laddr.lsap);
717         skb = skb_dequeue(&sk->sk_receive_queue);
718         rc = -EINVAL;
719         if (!skb->sk)
720                 goto frees;
721         rc = 0;
722         newsk = skb->sk;
723         /* attach connection to a new socket. */
724         llc_ui_sk_init(newsock, newsk);
725         sock_reset_flag(newsk, SOCK_ZAPPED);
726         newsk->sk_state         = TCP_ESTABLISHED;
727         newsock->state          = SS_CONNECTED;
728         llc                     = llc_sk(sk);
729         newllc                  = llc_sk(newsk);
730         memcpy(&newllc->addr, &llc->addr, sizeof(newllc->addr));
731         newllc->link = llc_ui_next_link_no(newllc->laddr.lsap);
732
733         /* put original socket back into a clean listen state. */
734         sk->sk_state = TCP_LISTEN;
735         sk_acceptq_removed(sk);
736         dprintk("%s: ok success on %02X, client on %02X\n", __func__,
737                 llc_sk(sk)->addr.sllc_sap, newllc->daddr.lsap);
738 frees:
739         kfree_skb(skb);
740 out:
741         release_sock(sk);
742         return rc;
743 }
744
745 /**
746  *      llc_ui_recvmsg - copy received data to the socket user.
747  *      @sock: Socket to copy data from.
748  *      @msg: Various user space related information.
749  *      @len: Size of user buffer.
750  *      @flags: User specified flags.
751  *
752  *      Copy received data to the socket user.
753  *      Returns non-negative upon success, negative otherwise.
754  */
755 static int llc_ui_recvmsg(struct socket *sock, struct msghdr *msg, size_t len,
756                           int flags)
757 {
758         DECLARE_SOCKADDR(struct sockaddr_llc *, uaddr, msg->msg_name);
759         const int nonblock = flags & MSG_DONTWAIT;
760         struct sk_buff *skb = NULL;
761         struct sock *sk = sock->sk;
762         struct llc_sock *llc = llc_sk(sk);
763         size_t copied = 0;
764         u32 peek_seq = 0;
765         u32 *seq, skb_len;
766         unsigned long used;
767         int target;     /* Read at least this many bytes */
768         long timeo;
769
770         lock_sock(sk);
771         copied = -ENOTCONN;
772         if (unlikely(sk->sk_type == SOCK_STREAM && sk->sk_state == TCP_LISTEN))
773                 goto out;
774
775         timeo = sock_rcvtimeo(sk, nonblock);
776
777         seq = &llc->copied_seq;
778         if (flags & MSG_PEEK) {
779                 peek_seq = llc->copied_seq;
780                 seq = &peek_seq;
781         }
782
783         target = sock_rcvlowat(sk, flags & MSG_WAITALL, len);
784         copied = 0;
785
786         do {
787                 u32 offset;
788
789                 /*
790                  * We need to check signals first, to get correct SIGURG
791                  * handling. FIXME: Need to check this doesn't impact 1003.1g
792                  * and move it down to the bottom of the loop
793                  */
794                 if (signal_pending(current)) {
795                         if (copied)
796                                 break;
797                         copied = timeo ? sock_intr_errno(timeo) : -EAGAIN;
798                         break;
799                 }
800
801                 /* Next get a buffer. */
802
803                 skb = skb_peek(&sk->sk_receive_queue);
804                 if (skb) {
805                         offset = *seq;
806                         goto found_ok_skb;
807                 }
808                 /* Well, if we have backlog, try to process it now yet. */
809
810                 if (copied >= target && !READ_ONCE(sk->sk_backlog.tail))
811                         break;
812
813                 if (copied) {
814                         if (sk->sk_err ||
815                             sk->sk_state == TCP_CLOSE ||
816                             (sk->sk_shutdown & RCV_SHUTDOWN) ||
817                             !timeo ||
818                             (flags & MSG_PEEK))
819                                 break;
820                 } else {
821                         if (sock_flag(sk, SOCK_DONE))
822                                 break;
823
824                         if (sk->sk_err) {
825                                 copied = sock_error(sk);
826                                 break;
827                         }
828                         if (sk->sk_shutdown & RCV_SHUTDOWN)
829                                 break;
830
831                         if (sk->sk_type == SOCK_STREAM && sk->sk_state == TCP_CLOSE) {
832                                 if (!sock_flag(sk, SOCK_DONE)) {
833                                         /*
834                                          * This occurs when user tries to read
835                                          * from never connected socket.
836                                          */
837                                         copied = -ENOTCONN;
838                                         break;
839                                 }
840                                 break;
841                         }
842                         if (!timeo) {
843                                 copied = -EAGAIN;
844                                 break;
845                         }
846                 }
847
848                 if (copied >= target) { /* Do not sleep, just process backlog. */
849                         release_sock(sk);
850                         lock_sock(sk);
851                 } else
852                         sk_wait_data(sk, &timeo, NULL);
853
854                 if ((flags & MSG_PEEK) && peek_seq != llc->copied_seq) {
855                         net_dbg_ratelimited("LLC(%s:%d): Application bug, race in MSG_PEEK\n",
856                                             current->comm,
857                                             task_pid_nr(current));
858                         peek_seq = llc->copied_seq;
859                 }
860                 continue;
861         found_ok_skb:
862                 skb_len = skb->len;
863                 /* Ok so how much can we use? */
864                 used = skb->len - offset;
865                 if (len < used)
866                         used = len;
867
868                 if (!(flags & MSG_TRUNC)) {
869                         int rc = skb_copy_datagram_msg(skb, offset, msg, used);
870                         if (rc) {
871                                 /* Exception. Bailout! */
872                                 if (!copied)
873                                         copied = -EFAULT;
874                                 break;
875                         }
876                 }
877
878                 *seq += used;
879                 copied += used;
880                 len -= used;
881
882                 /* For non stream protcols we get one packet per recvmsg call */
883                 if (sk->sk_type != SOCK_STREAM)
884                         goto copy_uaddr;
885
886                 if (!(flags & MSG_PEEK)) {
887                         skb_unlink(skb, &sk->sk_receive_queue);
888                         kfree_skb(skb);
889                         *seq = 0;
890                 }
891
892                 /* Partial read */
893                 if (used + offset < skb_len)
894                         continue;
895         } while (len > 0);
896
897 out:
898         release_sock(sk);
899         return copied;
900 copy_uaddr:
901         if (uaddr != NULL && skb != NULL) {
902                 memcpy(uaddr, llc_ui_skb_cb(skb), sizeof(*uaddr));
903                 msg->msg_namelen = sizeof(*uaddr);
904         }
905         if (llc_sk(sk)->cmsg_flags)
906                 llc_cmsg_rcv(msg, skb);
907
908         if (!(flags & MSG_PEEK)) {
909                 skb_unlink(skb, &sk->sk_receive_queue);
910                 kfree_skb(skb);
911                 *seq = 0;
912         }
913
914         goto out;
915 }
916
917 /**
918  *      llc_ui_sendmsg - Transmit data provided by the socket user.
919  *      @sock: Socket to transmit data from.
920  *      @msg: Various user related information.
921  *      @len: Length of data to transmit.
922  *
923  *      Transmit data provided by the socket user.
924  *      Returns non-negative upon success, negative otherwise.
925  */
926 static int llc_ui_sendmsg(struct socket *sock, struct msghdr *msg, size_t len)
927 {
928         struct sock *sk = sock->sk;
929         struct llc_sock *llc = llc_sk(sk);
930         DECLARE_SOCKADDR(struct sockaddr_llc *, addr, msg->msg_name);
931         int flags = msg->msg_flags;
932         int noblock = flags & MSG_DONTWAIT;
933         struct sk_buff *skb = NULL;
934         size_t size = 0;
935         int rc = -EINVAL, copied = 0, hdrlen;
936
937         dprintk("%s: sending from %02X to %02X\n", __func__,
938                 llc->laddr.lsap, llc->daddr.lsap);
939         lock_sock(sk);
940         if (addr) {
941                 if (msg->msg_namelen < sizeof(*addr))
942                         goto out;
943         } else {
944                 if (llc_ui_addr_null(&llc->addr))
945                         goto out;
946                 addr = &llc->addr;
947         }
948         /* must bind connection to sap if user hasn't done it. */
949         if (sock_flag(sk, SOCK_ZAPPED)) {
950                 /* bind to sap with null dev, exclusive. */
951                 rc = llc_ui_autobind(sock, addr);
952                 if (rc)
953                         goto out;
954         }
955         hdrlen = llc->dev->hard_header_len + llc_ui_header_len(sk, addr);
956         size = hdrlen + len;
957         if (size > llc->dev->mtu)
958                 size = llc->dev->mtu;
959         copied = size - hdrlen;
960         rc = -EINVAL;
961         if (copied < 0)
962                 goto out;
963         release_sock(sk);
964         skb = sock_alloc_send_skb(sk, size, noblock, &rc);
965         lock_sock(sk);
966         if (!skb)
967                 goto out;
968         skb->dev      = llc->dev;
969         skb->protocol = llc_proto_type(addr->sllc_arphrd);
970         skb_reserve(skb, hdrlen);
971         rc = memcpy_from_msg(skb_put(skb, copied), msg, copied);
972         if (rc)
973                 goto out;
974         if (sk->sk_type == SOCK_DGRAM || addr->sllc_ua) {
975                 llc_build_and_send_ui_pkt(llc->sap, skb, addr->sllc_mac,
976                                           addr->sllc_sap);
977                 skb = NULL;
978                 goto out;
979         }
980         if (addr->sllc_test) {
981                 llc_build_and_send_test_pkt(llc->sap, skb, addr->sllc_mac,
982                                             addr->sllc_sap);
983                 skb = NULL;
984                 goto out;
985         }
986         if (addr->sllc_xid) {
987                 llc_build_and_send_xid_pkt(llc->sap, skb, addr->sllc_mac,
988                                            addr->sllc_sap);
989                 skb = NULL;
990                 goto out;
991         }
992         rc = -ENOPROTOOPT;
993         if (!(sk->sk_type == SOCK_STREAM && !addr->sllc_ua))
994                 goto out;
995         rc = llc_ui_send_data(sk, skb, noblock);
996         skb = NULL;
997 out:
998         kfree_skb(skb);
999         if (rc)
1000                 dprintk("%s: failed sending from %02X to %02X: %d\n",
1001                         __func__, llc->laddr.lsap, llc->daddr.lsap, rc);
1002         release_sock(sk);
1003         return rc ? : copied;
1004 }
1005
1006 /**
1007  *      llc_ui_getname - return the address info of a socket
1008  *      @sock: Socket to get address of.
1009  *      @uaddr: Address structure to return information.
1010  *      @peer: Does user want local or remote address information.
1011  *
1012  *      Return the address information of a socket.
1013  */
1014 static int llc_ui_getname(struct socket *sock, struct sockaddr *uaddr,
1015                           int peer)
1016 {
1017         struct sockaddr_llc sllc;
1018         struct sock *sk = sock->sk;
1019         struct llc_sock *llc = llc_sk(sk);
1020         int rc = -EBADF;
1021
1022         memset(&sllc, 0, sizeof(sllc));
1023         lock_sock(sk);
1024         if (sock_flag(sk, SOCK_ZAPPED))
1025                 goto out;
1026         if (peer) {
1027                 rc = -ENOTCONN;
1028                 if (sk->sk_state != TCP_ESTABLISHED)
1029                         goto out;
1030                 if(llc->dev)
1031                         sllc.sllc_arphrd = llc->dev->type;
1032                 sllc.sllc_sap = llc->daddr.lsap;
1033                 memcpy(&sllc.sllc_mac, &llc->daddr.mac, IFHWADDRLEN);
1034         } else {
1035                 rc = -EINVAL;
1036                 if (!llc->sap)
1037                         goto out;
1038                 sllc.sllc_sap = llc->sap->laddr.lsap;
1039
1040                 if (llc->dev) {
1041                         sllc.sllc_arphrd = llc->dev->type;
1042                         memcpy(&sllc.sllc_mac, llc->dev->dev_addr,
1043                                IFHWADDRLEN);
1044                 }
1045         }
1046         sllc.sllc_family = AF_LLC;
1047         memcpy(uaddr, &sllc, sizeof(sllc));
1048         rc = sizeof(sllc);
1049 out:
1050         release_sock(sk);
1051         return rc;
1052 }
1053
1054 /**
1055  *      llc_ui_ioctl - io controls for PF_LLC
1056  *      @sock: Socket to get/set info
1057  *      @cmd: command
1058  *      @arg: optional argument for cmd
1059  *
1060  *      get/set info on llc sockets
1061  */
1062 static int llc_ui_ioctl(struct socket *sock, unsigned int cmd,
1063                         unsigned long arg)
1064 {
1065         return -ENOIOCTLCMD;
1066 }
1067
1068 /**
1069  *      llc_ui_setsockopt - set various connection specific parameters.
1070  *      @sock: Socket to set options on.
1071  *      @level: Socket level user is requesting operations on.
1072  *      @optname: Operation name.
1073  *      @optval: User provided operation data.
1074  *      @optlen: Length of optval.
1075  *
1076  *      Set various connection specific parameters.
1077  */
1078 static int llc_ui_setsockopt(struct socket *sock, int level, int optname,
1079                              sockptr_t optval, unsigned int optlen)
1080 {
1081         struct sock *sk = sock->sk;
1082         struct llc_sock *llc = llc_sk(sk);
1083         unsigned int opt;
1084         int rc = -EINVAL;
1085
1086         lock_sock(sk);
1087         if (unlikely(level != SOL_LLC || optlen != sizeof(int)))
1088                 goto out;
1089         rc = copy_from_sockptr(&opt, optval, sizeof(opt));
1090         if (rc)
1091                 goto out;
1092         rc = -EINVAL;
1093         switch (optname) {
1094         case LLC_OPT_RETRY:
1095                 if (opt > LLC_OPT_MAX_RETRY)
1096                         goto out;
1097                 llc->n2 = opt;
1098                 break;
1099         case LLC_OPT_SIZE:
1100                 if (opt > LLC_OPT_MAX_SIZE)
1101                         goto out;
1102                 llc->n1 = opt;
1103                 break;
1104         case LLC_OPT_ACK_TMR_EXP:
1105                 if (opt > LLC_OPT_MAX_ACK_TMR_EXP)
1106                         goto out;
1107                 llc->ack_timer.expire = opt * HZ;
1108                 break;
1109         case LLC_OPT_P_TMR_EXP:
1110                 if (opt > LLC_OPT_MAX_P_TMR_EXP)
1111                         goto out;
1112                 llc->pf_cycle_timer.expire = opt * HZ;
1113                 break;
1114         case LLC_OPT_REJ_TMR_EXP:
1115                 if (opt > LLC_OPT_MAX_REJ_TMR_EXP)
1116                         goto out;
1117                 llc->rej_sent_timer.expire = opt * HZ;
1118                 break;
1119         case LLC_OPT_BUSY_TMR_EXP:
1120                 if (opt > LLC_OPT_MAX_BUSY_TMR_EXP)
1121                         goto out;
1122                 llc->busy_state_timer.expire = opt * HZ;
1123                 break;
1124         case LLC_OPT_TX_WIN:
1125                 if (opt > LLC_OPT_MAX_WIN)
1126                         goto out;
1127                 llc->k = opt;
1128                 break;
1129         case LLC_OPT_RX_WIN:
1130                 if (opt > LLC_OPT_MAX_WIN)
1131                         goto out;
1132                 llc->rw = opt;
1133                 break;
1134         case LLC_OPT_PKTINFO:
1135                 if (opt)
1136                         llc->cmsg_flags |= LLC_CMSG_PKTINFO;
1137                 else
1138                         llc->cmsg_flags &= ~LLC_CMSG_PKTINFO;
1139                 break;
1140         default:
1141                 rc = -ENOPROTOOPT;
1142                 goto out;
1143         }
1144         rc = 0;
1145 out:
1146         release_sock(sk);
1147         return rc;
1148 }
1149
1150 /**
1151  *      llc_ui_getsockopt - get connection specific socket info
1152  *      @sock: Socket to get information from.
1153  *      @level: Socket level user is requesting operations on.
1154  *      @optname: Operation name.
1155  *      @optval: Variable to return operation data in.
1156  *      @optlen: Length of optval.
1157  *
1158  *      Get connection specific socket information.
1159  */
1160 static int llc_ui_getsockopt(struct socket *sock, int level, int optname,
1161                              char __user *optval, int __user *optlen)
1162 {
1163         struct sock *sk = sock->sk;
1164         struct llc_sock *llc = llc_sk(sk);
1165         int val = 0, len = 0, rc = -EINVAL;
1166
1167         lock_sock(sk);
1168         if (unlikely(level != SOL_LLC))
1169                 goto out;
1170         rc = get_user(len, optlen);
1171         if (rc)
1172                 goto out;
1173         rc = -EINVAL;
1174         if (len != sizeof(int))
1175                 goto out;
1176         switch (optname) {
1177         case LLC_OPT_RETRY:
1178                 val = llc->n2;                                  break;
1179         case LLC_OPT_SIZE:
1180                 val = llc->n1;                                  break;
1181         case LLC_OPT_ACK_TMR_EXP:
1182                 val = llc->ack_timer.expire / HZ;               break;
1183         case LLC_OPT_P_TMR_EXP:
1184                 val = llc->pf_cycle_timer.expire / HZ;          break;
1185         case LLC_OPT_REJ_TMR_EXP:
1186                 val = llc->rej_sent_timer.expire / HZ;          break;
1187         case LLC_OPT_BUSY_TMR_EXP:
1188                 val = llc->busy_state_timer.expire / HZ;        break;
1189         case LLC_OPT_TX_WIN:
1190                 val = llc->k;                           break;
1191         case LLC_OPT_RX_WIN:
1192                 val = llc->rw;                          break;
1193         case LLC_OPT_PKTINFO:
1194                 val = (llc->cmsg_flags & LLC_CMSG_PKTINFO) != 0;
1195                 break;
1196         default:
1197                 rc = -ENOPROTOOPT;
1198                 goto out;
1199         }
1200         rc = 0;
1201         if (put_user(len, optlen) || copy_to_user(optval, &val, len))
1202                 rc = -EFAULT;
1203 out:
1204         release_sock(sk);
1205         return rc;
1206 }
1207
1208 static const struct net_proto_family llc_ui_family_ops = {
1209         .family = PF_LLC,
1210         .create = llc_ui_create,
1211         .owner  = THIS_MODULE,
1212 };
1213
1214 static const struct proto_ops llc_ui_ops = {
1215         .family      = PF_LLC,
1216         .owner       = THIS_MODULE,
1217         .release     = llc_ui_release,
1218         .bind        = llc_ui_bind,
1219         .connect     = llc_ui_connect,
1220         .socketpair  = sock_no_socketpair,
1221         .accept      = llc_ui_accept,
1222         .getname     = llc_ui_getname,
1223         .poll        = datagram_poll,
1224         .ioctl       = llc_ui_ioctl,
1225         .listen      = llc_ui_listen,
1226         .shutdown    = llc_ui_shutdown,
1227         .setsockopt  = llc_ui_setsockopt,
1228         .getsockopt  = llc_ui_getsockopt,
1229         .sendmsg     = llc_ui_sendmsg,
1230         .recvmsg     = llc_ui_recvmsg,
1231         .mmap        = sock_no_mmap,
1232         .sendpage    = sock_no_sendpage,
1233 };
1234
1235 static const char llc_proc_err_msg[] __initconst =
1236         KERN_CRIT "LLC: Unable to register the proc_fs entries\n";
1237 static const char llc_sysctl_err_msg[] __initconst =
1238         KERN_CRIT "LLC: Unable to register the sysctl entries\n";
1239 static const char llc_sock_err_msg[] __initconst =
1240         KERN_CRIT "LLC: Unable to register the network family\n";
1241
1242 static int __init llc2_init(void)
1243 {
1244         int rc = proto_register(&llc_proto, 0);
1245
1246         if (rc != 0)
1247                 goto out;
1248
1249         llc_build_offset_table();
1250         llc_station_init();
1251         llc_ui_sap_last_autoport = LLC_SAP_DYN_START;
1252         rc = llc_proc_init();
1253         if (rc != 0) {
1254                 printk(llc_proc_err_msg);
1255                 goto out_station;
1256         }
1257         rc = llc_sysctl_init();
1258         if (rc) {
1259                 printk(llc_sysctl_err_msg);
1260                 goto out_proc;
1261         }
1262         rc = sock_register(&llc_ui_family_ops);
1263         if (rc) {
1264                 printk(llc_sock_err_msg);
1265                 goto out_sysctl;
1266         }
1267         llc_add_pack(LLC_DEST_SAP, llc_sap_handler);
1268         llc_add_pack(LLC_DEST_CONN, llc_conn_handler);
1269 out:
1270         return rc;
1271 out_sysctl:
1272         llc_sysctl_exit();
1273 out_proc:
1274         llc_proc_exit();
1275 out_station:
1276         llc_station_exit();
1277         proto_unregister(&llc_proto);
1278         goto out;
1279 }
1280
1281 static void __exit llc2_exit(void)
1282 {
1283         llc_station_exit();
1284         llc_remove_pack(LLC_DEST_SAP);
1285         llc_remove_pack(LLC_DEST_CONN);
1286         sock_unregister(PF_LLC);
1287         llc_proc_exit();
1288         llc_sysctl_exit();
1289         proto_unregister(&llc_proto);
1290 }
1291
1292 module_init(llc2_init);
1293 module_exit(llc2_exit);
1294
1295 MODULE_LICENSE("GPL");
1296 MODULE_AUTHOR("Procom 1997, Jay Schullist 2001, Arnaldo C. Melo 2001-2003");
1297 MODULE_DESCRIPTION("IEEE 802.2 PF_LLC support");
1298 MODULE_ALIAS_NETPROTO(PF_LLC);