xref: /linux/net/phonet/pn_dev.c (revision 44f57d78)
1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3  * File: pn_dev.c
4  *
5  * Phonet network device
6  *
7  * Copyright (C) 2008 Nokia Corporation.
8  *
9  * Authors: Sakari Ailus <sakari.ailus@nokia.com>
10  *          Rémi Denis-Courmont
11  */
12 
13 #include <linux/kernel.h>
14 #include <linux/net.h>
15 #include <linux/slab.h>
16 #include <linux/netdevice.h>
17 #include <linux/phonet.h>
18 #include <linux/proc_fs.h>
19 #include <linux/if_arp.h>
20 #include <net/sock.h>
21 #include <net/netns/generic.h>
22 #include <net/phonet/pn_dev.h>
23 
24 struct phonet_routes {
25 	struct mutex		lock;
26 	struct net_device __rcu	*table[64];
27 };
28 
29 struct phonet_net {
30 	struct phonet_device_list pndevs;
31 	struct phonet_routes routes;
32 };
33 
34 static unsigned int phonet_net_id __read_mostly;
35 
36 static struct phonet_net *phonet_pernet(struct net *net)
37 {
38 	BUG_ON(!net);
39 
40 	return net_generic(net, phonet_net_id);
41 }
42 
43 struct phonet_device_list *phonet_device_list(struct net *net)
44 {
45 	struct phonet_net *pnn = phonet_pernet(net);
46 	return &pnn->pndevs;
47 }
48 
49 /* Allocate new Phonet device. */
50 static struct phonet_device *__phonet_device_alloc(struct net_device *dev)
51 {
52 	struct phonet_device_list *pndevs = phonet_device_list(dev_net(dev));
53 	struct phonet_device *pnd = kmalloc(sizeof(*pnd), GFP_ATOMIC);
54 	if (pnd == NULL)
55 		return NULL;
56 	pnd->netdev = dev;
57 	bitmap_zero(pnd->addrs, 64);
58 
59 	BUG_ON(!mutex_is_locked(&pndevs->lock));
60 	list_add_rcu(&pnd->list, &pndevs->list);
61 	return pnd;
62 }
63 
64 static struct phonet_device *__phonet_get(struct net_device *dev)
65 {
66 	struct phonet_device_list *pndevs = phonet_device_list(dev_net(dev));
67 	struct phonet_device *pnd;
68 
69 	BUG_ON(!mutex_is_locked(&pndevs->lock));
70 	list_for_each_entry(pnd, &pndevs->list, list) {
71 		if (pnd->netdev == dev)
72 			return pnd;
73 	}
74 	return NULL;
75 }
76 
77 static struct phonet_device *__phonet_get_rcu(struct net_device *dev)
78 {
79 	struct phonet_device_list *pndevs = phonet_device_list(dev_net(dev));
80 	struct phonet_device *pnd;
81 
82 	list_for_each_entry_rcu(pnd, &pndevs->list, list) {
83 		if (pnd->netdev == dev)
84 			return pnd;
85 	}
86 	return NULL;
87 }
88 
89 static void phonet_device_destroy(struct net_device *dev)
90 {
91 	struct phonet_device_list *pndevs = phonet_device_list(dev_net(dev));
92 	struct phonet_device *pnd;
93 
94 	ASSERT_RTNL();
95 
96 	mutex_lock(&pndevs->lock);
97 	pnd = __phonet_get(dev);
98 	if (pnd)
99 		list_del_rcu(&pnd->list);
100 	mutex_unlock(&pndevs->lock);
101 
102 	if (pnd) {
103 		u8 addr;
104 
105 		for_each_set_bit(addr, pnd->addrs, 64)
106 			phonet_address_notify(RTM_DELADDR, dev, addr);
107 		kfree(pnd);
108 	}
109 }
110 
111 struct net_device *phonet_device_get(struct net *net)
112 {
113 	struct phonet_device_list *pndevs = phonet_device_list(net);
114 	struct phonet_device *pnd;
115 	struct net_device *dev = NULL;
116 
117 	rcu_read_lock();
118 	list_for_each_entry_rcu(pnd, &pndevs->list, list) {
119 		dev = pnd->netdev;
120 		BUG_ON(!dev);
121 
122 		if ((dev->reg_state == NETREG_REGISTERED) &&
123 			((pnd->netdev->flags & IFF_UP)) == IFF_UP)
124 			break;
125 		dev = NULL;
126 	}
127 	if (dev)
128 		dev_hold(dev);
129 	rcu_read_unlock();
130 	return dev;
131 }
132 
133 int phonet_address_add(struct net_device *dev, u8 addr)
134 {
135 	struct phonet_device_list *pndevs = phonet_device_list(dev_net(dev));
136 	struct phonet_device *pnd;
137 	int err = 0;
138 
139 	mutex_lock(&pndevs->lock);
140 	/* Find or create Phonet-specific device data */
141 	pnd = __phonet_get(dev);
142 	if (pnd == NULL)
143 		pnd = __phonet_device_alloc(dev);
144 	if (unlikely(pnd == NULL))
145 		err = -ENOMEM;
146 	else if (test_and_set_bit(addr >> 2, pnd->addrs))
147 		err = -EEXIST;
148 	mutex_unlock(&pndevs->lock);
149 	return err;
150 }
151 
152 int phonet_address_del(struct net_device *dev, u8 addr)
153 {
154 	struct phonet_device_list *pndevs = phonet_device_list(dev_net(dev));
155 	struct phonet_device *pnd;
156 	int err = 0;
157 
158 	mutex_lock(&pndevs->lock);
159 	pnd = __phonet_get(dev);
160 	if (!pnd || !test_and_clear_bit(addr >> 2, pnd->addrs)) {
161 		err = -EADDRNOTAVAIL;
162 		pnd = NULL;
163 	} else if (bitmap_empty(pnd->addrs, 64))
164 		list_del_rcu(&pnd->list);
165 	else
166 		pnd = NULL;
167 	mutex_unlock(&pndevs->lock);
168 
169 	if (pnd)
170 		kfree_rcu(pnd, rcu);
171 
172 	return err;
173 }
174 
175 /* Gets a source address toward a destination, through a interface. */
176 u8 phonet_address_get(struct net_device *dev, u8 daddr)
177 {
178 	struct phonet_device *pnd;
179 	u8 saddr;
180 
181 	rcu_read_lock();
182 	pnd = __phonet_get_rcu(dev);
183 	if (pnd) {
184 		BUG_ON(bitmap_empty(pnd->addrs, 64));
185 
186 		/* Use same source address as destination, if possible */
187 		if (test_bit(daddr >> 2, pnd->addrs))
188 			saddr = daddr;
189 		else
190 			saddr = find_first_bit(pnd->addrs, 64) << 2;
191 	} else
192 		saddr = PN_NO_ADDR;
193 	rcu_read_unlock();
194 
195 	if (saddr == PN_NO_ADDR) {
196 		/* Fallback to another device */
197 		struct net_device *def_dev;
198 
199 		def_dev = phonet_device_get(dev_net(dev));
200 		if (def_dev) {
201 			if (def_dev != dev)
202 				saddr = phonet_address_get(def_dev, daddr);
203 			dev_put(def_dev);
204 		}
205 	}
206 	return saddr;
207 }
208 
209 int phonet_address_lookup(struct net *net, u8 addr)
210 {
211 	struct phonet_device_list *pndevs = phonet_device_list(net);
212 	struct phonet_device *pnd;
213 	int err = -EADDRNOTAVAIL;
214 
215 	rcu_read_lock();
216 	list_for_each_entry_rcu(pnd, &pndevs->list, list) {
217 		/* Don't allow unregistering devices! */
218 		if ((pnd->netdev->reg_state != NETREG_REGISTERED) ||
219 				((pnd->netdev->flags & IFF_UP)) != IFF_UP)
220 			continue;
221 
222 		if (test_bit(addr >> 2, pnd->addrs)) {
223 			err = 0;
224 			goto found;
225 		}
226 	}
227 found:
228 	rcu_read_unlock();
229 	return err;
230 }
231 
232 /* automatically configure a Phonet device, if supported */
233 static int phonet_device_autoconf(struct net_device *dev)
234 {
235 	struct if_phonet_req req;
236 	int ret;
237 
238 	if (!dev->netdev_ops->ndo_do_ioctl)
239 		return -EOPNOTSUPP;
240 
241 	ret = dev->netdev_ops->ndo_do_ioctl(dev, (struct ifreq *)&req,
242 						SIOCPNGAUTOCONF);
243 	if (ret < 0)
244 		return ret;
245 
246 	ASSERT_RTNL();
247 	ret = phonet_address_add(dev, req.ifr_phonet_autoconf.device);
248 	if (ret)
249 		return ret;
250 	phonet_address_notify(RTM_NEWADDR, dev,
251 				req.ifr_phonet_autoconf.device);
252 	return 0;
253 }
254 
255 static void phonet_route_autodel(struct net_device *dev)
256 {
257 	struct phonet_net *pnn = phonet_pernet(dev_net(dev));
258 	unsigned int i;
259 	DECLARE_BITMAP(deleted, 64);
260 
261 	/* Remove left-over Phonet routes */
262 	bitmap_zero(deleted, 64);
263 	mutex_lock(&pnn->routes.lock);
264 	for (i = 0; i < 64; i++)
265 		if (rcu_access_pointer(pnn->routes.table[i]) == dev) {
266 			RCU_INIT_POINTER(pnn->routes.table[i], NULL);
267 			set_bit(i, deleted);
268 		}
269 	mutex_unlock(&pnn->routes.lock);
270 
271 	if (bitmap_empty(deleted, 64))
272 		return; /* short-circuit RCU */
273 	synchronize_rcu();
274 	for_each_set_bit(i, deleted, 64) {
275 		rtm_phonet_notify(RTM_DELROUTE, dev, i);
276 		dev_put(dev);
277 	}
278 }
279 
280 /* notify Phonet of device events */
281 static int phonet_device_notify(struct notifier_block *me, unsigned long what,
282 				void *ptr)
283 {
284 	struct net_device *dev = netdev_notifier_info_to_dev(ptr);
285 
286 	switch (what) {
287 	case NETDEV_REGISTER:
288 		if (dev->type == ARPHRD_PHONET)
289 			phonet_device_autoconf(dev);
290 		break;
291 	case NETDEV_UNREGISTER:
292 		phonet_device_destroy(dev);
293 		phonet_route_autodel(dev);
294 		break;
295 	}
296 	return 0;
297 
298 }
299 
300 static struct notifier_block phonet_device_notifier = {
301 	.notifier_call = phonet_device_notify,
302 	.priority = 0,
303 };
304 
305 /* Per-namespace Phonet devices handling */
306 static int __net_init phonet_init_net(struct net *net)
307 {
308 	struct phonet_net *pnn = phonet_pernet(net);
309 
310 	if (!proc_create_net("phonet", 0, net->proc_net, &pn_sock_seq_ops,
311 			sizeof(struct seq_net_private)))
312 		return -ENOMEM;
313 
314 	INIT_LIST_HEAD(&pnn->pndevs.list);
315 	mutex_init(&pnn->pndevs.lock);
316 	mutex_init(&pnn->routes.lock);
317 	return 0;
318 }
319 
320 static void __net_exit phonet_exit_net(struct net *net)
321 {
322 	struct phonet_net *pnn = phonet_pernet(net);
323 
324 	remove_proc_entry("phonet", net->proc_net);
325 	WARN_ON_ONCE(!list_empty(&pnn->pndevs.list));
326 }
327 
328 static struct pernet_operations phonet_net_ops = {
329 	.init = phonet_init_net,
330 	.exit = phonet_exit_net,
331 	.id   = &phonet_net_id,
332 	.size = sizeof(struct phonet_net),
333 };
334 
335 /* Initialize Phonet devices list */
336 int __init phonet_device_init(void)
337 {
338 	int err = register_pernet_subsys(&phonet_net_ops);
339 	if (err)
340 		return err;
341 
342 	proc_create_net("pnresource", 0, init_net.proc_net, &pn_res_seq_ops,
343 			sizeof(struct seq_net_private));
344 	register_netdevice_notifier(&phonet_device_notifier);
345 	err = phonet_netlink_register();
346 	if (err)
347 		phonet_device_exit();
348 	return err;
349 }
350 
351 void phonet_device_exit(void)
352 {
353 	rtnl_unregister_all(PF_PHONET);
354 	unregister_netdevice_notifier(&phonet_device_notifier);
355 	unregister_pernet_subsys(&phonet_net_ops);
356 	remove_proc_entry("pnresource", init_net.proc_net);
357 }
358 
359 int phonet_route_add(struct net_device *dev, u8 daddr)
360 {
361 	struct phonet_net *pnn = phonet_pernet(dev_net(dev));
362 	struct phonet_routes *routes = &pnn->routes;
363 	int err = -EEXIST;
364 
365 	daddr = daddr >> 2;
366 	mutex_lock(&routes->lock);
367 	if (routes->table[daddr] == NULL) {
368 		rcu_assign_pointer(routes->table[daddr], dev);
369 		dev_hold(dev);
370 		err = 0;
371 	}
372 	mutex_unlock(&routes->lock);
373 	return err;
374 }
375 
376 int phonet_route_del(struct net_device *dev, u8 daddr)
377 {
378 	struct phonet_net *pnn = phonet_pernet(dev_net(dev));
379 	struct phonet_routes *routes = &pnn->routes;
380 
381 	daddr = daddr >> 2;
382 	mutex_lock(&routes->lock);
383 	if (rcu_access_pointer(routes->table[daddr]) == dev)
384 		RCU_INIT_POINTER(routes->table[daddr], NULL);
385 	else
386 		dev = NULL;
387 	mutex_unlock(&routes->lock);
388 
389 	if (!dev)
390 		return -ENOENT;
391 	synchronize_rcu();
392 	dev_put(dev);
393 	return 0;
394 }
395 
396 struct net_device *phonet_route_get_rcu(struct net *net, u8 daddr)
397 {
398 	struct phonet_net *pnn = phonet_pernet(net);
399 	struct phonet_routes *routes = &pnn->routes;
400 	struct net_device *dev;
401 
402 	daddr >>= 2;
403 	dev = rcu_dereference(routes->table[daddr]);
404 	return dev;
405 }
406 
407 struct net_device *phonet_route_output(struct net *net, u8 daddr)
408 {
409 	struct phonet_net *pnn = phonet_pernet(net);
410 	struct phonet_routes *routes = &pnn->routes;
411 	struct net_device *dev;
412 
413 	daddr >>= 2;
414 	rcu_read_lock();
415 	dev = rcu_dereference(routes->table[daddr]);
416 	if (dev)
417 		dev_hold(dev);
418 	rcu_read_unlock();
419 
420 	if (!dev)
421 		dev = phonet_device_get(net); /* Default route */
422 	return dev;
423 }
424