dhcp: Fix cleanup
[framework/connectivity/connman.git] / src / dhcp.c
1 /*
2  *
3  *  Connection Manager
4  *
5  *  Copyright (C) 2007-2010  Intel Corporation. All rights reserved.
6  *
7  *  This program is free software; you can redistribute it and/or modify
8  *  it under the terms of the GNU General Public License version 2 as
9  *  published by the Free Software Foundation.
10  *
11  *  This program is distributed in the hope that it will be useful,
12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  *  GNU General Public License for more details.
15  *
16  *  You should have received a copy of the GNU General Public License
17  *  along with this program; if not, write to the Free Software
18  *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
19  *
20  */
21
22 #ifdef HAVE_CONFIG_H
23 #include <config.h>
24 #endif
25 #include <stdio.h>
26 #include <errno.h>
27 #include <string.h>
28 #include <stdlib.h>
29
30 #include <connman/ipconfig.h>
31
32 #include <gdhcp/gdhcp.h>
33
34 #include <glib.h>
35
36 #include "connman.h"
37
38 struct connman_dhcp {
39         struct connman_network *network;
40         dhcp_cb callback;
41
42         char **nameservers;
43         char *timeserver;
44         char *pac;
45
46         GDHCPClient *dhcp_client;
47 };
48
49 static GHashTable *network_table;
50
51 static void dhcp_free(struct connman_dhcp *dhcp)
52 {
53         g_strfreev(dhcp->nameservers);
54         g_free(dhcp->timeserver);
55         g_free(dhcp->pac);
56
57         dhcp->nameservers = NULL;
58         dhcp->timeserver = NULL;
59         dhcp->pac = NULL;
60 }
61
62 /**
63  * dhcp_invalidate: Invalidate an existing DHCP lease
64  * @dhcp: pointer to the DHCP lease to invalidate.
65  * @callback: flag indicating whether or not to invoke the client callback
66  *            if present.
67  *
68  * Invalidates an existing DHCP lease, optionally invoking the client
69  * callback. The caller may wish to avoid the client callback invocation
70  * when the invocation of that callback might otherwise unnecessarily upset
71  * service state due to the IP configuration change implied by this
72  * invalidation.
73  */
74 static void dhcp_invalidate(struct connman_dhcp *dhcp, connman_bool_t callback)
75 {
76         struct connman_service *service;
77         struct connman_ipconfig *ipconfig;
78         int i;
79
80         DBG("dhcp %p callback %u", dhcp, callback);
81
82         if (dhcp == NULL)
83                 return;
84
85         service = __connman_service_lookup_from_network(dhcp->network);
86         if (service == NULL)
87                 return;
88
89         ipconfig = __connman_service_get_ip4config(service);
90         if (ipconfig == NULL)
91                 return;
92
93         __connman_6to4_remove(ipconfig);
94
95         __connman_service_set_domainname(service, NULL);
96         __connman_service_set_pac(service, NULL);
97         __connman_service_timeserver_remove(service, dhcp->timeserver);
98
99         if (dhcp->nameservers != NULL) {
100                 for (i = 0; dhcp->nameservers[i] != NULL; i++) {
101                         __connman_service_nameserver_remove(service,
102                                                         dhcp->nameservers[i]);
103                 }
104         }
105
106         __connman_ipconfig_address_remove(ipconfig);
107
108         __connman_ipconfig_set_local(ipconfig, NULL);
109         __connman_ipconfig_set_broadcast(ipconfig, NULL);
110         __connman_ipconfig_set_gateway(ipconfig, NULL);
111         __connman_ipconfig_set_prefixlen(ipconfig, 0);
112
113         if (dhcp->callback != NULL && callback)
114                 dhcp->callback(dhcp->network, FALSE);
115
116         dhcp_free(dhcp);
117 }
118
119 static void dhcp_valid(struct connman_dhcp *dhcp)
120 {
121         if (dhcp->callback != NULL)
122                 dhcp->callback(dhcp->network, TRUE);
123 }
124
125 static void no_lease_cb(GDHCPClient *dhcp_client, gpointer user_data)
126 {
127         struct connman_dhcp *dhcp = user_data;
128
129         DBG("No lease available");
130
131         dhcp_invalidate(dhcp, TRUE);
132 }
133
134 static void lease_lost_cb(GDHCPClient *dhcp_client, gpointer user_data)
135 {
136         struct connman_dhcp *dhcp = user_data;
137
138         DBG("Lease lost");
139
140         dhcp_invalidate(dhcp, TRUE);
141 }
142
143 static void ipv4ll_lost_cb(GDHCPClient *dhcp_client, gpointer user_data)
144 {
145         struct connman_dhcp *dhcp = user_data;
146
147         DBG("Lease lost");
148
149         dhcp_invalidate(dhcp, TRUE);
150 }
151
152
153 static gboolean compare_string_arrays(char **array_a, char **array_b)
154 {
155         int i;
156
157         if (array_a == NULL || array_b == NULL)
158                 return FALSE;
159
160         if (g_strv_length(array_a) != g_strv_length(array_b))
161                 return FALSE;
162
163         for (i = 0; array_a[i] != NULL &&
164                              array_b[i] != NULL; i++) {
165                 if (g_strcmp0(array_a[i], array_b[i]) != 0)
166                         return FALSE;
167         }
168
169         return TRUE;
170 }
171
172 static void lease_available_cb(GDHCPClient *dhcp_client, gpointer user_data)
173 {
174         struct connman_dhcp *dhcp = user_data;
175         GList *list, *option = NULL;
176         char *address, *netmask = NULL, *gateway = NULL;
177         const char *c_address, *c_gateway;
178         char *domainname = NULL, *hostname = NULL;
179         char **nameservers, *timeserver = NULL, *pac = NULL;
180         int ns_entries;
181         struct connman_ipconfig *ipconfig;
182         struct connman_service *service;
183         unsigned char prefixlen, c_prefixlen;
184         gboolean ip_change;
185         int i;
186
187         DBG("Lease available");
188
189         service = __connman_service_lookup_from_network(dhcp->network);
190         if (service == NULL) {
191                 connman_error("Can not lookup service");
192                 return;
193         }
194
195         ipconfig = __connman_service_get_ip4config(service);
196         if (ipconfig == NULL) {
197                 connman_error("Could not lookup ipconfig");
198                 return;
199         }
200
201         c_address = __connman_ipconfig_get_local(ipconfig);
202         c_gateway = __connman_ipconfig_get_gateway(ipconfig);
203         c_prefixlen = __connman_ipconfig_get_prefixlen(ipconfig);
204
205         address = g_dhcp_client_get_address(dhcp_client);
206
207         option = g_dhcp_client_get_option(dhcp_client, G_DHCP_SUBNET);
208         if (option != NULL)
209                 netmask = g_strdup(option->data);
210
211         option = g_dhcp_client_get_option(dhcp_client, G_DHCP_ROUTER);
212         if (option != NULL)
213                 gateway = g_strdup(option->data);
214
215         prefixlen = __connman_ipconfig_netmask_prefix_len(netmask);
216
217         DBG("c_address %s", c_address);
218
219         if (address != NULL && c_address != NULL &&
220                                         g_strcmp0(address, c_address) != 0)
221                 ip_change = TRUE;
222         else if (gateway != NULL && c_gateway != NULL &&
223                                         g_strcmp0(gateway, c_gateway) != 0)
224                 ip_change = TRUE;
225         else if (prefixlen != c_prefixlen)
226                 ip_change = TRUE;
227         else if (c_address == NULL || c_gateway == NULL)
228                 ip_change = TRUE;
229         else
230                 ip_change = FALSE;
231
232         option = g_dhcp_client_get_option(dhcp_client, G_DHCP_DNS_SERVER);
233         for (ns_entries = 0, list = option; list; list = list->next)
234                 ns_entries += 1;
235         nameservers = g_try_new0(char *, ns_entries + 1);
236         if (nameservers != NULL) {
237                 for (i = 0, list = option; list; list = list->next, i++)
238                         nameservers[i] = g_strdup(list->data);
239                 nameservers[ns_entries] = NULL;
240         }
241
242         option = g_dhcp_client_get_option(dhcp_client, G_DHCP_DOMAIN_NAME);
243         if (option != NULL)
244                 domainname = g_strdup(option->data);
245
246         option = g_dhcp_client_get_option(dhcp_client, G_DHCP_HOST_NAME);
247         if (option != NULL)
248                 hostname = g_strdup(option->data);
249
250         option = g_dhcp_client_get_option(dhcp_client, G_DHCP_NTP_SERVER);
251         if (option != NULL)
252                 timeserver = g_strdup(option->data);
253
254         option = g_dhcp_client_get_option(dhcp_client, 252);
255         if (option != NULL)
256                 pac = g_strdup(option->data);
257
258         connman_ipconfig_set_method(ipconfig, CONNMAN_IPCONFIG_METHOD_DHCP);
259
260         if (ip_change == TRUE) {
261                 __connman_ipconfig_set_local(ipconfig, address);
262                 __connman_ipconfig_set_prefixlen(ipconfig, prefixlen);
263                 __connman_ipconfig_set_gateway(ipconfig, gateway);
264         }
265
266         if (compare_string_arrays(nameservers, dhcp->nameservers) == FALSE) {
267                 if (dhcp->nameservers != NULL) {
268                         for (i = 0; dhcp->nameservers[i] != NULL; i++) {
269                                 __connman_service_nameserver_remove(service,
270                                                         dhcp->nameservers[i]);
271                         }
272                         g_strfreev(dhcp->nameservers);
273                 }
274
275                 dhcp->nameservers = nameservers;
276
277                 for (i = 0; dhcp->nameservers[i] != NULL; i++) {
278                         __connman_service_nameserver_append(service,
279                                                         dhcp->nameservers[i]);
280                 }
281         }
282
283         if (g_strcmp0(timeserver, dhcp->timeserver) != 0) {
284                 if (dhcp->timeserver != NULL) {
285                         __connman_service_timeserver_remove(service,
286                                                         dhcp->timeserver);
287                         g_free(dhcp->timeserver);
288                 }
289
290                 dhcp->timeserver = timeserver;
291
292                 if (dhcp->timeserver != NULL)
293                         __connman_service_timeserver_append(service,
294                                                         dhcp->timeserver);
295         }
296
297         if (g_strcmp0(pac, dhcp->pac) != 0) {
298                 g_free(dhcp->pac);
299                 dhcp->pac = pac;
300
301                 __connman_service_set_pac(service, dhcp->pac);
302         }
303
304         __connman_service_set_domainname(service, domainname);
305
306         if (domainname != NULL)
307                 __connman_utsname_set_domainname(domainname);
308
309         if (hostname != NULL)
310                 __connman_utsname_set_hostname(hostname);
311
312         if (ip_change == TRUE)
313                 dhcp_valid(dhcp);
314
315         __connman_6to4_probe(service);
316
317         g_free(address);
318         g_free(netmask);
319         g_free(gateway);
320         g_free(domainname);
321         g_free(hostname);
322 }
323
324 static void ipv4ll_available_cb(GDHCPClient *dhcp_client, gpointer user_data)
325 {
326         struct connman_dhcp *dhcp = user_data;
327         char *address, *netmask;
328         struct connman_service *service;
329         struct connman_ipconfig *ipconfig;
330         unsigned char prefixlen;
331
332         DBG("IPV4LL available");
333
334         service = __connman_service_lookup_from_network(dhcp->network);
335         if (service == NULL)
336                 return;
337
338         ipconfig = __connman_service_get_ip4config(service);
339         if (ipconfig == NULL)
340                 return;
341
342         address = g_dhcp_client_get_address(dhcp_client);
343         netmask = g_dhcp_client_get_netmask(dhcp_client);
344
345         prefixlen = __connman_ipconfig_netmask_prefix_len(netmask);
346
347         connman_ipconfig_set_method(ipconfig, CONNMAN_IPCONFIG_METHOD_DHCP);
348         __connman_ipconfig_set_local(ipconfig, address);
349         __connman_ipconfig_set_prefixlen(ipconfig, prefixlen);
350         __connman_ipconfig_set_gateway(ipconfig, NULL);
351
352         dhcp_valid(dhcp);
353
354         g_free(address);
355         g_free(netmask);
356 }
357
358 static void dhcp_debug(const char *str, void *data)
359 {
360         connman_info("%s: %s\n", (const char *) data, str);
361 }
362
363 static int dhcp_request(struct connman_dhcp *dhcp)
364 {
365         GDHCPClient *dhcp_client;
366         GDHCPClientError error;
367         const char *hostname;
368         int index;
369
370         DBG("dhcp %p", dhcp);
371
372         index = connman_network_get_index(dhcp->network);
373
374         dhcp_client = g_dhcp_client_new(G_DHCP_IPV4, index, &error);
375         if (error != G_DHCP_CLIENT_ERROR_NONE)
376                 return -EINVAL;
377
378         if (getenv("CONNMAN_DHCP_DEBUG"))
379                 g_dhcp_client_set_debug(dhcp_client, dhcp_debug, "DHCP");
380
381         hostname = connman_utsname_get_hostname();
382         if (hostname != NULL)
383                 g_dhcp_client_set_send(dhcp_client, G_DHCP_HOST_NAME, hostname);
384
385         g_dhcp_client_set_request(dhcp_client, G_DHCP_HOST_NAME);
386         g_dhcp_client_set_request(dhcp_client, G_DHCP_SUBNET);
387         g_dhcp_client_set_request(dhcp_client, G_DHCP_DNS_SERVER);
388         g_dhcp_client_set_request(dhcp_client, G_DHCP_DOMAIN_NAME);
389         g_dhcp_client_set_request(dhcp_client, G_DHCP_NTP_SERVER);
390         g_dhcp_client_set_request(dhcp_client, G_DHCP_ROUTER);
391         g_dhcp_client_set_request(dhcp_client, 252);
392
393         g_dhcp_client_register_event(dhcp_client,
394                         G_DHCP_CLIENT_EVENT_LEASE_AVAILABLE,
395                                                 lease_available_cb, dhcp);
396
397         g_dhcp_client_register_event(dhcp_client,
398                         G_DHCP_CLIENT_EVENT_IPV4LL_AVAILABLE,
399                                                 ipv4ll_available_cb, dhcp);
400
401         g_dhcp_client_register_event(dhcp_client,
402                         G_DHCP_CLIENT_EVENT_LEASE_LOST, lease_lost_cb, dhcp);
403
404         g_dhcp_client_register_event(dhcp_client,
405                         G_DHCP_CLIENT_EVENT_IPV4LL_LOST, ipv4ll_lost_cb, dhcp);
406
407         g_dhcp_client_register_event(dhcp_client,
408                         G_DHCP_CLIENT_EVENT_NO_LEASE, no_lease_cb, dhcp);
409
410         dhcp->dhcp_client = dhcp_client;
411
412         return g_dhcp_client_start(dhcp_client);
413 }
414
415 static int dhcp_release(struct connman_dhcp *dhcp)
416 {
417         DBG("dhcp %p", dhcp);
418
419         if (dhcp->dhcp_client == NULL)
420                 return 0;
421
422         g_dhcp_client_stop(dhcp->dhcp_client);
423         g_dhcp_client_unref(dhcp->dhcp_client);
424
425         dhcp->dhcp_client = NULL;
426
427         return 0;
428 }
429
430 static void remove_network(gpointer user_data)
431 {
432         struct connman_dhcp *dhcp = user_data;
433
434         DBG("dhcp %p", dhcp);
435
436         dhcp_invalidate(dhcp, FALSE);
437         dhcp_release(dhcp);
438
439         g_free(dhcp);
440 }
441
442 int __connman_dhcp_start(struct connman_network *network, dhcp_cb callback)
443 {
444         struct connman_dhcp *dhcp;
445
446         DBG("");
447
448         dhcp = g_try_new0(struct connman_dhcp, 1);
449         if (dhcp == NULL)
450                 return -ENOMEM;
451
452         dhcp->network = network;
453         dhcp->callback = callback;
454
455         g_hash_table_replace(network_table, network, dhcp);
456
457         return dhcp_request(dhcp);
458 }
459
460 void __connman_dhcp_stop(struct connman_network *network)
461 {
462         DBG("");
463
464         if (network_table == NULL)
465                 return;
466
467         g_hash_table_remove(network_table, network);
468 }
469
470 int __connman_dhcp_init(void)
471 {
472         DBG("");
473
474         network_table = g_hash_table_new_full(g_direct_hash, g_direct_equal,
475                                                         NULL, remove_network);
476
477         return 0;
478 }
479
480 void __connman_dhcp_cleanup(void)
481 {
482         DBG("");
483
484         g_hash_table_destroy(network_table);
485         network_table = NULL;
486 }