GNU Linux-libre 4.9.337-gnu1
[releases.git] / net / ipv4 / inet_diag.c
1 /*
2  * inet_diag.c  Module for monitoring INET transport protocols sockets.
3  *
4  * Authors:     Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
5  *
6  *      This program is free software; you can redistribute it and/or
7  *      modify it under the terms of the GNU General Public License
8  *      as published by the Free Software Foundation; either version
9  *      2 of the License, or (at your option) any later version.
10  */
11
12 #include <linux/kernel.h>
13 #include <linux/module.h>
14 #include <linux/types.h>
15 #include <linux/fcntl.h>
16 #include <linux/random.h>
17 #include <linux/slab.h>
18 #include <linux/cache.h>
19 #include <linux/init.h>
20 #include <linux/time.h>
21
22 #include <net/icmp.h>
23 #include <net/tcp.h>
24 #include <net/ipv6.h>
25 #include <net/inet_common.h>
26 #include <net/inet_connection_sock.h>
27 #include <net/inet_hashtables.h>
28 #include <net/inet_timewait_sock.h>
29 #include <net/inet6_hashtables.h>
30 #include <net/netlink.h>
31
32 #include <linux/inet.h>
33 #include <linux/stddef.h>
34
35 #include <linux/inet_diag.h>
36 #include <linux/sock_diag.h>
37
38 static const struct inet_diag_handler **inet_diag_table;
39
40 struct inet_diag_entry {
41         const __be32 *saddr;
42         const __be32 *daddr;
43         u16 sport;
44         u16 dport;
45         u16 family;
46         u16 userlocks;
47         u32 ifindex;
48         u32 mark;
49 };
50
51 static DEFINE_MUTEX(inet_diag_table_mutex);
52
53 static const struct inet_diag_handler *inet_diag_lock_handler(int proto)
54 {
55         if (!inet_diag_table[proto])
56                 request_module("net-pf-%d-proto-%d-type-%d-%d", PF_NETLINK,
57                                NETLINK_SOCK_DIAG, AF_INET, proto);
58
59         mutex_lock(&inet_diag_table_mutex);
60         if (!inet_diag_table[proto])
61                 return ERR_PTR(-ENOENT);
62
63         return inet_diag_table[proto];
64 }
65
66 static void inet_diag_unlock_handler(const struct inet_diag_handler *handler)
67 {
68         mutex_unlock(&inet_diag_table_mutex);
69 }
70
71 void inet_diag_msg_common_fill(struct inet_diag_msg *r, struct sock *sk)
72 {
73         r->idiag_family = sk->sk_family;
74
75         r->id.idiag_sport = htons(sk->sk_num);
76         r->id.idiag_dport = sk->sk_dport;
77         r->id.idiag_if = sk->sk_bound_dev_if;
78         sock_diag_save_cookie(sk, r->id.idiag_cookie);
79
80 #if IS_ENABLED(CONFIG_IPV6)
81         if (sk->sk_family == AF_INET6) {
82                 *(struct in6_addr *)r->id.idiag_src = sk->sk_v6_rcv_saddr;
83                 *(struct in6_addr *)r->id.idiag_dst = sk->sk_v6_daddr;
84         } else
85 #endif
86         {
87         memset(&r->id.idiag_src, 0, sizeof(r->id.idiag_src));
88         memset(&r->id.idiag_dst, 0, sizeof(r->id.idiag_dst));
89
90         r->id.idiag_src[0] = sk->sk_rcv_saddr;
91         r->id.idiag_dst[0] = sk->sk_daddr;
92         }
93 }
94 EXPORT_SYMBOL_GPL(inet_diag_msg_common_fill);
95
96 static size_t inet_sk_attr_size(void)
97 {
98         return    nla_total_size(sizeof(struct tcp_info))
99                 + nla_total_size(1) /* INET_DIAG_SHUTDOWN */
100                 + nla_total_size(1) /* INET_DIAG_TOS */
101                 + nla_total_size(1) /* INET_DIAG_TCLASS */
102                 + nla_total_size(4) /* INET_DIAG_MARK */
103                 + nla_total_size(sizeof(struct inet_diag_meminfo))
104                 + nla_total_size(sizeof(struct inet_diag_msg))
105                 + nla_total_size(SK_MEMINFO_VARS * sizeof(u32))
106                 + nla_total_size(TCP_CA_NAME_MAX)
107                 + nla_total_size(sizeof(struct tcpvegas_info))
108                 + 64;
109 }
110
111 int inet_diag_msg_attrs_fill(struct sock *sk, struct sk_buff *skb,
112                              struct inet_diag_msg *r, int ext,
113                              struct user_namespace *user_ns,
114                              bool net_admin)
115 {
116         const struct inet_sock *inet = inet_sk(sk);
117
118         if (nla_put_u8(skb, INET_DIAG_SHUTDOWN, sk->sk_shutdown))
119                 goto errout;
120
121         /* IPv6 dual-stack sockets use inet->tos for IPv4 connections,
122          * hence this needs to be included regardless of socket family.
123          */
124         if (ext & (1 << (INET_DIAG_TOS - 1)))
125                 if (nla_put_u8(skb, INET_DIAG_TOS, inet->tos) < 0)
126                         goto errout;
127
128 #if IS_ENABLED(CONFIG_IPV6)
129         if (r->idiag_family == AF_INET6) {
130                 if (ext & (1 << (INET_DIAG_TCLASS - 1)))
131                         if (nla_put_u8(skb, INET_DIAG_TCLASS,
132                                        inet6_sk(sk)->tclass) < 0)
133                                 goto errout;
134
135                 if (((1 << sk->sk_state) & (TCPF_LISTEN | TCPF_CLOSE)) &&
136                     nla_put_u8(skb, INET_DIAG_SKV6ONLY, ipv6_only_sock(sk)))
137                         goto errout;
138         }
139 #endif
140
141         if (net_admin && nla_put_u32(skb, INET_DIAG_MARK, sk->sk_mark))
142                 goto errout;
143
144         r->idiag_uid = from_kuid_munged(user_ns, sock_i_uid(sk));
145         r->idiag_inode = sock_i_ino(sk);
146
147         return 0;
148 errout:
149         return 1;
150 }
151 EXPORT_SYMBOL_GPL(inet_diag_msg_attrs_fill);
152
153 int inet_sk_diag_fill(struct sock *sk, struct inet_connection_sock *icsk,
154                       struct sk_buff *skb, const struct inet_diag_req_v2 *req,
155                       struct user_namespace *user_ns,
156                       u32 portid, u32 seq, u16 nlmsg_flags,
157                       const struct nlmsghdr *unlh,
158                       bool net_admin)
159 {
160         const struct tcp_congestion_ops *ca_ops;
161         const struct inet_diag_handler *handler;
162         int ext = req->idiag_ext;
163         struct inet_diag_msg *r;
164         struct nlmsghdr  *nlh;
165         struct nlattr *attr;
166         void *info = NULL;
167
168         handler = inet_diag_table[req->sdiag_protocol];
169         BUG_ON(!handler);
170
171         nlh = nlmsg_put(skb, portid, seq, unlh->nlmsg_type, sizeof(*r),
172                         nlmsg_flags);
173         if (!nlh)
174                 return -EMSGSIZE;
175
176         r = nlmsg_data(nlh);
177         BUG_ON(!sk_fullsock(sk));
178
179         inet_diag_msg_common_fill(r, sk);
180         r->idiag_state = sk->sk_state;
181         r->idiag_timer = 0;
182         r->idiag_retrans = 0;
183
184         if (inet_diag_msg_attrs_fill(sk, skb, r, ext, user_ns, net_admin))
185                 goto errout;
186
187         if (ext & (1 << (INET_DIAG_MEMINFO - 1))) {
188                 struct inet_diag_meminfo minfo = {
189                         .idiag_rmem = sk_rmem_alloc_get(sk),
190                         .idiag_wmem = sk->sk_wmem_queued,
191                         .idiag_fmem = sk->sk_forward_alloc,
192                         .idiag_tmem = sk_wmem_alloc_get(sk),
193                 };
194
195                 if (nla_put(skb, INET_DIAG_MEMINFO, sizeof(minfo), &minfo) < 0)
196                         goto errout;
197         }
198
199         if (ext & (1 << (INET_DIAG_SKMEMINFO - 1)))
200                 if (sock_diag_put_meminfo(sk, skb, INET_DIAG_SKMEMINFO))
201                         goto errout;
202
203         if (!icsk) {
204                 handler->idiag_get_info(sk, r, NULL);
205                 goto out;
206         }
207
208         if (icsk->icsk_pending == ICSK_TIME_RETRANS ||
209             icsk->icsk_pending == ICSK_TIME_EARLY_RETRANS ||
210             icsk->icsk_pending == ICSK_TIME_LOSS_PROBE) {
211                 r->idiag_timer = 1;
212                 r->idiag_retrans = icsk->icsk_retransmits;
213                 r->idiag_expires =
214                         jiffies_to_msecs(icsk->icsk_timeout - jiffies);
215         } else if (icsk->icsk_pending == ICSK_TIME_PROBE0) {
216                 r->idiag_timer = 4;
217                 r->idiag_retrans = icsk->icsk_probes_out;
218                 r->idiag_expires =
219                         jiffies_to_msecs(icsk->icsk_timeout - jiffies);
220         } else if (timer_pending(&sk->sk_timer)) {
221                 r->idiag_timer = 2;
222                 r->idiag_retrans = icsk->icsk_probes_out;
223                 r->idiag_expires =
224                         jiffies_to_msecs(sk->sk_timer.expires - jiffies);
225         } else {
226                 r->idiag_timer = 0;
227                 r->idiag_expires = 0;
228         }
229
230         if ((ext & (1 << (INET_DIAG_INFO - 1))) && handler->idiag_info_size) {
231                 attr = nla_reserve_64bit(skb, INET_DIAG_INFO,
232                                          handler->idiag_info_size,
233                                          INET_DIAG_PAD);
234                 if (!attr)
235                         goto errout;
236
237                 info = nla_data(attr);
238         }
239
240         if (ext & (1 << (INET_DIAG_CONG - 1))) {
241                 int err = 0;
242
243                 rcu_read_lock();
244                 ca_ops = READ_ONCE(icsk->icsk_ca_ops);
245                 if (ca_ops)
246                         err = nla_put_string(skb, INET_DIAG_CONG, ca_ops->name);
247                 rcu_read_unlock();
248                 if (err < 0)
249                         goto errout;
250         }
251
252         handler->idiag_get_info(sk, r, info);
253
254         if (sk->sk_state < TCP_TIME_WAIT) {
255                 union tcp_cc_info info;
256                 size_t sz = 0;
257                 int attr;
258
259                 rcu_read_lock();
260                 ca_ops = READ_ONCE(icsk->icsk_ca_ops);
261                 if (ca_ops && ca_ops->get_info)
262                         sz = ca_ops->get_info(sk, ext, &attr, &info);
263                 rcu_read_unlock();
264                 if (sz && nla_put(skb, attr, sz, &info) < 0)
265                         goto errout;
266         }
267
268 out:
269         nlmsg_end(skb, nlh);
270         return 0;
271
272 errout:
273         nlmsg_cancel(skb, nlh);
274         return -EMSGSIZE;
275 }
276 EXPORT_SYMBOL_GPL(inet_sk_diag_fill);
277
278 static int inet_csk_diag_fill(struct sock *sk,
279                               struct sk_buff *skb,
280                               const struct inet_diag_req_v2 *req,
281                               struct user_namespace *user_ns,
282                               u32 portid, u32 seq, u16 nlmsg_flags,
283                               const struct nlmsghdr *unlh,
284                               bool net_admin)
285 {
286         return inet_sk_diag_fill(sk, inet_csk(sk), skb, req, user_ns,
287                                  portid, seq, nlmsg_flags, unlh, net_admin);
288 }
289
290 static int inet_twsk_diag_fill(struct sock *sk,
291                                struct sk_buff *skb,
292                                u32 portid, u32 seq, u16 nlmsg_flags,
293                                const struct nlmsghdr *unlh)
294 {
295         struct inet_timewait_sock *tw = inet_twsk(sk);
296         struct inet_diag_msg *r;
297         struct nlmsghdr *nlh;
298         long tmo;
299
300         nlh = nlmsg_put(skb, portid, seq, unlh->nlmsg_type, sizeof(*r),
301                         nlmsg_flags);
302         if (!nlh)
303                 return -EMSGSIZE;
304
305         r = nlmsg_data(nlh);
306         BUG_ON(tw->tw_state != TCP_TIME_WAIT);
307
308         tmo = tw->tw_timer.expires - jiffies;
309         if (tmo < 0)
310                 tmo = 0;
311
312         inet_diag_msg_common_fill(r, sk);
313         r->idiag_retrans      = 0;
314
315         r->idiag_state        = tw->tw_substate;
316         r->idiag_timer        = 3;
317         r->idiag_expires      = jiffies_to_msecs(tmo);
318         r->idiag_rqueue       = 0;
319         r->idiag_wqueue       = 0;
320         r->idiag_uid          = 0;
321         r->idiag_inode        = 0;
322
323         nlmsg_end(skb, nlh);
324         return 0;
325 }
326
327 static int inet_req_diag_fill(struct sock *sk, struct sk_buff *skb,
328                               u32 portid, u32 seq, u16 nlmsg_flags,
329                               const struct nlmsghdr *unlh, bool net_admin)
330 {
331         struct request_sock *reqsk = inet_reqsk(sk);
332         struct inet_diag_msg *r;
333         struct nlmsghdr *nlh;
334         long tmo;
335
336         nlh = nlmsg_put(skb, portid, seq, unlh->nlmsg_type, sizeof(*r),
337                         nlmsg_flags);
338         if (!nlh)
339                 return -EMSGSIZE;
340
341         r = nlmsg_data(nlh);
342         inet_diag_msg_common_fill(r, sk);
343         r->idiag_state = TCP_SYN_RECV;
344         r->idiag_timer = 1;
345         r->idiag_retrans = reqsk->num_retrans;
346
347         BUILD_BUG_ON(offsetof(struct inet_request_sock, ir_cookie) !=
348                      offsetof(struct sock, sk_cookie));
349
350         tmo = inet_reqsk(sk)->rsk_timer.expires - jiffies;
351         r->idiag_expires = (tmo >= 0) ? jiffies_to_msecs(tmo) : 0;
352         r->idiag_rqueue = 0;
353         r->idiag_wqueue = 0;
354         r->idiag_uid    = 0;
355         r->idiag_inode  = 0;
356
357         if (net_admin && nla_put_u32(skb, INET_DIAG_MARK,
358                                      inet_rsk(reqsk)->ir_mark)) {
359                 nlmsg_cancel(skb, nlh);
360                 return -EMSGSIZE;
361         }
362
363         nlmsg_end(skb, nlh);
364         return 0;
365 }
366
367 static int sk_diag_fill(struct sock *sk, struct sk_buff *skb,
368                         const struct inet_diag_req_v2 *r,
369                         struct user_namespace *user_ns,
370                         u32 portid, u32 seq, u16 nlmsg_flags,
371                         const struct nlmsghdr *unlh, bool net_admin)
372 {
373         if (sk->sk_state == TCP_TIME_WAIT)
374                 return inet_twsk_diag_fill(sk, skb, portid, seq,
375                                            nlmsg_flags, unlh);
376
377         if (sk->sk_state == TCP_NEW_SYN_RECV)
378                 return inet_req_diag_fill(sk, skb, portid, seq,
379                                           nlmsg_flags, unlh, net_admin);
380
381         return inet_csk_diag_fill(sk, skb, r, user_ns, portid, seq,
382                                   nlmsg_flags, unlh, net_admin);
383 }
384
385 struct sock *inet_diag_find_one_icsk(struct net *net,
386                                      struct inet_hashinfo *hashinfo,
387                                      const struct inet_diag_req_v2 *req)
388 {
389         struct sock *sk;
390
391         rcu_read_lock();
392         if (req->sdiag_family == AF_INET)
393                 sk = inet_lookup(net, hashinfo, NULL, 0, req->id.idiag_dst[0],
394                                  req->id.idiag_dport, req->id.idiag_src[0],
395                                  req->id.idiag_sport, req->id.idiag_if);
396 #if IS_ENABLED(CONFIG_IPV6)
397         else if (req->sdiag_family == AF_INET6) {
398                 if (ipv6_addr_v4mapped((struct in6_addr *)req->id.idiag_dst) &&
399                     ipv6_addr_v4mapped((struct in6_addr *)req->id.idiag_src))
400                         sk = inet_lookup(net, hashinfo, NULL, 0, req->id.idiag_dst[3],
401                                          req->id.idiag_dport, req->id.idiag_src[3],
402                                          req->id.idiag_sport, req->id.idiag_if);
403                 else
404                         sk = inet6_lookup(net, hashinfo, NULL, 0,
405                                           (struct in6_addr *)req->id.idiag_dst,
406                                           req->id.idiag_dport,
407                                           (struct in6_addr *)req->id.idiag_src,
408                                           req->id.idiag_sport,
409                                           req->id.idiag_if);
410         }
411 #endif
412         else {
413                 rcu_read_unlock();
414                 return ERR_PTR(-EINVAL);
415         }
416         rcu_read_unlock();
417         if (!sk)
418                 return ERR_PTR(-ENOENT);
419
420         if (sock_diag_check_cookie(sk, req->id.idiag_cookie)) {
421                 sock_gen_put(sk);
422                 return ERR_PTR(-ENOENT);
423         }
424
425         return sk;
426 }
427 EXPORT_SYMBOL_GPL(inet_diag_find_one_icsk);
428
429 int inet_diag_dump_one_icsk(struct inet_hashinfo *hashinfo,
430                             struct sk_buff *in_skb,
431                             const struct nlmsghdr *nlh,
432                             const struct inet_diag_req_v2 *req)
433 {
434         struct net *net = sock_net(in_skb->sk);
435         struct sk_buff *rep;
436         struct sock *sk;
437         int err;
438
439         sk = inet_diag_find_one_icsk(net, hashinfo, req);
440         if (IS_ERR(sk))
441                 return PTR_ERR(sk);
442
443         rep = nlmsg_new(inet_sk_attr_size(), GFP_KERNEL);
444         if (!rep) {
445                 err = -ENOMEM;
446                 goto out;
447         }
448
449         err = sk_diag_fill(sk, rep, req,
450                            sk_user_ns(NETLINK_CB(in_skb).sk),
451                            NETLINK_CB(in_skb).portid,
452                            nlh->nlmsg_seq, 0, nlh,
453                            netlink_net_capable(in_skb, CAP_NET_ADMIN));
454         if (err < 0) {
455                 WARN_ON(err == -EMSGSIZE);
456                 nlmsg_free(rep);
457                 goto out;
458         }
459         err = netlink_unicast(net->diag_nlsk, rep, NETLINK_CB(in_skb).portid,
460                               MSG_DONTWAIT);
461         if (err > 0)
462                 err = 0;
463
464 out:
465         if (sk)
466                 sock_gen_put(sk);
467
468         return err;
469 }
470 EXPORT_SYMBOL_GPL(inet_diag_dump_one_icsk);
471
472 static int inet_diag_cmd_exact(int cmd, struct sk_buff *in_skb,
473                                const struct nlmsghdr *nlh,
474                                const struct inet_diag_req_v2 *req)
475 {
476         const struct inet_diag_handler *handler;
477         int err;
478
479         handler = inet_diag_lock_handler(req->sdiag_protocol);
480         if (IS_ERR(handler))
481                 err = PTR_ERR(handler);
482         else if (cmd == SOCK_DIAG_BY_FAMILY)
483                 err = handler->dump_one(in_skb, nlh, req);
484         else if (cmd == SOCK_DESTROY && handler->destroy)
485                 err = handler->destroy(in_skb, req);
486         else
487                 err = -EOPNOTSUPP;
488         inet_diag_unlock_handler(handler);
489
490         return err;
491 }
492
493 static int bitstring_match(const __be32 *a1, const __be32 *a2, int bits)
494 {
495         int words = bits >> 5;
496
497         bits &= 0x1f;
498
499         if (words) {
500                 if (memcmp(a1, a2, words << 2))
501                         return 0;
502         }
503         if (bits) {
504                 __be32 w1, w2;
505                 __be32 mask;
506
507                 w1 = a1[words];
508                 w2 = a2[words];
509
510                 mask = htonl((0xffffffff) << (32 - bits));
511
512                 if ((w1 ^ w2) & mask)
513                         return 0;
514         }
515
516         return 1;
517 }
518
519 static int inet_diag_bc_run(const struct nlattr *_bc,
520                             const struct inet_diag_entry *entry)
521 {
522         const void *bc = nla_data(_bc);
523         int len = nla_len(_bc);
524
525         while (len > 0) {
526                 int yes = 1;
527                 const struct inet_diag_bc_op *op = bc;
528
529                 switch (op->code) {
530                 case INET_DIAG_BC_NOP:
531                         break;
532                 case INET_DIAG_BC_JMP:
533                         yes = 0;
534                         break;
535                 case INET_DIAG_BC_S_GE:
536                         yes = entry->sport >= op[1].no;
537                         break;
538                 case INET_DIAG_BC_S_LE:
539                         yes = entry->sport <= op[1].no;
540                         break;
541                 case INET_DIAG_BC_D_GE:
542                         yes = entry->dport >= op[1].no;
543                         break;
544                 case INET_DIAG_BC_D_LE:
545                         yes = entry->dport <= op[1].no;
546                         break;
547                 case INET_DIAG_BC_AUTO:
548                         yes = !(entry->userlocks & SOCK_BINDPORT_LOCK);
549                         break;
550                 case INET_DIAG_BC_S_COND:
551                 case INET_DIAG_BC_D_COND: {
552                         const struct inet_diag_hostcond *cond;
553                         const __be32 *addr;
554
555                         cond = (const struct inet_diag_hostcond *)(op + 1);
556                         if (cond->port != -1 &&
557                             cond->port != (op->code == INET_DIAG_BC_S_COND ?
558                                              entry->sport : entry->dport)) {
559                                 yes = 0;
560                                 break;
561                         }
562
563                         if (op->code == INET_DIAG_BC_S_COND)
564                                 addr = entry->saddr;
565                         else
566                                 addr = entry->daddr;
567
568                         if (cond->family != AF_UNSPEC &&
569                             cond->family != entry->family) {
570                                 if (entry->family == AF_INET6 &&
571                                     cond->family == AF_INET) {
572                                         if (addr[0] == 0 && addr[1] == 0 &&
573                                             addr[2] == htonl(0xffff) &&
574                                             bitstring_match(addr + 3,
575                                                             cond->addr,
576                                                             cond->prefix_len))
577                                                 break;
578                                 }
579                                 yes = 0;
580                                 break;
581                         }
582
583                         if (cond->prefix_len == 0)
584                                 break;
585                         if (bitstring_match(addr, cond->addr,
586                                             cond->prefix_len))
587                                 break;
588                         yes = 0;
589                         break;
590                 }
591                 case INET_DIAG_BC_DEV_COND: {
592                         u32 ifindex;
593
594                         ifindex = *((const u32 *)(op + 1));
595                         if (ifindex != entry->ifindex)
596                                 yes = 0;
597                         break;
598                 }
599                 case INET_DIAG_BC_MARK_COND: {
600                         struct inet_diag_markcond *cond;
601
602                         cond = (struct inet_diag_markcond *)(op + 1);
603                         if ((entry->mark & cond->mask) != cond->mark)
604                                 yes = 0;
605                         break;
606                 }
607                 }
608
609                 if (yes) {
610                         len -= op->yes;
611                         bc += op->yes;
612                 } else {
613                         len -= op->no;
614                         bc += op->no;
615                 }
616         }
617         return len == 0;
618 }
619
620 /* This helper is available for all sockets (ESTABLISH, TIMEWAIT, SYN_RECV)
621  */
622 static void entry_fill_addrs(struct inet_diag_entry *entry,
623                              const struct sock *sk)
624 {
625 #if IS_ENABLED(CONFIG_IPV6)
626         if (sk->sk_family == AF_INET6) {
627                 entry->saddr = sk->sk_v6_rcv_saddr.s6_addr32;
628                 entry->daddr = sk->sk_v6_daddr.s6_addr32;
629         } else
630 #endif
631         {
632                 entry->saddr = &sk->sk_rcv_saddr;
633                 entry->daddr = &sk->sk_daddr;
634         }
635 }
636
637 int inet_diag_bc_sk(const struct nlattr *bc, struct sock *sk)
638 {
639         struct inet_sock *inet = inet_sk(sk);
640         struct inet_diag_entry entry;
641
642         if (!bc)
643                 return 1;
644
645         entry.family = sk->sk_family;
646         entry_fill_addrs(&entry, sk);
647         entry.sport = inet->inet_num;
648         entry.dport = ntohs(inet->inet_dport);
649         entry.ifindex = sk->sk_bound_dev_if;
650         entry.userlocks = sk_fullsock(sk) ? sk->sk_userlocks : 0;
651         if (sk_fullsock(sk))
652                 entry.mark = sk->sk_mark;
653         else if (sk->sk_state == TCP_NEW_SYN_RECV)
654                 entry.mark = inet_rsk(inet_reqsk(sk))->ir_mark;
655         else
656                 entry.mark = 0;
657
658         return inet_diag_bc_run(bc, &entry);
659 }
660 EXPORT_SYMBOL_GPL(inet_diag_bc_sk);
661
662 static int valid_cc(const void *bc, int len, int cc)
663 {
664         while (len >= 0) {
665                 const struct inet_diag_bc_op *op = bc;
666
667                 if (cc > len)
668                         return 0;
669                 if (cc == len)
670                         return 1;
671                 if (op->yes < 4 || op->yes & 3)
672                         return 0;
673                 len -= op->yes;
674                 bc  += op->yes;
675         }
676         return 0;
677 }
678
679 /* data is u32 ifindex */
680 static bool valid_devcond(const struct inet_diag_bc_op *op, int len,
681                           int *min_len)
682 {
683         /* Check ifindex space. */
684         *min_len += sizeof(u32);
685         if (len < *min_len)
686                 return false;
687
688         return true;
689 }
690 /* Validate an inet_diag_hostcond. */
691 static bool valid_hostcond(const struct inet_diag_bc_op *op, int len,
692                            int *min_len)
693 {
694         struct inet_diag_hostcond *cond;
695         int addr_len;
696
697         /* Check hostcond space. */
698         *min_len += sizeof(struct inet_diag_hostcond);
699         if (len < *min_len)
700                 return false;
701         cond = (struct inet_diag_hostcond *)(op + 1);
702
703         /* Check address family and address length. */
704         switch (cond->family) {
705         case AF_UNSPEC:
706                 addr_len = 0;
707                 break;
708         case AF_INET:
709                 addr_len = sizeof(struct in_addr);
710                 break;
711         case AF_INET6:
712                 addr_len = sizeof(struct in6_addr);
713                 break;
714         default:
715                 return false;
716         }
717         *min_len += addr_len;
718         if (len < *min_len)
719                 return false;
720
721         /* Check prefix length (in bits) vs address length (in bytes). */
722         if (cond->prefix_len > 8 * addr_len)
723                 return false;
724
725         return true;
726 }
727
728 /* Validate a port comparison operator. */
729 static bool valid_port_comparison(const struct inet_diag_bc_op *op,
730                                   int len, int *min_len)
731 {
732         /* Port comparisons put the port in a follow-on inet_diag_bc_op. */
733         *min_len += sizeof(struct inet_diag_bc_op);
734         if (len < *min_len)
735                 return false;
736         return true;
737 }
738
739 static bool valid_markcond(const struct inet_diag_bc_op *op, int len,
740                            int *min_len)
741 {
742         *min_len += sizeof(struct inet_diag_markcond);
743         return len >= *min_len;
744 }
745
746 static int inet_diag_bc_audit(const struct nlattr *attr,
747                               const struct sk_buff *skb)
748 {
749         bool net_admin = netlink_net_capable(skb, CAP_NET_ADMIN);
750         const void *bytecode, *bc;
751         int bytecode_len, len;
752
753         if (!attr || nla_len(attr) < sizeof(struct inet_diag_bc_op))
754                 return -EINVAL;
755
756         bytecode = bc = nla_data(attr);
757         len = bytecode_len = nla_len(attr);
758
759         while (len > 0) {
760                 int min_len = sizeof(struct inet_diag_bc_op);
761                 const struct inet_diag_bc_op *op = bc;
762
763                 switch (op->code) {
764                 case INET_DIAG_BC_S_COND:
765                 case INET_DIAG_BC_D_COND:
766                         if (!valid_hostcond(bc, len, &min_len))
767                                 return -EINVAL;
768                         break;
769                 case INET_DIAG_BC_DEV_COND:
770                         if (!valid_devcond(bc, len, &min_len))
771                                 return -EINVAL;
772                         break;
773                 case INET_DIAG_BC_S_GE:
774                 case INET_DIAG_BC_S_LE:
775                 case INET_DIAG_BC_D_GE:
776                 case INET_DIAG_BC_D_LE:
777                         if (!valid_port_comparison(bc, len, &min_len))
778                                 return -EINVAL;
779                         break;
780                 case INET_DIAG_BC_MARK_COND:
781                         if (!net_admin)
782                                 return -EPERM;
783                         if (!valid_markcond(bc, len, &min_len))
784                                 return -EINVAL;
785                         break;
786                 case INET_DIAG_BC_AUTO:
787                 case INET_DIAG_BC_JMP:
788                 case INET_DIAG_BC_NOP:
789                         break;
790                 default:
791                         return -EINVAL;
792                 }
793
794                 if (op->code != INET_DIAG_BC_NOP) {
795                         if (op->no < min_len || op->no > len + 4 || op->no & 3)
796                                 return -EINVAL;
797                         if (op->no < len &&
798                             !valid_cc(bytecode, bytecode_len, len - op->no))
799                                 return -EINVAL;
800                 }
801
802                 if (op->yes < min_len || op->yes > len + 4 || op->yes & 3)
803                         return -EINVAL;
804                 bc  += op->yes;
805                 len -= op->yes;
806         }
807         return len == 0 ? 0 : -EINVAL;
808 }
809
810 static int inet_csk_diag_dump(struct sock *sk,
811                               struct sk_buff *skb,
812                               struct netlink_callback *cb,
813                               const struct inet_diag_req_v2 *r,
814                               const struct nlattr *bc,
815                               bool net_admin)
816 {
817         if (!inet_diag_bc_sk(bc, sk))
818                 return 0;
819
820         return inet_csk_diag_fill(sk, skb, r,
821                                   sk_user_ns(NETLINK_CB(cb->skb).sk),
822                                   NETLINK_CB(cb->skb).portid,
823                                   cb->nlh->nlmsg_seq, NLM_F_MULTI, cb->nlh,
824                                   net_admin);
825 }
826
827 static void twsk_build_assert(void)
828 {
829         BUILD_BUG_ON(offsetof(struct inet_timewait_sock, tw_family) !=
830                      offsetof(struct sock, sk_family));
831
832         BUILD_BUG_ON(offsetof(struct inet_timewait_sock, tw_num) !=
833                      offsetof(struct inet_sock, inet_num));
834
835         BUILD_BUG_ON(offsetof(struct inet_timewait_sock, tw_dport) !=
836                      offsetof(struct inet_sock, inet_dport));
837
838         BUILD_BUG_ON(offsetof(struct inet_timewait_sock, tw_rcv_saddr) !=
839                      offsetof(struct inet_sock, inet_rcv_saddr));
840
841         BUILD_BUG_ON(offsetof(struct inet_timewait_sock, tw_daddr) !=
842                      offsetof(struct inet_sock, inet_daddr));
843
844 #if IS_ENABLED(CONFIG_IPV6)
845         BUILD_BUG_ON(offsetof(struct inet_timewait_sock, tw_v6_rcv_saddr) !=
846                      offsetof(struct sock, sk_v6_rcv_saddr));
847
848         BUILD_BUG_ON(offsetof(struct inet_timewait_sock, tw_v6_daddr) !=
849                      offsetof(struct sock, sk_v6_daddr));
850 #endif
851 }
852
853 void inet_diag_dump_icsk(struct inet_hashinfo *hashinfo, struct sk_buff *skb,
854                          struct netlink_callback *cb,
855                          const struct inet_diag_req_v2 *r, struct nlattr *bc)
856 {
857         struct net *net = sock_net(skb->sk);
858         int i, num, s_i, s_num;
859         u32 idiag_states = r->idiag_states;
860         bool net_admin = netlink_net_capable(cb->skb, CAP_NET_ADMIN);
861
862         if (idiag_states & TCPF_SYN_RECV)
863                 idiag_states |= TCPF_NEW_SYN_RECV;
864         s_i = cb->args[1];
865         s_num = num = cb->args[2];
866
867         if (cb->args[0] == 0) {
868                 if (!(idiag_states & TCPF_LISTEN))
869                         goto skip_listen_ht;
870
871                 for (i = s_i; i < INET_LHTABLE_SIZE; i++) {
872                         struct inet_listen_hashbucket *ilb;
873                         struct hlist_nulls_node *node;
874                         struct sock *sk;
875
876                         num = 0;
877                         ilb = &hashinfo->listening_hash[i];
878                         spin_lock_bh(&ilb->lock);
879                         sk_nulls_for_each(sk, node, &ilb->nulls_head) {
880                                 struct inet_sock *inet = inet_sk(sk);
881
882                                 if (!net_eq(sock_net(sk), net))
883                                         continue;
884
885                                 if (num < s_num) {
886                                         num++;
887                                         continue;
888                                 }
889
890                                 if (r->sdiag_family != AF_UNSPEC &&
891                                     sk->sk_family != r->sdiag_family)
892                                         goto next_listen;
893
894                                 if (r->id.idiag_sport != inet->inet_sport &&
895                                     r->id.idiag_sport)
896                                         goto next_listen;
897
898                                 if (r->id.idiag_dport ||
899                                     cb->args[3] > 0)
900                                         goto next_listen;
901
902                                 if (inet_csk_diag_dump(sk, skb, cb, r,
903                                                        bc, net_admin) < 0) {
904                                         spin_unlock_bh(&ilb->lock);
905                                         goto done;
906                                 }
907
908 next_listen:
909                                 cb->args[3] = 0;
910                                 cb->args[4] = 0;
911                                 ++num;
912                         }
913                         spin_unlock_bh(&ilb->lock);
914
915                         s_num = 0;
916                         cb->args[3] = 0;
917                         cb->args[4] = 0;
918                 }
919 skip_listen_ht:
920                 cb->args[0] = 1;
921                 s_i = num = s_num = 0;
922         }
923
924         if (!(idiag_states & ~TCPF_LISTEN))
925                 goto out;
926
927         for (i = s_i; i <= hashinfo->ehash_mask; i++) {
928                 struct inet_ehash_bucket *head = &hashinfo->ehash[i];
929                 spinlock_t *lock = inet_ehash_lockp(hashinfo, i);
930                 struct hlist_nulls_node *node;
931                 struct sock *sk;
932
933                 num = 0;
934
935                 if (hlist_nulls_empty(&head->chain))
936                         continue;
937
938                 if (i > s_i)
939                         s_num = 0;
940
941                 spin_lock_bh(lock);
942                 sk_nulls_for_each(sk, node, &head->chain) {
943                         int state, res;
944
945                         if (!net_eq(sock_net(sk), net))
946                                 continue;
947                         if (num < s_num)
948                                 goto next_normal;
949                         state = (sk->sk_state == TCP_TIME_WAIT) ?
950                                 inet_twsk(sk)->tw_substate : sk->sk_state;
951                         if (!(idiag_states & (1 << state)))
952                                 goto next_normal;
953                         if (r->sdiag_family != AF_UNSPEC &&
954                             sk->sk_family != r->sdiag_family)
955                                 goto next_normal;
956                         if (r->id.idiag_sport != htons(sk->sk_num) &&
957                             r->id.idiag_sport)
958                                 goto next_normal;
959                         if (r->id.idiag_dport != sk->sk_dport &&
960                             r->id.idiag_dport)
961                                 goto next_normal;
962                         twsk_build_assert();
963
964                         if (!inet_diag_bc_sk(bc, sk))
965                                 goto next_normal;
966
967                         res = sk_diag_fill(sk, skb, r,
968                                            sk_user_ns(NETLINK_CB(cb->skb).sk),
969                                            NETLINK_CB(cb->skb).portid,
970                                            cb->nlh->nlmsg_seq, NLM_F_MULTI,
971                                            cb->nlh, net_admin);
972                         if (res < 0) {
973                                 spin_unlock_bh(lock);
974                                 goto done;
975                         }
976 next_normal:
977                         ++num;
978                 }
979
980                 spin_unlock_bh(lock);
981                 cond_resched();
982         }
983
984 done:
985         cb->args[1] = i;
986         cb->args[2] = num;
987 out:
988         ;
989 }
990 EXPORT_SYMBOL_GPL(inet_diag_dump_icsk);
991
992 static int __inet_diag_dump(struct sk_buff *skb, struct netlink_callback *cb,
993                             const struct inet_diag_req_v2 *r,
994                             struct nlattr *bc)
995 {
996         const struct inet_diag_handler *handler;
997         int err = 0;
998
999         handler = inet_diag_lock_handler(r->sdiag_protocol);
1000         if (!IS_ERR(handler))
1001                 handler->dump(skb, cb, r, bc);
1002         else
1003                 err = PTR_ERR(handler);
1004         inet_diag_unlock_handler(handler);
1005
1006         return err ? : skb->len;
1007 }
1008
1009 static int inet_diag_dump(struct sk_buff *skb, struct netlink_callback *cb)
1010 {
1011         int hdrlen = sizeof(struct inet_diag_req_v2);
1012         struct nlattr *bc = NULL;
1013
1014         if (nlmsg_attrlen(cb->nlh, hdrlen))
1015                 bc = nlmsg_find_attr(cb->nlh, hdrlen, INET_DIAG_REQ_BYTECODE);
1016
1017         return __inet_diag_dump(skb, cb, nlmsg_data(cb->nlh), bc);
1018 }
1019
1020 static int inet_diag_type2proto(int type)
1021 {
1022         switch (type) {
1023         case TCPDIAG_GETSOCK:
1024                 return IPPROTO_TCP;
1025         case DCCPDIAG_GETSOCK:
1026                 return IPPROTO_DCCP;
1027         default:
1028                 return 0;
1029         }
1030 }
1031
1032 static int inet_diag_dump_compat(struct sk_buff *skb,
1033                                  struct netlink_callback *cb)
1034 {
1035         struct inet_diag_req *rc = nlmsg_data(cb->nlh);
1036         int hdrlen = sizeof(struct inet_diag_req);
1037         struct inet_diag_req_v2 req;
1038         struct nlattr *bc = NULL;
1039
1040         req.sdiag_family = AF_UNSPEC; /* compatibility */
1041         req.sdiag_protocol = inet_diag_type2proto(cb->nlh->nlmsg_type);
1042         req.idiag_ext = rc->idiag_ext;
1043         req.idiag_states = rc->idiag_states;
1044         req.id = rc->id;
1045
1046         if (nlmsg_attrlen(cb->nlh, hdrlen))
1047                 bc = nlmsg_find_attr(cb->nlh, hdrlen, INET_DIAG_REQ_BYTECODE);
1048
1049         return __inet_diag_dump(skb, cb, &req, bc);
1050 }
1051
1052 static int inet_diag_get_exact_compat(struct sk_buff *in_skb,
1053                                       const struct nlmsghdr *nlh)
1054 {
1055         struct inet_diag_req *rc = nlmsg_data(nlh);
1056         struct inet_diag_req_v2 req;
1057
1058         req.sdiag_family = rc->idiag_family;
1059         req.sdiag_protocol = inet_diag_type2proto(nlh->nlmsg_type);
1060         req.idiag_ext = rc->idiag_ext;
1061         req.idiag_states = rc->idiag_states;
1062         req.id = rc->id;
1063
1064         return inet_diag_cmd_exact(SOCK_DIAG_BY_FAMILY, in_skb, nlh, &req);
1065 }
1066
1067 static int inet_diag_rcv_msg_compat(struct sk_buff *skb, struct nlmsghdr *nlh)
1068 {
1069         int hdrlen = sizeof(struct inet_diag_req);
1070         struct net *net = sock_net(skb->sk);
1071
1072         if (nlh->nlmsg_type >= INET_DIAG_GETSOCK_MAX ||
1073             nlmsg_len(nlh) < hdrlen)
1074                 return -EINVAL;
1075
1076         if (nlh->nlmsg_flags & NLM_F_DUMP) {
1077                 if (nlmsg_attrlen(nlh, hdrlen)) {
1078                         struct nlattr *attr;
1079                         int err;
1080
1081                         attr = nlmsg_find_attr(nlh, hdrlen,
1082                                                INET_DIAG_REQ_BYTECODE);
1083                         err = inet_diag_bc_audit(attr, skb);
1084                         if (err)
1085                                 return err;
1086                 }
1087                 {
1088                         struct netlink_dump_control c = {
1089                                 .dump = inet_diag_dump_compat,
1090                         };
1091                         return netlink_dump_start(net->diag_nlsk, skb, nlh, &c);
1092                 }
1093         }
1094
1095         return inet_diag_get_exact_compat(skb, nlh);
1096 }
1097
1098 static int inet_diag_handler_cmd(struct sk_buff *skb, struct nlmsghdr *h)
1099 {
1100         int hdrlen = sizeof(struct inet_diag_req_v2);
1101         struct net *net = sock_net(skb->sk);
1102
1103         if (nlmsg_len(h) < hdrlen)
1104                 return -EINVAL;
1105
1106         if (h->nlmsg_type == SOCK_DIAG_BY_FAMILY &&
1107             h->nlmsg_flags & NLM_F_DUMP) {
1108                 if (nlmsg_attrlen(h, hdrlen)) {
1109                         struct nlattr *attr;
1110                         int err;
1111
1112                         attr = nlmsg_find_attr(h, hdrlen,
1113                                                INET_DIAG_REQ_BYTECODE);
1114                         err = inet_diag_bc_audit(attr, skb);
1115                         if (err)
1116                                 return err;
1117                 }
1118                 {
1119                         struct netlink_dump_control c = {
1120                                 .dump = inet_diag_dump,
1121                         };
1122                         return netlink_dump_start(net->diag_nlsk, skb, h, &c);
1123                 }
1124         }
1125
1126         return inet_diag_cmd_exact(h->nlmsg_type, skb, h, nlmsg_data(h));
1127 }
1128
1129 static
1130 int inet_diag_handler_get_info(struct sk_buff *skb, struct sock *sk)
1131 {
1132         const struct inet_diag_handler *handler;
1133         struct nlmsghdr *nlh;
1134         struct nlattr *attr;
1135         struct inet_diag_msg *r;
1136         void *info = NULL;
1137         int err = 0;
1138
1139         nlh = nlmsg_put(skb, 0, 0, SOCK_DIAG_BY_FAMILY, sizeof(*r), 0);
1140         if (!nlh)
1141                 return -ENOMEM;
1142
1143         r = nlmsg_data(nlh);
1144         memset(r, 0, sizeof(*r));
1145         inet_diag_msg_common_fill(r, sk);
1146         if (sk->sk_type == SOCK_DGRAM || sk->sk_type == SOCK_STREAM)
1147                 r->id.idiag_sport = inet_sk(sk)->inet_sport;
1148         r->idiag_state = sk->sk_state;
1149
1150         if ((err = nla_put_u8(skb, INET_DIAG_PROTOCOL, sk->sk_protocol))) {
1151                 nlmsg_cancel(skb, nlh);
1152                 return err;
1153         }
1154
1155         handler = inet_diag_lock_handler(sk->sk_protocol);
1156         if (IS_ERR(handler)) {
1157                 inet_diag_unlock_handler(handler);
1158                 nlmsg_cancel(skb, nlh);
1159                 return PTR_ERR(handler);
1160         }
1161
1162         attr = handler->idiag_info_size
1163                 ? nla_reserve_64bit(skb, INET_DIAG_INFO,
1164                                     handler->idiag_info_size,
1165                                     INET_DIAG_PAD)
1166                 : NULL;
1167         if (attr)
1168                 info = nla_data(attr);
1169
1170         handler->idiag_get_info(sk, r, info);
1171         inet_diag_unlock_handler(handler);
1172
1173         nlmsg_end(skb, nlh);
1174         return 0;
1175 }
1176
1177 static const struct sock_diag_handler inet_diag_handler = {
1178         .family = AF_INET,
1179         .dump = inet_diag_handler_cmd,
1180         .get_info = inet_diag_handler_get_info,
1181         .destroy = inet_diag_handler_cmd,
1182 };
1183
1184 static const struct sock_diag_handler inet6_diag_handler = {
1185         .family = AF_INET6,
1186         .dump = inet_diag_handler_cmd,
1187         .get_info = inet_diag_handler_get_info,
1188         .destroy = inet_diag_handler_cmd,
1189 };
1190
1191 int inet_diag_register(const struct inet_diag_handler *h)
1192 {
1193         const __u16 type = h->idiag_type;
1194         int err = -EINVAL;
1195
1196         if (type >= IPPROTO_MAX)
1197                 goto out;
1198
1199         mutex_lock(&inet_diag_table_mutex);
1200         err = -EEXIST;
1201         if (!inet_diag_table[type]) {
1202                 inet_diag_table[type] = h;
1203                 err = 0;
1204         }
1205         mutex_unlock(&inet_diag_table_mutex);
1206 out:
1207         return err;
1208 }
1209 EXPORT_SYMBOL_GPL(inet_diag_register);
1210
1211 void inet_diag_unregister(const struct inet_diag_handler *h)
1212 {
1213         const __u16 type = h->idiag_type;
1214
1215         if (type >= IPPROTO_MAX)
1216                 return;
1217
1218         mutex_lock(&inet_diag_table_mutex);
1219         inet_diag_table[type] = NULL;
1220         mutex_unlock(&inet_diag_table_mutex);
1221 }
1222 EXPORT_SYMBOL_GPL(inet_diag_unregister);
1223
1224 static int __init inet_diag_init(void)
1225 {
1226         const int inet_diag_table_size = (IPPROTO_MAX *
1227                                           sizeof(struct inet_diag_handler *));
1228         int err = -ENOMEM;
1229
1230         inet_diag_table = kzalloc(inet_diag_table_size, GFP_KERNEL);
1231         if (!inet_diag_table)
1232                 goto out;
1233
1234         err = sock_diag_register(&inet_diag_handler);
1235         if (err)
1236                 goto out_free_nl;
1237
1238         err = sock_diag_register(&inet6_diag_handler);
1239         if (err)
1240                 goto out_free_inet;
1241
1242         sock_diag_register_inet_compat(inet_diag_rcv_msg_compat);
1243 out:
1244         return err;
1245
1246 out_free_inet:
1247         sock_diag_unregister(&inet_diag_handler);
1248 out_free_nl:
1249         kfree(inet_diag_table);
1250         goto out;
1251 }
1252
1253 static void __exit inet_diag_exit(void)
1254 {
1255         sock_diag_unregister(&inet6_diag_handler);
1256         sock_diag_unregister(&inet_diag_handler);
1257         sock_diag_unregister_inet_compat(inet_diag_rcv_msg_compat);
1258         kfree(inet_diag_table);
1259 }
1260
1261 module_init(inet_diag_init);
1262 module_exit(inet_diag_exit);
1263 MODULE_LICENSE("GPL");
1264 MODULE_ALIAS_NET_PF_PROTO_TYPE(PF_NETLINK, NETLINK_SOCK_DIAG, 2 /* AF_INET */);
1265 MODULE_ALIAS_NET_PF_PROTO_TYPE(PF_NETLINK, NETLINK_SOCK_DIAG, 10 /* AF_INET6 */);