1 /*
2  * WPA Supplicant / privileged helper program
3  * Copyright (c) 2007-2009, Jouni Malinen <j@w1.fi>
4  *
5  * This software may be distributed under the terms of the BSD license.
6  * See README for more details.
7  */
8 
9 #include "includes.h"
10 #ifdef __linux__
11 #include <fcntl.h>
12 #endif /* __linux__ */
13 #include <sys/un.h>
14 #include <sys/stat.h>
15 
16 #include "common.h"
17 #include "eloop.h"
18 #include "common/version.h"
19 #include "drivers/driver.h"
20 #include "l2_packet/l2_packet.h"
21 #include "common/privsep_commands.h"
22 #include "common/ieee802_11_defs.h"
23 
24 
25 struct wpa_priv_interface {
26 	struct wpa_priv_interface *next;
27 	char *driver_name;
28 	char *ifname;
29 	char *sock_name;
30 	int fd;
31 
32 	struct wpa_driver_ops *driver;
33 	void *drv_priv;
34 	struct sockaddr_un drv_addr;
35 	int wpas_registered;
36 
37 	/* TODO: add support for multiple l2 connections */
38 	struct l2_packet_data *l2;
39 	struct sockaddr_un l2_addr;
40 };
41 
42 
43 static void wpa_priv_cmd_register(struct wpa_priv_interface *iface,
44 				  struct sockaddr_un *from)
45 {
46 	if (iface->drv_priv) {
47 		wpa_printf(MSG_DEBUG, "Cleaning up forgotten driver instance");
48 		if (iface->driver->deinit)
49 			iface->driver->deinit(iface->drv_priv);
50 		iface->drv_priv = NULL;
51 		iface->wpas_registered = 0;
52 	}
53 
54 	if (iface->l2) {
55 		wpa_printf(MSG_DEBUG, "Cleaning up forgotten l2_packet "
56 			   "instance");
57 		l2_packet_deinit(iface->l2);
58 		iface->l2 = NULL;
59 	}
60 
61 	if (iface->driver->init == NULL)
62 		return;
63 
64 	iface->drv_priv = iface->driver->init(iface, iface->ifname);
65 	if (iface->drv_priv == NULL) {
66 		wpa_printf(MSG_DEBUG, "Failed to initialize driver wrapper");
67 		return;
68 	}
69 
70 	wpa_printf(MSG_DEBUG, "Driver wrapper '%s' initialized for interface "
71 		   "'%s'", iface->driver_name, iface->ifname);
72 
73 	os_memcpy(&iface->drv_addr, from, sizeof(iface->drv_addr));
74 	iface->wpas_registered = 1;
75 
76 	if (iface->driver->set_param &&
77 	    iface->driver->set_param(iface->drv_priv, NULL) < 0) {
78 		wpa_printf(MSG_ERROR, "Driver interface rejected param");
79 	}
80 }
81 
82 
83 static void wpa_priv_cmd_unregister(struct wpa_priv_interface *iface,
84 				    struct sockaddr_un *from)
85 {
86 	if (iface->drv_priv) {
87 		if (iface->driver->deinit)
88 			iface->driver->deinit(iface->drv_priv);
89 		iface->drv_priv = NULL;
90 		iface->wpas_registered = 0;
91 	}
92 }
93 
94 
95 static void wpa_priv_cmd_scan(struct wpa_priv_interface *iface,
96 			      char *buf, size_t len)
97 {
98 	struct wpa_driver_scan_params params;
99 
100 	if (iface->drv_priv == NULL)
101 		return;
102 
103 	os_memset(&params, 0, sizeof(params));
104 	if (len) {
105 		params.ssids[0].ssid = (u8 *) buf;
106 		params.ssids[0].ssid_len = len;
107 		params.num_ssids = 1;
108 	}
109 
110 	if (iface->driver->scan2)
111 		iface->driver->scan2(iface->drv_priv, &params);
112 }
113 
114 
115 static void wpa_priv_get_scan_results2(struct wpa_priv_interface *iface,
116 				       struct sockaddr_un *from)
117 {
118 	struct wpa_scan_results *res;
119 	u8 *buf = NULL, *pos, *end;
120 	int val;
121 	size_t i;
122 
123 	res = iface->driver->get_scan_results2(iface->drv_priv);
124 	if (res == NULL)
125 		goto fail;
126 
127 	buf = os_malloc(60000);
128 	if (buf == NULL)
129 		goto fail;
130 	pos = buf;
131 	end = buf + 60000;
132 	val = res->num;
133 	os_memcpy(pos, &val, sizeof(int));
134 	pos += sizeof(int);
135 
136 	for (i = 0; i < res->num; i++) {
137 		struct wpa_scan_res *r = res->res[i];
138 		val = sizeof(*r) + r->ie_len;
139 		if (end - pos < (int) sizeof(int) + val)
140 			break;
141 		os_memcpy(pos, &val, sizeof(int));
142 		pos += sizeof(int);
143 		os_memcpy(pos, r, val);
144 		pos += val;
145 	}
146 
147 	sendto(iface->fd, buf, pos - buf, 0, (struct sockaddr *) from,
148 	       sizeof(*from));
149 
150 	os_free(buf);
151 	wpa_scan_results_free(res);
152 	return;
153 
154 fail:
155 	os_free(buf);
156 	wpa_scan_results_free(res);
157 	sendto(iface->fd, "", 0, 0, (struct sockaddr *) from, sizeof(*from));
158 }
159 
160 
161 static void wpa_priv_cmd_get_scan_results(struct wpa_priv_interface *iface,
162 					  struct sockaddr_un *from)
163 {
164 	if (iface->drv_priv == NULL)
165 		return;
166 
167 	if (iface->driver->get_scan_results2)
168 		wpa_priv_get_scan_results2(iface, from);
169 	else
170 		sendto(iface->fd, "", 0, 0, (struct sockaddr *) from,
171 		       sizeof(*from));
172 }
173 
174 
175 static void wpa_priv_cmd_associate(struct wpa_priv_interface *iface,
176 				   void *buf, size_t len)
177 {
178 	struct wpa_driver_associate_params params;
179 	struct privsep_cmd_associate *assoc;
180 	u8 *bssid;
181 	int res;
182 
183 	if (iface->drv_priv == NULL || iface->driver->associate == NULL)
184 		return;
185 
186 	if (len < sizeof(*assoc)) {
187 		wpa_printf(MSG_DEBUG, "Invalid association request");
188 		return;
189 	}
190 
191 	assoc = buf;
192 	if (sizeof(*assoc) + assoc->wpa_ie_len > len) {
193 		wpa_printf(MSG_DEBUG, "Association request overflow");
194 		return;
195 	}
196 
197 	os_memset(&params, 0, sizeof(params));
198 	bssid = assoc->bssid;
199 	if (bssid[0] | bssid[1] | bssid[2] | bssid[3] | bssid[4] | bssid[5])
200 		params.bssid = bssid;
201 	params.ssid = assoc->ssid;
202 	if (assoc->ssid_len > 32)
203 		return;
204 	params.ssid_len = assoc->ssid_len;
205 	params.freq = assoc->freq;
206 	if (assoc->wpa_ie_len) {
207 		params.wpa_ie = (u8 *) (assoc + 1);
208 		params.wpa_ie_len = assoc->wpa_ie_len;
209 	}
210 	params.pairwise_suite = assoc->pairwise_suite;
211 	params.group_suite = assoc->group_suite;
212 	params.key_mgmt_suite = assoc->key_mgmt_suite;
213 	params.auth_alg = assoc->auth_alg;
214 	params.mode = assoc->mode;
215 
216 	res = iface->driver->associate(iface->drv_priv, &params);
217 	wpa_printf(MSG_DEBUG, "drv->associate: res=%d", res);
218 }
219 
220 
221 static void wpa_priv_cmd_get_bssid(struct wpa_priv_interface *iface,
222 				   struct sockaddr_un *from)
223 {
224 	u8 bssid[ETH_ALEN];
225 
226 	if (iface->drv_priv == NULL)
227 		goto fail;
228 
229 	if (iface->driver->get_bssid == NULL ||
230 	    iface->driver->get_bssid(iface->drv_priv, bssid) < 0)
231 		goto fail;
232 
233 	sendto(iface->fd, bssid, ETH_ALEN, 0, (struct sockaddr *) from,
234 	       sizeof(*from));
235 	return;
236 
237 fail:
238 	sendto(iface->fd, "", 0, 0, (struct sockaddr *) from, sizeof(*from));
239 }
240 
241 
242 static void wpa_priv_cmd_get_ssid(struct wpa_priv_interface *iface,
243 				  struct sockaddr_un *from)
244 {
245 	u8 ssid[sizeof(int) + 32];
246 	int res;
247 
248 	if (iface->drv_priv == NULL)
249 		goto fail;
250 
251 	if (iface->driver->get_ssid == NULL)
252 		goto fail;
253 
254 	res = iface->driver->get_ssid(iface->drv_priv, &ssid[sizeof(int)]);
255 	if (res < 0 || res > 32)
256 		goto fail;
257 	os_memcpy(ssid, &res, sizeof(int));
258 
259 	sendto(iface->fd, ssid, sizeof(ssid), 0, (struct sockaddr *) from,
260 	       sizeof(*from));
261 	return;
262 
263 fail:
264 	sendto(iface->fd, "", 0, 0, (struct sockaddr *) from, sizeof(*from));
265 }
266 
267 
268 static void wpa_priv_cmd_set_key(struct wpa_priv_interface *iface,
269 				 void *buf, size_t len)
270 {
271 	struct privsep_cmd_set_key *params;
272 	int res;
273 
274 	if (iface->drv_priv == NULL || iface->driver->set_key == NULL)
275 		return;
276 
277 	if (len != sizeof(*params)) {
278 		wpa_printf(MSG_DEBUG, "Invalid set_key request");
279 		return;
280 	}
281 
282 	params = buf;
283 
284 	res = iface->driver->set_key(iface->ifname, iface->drv_priv,
285 				     params->alg,
286 				     params->addr, params->key_idx,
287 				     params->set_tx,
288 				     params->seq_len ? params->seq : NULL,
289 				     params->seq_len,
290 				     params->key_len ? params->key : NULL,
291 				     params->key_len);
292 	wpa_printf(MSG_DEBUG, "drv->set_key: res=%d", res);
293 }
294 
295 
296 static void wpa_priv_cmd_get_capa(struct wpa_priv_interface *iface,
297 				  struct sockaddr_un *from)
298 {
299 	struct wpa_driver_capa capa;
300 
301 	if (iface->drv_priv == NULL)
302 		goto fail;
303 
304 	if (iface->driver->get_capa == NULL ||
305 	    iface->driver->get_capa(iface->drv_priv, &capa) < 0)
306 		goto fail;
307 
308 	sendto(iface->fd, &capa, sizeof(capa), 0, (struct sockaddr *) from,
309 	       sizeof(*from));
310 	return;
311 
312 fail:
313 	sendto(iface->fd, "", 0, 0, (struct sockaddr *) from, sizeof(*from));
314 }
315 
316 
317 static void wpa_priv_l2_rx(void *ctx, const u8 *src_addr, const u8 *buf,
318 			   size_t len)
319 {
320 	struct wpa_priv_interface *iface = ctx;
321 	struct msghdr msg;
322 	struct iovec io[2];
323 
324 	io[0].iov_base = (u8 *) src_addr;
325 	io[0].iov_len = ETH_ALEN;
326 	io[1].iov_base = (u8 *) buf;
327 	io[1].iov_len = len;
328 
329 	os_memset(&msg, 0, sizeof(msg));
330 	msg.msg_iov = io;
331 	msg.msg_iovlen = 2;
332 	msg.msg_name = &iface->l2_addr;
333 	msg.msg_namelen = sizeof(iface->l2_addr);
334 
335 	if (sendmsg(iface->fd, &msg, 0) < 0) {
336 		perror("sendmsg(l2 rx)");
337 	}
338 }
339 
340 
341 static void wpa_priv_cmd_l2_register(struct wpa_priv_interface *iface,
342 				     struct sockaddr_un *from,
343 				     void *buf, size_t len)
344 {
345 	int *reg_cmd = buf;
346 	u8 own_addr[ETH_ALEN];
347 	int res;
348 	u16 proto;
349 
350 	if (len != 2 * sizeof(int)) {
351 		wpa_printf(MSG_DEBUG, "Invalid l2_register length %lu",
352 			   (unsigned long) len);
353 		return;
354 	}
355 
356 	proto = reg_cmd[0];
357 	if (proto != ETH_P_EAPOL && proto != ETH_P_RSN_PREAUTH) {
358 		wpa_printf(MSG_DEBUG, "Refused l2_packet connection for "
359 			   "ethertype 0x%x", proto);
360 		return;
361 	}
362 
363 	if (iface->l2) {
364 		wpa_printf(MSG_DEBUG, "Cleaning up forgotten l2_packet "
365 			   "instance");
366 		l2_packet_deinit(iface->l2);
367 		iface->l2 = NULL;
368 	}
369 
370 	os_memcpy(&iface->l2_addr, from, sizeof(iface->l2_addr));
371 
372 	iface->l2 = l2_packet_init(iface->ifname, NULL, proto,
373 				   wpa_priv_l2_rx, iface, reg_cmd[1]);
374 	if (iface->l2 == NULL) {
375 		wpa_printf(MSG_DEBUG, "Failed to initialize l2_packet "
376 			   "instance for protocol %d", proto);
377 		return;
378 	}
379 
380 	if (l2_packet_get_own_addr(iface->l2, own_addr) < 0) {
381 		wpa_printf(MSG_DEBUG, "Failed to get own address from "
382 			   "l2_packet");
383 		l2_packet_deinit(iface->l2);
384 		iface->l2 = NULL;
385 		return;
386 	}
387 
388 	res = sendto(iface->fd, own_addr, ETH_ALEN, 0,
389 		     (struct sockaddr *) from, sizeof(*from));
390 	wpa_printf(MSG_DEBUG, "L2 registration: res=%d", res);
391 }
392 
393 
394 static void wpa_priv_cmd_l2_unregister(struct wpa_priv_interface *iface,
395 				       struct sockaddr_un *from)
396 {
397 	if (iface->l2) {
398 		l2_packet_deinit(iface->l2);
399 		iface->l2 = NULL;
400 	}
401 }
402 
403 
404 static void wpa_priv_cmd_l2_notify_auth_start(struct wpa_priv_interface *iface,
405 					      struct sockaddr_un *from)
406 {
407 	if (iface->l2)
408 		l2_packet_notify_auth_start(iface->l2);
409 }
410 
411 
412 static void wpa_priv_cmd_l2_send(struct wpa_priv_interface *iface,
413 				 struct sockaddr_un *from,
414 				 void *buf, size_t len)
415 {
416 	u8 *dst_addr;
417 	u16 proto;
418 	int res;
419 
420 	if (iface->l2 == NULL)
421 		return;
422 
423 	if (len < ETH_ALEN + 2) {
424 		wpa_printf(MSG_DEBUG, "Too short L2 send packet (len=%lu)",
425 			   (unsigned long) len);
426 		return;
427 	}
428 
429 	dst_addr = buf;
430 	os_memcpy(&proto, buf + ETH_ALEN, 2);
431 
432 	if (proto != ETH_P_EAPOL && proto != ETH_P_RSN_PREAUTH) {
433 		wpa_printf(MSG_DEBUG, "Refused l2_packet send for ethertype "
434 			   "0x%x", proto);
435 		return;
436 	}
437 
438 	res = l2_packet_send(iface->l2, dst_addr, proto, buf + ETH_ALEN + 2,
439 			     len - ETH_ALEN - 2);
440 	wpa_printf(MSG_DEBUG, "L2 send: res=%d", res);
441 }
442 
443 
444 static void wpa_priv_cmd_set_country(struct wpa_priv_interface *iface,
445 				     char *buf)
446 {
447 	if (iface->drv_priv == NULL || iface->driver->set_country == NULL ||
448 	    *buf == '\0')
449 		return;
450 
451 	iface->driver->set_country(iface->drv_priv, buf);
452 }
453 
454 
455 static void wpa_priv_receive(int sock, void *eloop_ctx, void *sock_ctx)
456 {
457 	struct wpa_priv_interface *iface = eloop_ctx;
458 	char buf[2000], *pos;
459 	void *cmd_buf;
460 	size_t cmd_len;
461 	int res, cmd;
462 	struct sockaddr_un from;
463 	socklen_t fromlen = sizeof(from);
464 
465 	res = recvfrom(sock, buf, sizeof(buf), 0, (struct sockaddr *) &from,
466 		       &fromlen);
467 	if (res < 0) {
468 		perror("recvfrom");
469 		return;
470 	}
471 
472 	if (res < (int) sizeof(int)) {
473 		wpa_printf(MSG_DEBUG, "Too short command (len=%d)", res);
474 		return;
475 	}
476 
477 	os_memcpy(&cmd, buf, sizeof(int));
478 	wpa_printf(MSG_DEBUG, "Command %d for interface %s",
479 		   cmd, iface->ifname);
480 	cmd_buf = &buf[sizeof(int)];
481 	cmd_len = res - sizeof(int);
482 
483 	switch (cmd) {
484 	case PRIVSEP_CMD_REGISTER:
485 		wpa_priv_cmd_register(iface, &from);
486 		break;
487 	case PRIVSEP_CMD_UNREGISTER:
488 		wpa_priv_cmd_unregister(iface, &from);
489 		break;
490 	case PRIVSEP_CMD_SCAN:
491 		wpa_priv_cmd_scan(iface, cmd_buf, cmd_len);
492 		break;
493 	case PRIVSEP_CMD_GET_SCAN_RESULTS:
494 		wpa_priv_cmd_get_scan_results(iface, &from);
495 		break;
496 	case PRIVSEP_CMD_ASSOCIATE:
497 		wpa_priv_cmd_associate(iface, cmd_buf, cmd_len);
498 		break;
499 	case PRIVSEP_CMD_GET_BSSID:
500 		wpa_priv_cmd_get_bssid(iface, &from);
501 		break;
502 	case PRIVSEP_CMD_GET_SSID:
503 		wpa_priv_cmd_get_ssid(iface, &from);
504 		break;
505 	case PRIVSEP_CMD_SET_KEY:
506 		wpa_priv_cmd_set_key(iface, cmd_buf, cmd_len);
507 		break;
508 	case PRIVSEP_CMD_GET_CAPA:
509 		wpa_priv_cmd_get_capa(iface, &from);
510 		break;
511 	case PRIVSEP_CMD_L2_REGISTER:
512 		wpa_priv_cmd_l2_register(iface, &from, cmd_buf, cmd_len);
513 		break;
514 	case PRIVSEP_CMD_L2_UNREGISTER:
515 		wpa_priv_cmd_l2_unregister(iface, &from);
516 		break;
517 	case PRIVSEP_CMD_L2_NOTIFY_AUTH_START:
518 		wpa_priv_cmd_l2_notify_auth_start(iface, &from);
519 		break;
520 	case PRIVSEP_CMD_L2_SEND:
521 		wpa_priv_cmd_l2_send(iface, &from, cmd_buf, cmd_len);
522 		break;
523 	case PRIVSEP_CMD_SET_COUNTRY:
524 		pos = cmd_buf;
525 		if (pos + cmd_len >= buf + sizeof(buf))
526 			break;
527 		pos[cmd_len] = '\0';
528 		wpa_priv_cmd_set_country(iface, pos);
529 		break;
530 	}
531 }
532 
533 
534 static void wpa_priv_interface_deinit(struct wpa_priv_interface *iface)
535 {
536 	if (iface->drv_priv && iface->driver->deinit)
537 		iface->driver->deinit(iface->drv_priv);
538 
539 	if (iface->fd >= 0) {
540 		eloop_unregister_read_sock(iface->fd);
541 		close(iface->fd);
542 		unlink(iface->sock_name);
543 	}
544 
545 	if (iface->l2)
546 		l2_packet_deinit(iface->l2);
547 
548 	os_free(iface->ifname);
549 	os_free(iface->driver_name);
550 	os_free(iface->sock_name);
551 	os_free(iface);
552 }
553 
554 
555 static struct wpa_priv_interface *
556 wpa_priv_interface_init(const char *dir, const char *params)
557 {
558 	struct wpa_priv_interface *iface;
559 	char *pos;
560 	size_t len;
561 	struct sockaddr_un addr;
562 	int i;
563 
564 	pos = os_strchr(params, ':');
565 	if (pos == NULL)
566 		return NULL;
567 
568 	iface = os_zalloc(sizeof(*iface));
569 	if (iface == NULL)
570 		return NULL;
571 	iface->fd = -1;
572 
573 	len = pos - params;
574 	iface->driver_name = dup_binstr(params, len);
575 	if (iface->driver_name == NULL) {
576 		wpa_priv_interface_deinit(iface);
577 		return NULL;
578 	}
579 
580 	for (i = 0; wpa_drivers[i]; i++) {
581 		if (os_strcmp(iface->driver_name,
582 			      wpa_drivers[i]->name) == 0) {
583 			iface->driver = wpa_drivers[i];
584 			break;
585 		}
586 	}
587 	if (iface->driver == NULL) {
588 		wpa_printf(MSG_ERROR, "Unsupported driver '%s'",
589 			   iface->driver_name);
590 		wpa_priv_interface_deinit(iface);
591 		return NULL;
592 	}
593 
594 	pos++;
595 	iface->ifname = os_strdup(pos);
596 	if (iface->ifname == NULL) {
597 		wpa_priv_interface_deinit(iface);
598 		return NULL;
599 	}
600 
601 	len = os_strlen(dir) + 1 + os_strlen(iface->ifname);
602 	iface->sock_name = os_malloc(len + 1);
603 	if (iface->sock_name == NULL) {
604 		wpa_priv_interface_deinit(iface);
605 		return NULL;
606 	}
607 
608 	os_snprintf(iface->sock_name, len + 1, "%s/%s", dir, iface->ifname);
609 	if (os_strlen(iface->sock_name) >= sizeof(addr.sun_path)) {
610 		wpa_priv_interface_deinit(iface);
611 		return NULL;
612 	}
613 
614 	iface->fd = socket(PF_UNIX, SOCK_DGRAM, 0);
615 	if (iface->fd < 0) {
616 		perror("socket(PF_UNIX)");
617 		wpa_priv_interface_deinit(iface);
618 		return NULL;
619 	}
620 
621 	os_memset(&addr, 0, sizeof(addr));
622 	addr.sun_family = AF_UNIX;
623 	os_strlcpy(addr.sun_path, iface->sock_name, sizeof(addr.sun_path));
624 
625 	if (bind(iface->fd, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
626 		wpa_printf(MSG_DEBUG, "bind(PF_UNIX) failed: %s",
627 			   strerror(errno));
628 		if (connect(iface->fd, (struct sockaddr *) &addr,
629 			    sizeof(addr)) < 0) {
630 			wpa_printf(MSG_DEBUG, "Socket exists, but does not "
631 				   "allow connections - assuming it was "
632 				   "leftover from forced program termination");
633 			if (unlink(iface->sock_name) < 0) {
634 				perror("unlink[ctrl_iface]");
635 				wpa_printf(MSG_ERROR, "Could not unlink "
636 					   "existing ctrl_iface socket '%s'",
637 					   iface->sock_name);
638 				goto fail;
639 			}
640 			if (bind(iface->fd, (struct sockaddr *) &addr,
641 				 sizeof(addr)) < 0) {
642 				perror("wpa-priv-iface-init: bind(PF_UNIX)");
643 				goto fail;
644 			}
645 			wpa_printf(MSG_DEBUG, "Successfully replaced leftover "
646 				   "socket '%s'", iface->sock_name);
647 		} else {
648 			wpa_printf(MSG_INFO, "Socket exists and seems to be "
649 				   "in use - cannot override it");
650 			wpa_printf(MSG_INFO, "Delete '%s' manually if it is "
651 				   "not used anymore", iface->sock_name);
652 			goto fail;
653 		}
654 	}
655 
656 	if (chmod(iface->sock_name, S_IRWXU | S_IRWXG | S_IRWXO) < 0) {
657 		perror("chmod");
658 		goto fail;
659 	}
660 
661 	eloop_register_read_sock(iface->fd, wpa_priv_receive, iface, NULL);
662 
663 	return iface;
664 
665 fail:
666 	wpa_priv_interface_deinit(iface);
667 	return NULL;
668 }
669 
670 
671 static int wpa_priv_send_event(struct wpa_priv_interface *iface, int event,
672 			       const void *data, size_t data_len)
673 {
674 	struct msghdr msg;
675 	struct iovec io[2];
676 
677 	io[0].iov_base = &event;
678 	io[0].iov_len = sizeof(event);
679 	io[1].iov_base = (u8 *) data;
680 	io[1].iov_len = data_len;
681 
682 	os_memset(&msg, 0, sizeof(msg));
683 	msg.msg_iov = io;
684 	msg.msg_iovlen = data ? 2 : 1;
685 	msg.msg_name = &iface->drv_addr;
686 	msg.msg_namelen = sizeof(iface->drv_addr);
687 
688 	if (sendmsg(iface->fd, &msg, 0) < 0) {
689 		perror("sendmsg(wpas_socket)");
690 		return -1;
691 	}
692 
693 	return 0;
694 }
695 
696 
697 static void wpa_priv_send_assoc(struct wpa_priv_interface *iface, int event,
698 				union wpa_event_data *data)
699 {
700 	size_t buflen = 3 * sizeof(int);
701 	u8 *buf, *pos;
702 	int len;
703 
704 	if (data) {
705 		buflen += data->assoc_info.req_ies_len +
706 			data->assoc_info.resp_ies_len +
707 			data->assoc_info.beacon_ies_len;
708 	}
709 
710 	buf = os_malloc(buflen);
711 	if (buf == NULL)
712 		return;
713 
714 	pos = buf;
715 
716 	if (data && data->assoc_info.req_ies) {
717 		len = data->assoc_info.req_ies_len;
718 		os_memcpy(pos, &len, sizeof(int));
719 		pos += sizeof(int);
720 		os_memcpy(pos, data->assoc_info.req_ies, len);
721 		pos += len;
722 	} else {
723 		len = 0;
724 		os_memcpy(pos, &len, sizeof(int));
725 		pos += sizeof(int);
726 	}
727 
728 	if (data && data->assoc_info.resp_ies) {
729 		len = data->assoc_info.resp_ies_len;
730 		os_memcpy(pos, &len, sizeof(int));
731 		pos += sizeof(int);
732 		os_memcpy(pos, data->assoc_info.resp_ies, len);
733 		pos += len;
734 	} else {
735 		len = 0;
736 		os_memcpy(pos, &len, sizeof(int));
737 		pos += sizeof(int);
738 	}
739 
740 	if (data && data->assoc_info.beacon_ies) {
741 		len = data->assoc_info.beacon_ies_len;
742 		os_memcpy(pos, &len, sizeof(int));
743 		pos += sizeof(int);
744 		os_memcpy(pos, data->assoc_info.beacon_ies, len);
745 		pos += len;
746 	} else {
747 		len = 0;
748 		os_memcpy(pos, &len, sizeof(int));
749 		pos += sizeof(int);
750 	}
751 
752 	wpa_priv_send_event(iface, event, buf, buflen);
753 
754 	os_free(buf);
755 }
756 
757 
758 static void wpa_priv_send_interface_status(struct wpa_priv_interface *iface,
759 					   union wpa_event_data *data)
760 {
761 	int ievent;
762 	size_t len, maxlen;
763 	u8 *buf;
764 	char *ifname;
765 
766 	if (data == NULL)
767 		return;
768 
769 	ievent = data->interface_status.ievent;
770 	maxlen = sizeof(data->interface_status.ifname);
771 	ifname = data->interface_status.ifname;
772 	for (len = 0; len < maxlen && ifname[len]; len++)
773 		;
774 
775 	buf = os_malloc(sizeof(int) + len);
776 	if (buf == NULL)
777 		return;
778 
779 	os_memcpy(buf, &ievent, sizeof(int));
780 	os_memcpy(buf + sizeof(int), ifname, len);
781 
782 	wpa_priv_send_event(iface, PRIVSEP_EVENT_INTERFACE_STATUS,
783 			    buf, sizeof(int) + len);
784 
785 	os_free(buf);
786 
787 }
788 
789 
790 static void wpa_priv_send_ft_response(struct wpa_priv_interface *iface,
791 				      union wpa_event_data *data)
792 {
793 	size_t len;
794 	u8 *buf, *pos;
795 
796 	if (data == NULL || data->ft_ies.ies == NULL)
797 		return;
798 
799 	len = sizeof(int) + ETH_ALEN + data->ft_ies.ies_len;
800 	buf = os_malloc(len);
801 	if (buf == NULL)
802 		return;
803 
804 	pos = buf;
805 	os_memcpy(pos, &data->ft_ies.ft_action, sizeof(int));
806 	pos += sizeof(int);
807 	os_memcpy(pos, data->ft_ies.target_ap, ETH_ALEN);
808 	pos += ETH_ALEN;
809 	os_memcpy(pos, data->ft_ies.ies, data->ft_ies.ies_len);
810 
811 	wpa_priv_send_event(iface, PRIVSEP_EVENT_FT_RESPONSE, buf, len);
812 
813 	os_free(buf);
814 
815 }
816 
817 
818 void wpa_supplicant_event(void *ctx, enum wpa_event_type event,
819 			  union wpa_event_data *data)
820 {
821 	struct wpa_priv_interface *iface = ctx;
822 
823 	wpa_printf(MSG_DEBUG, "%s - event=%d", __func__, event);
824 
825 	if (!iface->wpas_registered) {
826 		wpa_printf(MSG_DEBUG, "Driver event received, but "
827 			   "wpa_supplicant not registered");
828 		return;
829 	}
830 
831 	switch (event) {
832 	case EVENT_ASSOC:
833 		wpa_priv_send_assoc(iface, PRIVSEP_EVENT_ASSOC, data);
834 		break;
835 	case EVENT_DISASSOC:
836 		wpa_priv_send_event(iface, PRIVSEP_EVENT_DISASSOC, NULL, 0);
837 		break;
838 	case EVENT_ASSOCINFO:
839 		if (data == NULL)
840 			return;
841 		wpa_priv_send_assoc(iface, PRIVSEP_EVENT_ASSOCINFO, data);
842 		break;
843 	case EVENT_MICHAEL_MIC_FAILURE:
844 		if (data == NULL)
845 			return;
846 		wpa_priv_send_event(iface, PRIVSEP_EVENT_MICHAEL_MIC_FAILURE,
847 				    &data->michael_mic_failure.unicast,
848 				    sizeof(int));
849 		break;
850 	case EVENT_SCAN_RESULTS:
851 		wpa_priv_send_event(iface, PRIVSEP_EVENT_SCAN_RESULTS, NULL,
852 				    0);
853 		break;
854 	case EVENT_INTERFACE_STATUS:
855 		wpa_priv_send_interface_status(iface, data);
856 		break;
857 	case EVENT_PMKID_CANDIDATE:
858 		if (data == NULL)
859 			return;
860 		wpa_priv_send_event(iface, PRIVSEP_EVENT_PMKID_CANDIDATE,
861 				    &data->pmkid_candidate,
862 				    sizeof(struct pmkid_candidate));
863 		break;
864 	case EVENT_STKSTART:
865 		if (data == NULL)
866 			return;
867 		wpa_priv_send_event(iface, PRIVSEP_EVENT_STKSTART,
868 				    &data->stkstart.peer, ETH_ALEN);
869 		break;
870 	case EVENT_FT_RESPONSE:
871 		wpa_priv_send_ft_response(iface, data);
872 		break;
873 	default:
874 		wpa_printf(MSG_DEBUG, "Unsupported driver event %d - TODO",
875 			   event);
876 		break;
877 	}
878 }
879 
880 
881 void wpa_supplicant_rx_eapol(void *ctx, const u8 *src_addr,
882 			     const u8 *buf, size_t len)
883 {
884 	struct wpa_priv_interface *iface = ctx;
885 	struct msghdr msg;
886 	struct iovec io[3];
887 	int event = PRIVSEP_EVENT_RX_EAPOL;
888 
889 	wpa_printf(MSG_DEBUG, "RX EAPOL from driver");
890 	io[0].iov_base = &event;
891 	io[0].iov_len = sizeof(event);
892 	io[1].iov_base = (u8 *) src_addr;
893 	io[1].iov_len = ETH_ALEN;
894 	io[2].iov_base = (u8 *) buf;
895 	io[2].iov_len = len;
896 
897 	os_memset(&msg, 0, sizeof(msg));
898 	msg.msg_iov = io;
899 	msg.msg_iovlen = 3;
900 	msg.msg_name = &iface->drv_addr;
901 	msg.msg_namelen = sizeof(iface->drv_addr);
902 
903 	if (sendmsg(iface->fd, &msg, 0) < 0)
904 		perror("sendmsg(wpas_socket)");
905 }
906 
907 
908 static void wpa_priv_terminate(int sig, void *signal_ctx)
909 {
910 	wpa_printf(MSG_DEBUG, "wpa_priv termination requested");
911 	eloop_terminate();
912 }
913 
914 
915 static void wpa_priv_fd_workaround(void)
916 {
917 #ifdef __linux__
918 	int s, i;
919 	/* When started from pcmcia-cs scripts, wpa_supplicant might start with
920 	 * fd 0, 1, and 2 closed. This will cause some issues because many
921 	 * places in wpa_supplicant are still printing out to stdout. As a
922 	 * workaround, make sure that fd's 0, 1, and 2 are not used for other
923 	 * sockets. */
924 	for (i = 0; i < 3; i++) {
925 		s = open("/dev/null", O_RDWR);
926 		if (s > 2) {
927 			close(s);
928 			break;
929 		}
930 	}
931 #endif /* __linux__ */
932 }
933 
934 
935 static void usage(void)
936 {
937 	printf("wpa_priv v" VERSION_STR "\n"
938 	       "Copyright (c) 2007-2009, Jouni Malinen <j@w1.fi> and "
939 	       "contributors\n"
940 	       "\n"
941 	       "usage:\n"
942 	       "  wpa_priv [-Bdd] [-P<pid file>] <driver:ifname> "
943 	       "[driver:ifname ...]\n");
944 }
945 
946 
947 int main(int argc, char *argv[])
948 {
949 	int c, i;
950 	int ret = -1;
951 	char *pid_file = NULL;
952 	int daemonize = 0;
953 	char *ctrl_dir = "/var/run/wpa_priv";
954 	struct wpa_priv_interface *interfaces = NULL, *iface;
955 
956 	if (os_program_init())
957 		return -1;
958 
959 	wpa_priv_fd_workaround();
960 
961 	for (;;) {
962 		c = getopt(argc, argv, "Bc:dP:");
963 		if (c < 0)
964 			break;
965 		switch (c) {
966 		case 'B':
967 			daemonize++;
968 			break;
969 		case 'c':
970 			ctrl_dir = optarg;
971 			break;
972 		case 'd':
973 			wpa_debug_level--;
974 			break;
975 		case 'P':
976 			pid_file = os_rel2abs_path(optarg);
977 			break;
978 		default:
979 			usage();
980 			goto out;
981 		}
982 	}
983 
984 	if (optind >= argc) {
985 		usage();
986 		goto out;
987 	}
988 
989 	wpa_printf(MSG_DEBUG, "wpa_priv control directory: '%s'", ctrl_dir);
990 
991 	if (eloop_init()) {
992 		wpa_printf(MSG_ERROR, "Failed to initialize event loop");
993 		goto out;
994 	}
995 
996 	for (i = optind; i < argc; i++) {
997 		wpa_printf(MSG_DEBUG, "Adding driver:interface %s", argv[i]);
998 		iface = wpa_priv_interface_init(ctrl_dir, argv[i]);
999 		if (iface == NULL)
1000 			goto out;
1001 		iface->next = interfaces;
1002 		interfaces = iface;
1003 	}
1004 
1005 	if (daemonize && os_daemonize(pid_file))
1006 		goto out;
1007 
1008 	eloop_register_signal_terminate(wpa_priv_terminate, NULL);
1009 	eloop_run();
1010 
1011 	ret = 0;
1012 
1013 out:
1014 	iface = interfaces;
1015 	while (iface) {
1016 		struct wpa_priv_interface *prev = iface;
1017 		iface = iface->next;
1018 		wpa_priv_interface_deinit(prev);
1019 	}
1020 
1021 	eloop_destroy();
1022 
1023 	os_daemonize_terminate(pid_file);
1024 	os_free(pid_file);
1025 	os_program_deinit();
1026 
1027 	return ret;
1028 }
1029