git.meshlink.io Git - catta/blob - src/iface-windows.c

   1 /***
   2   This file is part of catta.
   3
   4   catta is free software; you can redistribute it and/or modify it
   5   under the terms of the GNU Lesser General Public License as
   6   published by the Free Software Foundation; either version 2.1 of the
   7   License, or (at your option) any later version.
   8
   9   catta is distributed in the hope that it will be useful, but WITHOUT
  10   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
  11   or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General
  12   Public License for more details.
  13
  14   You should have received a copy of the GNU Lesser General Public
  15   License along with catta; if not, write to the Free Software
  16   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  17   USA.
  18 ***/
  19
  20 #include "iface.h"
  21 #include "iface-windows.h"
  22
  23 #include <stdlib.h> // wcstombs
  24 #include <catta/malloc.h>
  25 #include <catta/log.h>
  26 #include <iphlpapi.h>
  27 #include <assert.h>
  28 #include "hashmap.h"
  29 #include "util.h"   // catta_format_mac_address
  30 #include "fdutil.h" // catta_set_nonblock
  31
  32
  33 typedef enum {
  34     INTERFACE_CHANGE_EVENT,
  35     ADDRESS_CHANGE_EVENT
  36 } ChangeEventType;
  37
  38 struct ChangeEvent {
  39     CATTA_LLIST_FIELDS(ChangeEvent, event);
  40     ChangeEventType type;
  41     MIB_NOTIFICATION_TYPE notification_type;
  42     union {
  43         MIB_IPINTERFACE_ROW iface;
  44         MIB_UNICASTIPADDRESS_ROW addr;
  45     } data;
  46 };
  47
  48
  49 // helper: determine the global_scope flag for an address
  50 static void set_global_scope_flag(CattaInterfaceAddress *ifaddr, const CattaAddress *addr)
  51 {
  52     if(addr->proto == CATTA_PROTO_INET6) {
  53         const struct in6_addr *ia = (struct in6_addr *)addr->data.ipv6.address;
  54         ifaddr->global_scope = !(IN6_IS_ADDR_LINKLOCAL(ia) || IN6_IS_ADDR_MULTICAST(ia));
  55     } else {
  56         ifaddr->global_scope = 1;
  57     }
  58 }
  59
  60 // integrate the information from an IP_ADAPTER_UNICAST_ADDRESS structure for
  61 // given CattaHwInterface into the CattaInterfaceMonitor
  62 static void ip_adapter_unicast_address(CattaInterfaceMonitor *m,
  63                                        CattaHwInterface *hw,
  64                                        IP_ADAPTER_UNICAST_ADDRESS *a)
  65 {
  66     CattaInterface *iface;
  67     CattaAddress addr;
  68     CattaInterfaceAddress *ifaddr;
  69     struct sockaddr *sa = a->Address.lpSockaddr;
  70
  71     // skip transient addresses; to quote MSDN: "The IP address is a cluster
  72     // address and should not be used by most applications."
  73     // http://msdn.microsoft.com/en-us/library/windows/desktop/aa366066(v=vs.85).aspx
  74     if(a->Flags & IP_ADAPTER_ADDRESS_TRANSIENT)
  75         return;
  76
  77     // fill addr struct for address lookup
  78     switch(sa->sa_family) {
  79     case AF_INET:
  80         memcpy(addr.data.data, &((struct sockaddr_in *)sa)->sin_addr, sizeof(struct in_addr));
  81         break;
  82     case AF_INET6:
  83         memcpy(addr.data.data, &((struct sockaddr_in6 *)sa)->sin6_addr, sizeof(struct in6_addr));
  84         break;
  85     default:
  86         catta_log_debug("unexpected address family on interface %d: %u", hw->index, sa->sa_family);
  87         return;
  88     }
  89     addr.proto = catta_af_to_proto(sa->sa_family);
  90
  91     // get protocol-specific CattaInterface object
  92     if(!(iface = catta_interface_monitor_get_interface(m, hw->index, addr.proto))) {
  93         catta_log_error("CattaInterface (index %d, proto %d) not found", hw->index, addr.proto);
  94         return;
  95     }
  96
  97     // find or allocate a CattaInterfaceAddress struct for this address
  98     if(!(ifaddr = catta_interface_monitor_get_address(m, iface, &addr))) {
  99         if(!(ifaddr = catta_interface_address_new(m, iface, &addr, a->OnLinkPrefixLength))) {
 100             catta_log_error("out of memory in ip_adapter_unicast_address");
 101             return;
 102         }
 103     }
 104
 105     set_global_scope_flag(ifaddr, &addr);
 106 }
 107
 108 // integrate the information from an IP_ADAPTER_ADDRESSES structure
 109 // as returned by GetAdaptersAddresses into the CattaInterfaceMonitor
 110 static void ip_adapter(CattaInterfaceMonitor *m, IP_ADAPTER_ADDRESSES *p)
 111 {
 112     IP_ADAPTER_UNICAST_ADDRESS *a;
 113     CattaIfIndex idx;
 114     CattaHwInterface *hw;
 115     size_t n;
 116
 117     // we want an index specific to the hardware interface, but Windows
 118     // has one for IPv4 and one for IPv6. it seems like these are always the
 119     // same unless one of the protocols is not available. let's have a bunch of
 120     // checks...
 121     if(!p->IfIndex && !p->Ipv6IfIndex) {
 122         return; // no usable protocols
 123     } else if(!p->IfIndex) {
 124         idx = p->Ipv6IfIndex;   // IPv6 but no IPv4 (huh!)
 125     } else if(!p->Ipv6IfIndex) {
 126         idx = p->IfIndex;       // IPv4 but no IPv6
 127     } else if(p->IfIndex == p->Ipv6IfIndex) {
 128         idx = p->IfIndex;       // same index for both protocols
 129     } else {
 130         // both indexes valid but not equal
 131         catta_log_error("unsupported interface: %ls (IfIndex and Ipv6IfIndex differ: %u/%u)",
 132             p->FriendlyName, (unsigned int)p->IfIndex, (unsigned int)p->Ipv6IfIndex);
 133         return;
 134     }
 135
 136     // find the CattaHwInterface by index or allocate a new one
 137     if((hw = catta_interface_monitor_get_hw_interface(m, idx)) == NULL) {
 138         if((hw = catta_hw_interface_new(m, idx)) == NULL) {
 139             catta_log_error("catta_hw_interface_new failed in ip_adapter_address");
 140             return;
 141         }
 142     }
 143
 144     // fill the CattaHwInterface struct with data
 145     // notice: this code is essentially duplicated in update_hw_interface()
 146     hw->flags_ok =
 147         (p->OperStatus == IfOperStatusUp) &&
 148         !(p->IfType == IF_TYPE_SOFTWARE_LOOPBACK) &&
 149         !(p->Flags & IP_ADAPTER_NO_MULTICAST) &&
 150         (m->server->config.allow_point_to_point || !(p->IfType == IF_TYPE_PPP));
 151             // XXX what about IF_TYPE_TUNNEL?
 152
 153     n = wcstombs(NULL, p->FriendlyName, 0) + 1;
 154     catta_free(hw->name);
 155     hw->name = catta_new(char, n);
 156     wcstombs(hw->name, p->FriendlyName, n);
 157
 158     hw->mtu = p->Mtu;
 159
 160     hw->mac_address_size = p->PhysicalAddressLength;
 161     if(hw->mac_address_size > CATTA_MAC_ADDRESS_MAX)
 162         hw->mac_address_size = CATTA_MAC_ADDRESS_MAX;
 163     memcpy(hw->mac_address, p->PhysicalAddress, hw->mac_address_size);
 164
 165     // process addresses
 166     // XXX remove addresses that are no longer in the list
 167     for(a=p->FirstUnicastAddress; a; a=a->Next)
 168         ip_adapter_unicast_address(m, hw, a);
 169 }
 170
 171
 172 // place the event into the queue to be handled (by the main thread)
 173 // and wake the event handler if necessary
 174 static void queue_event(CattaInterfaceMonitor *m, ChangeEvent *ev)
 175 {
 176     char c = 'X';
 177
 178     if(!ev)
 179         return;
 180
 181     if(!pthread_mutex_lock(&m->osdep.mutex)) {
 182         // queue the event
 183         CATTA_LLIST_APPEND(ChangeEvent, event, m->osdep.events, ev);
 184
 185         // wake the handler
 186         writepipe(m->osdep.pipefd[1], &c, sizeof(c));
 187
 188         pthread_mutex_unlock(&m->osdep.mutex);
 189     } else {
 190         catta_log_debug(__FILE__": queue_event: could not lock mutex");
 191         catta_free(ev);
 192     }
 193 }
 194
 195 // copy the given data row into an appropriate change event struct
 196 static ChangeEvent *new_event(ChangeEventType type, MIB_NOTIFICATION_TYPE ntype, void *row, size_t n)
 197 {
 198     ChangeEvent *ev;
 199
 200     if(!row)
 201         return NULL;
 202
 203     if(!(ev = catta_new(ChangeEvent, 1)))
 204         return NULL;
 205
 206     ev->type = type;
 207     ev->notification_type = ntype;
 208     memcpy(&ev->data, row, n);
 209
 210     return ev;
 211 }
 212
 213 static void WINAPI icn_callback(void *m, MIB_IPINTERFACE_ROW *row, MIB_NOTIFICATION_TYPE type)
 214 {
 215     queue_event(m, new_event(INTERFACE_CHANGE_EVENT, type, row, sizeof(*row)));
 216 }
 217
 218 static void WINAPI acn_callback(void *m, MIB_UNICASTIPADDRESS_ROW *row, MIB_NOTIFICATION_TYPE type)
 219 {
 220     queue_event(m, new_event(ADDRESS_CHANGE_EVENT, type, row, sizeof(*row)));
 221 }
 222
 223 static void update_hw_interface(CattaHwInterface *hw)
 224 {
 225     MIB_IF_ROW2 row;
 226     DWORD r;
 227     size_t n;
 228     int multicast;  // synthetic flag
 229
 230     row.InterfaceLuid.Value = 0;
 231     row.InterfaceIndex = hw->index;
 232     if((r = GetIfEntry2(&row)) != NO_ERROR) {
 233         catta_log_error("GetIfEntry2 failed for iface %d (error %u)", hw->index, (unsigned int)r);
 234         return;
 235     }
 236
 237     // fill the CattaHwInterface struct with data
 238     // notice: this code is essentially duplicated from ip_adapter()
 239     // notice: not sure where to find the IP_ADAPTER_NO_MULTICAST flag from an
 240     //         MIB_IF_ROW2 struct, so try to deduce it otherwise
 241     //         cf. http://msdn.microsoft.com/en-us/windows/desktop/ff568739(v=vs.100).aspx
 242     multicast = row.AccessType == NET_IF_ACCESS_BROADCAST ||
 243                 row.AccessType == NET_IF_ACCESS_POINT_TO_POINT;
 244     hw->flags_ok =
 245         (row.OperStatus == IfOperStatusUp) &&
 246         !(row.Type == IF_TYPE_SOFTWARE_LOOPBACK) &&
 247         multicast &&
 248         (hw->monitor->server->config.allow_point_to_point || !(row.Type == IF_TYPE_PPP));
 249             // XXX what about IF_TYPE_TUNNEL?
 250
 251     n = wcstombs(NULL, row.Alias, 0) + 1;
 252     catta_free(hw->name);
 253     hw->name = catta_new(char, n);
 254     wcstombs(hw->name, row.Alias, n);
 255
 256     hw->mtu = row.Mtu;
 257
 258     hw->mac_address_size = row.PhysicalAddressLength;
 259     if(hw->mac_address_size > CATTA_MAC_ADDRESS_MAX)
 260         hw->mac_address_size = CATTA_MAC_ADDRESS_MAX;
 261     memcpy(hw->mac_address, row.PhysicalAddress, hw->mac_address_size);
 262
 263     // XXX debugging, remove
 264     {
 265         char mac[256];
 266         catta_log_debug(" name: %s\n"
 267                         " mtu: %d\n"
 268                         " mac: %s\n"
 269                         " flags_ok: %d\n"
 270                         "   type: %u\n"
 271                         "   status: %u\n"
 272                         "   multicast: %d\n"
 273                         "   access type: %d",
 274             hw->name,
 275             hw->mtu,
 276             catta_format_mac_address(mac, sizeof(mac), hw->mac_address, hw->mac_address_size),
 277             hw->flags_ok,
 278             (unsigned int)row.Type,
 279             (unsigned int)row.OperStatus,
 280             multicast,
 281             (int)row.AccessType);
 282     }
 283
 284     catta_hw_interface_check_relevant(hw);
 285     catta_hw_interface_update_rrs(hw, 0);
 286 }
 287
 288 static void handle_iface_event(CattaInterfaceMonitor *m, MIB_IPINTERFACE_ROW *row, MIB_NOTIFICATION_TYPE type)
 289 {
 290     CattaIfIndex idx = row->InterfaceIndex;
 291     CattaProtocol proto = catta_af_to_proto(row->Family);
 292     const char *protostr = catta_proto_to_string(proto);
 293     CattaInterface *iface;
 294     CattaHwInterface *hw;
 295
 296     // XXX debug, remove
 297     {
 298         const char *typestr = NULL;
 299
 300         switch(type) {
 301             case MibParameterNotification:  typestr = "ParameterNotification"; break;
 302             case MibAddInstance:            typestr = "AddInstance"; break;
 303             case MibDeleteInstance:         typestr = "DeleteInstance"; break;
 304             default:                        typestr = "Unknown";
 305         }
 306
 307         catta_log_debug("interface %s on iface %d for %s", typestr, idx, protostr);
 308     }
 309
 310     // see if we know this interface
 311     iface = catta_interface_monitor_get_interface(m, idx, proto);
 312     hw = iface ? iface->hardware : catta_interface_monitor_get_hw_interface(m, idx);
 313
 314     // print debug messages for some unexpected cases
 315     if(type==MibParameterNotification && !iface)
 316         catta_log_debug("ParameterNotification received for unknown interface %d (%s)", idx, protostr);
 317     if(type==MibDeleteInstance && !iface)
 318         catta_log_debug("DeleteInstance received for unknown interface %d (%s)", idx, protostr);
 319     if(type==MibAddInstance && iface)
 320         catta_log_debug("AddInstance received for existing interface %d (%s)", idx, protostr);
 321     if(iface && !hw)
 322         catta_log_debug("missing CattaHwInterface for interface %d (%s)", idx, protostr);
 323
 324     switch(type) {
 325     case MibParameterNotification:
 326     case MibAddInstance:
 327         // create the physical interface if it is missing
 328         if(!hw) {
 329             if((hw = catta_hw_interface_new(m, idx)) == NULL) {
 330                 catta_log_error("catta_hw_interface_new failed in handle_iface_event");
 331                 return;
 332             }
 333         }
 334
 335         // create the protocol-specific interface if it is missing
 336         if(!iface) {
 337             if((iface = catta_interface_new(m, hw, proto)) == NULL) {
 338                 catta_log_error("catta_interface_new failed in handle_iface_event");
 339                 return;
 340             }
 341         }
 342
 343         assert(iface != NULL);
 344         assert(hw != NULL);
 345         assert(iface->hardware == hw);
 346
 347         update_hw_interface(hw);
 348         break;
 349     case MibDeleteInstance:
 350         if(iface)
 351             catta_interface_free(iface, 0);
 352
 353         // free the hardware interface when there are no more protocol-specific interfaces
 354         if(hw && !hw->interfaces)
 355             catta_hw_interface_free(hw, 0);
 356         break;
 357     default:
 358         catta_log_debug("unexpected type (%d) of interface change notification received", type);
 359     }
 360 }
 361
 362 static void handle_addr_event(CattaInterfaceMonitor *m, MIB_UNICASTIPADDRESS_ROW *row, MIB_NOTIFICATION_TYPE type)
 363 {
 364     CattaIfIndex idx = row->InterfaceIndex;
 365     CattaInterfaceAddress *ifaddr;
 366     CattaInterface *iface;
 367     CattaAddress addr;
 368     const char *protostr;
 369
 370     // fill addr struct for address lookup
 371     switch(row->Address.si_family) {
 372     case AF_INET:
 373         memcpy(addr.data.data, &row->Address.Ipv4.sin_addr, sizeof(struct in_addr));
 374         break;
 375     case AF_INET6:
 376         memcpy(addr.data.data, &row->Address.Ipv6.sin6_addr, sizeof(struct in6_addr));
 377         break;
 378     default:
 379         catta_log_debug("unexpected address family on interface %d: %u", idx, row->Address.si_family);
 380         return;
 381     }
 382     addr.proto = catta_af_to_proto(row->Address.si_family);
 383     protostr = catta_proto_to_string(addr.proto);
 384
 385     // XXX debug, remove
 386     {
 387         const char *typestr = NULL;
 388         char buf[CATTA_ADDRESS_STR_MAX];
 389
 390         switch(type) {
 391             case MibParameterNotification:  typestr = "ParameterNotification"; break;
 392             case MibAddInstance:            typestr = "AddInstance"; break;
 393             case MibDeleteInstance:         typestr = "DeleteInstance"; break;
 394             default:                        typestr = "Unknown";
 395         }
 396
 397         catta_log_debug("%s for %s address %s on iface %d",
 398                         typestr, protostr,
 399                         catta_address_snprint(buf, sizeof(buf), &addr),
 400                         idx);
 401     }
 402
 403     // see if we know this address/interface
 404     iface = catta_interface_monitor_get_interface(m, idx, addr.proto);
 405     ifaddr = iface ? catta_interface_monitor_get_address(m, iface, &addr) : NULL;
 406
 407     // print debug messages for some unexpected cases
 408     if(type==MibParameterNotification && !ifaddr)
 409         catta_log_debug("ParameterNotification received for unknown address on interface %d (%s)", idx, protostr);
 410     if(type==MibDeleteInstance && !ifaddr)
 411         catta_log_debug("DeleteInstance received for unknown address on interface %d (%s)", idx, protostr);
 412     if(type==MibAddInstance && ifaddr)
 413         catta_log_debug("AddInstance received for existing address on interface %d (%s)", idx, protostr);
 414     if(ifaddr && !iface)
 415         catta_log_debug("missing CattaInterface for address on interface %d (%s)", idx, protostr);
 416
 417     switch(type) {
 418     case MibParameterNotification:
 419     case MibAddInstance:
 420         // fetch the full event data
 421         if(GetUnicastIpAddressEntry(row) != NO_ERROR) {
 422             catta_log_error("GetUnicastIpAddressEntry failed in handle_addr_event");
 423             return;
 424         }
 425
 426         // skip addresses that are not suitable as source addresses
 427         if(row->SkipAsSource)
 428             return;
 429
 430         // create the interface if it is missing
 431         if(!iface) {
 432             CattaHwInterface *hw;
 433
 434             if((hw = catta_interface_monitor_get_hw_interface(m, idx)) == NULL) {
 435                 catta_log_error("interface %d not found in handle_addr_event", idx);
 436                 return;
 437             }
 438
 439             if((iface = catta_interface_new(m, hw, addr.proto)) == NULL) {
 440                 catta_log_error("catta_interface_new failed in handle_addr_event");
 441                 return;
 442             }
 443         }
 444         assert(iface != NULL);
 445
 446         // create the interface-associated address if it is missing
 447         if(!ifaddr) {
 448             unsigned prefixlen = row->OnLinkPrefixLength;
 449
 450             if((ifaddr = catta_interface_address_new(m, iface, &addr, prefixlen)) == NULL) {
 451                 catta_log_error("catta_interface_address_new failed in handle_addr_event");
 452                 return;
 453             }
 454         }
 455         assert(ifaddr != NULL);
 456
 457         set_global_scope_flag(ifaddr, &addr);
 458         catta_log_debug("   global_scope: %d", ifaddr->global_scope); // XXX debugging, remove
 459         break;
 460     case MibDeleteInstance:
 461         if(ifaddr)
 462             catta_interface_address_free(ifaddr);
 463         break;
 464     default:
 465         catta_log_debug("unexpected type (%d) of address change notification received", type);
 466     }
 467
 468     if(iface) {
 469         catta_interface_check_relevant(iface);
 470         catta_interface_update_rrs(iface, 0);
 471     }
 472 }
 473
 474 static void handle_events(CattaInterfaceMonitor *m)
 475 {
 476     char buf[16];
 477     ChangeEvent *ev;
 478
 479     if(!pthread_mutex_lock(&m->osdep.mutex)) {
 480         // clear the pipe
 481         while(readpipe(m->osdep.pipefd[0], buf, sizeof(buf)) == sizeof(buf)) {}
 482
 483         while((ev = m->osdep.events) != NULL) {
 484             CATTA_LLIST_REMOVE(ChangeEvent, event, m->osdep.events, ev);
 485
 486             // dispatch to the appropriate handler
 487             switch(ev->type) {
 488             case INTERFACE_CHANGE_EVENT:
 489                 handle_iface_event(m, &ev->data.iface, ev->notification_type);
 490                 break;
 491             case ADDRESS_CHANGE_EVENT:
 492                 handle_addr_event(m, &ev->data.addr, ev->notification_type);
 493                 break;
 494             default:
 495                 catta_log_debug("unhandled change event type in handle_events");
 496             }
 497
 498             catta_free(ev);
 499         }
 500
 501         pthread_mutex_unlock(&m->osdep.mutex);
 502     }
 503 }
 504
 505 static void pipe_callback(CattaWatch *w, int fd, CattaWatchEvent event, void *m)
 506 {
 507     // silence "unused parameter" warnings
 508     (void)w;
 509     (void)fd;
 510     (void)event;
 511
 512     handle_events(m);
 513 }
 514
 515
 516 int catta_interface_monitor_init_osdep(CattaInterfaceMonitor *m)
 517 {
 518     DWORD r;
 519
 520     pthread_mutex_init(&m->osdep.mutex, NULL);
 521
 522     CATTA_LLIST_HEAD_INIT(ChangeEvent, m->osdep.events);
 523
 524     if(pipe(m->osdep.pipefd) < 0) {
 525         catta_log_error("pipe() in catta_interface_monitor_init_osdep failed");
 526         return -1;
 527     }
 528     catta_set_nonblock(m->osdep.pipefd[0]);
 529     catta_set_nonblock(m->osdep.pipefd[1]);
 530
 531     m->osdep.icnhandle = NULL;
 532     m->osdep.acnhandle = NULL;
 533
 534     // register handler for change events
 535     m->osdep.watch = m->server->poll_api->watch_new(m->server->poll_api,
 536                                                     m->osdep.pipefd[0],
 537                                                     CATTA_WATCH_IN,
 538                                                     pipe_callback,
 539                                                     m);
 540     if(!m->osdep.watch) {
 541         catta_log_error(__FILE__": Failed to create watch.");
 542         return -1;
 543     }
 544
 545     // request async notification on interface changes
 546     r = NotifyIpInterfaceChange(AF_UNSPEC,
 547                                 // icn_callback needs to be WINAPI but
 548                                 // MingW up to 3.1.0 erroneously defines
 549                                 // PIPINTERFACE_CHANGE_CALLBACK without it
 550                                 (PIPINTERFACE_CHANGE_CALLBACK)icn_callback,
 551                                 m, FALSE, &m->osdep.icnhandle);
 552     if(r != NO_ERROR)
 553         catta_log_error("NotifyIpInterfaceChange failed: %u", (unsigned int)r);
 554
 555     // request async notification on address changes
 556     r = NotifyUnicastIpAddressChange(AF_UNSPEC, acn_callback, m, FALSE,
 557                                      &m->osdep.acnhandle);
 558     if(r != NO_ERROR)
 559         catta_log_error("NotifyUnicastIpAddressChange failed: %u", (unsigned int)r);
 560
 561     return 0;
 562 }
 563
 564 void catta_interface_monitor_free_osdep(CattaInterfaceMonitor *m)
 565 {
 566     ChangeEvent *ev;
 567
 568     // unregister callbacks
 569     if(m->osdep.icnhandle) CancelMibChangeNotify2(m->osdep.icnhandle);
 570     if(m->osdep.acnhandle) CancelMibChangeNotify2(m->osdep.acnhandle);
 571
 572     // unregister event handler
 573     m->server->poll_api->watch_free(m->osdep.watch);
 574
 575     // close pipe
 576     closepipe(m->osdep.pipefd[0]);
 577     closepipe(m->osdep.pipefd[1]);
 578
 579     // make sure no stray events can come in during destruction
 580     pthread_mutex_lock(&m->osdep.mutex);
 581
 582     // free all events that are still in the queue
 583     while((ev = m->osdep.events) != NULL) {
 584         CATTA_LLIST_REMOVE(ChangeEvent, event, m->osdep.events, ev);
 585         catta_free(ev);
 586     }
 587
 588     pthread_mutex_unlock(&m->osdep.mutex);
 589     pthread_mutex_destroy(&m->osdep.mutex);
 590 }
 591
 592 void catta_interface_monitor_sync(CattaInterfaceMonitor *m)
 593 {
 594     IP_ADAPTER_ADDRESSES *buf = NULL;
 595     IP_ADAPTER_ADDRESSES *p;
 596     ULONG bufsize = 15000;
 597     ULONG r;
 598
 599     // allocate a buffer and call GetAdaptersAddresses
 600     // retry with the correct size if the buffer was too small
 601     do {
 602         catta_free(buf);    // no-op on first iteration
 603         if((buf = catta_malloc(bufsize)) == NULL) {
 604             catta_log_error("malloc failed in catta_interface_monitor_sync");
 605             return;
 606         }
 607
 608         r = GetAdaptersAddresses(AF_UNSPEC, 0, NULL, buf, &bufsize);
 609     } while(r == ERROR_BUFFER_OVERFLOW);
 610
 611     if(r != NO_ERROR) {
 612         catta_log_error("GetAdaptersAddresses failed: %u", (unsigned int)r);
 613         return;
 614     }
 615
 616     // XXX remove interfaces for adapters that are no longer in the list
 617
 618     // create 'CattaInterface's for every adapter
 619     for(p=buf; p; p=p->Next)
 620         ip_adapter(m, p);
 621
 622     catta_free(buf);
 623
 624     m->list_complete = 1;
 625     catta_interface_monitor_check_relevant(m);
 626     catta_interface_monitor_update_rrs(m, 0);
 627     catta_log_info("Network interface enumeration completed.");
 628 }