| /* |
| * dhcpcd - DHCP client daemon |
| * Copyright (c) 2006-2012 Roy Marples <roy@marples.name> |
| * All rights reserved |
| |
| * Redistribution and use in source and binary forms, with or without |
| * modification, are permitted provided that the following conditions |
| * are met: |
| * 1. Redistributions of source code must retain the above copyright |
| * notice, this list of conditions and the following disclaimer. |
| * 2. Redistributions in binary form must reproduce the above copyright |
| * notice, this list of conditions and the following disclaimer in the |
| * documentation and/or other materials provided with the distribution. |
| * |
| * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND |
| * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
| * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
| * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE |
| * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL |
| * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS |
| * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
| * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT |
| * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY |
| * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
| * SUCH DAMAGE. |
| */ |
| |
| #include <sys/ioctl.h> |
| #include <sys/param.h> |
| #include <sys/socket.h> |
| #include <sys/stat.h> |
| #include <sys/sysctl.h> |
| #include <sys/types.h> |
| |
| #include <arpa/inet.h> |
| #include <net/if.h> |
| #include <net/if_dl.h> |
| #include <net/route.h> |
| #include <netinet/in.h> |
| #ifdef __DragonFly__ |
| # include <netproto/802_11/ieee80211_ioctl.h> |
| #elif __APPLE__ |
| /* FIXME: Add apple includes so we can work out SSID */ |
| #else |
| # include <net80211/ieee80211_ioctl.h> |
| #endif |
| |
| #include <errno.h> |
| #include <fnmatch.h> |
| #include <stddef.h> |
| #include <stdio.h> |
| #include <stdlib.h> |
| #include <string.h> |
| #include <syslog.h> |
| #include <unistd.h> |
| |
| #include "config.h" |
| #include "common.h" |
| #include "configure.h" |
| #include "dhcp.h" |
| #include "if-options.h" |
| #include "net.h" |
| |
| #ifndef RT_ROUNDUP |
| #define RT_ROUNDUP(a) \ |
| ((a) > 0 ? (1 + (((a) - 1) | (sizeof(long) - 1))) : sizeof(long)) |
| #define RT_ADVANCE(x, n) (x += RT_ROUNDUP((n)->sa_len)) |
| #endif |
| |
| /* FIXME: Why do we need to check for sa_family 255 */ |
| #define COPYOUT(sin, sa) \ |
| sin.s_addr = ((sa) != NULL) ? \ |
| (((struct sockaddr_in *)(void *)sa)->sin_addr).s_addr : 0 |
| |
| static int r_fd = -1; |
| static char *link_buf; |
| static ssize_t link_buflen; |
| |
| int |
| if_init(_unused struct interface *iface) |
| { |
| /* BSD promotes secondary address by default */ |
| return 0; |
| } |
| |
| int |
| if_conf(_unused struct interface *iface) |
| { |
| /* No extra checks needed on BSD */ |
| return 0; |
| } |
| |
| #ifdef DEBUG_MEMORY |
| static void |
| cleanup(void) |
| { |
| |
| free(link_buf); |
| } |
| #endif |
| |
| int |
| init_sockets(void) |
| { |
| if ((socket_afnet = socket(AF_INET, SOCK_DGRAM, 0)) == -1) |
| return -1; |
| set_cloexec(socket_afnet); |
| if ((r_fd = socket(PF_ROUTE, SOCK_RAW, 0)) == -1) |
| return -1; |
| set_cloexec(r_fd); |
| return 0; |
| } |
| |
| int |
| getifssid(const char *ifname, char *ssid) |
| { |
| int retval = -1; |
| #if defined(SIOCG80211NWID) |
| struct ifreq ifr; |
| struct ieee80211_nwid nwid; |
| #elif defined(IEEE80211_IOC_SSID) |
| struct ieee80211req ireq; |
| char nwid[IEEE80211_NWID_LEN + 1]; |
| #endif |
| |
| #if defined(SIOCG80211NWID) /* NetBSD */ |
| memset(&ifr, 0, sizeof(ifr)); |
| strlcpy(ifr.ifr_name, ifname, sizeof(ifr.ifr_name)); |
| memset(&nwid, 0, sizeof(nwid)); |
| ifr.ifr_data = (void *)&nwid; |
| if (ioctl(socket_afnet, SIOCG80211NWID, &ifr) == 0) { |
| retval = nwid.i_len; |
| memcpy(ssid, nwid.i_nwid, nwid.i_len); |
| ssid[nwid.i_len] = '\0'; |
| } |
| #elif defined(IEEE80211_IOC_SSID) /* FreeBSD */ |
| memset(&ireq, 0, sizeof(ireq)); |
| strlcpy(ireq.i_name, ifname, sizeof(ireq.i_name)); |
| ireq.i_type = IEEE80211_IOC_SSID; |
| ireq.i_val = -1; |
| memset(nwid, 0, sizeof(nwid)); |
| ireq.i_data = &nwid; |
| if (ioctl(socket_afnet, SIOCG80211, &ireq) == 0) { |
| retval = ireq.i_len; |
| memcpy(ssid, nwid, ireq.i_len); |
| ssid[ireq.i_len] = '\0'; |
| } |
| #endif |
| return retval; |
| } |
| |
| int |
| if_address(const struct interface *iface, const struct in_addr *address, |
| const struct in_addr *netmask, const struct in_addr *broadcast, |
| int action) |
| { |
| int retval; |
| struct ifaliasreq ifa; |
| union { |
| struct sockaddr *sa; |
| struct sockaddr_in *sin; |
| } _s; |
| |
| memset(&ifa, 0, sizeof(ifa)); |
| strlcpy(ifa.ifra_name, iface->name, sizeof(ifa.ifra_name)); |
| |
| #define ADDADDR(_var, _addr) { \ |
| _s.sa = &_var; \ |
| _s.sin->sin_family = AF_INET; \ |
| _s.sin->sin_len = sizeof(*_s.sin); \ |
| memcpy(&_s.sin->sin_addr, _addr, sizeof(_s.sin->sin_addr)); \ |
| } |
| |
| ADDADDR(ifa.ifra_addr, address); |
| ADDADDR(ifa.ifra_mask, netmask); |
| if (action >= 0 && broadcast) { |
| ADDADDR(ifa.ifra_broadaddr, broadcast); |
| } |
| #undef ADDADDR |
| |
| if (action < 0) |
| retval = ioctl(socket_afnet, SIOCDIFADDR, &ifa); |
| else |
| retval = ioctl(socket_afnet, SIOCAIFADDR, &ifa); |
| return retval; |
| } |
| |
| /* ARGSUSED4 */ |
| int |
| if_route(const struct rt *rt, int action) |
| { |
| union sockunion { |
| struct sockaddr sa; |
| struct sockaddr_in sin; |
| #ifdef INET6 |
| struct sockaddr_in6 sin6; |
| #endif |
| struct sockaddr_dl sdl; |
| struct sockaddr_storage ss; |
| } su; |
| struct rtm |
| { |
| struct rt_msghdr hdr; |
| char buffer[sizeof(su) * 4]; |
| } rtm; |
| char *bp = rtm.buffer; |
| size_t l; |
| int retval = 0; |
| |
| #define ADDSU(_su) { \ |
| l = RT_ROUNDUP(_su.sa.sa_len); \ |
| memcpy(bp, &(_su), l); \ |
| bp += l; \ |
| } |
| #define ADDADDR(_a) { \ |
| memset (&su, 0, sizeof(su)); \ |
| su.sin.sin_family = AF_INET; \ |
| su.sin.sin_len = sizeof(su.sin); \ |
| memcpy (&su.sin.sin_addr, _a, sizeof(su.sin.sin_addr)); \ |
| ADDSU(su); \ |
| } |
| |
| memset(&rtm, 0, sizeof(rtm)); |
| rtm.hdr.rtm_version = RTM_VERSION; |
| rtm.hdr.rtm_seq = 1; |
| if (action == 0) |
| rtm.hdr.rtm_type = RTM_CHANGE; |
| else if (action > 0) |
| rtm.hdr.rtm_type = RTM_ADD; |
| else |
| rtm.hdr.rtm_type = RTM_DELETE; |
| rtm.hdr.rtm_flags = RTF_UP; |
| /* None interface subnet routes are static. */ |
| if (rt->gate.s_addr != INADDR_ANY || |
| rt->net.s_addr != rt->iface->net.s_addr || |
| rt->dest.s_addr != (rt->iface->addr.s_addr & rt->iface->net.s_addr)) |
| rtm.hdr.rtm_flags |= RTF_STATIC; |
| rtm.hdr.rtm_addrs = RTA_DST | RTA_GATEWAY; |
| if (rt->dest.s_addr == rt->gate.s_addr && |
| rt->net.s_addr == INADDR_BROADCAST) |
| rtm.hdr.rtm_flags |= RTF_HOST; |
| else { |
| rtm.hdr.rtm_addrs |= RTA_NETMASK; |
| if (rtm.hdr.rtm_flags & RTF_STATIC) |
| rtm.hdr.rtm_flags |= RTF_GATEWAY; |
| if (action >= 0) |
| rtm.hdr.rtm_addrs |= RTA_IFA; |
| } |
| |
| ADDADDR(&rt->dest); |
| if (rtm.hdr.rtm_flags & RTF_HOST || |
| !(rtm.hdr.rtm_flags & RTF_STATIC)) |
| { |
| /* Make us a link layer socket for the host gateway */ |
| memset(&su, 0, sizeof(su)); |
| su.sdl.sdl_len = sizeof(struct sockaddr_dl); |
| link_addr(rt->iface->name, &su.sdl); |
| ADDSU(su); |
| } else |
| ADDADDR(&rt->gate); |
| |
| if (rtm.hdr.rtm_addrs & RTA_NETMASK) |
| ADDADDR(&rt->net); |
| |
| if (rtm.hdr.rtm_addrs & RTA_IFA) |
| ADDADDR(&rt->iface->addr); |
| |
| rtm.hdr.rtm_msglen = l = bp - (char *)&rtm; |
| if (write(r_fd, &rtm, l) == -1) |
| retval = -1; |
| return retval; |
| } |
| |
| int |
| open_link_socket(void) |
| { |
| int fd; |
| |
| #ifdef DEBUG_MEMORY |
| if (link_buf == NULL) |
| atexit(cleanup); |
| #endif |
| |
| fd = socket(PF_ROUTE, SOCK_RAW, 0); |
| if (fd != -1) { |
| set_cloexec(fd); |
| set_nonblock(fd); |
| } |
| return fd; |
| } |
| |
| static void |
| get_addrs(int type, char *cp, struct sockaddr **sa) |
| { |
| int i; |
| |
| for (i = 0; i < RTAX_MAX; i++) { |
| if (type & (1 << i)) { |
| sa[i] = (struct sockaddr *)cp; |
| #ifdef DEBUG |
| printf ("got %d %d %s\n", i, sa[i]->sa_family, |
| inet_ntoa(((struct sockaddr_in *)sa[i])-> |
| sin_addr)); |
| #endif |
| RT_ADVANCE(cp, sa[i]); |
| } else |
| sa[i] = NULL; |
| } |
| } |
| |
| int |
| manage_link(int fd) |
| { |
| char *p, *e, *cp; |
| char ifname[IF_NAMESIZE]; |
| ssize_t bytes; |
| struct rt_msghdr *rtm; |
| struct if_announcemsghdr *ifan; |
| struct if_msghdr *ifm; |
| struct ifa_msghdr *ifam; |
| struct rt rt; |
| struct sockaddr *sa, *rti_info[RTAX_MAX]; |
| int len; |
| #ifdef RTM_CHGADDR |
| struct sockaddr_dl sdl; |
| unsigned char *hwaddr; |
| #endif |
| |
| for (;;) { |
| if (ioctl(fd, FIONREAD, &len) == -1) |
| return -1; |
| if (link_buflen < len) { |
| p = realloc(link_buf, len); |
| if (p == NULL) |
| return -1; |
| link_buf = p; |
| link_buflen = len; |
| } |
| bytes = read(fd, link_buf, link_buflen); |
| if (bytes == -1) { |
| if (errno == EAGAIN) |
| return 0; |
| if (errno == EINTR) |
| continue; |
| return -1; |
| } |
| e = link_buf + bytes; |
| for (p = link_buf; p < e; p += rtm->rtm_msglen) { |
| rtm = (struct rt_msghdr *)(void *)p; |
| switch(rtm->rtm_type) { |
| #ifdef RTM_IFANNOUNCE |
| case RTM_IFANNOUNCE: |
| ifan = (struct if_announcemsghdr *)(void *)p; |
| switch(ifan->ifan_what) { |
| case IFAN_ARRIVAL: |
| handle_interface(1, ifan->ifan_name); |
| break; |
| case IFAN_DEPARTURE: |
| handle_interface(-1, ifan->ifan_name); |
| break; |
| } |
| break; |
| #endif |
| case RTM_IFINFO: |
| ifm = (struct if_msghdr *)(void *)p; |
| memset(ifname, 0, sizeof(ifname)); |
| if (!(if_indextoname(ifm->ifm_index, ifname))) |
| break; |
| switch (ifm->ifm_data.ifi_link_state) { |
| case LINK_STATE_DOWN: |
| len = -1; |
| break; |
| case LINK_STATE_UP: |
| len = 1; |
| break; |
| default: |
| /* handle_carrier will re-load |
| * the interface flags and check for |
| * IFF_RUNNING as some drivers that |
| * don't handle link state also don't |
| * set IFF_RUNNING when this routing |
| * message is generated. |
| * As such, it is a race ...*/ |
| len = 0; |
| break; |
| } |
| handle_carrier(len, ifm->ifm_flags, ifname); |
| break; |
| case RTM_DELETE: |
| if (~rtm->rtm_addrs & |
| (RTA_DST | RTA_GATEWAY | RTA_NETMASK)) |
| break; |
| if (rtm->rtm_pid == getpid()) |
| break; |
| cp = (char *)(void *)(rtm + 1); |
| sa = (struct sockaddr *)(void *)cp; |
| if (sa->sa_family != AF_INET) |
| break; |
| get_addrs(rtm->rtm_addrs, cp, rti_info); |
| rt.iface = NULL; |
| rt.next = NULL; |
| COPYOUT(rt.dest, rti_info[RTAX_DST]); |
| COPYOUT(rt.net, rti_info[RTAX_NETMASK]); |
| COPYOUT(rt.gate, rti_info[RTAX_GATEWAY]); |
| route_deleted(&rt); |
| break; |
| #ifdef RTM_CHGADDR |
| case RTM_CHGADDR: /* FALLTHROUGH */ |
| #endif |
| case RTM_DELADDR: /* FALLTHROUGH */ |
| case RTM_NEWADDR: |
| ifam = (struct ifa_msghdr *)(void *)p; |
| if (!if_indextoname(ifam->ifam_index, ifname)) |
| break; |
| cp = (char *)(void *)(ifam + 1); |
| get_addrs(ifam->ifam_addrs, cp, rti_info); |
| if (rti_info[RTAX_IFA] == NULL) |
| break; |
| switch (rti_info[RTAX_IFA]->sa_family) { |
| #ifdef RTM_CHGADDR |
| case AF_LINK: |
| if (rtm->rtm_type != RTM_CHGADDR) |
| break; |
| memcpy(&sdl, rti_info[RTAX_IFA], |
| rti_info[RTAX_IFA]->sa_len); |
| hwaddr = xmalloc(sdl.sdl_alen); |
| memcpy(hwaddr, LLADDR(&sdl), |
| sdl.sdl_alen); |
| handle_hwaddr(ifname, hwaddr, |
| sdl.sdl_alen); |
| break; |
| #endif |
| case AF_INET: |
| case 255: /* FIXME: Why 255? */ |
| COPYOUT(rt.dest, rti_info[RTAX_IFA]); |
| COPYOUT(rt.net, rti_info[RTAX_NETMASK]); |
| COPYOUT(rt.gate, rti_info[RTAX_BRD]); |
| handle_ifa(rtm->rtm_type, ifname, |
| &rt.dest, &rt.net, &rt.gate); |
| break; |
| } |
| break; |
| } |
| } |
| } |
| } |