Merge commit 'garage/master'
[wpasupplicant] / src / drivers / driver_wired.c
1 /*
2  * WPA Supplicant - wired Ethernet driver interface
3  * Copyright (c) 2005-2007, Jouni Malinen <j@w1.fi>
4  * Copyright (c) 2004, Gunter Burchardt <tira@isx.de>
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 as
8  * published by the Free Software Foundation.
9  *
10  * Alternatively, this software may be distributed under the terms of BSD
11  * license.
12  *
13  * See README and COPYING for more details.
14  */
15
16 #include "includes.h"
17 #include <sys/ioctl.h>
18 #include <net/if.h>
19 #ifdef __linux__
20 #include <netpacket/packet.h>
21 #include <net/if_arp.h>
22 #include <net/if.h>
23 #endif /* __linux__ */
24 #ifdef __FreeBSD__
25 #include <net/if_dl.h>
26 #endif /* __FreeBSD__ */
27
28 #include "common.h"
29 #include "driver.h"
30
31 #ifdef HOSTAPD
32 #include "eloop.h"
33 #include "../../hostapd/hostapd_defs.h"
34 #include "../../hostapd/sta_info.h"
35 #endif /* HOSTAPD */
36
37 static const u8 pae_group_addr[ETH_ALEN] =
38 { 0x01, 0x80, 0xc2, 0x00, 0x00, 0x03 };
39
40
41 struct wpa_driver_wired_data {
42 #ifdef HOSTAPD
43         struct hostapd_data *hapd;
44         char iface[IFNAMSIZ + 1];
45
46         int sock; /* raw packet socket for driver access */
47         int dhcp_sock; /* socket for dhcp packets */
48         int use_pae_group_addr;
49 #else /* HOSTAPD */
50         void *ctx;
51         int pf_sock;
52         char ifname[IFNAMSIZ + 1];
53         int membership, multi, iff_allmulti, iff_up;
54 #endif /* HOSTAPD */
55 };
56
57
58 #ifdef HOSTAPD
59
60 /* TODO: detecting new devices should eventually be changed from using DHCP
61  * snooping to trigger on any packet from a new layer 2 MAC address, e.g.,
62  * based on ebtables, etc. */
63
64 struct dhcp_message {
65         u_int8_t op;
66         u_int8_t htype;
67         u_int8_t hlen;
68         u_int8_t hops;
69         u_int32_t xid;
70         u_int16_t secs;
71         u_int16_t flags;
72         u_int32_t ciaddr;
73         u_int32_t yiaddr;
74         u_int32_t siaddr;
75         u_int32_t giaddr;
76         u_int8_t chaddr[16];
77         u_int8_t sname[64];
78         u_int8_t file[128];
79         u_int32_t cookie;
80         u_int8_t options[308]; /* 312 - cookie */
81 };
82
83
84 static void wired_possible_new_sta(struct hostapd_data *hapd, u8 *addr)
85 {
86         struct sta_info *sta;
87
88         sta = ap_get_sta(hapd, addr);
89         if (sta)
90                 return;
91
92         wpa_printf(MSG_DEBUG, "Data frame from unknown STA " MACSTR
93                    " - adding a new STA", MAC2STR(addr));
94         sta = ap_sta_add(hapd, addr);
95         if (sta) {
96                 hostapd_new_assoc_sta(hapd, sta, 0);
97         } else {
98                 wpa_printf(MSG_DEBUG, "Failed to add STA entry for " MACSTR,
99                            MAC2STR(addr));
100         }
101 }
102
103
104 static void handle_data(struct hostapd_data *hapd, unsigned char *buf,
105                         size_t len)
106 {
107         struct ieee8023_hdr *hdr;
108         u8 *pos, *sa;
109         size_t left;
110
111         /* must contain at least ieee8023_hdr 6 byte source, 6 byte dest,
112          * 2 byte ethertype */
113         if (len < 14) {
114                 wpa_printf(MSG_MSGDUMP, "handle_data: too short (%lu)",
115                            (unsigned long) len);
116                 return;
117         }
118
119         hdr = (struct ieee8023_hdr *) buf;
120
121         switch (ntohs(hdr->ethertype)) {
122                 case ETH_P_PAE:
123                         wpa_printf(MSG_MSGDUMP, "Received EAPOL packet");
124                         sa = hdr->src;
125                         wired_possible_new_sta(hapd, sa);
126
127                         pos = (u8 *) (hdr + 1);
128                         left = len - sizeof(*hdr);
129
130                         hostapd_eapol_receive(hapd, sa, pos, left);
131                 break;
132
133         default:
134                 wpa_printf(MSG_DEBUG, "Unknown ethertype 0x%04x in data frame",
135                            ntohs(hdr->ethertype));
136                 break;
137         }
138 }
139
140
141 static void handle_read(int sock, void *eloop_ctx, void *sock_ctx)
142 {
143         struct hostapd_data *hapd = (struct hostapd_data *) eloop_ctx;
144         int len;
145         unsigned char buf[3000];
146
147         len = recv(sock, buf, sizeof(buf), 0);
148         if (len < 0) {
149                 perror("recv");
150                 return;
151         }
152
153         handle_data(hapd, buf, len);
154 }
155
156
157 static void handle_dhcp(int sock, void *eloop_ctx, void *sock_ctx)
158 {
159         struct hostapd_data *hapd = (struct hostapd_data *) eloop_ctx;
160         int len;
161         unsigned char buf[3000];
162         struct dhcp_message *msg;
163         u8 *mac_address;
164
165         len = recv(sock, buf, sizeof(buf), 0);
166         if (len < 0) {
167                 perror("recv");
168                 return;
169         }
170
171         /* must contain at least dhcp_message->chaddr */
172         if (len < 44) {
173                 wpa_printf(MSG_MSGDUMP, "handle_dhcp: too short (%d)", len);
174                 return;
175         }
176
177         msg = (struct dhcp_message *) buf;
178         mac_address = (u8 *) &(msg->chaddr);
179
180         wpa_printf(MSG_MSGDUMP, "Got DHCP broadcast packet from " MACSTR,
181                    MAC2STR(mac_address));
182
183         wired_possible_new_sta(hapd, mac_address);
184 }
185
186
187 static int wired_init_sockets(struct wpa_driver_wired_data *drv, u8 *own_addr)
188 {
189         struct hostapd_data *hapd = drv->hapd;
190         struct ifreq ifr;
191         struct sockaddr_ll addr;
192         struct sockaddr_in addr2;
193         struct packet_mreq mreq;
194         int n = 1;
195
196         drv->sock = socket(PF_PACKET, SOCK_RAW, htons(ETH_P_PAE));
197         if (drv->sock < 0) {
198                 perror("socket[PF_PACKET,SOCK_RAW]");
199                 return -1;
200         }
201
202         if (eloop_register_read_sock(drv->sock, handle_read, hapd, NULL)) {
203                 printf("Could not register read socket\n");
204                 return -1;
205         }
206
207         memset(&ifr, 0, sizeof(ifr));
208         os_strlcpy(ifr.ifr_name, drv->iface, sizeof(ifr.ifr_name));
209         if (ioctl(drv->sock, SIOCGIFINDEX, &ifr) != 0) {
210                 perror("ioctl(SIOCGIFINDEX)");
211                 return -1;
212         }
213
214         memset(&addr, 0, sizeof(addr));
215         addr.sll_family = AF_PACKET;
216         addr.sll_ifindex = ifr.ifr_ifindex;
217         wpa_printf(MSG_DEBUG, "Opening raw packet socket for ifindex %d",
218                    addr.sll_ifindex);
219
220         if (bind(drv->sock, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
221                 perror("bind");
222                 return -1;
223         }
224
225         /* filter multicast address */
226         memset(&mreq, 0, sizeof(mreq));
227         mreq.mr_ifindex = ifr.ifr_ifindex;
228         mreq.mr_type = PACKET_MR_MULTICAST;
229         mreq.mr_alen = 6;
230         memcpy(mreq.mr_address, pae_group_addr, mreq.mr_alen);
231
232         if (setsockopt(drv->sock, SOL_PACKET, PACKET_ADD_MEMBERSHIP, &mreq,
233                        sizeof(mreq)) < 0) {
234                 perror("setsockopt[SOL_SOCKET,PACKET_ADD_MEMBERSHIP]");
235                 return -1;
236         }
237
238         memset(&ifr, 0, sizeof(ifr));
239         os_strlcpy(ifr.ifr_name, drv->iface, sizeof(ifr.ifr_name));
240         if (ioctl(drv->sock, SIOCGIFHWADDR, &ifr) != 0) {
241                 perror("ioctl(SIOCGIFHWADDR)");
242                 return -1;
243         }
244
245         if (ifr.ifr_hwaddr.sa_family != ARPHRD_ETHER) {
246                 printf("Invalid HW-addr family 0x%04x\n",
247                        ifr.ifr_hwaddr.sa_family);
248                 return -1;
249         }
250         memcpy(own_addr, ifr.ifr_hwaddr.sa_data, ETH_ALEN);
251
252         /* setup dhcp listen socket for sta detection */
253         if ((drv->dhcp_sock = socket(PF_INET, SOCK_DGRAM, IPPROTO_UDP)) < 0) {
254                 perror("socket call failed for dhcp");
255                 return -1;
256         }
257
258         if (eloop_register_read_sock(drv->dhcp_sock, handle_dhcp, hapd, NULL))
259         {
260                 printf("Could not register read socket\n");
261                 return -1;
262         }
263
264         memset(&addr2, 0, sizeof(addr2));
265         addr2.sin_family = AF_INET;
266         addr2.sin_port = htons(67);
267         addr2.sin_addr.s_addr = INADDR_ANY;
268
269         if (setsockopt(drv->dhcp_sock, SOL_SOCKET, SO_REUSEADDR, (char *) &n,
270                        sizeof(n)) == -1) {
271                 perror("setsockopt[SOL_SOCKET,SO_REUSEADDR]");
272                 return -1;
273         }
274         if (setsockopt(drv->dhcp_sock, SOL_SOCKET, SO_BROADCAST, (char *) &n,
275                        sizeof(n)) == -1) {
276                 perror("setsockopt[SOL_SOCKET,SO_BROADCAST]");
277                 return -1;
278         }
279
280         memset(&ifr, 0, sizeof(ifr));
281         os_strlcpy(ifr.ifr_ifrn.ifrn_name, drv->iface, IFNAMSIZ);
282         if (setsockopt(drv->dhcp_sock, SOL_SOCKET, SO_BINDTODEVICE,
283                        (char *) &ifr, sizeof(ifr)) < 0) {
284                 perror("setsockopt[SOL_SOCKET,SO_BINDTODEVICE]");
285                 return -1;
286         }
287
288         if (bind(drv->dhcp_sock, (struct sockaddr *) &addr2,
289                  sizeof(struct sockaddr)) == -1) {
290                 perror("bind");
291                 return -1;
292         }
293
294         return 0;
295 }
296
297
298 static int wired_send_eapol(void *priv, const u8 *addr,
299                             const u8 *data, size_t data_len, int encrypt,
300                             const u8 *own_addr)
301 {
302         struct wpa_driver_wired_data *drv = priv;
303         struct ieee8023_hdr *hdr;
304         size_t len;
305         u8 *pos;
306         int res;
307
308         len = sizeof(*hdr) + data_len;
309         hdr = os_zalloc(len);
310         if (hdr == NULL) {
311                 printf("malloc() failed for wired_send_eapol(len=%lu)\n",
312                        (unsigned long) len);
313                 return -1;
314         }
315
316         memcpy(hdr->dest, drv->use_pae_group_addr ? pae_group_addr : addr,
317                ETH_ALEN);
318         memcpy(hdr->src, own_addr, ETH_ALEN);
319         hdr->ethertype = htons(ETH_P_PAE);
320
321         pos = (u8 *) (hdr + 1);
322         memcpy(pos, data, data_len);
323
324         res = send(drv->sock, (u8 *) hdr, len, 0);
325         free(hdr);
326
327         if (res < 0) {
328                 perror("wired_send_eapol: send");
329                 printf("wired_send_eapol - packet len: %lu - failed\n",
330                        (unsigned long) len);
331         }
332
333         return res;
334 }
335
336
337 static void * wired_driver_hapd_init(struct hostapd_data *hapd,
338                                      struct wpa_init_params *params)
339 {
340         struct wpa_driver_wired_data *drv;
341
342         drv = os_zalloc(sizeof(struct wpa_driver_wired_data));
343         if (drv == NULL) {
344                 printf("Could not allocate memory for wired driver data\n");
345                 return NULL;
346         }
347
348         drv->hapd = hapd;
349         os_strlcpy(drv->iface, params->ifname, sizeof(drv->iface));
350         drv->use_pae_group_addr = params->use_pae_group_addr;
351
352         if (wired_init_sockets(drv, params->own_addr)) {
353                 free(drv);
354                 return NULL;
355         }
356
357         return drv;
358 }
359
360
361 static void wired_driver_hapd_deinit(void *priv)
362 {
363         struct wpa_driver_wired_data *drv = priv;
364
365         if (drv->sock >= 0)
366                 close(drv->sock);
367
368         if (drv->dhcp_sock >= 0)
369                 close(drv->dhcp_sock);
370
371         free(drv);
372 }
373
374 #else /* HOSTAPD */
375
376 static int wpa_driver_wired_get_ssid(void *priv, u8 *ssid)
377 {
378         ssid[0] = 0;
379         return 0;
380 }
381
382
383 static int wpa_driver_wired_get_bssid(void *priv, u8 *bssid)
384 {
385         /* Report PAE group address as the "BSSID" for wired connection. */
386         os_memcpy(bssid, pae_group_addr, ETH_ALEN);
387         return 0;
388 }
389
390
391 static int wpa_driver_wired_get_capa(void *priv, struct wpa_driver_capa *capa)
392 {
393         os_memset(capa, 0, sizeof(*capa));
394         capa->flags = WPA_DRIVER_FLAGS_WIRED;
395         return 0;
396 }
397
398
399 static int wpa_driver_wired_get_ifflags(const char *ifname, int *flags)
400 {
401         struct ifreq ifr;
402         int s;
403
404         s = socket(PF_INET, SOCK_DGRAM, 0);
405         if (s < 0) {
406                 perror("socket");
407                 return -1;
408         }
409
410         os_memset(&ifr, 0, sizeof(ifr));
411         os_strlcpy(ifr.ifr_name, ifname, IFNAMSIZ);
412         if (ioctl(s, SIOCGIFFLAGS, (caddr_t) &ifr) < 0) {
413                 perror("ioctl[SIOCGIFFLAGS]");
414                 close(s);
415                 return -1;
416         }
417         close(s);
418         *flags = ifr.ifr_flags & 0xffff;
419         return 0;
420 }
421
422
423 static int wpa_driver_wired_set_ifflags(const char *ifname, int flags)
424 {
425         struct ifreq ifr;
426         int s;
427
428         s = socket(PF_INET, SOCK_DGRAM, 0);
429         if (s < 0) {
430                 perror("socket");
431                 return -1;
432         }
433
434         os_memset(&ifr, 0, sizeof(ifr));
435         os_strlcpy(ifr.ifr_name, ifname, IFNAMSIZ);
436         ifr.ifr_flags = flags & 0xffff;
437         if (ioctl(s, SIOCSIFFLAGS, (caddr_t) &ifr) < 0) {
438                 perror("ioctl[SIOCSIFFLAGS]");
439                 close(s);
440                 return -1;
441         }
442         close(s);
443         return 0;
444 }
445
446
447 static int wpa_driver_wired_multi(const char *ifname, const u8 *addr, int add)
448 {
449         struct ifreq ifr;
450         int s;
451
452         s = socket(PF_INET, SOCK_DGRAM, 0);
453         if (s < 0) {
454                 perror("socket");
455                 return -1;
456         }
457
458         os_memset(&ifr, 0, sizeof(ifr));
459         os_strlcpy(ifr.ifr_name, ifname, IFNAMSIZ);
460 #ifdef __linux__
461         ifr.ifr_hwaddr.sa_family = AF_UNSPEC;
462         os_memcpy(ifr.ifr_hwaddr.sa_data, addr, ETH_ALEN);
463 #endif /* __linux__ */
464 #ifdef __FreeBSD__
465         {
466                 struct sockaddr_dl *dlp;
467                 dlp = (struct sockaddr_dl *) &ifr.ifr_addr;
468                 dlp->sdl_len = sizeof(struct sockaddr_dl);
469                 dlp->sdl_family = AF_LINK;
470                 dlp->sdl_index = 0;
471                 dlp->sdl_nlen = 0;
472                 dlp->sdl_alen = ETH_ALEN;
473                 dlp->sdl_slen = 0;
474                 os_memcpy(LLADDR(dlp), addr, ETH_ALEN);
475         }
476 #endif /* __FreeBSD__ */
477
478         if (ioctl(s, add ? SIOCADDMULTI : SIOCDELMULTI, (caddr_t) &ifr) < 0) {
479                 perror("ioctl[SIOC{ADD/DEL}MULTI]");
480                 close(s);
481                 return -1;
482         }
483         close(s);
484         return 0;
485 }
486
487
488 static int wpa_driver_wired_membership(struct wpa_driver_wired_data *drv,
489                                        const u8 *addr, int add)
490 {
491 #ifdef __linux__
492         struct packet_mreq mreq;
493
494         if (drv->pf_sock == -1)
495                 return -1;
496
497         os_memset(&mreq, 0, sizeof(mreq));
498         mreq.mr_ifindex = if_nametoindex(drv->ifname);
499         mreq.mr_type = PACKET_MR_MULTICAST;
500         mreq.mr_alen = ETH_ALEN;
501         os_memcpy(mreq.mr_address, addr, ETH_ALEN);
502
503         if (setsockopt(drv->pf_sock, SOL_PACKET,
504                        add ? PACKET_ADD_MEMBERSHIP : PACKET_DROP_MEMBERSHIP,
505                        &mreq, sizeof(mreq)) < 0) {
506                 perror("setsockopt");
507                 return -1;
508         }
509         return 0;
510 #else /* __linux__ */
511         return -1;
512 #endif /* __linux__ */
513 }
514
515
516 static void * wpa_driver_wired_init(void *ctx, const char *ifname)
517 {
518         struct wpa_driver_wired_data *drv;
519         int flags;
520
521         drv = os_zalloc(sizeof(*drv));
522         if (drv == NULL)
523                 return NULL;
524         os_strlcpy(drv->ifname, ifname, sizeof(drv->ifname));
525         drv->ctx = ctx;
526
527 #ifdef __linux__
528         drv->pf_sock = socket(PF_PACKET, SOCK_DGRAM, 0);
529         if (drv->pf_sock < 0)
530                 perror("socket(PF_PACKET)");
531 #else /* __linux__ */
532         drv->pf_sock = -1;
533 #endif /* __linux__ */
534
535         if (wpa_driver_wired_get_ifflags(ifname, &flags) == 0 &&
536             !(flags & IFF_UP) &&
537             wpa_driver_wired_set_ifflags(ifname, flags | IFF_UP) == 0) {
538                 drv->iff_up = 1;
539         }
540
541         if (wpa_driver_wired_membership(drv, pae_group_addr, 1) == 0) {
542                 wpa_printf(MSG_DEBUG, "%s: Added multicast membership with "
543                            "packet socket", __func__);
544                 drv->membership = 1;
545         } else if (wpa_driver_wired_multi(ifname, pae_group_addr, 1) == 0) {
546                 wpa_printf(MSG_DEBUG, "%s: Added multicast membership with "
547                            "SIOCADDMULTI", __func__);
548                 drv->multi = 1;
549         } else if (wpa_driver_wired_get_ifflags(ifname, &flags) < 0) {
550                 wpa_printf(MSG_INFO, "%s: Could not get interface "
551                            "flags", __func__);
552                 os_free(drv);
553                 return NULL;
554         } else if (flags & IFF_ALLMULTI) {
555                 wpa_printf(MSG_DEBUG, "%s: Interface is already configured "
556                            "for multicast", __func__);
557         } else if (wpa_driver_wired_set_ifflags(ifname,
558                                                 flags | IFF_ALLMULTI) < 0) {
559                 wpa_printf(MSG_INFO, "%s: Failed to enable allmulti",
560                            __func__);
561                 os_free(drv);
562                 return NULL;
563         } else {
564                 wpa_printf(MSG_DEBUG, "%s: Enabled allmulti mode",
565                            __func__);
566                 drv->iff_allmulti = 1;
567         }
568
569         return drv;
570 }
571
572
573 static void wpa_driver_wired_deinit(void *priv)
574 {
575         struct wpa_driver_wired_data *drv = priv;
576         int flags;
577
578         if (drv->membership &&
579             wpa_driver_wired_membership(drv, pae_group_addr, 0) < 0) {
580                 wpa_printf(MSG_DEBUG, "%s: Failed to remove PAE multicast "
581                            "group (PACKET)", __func__);
582         }
583
584         if (drv->multi &&
585             wpa_driver_wired_multi(drv->ifname, pae_group_addr, 0) < 0) {
586                 wpa_printf(MSG_DEBUG, "%s: Failed to remove PAE multicast "
587                            "group (SIOCDELMULTI)", __func__);
588         }
589
590         if (drv->iff_allmulti &&
591             (wpa_driver_wired_get_ifflags(drv->ifname, &flags) < 0 ||
592              wpa_driver_wired_set_ifflags(drv->ifname,
593                                           flags & ~IFF_ALLMULTI) < 0)) {
594                 wpa_printf(MSG_DEBUG, "%s: Failed to disable allmulti mode",
595                            __func__);
596         }
597
598         if (drv->iff_up &&
599             wpa_driver_wired_get_ifflags(drv->ifname, &flags) == 0 &&
600             (flags & IFF_UP) &&
601             wpa_driver_wired_set_ifflags(drv->ifname, flags & ~IFF_UP) < 0) {
602                 wpa_printf(MSG_DEBUG, "%s: Failed to set the interface down",
603                            __func__);
604         }
605
606         if (drv->pf_sock != -1)
607                 close(drv->pf_sock);
608
609         os_free(drv);
610 }
611 #endif /* HOSTAPD */
612
613
614 const struct wpa_driver_ops wpa_driver_wired_ops = {
615         .name = "wired",
616         .desc = "Wired Ethernet driver",
617 #ifdef HOSTAPD
618         .hapd_init = wired_driver_hapd_init,
619         .hapd_deinit = wired_driver_hapd_deinit,
620         .hapd_send_eapol = wired_send_eapol,
621 #else /* HOSTAPD */
622         .get_ssid = wpa_driver_wired_get_ssid,
623         .get_bssid = wpa_driver_wired_get_bssid,
624         .get_capa = wpa_driver_wired_get_capa,
625         .init = wpa_driver_wired_init,
626         .deinit = wpa_driver_wired_deinit,
627 #endif /* HOSTAPD */
628 };