Win32 fixes: use CLOSESOCKET to close sockets
[olsrd.git] / src / win32 / ifnet.c
1 /*
2  * The olsr.org Optimized Link-State Routing daemon (olsrd)
3  * Copyright (c) 2004, Thomas Lopatic (thomas@lopatic.de)
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  *
10  * * Redistributions of source code must retain the above copyright
11  *   notice, this list of conditions and the following disclaimer.
12  * * Redistributions in binary form must reproduce the above copyright
13  *   notice, this list of conditions and the following disclaimer in
14  *   the documentation and/or other materials provided with the
15  *   distribution.
16  * * Neither the name of olsr.org, olsrd nor the names of its
17  *   contributors may be used to endorse or promote products derived
18  *   from this software without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
21  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
22  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
23  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
24  * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
25  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
26  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
27  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
28  * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
30  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
31  * POSSIBILITY OF SUCH DAMAGE.
32  *
33  * Visit http://www.olsr.org for more information.
34  *
35  * If you find this software useful feel free to make a donation
36  * to the project. For more information see the website or contact
37  * the copyright holders.
38  *
39  */
40
41 #include <winsock2.h>
42
43 #include "interfaces.h"
44 #include "olsr.h"
45 #include "parser.h"
46 #include "defs.h"
47 #include "net_os.h"
48 #include "ifnet.h"
49 #include "generate_msg.h"
50 #include "scheduler.h"
51 #include "mantissa.h"
52 #include "lq_packet.h"
53 #include "net_olsr.h"
54 #include "common/string.h"
55
56 #include <iphlpapi.h>
57 #include <iprtrmib.h>
58
59 #include <arpa/inet.h>
60
61 #define BUFSPACE  (127*1024)    /* max. input buffer size to request */
62
63
64 struct MibIpInterfaceRow
65 {
66   USHORT Family;
67   ULONG64 InterfaceLuid;
68   ULONG InterfaceIndex;
69   ULONG MaxReassemblySize;
70   ULONG64 InterfaceIdentifier;
71   ULONG MinRouterAdvertisementInterval;
72   ULONG MaxRouterAdvertisementInterval;
73   BOOLEAN AdvertisingEnabled;
74   BOOLEAN ForwardingEnabled;
75   BOOLEAN WeakHostSend;
76   BOOLEAN WeakHostReceive;
77   BOOLEAN UseAutomaticMetric;
78   BOOLEAN UseNeighborUnreachabilityDetection;
79   BOOLEAN ManagedAddressConfigurationSupported;
80   BOOLEAN OtherStatefulConfigurationSupported;
81   BOOLEAN AdvertiseDefaultRoute;
82   INT RouterDiscoveryBehavior;
83   ULONG DadTransmits;
84   ULONG BaseReachableTime;
85   ULONG RetransmitTime;
86   ULONG PathMtuDiscoveryTimeout;
87   INT LinkLocalAddressBehavior;
88   ULONG LinkLocalAddressTimeout;
89   ULONG ZoneIndices[16];
90   ULONG SitePrefixLength;
91   ULONG Metric;
92   ULONG NlMtu;
93   BOOLEAN Connected;
94   BOOLEAN SupportsWakeUpPatterns;
95   BOOLEAN SupportsNeighborDiscovery;
96   BOOLEAN SupportsRouterDiscovery;
97   ULONG ReachableTime;
98   BYTE TransmitOffload;
99   BYTE ReceiveOffload;
100   BOOLEAN DisableDefaultRoutes;
101 };
102
103 typedef DWORD (__stdcall *GETIPINTERFACEENTRY)
104   (struct MibIpInterfaceRow *Row);
105
106 typedef DWORD (__stdcall *GETADAPTERSADDRESSES)
107   (ULONG Family, DWORD Flags, PVOID Reserved,
108    PIP_ADAPTER_ADDRESSES pAdapterAddresses, PULONG pOutBufLen);
109
110 struct InterfaceInfo
111 {
112   unsigned int Index;
113   int Mtu;
114   int Metric;
115   unsigned int Addr;
116   unsigned int Mask;
117   unsigned int Broad;
118   char Guid[39];
119 };
120
121 void WinSockPError(char *);
122 char *StrError(unsigned int ErrNo);
123
124 void ListInterfaces(void);
125 int GetIntInfo(struct InterfaceInfo *Info, char *Name);
126 void RemoveInterface(struct olsr_if *IntConf);
127
128 #define MAX_INTERFACES 100
129
130 int __stdcall SignalHandler(unsigned long Signal);
131
132 static unsigned long __stdcall SignalHandlerWrapper(void *Dummy __attribute__((unused)))
133 {
134   SignalHandler(0);
135   return 0;
136 }
137
138 static void CallSignalHandler(void)
139 {
140   unsigned long ThreadId;
141
142   CreateThread(NULL, 0, SignalHandlerWrapper, NULL, 0, &ThreadId);
143 }
144
145 static void MiniIndexToIntName(char *String, int MiniIndex)
146 {
147   const char *HexDigits = "0123456789abcdef";
148
149   String[0] = 'i';
150   String[1] = 'f';
151
152   String[2] = HexDigits[(MiniIndex >> 4) & 15];
153   String[3] = HexDigits[MiniIndex & 15];
154
155   String[4] = 0;
156 }
157
158 static int IntNameToMiniIndex(int *MiniIndex, char *String)
159 {
160   const char *HexDigits = "0123456789abcdef";
161   int i, k;
162   char ch;
163
164   if ((String[0] != 'i' && String[0] != 'I') ||
165       (String[1] != 'f' && String[1] != 'F'))
166     return -1;
167
168   *MiniIndex = 0;
169
170   for (i = 2; i < 4; i++)
171   {
172     ch = String[i];
173
174     if (ch >= 'A' && ch <= 'F')
175       ch += 32;
176
177     for (k = 0; k < 16 && ch != HexDigits[k]; k++);
178
179     if (k == 16)
180       return -1;
181
182     *MiniIndex = (*MiniIndex << 4) | k;
183   }
184
185   return 0;
186 }
187
188 static int FriendlyNameToMiniIndex(int *MiniIndex, char *String)
189 {
190   unsigned long BuffLen;
191   unsigned long Res;
192   IP_ADAPTER_ADDRESSES AdAddr[MAX_INTERFACES], *WalkerAddr;
193   char FriendlyName[MAX_INTERFACE_NAME_LEN];
194   HMODULE h;
195   GETADAPTERSADDRESSES pfGetAdaptersAddresses;
196
197   h = LoadLibrary("iphlpapi.dll");
198
199   if (h == NULL)
200   {
201     fprintf(stderr, "LoadLibrary() = %08lx", GetLastError());
202     return -1;
203   }
204
205   pfGetAdaptersAddresses = (GETADAPTERSADDRESSES) GetProcAddress(h, "GetAdaptersAddresses");
206
207   if (pfGetAdaptersAddresses == NULL)
208   {
209     fprintf(stderr, "Unable to use adapter friendly name (GetProcAddress() = %08lx)\n", GetLastError());
210     return -1;
211   }
212
213   BuffLen = sizeof (AdAddr);
214
215   Res = pfGetAdaptersAddresses(AF_INET, 0, NULL, AdAddr, &BuffLen);
216
217   if (Res != NO_ERROR)
218   {
219     fprintf(stderr, "GetAdaptersAddresses() = %08lx", GetLastError());
220     return -1;
221   }
222
223   for (WalkerAddr = AdAddr; WalkerAddr != NULL; WalkerAddr = WalkerAddr->Next)
224   {
225     OLSR_PRINTF(5, "Index = %08x - ", (int)WalkerAddr->IfIndex);
226
227     wcstombs(FriendlyName, WalkerAddr->FriendlyName, MAX_INTERFACE_NAME_LEN);
228
229     OLSR_PRINTF(5, "Friendly name = %s\n", FriendlyName);
230
231     if (strncmp(FriendlyName, String, MAX_INTERFACE_NAME_LEN) == 0)
232       break;
233   }
234
235   if (WalkerAddr == NULL)
236   {
237     fprintf(stderr, "No such interface: %s!\n", String);
238     return -1;
239   }
240
241   *MiniIndex = WalkerAddr->IfIndex & 255;
242
243   return 0;
244 }
245
246 int GetIntInfo(struct InterfaceInfo *Info, char *Name)
247 {
248   int MiniIndex;
249   unsigned char Buff[MAX_INTERFACES * sizeof (MIB_IFROW) + 4];
250   MIB_IFTABLE *IfTable;
251   unsigned long BuffLen;
252   unsigned long Res;
253   int TabIdx;
254   IP_ADAPTER_INFO AdInfo[MAX_INTERFACES], *Walker;
255   HMODULE Lib;
256   struct MibIpInterfaceRow Row;
257   GETIPINTERFACEENTRY InterfaceEntry;
258
259   if (olsr_cnf->ip_version == AF_INET6)
260   {
261     fprintf(stderr, "IPv6 not supported by GetIntInfo()!\n");
262     return -1;
263   }
264
265   if ((Name[0] != 'i' && Name[0] != 'I') ||
266       (Name[1] != 'f' && Name[1] != 'F'))
267   {
268     if (FriendlyNameToMiniIndex(&MiniIndex, Name) < 0)
269     {
270       fprintf(stderr, "No such interface: %s!\n", Name);
271       return -1;
272     }
273   }
274
275   else
276   {
277     if (IntNameToMiniIndex(&MiniIndex, Name) < 0)
278     {
279       fprintf(stderr, "No such interface: %s!\n", Name);
280       return -1;
281     }
282   }
283
284   IfTable = (MIB_IFTABLE *)Buff;
285
286   BuffLen = sizeof (Buff);
287
288   Res = GetIfTable(IfTable, &BuffLen, FALSE);
289
290   if (Res != NO_ERROR)
291   {
292     fprintf(stderr, "GetIfTable() = %08lx, %s", Res, StrError(Res));
293     return -1;
294   }
295
296   for (TabIdx = 0; TabIdx < (int)IfTable->dwNumEntries; TabIdx++)
297   {
298     OLSR_PRINTF(5, "Index = %08x\n", (int)IfTable->table[TabIdx].dwIndex);
299
300     if ((int)(IfTable->table[TabIdx].dwIndex & 255) == MiniIndex)
301       break;
302   }
303
304   if (TabIdx == (int)IfTable->dwNumEntries)
305   {
306     fprintf(stderr, "No such interface: %s!\n", Name);
307     return -1;
308   }
309
310   Info->Index = IfTable->table[TabIdx].dwIndex;
311   Info->Mtu = (int)IfTable->table[TabIdx].dwMtu;
312
313   Info->Mtu -= olsr_cnf->ip_version == AF_INET6 ? UDP_IPV6_HDRSIZE : UDP_IPV4_HDRSIZE;
314
315   Lib = LoadLibrary("iphlpapi.dll");
316
317   if (Lib == NULL)
318   {
319     fprintf(stderr, "Cannot load iphlpapi.dll: %08lx\n", GetLastError());
320     return -1;
321   }
322
323   InterfaceEntry = (GETIPINTERFACEENTRY)GetProcAddress(Lib, "GetIpInterfaceEntry");
324
325   if (InterfaceEntry == NULL)
326   {
327     OLSR_PRINTF(5, "Not running on Vista - setting interface metric to 0.\n");
328
329     Info->Metric = 0;
330   }
331
332   else
333   {
334     memset(&Row, 0, sizeof (struct MibIpInterfaceRow));
335
336     Row.Family = AF_INET;
337     Row.InterfaceIndex = Info->Index;
338
339     Res = InterfaceEntry(&Row);
340
341     if (Res != NO_ERROR)
342     {
343       fprintf(stderr, "GetIpInterfaceEntry() = %08lx", Res);
344       FreeLibrary(Lib);
345       return -1;
346     }
347
348     Info->Metric = Row.Metric;
349
350     OLSR_PRINTF(5, "Running on Vista - interface metric is %d.\n", Info->Metric);
351   }
352
353   FreeLibrary(Lib);
354
355   BuffLen = sizeof (AdInfo);
356
357   Res = GetAdaptersInfo(AdInfo, &BuffLen);
358
359   if (Res != NO_ERROR)
360   {
361     fprintf(stderr, "GetAdaptersInfo() = %08lx, %s", GetLastError(),
362             StrError(Res));
363     return -1;
364   }
365
366   for (Walker = AdInfo; Walker != NULL; Walker = Walker->Next)
367   {
368     OLSR_PRINTF(5, "Index = %08x\n", (int)Walker->Index);
369
370     if ((int)(Walker->Index & 255) == MiniIndex)
371       break;
372   }
373
374   if (Walker == NULL)
375   {
376     fprintf(stderr, "No such interface: %s!\n", Name);
377     return -1;
378   }
379
380   inet_pton(AF_INET, Walker->IpAddressList.IpAddress.String, &Info->Addr);
381   inet_pton(AF_INET, Walker->IpAddressList.IpMask.String, &Info->Mask);
382
383   Info->Broad = Info->Addr | ~Info->Mask;
384
385   strscpy(Info->Guid, Walker->AdapterName, sizeof(Info->Guid));
386
387   if ((IfTable->table[TabIdx].dwOperStatus != MIB_IF_OPER_STATUS_CONNECTED &&
388       IfTable->table[TabIdx].dwOperStatus != MIB_IF_OPER_STATUS_OPERATIONAL) ||
389       Info->Addr == 0)
390   {
391     OLSR_PRINTF(3, "Interface %s not up!\n", Name);
392     return -1;
393   }
394
395   return 0;
396 }
397
398 #if !defined OID_802_11_CONFIGURATION
399 #define OID_802_11_CONFIGURATION 0x0d010211
400 #endif
401
402 #if !defined IOCTL_NDIS_QUERY_GLOBAL_STATS
403 #define IOCTL_NDIS_QUERY_GLOBAL_STATS 0x00170002
404 #endif
405
406 static int IsWireless(char *IntName)
407 {
408 #if !defined WINCE
409   struct InterfaceInfo Info;
410   char DevName[43];
411   HANDLE DevHand;
412   unsigned int ErrNo;
413   unsigned int Oid;
414   unsigned char OutBuff[100];
415   unsigned long OutBytes;
416
417   if (GetIntInfo(&Info, IntName) < 0)
418     return -1;
419
420   DevName[0] = '\\';
421   DevName[1] = '\\';
422   DevName[2] = '.';
423   DevName[3] = '\\';
424
425   strscpy(DevName + 4, Info.Guid, sizeof(DevName) - 4);
426
427   OLSR_PRINTF(5, "Checking whether interface %s is wireless.\n", DevName);
428
429   DevHand = CreateFile(DevName, GENERIC_READ,
430                        FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING,
431                        FILE_ATTRIBUTE_NORMAL, NULL);
432
433   if (DevHand == INVALID_HANDLE_VALUE)
434   {
435     ErrNo = GetLastError();
436
437     OLSR_PRINTF(5, "CreateFile() = %08x, %s\n", ErrNo, StrError(ErrNo));
438     return -1;
439   }
440
441   Oid = OID_802_11_CONFIGURATION;
442
443   if (!DeviceIoControl(DevHand, IOCTL_NDIS_QUERY_GLOBAL_STATS,
444                        &Oid, sizeof (Oid),
445                        OutBuff, sizeof (OutBuff),
446                        &OutBytes, NULL))
447   {
448     ErrNo = GetLastError();
449
450     CloseHandle(DevHand);
451
452     if (ErrNo == ERROR_GEN_FAILURE || ErrNo == ERROR_INVALID_PARAMETER)
453     {
454       OLSR_PRINTF(5, "OID not supported. Device probably not wireless.\n");
455       return 0;
456     }
457
458     OLSR_PRINTF(5, "DeviceIoControl() = %08x, %s\n", ErrNo, StrError(ErrNo));
459     return -1;
460   }
461
462   CloseHandle(DevHand);
463 #endif
464   return 1;
465 }
466
467 void ListInterfaces(void)
468 {
469   IP_ADAPTER_INFO AdInfo[MAX_INTERFACES], *Walker;
470   unsigned long AdInfoLen;
471   char IntName[5];
472   IP_ADDR_STRING *Walker2;
473   unsigned long Res;
474   int IsWlan;
475
476   if (olsr_cnf->ip_version == AF_INET6)
477   {
478     fprintf(stderr, "IPv6 not supported by ListInterfaces()!\n");
479     return;
480   }
481
482   AdInfoLen = sizeof (AdInfo);
483
484   Res = GetAdaptersInfo(AdInfo, &AdInfoLen);
485
486   if (Res == ERROR_NO_DATA)
487   {
488     printf("No interfaces detected.\n");
489     return;
490   }
491
492   if (Res != NO_ERROR)
493   {
494     fprintf(stderr, "GetAdaptersInfo() = %08lx, %s", Res, StrError(Res));
495     return;
496   }
497
498   for (Walker = AdInfo; Walker != NULL; Walker = Walker->Next)
499   {
500     OLSR_PRINTF(5, "Index = %08x\n", (int)Walker->Index);
501
502     MiniIndexToIntName(IntName, Walker->Index);
503
504     printf("%s: ", IntName);
505
506     IsWlan = IsWireless(IntName);
507
508     if (IsWlan < 0)
509       printf("?");
510
511     else if (IsWlan == 0)
512       printf("-");
513
514     else
515       printf("+");
516
517     for (Walker2 = &Walker->IpAddressList; Walker2 != NULL;
518          Walker2 = Walker2->Next)
519       printf(" %s", Walker2->IpAddress.String);
520
521     printf("\n");
522   }
523 }
524
525 void RemoveInterface(struct olsr_if *IntConf)
526 {
527   struct interface *Int;
528   struct ipaddr_str buf;
529
530   OLSR_PRINTF(1, "Removing interface %s.\n", IntConf->name);
531
532   Int = IntConf->interf;
533
534   run_ifchg_cbs(Int, IFCHG_IF_ADD);
535
536   /* Dequeue */
537   list_remove(&Int->int_node);
538
539   if (ipequal(&olsr_cnf->main_addr, &Int->ip_addr)) {
540     if (list_is_empty(&interface_head)) {
541       memset(&olsr_cnf->main_addr, 0, olsr_cnf->ipsize);
542       OLSR_PRINTF(1, "Removed last interface. Cleared main address.\n");
543     } else {
544
545       /* Grab the first interface in the list. */
546       olsr_cnf->main_addr = list2interface(interface_head.next)->ip_addr;
547       olsr_ip_to_string(&buf, &olsr_cnf->main_addr);
548       OLSR_PRINTF(1, "New main address: %s\n", buf.buf);
549
550     }
551   }
552
553   /*
554    * Deregister functions for periodic message generation
555    */
556   olsr_stop_timer(Int->hello_gen_timer);
557   olsr_stop_timer(Int->tc_gen_timer);
558   olsr_stop_timer(Int->mid_gen_timer);
559   olsr_stop_timer(Int->hna_gen_timer);
560
561   /*
562    * Stop interface pacing.
563    */
564   olsr_stop_timer(Int->buffer_hold_timer);
565
566   net_remove_buffer(Int);
567
568   IntConf->configured = 0;
569   unlock_interface(IntConf->interf);
570   IntConf->interf = NULL;
571
572   remove_olsr_socket(Int->olsr_socket, &olsr_input, NULL);
573   CLOSESOCKET(Int->olsr_socket);
574
575   unlock_interface(Int);
576
577   if (list_is_empty(&interface_head) && !olsr_cnf->allow_no_interfaces) {
578     OLSR_PRINTF(1, "No more active interfaces - exiting.\n");
579     olsr_cnf->exit_value = EXIT_FAILURE;
580     CallSignalHandler();
581   }
582 }
583
584 /**
585  * Initializes the special interface used in
586  * host-client emulation
587  */
588 int add_hemu_if(struct olsr_if *iface)
589 {
590   struct interface *ifp;
591   uint32_t addr[4];
592   struct ipaddr_str buf;
593   size_t name_size;
594
595   if(!iface->host_emul)
596     return -1;
597
598   ifp = olsr_cookie_malloc(interface_mem_cookie);
599
600   memset(ifp, 0, sizeof (struct interface));
601
602   iface->configured = true;
603   iface->interf = ifp;
604   lock_interface(iface->interf);
605
606   name_size = strlen("hcif01") + 1;
607   ifp->is_hcif = true;
608   ifp->int_name = olsr_malloc(name_size, "Interface update 3");
609   ifp->int_metric = 0;
610
611   strscpy(ifp->int_name, "hcif01", name_size);
612
613   OLSR_PRINTF(1, "Adding %s(host emulation):\n", ifp->int_name);
614
615   OLSR_PRINTF(1, "       Address:%s\n", olsr_ip_to_string(&buf, &iface->hemu_ip));
616
617   OLSR_PRINTF(1, "       NB! This is a emulated interface\n       that does not exist in the kernel!\n");
618
619   /* Queue */
620   list_add_before(&interface_head, &ifp->int_node);
621
622   if(ipequal(&all_zero, &olsr_cnf->main_addr))
623     {
624       olsr_cnf->main_addr = iface->hemu_ip;
625       OLSR_PRINTF(1, "New main address: %s\n", olsr_ip_to_string(&buf, &olsr_cnf->main_addr));
626     }
627
628   ifp->int_mtu = OLSR_DEFAULT_MTU;
629
630   ifp->int_mtu -= olsr_cnf->ip_version == AF_INET6 ? UDP_IPV6_HDRSIZE : UDP_IPV4_HDRSIZE;
631
632   /* Set up buffer */
633   net_add_buffer(ifp);
634
635
636   if(olsr_cnf->ip_version == AF_INET)
637     {
638       struct sockaddr_in sin4;
639
640       memset(&sin4, 0, sizeof(sin4));
641
642       sin4.sin_family = AF_INET;
643       sin4.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
644       sin4.sin_port = htons(10150);
645
646      /* IP version 4 */
647       ifp->ip_addr.v4 = iface->hemu_ip.v4;
648
649       memcpy(&ifp->int_addr.sin_addr, &iface->hemu_ip, olsr_cnf->ipsize);
650
651       /*
652        *We create one socket for each interface and bind
653        *the socket to it. This to ensure that we can control
654        *on what interface the message is transmitted
655        */
656
657       ifp->olsr_socket = gethemusocket(&sin4);
658
659       if (ifp->olsr_socket < 0)
660         {
661           fprintf(stderr, "Could not initialize socket... exiting!\n\n");
662           exit(1);
663         }
664
665     }
666   else
667     {
668       /* IP version 6 */
669       memcpy(&ifp->ip_addr, &iface->hemu_ip, olsr_cnf->ipsize);
670
671 #if 0
672       /*
673        *We create one socket for each interface and bind
674        *the socket to it. This to ensure that we can control
675        *on what interface the message is transmitted
676        */
677
678       ifp->olsr_socket = gethcsocket6(&addrsock6, bufspace, ifp->int_name);
679
680       join_mcast(ifp, ifp->olsr_socket);
681
682       if (ifp->olsr_socket < 0)
683         {
684           fprintf(stderr, "Could not initialize socket... exiting!\n\n");
685           exit(1);
686         }
687
688 #endif
689     }
690
691   /* Send IP as first 4/16 bytes on socket */
692   memcpy(addr, iface->hemu_ip.v6.s6_addr, olsr_cnf->ipsize);
693   addr[0] = htonl(addr[0]);
694   addr[1] = htonl(addr[1]);
695   addr[2] = htonl(addr[2]);
696   addr[3] = htonl(addr[3]);
697
698   if(send(ifp->olsr_socket, (char *)addr, olsr_cnf->ipsize, 0) != (int)olsr_cnf->ipsize)
699     {
700       fprintf(stderr, "Error sending IP!");
701     }
702
703   /* Register socket */
704   add_olsr_socket(ifp->olsr_socket, &olsr_input_hostemu, NULL, NULL, SP_PR_READ);
705
706   /*
707    * Register functions for periodic message generation
708    */
709   ifp->hello_gen_timer =
710     olsr_start_timer(iface->cnf->hello_params.emission_interval * MSEC_PER_SEC,
711                      HELLO_JITTER, OLSR_TIMER_PERIODIC,
712                      olsr_cnf->lq_level == 0 ? &generate_hello : &olsr_output_lq_hello,
713                      ifp, hello_gen_timer_cookie->ci_id);
714   ifp->tc_gen_timer =
715     olsr_start_timer(iface->cnf->tc_params.emission_interval * MSEC_PER_SEC,
716                      TC_JITTER, OLSR_TIMER_PERIODIC,
717                      olsr_cnf->lq_level == 0 ? &generate_tc : &olsr_output_lq_tc,
718                      ifp, tc_gen_timer_cookie->ci_id);
719   ifp->mid_gen_timer =
720     olsr_start_timer(iface->cnf->mid_params.emission_interval * MSEC_PER_SEC,
721                      MID_JITTER, OLSR_TIMER_PERIODIC, &generate_mid, ifp,
722                      mid_gen_timer_cookie->ci_id);
723   ifp->hna_gen_timer =
724     olsr_start_timer(iface->cnf->hna_params.emission_interval * MSEC_PER_SEC,
725                      HNA_JITTER, OLSR_TIMER_PERIODIC, &generate_hna, ifp,
726                      hna_gen_timer_cookie->ci_id);
727
728   /* Recalculate max topology hold time */
729   if(olsr_cnf->max_tc_vtime < iface->cnf->tc_params.emission_interval)
730     olsr_cnf->max_tc_vtime = iface->cnf->tc_params.emission_interval;
731
732   ifp->hello_etime = (olsr_reltime)(iface->cnf->hello_params.emission_interval * MSEC_PER_SEC);
733   ifp->valtimes.hello = reltime_to_me(iface->cnf->hello_params.validity_time * MSEC_PER_SEC);
734   ifp->valtimes.tc = reltime_to_me(iface->cnf->tc_params.validity_time * MSEC_PER_SEC);
735   ifp->valtimes.mid = reltime_to_me(iface->cnf->mid_params.validity_time * MSEC_PER_SEC);
736   ifp->valtimes.hna = reltime_to_me(iface->cnf->hna_params.validity_time * MSEC_PER_SEC);
737
738   lock_interface(ifp);
739
740   return 1;
741 }
742
743 int chk_if_changed(struct olsr_if *IntConf)
744 {
745   struct ipaddr_str buf;
746   struct interface *Int;
747   struct InterfaceInfo Info;
748   int Res;
749   int IsWlan;
750   union olsr_ip_addr OldVal, NewVal;
751   struct sockaddr_in *AddrIn;
752
753   if (olsr_cnf->ip_version == AF_INET6)
754   {
755     fprintf(stderr, "IPv6 not supported by chk_if_changed()!\n");
756     return 0;
757   }
758
759 #ifdef DEBUG
760   OLSR_PRINTF(3, "Checking if %s is set down or changed\n", IntConf->name);
761 #endif
762
763   Int = IntConf->interf;
764
765   if (GetIntInfo(&Info, IntConf->name) < 0)
766   {
767     RemoveInterface(IntConf);
768     return 1;
769   }
770
771   Res = 0;
772
773   IsWlan = IsWireless(IntConf->name);
774
775   if (IsWlan < 0)
776     IsWlan = 1;
777
778   if (Int->is_wireless != IsWlan)
779   {
780     OLSR_PRINTF(1, "\tLAN/WLAN change: %d -> %d.\n", Int->is_wireless, IsWlan);
781
782     Int->is_wireless = IsWlan;
783
784     if (IntConf->cnf->weight.fixed)
785       Int->int_metric = IntConf->cnf->weight.value;
786
787     else
788       Int->int_metric = Info.Metric;
789
790     Res = 1;
791   }
792
793   if (Int->int_mtu != Info.Mtu)
794   {
795     OLSR_PRINTF(1, "\tMTU change: %d -> %d.\n", (int)Int->int_mtu,
796                 Info.Mtu);
797
798     Int->int_mtu = Info.Mtu;
799
800     net_remove_buffer(Int);
801     net_add_buffer(Int);
802
803     Res = 1;
804   }
805
806   OldVal.v4 = Int->int_addr.sin_addr;
807   NewVal.v4.s_addr = Info.Addr;
808
809 #ifdef DEBUG
810   OLSR_PRINTF(3, "\tAddress: %s\n", olsr_ip_to_string(&buf, &NewVal));
811 #endif
812
813   if (NewVal.v4.s_addr != OldVal.v4.s_addr)
814   {
815     OLSR_PRINTF(1, "\tAddress change.\n");
816     OLSR_PRINTF(1, "\tOld: %s\n", olsr_ip_to_string(&buf, &OldVal));
817     OLSR_PRINTF(1, "\tNew: %s\n", olsr_ip_to_string(&buf, &NewVal));
818
819     Int->ip_addr.v4 = NewVal.v4;
820
821     AddrIn = &Int->int_addr;
822
823     AddrIn->sin_family = AF_INET;
824     AddrIn->sin_port = 0;
825     AddrIn->sin_addr = NewVal.v4;
826
827     if (olsr_cnf->main_addr.v4.s_addr == OldVal.v4.s_addr)
828     {
829       OLSR_PRINTF(1, "\tMain address change.\n");
830
831       olsr_cnf->main_addr.v4 = NewVal.v4;
832     }
833
834     Res = 1;
835   }
836
837   else
838     OLSR_PRINTF(3, "\tNo address change.\n");
839
840   OldVal.v4 = ((struct sockaddr_in *)&Int->int_netmask)->sin_addr;
841   NewVal.v4.s_addr = Info.Mask;
842
843 #ifdef DEBUG
844   OLSR_PRINTF(3, "\tNetmask: %s\n", olsr_ip_to_string(&buf, &NewVal));
845 #endif
846
847   if (NewVal.v4.s_addr != OldVal.v4.s_addr)
848   {
849     OLSR_PRINTF(1, "\tNetmask change.\n");
850     OLSR_PRINTF(1, "\tOld: %s\n", olsr_ip_to_string(&buf, &OldVal));
851     OLSR_PRINTF(1, "\tNew: %s\n", olsr_ip_to_string(&buf, &NewVal));
852
853     AddrIn = (struct sockaddr_in *)&Int->int_netmask;
854
855     AddrIn->sin_family = AF_INET;
856     AddrIn->sin_port = 0;
857     AddrIn->sin_addr = NewVal.v4;
858
859     Res = 1;
860   }
861
862   else
863     OLSR_PRINTF(3, "\tNo netmask change.\n");
864
865   OldVal.v4 = Int->int_broadaddr.sin_addr;
866   NewVal.v4.s_addr = Info.Broad;
867
868 #ifdef DEBUG
869   OLSR_PRINTF(3, "\tBroadcast address: %s\n", olsr_ip_to_string(&buf, &NewVal));
870 #endif
871
872   if (NewVal.v4.s_addr != OldVal.v4.s_addr)
873   {
874     OLSR_PRINTF(1, "\tBroadcast address change.\n");
875     OLSR_PRINTF(1, "\tOld: %s\n", olsr_ip_to_string(&buf, &OldVal));
876     OLSR_PRINTF(1, "\tNew: %s\n", olsr_ip_to_string(&buf, &NewVal));
877
878     AddrIn = &Int->int_broadaddr;
879
880     AddrIn->sin_family = AF_INET;
881     AddrIn->sin_port = 0;
882     AddrIn->sin_addr = NewVal.v4;
883
884     Res = 1;
885   }
886
887   else
888     OLSR_PRINTF(3, "\tNo broadcast address change.\n");
889
890   if (Res != 0)
891     run_ifchg_cbs(Int, IFCHG_IF_UPDATE);
892
893   return Res;
894 }
895
896 int chk_if_up(struct olsr_if *IntConf, int DebugLevel __attribute__((unused)))
897 {
898   struct ipaddr_str buf;
899   struct InterfaceInfo Info;
900   struct interface *New;
901   union olsr_ip_addr NullAddr;
902   int IsWlan;
903   struct sockaddr_in *AddrIn;
904   size_t name_size;
905
906   if (olsr_cnf->ip_version == AF_INET6)
907   {
908     fprintf(stderr, "IPv6 not supported by chk_if_up()!\n");
909     return 0;
910   }
911
912   if (GetIntInfo(&Info, IntConf->name) < 0)
913     return 0;
914
915   New = olsr_cookie_malloc(interface_mem_cookie);
916
917   New->immediate_send_tc = (IntConf->cnf->tc_params.emission_interval < IntConf->cnf->hello_params.emission_interval);
918 #if 0
919   New->gen_properties = NULL;
920 #endif
921   AddrIn = &New->int_addr;
922
923   AddrIn->sin_family = AF_INET;
924   AddrIn->sin_port = 0;
925   AddrIn->sin_addr.s_addr = Info.Addr;
926
927   AddrIn = (struct sockaddr_in *)&New->int_netmask;
928
929   AddrIn->sin_family = AF_INET;
930   AddrIn->sin_port = 0;
931   AddrIn->sin_addr.s_addr = Info.Mask;
932
933   AddrIn = &New->int_broadaddr;
934
935   AddrIn->sin_family = AF_INET;
936   AddrIn->sin_port = 0;
937   AddrIn->sin_addr.s_addr = Info.Broad;
938
939   if (IntConf->cnf->ipv4_broadcast.v4.s_addr != 0)
940     AddrIn->sin_addr = IntConf->cnf->ipv4_broadcast.v4;
941
942   New->int_flags = 0;
943
944   New->is_hcif = false;
945
946   New->int_mtu = Info.Mtu;
947
948   name_size = strlen(IntConf->name) + 1;
949   New->int_name = olsr_malloc(name_size, "Interface 2");
950   strscpy(New->int_name, IntConf->name, name_size);
951
952   IsWlan = IsWireless(IntConf->name);
953
954   if (IsWlan < 0)
955     IsWlan = 1;
956
957   New->is_wireless = IsWlan;
958
959   if (IntConf->cnf->weight.fixed)
960     New->int_metric = IntConf->cnf->weight.value;
961
962   else
963     New->int_metric = Info.Metric;
964
965   New->olsr_seqnum = rand() & 0xffff;
966
967   New->ttl_index = -32; /* For the first 32 TC's, fish-eye is disabled */
968
969   OLSR_PRINTF(1, "\tInterface %s set up for use with index %d\n\n",
970               IntConf->name, New->if_index);
971
972   OLSR_PRINTF(1, "\tMTU: %d\n", New->int_mtu);
973   OLSR_PRINTF(1, "\tAddress: %s\n", ip4_to_string(&buf, New->int_addr.sin_addr));
974   OLSR_PRINTF(1, "\tNetmask: %s\n", ip4_to_string(&buf, ((struct sockaddr_in *)&New->int_netmask)->sin_addr));
975   OLSR_PRINTF(1, "\tBroadcast address: %s\n", ip4_to_string(&buf, New->int_broadaddr.sin_addr));
976
977   New->ip_addr.v4 = New->int_addr.sin_addr;
978
979   New->if_index = Info.Index;
980
981   OLSR_PRINTF(3, "\tKernel index: %08x\n", New->if_index);
982
983   New->olsr_socket = getsocket(BUFSPACE, New->int_name);
984
985   if (New->olsr_socket < 0)
986   {
987     fprintf(stderr, "Could not initialize socket... exiting!\n\n");
988     exit(1);
989   }
990
991   add_olsr_socket(New->olsr_socket, &olsr_input, NULL, NULL, SP_PR_READ);
992
993   /* Queue */
994   list_add_before(&interface_head, &New->int_node);
995
996   IntConf->interf = New;
997   lock_interface(IntConf->interf);
998   IntConf->configured = 1;
999
1000   memset(&NullAddr, 0, olsr_cnf->ipsize);
1001
1002   if(ipequal(&NullAddr, &olsr_cnf->main_addr))
1003   {
1004     olsr_cnf->main_addr = New->ip_addr;
1005     OLSR_PRINTF(1, "New main address: %s\n", olsr_ip_to_string(&buf, &olsr_cnf->main_addr));
1006   }
1007
1008   net_add_buffer(New);
1009
1010   /*
1011    * Register functions for periodic message generation
1012    */
1013   New->hello_gen_timer =
1014     olsr_start_timer(IntConf->cnf->hello_params.emission_interval * MSEC_PER_SEC,
1015                      HELLO_JITTER, OLSR_TIMER_PERIODIC,
1016                      olsr_cnf->lq_level == 0 ? &generate_hello : &olsr_output_lq_hello,
1017                      New, hello_gen_timer_cookie->ci_id);
1018   New->tc_gen_timer =
1019     olsr_start_timer(IntConf->cnf->tc_params.emission_interval * MSEC_PER_SEC,
1020                      TC_JITTER, OLSR_TIMER_PERIODIC,
1021                      olsr_cnf->lq_level == 0 ? &generate_tc : &olsr_output_lq_tc,
1022                      New, tc_gen_timer_cookie->ci_id);
1023   New->mid_gen_timer =
1024     olsr_start_timer(IntConf->cnf->mid_params.emission_interval * MSEC_PER_SEC,
1025                      MID_JITTER, OLSR_TIMER_PERIODIC, &generate_mid, New,
1026                      mid_gen_timer_cookie->ci_id);
1027   New->hna_gen_timer =
1028     olsr_start_timer(IntConf->cnf->hna_params.emission_interval * MSEC_PER_SEC,
1029                      HNA_JITTER, OLSR_TIMER_PERIODIC, &generate_hna, New,
1030                      hna_gen_timer_cookie->ci_id);
1031
1032   if(olsr_cnf->max_tc_vtime < IntConf->cnf->tc_params.emission_interval)
1033     olsr_cnf->max_tc_vtime = IntConf->cnf->tc_params.emission_interval;
1034
1035   New->hello_etime = (olsr_reltime)(IntConf->cnf->hello_params.emission_interval * MSEC_PER_SEC);
1036   New->valtimes.hello = reltime_to_me(IntConf->cnf->hello_params.validity_time * MSEC_PER_SEC);
1037   New->valtimes.tc = reltime_to_me(IntConf->cnf->tc_params.validity_time * MSEC_PER_SEC);
1038   New->valtimes.mid = reltime_to_me(IntConf->cnf->mid_params.validity_time * MSEC_PER_SEC);
1039   New->valtimes.hna = reltime_to_me(IntConf->cnf->hna_params.validity_time * MSEC_PER_SEC);
1040
1041   /*
1042    * Call possible ifchange functions registered by plugins
1043    */
1044   run_ifchg_cbs(New, IFCHG_IF_ADD);
1045
1046   lock_interface(New);
1047
1048   return 1;
1049 }
1050
1051 /*
1052  * Local Variables:
1053  * c-basic-offset: 2
1054  * indent-tabs-mode: nil
1055  * End:
1056  */