1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3 * CAIF Interface registration.
4 * Copyright (C) ST-Ericsson AB 2010
5 * Author: Sjur Brendeland
6 *
7 * Borrowed heavily from file: pn_dev.c. Thanks to Remi Denis-Courmont
8 * and Sakari Ailus <sakari.ailus@nokia.com>
9 */
10
11 #define pr_fmt(fmt) KBUILD_MODNAME ":%s(): " fmt, __func__
12
13 #include <linux/kernel.h>
14 #include <linux/if_arp.h>
15 #include <linux/net.h>
16 #include <linux/netdevice.h>
17 #include <linux/mutex.h>
18 #include <linux/module.h>
19 #include <linux/spinlock.h>
20 #include <net/netns/generic.h>
21 #include <net/net_namespace.h>
22 #include <net/pkt_sched.h>
23 #include <net/caif/caif_device.h>
24 #include <net/caif/caif_layer.h>
25 #include <net/caif/caif_dev.h>
26 #include <net/caif/cfpkt.h>
27 #include <net/caif/cfcnfg.h>
28 #include <net/caif/cfserl.h>
29
30 MODULE_LICENSE("GPL");
31
32 /* Used for local tracking of the CAIF net devices */
33 struct caif_device_entry {
34 struct cflayer layer;
35 struct list_head list;
36 struct net_device *netdev;
37 int __percpu *pcpu_refcnt;
38 spinlock_t flow_lock;
39 struct sk_buff *xoff_skb;
40 void (*xoff_skb_dtor)(struct sk_buff *skb);
41 bool xoff;
42 };
43
44 struct caif_device_entry_list {
45 struct list_head list;
46 /* Protects simulanous deletes in list */
47 struct mutex lock;
48 };
49
50 struct caif_net {
51 struct cfcnfg *cfg;
52 struct caif_device_entry_list caifdevs;
53 };
54
55 static unsigned int caif_net_id;
56 static int q_high = 50; /* Percent */
57
get_cfcnfg(struct net * net)58 struct cfcnfg *get_cfcnfg(struct net *net)
59 {
60 struct caif_net *caifn;
61 caifn = net_generic(net, caif_net_id);
62 return caifn->cfg;
63 }
64 EXPORT_SYMBOL(get_cfcnfg);
65
caif_device_list(struct net * net)66 static struct caif_device_entry_list *caif_device_list(struct net *net)
67 {
68 struct caif_net *caifn;
69 caifn = net_generic(net, caif_net_id);
70 return &caifn->caifdevs;
71 }
72
caifd_put(struct caif_device_entry * e)73 static void caifd_put(struct caif_device_entry *e)
74 {
75 this_cpu_dec(*e->pcpu_refcnt);
76 }
77
caifd_hold(struct caif_device_entry * e)78 static void caifd_hold(struct caif_device_entry *e)
79 {
80 this_cpu_inc(*e->pcpu_refcnt);
81 }
82
caifd_refcnt_read(struct caif_device_entry * e)83 static int caifd_refcnt_read(struct caif_device_entry *e)
84 {
85 int i, refcnt = 0;
86 for_each_possible_cpu(i)
87 refcnt += *per_cpu_ptr(e->pcpu_refcnt, i);
88 return refcnt;
89 }
90
91 /* Allocate new CAIF device. */
caif_device_alloc(struct net_device * dev)92 static struct caif_device_entry *caif_device_alloc(struct net_device *dev)
93 {
94 struct caif_device_entry *caifd;
95
96 caifd = kzalloc(sizeof(*caifd), GFP_KERNEL);
97 if (!caifd)
98 return NULL;
99 caifd->pcpu_refcnt = alloc_percpu(int);
100 if (!caifd->pcpu_refcnt) {
101 kfree(caifd);
102 return NULL;
103 }
104 caifd->netdev = dev;
105 dev_hold(dev);
106 return caifd;
107 }
108
caif_get(struct net_device * dev)109 static struct caif_device_entry *caif_get(struct net_device *dev)
110 {
111 struct caif_device_entry_list *caifdevs =
112 caif_device_list(dev_net(dev));
113 struct caif_device_entry *caifd;
114
115 list_for_each_entry_rcu(caifd, &caifdevs->list, list,
116 lockdep_rtnl_is_held()) {
117 if (caifd->netdev == dev)
118 return caifd;
119 }
120 return NULL;
121 }
122
caif_flow_cb(struct sk_buff * skb)123 static void caif_flow_cb(struct sk_buff *skb)
124 {
125 struct caif_device_entry *caifd;
126 void (*dtor)(struct sk_buff *skb) = NULL;
127 bool send_xoff;
128
129 WARN_ON(skb->dev == NULL);
130
131 rcu_read_lock();
132 caifd = caif_get(skb->dev);
133
134 WARN_ON(caifd == NULL);
135 if (!caifd) {
136 rcu_read_unlock();
137 return;
138 }
139
140 caifd_hold(caifd);
141 rcu_read_unlock();
142
143 spin_lock_bh(&caifd->flow_lock);
144 send_xoff = caifd->xoff;
145 caifd->xoff = false;
146 dtor = caifd->xoff_skb_dtor;
147
148 if (WARN_ON(caifd->xoff_skb != skb))
149 skb = NULL;
150
151 caifd->xoff_skb = NULL;
152 caifd->xoff_skb_dtor = NULL;
153
154 spin_unlock_bh(&caifd->flow_lock);
155
156 if (dtor && skb)
157 dtor(skb);
158
159 if (send_xoff)
160 caifd->layer.up->
161 ctrlcmd(caifd->layer.up,
162 _CAIF_CTRLCMD_PHYIF_FLOW_ON_IND,
163 caifd->layer.id);
164 caifd_put(caifd);
165 }
166
transmit(struct cflayer * layer,struct cfpkt * pkt)167 static int transmit(struct cflayer *layer, struct cfpkt *pkt)
168 {
169 int err, high = 0, qlen = 0;
170 struct caif_device_entry *caifd =
171 container_of(layer, struct caif_device_entry, layer);
172 struct sk_buff *skb;
173 struct netdev_queue *txq;
174
175 rcu_read_lock_bh();
176
177 skb = cfpkt_tonative(pkt);
178 skb->dev = caifd->netdev;
179 skb_reset_network_header(skb);
180 skb->protocol = htons(ETH_P_CAIF);
181
182 /* Check if we need to handle xoff */
183 if (likely(caifd->netdev->priv_flags & IFF_NO_QUEUE))
184 goto noxoff;
185
186 if (unlikely(caifd->xoff))
187 goto noxoff;
188
189 if (likely(!netif_queue_stopped(caifd->netdev))) {
190 struct Qdisc *sch;
191
192 /* If we run with a TX queue, check if the queue is too long*/
193 txq = netdev_get_tx_queue(skb->dev, 0);
194 sch = rcu_dereference_bh(txq->qdisc);
195 if (likely(qdisc_is_empty(sch)))
196 goto noxoff;
197
198 /* can check for explicit qdisc len value only !NOLOCK,
199 * always set flow off otherwise
200 */
201 high = (caifd->netdev->tx_queue_len * q_high) / 100;
202 if (!(sch->flags & TCQ_F_NOLOCK) && likely(sch->q.qlen < high))
203 goto noxoff;
204 }
205
206 /* Hold lock while accessing xoff */
207 spin_lock_bh(&caifd->flow_lock);
208 if (caifd->xoff) {
209 spin_unlock_bh(&caifd->flow_lock);
210 goto noxoff;
211 }
212
213 /*
214 * Handle flow off, we do this by temporary hi-jacking this
215 * skb's destructor function, and replace it with our own
216 * flow-on callback. The callback will set flow-on and call
217 * the original destructor.
218 */
219
220 pr_debug("queue has stopped(%d) or is full (%d > %d)\n",
221 netif_queue_stopped(caifd->netdev),
222 qlen, high);
223 caifd->xoff = true;
224 caifd->xoff_skb = skb;
225 caifd->xoff_skb_dtor = skb->destructor;
226 skb->destructor = caif_flow_cb;
227 spin_unlock_bh(&caifd->flow_lock);
228
229 caifd->layer.up->ctrlcmd(caifd->layer.up,
230 _CAIF_CTRLCMD_PHYIF_FLOW_OFF_IND,
231 caifd->layer.id);
232 noxoff:
233 rcu_read_unlock_bh();
234
235 err = dev_queue_xmit(skb);
236 if (err > 0)
237 err = -EIO;
238
239 return err;
240 }
241
242 /*
243 * Stuff received packets into the CAIF stack.
244 * On error, returns non-zero and releases the skb.
245 */
receive(struct sk_buff * skb,struct net_device * dev,struct packet_type * pkttype,struct net_device * orig_dev)246 static int receive(struct sk_buff *skb, struct net_device *dev,
247 struct packet_type *pkttype, struct net_device *orig_dev)
248 {
249 struct cfpkt *pkt;
250 struct caif_device_entry *caifd;
251 int err;
252
253 pkt = cfpkt_fromnative(CAIF_DIR_IN, skb);
254
255 rcu_read_lock();
256 caifd = caif_get(dev);
257
258 if (!caifd || !caifd->layer.up || !caifd->layer.up->receive ||
259 !netif_oper_up(caifd->netdev)) {
260 rcu_read_unlock();
261 kfree_skb(skb);
262 return NET_RX_DROP;
263 }
264
265 /* Hold reference to netdevice while using CAIF stack */
266 caifd_hold(caifd);
267 rcu_read_unlock();
268
269 err = caifd->layer.up->receive(caifd->layer.up, pkt);
270
271 /* For -EILSEQ the packet is not freed so free it now */
272 if (err == -EILSEQ)
273 cfpkt_destroy(pkt);
274
275 /* Release reference to stack upwards */
276 caifd_put(caifd);
277
278 if (err != 0)
279 err = NET_RX_DROP;
280 return err;
281 }
282
283 static struct packet_type caif_packet_type __read_mostly = {
284 .type = cpu_to_be16(ETH_P_CAIF),
285 .func = receive,
286 };
287
dev_flowctrl(struct net_device * dev,int on)288 static void dev_flowctrl(struct net_device *dev, int on)
289 {
290 struct caif_device_entry *caifd;
291
292 rcu_read_lock();
293
294 caifd = caif_get(dev);
295 if (!caifd || !caifd->layer.up || !caifd->layer.up->ctrlcmd) {
296 rcu_read_unlock();
297 return;
298 }
299
300 caifd_hold(caifd);
301 rcu_read_unlock();
302
303 caifd->layer.up->ctrlcmd(caifd->layer.up,
304 on ?
305 _CAIF_CTRLCMD_PHYIF_FLOW_ON_IND :
306 _CAIF_CTRLCMD_PHYIF_FLOW_OFF_IND,
307 caifd->layer.id);
308 caifd_put(caifd);
309 }
310
caif_enroll_dev(struct net_device * dev,struct caif_dev_common * caifdev,struct cflayer * link_support,int head_room,struct cflayer ** layer,int (** rcv_func)(struct sk_buff *,struct net_device *,struct packet_type *,struct net_device *))311 int caif_enroll_dev(struct net_device *dev, struct caif_dev_common *caifdev,
312 struct cflayer *link_support, int head_room,
313 struct cflayer **layer,
314 int (**rcv_func)(struct sk_buff *, struct net_device *,
315 struct packet_type *,
316 struct net_device *))
317 {
318 struct caif_device_entry *caifd;
319 enum cfcnfg_phy_preference pref;
320 struct cfcnfg *cfg = get_cfcnfg(dev_net(dev));
321 struct caif_device_entry_list *caifdevs;
322 int res;
323
324 caifdevs = caif_device_list(dev_net(dev));
325 caifd = caif_device_alloc(dev);
326 if (!caifd)
327 return -ENOMEM;
328 *layer = &caifd->layer;
329 spin_lock_init(&caifd->flow_lock);
330
331 switch (caifdev->link_select) {
332 case CAIF_LINK_HIGH_BANDW:
333 pref = CFPHYPREF_HIGH_BW;
334 break;
335 case CAIF_LINK_LOW_LATENCY:
336 pref = CFPHYPREF_LOW_LAT;
337 break;
338 default:
339 pref = CFPHYPREF_HIGH_BW;
340 break;
341 }
342 mutex_lock(&caifdevs->lock);
343 list_add_rcu(&caifd->list, &caifdevs->list);
344
345 strscpy(caifd->layer.name, dev->name,
346 sizeof(caifd->layer.name));
347 caifd->layer.transmit = transmit;
348 res = cfcnfg_add_phy_layer(cfg,
349 dev,
350 &caifd->layer,
351 pref,
352 link_support,
353 caifdev->use_fcs,
354 head_room);
355 mutex_unlock(&caifdevs->lock);
356 if (rcv_func)
357 *rcv_func = receive;
358 return res;
359 }
360 EXPORT_SYMBOL(caif_enroll_dev);
361
362 /* notify Caif of device events */
caif_device_notify(struct notifier_block * me,unsigned long what,void * ptr)363 static int caif_device_notify(struct notifier_block *me, unsigned long what,
364 void *ptr)
365 {
366 struct net_device *dev = netdev_notifier_info_to_dev(ptr);
367 struct caif_device_entry *caifd = NULL;
368 struct caif_dev_common *caifdev;
369 struct cfcnfg *cfg;
370 struct cflayer *layer, *link_support;
371 int head_room = 0;
372 struct caif_device_entry_list *caifdevs;
373 int res;
374
375 cfg = get_cfcnfg(dev_net(dev));
376 caifdevs = caif_device_list(dev_net(dev));
377
378 caifd = caif_get(dev);
379 if (caifd == NULL && dev->type != ARPHRD_CAIF)
380 return 0;
381
382 switch (what) {
383 case NETDEV_REGISTER:
384 if (caifd != NULL)
385 break;
386
387 caifdev = netdev_priv(dev);
388
389 link_support = NULL;
390 if (caifdev->use_frag) {
391 head_room = 1;
392 link_support = cfserl_create(dev->ifindex,
393 caifdev->use_stx);
394 if (!link_support) {
395 pr_warn("Out of memory\n");
396 break;
397 }
398 }
399 res = caif_enroll_dev(dev, caifdev, link_support, head_room,
400 &layer, NULL);
401 if (res)
402 cfserl_release(link_support);
403 caifdev->flowctrl = dev_flowctrl;
404 break;
405
406 case NETDEV_UP:
407 rcu_read_lock();
408
409 caifd = caif_get(dev);
410 if (caifd == NULL) {
411 rcu_read_unlock();
412 break;
413 }
414
415 caifd->xoff = false;
416 cfcnfg_set_phy_state(cfg, &caifd->layer, true);
417 rcu_read_unlock();
418
419 break;
420
421 case NETDEV_DOWN:
422 rcu_read_lock();
423
424 caifd = caif_get(dev);
425 if (!caifd || !caifd->layer.up || !caifd->layer.up->ctrlcmd) {
426 rcu_read_unlock();
427 return -EINVAL;
428 }
429
430 cfcnfg_set_phy_state(cfg, &caifd->layer, false);
431 caifd_hold(caifd);
432 rcu_read_unlock();
433
434 caifd->layer.up->ctrlcmd(caifd->layer.up,
435 _CAIF_CTRLCMD_PHYIF_DOWN_IND,
436 caifd->layer.id);
437
438 spin_lock_bh(&caifd->flow_lock);
439
440 /*
441 * Replace our xoff-destructor with original destructor.
442 * We trust that skb->destructor *always* is called before
443 * the skb reference is invalid. The hijacked SKB destructor
444 * takes the flow_lock so manipulating the skb->destructor here
445 * should be safe.
446 */
447 if (caifd->xoff_skb_dtor != NULL && caifd->xoff_skb != NULL)
448 caifd->xoff_skb->destructor = caifd->xoff_skb_dtor;
449
450 caifd->xoff = false;
451 caifd->xoff_skb_dtor = NULL;
452 caifd->xoff_skb = NULL;
453
454 spin_unlock_bh(&caifd->flow_lock);
455 caifd_put(caifd);
456 break;
457
458 case NETDEV_UNREGISTER:
459 mutex_lock(&caifdevs->lock);
460
461 caifd = caif_get(dev);
462 if (caifd == NULL) {
463 mutex_unlock(&caifdevs->lock);
464 break;
465 }
466 list_del_rcu(&caifd->list);
467
468 /*
469 * NETDEV_UNREGISTER is called repeatedly until all reference
470 * counts for the net-device are released. If references to
471 * caifd is taken, simply ignore NETDEV_UNREGISTER and wait for
472 * the next call to NETDEV_UNREGISTER.
473 *
474 * If any packets are in flight down the CAIF Stack,
475 * cfcnfg_del_phy_layer will return nonzero.
476 * If no packets are in flight, the CAIF Stack associated
477 * with the net-device un-registering is freed.
478 */
479
480 if (caifd_refcnt_read(caifd) != 0 ||
481 cfcnfg_del_phy_layer(cfg, &caifd->layer) != 0) {
482
483 pr_info("Wait for device inuse\n");
484 /* Enrole device if CAIF Stack is still in use */
485 list_add_rcu(&caifd->list, &caifdevs->list);
486 mutex_unlock(&caifdevs->lock);
487 break;
488 }
489
490 synchronize_rcu();
491 dev_put(caifd->netdev);
492 free_percpu(caifd->pcpu_refcnt);
493 kfree(caifd);
494
495 mutex_unlock(&caifdevs->lock);
496 break;
497 }
498 return 0;
499 }
500
501 static struct notifier_block caif_device_notifier = {
502 .notifier_call = caif_device_notify,
503 .priority = 0,
504 };
505
506 /* Per-namespace Caif devices handling */
caif_init_net(struct net * net)507 static int caif_init_net(struct net *net)
508 {
509 struct caif_net *caifn = net_generic(net, caif_net_id);
510 INIT_LIST_HEAD(&caifn->caifdevs.list);
511 mutex_init(&caifn->caifdevs.lock);
512
513 caifn->cfg = cfcnfg_create();
514 if (!caifn->cfg)
515 return -ENOMEM;
516
517 return 0;
518 }
519
caif_exit_net(struct net * net)520 static void caif_exit_net(struct net *net)
521 {
522 struct caif_device_entry *caifd, *tmp;
523 struct caif_device_entry_list *caifdevs =
524 caif_device_list(net);
525 struct cfcnfg *cfg = get_cfcnfg(net);
526
527 rtnl_lock();
528 mutex_lock(&caifdevs->lock);
529
530 list_for_each_entry_safe(caifd, tmp, &caifdevs->list, list) {
531 int i = 0;
532 list_del_rcu(&caifd->list);
533 cfcnfg_set_phy_state(cfg, &caifd->layer, false);
534
535 while (i < 10 &&
536 (caifd_refcnt_read(caifd) != 0 ||
537 cfcnfg_del_phy_layer(cfg, &caifd->layer) != 0)) {
538
539 pr_info("Wait for device inuse\n");
540 msleep(250);
541 i++;
542 }
543 synchronize_rcu();
544 dev_put(caifd->netdev);
545 free_percpu(caifd->pcpu_refcnt);
546 kfree(caifd);
547 }
548 cfcnfg_remove(cfg);
549
550 mutex_unlock(&caifdevs->lock);
551 rtnl_unlock();
552 }
553
554 static struct pernet_operations caif_net_ops = {
555 .init = caif_init_net,
556 .exit = caif_exit_net,
557 .id = &caif_net_id,
558 .size = sizeof(struct caif_net),
559 };
560
561 /* Initialize Caif devices list */
caif_device_init(void)562 static int __init caif_device_init(void)
563 {
564 int result;
565
566 result = register_pernet_subsys(&caif_net_ops);
567
568 if (result)
569 return result;
570
571 register_netdevice_notifier(&caif_device_notifier);
572 dev_add_pack(&caif_packet_type);
573
574 return result;
575 }
576
caif_device_exit(void)577 static void __exit caif_device_exit(void)
578 {
579 unregister_netdevice_notifier(&caif_device_notifier);
580 dev_remove_pack(&caif_packet_type);
581 unregister_pernet_subsys(&caif_net_ops);
582 }
583
584 module_init(caif_device_init);
585 module_exit(caif_device_exit);
586