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