1/*
2 * Loopback IEEE 802.15.4 interface
3 *
4 * Copyright 2007-2012 Siemens AG
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License version 2
8 * as published by the Free Software Foundation.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 * GNU General Public License for more details.
14 *
15 * Written by:
16 * Sergey Lapin <slapin@ossfans.org>
17 * Dmitry Eremin-Solenikov <dbaryshkov@gmail.com>
18 * Alexander Smirnov <alex.bluesman.smirnov@gmail.com>
19 */
20
21#include <linux/module.h>
22#include <linux/timer.h>
23#include <linux/platform_device.h>
24#include <linux/netdevice.h>
25#include <linux/device.h>
26#include <linux/spinlock.h>
27#include <net/mac802154.h>
28#include <net/cfg802154.h>
29
30static int numlbs = 2;
31
32static LIST_HEAD(fakelb_phys);
33static DEFINE_SPINLOCK(fakelb_phys_lock);
34
35static LIST_HEAD(fakelb_ifup_phys);
36static DEFINE_RWLOCK(fakelb_ifup_phys_lock);
37
38struct fakelb_phy {
39	struct ieee802154_hw *hw;
40
41	u8 page;
42	u8 channel;
43
44	bool suspended;
45
46	struct list_head list;
47	struct list_head list_ifup;
48};
49
50static int fakelb_hw_ed(struct ieee802154_hw *hw, u8 *level)
51{
52	BUG_ON(!level);
53	*level = 0xbe;
54
55	return 0;
56}
57
58static int fakelb_hw_channel(struct ieee802154_hw *hw, u8 page, u8 channel)
59{
60	struct fakelb_phy *phy = hw->priv;
61
62	write_lock_bh(&fakelb_ifup_phys_lock);
63	phy->page = page;
64	phy->channel = channel;
65	write_unlock_bh(&fakelb_ifup_phys_lock);
66	return 0;
67}
68
69static int fakelb_hw_xmit(struct ieee802154_hw *hw, struct sk_buff *skb)
70{
71	struct fakelb_phy *current_phy = hw->priv, *phy;
72
73	read_lock_bh(&fakelb_ifup_phys_lock);
74	WARN_ON(current_phy->suspended);
75	list_for_each_entry(phy, &fakelb_ifup_phys, list_ifup) {
76		if (current_phy == phy)
77			continue;
78
79		if (current_phy->page == phy->page &&
80		    current_phy->channel == phy->channel) {
81			struct sk_buff *newskb = pskb_copy(skb, GFP_ATOMIC);
82
83			if (newskb)
84				ieee802154_rx_irqsafe(phy->hw, newskb, 0xcc);
85		}
86	}
87	read_unlock_bh(&fakelb_ifup_phys_lock);
88
89	ieee802154_xmit_complete(hw, skb, false);
90	return 0;
91}
92
93static int fakelb_hw_start(struct ieee802154_hw *hw)
94{
95	struct fakelb_phy *phy = hw->priv;
96
97	write_lock_bh(&fakelb_ifup_phys_lock);
98	phy->suspended = false;
99	list_add(&phy->list_ifup, &fakelb_ifup_phys);
100	write_unlock_bh(&fakelb_ifup_phys_lock);
101
102	return 0;
103}
104
105static void fakelb_hw_stop(struct ieee802154_hw *hw)
106{
107	struct fakelb_phy *phy = hw->priv;
108
109	write_lock_bh(&fakelb_ifup_phys_lock);
110	phy->suspended = true;
111	list_del(&phy->list_ifup);
112	write_unlock_bh(&fakelb_ifup_phys_lock);
113}
114
115static const struct ieee802154_ops fakelb_ops = {
116	.owner = THIS_MODULE,
117	.xmit_async = fakelb_hw_xmit,
118	.ed = fakelb_hw_ed,
119	.set_channel = fakelb_hw_channel,
120	.start = fakelb_hw_start,
121	.stop = fakelb_hw_stop,
122};
123
124/* Number of dummy devices to be set up by this module. */
125module_param(numlbs, int, 0);
126MODULE_PARM_DESC(numlbs, " number of pseudo devices");
127
128static int fakelb_add_one(struct device *dev)
129{
130	struct ieee802154_hw *hw;
131	struct fakelb_phy *phy;
132	int err;
133
134	hw = ieee802154_alloc_hw(sizeof(*phy), &fakelb_ops);
135	if (!hw)
136		return -ENOMEM;
137
138	phy = hw->priv;
139	phy->hw = hw;
140
141	/* 868 MHz BPSK	802.15.4-2003 */
142	hw->phy->supported.channels[0] |= 1;
143	/* 915 MHz BPSK	802.15.4-2003 */
144	hw->phy->supported.channels[0] |= 0x7fe;
145	/* 2.4 GHz O-QPSK 802.15.4-2003 */
146	hw->phy->supported.channels[0] |= 0x7FFF800;
147	/* 868 MHz ASK 802.15.4-2006 */
148	hw->phy->supported.channels[1] |= 1;
149	/* 915 MHz ASK 802.15.4-2006 */
150	hw->phy->supported.channels[1] |= 0x7fe;
151	/* 868 MHz O-QPSK 802.15.4-2006 */
152	hw->phy->supported.channels[2] |= 1;
153	/* 915 MHz O-QPSK 802.15.4-2006 */
154	hw->phy->supported.channels[2] |= 0x7fe;
155	/* 2.4 GHz CSS 802.15.4a-2007 */
156	hw->phy->supported.channels[3] |= 0x3fff;
157	/* UWB Sub-gigahertz 802.15.4a-2007 */
158	hw->phy->supported.channels[4] |= 1;
159	/* UWB Low band 802.15.4a-2007 */
160	hw->phy->supported.channels[4] |= 0x1e;
161	/* UWB High band 802.15.4a-2007 */
162	hw->phy->supported.channels[4] |= 0xffe0;
163	/* 750 MHz O-QPSK 802.15.4c-2009 */
164	hw->phy->supported.channels[5] |= 0xf;
165	/* 750 MHz MPSK 802.15.4c-2009 */
166	hw->phy->supported.channels[5] |= 0xf0;
167	/* 950 MHz BPSK 802.15.4d-2009 */
168	hw->phy->supported.channels[6] |= 0x3ff;
169	/* 950 MHz GFSK 802.15.4d-2009 */
170	hw->phy->supported.channels[6] |= 0x3ffc00;
171
172	ieee802154_random_extended_addr(&hw->phy->perm_extended_addr);
173	/* fake phy channel 13 as default */
174	hw->phy->current_channel = 13;
175	phy->channel = hw->phy->current_channel;
176
177	hw->parent = dev;
178
179	err = ieee802154_register_hw(hw);
180	if (err)
181		goto err_reg;
182
183	spin_lock(&fakelb_phys_lock);
184	list_add_tail(&phy->list, &fakelb_phys);
185	spin_unlock(&fakelb_phys_lock);
186
187	return 0;
188
189err_reg:
190	ieee802154_free_hw(phy->hw);
191	return err;
192}
193
194static void fakelb_del(struct fakelb_phy *phy)
195{
196	list_del(&phy->list);
197
198	ieee802154_unregister_hw(phy->hw);
199	ieee802154_free_hw(phy->hw);
200}
201
202static int fakelb_probe(struct platform_device *pdev)
203{
204	struct fakelb_phy *phy, *tmp;
205	int err, i;
206
207	for (i = 0; i < numlbs; i++) {
208		err = fakelb_add_one(&pdev->dev);
209		if (err < 0)
210			goto err_slave;
211	}
212
213	dev_info(&pdev->dev, "added ieee802154 hardware\n");
214	return 0;
215
216err_slave:
217	spin_lock(&fakelb_phys_lock);
218	list_for_each_entry_safe(phy, tmp, &fakelb_phys, list)
219		fakelb_del(phy);
220	spin_unlock(&fakelb_phys_lock);
221	return err;
222}
223
224static int fakelb_remove(struct platform_device *pdev)
225{
226	struct fakelb_phy *phy, *tmp;
227
228	spin_lock(&fakelb_phys_lock);
229	list_for_each_entry_safe(phy, tmp, &fakelb_phys, list)
230		fakelb_del(phy);
231	spin_unlock(&fakelb_phys_lock);
232	return 0;
233}
234
235static struct platform_device *ieee802154fake_dev;
236
237static struct platform_driver ieee802154fake_driver = {
238	.probe = fakelb_probe,
239	.remove = fakelb_remove,
240	.driver = {
241			.name = "ieee802154fakelb",
242	},
243};
244
245static __init int fakelb_init_module(void)
246{
247	ieee802154fake_dev = platform_device_register_simple(
248			     "ieee802154fakelb", -1, NULL, 0);
249	return platform_driver_register(&ieee802154fake_driver);
250}
251
252static __exit void fake_remove_module(void)
253{
254	platform_driver_unregister(&ieee802154fake_driver);
255	platform_device_unregister(ieee802154fake_dev);
256}
257
258module_init(fakelb_init_module);
259module_exit(fake_remove_module);
260MODULE_LICENSE("GPL");
261