Merge tag 'linux_kselftest_active-fixes-6.6-rc7' of git://git.kernel.org/pub/scm...
[platform/kernel/linux-starfive.git] / net / mptcp / pm_netlink.c
1 // SPDX-License-Identifier: GPL-2.0
2 /* Multipath TCP
3  *
4  * Copyright (c) 2020, Red Hat, Inc.
5  */
6
7 #define pr_fmt(fmt) "MPTCP: " fmt
8
9 #include <linux/inet.h>
10 #include <linux/kernel.h>
11 #include <net/tcp.h>
12 #include <net/inet_common.h>
13 #include <net/netns/generic.h>
14 #include <net/mptcp.h>
15 #include <net/genetlink.h>
16 #include <uapi/linux/mptcp.h>
17
18 #include "protocol.h"
19 #include "mib.h"
20
21 /* forward declaration */
22 static struct genl_family mptcp_genl_family;
23
24 static int pm_nl_pernet_id;
25
26 struct mptcp_pm_add_entry {
27         struct list_head        list;
28         struct mptcp_addr_info  addr;
29         u8                      retrans_times;
30         struct timer_list       add_timer;
31         struct mptcp_sock       *sock;
32 };
33
34 struct pm_nl_pernet {
35         /* protects pernet updates */
36         spinlock_t              lock;
37         struct list_head        local_addr_list;
38         unsigned int            addrs;
39         unsigned int            stale_loss_cnt;
40         unsigned int            add_addr_signal_max;
41         unsigned int            add_addr_accept_max;
42         unsigned int            local_addr_max;
43         unsigned int            subflows_max;
44         unsigned int            next_id;
45         DECLARE_BITMAP(id_bitmap, MPTCP_PM_MAX_ADDR_ID + 1);
46 };
47
48 #define MPTCP_PM_ADDR_MAX       8
49 #define ADD_ADDR_RETRANS_MAX    3
50
51 static struct pm_nl_pernet *pm_nl_get_pernet(const struct net *net)
52 {
53         return net_generic(net, pm_nl_pernet_id);
54 }
55
56 static struct pm_nl_pernet *
57 pm_nl_get_pernet_from_msk(const struct mptcp_sock *msk)
58 {
59         return pm_nl_get_pernet(sock_net((struct sock *)msk));
60 }
61
62 bool mptcp_addresses_equal(const struct mptcp_addr_info *a,
63                            const struct mptcp_addr_info *b, bool use_port)
64 {
65         bool addr_equals = false;
66
67         if (a->family == b->family) {
68                 if (a->family == AF_INET)
69                         addr_equals = a->addr.s_addr == b->addr.s_addr;
70 #if IS_ENABLED(CONFIG_MPTCP_IPV6)
71                 else
72                         addr_equals = !ipv6_addr_cmp(&a->addr6, &b->addr6);
73         } else if (a->family == AF_INET) {
74                 if (ipv6_addr_v4mapped(&b->addr6))
75                         addr_equals = a->addr.s_addr == b->addr6.s6_addr32[3];
76         } else if (b->family == AF_INET) {
77                 if (ipv6_addr_v4mapped(&a->addr6))
78                         addr_equals = a->addr6.s6_addr32[3] == b->addr.s_addr;
79 #endif
80         }
81
82         if (!addr_equals)
83                 return false;
84         if (!use_port)
85                 return true;
86
87         return a->port == b->port;
88 }
89
90 void mptcp_local_address(const struct sock_common *skc, struct mptcp_addr_info *addr)
91 {
92         addr->family = skc->skc_family;
93         addr->port = htons(skc->skc_num);
94         if (addr->family == AF_INET)
95                 addr->addr.s_addr = skc->skc_rcv_saddr;
96 #if IS_ENABLED(CONFIG_MPTCP_IPV6)
97         else if (addr->family == AF_INET6)
98                 addr->addr6 = skc->skc_v6_rcv_saddr;
99 #endif
100 }
101
102 static void remote_address(const struct sock_common *skc,
103                            struct mptcp_addr_info *addr)
104 {
105         addr->family = skc->skc_family;
106         addr->port = skc->skc_dport;
107         if (addr->family == AF_INET)
108                 addr->addr.s_addr = skc->skc_daddr;
109 #if IS_ENABLED(CONFIG_MPTCP_IPV6)
110         else if (addr->family == AF_INET6)
111                 addr->addr6 = skc->skc_v6_daddr;
112 #endif
113 }
114
115 static bool lookup_subflow_by_saddr(const struct list_head *list,
116                                     const struct mptcp_addr_info *saddr)
117 {
118         struct mptcp_subflow_context *subflow;
119         struct mptcp_addr_info cur;
120         struct sock_common *skc;
121
122         list_for_each_entry(subflow, list, node) {
123                 skc = (struct sock_common *)mptcp_subflow_tcp_sock(subflow);
124
125                 mptcp_local_address(skc, &cur);
126                 if (mptcp_addresses_equal(&cur, saddr, saddr->port))
127                         return true;
128         }
129
130         return false;
131 }
132
133 static bool lookup_subflow_by_daddr(const struct list_head *list,
134                                     const struct mptcp_addr_info *daddr)
135 {
136         struct mptcp_subflow_context *subflow;
137         struct mptcp_addr_info cur;
138         struct sock_common *skc;
139
140         list_for_each_entry(subflow, list, node) {
141                 skc = (struct sock_common *)mptcp_subflow_tcp_sock(subflow);
142
143                 remote_address(skc, &cur);
144                 if (mptcp_addresses_equal(&cur, daddr, daddr->port))
145                         return true;
146         }
147
148         return false;
149 }
150
151 static struct mptcp_pm_addr_entry *
152 select_local_address(const struct pm_nl_pernet *pernet,
153                      const struct mptcp_sock *msk)
154 {
155         struct mptcp_pm_addr_entry *entry, *ret = NULL;
156
157         msk_owned_by_me(msk);
158
159         rcu_read_lock();
160         list_for_each_entry_rcu(entry, &pernet->local_addr_list, list) {
161                 if (!(entry->flags & MPTCP_PM_ADDR_FLAG_SUBFLOW))
162                         continue;
163
164                 if (!test_bit(entry->addr.id, msk->pm.id_avail_bitmap))
165                         continue;
166
167                 ret = entry;
168                 break;
169         }
170         rcu_read_unlock();
171         return ret;
172 }
173
174 static struct mptcp_pm_addr_entry *
175 select_signal_address(struct pm_nl_pernet *pernet, const struct mptcp_sock *msk)
176 {
177         struct mptcp_pm_addr_entry *entry, *ret = NULL;
178
179         rcu_read_lock();
180         /* do not keep any additional per socket state, just signal
181          * the address list in order.
182          * Note: removal from the local address list during the msk life-cycle
183          * can lead to additional addresses not being announced.
184          */
185         list_for_each_entry_rcu(entry, &pernet->local_addr_list, list) {
186                 if (!test_bit(entry->addr.id, msk->pm.id_avail_bitmap))
187                         continue;
188
189                 if (!(entry->flags & MPTCP_PM_ADDR_FLAG_SIGNAL))
190                         continue;
191
192                 ret = entry;
193                 break;
194         }
195         rcu_read_unlock();
196         return ret;
197 }
198
199 unsigned int mptcp_pm_get_add_addr_signal_max(const struct mptcp_sock *msk)
200 {
201         const struct pm_nl_pernet *pernet = pm_nl_get_pernet_from_msk(msk);
202
203         return READ_ONCE(pernet->add_addr_signal_max);
204 }
205 EXPORT_SYMBOL_GPL(mptcp_pm_get_add_addr_signal_max);
206
207 unsigned int mptcp_pm_get_add_addr_accept_max(const struct mptcp_sock *msk)
208 {
209         struct pm_nl_pernet *pernet = pm_nl_get_pernet_from_msk(msk);
210
211         return READ_ONCE(pernet->add_addr_accept_max);
212 }
213 EXPORT_SYMBOL_GPL(mptcp_pm_get_add_addr_accept_max);
214
215 unsigned int mptcp_pm_get_subflows_max(const struct mptcp_sock *msk)
216 {
217         struct pm_nl_pernet *pernet = pm_nl_get_pernet_from_msk(msk);
218
219         return READ_ONCE(pernet->subflows_max);
220 }
221 EXPORT_SYMBOL_GPL(mptcp_pm_get_subflows_max);
222
223 unsigned int mptcp_pm_get_local_addr_max(const struct mptcp_sock *msk)
224 {
225         struct pm_nl_pernet *pernet = pm_nl_get_pernet_from_msk(msk);
226
227         return READ_ONCE(pernet->local_addr_max);
228 }
229 EXPORT_SYMBOL_GPL(mptcp_pm_get_local_addr_max);
230
231 bool mptcp_pm_nl_check_work_pending(struct mptcp_sock *msk)
232 {
233         struct pm_nl_pernet *pernet = pm_nl_get_pernet_from_msk(msk);
234
235         if (msk->pm.subflows == mptcp_pm_get_subflows_max(msk) ||
236             (find_next_and_bit(pernet->id_bitmap, msk->pm.id_avail_bitmap,
237                                MPTCP_PM_MAX_ADDR_ID + 1, 0) == MPTCP_PM_MAX_ADDR_ID + 1)) {
238                 WRITE_ONCE(msk->pm.work_pending, false);
239                 return false;
240         }
241         return true;
242 }
243
244 struct mptcp_pm_add_entry *
245 mptcp_lookup_anno_list_by_saddr(const struct mptcp_sock *msk,
246                                 const struct mptcp_addr_info *addr)
247 {
248         struct mptcp_pm_add_entry *entry;
249
250         lockdep_assert_held(&msk->pm.lock);
251
252         list_for_each_entry(entry, &msk->pm.anno_list, list) {
253                 if (mptcp_addresses_equal(&entry->addr, addr, true))
254                         return entry;
255         }
256
257         return NULL;
258 }
259
260 bool mptcp_pm_sport_in_anno_list(struct mptcp_sock *msk, const struct sock *sk)
261 {
262         struct mptcp_pm_add_entry *entry;
263         struct mptcp_addr_info saddr;
264         bool ret = false;
265
266         mptcp_local_address((struct sock_common *)sk, &saddr);
267
268         spin_lock_bh(&msk->pm.lock);
269         list_for_each_entry(entry, &msk->pm.anno_list, list) {
270                 if (mptcp_addresses_equal(&entry->addr, &saddr, true)) {
271                         ret = true;
272                         goto out;
273                 }
274         }
275
276 out:
277         spin_unlock_bh(&msk->pm.lock);
278         return ret;
279 }
280
281 static void mptcp_pm_add_timer(struct timer_list *timer)
282 {
283         struct mptcp_pm_add_entry *entry = from_timer(entry, timer, add_timer);
284         struct mptcp_sock *msk = entry->sock;
285         struct sock *sk = (struct sock *)msk;
286
287         pr_debug("msk=%p", msk);
288
289         if (!msk)
290                 return;
291
292         if (inet_sk_state_load(sk) == TCP_CLOSE)
293                 return;
294
295         if (!entry->addr.id)
296                 return;
297
298         if (mptcp_pm_should_add_signal_addr(msk)) {
299                 sk_reset_timer(sk, timer, jiffies + TCP_RTO_MAX / 8);
300                 goto out;
301         }
302
303         spin_lock_bh(&msk->pm.lock);
304
305         if (!mptcp_pm_should_add_signal_addr(msk)) {
306                 pr_debug("retransmit ADD_ADDR id=%d", entry->addr.id);
307                 mptcp_pm_announce_addr(msk, &entry->addr, false);
308                 mptcp_pm_add_addr_send_ack(msk);
309                 entry->retrans_times++;
310         }
311
312         if (entry->retrans_times < ADD_ADDR_RETRANS_MAX)
313                 sk_reset_timer(sk, timer,
314                                jiffies + mptcp_get_add_addr_timeout(sock_net(sk)));
315
316         spin_unlock_bh(&msk->pm.lock);
317
318         if (entry->retrans_times == ADD_ADDR_RETRANS_MAX)
319                 mptcp_pm_subflow_established(msk);
320
321 out:
322         __sock_put(sk);
323 }
324
325 struct mptcp_pm_add_entry *
326 mptcp_pm_del_add_timer(struct mptcp_sock *msk,
327                        const struct mptcp_addr_info *addr, bool check_id)
328 {
329         struct mptcp_pm_add_entry *entry;
330         struct sock *sk = (struct sock *)msk;
331
332         spin_lock_bh(&msk->pm.lock);
333         entry = mptcp_lookup_anno_list_by_saddr(msk, addr);
334         if (entry && (!check_id || entry->addr.id == addr->id))
335                 entry->retrans_times = ADD_ADDR_RETRANS_MAX;
336         spin_unlock_bh(&msk->pm.lock);
337
338         if (entry && (!check_id || entry->addr.id == addr->id))
339                 sk_stop_timer_sync(sk, &entry->add_timer);
340
341         return entry;
342 }
343
344 bool mptcp_pm_alloc_anno_list(struct mptcp_sock *msk,
345                               const struct mptcp_addr_info *addr)
346 {
347         struct mptcp_pm_add_entry *add_entry = NULL;
348         struct sock *sk = (struct sock *)msk;
349         struct net *net = sock_net(sk);
350
351         lockdep_assert_held(&msk->pm.lock);
352
353         add_entry = mptcp_lookup_anno_list_by_saddr(msk, addr);
354
355         if (add_entry) {
356                 if (mptcp_pm_is_kernel(msk))
357                         return false;
358
359                 sk_reset_timer(sk, &add_entry->add_timer,
360                                jiffies + mptcp_get_add_addr_timeout(net));
361                 return true;
362         }
363
364         add_entry = kmalloc(sizeof(*add_entry), GFP_ATOMIC);
365         if (!add_entry)
366                 return false;
367
368         list_add(&add_entry->list, &msk->pm.anno_list);
369
370         add_entry->addr = *addr;
371         add_entry->sock = msk;
372         add_entry->retrans_times = 0;
373
374         timer_setup(&add_entry->add_timer, mptcp_pm_add_timer, 0);
375         sk_reset_timer(sk, &add_entry->add_timer,
376                        jiffies + mptcp_get_add_addr_timeout(net));
377
378         return true;
379 }
380
381 void mptcp_pm_free_anno_list(struct mptcp_sock *msk)
382 {
383         struct mptcp_pm_add_entry *entry, *tmp;
384         struct sock *sk = (struct sock *)msk;
385         LIST_HEAD(free_list);
386
387         pr_debug("msk=%p", msk);
388
389         spin_lock_bh(&msk->pm.lock);
390         list_splice_init(&msk->pm.anno_list, &free_list);
391         spin_unlock_bh(&msk->pm.lock);
392
393         list_for_each_entry_safe(entry, tmp, &free_list, list) {
394                 sk_stop_timer_sync(sk, &entry->add_timer);
395                 kfree(entry);
396         }
397 }
398
399 static bool lookup_address_in_vec(const struct mptcp_addr_info *addrs, unsigned int nr,
400                                   const struct mptcp_addr_info *addr)
401 {
402         int i;
403
404         for (i = 0; i < nr; i++) {
405                 if (addrs[i].id == addr->id)
406                         return true;
407         }
408
409         return false;
410 }
411
412 /* Fill all the remote addresses into the array addrs[],
413  * and return the array size.
414  */
415 static unsigned int fill_remote_addresses_vec(struct mptcp_sock *msk,
416                                               struct mptcp_addr_info *local,
417                                               bool fullmesh,
418                                               struct mptcp_addr_info *addrs)
419 {
420         bool deny_id0 = READ_ONCE(msk->pm.remote_deny_join_id0);
421         struct sock *sk = (struct sock *)msk, *ssk;
422         struct mptcp_subflow_context *subflow;
423         struct mptcp_addr_info remote = { 0 };
424         unsigned int subflows_max;
425         int i = 0;
426
427         subflows_max = mptcp_pm_get_subflows_max(msk);
428         remote_address((struct sock_common *)sk, &remote);
429
430         /* Non-fullmesh endpoint, fill in the single entry
431          * corresponding to the primary MPC subflow remote address
432          */
433         if (!fullmesh) {
434                 if (deny_id0)
435                         return 0;
436
437                 if (!mptcp_pm_addr_families_match(sk, local, &remote))
438                         return 0;
439
440                 msk->pm.subflows++;
441                 addrs[i++] = remote;
442         } else {
443                 mptcp_for_each_subflow(msk, subflow) {
444                         ssk = mptcp_subflow_tcp_sock(subflow);
445                         remote_address((struct sock_common *)ssk, &addrs[i]);
446                         addrs[i].id = subflow->remote_id;
447                         if (deny_id0 && !addrs[i].id)
448                                 continue;
449
450                         if (!mptcp_pm_addr_families_match(sk, local, &addrs[i]))
451                                 continue;
452
453                         if (!lookup_address_in_vec(addrs, i, &addrs[i]) &&
454                             msk->pm.subflows < subflows_max) {
455                                 msk->pm.subflows++;
456                                 i++;
457                         }
458                 }
459         }
460
461         return i;
462 }
463
464 static void __mptcp_pm_send_ack(struct mptcp_sock *msk, struct mptcp_subflow_context *subflow,
465                                 bool prio, bool backup)
466 {
467         struct sock *ssk = mptcp_subflow_tcp_sock(subflow);
468         bool slow;
469
470         pr_debug("send ack for %s",
471                  prio ? "mp_prio" : (mptcp_pm_should_add_signal(msk) ? "add_addr" : "rm_addr"));
472
473         slow = lock_sock_fast(ssk);
474         if (prio) {
475                 subflow->send_mp_prio = 1;
476                 subflow->backup = backup;
477                 subflow->request_bkup = backup;
478         }
479
480         __mptcp_subflow_send_ack(ssk);
481         unlock_sock_fast(ssk, slow);
482 }
483
484 static void mptcp_pm_send_ack(struct mptcp_sock *msk, struct mptcp_subflow_context *subflow,
485                               bool prio, bool backup)
486 {
487         spin_unlock_bh(&msk->pm.lock);
488         __mptcp_pm_send_ack(msk, subflow, prio, backup);
489         spin_lock_bh(&msk->pm.lock);
490 }
491
492 static struct mptcp_pm_addr_entry *
493 __lookup_addr_by_id(struct pm_nl_pernet *pernet, unsigned int id)
494 {
495         struct mptcp_pm_addr_entry *entry;
496
497         list_for_each_entry(entry, &pernet->local_addr_list, list) {
498                 if (entry->addr.id == id)
499                         return entry;
500         }
501         return NULL;
502 }
503
504 static struct mptcp_pm_addr_entry *
505 __lookup_addr(struct pm_nl_pernet *pernet, const struct mptcp_addr_info *info,
506               bool lookup_by_id)
507 {
508         struct mptcp_pm_addr_entry *entry;
509
510         list_for_each_entry(entry, &pernet->local_addr_list, list) {
511                 if ((!lookup_by_id &&
512                      mptcp_addresses_equal(&entry->addr, info, entry->addr.port)) ||
513                     (lookup_by_id && entry->addr.id == info->id))
514                         return entry;
515         }
516         return NULL;
517 }
518
519 static void mptcp_pm_create_subflow_or_signal_addr(struct mptcp_sock *msk)
520 {
521         struct sock *sk = (struct sock *)msk;
522         struct mptcp_pm_addr_entry *local;
523         unsigned int add_addr_signal_max;
524         unsigned int local_addr_max;
525         struct pm_nl_pernet *pernet;
526         unsigned int subflows_max;
527
528         pernet = pm_nl_get_pernet(sock_net(sk));
529
530         add_addr_signal_max = mptcp_pm_get_add_addr_signal_max(msk);
531         local_addr_max = mptcp_pm_get_local_addr_max(msk);
532         subflows_max = mptcp_pm_get_subflows_max(msk);
533
534         /* do lazy endpoint usage accounting for the MPC subflows */
535         if (unlikely(!(msk->pm.status & BIT(MPTCP_PM_MPC_ENDPOINT_ACCOUNTED))) && msk->first) {
536                 struct mptcp_subflow_context *subflow = mptcp_subflow_ctx(msk->first);
537                 struct mptcp_pm_addr_entry *entry;
538                 struct mptcp_addr_info mpc_addr;
539                 bool backup = false;
540
541                 mptcp_local_address((struct sock_common *)msk->first, &mpc_addr);
542                 rcu_read_lock();
543                 entry = __lookup_addr(pernet, &mpc_addr, false);
544                 if (entry) {
545                         __clear_bit(entry->addr.id, msk->pm.id_avail_bitmap);
546                         msk->mpc_endpoint_id = entry->addr.id;
547                         backup = !!(entry->flags & MPTCP_PM_ADDR_FLAG_BACKUP);
548                 }
549                 rcu_read_unlock();
550
551                 if (backup)
552                         mptcp_pm_send_ack(msk, subflow, true, backup);
553
554                 msk->pm.status |= BIT(MPTCP_PM_MPC_ENDPOINT_ACCOUNTED);
555         }
556
557         pr_debug("local %d:%d signal %d:%d subflows %d:%d\n",
558                  msk->pm.local_addr_used, local_addr_max,
559                  msk->pm.add_addr_signaled, add_addr_signal_max,
560                  msk->pm.subflows, subflows_max);
561
562         /* check first for announce */
563         if (msk->pm.add_addr_signaled < add_addr_signal_max) {
564                 local = select_signal_address(pernet, msk);
565
566                 /* due to racing events on both ends we can reach here while
567                  * previous add address is still running: if we invoke now
568                  * mptcp_pm_announce_addr(), that will fail and the
569                  * corresponding id will be marked as used.
570                  * Instead let the PM machinery reschedule us when the
571                  * current address announce will be completed.
572                  */
573                 if (msk->pm.addr_signal & BIT(MPTCP_ADD_ADDR_SIGNAL))
574                         return;
575
576                 if (local) {
577                         if (mptcp_pm_alloc_anno_list(msk, &local->addr)) {
578                                 __clear_bit(local->addr.id, msk->pm.id_avail_bitmap);
579                                 msk->pm.add_addr_signaled++;
580                                 mptcp_pm_announce_addr(msk, &local->addr, false);
581                                 mptcp_pm_nl_addr_send_ack(msk);
582                         }
583                 }
584         }
585
586         /* check if should create a new subflow */
587         while (msk->pm.local_addr_used < local_addr_max &&
588                msk->pm.subflows < subflows_max) {
589                 struct mptcp_addr_info addrs[MPTCP_PM_ADDR_MAX];
590                 bool fullmesh;
591                 int i, nr;
592
593                 local = select_local_address(pernet, msk);
594                 if (!local)
595                         break;
596
597                 fullmesh = !!(local->flags & MPTCP_PM_ADDR_FLAG_FULLMESH);
598
599                 msk->pm.local_addr_used++;
600                 __clear_bit(local->addr.id, msk->pm.id_avail_bitmap);
601                 nr = fill_remote_addresses_vec(msk, &local->addr, fullmesh, addrs);
602                 if (nr == 0)
603                         continue;
604
605                 spin_unlock_bh(&msk->pm.lock);
606                 for (i = 0; i < nr; i++)
607                         __mptcp_subflow_connect(sk, &local->addr, &addrs[i]);
608                 spin_lock_bh(&msk->pm.lock);
609         }
610         mptcp_pm_nl_check_work_pending(msk);
611 }
612
613 static void mptcp_pm_nl_fully_established(struct mptcp_sock *msk)
614 {
615         mptcp_pm_create_subflow_or_signal_addr(msk);
616 }
617
618 static void mptcp_pm_nl_subflow_established(struct mptcp_sock *msk)
619 {
620         mptcp_pm_create_subflow_or_signal_addr(msk);
621 }
622
623 /* Fill all the local addresses into the array addrs[],
624  * and return the array size.
625  */
626 static unsigned int fill_local_addresses_vec(struct mptcp_sock *msk,
627                                              struct mptcp_addr_info *remote,
628                                              struct mptcp_addr_info *addrs)
629 {
630         struct sock *sk = (struct sock *)msk;
631         struct mptcp_pm_addr_entry *entry;
632         struct pm_nl_pernet *pernet;
633         unsigned int subflows_max;
634         int i = 0;
635
636         pernet = pm_nl_get_pernet_from_msk(msk);
637         subflows_max = mptcp_pm_get_subflows_max(msk);
638
639         rcu_read_lock();
640         list_for_each_entry_rcu(entry, &pernet->local_addr_list, list) {
641                 if (!(entry->flags & MPTCP_PM_ADDR_FLAG_FULLMESH))
642                         continue;
643
644                 if (!mptcp_pm_addr_families_match(sk, &entry->addr, remote))
645                         continue;
646
647                 if (msk->pm.subflows < subflows_max) {
648                         msk->pm.subflows++;
649                         addrs[i++] = entry->addr;
650                 }
651         }
652         rcu_read_unlock();
653
654         /* If the array is empty, fill in the single
655          * 'IPADDRANY' local address
656          */
657         if (!i) {
658                 struct mptcp_addr_info local;
659
660                 memset(&local, 0, sizeof(local));
661                 local.family =
662 #if IS_ENABLED(CONFIG_MPTCP_IPV6)
663                                remote->family == AF_INET6 &&
664                                ipv6_addr_v4mapped(&remote->addr6) ? AF_INET :
665 #endif
666                                remote->family;
667
668                 if (!mptcp_pm_addr_families_match(sk, &local, remote))
669                         return 0;
670
671                 msk->pm.subflows++;
672                 addrs[i++] = local;
673         }
674
675         return i;
676 }
677
678 static void mptcp_pm_nl_add_addr_received(struct mptcp_sock *msk)
679 {
680         struct mptcp_addr_info addrs[MPTCP_PM_ADDR_MAX];
681         struct sock *sk = (struct sock *)msk;
682         unsigned int add_addr_accept_max;
683         struct mptcp_addr_info remote;
684         unsigned int subflows_max;
685         int i, nr;
686
687         add_addr_accept_max = mptcp_pm_get_add_addr_accept_max(msk);
688         subflows_max = mptcp_pm_get_subflows_max(msk);
689
690         pr_debug("accepted %d:%d remote family %d",
691                  msk->pm.add_addr_accepted, add_addr_accept_max,
692                  msk->pm.remote.family);
693
694         remote = msk->pm.remote;
695         mptcp_pm_announce_addr(msk, &remote, true);
696         mptcp_pm_nl_addr_send_ack(msk);
697
698         if (lookup_subflow_by_daddr(&msk->conn_list, &remote))
699                 return;
700
701         /* pick id 0 port, if none is provided the remote address */
702         if (!remote.port)
703                 remote.port = sk->sk_dport;
704
705         /* connect to the specified remote address, using whatever
706          * local address the routing configuration will pick.
707          */
708         nr = fill_local_addresses_vec(msk, &remote, addrs);
709         if (nr == 0)
710                 return;
711
712         msk->pm.add_addr_accepted++;
713         if (msk->pm.add_addr_accepted >= add_addr_accept_max ||
714             msk->pm.subflows >= subflows_max)
715                 WRITE_ONCE(msk->pm.accept_addr, false);
716
717         spin_unlock_bh(&msk->pm.lock);
718         for (i = 0; i < nr; i++)
719                 __mptcp_subflow_connect(sk, &addrs[i], &remote);
720         spin_lock_bh(&msk->pm.lock);
721 }
722
723 void mptcp_pm_nl_addr_send_ack(struct mptcp_sock *msk)
724 {
725         struct mptcp_subflow_context *subflow;
726
727         msk_owned_by_me(msk);
728         lockdep_assert_held(&msk->pm.lock);
729
730         if (!mptcp_pm_should_add_signal(msk) &&
731             !mptcp_pm_should_rm_signal(msk))
732                 return;
733
734         subflow = list_first_entry_or_null(&msk->conn_list, typeof(*subflow), node);
735         if (subflow)
736                 mptcp_pm_send_ack(msk, subflow, false, false);
737 }
738
739 int mptcp_pm_nl_mp_prio_send_ack(struct mptcp_sock *msk,
740                                  struct mptcp_addr_info *addr,
741                                  struct mptcp_addr_info *rem,
742                                  u8 bkup)
743 {
744         struct mptcp_subflow_context *subflow;
745
746         pr_debug("bkup=%d", bkup);
747
748         mptcp_for_each_subflow(msk, subflow) {
749                 struct sock *ssk = mptcp_subflow_tcp_sock(subflow);
750                 struct mptcp_addr_info local, remote;
751
752                 mptcp_local_address((struct sock_common *)ssk, &local);
753                 if (!mptcp_addresses_equal(&local, addr, addr->port))
754                         continue;
755
756                 if (rem && rem->family != AF_UNSPEC) {
757                         remote_address((struct sock_common *)ssk, &remote);
758                         if (!mptcp_addresses_equal(&remote, rem, rem->port))
759                                 continue;
760                 }
761
762                 __mptcp_pm_send_ack(msk, subflow, true, bkup);
763                 return 0;
764         }
765
766         return -EINVAL;
767 }
768
769 static bool mptcp_local_id_match(const struct mptcp_sock *msk, u8 local_id, u8 id)
770 {
771         return local_id == id || (!local_id && msk->mpc_endpoint_id == id);
772 }
773
774 static void mptcp_pm_nl_rm_addr_or_subflow(struct mptcp_sock *msk,
775                                            const struct mptcp_rm_list *rm_list,
776                                            enum linux_mptcp_mib_field rm_type)
777 {
778         struct mptcp_subflow_context *subflow, *tmp;
779         struct sock *sk = (struct sock *)msk;
780         u8 i;
781
782         pr_debug("%s rm_list_nr %d",
783                  rm_type == MPTCP_MIB_RMADDR ? "address" : "subflow", rm_list->nr);
784
785         msk_owned_by_me(msk);
786
787         if (sk->sk_state == TCP_LISTEN)
788                 return;
789
790         if (!rm_list->nr)
791                 return;
792
793         if (list_empty(&msk->conn_list))
794                 return;
795
796         for (i = 0; i < rm_list->nr; i++) {
797                 u8 rm_id = rm_list->ids[i];
798                 bool removed = false;
799
800                 mptcp_for_each_subflow_safe(msk, subflow, tmp) {
801                         struct sock *ssk = mptcp_subflow_tcp_sock(subflow);
802                         int how = RCV_SHUTDOWN | SEND_SHUTDOWN;
803                         u8 id = subflow->local_id;
804
805                         if (rm_type == MPTCP_MIB_RMADDR && subflow->remote_id != rm_id)
806                                 continue;
807                         if (rm_type == MPTCP_MIB_RMSUBFLOW && !mptcp_local_id_match(msk, id, rm_id))
808                                 continue;
809
810                         pr_debug(" -> %s rm_list_ids[%d]=%u local_id=%u remote_id=%u mpc_id=%u",
811                                  rm_type == MPTCP_MIB_RMADDR ? "address" : "subflow",
812                                  i, rm_id, subflow->local_id, subflow->remote_id,
813                                  msk->mpc_endpoint_id);
814                         spin_unlock_bh(&msk->pm.lock);
815                         mptcp_subflow_shutdown(sk, ssk, how);
816
817                         /* the following takes care of updating the subflows counter */
818                         mptcp_close_ssk(sk, ssk, subflow);
819                         spin_lock_bh(&msk->pm.lock);
820
821                         removed = true;
822                         __MPTCP_INC_STATS(sock_net(sk), rm_type);
823                 }
824                 if (rm_type == MPTCP_MIB_RMSUBFLOW)
825                         __set_bit(rm_id ? rm_id : msk->mpc_endpoint_id, msk->pm.id_avail_bitmap);
826                 if (!removed)
827                         continue;
828
829                 if (!mptcp_pm_is_kernel(msk))
830                         continue;
831
832                 if (rm_type == MPTCP_MIB_RMADDR) {
833                         msk->pm.add_addr_accepted--;
834                         WRITE_ONCE(msk->pm.accept_addr, true);
835                 } else if (rm_type == MPTCP_MIB_RMSUBFLOW) {
836                         msk->pm.local_addr_used--;
837                 }
838         }
839 }
840
841 static void mptcp_pm_nl_rm_addr_received(struct mptcp_sock *msk)
842 {
843         mptcp_pm_nl_rm_addr_or_subflow(msk, &msk->pm.rm_list_rx, MPTCP_MIB_RMADDR);
844 }
845
846 void mptcp_pm_nl_rm_subflow_received(struct mptcp_sock *msk,
847                                      const struct mptcp_rm_list *rm_list)
848 {
849         mptcp_pm_nl_rm_addr_or_subflow(msk, rm_list, MPTCP_MIB_RMSUBFLOW);
850 }
851
852 void mptcp_pm_nl_work(struct mptcp_sock *msk)
853 {
854         struct mptcp_pm_data *pm = &msk->pm;
855
856         msk_owned_by_me(msk);
857
858         if (!(pm->status & MPTCP_PM_WORK_MASK))
859                 return;
860
861         spin_lock_bh(&msk->pm.lock);
862
863         pr_debug("msk=%p status=%x", msk, pm->status);
864         if (pm->status & BIT(MPTCP_PM_ADD_ADDR_RECEIVED)) {
865                 pm->status &= ~BIT(MPTCP_PM_ADD_ADDR_RECEIVED);
866                 mptcp_pm_nl_add_addr_received(msk);
867         }
868         if (pm->status & BIT(MPTCP_PM_ADD_ADDR_SEND_ACK)) {
869                 pm->status &= ~BIT(MPTCP_PM_ADD_ADDR_SEND_ACK);
870                 mptcp_pm_nl_addr_send_ack(msk);
871         }
872         if (pm->status & BIT(MPTCP_PM_RM_ADDR_RECEIVED)) {
873                 pm->status &= ~BIT(MPTCP_PM_RM_ADDR_RECEIVED);
874                 mptcp_pm_nl_rm_addr_received(msk);
875         }
876         if (pm->status & BIT(MPTCP_PM_ESTABLISHED)) {
877                 pm->status &= ~BIT(MPTCP_PM_ESTABLISHED);
878                 mptcp_pm_nl_fully_established(msk);
879         }
880         if (pm->status & BIT(MPTCP_PM_SUBFLOW_ESTABLISHED)) {
881                 pm->status &= ~BIT(MPTCP_PM_SUBFLOW_ESTABLISHED);
882                 mptcp_pm_nl_subflow_established(msk);
883         }
884
885         spin_unlock_bh(&msk->pm.lock);
886 }
887
888 static bool address_use_port(struct mptcp_pm_addr_entry *entry)
889 {
890         return (entry->flags &
891                 (MPTCP_PM_ADDR_FLAG_SIGNAL | MPTCP_PM_ADDR_FLAG_SUBFLOW)) ==
892                 MPTCP_PM_ADDR_FLAG_SIGNAL;
893 }
894
895 /* caller must ensure the RCU grace period is already elapsed */
896 static void __mptcp_pm_release_addr_entry(struct mptcp_pm_addr_entry *entry)
897 {
898         if (entry->lsk)
899                 sock_release(entry->lsk);
900         kfree(entry);
901 }
902
903 static int mptcp_pm_nl_append_new_local_addr(struct pm_nl_pernet *pernet,
904                                              struct mptcp_pm_addr_entry *entry)
905 {
906         struct mptcp_pm_addr_entry *cur, *del_entry = NULL;
907         unsigned int addr_max;
908         int ret = -EINVAL;
909
910         spin_lock_bh(&pernet->lock);
911         /* to keep the code simple, don't do IDR-like allocation for address ID,
912          * just bail when we exceed limits
913          */
914         if (pernet->next_id == MPTCP_PM_MAX_ADDR_ID)
915                 pernet->next_id = 1;
916         if (pernet->addrs >= MPTCP_PM_ADDR_MAX) {
917                 ret = -ERANGE;
918                 goto out;
919         }
920         if (test_bit(entry->addr.id, pernet->id_bitmap)) {
921                 ret = -EBUSY;
922                 goto out;
923         }
924
925         /* do not insert duplicate address, differentiate on port only
926          * singled addresses
927          */
928         if (!address_use_port(entry))
929                 entry->addr.port = 0;
930         list_for_each_entry(cur, &pernet->local_addr_list, list) {
931                 if (mptcp_addresses_equal(&cur->addr, &entry->addr,
932                                           cur->addr.port || entry->addr.port)) {
933                         /* allow replacing the exiting endpoint only if such
934                          * endpoint is an implicit one and the user-space
935                          * did not provide an endpoint id
936                          */
937                         if (!(cur->flags & MPTCP_PM_ADDR_FLAG_IMPLICIT)) {
938                                 ret = -EEXIST;
939                                 goto out;
940                         }
941                         if (entry->addr.id)
942                                 goto out;
943
944                         pernet->addrs--;
945                         entry->addr.id = cur->addr.id;
946                         list_del_rcu(&cur->list);
947                         del_entry = cur;
948                         break;
949                 }
950         }
951
952         if (!entry->addr.id) {
953 find_next:
954                 entry->addr.id = find_next_zero_bit(pernet->id_bitmap,
955                                                     MPTCP_PM_MAX_ADDR_ID + 1,
956                                                     pernet->next_id);
957                 if (!entry->addr.id && pernet->next_id != 1) {
958                         pernet->next_id = 1;
959                         goto find_next;
960                 }
961         }
962
963         if (!entry->addr.id)
964                 goto out;
965
966         __set_bit(entry->addr.id, pernet->id_bitmap);
967         if (entry->addr.id > pernet->next_id)
968                 pernet->next_id = entry->addr.id;
969
970         if (entry->flags & MPTCP_PM_ADDR_FLAG_SIGNAL) {
971                 addr_max = pernet->add_addr_signal_max;
972                 WRITE_ONCE(pernet->add_addr_signal_max, addr_max + 1);
973         }
974         if (entry->flags & MPTCP_PM_ADDR_FLAG_SUBFLOW) {
975                 addr_max = pernet->local_addr_max;
976                 WRITE_ONCE(pernet->local_addr_max, addr_max + 1);
977         }
978
979         pernet->addrs++;
980         if (!entry->addr.port)
981                 list_add_tail_rcu(&entry->list, &pernet->local_addr_list);
982         else
983                 list_add_rcu(&entry->list, &pernet->local_addr_list);
984         ret = entry->addr.id;
985
986 out:
987         spin_unlock_bh(&pernet->lock);
988
989         /* just replaced an existing entry, free it */
990         if (del_entry) {
991                 synchronize_rcu();
992                 __mptcp_pm_release_addr_entry(del_entry);
993         }
994         return ret;
995 }
996
997 static struct lock_class_key mptcp_slock_keys[2];
998 static struct lock_class_key mptcp_keys[2];
999
1000 static int mptcp_pm_nl_create_listen_socket(struct sock *sk,
1001                                             struct mptcp_pm_addr_entry *entry)
1002 {
1003         bool is_ipv6 = sk->sk_family == AF_INET6;
1004         int addrlen = sizeof(struct sockaddr_in);
1005         struct sockaddr_storage addr;
1006         struct sock *newsk, *ssk;
1007         int backlog = 1024;
1008         int err;
1009
1010         err = sock_create_kern(sock_net(sk), entry->addr.family,
1011                                SOCK_STREAM, IPPROTO_MPTCP, &entry->lsk);
1012         if (err)
1013                 return err;
1014
1015         newsk = entry->lsk->sk;
1016         if (!newsk)
1017                 return -EINVAL;
1018
1019         /* The subflow socket lock is acquired in a nested to the msk one
1020          * in several places, even by the TCP stack, and this msk is a kernel
1021          * socket: lockdep complains. Instead of propagating the _nested
1022          * modifiers in several places, re-init the lock class for the msk
1023          * socket to an mptcp specific one.
1024          */
1025         sock_lock_init_class_and_name(newsk,
1026                                       is_ipv6 ? "mlock-AF_INET6" : "mlock-AF_INET",
1027                                       &mptcp_slock_keys[is_ipv6],
1028                                       is_ipv6 ? "msk_lock-AF_INET6" : "msk_lock-AF_INET",
1029                                       &mptcp_keys[is_ipv6]);
1030
1031         lock_sock(newsk);
1032         ssk = __mptcp_nmpc_sk(mptcp_sk(newsk));
1033         release_sock(newsk);
1034         if (IS_ERR(ssk))
1035                 return PTR_ERR(ssk);
1036
1037         mptcp_info2sockaddr(&entry->addr, &addr, entry->addr.family);
1038 #if IS_ENABLED(CONFIG_MPTCP_IPV6)
1039         if (entry->addr.family == AF_INET6)
1040                 addrlen = sizeof(struct sockaddr_in6);
1041 #endif
1042         if (ssk->sk_family == AF_INET)
1043                 err = inet_bind_sk(ssk, (struct sockaddr *)&addr, addrlen);
1044 #if IS_ENABLED(CONFIG_MPTCP_IPV6)
1045         else if (ssk->sk_family == AF_INET6)
1046                 err = inet6_bind_sk(ssk, (struct sockaddr *)&addr, addrlen);
1047 #endif
1048         if (err)
1049                 return err;
1050
1051         inet_sk_state_store(newsk, TCP_LISTEN);
1052         lock_sock(ssk);
1053         err = __inet_listen_sk(ssk, backlog);
1054         if (!err)
1055                 mptcp_event_pm_listener(ssk, MPTCP_EVENT_LISTENER_CREATED);
1056         release_sock(ssk);
1057         return err;
1058 }
1059
1060 int mptcp_pm_nl_get_local_id(struct mptcp_sock *msk, struct mptcp_addr_info *skc)
1061 {
1062         struct mptcp_pm_addr_entry *entry;
1063         struct pm_nl_pernet *pernet;
1064         int ret = -1;
1065
1066         pernet = pm_nl_get_pernet_from_msk(msk);
1067
1068         rcu_read_lock();
1069         list_for_each_entry_rcu(entry, &pernet->local_addr_list, list) {
1070                 if (mptcp_addresses_equal(&entry->addr, skc, entry->addr.port)) {
1071                         ret = entry->addr.id;
1072                         break;
1073                 }
1074         }
1075         rcu_read_unlock();
1076         if (ret >= 0)
1077                 return ret;
1078
1079         /* address not found, add to local list */
1080         entry = kmalloc(sizeof(*entry), GFP_ATOMIC);
1081         if (!entry)
1082                 return -ENOMEM;
1083
1084         entry->addr = *skc;
1085         entry->addr.id = 0;
1086         entry->addr.port = 0;
1087         entry->ifindex = 0;
1088         entry->flags = MPTCP_PM_ADDR_FLAG_IMPLICIT;
1089         entry->lsk = NULL;
1090         ret = mptcp_pm_nl_append_new_local_addr(pernet, entry);
1091         if (ret < 0)
1092                 kfree(entry);
1093
1094         return ret;
1095 }
1096
1097 #define MPTCP_PM_CMD_GRP_OFFSET       0
1098 #define MPTCP_PM_EV_GRP_OFFSET        1
1099
1100 static const struct genl_multicast_group mptcp_pm_mcgrps[] = {
1101         [MPTCP_PM_CMD_GRP_OFFSET]       = { .name = MPTCP_PM_CMD_GRP_NAME, },
1102         [MPTCP_PM_EV_GRP_OFFSET]        = { .name = MPTCP_PM_EV_GRP_NAME,
1103                                             .flags = GENL_UNS_ADMIN_PERM,
1104                                           },
1105 };
1106
1107 static const struct nla_policy
1108 mptcp_pm_addr_policy[MPTCP_PM_ADDR_ATTR_MAX + 1] = {
1109         [MPTCP_PM_ADDR_ATTR_FAMILY]     = { .type       = NLA_U16,      },
1110         [MPTCP_PM_ADDR_ATTR_ID]         = { .type       = NLA_U8,       },
1111         [MPTCP_PM_ADDR_ATTR_ADDR4]      = { .type       = NLA_U32,      },
1112         [MPTCP_PM_ADDR_ATTR_ADDR6]      =
1113                 NLA_POLICY_EXACT_LEN(sizeof(struct in6_addr)),
1114         [MPTCP_PM_ADDR_ATTR_PORT]       = { .type       = NLA_U16       },
1115         [MPTCP_PM_ADDR_ATTR_FLAGS]      = { .type       = NLA_U32       },
1116         [MPTCP_PM_ADDR_ATTR_IF_IDX]     = { .type       = NLA_S32       },
1117 };
1118
1119 static const struct nla_policy mptcp_pm_policy[MPTCP_PM_ATTR_MAX + 1] = {
1120         [MPTCP_PM_ATTR_ADDR]            =
1121                                         NLA_POLICY_NESTED(mptcp_pm_addr_policy),
1122         [MPTCP_PM_ATTR_RCV_ADD_ADDRS]   = { .type       = NLA_U32,      },
1123         [MPTCP_PM_ATTR_SUBFLOWS]        = { .type       = NLA_U32,      },
1124         [MPTCP_PM_ATTR_TOKEN]           = { .type       = NLA_U32,      },
1125         [MPTCP_PM_ATTR_LOC_ID]          = { .type       = NLA_U8,       },
1126         [MPTCP_PM_ATTR_ADDR_REMOTE]     =
1127                                         NLA_POLICY_NESTED(mptcp_pm_addr_policy),
1128 };
1129
1130 void mptcp_pm_nl_subflow_chk_stale(const struct mptcp_sock *msk, struct sock *ssk)
1131 {
1132         struct mptcp_subflow_context *iter, *subflow = mptcp_subflow_ctx(ssk);
1133         struct sock *sk = (struct sock *)msk;
1134         unsigned int active_max_loss_cnt;
1135         struct net *net = sock_net(sk);
1136         unsigned int stale_loss_cnt;
1137         bool slow;
1138
1139         stale_loss_cnt = mptcp_stale_loss_cnt(net);
1140         if (subflow->stale || !stale_loss_cnt || subflow->stale_count <= stale_loss_cnt)
1141                 return;
1142
1143         /* look for another available subflow not in loss state */
1144         active_max_loss_cnt = max_t(int, stale_loss_cnt - 1, 1);
1145         mptcp_for_each_subflow(msk, iter) {
1146                 if (iter != subflow && mptcp_subflow_active(iter) &&
1147                     iter->stale_count < active_max_loss_cnt) {
1148                         /* we have some alternatives, try to mark this subflow as idle ...*/
1149                         slow = lock_sock_fast(ssk);
1150                         if (!tcp_rtx_and_write_queues_empty(ssk)) {
1151                                 subflow->stale = 1;
1152                                 __mptcp_retransmit_pending_data(sk);
1153                                 MPTCP_INC_STATS(net, MPTCP_MIB_SUBFLOWSTALE);
1154                         }
1155                         unlock_sock_fast(ssk, slow);
1156
1157                         /* always try to push the pending data regardless of re-injections:
1158                          * we can possibly use backup subflows now, and subflow selection
1159                          * is cheap under the msk socket lock
1160                          */
1161                         __mptcp_push_pending(sk, 0);
1162                         return;
1163                 }
1164         }
1165 }
1166
1167 static int mptcp_pm_family_to_addr(int family)
1168 {
1169 #if IS_ENABLED(CONFIG_MPTCP_IPV6)
1170         if (family == AF_INET6)
1171                 return MPTCP_PM_ADDR_ATTR_ADDR6;
1172 #endif
1173         return MPTCP_PM_ADDR_ATTR_ADDR4;
1174 }
1175
1176 static int mptcp_pm_parse_pm_addr_attr(struct nlattr *tb[],
1177                                        const struct nlattr *attr,
1178                                        struct genl_info *info,
1179                                        struct mptcp_addr_info *addr,
1180                                        bool require_family)
1181 {
1182         int err, addr_addr;
1183
1184         if (!attr) {
1185                 GENL_SET_ERR_MSG(info, "missing address info");
1186                 return -EINVAL;
1187         }
1188
1189         /* no validation needed - was already done via nested policy */
1190         err = nla_parse_nested_deprecated(tb, MPTCP_PM_ADDR_ATTR_MAX, attr,
1191                                           mptcp_pm_addr_policy, info->extack);
1192         if (err)
1193                 return err;
1194
1195         if (tb[MPTCP_PM_ADDR_ATTR_ID])
1196                 addr->id = nla_get_u8(tb[MPTCP_PM_ADDR_ATTR_ID]);
1197
1198         if (!tb[MPTCP_PM_ADDR_ATTR_FAMILY]) {
1199                 if (!require_family)
1200                         return 0;
1201
1202                 NL_SET_ERR_MSG_ATTR(info->extack, attr,
1203                                     "missing family");
1204                 return -EINVAL;
1205         }
1206
1207         addr->family = nla_get_u16(tb[MPTCP_PM_ADDR_ATTR_FAMILY]);
1208         if (addr->family != AF_INET
1209 #if IS_ENABLED(CONFIG_MPTCP_IPV6)
1210             && addr->family != AF_INET6
1211 #endif
1212             ) {
1213                 NL_SET_ERR_MSG_ATTR(info->extack, attr,
1214                                     "unknown address family");
1215                 return -EINVAL;
1216         }
1217         addr_addr = mptcp_pm_family_to_addr(addr->family);
1218         if (!tb[addr_addr]) {
1219                 NL_SET_ERR_MSG_ATTR(info->extack, attr,
1220                                     "missing address data");
1221                 return -EINVAL;
1222         }
1223
1224 #if IS_ENABLED(CONFIG_MPTCP_IPV6)
1225         if (addr->family == AF_INET6)
1226                 addr->addr6 = nla_get_in6_addr(tb[addr_addr]);
1227         else
1228 #endif
1229                 addr->addr.s_addr = nla_get_in_addr(tb[addr_addr]);
1230
1231         if (tb[MPTCP_PM_ADDR_ATTR_PORT])
1232                 addr->port = htons(nla_get_u16(tb[MPTCP_PM_ADDR_ATTR_PORT]));
1233
1234         return 0;
1235 }
1236
1237 int mptcp_pm_parse_addr(struct nlattr *attr, struct genl_info *info,
1238                         struct mptcp_addr_info *addr)
1239 {
1240         struct nlattr *tb[MPTCP_PM_ADDR_ATTR_MAX + 1];
1241
1242         memset(addr, 0, sizeof(*addr));
1243
1244         return mptcp_pm_parse_pm_addr_attr(tb, attr, info, addr, true);
1245 }
1246
1247 int mptcp_pm_parse_entry(struct nlattr *attr, struct genl_info *info,
1248                          bool require_family,
1249                          struct mptcp_pm_addr_entry *entry)
1250 {
1251         struct nlattr *tb[MPTCP_PM_ADDR_ATTR_MAX + 1];
1252         int err;
1253
1254         memset(entry, 0, sizeof(*entry));
1255
1256         err = mptcp_pm_parse_pm_addr_attr(tb, attr, info, &entry->addr, require_family);
1257         if (err)
1258                 return err;
1259
1260         if (tb[MPTCP_PM_ADDR_ATTR_IF_IDX]) {
1261                 u32 val = nla_get_s32(tb[MPTCP_PM_ADDR_ATTR_IF_IDX]);
1262
1263                 entry->ifindex = val;
1264         }
1265
1266         if (tb[MPTCP_PM_ADDR_ATTR_FLAGS])
1267                 entry->flags = nla_get_u32(tb[MPTCP_PM_ADDR_ATTR_FLAGS]);
1268
1269         if (tb[MPTCP_PM_ADDR_ATTR_PORT])
1270                 entry->addr.port = htons(nla_get_u16(tb[MPTCP_PM_ADDR_ATTR_PORT]));
1271
1272         return 0;
1273 }
1274
1275 static struct pm_nl_pernet *genl_info_pm_nl(struct genl_info *info)
1276 {
1277         return pm_nl_get_pernet(genl_info_net(info));
1278 }
1279
1280 static int mptcp_nl_add_subflow_or_signal_addr(struct net *net)
1281 {
1282         struct mptcp_sock *msk;
1283         long s_slot = 0, s_num = 0;
1284
1285         while ((msk = mptcp_token_iter_next(net, &s_slot, &s_num)) != NULL) {
1286                 struct sock *sk = (struct sock *)msk;
1287
1288                 if (!READ_ONCE(msk->fully_established) ||
1289                     mptcp_pm_is_userspace(msk))
1290                         goto next;
1291
1292                 lock_sock(sk);
1293                 spin_lock_bh(&msk->pm.lock);
1294                 mptcp_pm_create_subflow_or_signal_addr(msk);
1295                 spin_unlock_bh(&msk->pm.lock);
1296                 release_sock(sk);
1297
1298 next:
1299                 sock_put(sk);
1300                 cond_resched();
1301         }
1302
1303         return 0;
1304 }
1305
1306 static int mptcp_nl_cmd_add_addr(struct sk_buff *skb, struct genl_info *info)
1307 {
1308         struct nlattr *attr = info->attrs[MPTCP_PM_ATTR_ADDR];
1309         struct pm_nl_pernet *pernet = genl_info_pm_nl(info);
1310         struct mptcp_pm_addr_entry addr, *entry;
1311         int ret;
1312
1313         ret = mptcp_pm_parse_entry(attr, info, true, &addr);
1314         if (ret < 0)
1315                 return ret;
1316
1317         if (addr.addr.port && !(addr.flags & MPTCP_PM_ADDR_FLAG_SIGNAL)) {
1318                 GENL_SET_ERR_MSG(info, "flags must have signal when using port");
1319                 return -EINVAL;
1320         }
1321
1322         if (addr.flags & MPTCP_PM_ADDR_FLAG_SIGNAL &&
1323             addr.flags & MPTCP_PM_ADDR_FLAG_FULLMESH) {
1324                 GENL_SET_ERR_MSG(info, "flags mustn't have both signal and fullmesh");
1325                 return -EINVAL;
1326         }
1327
1328         if (addr.flags & MPTCP_PM_ADDR_FLAG_IMPLICIT) {
1329                 GENL_SET_ERR_MSG(info, "can't create IMPLICIT endpoint");
1330                 return -EINVAL;
1331         }
1332
1333         entry = kzalloc(sizeof(*entry), GFP_KERNEL_ACCOUNT);
1334         if (!entry) {
1335                 GENL_SET_ERR_MSG(info, "can't allocate addr");
1336                 return -ENOMEM;
1337         }
1338
1339         *entry = addr;
1340         if (entry->addr.port) {
1341                 ret = mptcp_pm_nl_create_listen_socket(skb->sk, entry);
1342                 if (ret) {
1343                         GENL_SET_ERR_MSG_FMT(info, "create listen socket error: %d", ret);
1344                         goto out_free;
1345                 }
1346         }
1347         ret = mptcp_pm_nl_append_new_local_addr(pernet, entry);
1348         if (ret < 0) {
1349                 GENL_SET_ERR_MSG_FMT(info, "too many addresses or duplicate one: %d", ret);
1350                 goto out_free;
1351         }
1352
1353         mptcp_nl_add_subflow_or_signal_addr(sock_net(skb->sk));
1354         return 0;
1355
1356 out_free:
1357         __mptcp_pm_release_addr_entry(entry);
1358         return ret;
1359 }
1360
1361 int mptcp_pm_nl_get_flags_and_ifindex_by_id(struct mptcp_sock *msk, unsigned int id,
1362                                             u8 *flags, int *ifindex)
1363 {
1364         struct mptcp_pm_addr_entry *entry;
1365         struct sock *sk = (struct sock *)msk;
1366         struct net *net = sock_net(sk);
1367
1368         rcu_read_lock();
1369         entry = __lookup_addr_by_id(pm_nl_get_pernet(net), id);
1370         if (entry) {
1371                 *flags = entry->flags;
1372                 *ifindex = entry->ifindex;
1373         }
1374         rcu_read_unlock();
1375
1376         return 0;
1377 }
1378
1379 static bool remove_anno_list_by_saddr(struct mptcp_sock *msk,
1380                                       const struct mptcp_addr_info *addr)
1381 {
1382         struct mptcp_pm_add_entry *entry;
1383
1384         entry = mptcp_pm_del_add_timer(msk, addr, false);
1385         if (entry) {
1386                 list_del(&entry->list);
1387                 kfree(entry);
1388                 return true;
1389         }
1390
1391         return false;
1392 }
1393
1394 static bool mptcp_pm_remove_anno_addr(struct mptcp_sock *msk,
1395                                       const struct mptcp_addr_info *addr,
1396                                       bool force)
1397 {
1398         struct mptcp_rm_list list = { .nr = 0 };
1399         bool ret;
1400
1401         list.ids[list.nr++] = addr->id;
1402
1403         ret = remove_anno_list_by_saddr(msk, addr);
1404         if (ret || force) {
1405                 spin_lock_bh(&msk->pm.lock);
1406                 mptcp_pm_remove_addr(msk, &list);
1407                 spin_unlock_bh(&msk->pm.lock);
1408         }
1409         return ret;
1410 }
1411
1412 static int mptcp_nl_remove_subflow_and_signal_addr(struct net *net,
1413                                                    const struct mptcp_pm_addr_entry *entry)
1414 {
1415         const struct mptcp_addr_info *addr = &entry->addr;
1416         struct mptcp_rm_list list = { .nr = 0 };
1417         long s_slot = 0, s_num = 0;
1418         struct mptcp_sock *msk;
1419
1420         pr_debug("remove_id=%d", addr->id);
1421
1422         list.ids[list.nr++] = addr->id;
1423
1424         while ((msk = mptcp_token_iter_next(net, &s_slot, &s_num)) != NULL) {
1425                 struct sock *sk = (struct sock *)msk;
1426                 bool remove_subflow;
1427
1428                 if (mptcp_pm_is_userspace(msk))
1429                         goto next;
1430
1431                 if (list_empty(&msk->conn_list)) {
1432                         mptcp_pm_remove_anno_addr(msk, addr, false);
1433                         goto next;
1434                 }
1435
1436                 lock_sock(sk);
1437                 remove_subflow = lookup_subflow_by_saddr(&msk->conn_list, addr);
1438                 mptcp_pm_remove_anno_addr(msk, addr, remove_subflow &&
1439                                           !(entry->flags & MPTCP_PM_ADDR_FLAG_IMPLICIT));
1440                 if (remove_subflow)
1441                         mptcp_pm_remove_subflow(msk, &list);
1442                 release_sock(sk);
1443
1444 next:
1445                 sock_put(sk);
1446                 cond_resched();
1447         }
1448
1449         return 0;
1450 }
1451
1452 static int mptcp_nl_remove_id_zero_address(struct net *net,
1453                                            struct mptcp_addr_info *addr)
1454 {
1455         struct mptcp_rm_list list = { .nr = 0 };
1456         long s_slot = 0, s_num = 0;
1457         struct mptcp_sock *msk;
1458
1459         list.ids[list.nr++] = 0;
1460
1461         while ((msk = mptcp_token_iter_next(net, &s_slot, &s_num)) != NULL) {
1462                 struct sock *sk = (struct sock *)msk;
1463                 struct mptcp_addr_info msk_local;
1464
1465                 if (list_empty(&msk->conn_list) || mptcp_pm_is_userspace(msk))
1466                         goto next;
1467
1468                 mptcp_local_address((struct sock_common *)msk, &msk_local);
1469                 if (!mptcp_addresses_equal(&msk_local, addr, addr->port))
1470                         goto next;
1471
1472                 lock_sock(sk);
1473                 spin_lock_bh(&msk->pm.lock);
1474                 mptcp_pm_remove_addr(msk, &list);
1475                 mptcp_pm_nl_rm_subflow_received(msk, &list);
1476                 spin_unlock_bh(&msk->pm.lock);
1477                 release_sock(sk);
1478
1479 next:
1480                 sock_put(sk);
1481                 cond_resched();
1482         }
1483
1484         return 0;
1485 }
1486
1487 static int mptcp_nl_cmd_del_addr(struct sk_buff *skb, struct genl_info *info)
1488 {
1489         struct nlattr *attr = info->attrs[MPTCP_PM_ATTR_ADDR];
1490         struct pm_nl_pernet *pernet = genl_info_pm_nl(info);
1491         struct mptcp_pm_addr_entry addr, *entry;
1492         unsigned int addr_max;
1493         int ret;
1494
1495         ret = mptcp_pm_parse_entry(attr, info, false, &addr);
1496         if (ret < 0)
1497                 return ret;
1498
1499         /* the zero id address is special: the first address used by the msk
1500          * always gets such an id, so different subflows can have different zero
1501          * id addresses. Additionally zero id is not accounted for in id_bitmap.
1502          * Let's use an 'mptcp_rm_list' instead of the common remove code.
1503          */
1504         if (addr.addr.id == 0)
1505                 return mptcp_nl_remove_id_zero_address(sock_net(skb->sk), &addr.addr);
1506
1507         spin_lock_bh(&pernet->lock);
1508         entry = __lookup_addr_by_id(pernet, addr.addr.id);
1509         if (!entry) {
1510                 GENL_SET_ERR_MSG(info, "address not found");
1511                 spin_unlock_bh(&pernet->lock);
1512                 return -EINVAL;
1513         }
1514         if (entry->flags & MPTCP_PM_ADDR_FLAG_SIGNAL) {
1515                 addr_max = pernet->add_addr_signal_max;
1516                 WRITE_ONCE(pernet->add_addr_signal_max, addr_max - 1);
1517         }
1518         if (entry->flags & MPTCP_PM_ADDR_FLAG_SUBFLOW) {
1519                 addr_max = pernet->local_addr_max;
1520                 WRITE_ONCE(pernet->local_addr_max, addr_max - 1);
1521         }
1522
1523         pernet->addrs--;
1524         list_del_rcu(&entry->list);
1525         __clear_bit(entry->addr.id, pernet->id_bitmap);
1526         spin_unlock_bh(&pernet->lock);
1527
1528         mptcp_nl_remove_subflow_and_signal_addr(sock_net(skb->sk), entry);
1529         synchronize_rcu();
1530         __mptcp_pm_release_addr_entry(entry);
1531
1532         return ret;
1533 }
1534
1535 void mptcp_pm_remove_addrs(struct mptcp_sock *msk, struct list_head *rm_list)
1536 {
1537         struct mptcp_rm_list alist = { .nr = 0 };
1538         struct mptcp_pm_addr_entry *entry;
1539
1540         list_for_each_entry(entry, rm_list, list) {
1541                 remove_anno_list_by_saddr(msk, &entry->addr);
1542                 if (alist.nr < MPTCP_RM_IDS_MAX)
1543                         alist.ids[alist.nr++] = entry->addr.id;
1544         }
1545
1546         if (alist.nr) {
1547                 spin_lock_bh(&msk->pm.lock);
1548                 mptcp_pm_remove_addr(msk, &alist);
1549                 spin_unlock_bh(&msk->pm.lock);
1550         }
1551 }
1552
1553 void mptcp_pm_remove_addrs_and_subflows(struct mptcp_sock *msk,
1554                                         struct list_head *rm_list)
1555 {
1556         struct mptcp_rm_list alist = { .nr = 0 }, slist = { .nr = 0 };
1557         struct mptcp_pm_addr_entry *entry;
1558
1559         list_for_each_entry(entry, rm_list, list) {
1560                 if (lookup_subflow_by_saddr(&msk->conn_list, &entry->addr) &&
1561                     slist.nr < MPTCP_RM_IDS_MAX)
1562                         slist.ids[slist.nr++] = entry->addr.id;
1563
1564                 if (remove_anno_list_by_saddr(msk, &entry->addr) &&
1565                     alist.nr < MPTCP_RM_IDS_MAX)
1566                         alist.ids[alist.nr++] = entry->addr.id;
1567         }
1568
1569         if (alist.nr) {
1570                 spin_lock_bh(&msk->pm.lock);
1571                 mptcp_pm_remove_addr(msk, &alist);
1572                 spin_unlock_bh(&msk->pm.lock);
1573         }
1574         if (slist.nr)
1575                 mptcp_pm_remove_subflow(msk, &slist);
1576 }
1577
1578 static void mptcp_nl_remove_addrs_list(struct net *net,
1579                                        struct list_head *rm_list)
1580 {
1581         long s_slot = 0, s_num = 0;
1582         struct mptcp_sock *msk;
1583
1584         if (list_empty(rm_list))
1585                 return;
1586
1587         while ((msk = mptcp_token_iter_next(net, &s_slot, &s_num)) != NULL) {
1588                 struct sock *sk = (struct sock *)msk;
1589
1590                 if (!mptcp_pm_is_userspace(msk)) {
1591                         lock_sock(sk);
1592                         mptcp_pm_remove_addrs_and_subflows(msk, rm_list);
1593                         release_sock(sk);
1594                 }
1595
1596                 sock_put(sk);
1597                 cond_resched();
1598         }
1599 }
1600
1601 /* caller must ensure the RCU grace period is already elapsed */
1602 static void __flush_addrs(struct list_head *list)
1603 {
1604         while (!list_empty(list)) {
1605                 struct mptcp_pm_addr_entry *cur;
1606
1607                 cur = list_entry(list->next,
1608                                  struct mptcp_pm_addr_entry, list);
1609                 list_del_rcu(&cur->list);
1610                 __mptcp_pm_release_addr_entry(cur);
1611         }
1612 }
1613
1614 static void __reset_counters(struct pm_nl_pernet *pernet)
1615 {
1616         WRITE_ONCE(pernet->add_addr_signal_max, 0);
1617         WRITE_ONCE(pernet->add_addr_accept_max, 0);
1618         WRITE_ONCE(pernet->local_addr_max, 0);
1619         pernet->addrs = 0;
1620 }
1621
1622 static int mptcp_nl_cmd_flush_addrs(struct sk_buff *skb, struct genl_info *info)
1623 {
1624         struct pm_nl_pernet *pernet = genl_info_pm_nl(info);
1625         LIST_HEAD(free_list);
1626
1627         spin_lock_bh(&pernet->lock);
1628         list_splice_init(&pernet->local_addr_list, &free_list);
1629         __reset_counters(pernet);
1630         pernet->next_id = 1;
1631         bitmap_zero(pernet->id_bitmap, MPTCP_PM_MAX_ADDR_ID + 1);
1632         spin_unlock_bh(&pernet->lock);
1633         mptcp_nl_remove_addrs_list(sock_net(skb->sk), &free_list);
1634         synchronize_rcu();
1635         __flush_addrs(&free_list);
1636         return 0;
1637 }
1638
1639 static int mptcp_nl_fill_addr(struct sk_buff *skb,
1640                               struct mptcp_pm_addr_entry *entry)
1641 {
1642         struct mptcp_addr_info *addr = &entry->addr;
1643         struct nlattr *attr;
1644
1645         attr = nla_nest_start(skb, MPTCP_PM_ATTR_ADDR);
1646         if (!attr)
1647                 return -EMSGSIZE;
1648
1649         if (nla_put_u16(skb, MPTCP_PM_ADDR_ATTR_FAMILY, addr->family))
1650                 goto nla_put_failure;
1651         if (nla_put_u16(skb, MPTCP_PM_ADDR_ATTR_PORT, ntohs(addr->port)))
1652                 goto nla_put_failure;
1653         if (nla_put_u8(skb, MPTCP_PM_ADDR_ATTR_ID, addr->id))
1654                 goto nla_put_failure;
1655         if (nla_put_u32(skb, MPTCP_PM_ADDR_ATTR_FLAGS, entry->flags))
1656                 goto nla_put_failure;
1657         if (entry->ifindex &&
1658             nla_put_s32(skb, MPTCP_PM_ADDR_ATTR_IF_IDX, entry->ifindex))
1659                 goto nla_put_failure;
1660
1661         if (addr->family == AF_INET &&
1662             nla_put_in_addr(skb, MPTCP_PM_ADDR_ATTR_ADDR4,
1663                             addr->addr.s_addr))
1664                 goto nla_put_failure;
1665 #if IS_ENABLED(CONFIG_MPTCP_IPV6)
1666         else if (addr->family == AF_INET6 &&
1667                  nla_put_in6_addr(skb, MPTCP_PM_ADDR_ATTR_ADDR6, &addr->addr6))
1668                 goto nla_put_failure;
1669 #endif
1670         nla_nest_end(skb, attr);
1671         return 0;
1672
1673 nla_put_failure:
1674         nla_nest_cancel(skb, attr);
1675         return -EMSGSIZE;
1676 }
1677
1678 static int mptcp_nl_cmd_get_addr(struct sk_buff *skb, struct genl_info *info)
1679 {
1680         struct nlattr *attr = info->attrs[MPTCP_PM_ATTR_ADDR];
1681         struct pm_nl_pernet *pernet = genl_info_pm_nl(info);
1682         struct mptcp_pm_addr_entry addr, *entry;
1683         struct sk_buff *msg;
1684         void *reply;
1685         int ret;
1686
1687         ret = mptcp_pm_parse_entry(attr, info, false, &addr);
1688         if (ret < 0)
1689                 return ret;
1690
1691         msg = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_KERNEL);
1692         if (!msg)
1693                 return -ENOMEM;
1694
1695         reply = genlmsg_put_reply(msg, info, &mptcp_genl_family, 0,
1696                                   info->genlhdr->cmd);
1697         if (!reply) {
1698                 GENL_SET_ERR_MSG(info, "not enough space in Netlink message");
1699                 ret = -EMSGSIZE;
1700                 goto fail;
1701         }
1702
1703         spin_lock_bh(&pernet->lock);
1704         entry = __lookup_addr_by_id(pernet, addr.addr.id);
1705         if (!entry) {
1706                 GENL_SET_ERR_MSG(info, "address not found");
1707                 ret = -EINVAL;
1708                 goto unlock_fail;
1709         }
1710
1711         ret = mptcp_nl_fill_addr(msg, entry);
1712         if (ret)
1713                 goto unlock_fail;
1714
1715         genlmsg_end(msg, reply);
1716         ret = genlmsg_reply(msg, info);
1717         spin_unlock_bh(&pernet->lock);
1718         return ret;
1719
1720 unlock_fail:
1721         spin_unlock_bh(&pernet->lock);
1722
1723 fail:
1724         nlmsg_free(msg);
1725         return ret;
1726 }
1727
1728 static int mptcp_nl_cmd_dump_addrs(struct sk_buff *msg,
1729                                    struct netlink_callback *cb)
1730 {
1731         struct net *net = sock_net(msg->sk);
1732         struct mptcp_pm_addr_entry *entry;
1733         struct pm_nl_pernet *pernet;
1734         int id = cb->args[0];
1735         void *hdr;
1736         int i;
1737
1738         pernet = pm_nl_get_pernet(net);
1739
1740         spin_lock_bh(&pernet->lock);
1741         for (i = id; i < MPTCP_PM_MAX_ADDR_ID + 1; i++) {
1742                 if (test_bit(i, pernet->id_bitmap)) {
1743                         entry = __lookup_addr_by_id(pernet, i);
1744                         if (!entry)
1745                                 break;
1746
1747                         if (entry->addr.id <= id)
1748                                 continue;
1749
1750                         hdr = genlmsg_put(msg, NETLINK_CB(cb->skb).portid,
1751                                           cb->nlh->nlmsg_seq, &mptcp_genl_family,
1752                                           NLM_F_MULTI, MPTCP_PM_CMD_GET_ADDR);
1753                         if (!hdr)
1754                                 break;
1755
1756                         if (mptcp_nl_fill_addr(msg, entry) < 0) {
1757                                 genlmsg_cancel(msg, hdr);
1758                                 break;
1759                         }
1760
1761                         id = entry->addr.id;
1762                         genlmsg_end(msg, hdr);
1763                 }
1764         }
1765         spin_unlock_bh(&pernet->lock);
1766
1767         cb->args[0] = id;
1768         return msg->len;
1769 }
1770
1771 static int parse_limit(struct genl_info *info, int id, unsigned int *limit)
1772 {
1773         struct nlattr *attr = info->attrs[id];
1774
1775         if (!attr)
1776                 return 0;
1777
1778         *limit = nla_get_u32(attr);
1779         if (*limit > MPTCP_PM_ADDR_MAX) {
1780                 GENL_SET_ERR_MSG(info, "limit greater than maximum");
1781                 return -EINVAL;
1782         }
1783         return 0;
1784 }
1785
1786 static int
1787 mptcp_nl_cmd_set_limits(struct sk_buff *skb, struct genl_info *info)
1788 {
1789         struct pm_nl_pernet *pernet = genl_info_pm_nl(info);
1790         unsigned int rcv_addrs, subflows;
1791         int ret;
1792
1793         spin_lock_bh(&pernet->lock);
1794         rcv_addrs = pernet->add_addr_accept_max;
1795         ret = parse_limit(info, MPTCP_PM_ATTR_RCV_ADD_ADDRS, &rcv_addrs);
1796         if (ret)
1797                 goto unlock;
1798
1799         subflows = pernet->subflows_max;
1800         ret = parse_limit(info, MPTCP_PM_ATTR_SUBFLOWS, &subflows);
1801         if (ret)
1802                 goto unlock;
1803
1804         WRITE_ONCE(pernet->add_addr_accept_max, rcv_addrs);
1805         WRITE_ONCE(pernet->subflows_max, subflows);
1806
1807 unlock:
1808         spin_unlock_bh(&pernet->lock);
1809         return ret;
1810 }
1811
1812 static int
1813 mptcp_nl_cmd_get_limits(struct sk_buff *skb, struct genl_info *info)
1814 {
1815         struct pm_nl_pernet *pernet = genl_info_pm_nl(info);
1816         struct sk_buff *msg;
1817         void *reply;
1818
1819         msg = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_KERNEL);
1820         if (!msg)
1821                 return -ENOMEM;
1822
1823         reply = genlmsg_put_reply(msg, info, &mptcp_genl_family, 0,
1824                                   MPTCP_PM_CMD_GET_LIMITS);
1825         if (!reply)
1826                 goto fail;
1827
1828         if (nla_put_u32(msg, MPTCP_PM_ATTR_RCV_ADD_ADDRS,
1829                         READ_ONCE(pernet->add_addr_accept_max)))
1830                 goto fail;
1831
1832         if (nla_put_u32(msg, MPTCP_PM_ATTR_SUBFLOWS,
1833                         READ_ONCE(pernet->subflows_max)))
1834                 goto fail;
1835
1836         genlmsg_end(msg, reply);
1837         return genlmsg_reply(msg, info);
1838
1839 fail:
1840         GENL_SET_ERR_MSG(info, "not enough space in Netlink message");
1841         nlmsg_free(msg);
1842         return -EMSGSIZE;
1843 }
1844
1845 static void mptcp_pm_nl_fullmesh(struct mptcp_sock *msk,
1846                                  struct mptcp_addr_info *addr)
1847 {
1848         struct mptcp_rm_list list = { .nr = 0 };
1849
1850         list.ids[list.nr++] = addr->id;
1851
1852         spin_lock_bh(&msk->pm.lock);
1853         mptcp_pm_nl_rm_subflow_received(msk, &list);
1854         mptcp_pm_create_subflow_or_signal_addr(msk);
1855         spin_unlock_bh(&msk->pm.lock);
1856 }
1857
1858 static int mptcp_nl_set_flags(struct net *net,
1859                               struct mptcp_addr_info *addr,
1860                               u8 bkup, u8 changed)
1861 {
1862         long s_slot = 0, s_num = 0;
1863         struct mptcp_sock *msk;
1864         int ret = -EINVAL;
1865
1866         while ((msk = mptcp_token_iter_next(net, &s_slot, &s_num)) != NULL) {
1867                 struct sock *sk = (struct sock *)msk;
1868
1869                 if (list_empty(&msk->conn_list) || mptcp_pm_is_userspace(msk))
1870                         goto next;
1871
1872                 lock_sock(sk);
1873                 if (changed & MPTCP_PM_ADDR_FLAG_BACKUP)
1874                         ret = mptcp_pm_nl_mp_prio_send_ack(msk, addr, NULL, bkup);
1875                 if (changed & MPTCP_PM_ADDR_FLAG_FULLMESH)
1876                         mptcp_pm_nl_fullmesh(msk, addr);
1877                 release_sock(sk);
1878
1879 next:
1880                 sock_put(sk);
1881                 cond_resched();
1882         }
1883
1884         return ret;
1885 }
1886
1887 int mptcp_pm_nl_set_flags(struct net *net, struct mptcp_pm_addr_entry *addr, u8 bkup)
1888 {
1889         struct pm_nl_pernet *pernet = pm_nl_get_pernet(net);
1890         u8 changed, mask = MPTCP_PM_ADDR_FLAG_BACKUP |
1891                            MPTCP_PM_ADDR_FLAG_FULLMESH;
1892         struct mptcp_pm_addr_entry *entry;
1893         u8 lookup_by_id = 0;
1894
1895         if (addr->addr.family == AF_UNSPEC) {
1896                 lookup_by_id = 1;
1897                 if (!addr->addr.id)
1898                         return -EOPNOTSUPP;
1899         }
1900
1901         spin_lock_bh(&pernet->lock);
1902         entry = __lookup_addr(pernet, &addr->addr, lookup_by_id);
1903         if (!entry) {
1904                 spin_unlock_bh(&pernet->lock);
1905                 return -EINVAL;
1906         }
1907         if ((addr->flags & MPTCP_PM_ADDR_FLAG_FULLMESH) &&
1908             (entry->flags & MPTCP_PM_ADDR_FLAG_SIGNAL)) {
1909                 spin_unlock_bh(&pernet->lock);
1910                 return -EINVAL;
1911         }
1912
1913         changed = (addr->flags ^ entry->flags) & mask;
1914         entry->flags = (entry->flags & ~mask) | (addr->flags & mask);
1915         *addr = *entry;
1916         spin_unlock_bh(&pernet->lock);
1917
1918         mptcp_nl_set_flags(net, &addr->addr, bkup, changed);
1919         return 0;
1920 }
1921
1922 static int mptcp_nl_cmd_set_flags(struct sk_buff *skb, struct genl_info *info)
1923 {
1924         struct mptcp_pm_addr_entry remote = { .addr = { .family = AF_UNSPEC }, };
1925         struct mptcp_pm_addr_entry addr = { .addr = { .family = AF_UNSPEC }, };
1926         struct nlattr *attr_rem = info->attrs[MPTCP_PM_ATTR_ADDR_REMOTE];
1927         struct nlattr *token = info->attrs[MPTCP_PM_ATTR_TOKEN];
1928         struct nlattr *attr = info->attrs[MPTCP_PM_ATTR_ADDR];
1929         struct net *net = sock_net(skb->sk);
1930         u8 bkup = 0;
1931         int ret;
1932
1933         ret = mptcp_pm_parse_entry(attr, info, false, &addr);
1934         if (ret < 0)
1935                 return ret;
1936
1937         if (attr_rem) {
1938                 ret = mptcp_pm_parse_entry(attr_rem, info, false, &remote);
1939                 if (ret < 0)
1940                         return ret;
1941         }
1942
1943         if (addr.flags & MPTCP_PM_ADDR_FLAG_BACKUP)
1944                 bkup = 1;
1945
1946         return mptcp_pm_set_flags(net, token, &addr, &remote, bkup);
1947 }
1948
1949 static void mptcp_nl_mcast_send(struct net *net, struct sk_buff *nlskb, gfp_t gfp)
1950 {
1951         genlmsg_multicast_netns(&mptcp_genl_family, net,
1952                                 nlskb, 0, MPTCP_PM_EV_GRP_OFFSET, gfp);
1953 }
1954
1955 bool mptcp_userspace_pm_active(const struct mptcp_sock *msk)
1956 {
1957         return genl_has_listeners(&mptcp_genl_family,
1958                                   sock_net((const struct sock *)msk),
1959                                   MPTCP_PM_EV_GRP_OFFSET);
1960 }
1961
1962 static int mptcp_event_add_subflow(struct sk_buff *skb, const struct sock *ssk)
1963 {
1964         const struct inet_sock *issk = inet_sk(ssk);
1965         const struct mptcp_subflow_context *sf;
1966
1967         if (nla_put_u16(skb, MPTCP_ATTR_FAMILY, ssk->sk_family))
1968                 return -EMSGSIZE;
1969
1970         switch (ssk->sk_family) {
1971         case AF_INET:
1972                 if (nla_put_in_addr(skb, MPTCP_ATTR_SADDR4, issk->inet_saddr))
1973                         return -EMSGSIZE;
1974                 if (nla_put_in_addr(skb, MPTCP_ATTR_DADDR4, issk->inet_daddr))
1975                         return -EMSGSIZE;
1976                 break;
1977 #if IS_ENABLED(CONFIG_MPTCP_IPV6)
1978         case AF_INET6: {
1979                 const struct ipv6_pinfo *np = inet6_sk(ssk);
1980
1981                 if (nla_put_in6_addr(skb, MPTCP_ATTR_SADDR6, &np->saddr))
1982                         return -EMSGSIZE;
1983                 if (nla_put_in6_addr(skb, MPTCP_ATTR_DADDR6, &ssk->sk_v6_daddr))
1984                         return -EMSGSIZE;
1985                 break;
1986         }
1987 #endif
1988         default:
1989                 WARN_ON_ONCE(1);
1990                 return -EMSGSIZE;
1991         }
1992
1993         if (nla_put_be16(skb, MPTCP_ATTR_SPORT, issk->inet_sport))
1994                 return -EMSGSIZE;
1995         if (nla_put_be16(skb, MPTCP_ATTR_DPORT, issk->inet_dport))
1996                 return -EMSGSIZE;
1997
1998         sf = mptcp_subflow_ctx(ssk);
1999         if (WARN_ON_ONCE(!sf))
2000                 return -EINVAL;
2001
2002         if (nla_put_u8(skb, MPTCP_ATTR_LOC_ID, sf->local_id))
2003                 return -EMSGSIZE;
2004
2005         if (nla_put_u8(skb, MPTCP_ATTR_REM_ID, sf->remote_id))
2006                 return -EMSGSIZE;
2007
2008         return 0;
2009 }
2010
2011 static int mptcp_event_put_token_and_ssk(struct sk_buff *skb,
2012                                          const struct mptcp_sock *msk,
2013                                          const struct sock *ssk)
2014 {
2015         const struct sock *sk = (const struct sock *)msk;
2016         const struct mptcp_subflow_context *sf;
2017         u8 sk_err;
2018
2019         if (nla_put_u32(skb, MPTCP_ATTR_TOKEN, msk->token))
2020                 return -EMSGSIZE;
2021
2022         if (mptcp_event_add_subflow(skb, ssk))
2023                 return -EMSGSIZE;
2024
2025         sf = mptcp_subflow_ctx(ssk);
2026         if (WARN_ON_ONCE(!sf))
2027                 return -EINVAL;
2028
2029         if (nla_put_u8(skb, MPTCP_ATTR_BACKUP, sf->backup))
2030                 return -EMSGSIZE;
2031
2032         if (ssk->sk_bound_dev_if &&
2033             nla_put_s32(skb, MPTCP_ATTR_IF_IDX, ssk->sk_bound_dev_if))
2034                 return -EMSGSIZE;
2035
2036         sk_err = READ_ONCE(ssk->sk_err);
2037         if (sk_err && sk->sk_state == TCP_ESTABLISHED &&
2038             nla_put_u8(skb, MPTCP_ATTR_ERROR, sk_err))
2039                 return -EMSGSIZE;
2040
2041         return 0;
2042 }
2043
2044 static int mptcp_event_sub_established(struct sk_buff *skb,
2045                                        const struct mptcp_sock *msk,
2046                                        const struct sock *ssk)
2047 {
2048         return mptcp_event_put_token_and_ssk(skb, msk, ssk);
2049 }
2050
2051 static int mptcp_event_sub_closed(struct sk_buff *skb,
2052                                   const struct mptcp_sock *msk,
2053                                   const struct sock *ssk)
2054 {
2055         const struct mptcp_subflow_context *sf;
2056
2057         if (mptcp_event_put_token_and_ssk(skb, msk, ssk))
2058                 return -EMSGSIZE;
2059
2060         sf = mptcp_subflow_ctx(ssk);
2061         if (!sf->reset_seen)
2062                 return 0;
2063
2064         if (nla_put_u32(skb, MPTCP_ATTR_RESET_REASON, sf->reset_reason))
2065                 return -EMSGSIZE;
2066
2067         if (nla_put_u32(skb, MPTCP_ATTR_RESET_FLAGS, sf->reset_transient))
2068                 return -EMSGSIZE;
2069
2070         return 0;
2071 }
2072
2073 static int mptcp_event_created(struct sk_buff *skb,
2074                                const struct mptcp_sock *msk,
2075                                const struct sock *ssk)
2076 {
2077         int err = nla_put_u32(skb, MPTCP_ATTR_TOKEN, msk->token);
2078
2079         if (err)
2080                 return err;
2081
2082         if (nla_put_u8(skb, MPTCP_ATTR_SERVER_SIDE, READ_ONCE(msk->pm.server_side)))
2083                 return -EMSGSIZE;
2084
2085         return mptcp_event_add_subflow(skb, ssk);
2086 }
2087
2088 void mptcp_event_addr_removed(const struct mptcp_sock *msk, uint8_t id)
2089 {
2090         struct net *net = sock_net((const struct sock *)msk);
2091         struct nlmsghdr *nlh;
2092         struct sk_buff *skb;
2093
2094         if (!genl_has_listeners(&mptcp_genl_family, net, MPTCP_PM_EV_GRP_OFFSET))
2095                 return;
2096
2097         skb = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_ATOMIC);
2098         if (!skb)
2099                 return;
2100
2101         nlh = genlmsg_put(skb, 0, 0, &mptcp_genl_family, 0, MPTCP_EVENT_REMOVED);
2102         if (!nlh)
2103                 goto nla_put_failure;
2104
2105         if (nla_put_u32(skb, MPTCP_ATTR_TOKEN, msk->token))
2106                 goto nla_put_failure;
2107
2108         if (nla_put_u8(skb, MPTCP_ATTR_REM_ID, id))
2109                 goto nla_put_failure;
2110
2111         genlmsg_end(skb, nlh);
2112         mptcp_nl_mcast_send(net, skb, GFP_ATOMIC);
2113         return;
2114
2115 nla_put_failure:
2116         nlmsg_free(skb);
2117 }
2118
2119 void mptcp_event_addr_announced(const struct sock *ssk,
2120                                 const struct mptcp_addr_info *info)
2121 {
2122         struct mptcp_subflow_context *subflow = mptcp_subflow_ctx(ssk);
2123         struct mptcp_sock *msk = mptcp_sk(subflow->conn);
2124         struct net *net = sock_net(ssk);
2125         struct nlmsghdr *nlh;
2126         struct sk_buff *skb;
2127
2128         if (!genl_has_listeners(&mptcp_genl_family, net, MPTCP_PM_EV_GRP_OFFSET))
2129                 return;
2130
2131         skb = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_ATOMIC);
2132         if (!skb)
2133                 return;
2134
2135         nlh = genlmsg_put(skb, 0, 0, &mptcp_genl_family, 0,
2136                           MPTCP_EVENT_ANNOUNCED);
2137         if (!nlh)
2138                 goto nla_put_failure;
2139
2140         if (nla_put_u32(skb, MPTCP_ATTR_TOKEN, msk->token))
2141                 goto nla_put_failure;
2142
2143         if (nla_put_u8(skb, MPTCP_ATTR_REM_ID, info->id))
2144                 goto nla_put_failure;
2145
2146         if (nla_put_be16(skb, MPTCP_ATTR_DPORT,
2147                          info->port == 0 ?
2148                          inet_sk(ssk)->inet_dport :
2149                          info->port))
2150                 goto nla_put_failure;
2151
2152         switch (info->family) {
2153         case AF_INET:
2154                 if (nla_put_in_addr(skb, MPTCP_ATTR_DADDR4, info->addr.s_addr))
2155                         goto nla_put_failure;
2156                 break;
2157 #if IS_ENABLED(CONFIG_MPTCP_IPV6)
2158         case AF_INET6:
2159                 if (nla_put_in6_addr(skb, MPTCP_ATTR_DADDR6, &info->addr6))
2160                         goto nla_put_failure;
2161                 break;
2162 #endif
2163         default:
2164                 WARN_ON_ONCE(1);
2165                 goto nla_put_failure;
2166         }
2167
2168         genlmsg_end(skb, nlh);
2169         mptcp_nl_mcast_send(net, skb, GFP_ATOMIC);
2170         return;
2171
2172 nla_put_failure:
2173         nlmsg_free(skb);
2174 }
2175
2176 void mptcp_event_pm_listener(const struct sock *ssk,
2177                              enum mptcp_event_type event)
2178 {
2179         const struct inet_sock *issk = inet_sk(ssk);
2180         struct net *net = sock_net(ssk);
2181         struct nlmsghdr *nlh;
2182         struct sk_buff *skb;
2183
2184         if (!genl_has_listeners(&mptcp_genl_family, net, MPTCP_PM_EV_GRP_OFFSET))
2185                 return;
2186
2187         skb = nlmsg_new(NLMSG_DEFAULT_SIZE, GFP_KERNEL);
2188         if (!skb)
2189                 return;
2190
2191         nlh = genlmsg_put(skb, 0, 0, &mptcp_genl_family, 0, event);
2192         if (!nlh)
2193                 goto nla_put_failure;
2194
2195         if (nla_put_u16(skb, MPTCP_ATTR_FAMILY, ssk->sk_family))
2196                 goto nla_put_failure;
2197
2198         if (nla_put_be16(skb, MPTCP_ATTR_SPORT, issk->inet_sport))
2199                 goto nla_put_failure;
2200
2201         switch (ssk->sk_family) {
2202         case AF_INET:
2203                 if (nla_put_in_addr(skb, MPTCP_ATTR_SADDR4, issk->inet_saddr))
2204                         goto nla_put_failure;
2205                 break;
2206 #if IS_ENABLED(CONFIG_MPTCP_IPV6)
2207         case AF_INET6: {
2208                 const struct ipv6_pinfo *np = inet6_sk(ssk);
2209
2210                 if (nla_put_in6_addr(skb, MPTCP_ATTR_SADDR6, &np->saddr))
2211                         goto nla_put_failure;
2212                 break;
2213         }
2214 #endif
2215         default:
2216                 WARN_ON_ONCE(1);
2217                 goto nla_put_failure;
2218         }
2219
2220         genlmsg_end(skb, nlh);
2221         mptcp_nl_mcast_send(net, skb, GFP_KERNEL);
2222         return;
2223
2224 nla_put_failure:
2225         nlmsg_free(skb);
2226 }
2227
2228 void mptcp_event(enum mptcp_event_type type, const struct mptcp_sock *msk,
2229                  const struct sock *ssk, gfp_t gfp)
2230 {
2231         struct net *net = sock_net((const struct sock *)msk);
2232         struct nlmsghdr *nlh;
2233         struct sk_buff *skb;
2234
2235         if (!genl_has_listeners(&mptcp_genl_family, net, MPTCP_PM_EV_GRP_OFFSET))
2236                 return;
2237
2238         skb = nlmsg_new(NLMSG_DEFAULT_SIZE, gfp);
2239         if (!skb)
2240                 return;
2241
2242         nlh = genlmsg_put(skb, 0, 0, &mptcp_genl_family, 0, type);
2243         if (!nlh)
2244                 goto nla_put_failure;
2245
2246         switch (type) {
2247         case MPTCP_EVENT_UNSPEC:
2248                 WARN_ON_ONCE(1);
2249                 break;
2250         case MPTCP_EVENT_CREATED:
2251         case MPTCP_EVENT_ESTABLISHED:
2252                 if (mptcp_event_created(skb, msk, ssk) < 0)
2253                         goto nla_put_failure;
2254                 break;
2255         case MPTCP_EVENT_CLOSED:
2256                 if (nla_put_u32(skb, MPTCP_ATTR_TOKEN, msk->token) < 0)
2257                         goto nla_put_failure;
2258                 break;
2259         case MPTCP_EVENT_ANNOUNCED:
2260         case MPTCP_EVENT_REMOVED:
2261                 /* call mptcp_event_addr_announced()/removed instead */
2262                 WARN_ON_ONCE(1);
2263                 break;
2264         case MPTCP_EVENT_SUB_ESTABLISHED:
2265         case MPTCP_EVENT_SUB_PRIORITY:
2266                 if (mptcp_event_sub_established(skb, msk, ssk) < 0)
2267                         goto nla_put_failure;
2268                 break;
2269         case MPTCP_EVENT_SUB_CLOSED:
2270                 if (mptcp_event_sub_closed(skb, msk, ssk) < 0)
2271                         goto nla_put_failure;
2272                 break;
2273         case MPTCP_EVENT_LISTENER_CREATED:
2274         case MPTCP_EVENT_LISTENER_CLOSED:
2275                 break;
2276         }
2277
2278         genlmsg_end(skb, nlh);
2279         mptcp_nl_mcast_send(net, skb, gfp);
2280         return;
2281
2282 nla_put_failure:
2283         nlmsg_free(skb);
2284 }
2285
2286 static const struct genl_small_ops mptcp_pm_ops[] = {
2287         {
2288                 .cmd    = MPTCP_PM_CMD_ADD_ADDR,
2289                 .doit   = mptcp_nl_cmd_add_addr,
2290                 .flags  = GENL_UNS_ADMIN_PERM,
2291         },
2292         {
2293                 .cmd    = MPTCP_PM_CMD_DEL_ADDR,
2294                 .doit   = mptcp_nl_cmd_del_addr,
2295                 .flags  = GENL_UNS_ADMIN_PERM,
2296         },
2297         {
2298                 .cmd    = MPTCP_PM_CMD_FLUSH_ADDRS,
2299                 .doit   = mptcp_nl_cmd_flush_addrs,
2300                 .flags  = GENL_UNS_ADMIN_PERM,
2301         },
2302         {
2303                 .cmd    = MPTCP_PM_CMD_GET_ADDR,
2304                 .doit   = mptcp_nl_cmd_get_addr,
2305                 .dumpit   = mptcp_nl_cmd_dump_addrs,
2306         },
2307         {
2308                 .cmd    = MPTCP_PM_CMD_SET_LIMITS,
2309                 .doit   = mptcp_nl_cmd_set_limits,
2310                 .flags  = GENL_UNS_ADMIN_PERM,
2311         },
2312         {
2313                 .cmd    = MPTCP_PM_CMD_GET_LIMITS,
2314                 .doit   = mptcp_nl_cmd_get_limits,
2315         },
2316         {
2317                 .cmd    = MPTCP_PM_CMD_SET_FLAGS,
2318                 .doit   = mptcp_nl_cmd_set_flags,
2319                 .flags  = GENL_UNS_ADMIN_PERM,
2320         },
2321         {
2322                 .cmd    = MPTCP_PM_CMD_ANNOUNCE,
2323                 .doit   = mptcp_nl_cmd_announce,
2324                 .flags  = GENL_UNS_ADMIN_PERM,
2325         },
2326         {
2327                 .cmd    = MPTCP_PM_CMD_REMOVE,
2328                 .doit   = mptcp_nl_cmd_remove,
2329                 .flags  = GENL_UNS_ADMIN_PERM,
2330         },
2331         {
2332                 .cmd    = MPTCP_PM_CMD_SUBFLOW_CREATE,
2333                 .doit   = mptcp_nl_cmd_sf_create,
2334                 .flags  = GENL_UNS_ADMIN_PERM,
2335         },
2336         {
2337                 .cmd    = MPTCP_PM_CMD_SUBFLOW_DESTROY,
2338                 .doit   = mptcp_nl_cmd_sf_destroy,
2339                 .flags  = GENL_UNS_ADMIN_PERM,
2340         },
2341 };
2342
2343 static struct genl_family mptcp_genl_family __ro_after_init = {
2344         .name           = MPTCP_PM_NAME,
2345         .version        = MPTCP_PM_VER,
2346         .maxattr        = MPTCP_PM_ATTR_MAX,
2347         .policy         = mptcp_pm_policy,
2348         .netnsok        = true,
2349         .module         = THIS_MODULE,
2350         .small_ops      = mptcp_pm_ops,
2351         .n_small_ops    = ARRAY_SIZE(mptcp_pm_ops),
2352         .resv_start_op  = MPTCP_PM_CMD_SUBFLOW_DESTROY + 1,
2353         .mcgrps         = mptcp_pm_mcgrps,
2354         .n_mcgrps       = ARRAY_SIZE(mptcp_pm_mcgrps),
2355 };
2356
2357 static int __net_init pm_nl_init_net(struct net *net)
2358 {
2359         struct pm_nl_pernet *pernet = pm_nl_get_pernet(net);
2360
2361         INIT_LIST_HEAD_RCU(&pernet->local_addr_list);
2362
2363         /* Cit. 2 subflows ought to be enough for anybody. */
2364         pernet->subflows_max = 2;
2365         pernet->next_id = 1;
2366         pernet->stale_loss_cnt = 4;
2367         spin_lock_init(&pernet->lock);
2368
2369         /* No need to initialize other pernet fields, the struct is zeroed at
2370          * allocation time.
2371          */
2372
2373         return 0;
2374 }
2375
2376 static void __net_exit pm_nl_exit_net(struct list_head *net_list)
2377 {
2378         struct net *net;
2379
2380         list_for_each_entry(net, net_list, exit_list) {
2381                 struct pm_nl_pernet *pernet = pm_nl_get_pernet(net);
2382
2383                 /* net is removed from namespace list, can't race with
2384                  * other modifiers, also netns core already waited for a
2385                  * RCU grace period.
2386                  */
2387                 __flush_addrs(&pernet->local_addr_list);
2388         }
2389 }
2390
2391 static struct pernet_operations mptcp_pm_pernet_ops = {
2392         .init = pm_nl_init_net,
2393         .exit_batch = pm_nl_exit_net,
2394         .id = &pm_nl_pernet_id,
2395         .size = sizeof(struct pm_nl_pernet),
2396 };
2397
2398 void __init mptcp_pm_nl_init(void)
2399 {
2400         if (register_pernet_subsys(&mptcp_pm_pernet_ops) < 0)
2401                 panic("Failed to register MPTCP PM pernet subsystem.\n");
2402
2403         if (genl_register_family(&mptcp_genl_family))
2404                 panic("Failed to register MPTCP PM netlink family\n");
2405 }