Annotation of embedaddon/dnsmasq/src/netlink.c, revision 1.1.1.1

1.1       misho       1: /* dnsmasq is Copyright (c) 2000-2013 Simon Kelley
                      2: 
                      3:    This program is free software; you can redistribute it and/or modify
                      4:    it under the terms of the GNU General Public License as published by
                      5:    the Free Software Foundation; version 2 dated June, 1991, or
                      6:    (at your option) version 3 dated 29 June, 2007.
                      7:  
                      8:    This program is distributed in the hope that it will be useful,
                      9:    but WITHOUT ANY WARRANTY; without even the implied warranty of
                     10:    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
                     11:    GNU General Public License for more details.
                     12:      
                     13:    You should have received a copy of the GNU General Public License
                     14:    along with this program.  If not, see <http://www.gnu.org/licenses/>.
                     15: */
                     16: 
                     17: #include "dnsmasq.h"
                     18: 
                     19: #ifdef HAVE_LINUX_NETWORK
                     20: 
                     21: #include <linux/types.h>
                     22: #include <linux/netlink.h>
                     23: #include <linux/rtnetlink.h>
                     24: 
                     25: /* linux 2.6.19 buggers up the headers, patch it up here. */ 
                     26: #ifndef IFA_RTA
                     27: #  define IFA_RTA(r)  \
                     28:        ((struct rtattr*)(((char*)(r)) + NLMSG_ALIGN(sizeof(struct ifaddrmsg))))
                     29: 
                     30: #  include <linux/if_addr.h>
                     31: #endif
                     32: 
                     33: #ifndef NDA_RTA
                     34: #  define NDA_RTA(r) ((struct rtattr*)(((char*)(r)) + NLMSG_ALIGN(sizeof(struct ndmsg)))) 
                     35: #endif 
                     36: 
                     37: 
                     38: static struct iovec iov;
                     39: static u32 netlink_pid;
                     40: 
                     41: static int nl_async(struct nlmsghdr *h);
                     42: static void nl_newaddress(time_t now);
                     43: 
                     44: void netlink_init(void)
                     45: {
                     46:   struct sockaddr_nl addr;
                     47:   socklen_t slen = sizeof(addr);
                     48: 
                     49:   addr.nl_family = AF_NETLINK;
                     50:   addr.nl_pad = 0;
                     51:   addr.nl_pid = 0; /* autobind */
                     52:   addr.nl_groups = RTMGRP_IPV4_ROUTE;
                     53:   if (option_bool(OPT_CLEVERBIND))
                     54:     addr.nl_groups |= RTMGRP_IPV4_IFADDR;  
                     55: #ifdef HAVE_IPV6
                     56:   addr.nl_groups |= RTMGRP_IPV6_ROUTE;
                     57:   if (option_bool(OPT_CLEVERBIND))
                     58:     addr.nl_groups |= RTMGRP_IPV6_IFADDR;
                     59: #endif
                     60: #ifdef HAVE_DHCP6
                     61:   if (daemon->doing_ra || daemon->doing_dhcp6)
                     62:     addr.nl_groups |= RTMGRP_IPV6_IFADDR;
                     63: #endif
                     64:   
                     65:   /* May not be able to have permission to set multicast groups don't die in that case */
                     66:   if ((daemon->netlinkfd = socket(AF_NETLINK, SOCK_RAW, NETLINK_ROUTE)) != -1)
                     67:     {
                     68:       if (bind(daemon->netlinkfd, (struct sockaddr *)&addr, sizeof(addr)) == -1)
                     69:        {
                     70:          addr.nl_groups = 0;
                     71:          if (errno != EPERM || bind(daemon->netlinkfd, (struct sockaddr *)&addr, sizeof(addr)) == -1)
                     72:            daemon->netlinkfd = -1;
                     73:        }
                     74:     }
                     75:   
                     76:   if (daemon->netlinkfd == -1 || 
                     77:       getsockname(daemon->netlinkfd, (struct sockaddr *)&addr, &slen) == 1)
                     78:     die(_("cannot create netlink socket: %s"), NULL, EC_MISC);
                     79:    
                     80:   /* save pid assigned by bind() and retrieved by getsockname() */ 
                     81:   netlink_pid = addr.nl_pid;
                     82:   
                     83:   iov.iov_len = 100;
                     84:   iov.iov_base = safe_malloc(iov.iov_len);
                     85: }
                     86: 
                     87: static ssize_t netlink_recv(void)
                     88: {
                     89:   struct msghdr msg;
                     90:   struct sockaddr_nl nladdr;
                     91:   ssize_t rc;
                     92: 
                     93:   while (1)
                     94:     {
                     95:       msg.msg_control = NULL;
                     96:       msg.msg_controllen = 0;
                     97:       msg.msg_name = &nladdr;
                     98:       msg.msg_namelen = sizeof(nladdr);
                     99:       msg.msg_iov = &iov;
                    100:       msg.msg_iovlen = 1;
                    101:       msg.msg_flags = 0;
                    102:       
                    103:       while ((rc = recvmsg(daemon->netlinkfd, &msg, MSG_PEEK | MSG_TRUNC)) == -1 && errno == EINTR);
                    104:       
                    105:       /* make buffer big enough */
                    106:       if (rc != -1 && (msg.msg_flags & MSG_TRUNC))
                    107:        {
                    108:          /* Very new Linux kernels return the actual size needed, older ones always return truncated size */
                    109:          if ((size_t)rc == iov.iov_len)
                    110:            {
                    111:              if (expand_buf(&iov, rc + 100))
                    112:                continue;
                    113:            }
                    114:          else
                    115:            expand_buf(&iov, rc);
                    116:        }
                    117: 
                    118:       /* read it for real */
                    119:       msg.msg_flags = 0;
                    120:       while ((rc = recvmsg(daemon->netlinkfd, &msg, 0)) == -1 && errno == EINTR);
                    121:       
                    122:       /* Make sure this is from the kernel */
                    123:       if (rc == -1 || nladdr.nl_pid == 0)
                    124:        break;
                    125:     }
                    126:       
                    127:   /* discard stuff which is truncated at this point (expand_buf() may fail) */
                    128:   if (msg.msg_flags & MSG_TRUNC)
                    129:     {
                    130:       rc = -1;
                    131:       errno = ENOMEM;
                    132:     }
                    133:   
                    134:   return rc;
                    135: }
                    136:   
                    137: 
                    138: /* family = AF_UNSPEC finds ARP table entries.
                    139:    family = AF_LOCAL finds MAC addresses. */
                    140: int iface_enumerate(int family, void *parm, int (*callback)())
                    141: {
                    142:   struct sockaddr_nl addr;
                    143:   struct nlmsghdr *h;
                    144:   ssize_t len;
                    145:   static unsigned int seq = 0;
                    146:   int callback_ok = 1, newaddr = 0;
                    147: 
                    148:   struct {
                    149:     struct nlmsghdr nlh;
                    150:     struct rtgenmsg g; 
                    151:   } req;
                    152: 
                    153:   addr.nl_family = AF_NETLINK;
                    154:   addr.nl_pad = 0;
                    155:   addr.nl_groups = 0;
                    156:   addr.nl_pid = 0; /* address to kernel */
                    157:  
                    158:  again: 
                    159:   if (family == AF_UNSPEC)
                    160:     req.nlh.nlmsg_type = RTM_GETNEIGH;
                    161:   else if (family == AF_LOCAL)
                    162:     req.nlh.nlmsg_type = RTM_GETLINK;
                    163:   else
                    164:     req.nlh.nlmsg_type = RTM_GETADDR;
                    165: 
                    166:   req.nlh.nlmsg_len = sizeof(req);
                    167:   req.nlh.nlmsg_flags = NLM_F_ROOT | NLM_F_MATCH | NLM_F_REQUEST | NLM_F_ACK; 
                    168:   req.nlh.nlmsg_pid = 0;
                    169:   req.nlh.nlmsg_seq = ++seq;
                    170:   req.g.rtgen_family = family; 
                    171: 
                    172:   /* Don't block in recvfrom if send fails */
                    173:   while((len = sendto(daemon->netlinkfd, (void *)&req, sizeof(req), 0, 
                    174:                      (struct sockaddr *)&addr, sizeof(addr))) == -1 && retry_send());
                    175:   
                    176:   if (len == -1)
                    177:     return 0;
                    178:     
                    179:   while (1)
                    180:     {
                    181:       if ((len = netlink_recv()) == -1)
                    182:        {
                    183:          if (errno == ENOBUFS)
                    184:            {
                    185:              sleep(1);
                    186:              goto again;
                    187:            }
                    188:          return 0;
                    189:        }
                    190: 
                    191:       for (h = (struct nlmsghdr *)iov.iov_base; NLMSG_OK(h, (size_t)len); h = NLMSG_NEXT(h, len))
                    192:        if (h->nlmsg_seq != seq || h->nlmsg_pid != netlink_pid || h->nlmsg_type == NLMSG_ERROR)
                    193:          {
                    194:            /* May be multicast arriving async */
                    195:            if (nl_async(h))
                    196:              newaddr = 1; 
                    197:          }
                    198:        else if (h->nlmsg_type == NLMSG_DONE)
                    199:          {
                    200:            /* handle async new interface address arrivals, these have to be done
                    201:               after we complete as we're not re-entrant */
                    202:            if (newaddr) 
                    203:              nl_newaddress(dnsmasq_time());
                    204:                
                    205:            return callback_ok;
                    206:          }
                    207:        else if (h->nlmsg_type == RTM_NEWADDR && family != AF_UNSPEC && family != AF_LOCAL)
                    208:          {
                    209:            struct ifaddrmsg *ifa = NLMSG_DATA(h);  
                    210:            struct rtattr *rta = IFA_RTA(ifa);
                    211:            unsigned int len1 = h->nlmsg_len - NLMSG_LENGTH(sizeof(*ifa));
                    212:            
                    213:            if (ifa->ifa_family == family)
                    214:              {
                    215:                if (ifa->ifa_family == AF_INET)
                    216:                  {
                    217:                    struct in_addr netmask, addr, broadcast;
                    218:                    
                    219:                    netmask.s_addr = htonl(0xffffffff << (32 - ifa->ifa_prefixlen));
                    220:                    addr.s_addr = 0;
                    221:                    broadcast.s_addr = 0;
                    222:                    
                    223:                    while (RTA_OK(rta, len1))
                    224:                      {
                    225:                        if (rta->rta_type == IFA_LOCAL)
                    226:                          addr = *((struct in_addr *)(rta+1));
                    227:                        else if (rta->rta_type == IFA_BROADCAST)
                    228:                          broadcast = *((struct in_addr *)(rta+1));
                    229:                        
                    230:                        rta = RTA_NEXT(rta, len1);
                    231:                      }
                    232:                    
                    233:                    if (addr.s_addr && callback_ok)
                    234:                      if (!((*callback)(addr, ifa->ifa_index, netmask, broadcast, parm)))
                    235:                        callback_ok = 0;
                    236:                  }
                    237: #ifdef HAVE_IPV6
                    238:                else if (ifa->ifa_family == AF_INET6)
                    239:                  {
                    240:                    struct in6_addr *addrp = NULL;
                    241:                    u32 valid = 0, preferred = 0;
                    242:                    int flags = 0;
                    243:                    
                    244:                    while (RTA_OK(rta, len1))
                    245:                      {
                    246:                        if (rta->rta_type == IFA_ADDRESS)
                    247:                          addrp = ((struct in6_addr *)(rta+1)); 
                    248:                        else if (rta->rta_type == IFA_CACHEINFO)
                    249:                          {
                    250:                            struct ifa_cacheinfo *ifc = (struct ifa_cacheinfo *)(rta+1);
                    251:                            preferred = ifc->ifa_prefered;
                    252:                            valid = ifc->ifa_valid;
                    253:                          }
                    254:                        rta = RTA_NEXT(rta, len1);
                    255:                      }
                    256:                    
                    257:                    if (ifa->ifa_flags & IFA_F_TENTATIVE)
                    258:                      flags |= IFACE_TENTATIVE;
                    259:                    
                    260:                    if (ifa->ifa_flags & IFA_F_DEPRECATED)
                    261:                      flags |= IFACE_DEPRECATED;
                    262:                    
                    263:                    if (addrp && callback_ok)
                    264:                      if (!((*callback)(addrp, (int)(ifa->ifa_prefixlen), (int)(ifa->ifa_scope), 
                    265:                                        (int)(ifa->ifa_index), flags, 
                    266:                                        (int) preferred, (int)valid, parm)))
                    267:                        callback_ok = 0;
                    268:                  }
                    269: #endif
                    270:              }
                    271:          }
                    272:        else if (h->nlmsg_type == RTM_NEWNEIGH && family == AF_UNSPEC)
                    273:          {
                    274:            struct ndmsg *neigh = NLMSG_DATA(h);  
                    275:            struct rtattr *rta = NDA_RTA(neigh);
                    276:            unsigned int len1 = h->nlmsg_len - NLMSG_LENGTH(sizeof(*neigh));
                    277:            size_t maclen = 0;
                    278:            char *inaddr = NULL, *mac = NULL;
                    279:            
                    280:            while (RTA_OK(rta, len1))
                    281:              {
                    282:                if (rta->rta_type == NDA_DST)
                    283:                  inaddr = (char *)(rta+1);
                    284:                else if (rta->rta_type == NDA_LLADDR)
                    285:                  {
                    286:                    maclen = rta->rta_len - sizeof(struct rtattr);
                    287:                    mac = (char *)(rta+1);
                    288:                  }
                    289:                
                    290:                rta = RTA_NEXT(rta, len1);
                    291:              }
                    292: 
                    293:            if (inaddr && mac && callback_ok)
                    294:              if (!((*callback)(neigh->ndm_family, inaddr, mac, maclen, parm)))
                    295:                callback_ok = 0;
                    296:          }
                    297: #ifdef HAVE_DHCP6
                    298:        else if (h->nlmsg_type == RTM_NEWLINK && family == AF_LOCAL)
                    299:          {
                    300:            struct ifinfomsg *link =  NLMSG_DATA(h);
                    301:            struct rtattr *rta = IFLA_RTA(link);
                    302:            unsigned int len1 = h->nlmsg_len - NLMSG_LENGTH(sizeof(*link));
                    303:            char *mac = NULL;
                    304:            size_t maclen = 0;
                    305: 
                    306:            while (RTA_OK(rta, len1))
                    307:              {
                    308:                if (rta->rta_type == IFLA_ADDRESS)
                    309:                  {
                    310:                    maclen = rta->rta_len - sizeof(struct rtattr);
                    311:                    mac = (char *)(rta+1);
                    312:                  }
                    313:                
                    314:                rta = RTA_NEXT(rta, len1);
                    315:              }
                    316: 
                    317:            if (mac && callback_ok && !((link->ifi_flags & (IFF_LOOPBACK | IFF_POINTOPOINT))) && 
                    318:                !((*callback)((int)link->ifi_index, (unsigned int)link->ifi_type, mac, maclen, parm)))
                    319:              callback_ok = 0;
                    320:          }
                    321: #endif
                    322:     }
                    323: }
                    324: 
                    325: void netlink_multicast(time_t now)
                    326: {
                    327:   ssize_t len;
                    328:   struct nlmsghdr *h;
                    329:   int flags, newaddr = 0;
                    330:   
                    331:   /* don't risk blocking reading netlink messages here. */
                    332:   if ((flags = fcntl(daemon->netlinkfd, F_GETFL)) == -1 ||
                    333:       fcntl(daemon->netlinkfd, F_SETFL, flags | O_NONBLOCK) == -1) 
                    334:     return;
                    335:   
                    336:   if ((len = netlink_recv()) != -1)
                    337:     for (h = (struct nlmsghdr *)iov.iov_base; NLMSG_OK(h, (size_t)len); h = NLMSG_NEXT(h, len))
                    338:       if (nl_async(h))
                    339:        newaddr = 1;
                    340:   
                    341:   /* restore non-blocking status */
                    342:   fcntl(daemon->netlinkfd, F_SETFL, flags);
                    343:   
                    344:   if (newaddr) 
                    345:     nl_newaddress(now);
                    346: }
                    347: 
                    348: static int nl_async(struct nlmsghdr *h)
                    349: {
                    350:   if (h->nlmsg_type == NLMSG_ERROR)
                    351:     {
                    352:       struct nlmsgerr *err = NLMSG_DATA(h);
                    353:       if (err->error != 0)
                    354:        my_syslog(LOG_ERR, _("netlink returns error: %s"), strerror(-(err->error)));
                    355:       return 0;
                    356:     }
                    357:   else if (h->nlmsg_pid == 0 && h->nlmsg_type == RTM_NEWROUTE) 
                    358:     {
                    359:       /* We arrange to receive netlink multicast messages whenever the network route is added.
                    360:         If this happens and we still have a DNS packet in the buffer, we re-send it.
                    361:         This helps on DoD links, where frequently the packet which triggers dialling is
                    362:         a DNS query, which then gets lost. By re-sending, we can avoid the lookup
                    363:         failing. */ 
                    364:       struct rtmsg *rtm = NLMSG_DATA(h);
                    365:       
                    366:       if (rtm->rtm_type == RTN_UNICAST && rtm->rtm_scope == RT_SCOPE_LINK)
                    367:        {
                    368:          /* Force re-reading resolv file right now, for luck. */
                    369:          daemon->last_resolv = 0;
                    370:          
                    371:          if (daemon->srv_save)
                    372:            {
                    373:              int fd;
                    374: 
                    375:              if (daemon->srv_save->sfd)
                    376:                fd = daemon->srv_save->sfd->fd;
                    377:              else if (daemon->rfd_save && daemon->rfd_save->refcount != 0)
                    378:                fd = daemon->rfd_save->fd;
                    379:              else
                    380:                return 0;
                    381:              
                    382:              while(sendto(fd, daemon->packet, daemon->packet_len, 0,
                    383:                           &daemon->srv_save->addr.sa, sa_len(&daemon->srv_save->addr)) == -1 && retry_send()); 
                    384:            }
                    385:        }
                    386:       return 0;
                    387:     }
                    388:   else if (h->nlmsg_type == RTM_NEWADDR || h->nlmsg_type == RTM_DELADDR) 
                    389:     return 1; /* clever bind mode - rescan */
                    390:   
                    391:   return 0;
                    392: }
                    393:        
                    394: static void nl_newaddress(time_t now)
                    395: {
                    396:   if (option_bool(OPT_CLEVERBIND) || daemon->doing_dhcp6 || daemon->doing_ra)
                    397:     enumerate_interfaces();
                    398:   
                    399:   if (option_bool(OPT_CLEVERBIND))
                    400:     create_bound_listeners(0);
                    401:   
                    402: #ifdef HAVE_DHCP6
                    403:   if (daemon->doing_dhcp6 || daemon->doing_ra)
                    404:     {
                    405:       join_multicast(0);
                    406:       dhcp_construct_contexts(now);
                    407:     }
                    408:   
                    409:   if (daemon->doing_dhcp6)
                    410:     lease_find_interfaces(now);
                    411: #endif
                    412: }
                    413: 
                    414: 
                    415: #endif
                    416: 
                    417:       

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>