xref: /openbmc/linux/drivers/connector/connector.c (revision c819e2cf)
1 /*
2  *	connector.c
3  *
4  * 2004+ Copyright (c) Evgeniy Polyakov <zbr@ioremap.net>
5  * All rights reserved.
6  *
7  * This program is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 2 of the License, or
10  * (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; if not, write to the Free Software
19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
20  */
21 
22 #include <linux/kernel.h>
23 #include <linux/module.h>
24 #include <linux/list.h>
25 #include <linux/skbuff.h>
26 #include <net/netlink.h>
27 #include <linux/moduleparam.h>
28 #include <linux/connector.h>
29 #include <linux/slab.h>
30 #include <linux/mutex.h>
31 #include <linux/proc_fs.h>
32 #include <linux/spinlock.h>
33 
34 #include <net/sock.h>
35 
36 MODULE_LICENSE("GPL");
37 MODULE_AUTHOR("Evgeniy Polyakov <zbr@ioremap.net>");
38 MODULE_DESCRIPTION("Generic userspace <-> kernelspace connector.");
39 MODULE_ALIAS_NET_PF_PROTO(PF_NETLINK, NETLINK_CONNECTOR);
40 
41 static struct cn_dev cdev;
42 
43 static int cn_already_initialized;
44 
45 /*
46  * Sends mult (multiple) cn_msg at a time.
47  *
48  * msg->seq and msg->ack are used to determine message genealogy.
49  * When someone sends message it puts there locally unique sequence
50  * and random acknowledge numbers.  Sequence number may be copied into
51  * nlmsghdr->nlmsg_seq too.
52  *
53  * Sequence number is incremented with each message to be sent.
54  *
55  * If we expect a reply to our message then the sequence number in
56  * received message MUST be the same as in original message, and
57  * acknowledge number MUST be the same + 1.
58  *
59  * If we receive a message and its sequence number is not equal to the
60  * one we are expecting then it is a new message.
61  *
62  * If we receive a message and its sequence number is the same as one
63  * we are expecting but it's acknowledgement number is not equal to
64  * the acknowledgement number in the original message + 1, then it is
65  * a new message.
66  *
67  * If msg->len != len, then additional cn_msg messages are expected following
68  * the first msg.
69  *
70  * The message is sent to, the portid if given, the group if given, both if
71  * both, or if both are zero then the group is looked up and sent there.
72  */
73 int cn_netlink_send_mult(struct cn_msg *msg, u16 len, u32 portid, u32 __group,
74 	gfp_t gfp_mask)
75 {
76 	struct cn_callback_entry *__cbq;
77 	unsigned int size;
78 	struct sk_buff *skb;
79 	struct nlmsghdr *nlh;
80 	struct cn_msg *data;
81 	struct cn_dev *dev = &cdev;
82 	u32 group = 0;
83 	int found = 0;
84 
85 	if (portid || __group) {
86 		group = __group;
87 	} else {
88 		spin_lock_bh(&dev->cbdev->queue_lock);
89 		list_for_each_entry(__cbq, &dev->cbdev->queue_list,
90 				    callback_entry) {
91 			if (cn_cb_equal(&__cbq->id.id, &msg->id)) {
92 				found = 1;
93 				group = __cbq->group;
94 				break;
95 			}
96 		}
97 		spin_unlock_bh(&dev->cbdev->queue_lock);
98 
99 		if (!found)
100 			return -ENODEV;
101 	}
102 
103 	if (!portid && !netlink_has_listeners(dev->nls, group))
104 		return -ESRCH;
105 
106 	size = sizeof(*msg) + len;
107 
108 	skb = nlmsg_new(size, gfp_mask);
109 	if (!skb)
110 		return -ENOMEM;
111 
112 	nlh = nlmsg_put(skb, 0, msg->seq, NLMSG_DONE, size, 0);
113 	if (!nlh) {
114 		kfree_skb(skb);
115 		return -EMSGSIZE;
116 	}
117 
118 	data = nlmsg_data(nlh);
119 
120 	memcpy(data, msg, size);
121 
122 	NETLINK_CB(skb).dst_group = group;
123 
124 	if (group)
125 		return netlink_broadcast(dev->nls, skb, portid, group,
126 					 gfp_mask);
127 	return netlink_unicast(dev->nls, skb, portid, !(gfp_mask&__GFP_WAIT));
128 }
129 EXPORT_SYMBOL_GPL(cn_netlink_send_mult);
130 
131 /* same as cn_netlink_send_mult except msg->len is used for len */
132 int cn_netlink_send(struct cn_msg *msg, u32 portid, u32 __group,
133 	gfp_t gfp_mask)
134 {
135 	return cn_netlink_send_mult(msg, msg->len, portid, __group, gfp_mask);
136 }
137 EXPORT_SYMBOL_GPL(cn_netlink_send);
138 
139 /*
140  * Callback helper - queues work and setup destructor for given data.
141  */
142 static int cn_call_callback(struct sk_buff *skb)
143 {
144 	struct nlmsghdr *nlh;
145 	struct cn_callback_entry *i, *cbq = NULL;
146 	struct cn_dev *dev = &cdev;
147 	struct cn_msg *msg = nlmsg_data(nlmsg_hdr(skb));
148 	struct netlink_skb_parms *nsp = &NETLINK_CB(skb);
149 	int err = -ENODEV;
150 
151 	/* verify msg->len is within skb */
152 	nlh = nlmsg_hdr(skb);
153 	if (nlh->nlmsg_len < NLMSG_HDRLEN + sizeof(struct cn_msg) + msg->len)
154 		return -EINVAL;
155 
156 	spin_lock_bh(&dev->cbdev->queue_lock);
157 	list_for_each_entry(i, &dev->cbdev->queue_list, callback_entry) {
158 		if (cn_cb_equal(&i->id.id, &msg->id)) {
159 			atomic_inc(&i->refcnt);
160 			cbq = i;
161 			break;
162 		}
163 	}
164 	spin_unlock_bh(&dev->cbdev->queue_lock);
165 
166 	if (cbq != NULL) {
167 		cbq->callback(msg, nsp);
168 		kfree_skb(skb);
169 		cn_queue_release_callback(cbq);
170 		err = 0;
171 	}
172 
173 	return err;
174 }
175 
176 /*
177  * Main netlink receiving function.
178  *
179  * It checks skb, netlink header and msg sizes, and calls callback helper.
180  */
181 static void cn_rx_skb(struct sk_buff *__skb)
182 {
183 	struct nlmsghdr *nlh;
184 	struct sk_buff *skb;
185 	int len, err;
186 
187 	skb = skb_get(__skb);
188 
189 	if (skb->len >= NLMSG_HDRLEN) {
190 		nlh = nlmsg_hdr(skb);
191 		len = nlmsg_len(nlh);
192 
193 		if (len < (int)sizeof(struct cn_msg) ||
194 		    skb->len < nlh->nlmsg_len ||
195 		    len > CONNECTOR_MAX_MSG_SIZE) {
196 			kfree_skb(skb);
197 			return;
198 		}
199 
200 		err = cn_call_callback(skb);
201 		if (err < 0)
202 			kfree_skb(skb);
203 	}
204 }
205 
206 /*
207  * Callback add routing - adds callback with given ID and name.
208  * If there is registered callback with the same ID it will not be added.
209  *
210  * May sleep.
211  */
212 int cn_add_callback(struct cb_id *id, const char *name,
213 		    void (*callback)(struct cn_msg *,
214 				     struct netlink_skb_parms *))
215 {
216 	int err;
217 	struct cn_dev *dev = &cdev;
218 
219 	if (!cn_already_initialized)
220 		return -EAGAIN;
221 
222 	err = cn_queue_add_callback(dev->cbdev, name, id, callback);
223 	if (err)
224 		return err;
225 
226 	return 0;
227 }
228 EXPORT_SYMBOL_GPL(cn_add_callback);
229 
230 /*
231  * Callback remove routing - removes callback
232  * with given ID.
233  * If there is no registered callback with given
234  * ID nothing happens.
235  *
236  * May sleep while waiting for reference counter to become zero.
237  */
238 void cn_del_callback(struct cb_id *id)
239 {
240 	struct cn_dev *dev = &cdev;
241 
242 	cn_queue_del_callback(dev->cbdev, id);
243 }
244 EXPORT_SYMBOL_GPL(cn_del_callback);
245 
246 static int cn_proc_show(struct seq_file *m, void *v)
247 {
248 	struct cn_queue_dev *dev = cdev.cbdev;
249 	struct cn_callback_entry *cbq;
250 
251 	seq_printf(m, "Name            ID\n");
252 
253 	spin_lock_bh(&dev->queue_lock);
254 
255 	list_for_each_entry(cbq, &dev->queue_list, callback_entry) {
256 		seq_printf(m, "%-15s %u:%u\n",
257 			   cbq->id.name,
258 			   cbq->id.id.idx,
259 			   cbq->id.id.val);
260 	}
261 
262 	spin_unlock_bh(&dev->queue_lock);
263 
264 	return 0;
265 }
266 
267 static int cn_proc_open(struct inode *inode, struct file *file)
268 {
269 	return single_open(file, cn_proc_show, NULL);
270 }
271 
272 static const struct file_operations cn_file_ops = {
273 	.owner   = THIS_MODULE,
274 	.open    = cn_proc_open,
275 	.read    = seq_read,
276 	.llseek  = seq_lseek,
277 	.release = single_release
278 };
279 
280 static struct cn_dev cdev = {
281 	.input   = cn_rx_skb,
282 };
283 
284 static int cn_init(void)
285 {
286 	struct cn_dev *dev = &cdev;
287 	struct netlink_kernel_cfg cfg = {
288 		.groups	= CN_NETLINK_USERS + 0xf,
289 		.input	= dev->input,
290 	};
291 
292 	dev->nls = netlink_kernel_create(&init_net, NETLINK_CONNECTOR, &cfg);
293 	if (!dev->nls)
294 		return -EIO;
295 
296 	dev->cbdev = cn_queue_alloc_dev("cqueue", dev->nls);
297 	if (!dev->cbdev) {
298 		netlink_kernel_release(dev->nls);
299 		return -EINVAL;
300 	}
301 
302 	cn_already_initialized = 1;
303 
304 	proc_create("connector", S_IRUGO, init_net.proc_net, &cn_file_ops);
305 
306 	return 0;
307 }
308 
309 static void cn_fini(void)
310 {
311 	struct cn_dev *dev = &cdev;
312 
313 	cn_already_initialized = 0;
314 
315 	remove_proc_entry("connector", init_net.proc_net);
316 
317 	cn_queue_free_dev(dev->cbdev);
318 	netlink_kernel_release(dev->nls);
319 }
320 
321 subsys_initcall(cn_init);
322 module_exit(cn_fini);
323