The order between the device signal and the service signal has been changed
[platform/upstream/connman.git] / src / timeserver.c
1 /*
2  *
3  *  Connection Manager
4  *
5  *  Copyright (C) 2007-2013  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
26 #include <errno.h>
27
28 #include <glib.h>
29 #include <stdlib.h>
30 #include <gweb/gresolv.h>
31 #include <netdb.h>
32
33 #include "connman.h"
34
35 #define TS_RECHECK_INTERVAL     7200
36
37 static struct connman_service *ts_service;
38 static GSList *timeservers_list = NULL;
39 static GSList *ts_list = NULL;
40 static char *ts_current = NULL;
41 static int ts_recheck_id = 0;
42 static int ts_backoff_id = 0;
43
44 static GResolv *resolv = NULL;
45 static int resolv_id = 0;
46
47 static void sync_next(void);
48
49 static void resolv_debug(const char *str, void *data)
50 {
51         connman_info("%s: %s\n", (const char *) data, str);
52 }
53
54 static void ntp_callback(bool success, void *user_data)
55 {
56         DBG("success %d", success);
57
58         if (!success)
59                 sync_next();
60 }
61
62 static void save_timeservers(char **servers)
63 {
64         GKeyFile *keyfile;
65         int cnt;
66
67         keyfile = __connman_storage_load_global();
68         if (!keyfile)
69                 keyfile = g_key_file_new();
70
71         for (cnt = 0; servers && servers[cnt]; cnt++);
72
73         g_key_file_set_string_list(keyfile, "global", "Timeservers",
74                            (const gchar **)servers, cnt);
75
76         __connman_storage_save_global(keyfile);
77
78         g_key_file_free(keyfile);
79 }
80
81 static char **load_timeservers(void)
82 {
83         GKeyFile *keyfile;
84         char **servers = NULL;
85
86         keyfile = __connman_storage_load_global();
87         if (!keyfile)
88                 return NULL;
89
90         servers = g_key_file_get_string_list(keyfile, "global",
91                                                 "Timeservers", NULL, NULL);
92
93         g_key_file_free(keyfile);
94
95         return servers;
96 }
97
98 static void resolv_result(GResolvResultStatus status, char **results,
99                                 gpointer user_data)
100 {
101         int i;
102
103 #if defined TIZEN_EXT
104         gchar *server = NULL;
105
106         server = g_strdup((gchar *)user_data);
107         ts_list = g_slist_append(ts_list, server);
108
109         DBG("added server %s", server);
110 #endif
111
112         DBG("status %d", status);
113
114         if (status == G_RESOLV_RESULT_STATUS_SUCCESS) {
115                 if (results) {
116                         /* prepend the results in reverse order */
117
118                         for (i = 0; results[i]; i++)
119                                 /* count */;
120                         i--;
121
122                         for (; i >= 0; i--) {
123                                 DBG("result[%d]: %s", i, results[i]);
124
125                                 ts_list = __connman_timeserver_add_list(
126                                         ts_list, results[i]);
127                         }
128                 }
129         }
130
131         sync_next();
132 }
133
134 /*
135  * Once the timeserver list (timeserver_list) is created, we start
136  * querying the servers one by one. If resolving fails on one of them,
137  * we move to the next one. The user can enter either an IP address or
138  * a URL for the timeserver. We only resolve the URLs. Once we have an
139  * IP for the NTP server, we start querying it for time corrections.
140  */
141 static void timeserver_sync_start(void)
142 {
143         GSList *list;
144
145         for (list = timeservers_list; list; list = list->next) {
146                 char *timeserver = list->data;
147
148                 ts_list = g_slist_prepend(ts_list, g_strdup(timeserver));
149         }
150         ts_list = g_slist_reverse(ts_list);
151
152         sync_next();
153 }
154
155 static gboolean timeserver_sync_restart(gpointer user_data)
156 {
157         timeserver_sync_start();
158         ts_backoff_id = 0;
159
160         return FALSE;
161 }
162
163 /*
164  * Select the next time server from the working list (ts_list) because
165  * for some reason the first time server in the list didn't work. If
166  * none of the server did work we start over with the first server
167  * with a backoff.
168  */
169 static void sync_next(void)
170 {
171         if (ts_current) {
172                 g_free(ts_current);
173                 ts_current = NULL;
174         }
175
176         __connman_ntp_stop();
177
178         while (ts_list) {
179                 ts_current = ts_list->data;
180                 ts_list = g_slist_delete_link(ts_list, ts_list);
181
182                 /* if it's an IP, directly query it. */
183                 if (connman_inet_check_ipaddress(ts_current) > 0) {
184                         DBG("Using timeserver %s", ts_current);
185                         __connman_ntp_start(ts_current, ntp_callback, NULL);
186                         return;
187                 }
188
189                 DBG("Resolving timeserver %s", ts_current);
190 #if defined TIZEN_EXT
191                 resolv_id = g_resolv_lookup_hostname(resolv, ts_current,
192                                                 resolv_result, ts_current);
193 #else
194                 resolv_id = g_resolv_lookup_hostname(resolv, ts_current,
195                                                 resolv_result, NULL);
196 #endif
197                 return;
198         }
199
200         DBG("No timeserver could be used, restart probing in 5 seconds");
201         ts_backoff_id = g_timeout_add_seconds(5, timeserver_sync_restart, NULL);
202 }
203
204 GSList *__connman_timeserver_add_list(GSList *server_list,
205                 const char *timeserver)
206 {
207         GSList *list = server_list;
208
209         if (!timeserver)
210                 return server_list;
211
212         while (list) {
213                 char *existing_server = list->data;
214                 if (strcmp(timeserver, existing_server) == 0)
215                         return server_list;
216                 list = g_slist_next(list);
217         }
218         return g_slist_prepend(server_list, g_strdup(timeserver));
219 }
220
221 /*
222  * __connman_timeserver_get_all function creates the timeserver
223  * list which will be used to determine NTP server for time corrections.
224  * The service settings take priority over the global timeservers.
225  */
226 GSList *__connman_timeserver_get_all(struct connman_service *service)
227 {
228         GSList *list = NULL;
229         struct connman_network *network;
230         char **timeservers;
231         char **service_ts;
232         char **service_ts_config;
233         const char *service_gw;
234         char **fallback_ts;
235         int index, i;
236
237         if (__connman_clock_timeupdates() == TIME_UPDATES_MANUAL)
238                 return NULL;
239
240         service_ts_config = connman_service_get_timeservers_config(service);
241
242         /* First add Service Timeservers.Configuration to the list */
243         for (i = 0; service_ts_config && service_ts_config[i];
244                         i++)
245                 list = __connman_timeserver_add_list(list,
246                                 service_ts_config[i]);
247
248         service_ts = connman_service_get_timeservers(service);
249
250         /* Then add Service Timeservers via DHCP to the list */
251         for (i = 0; service_ts && service_ts[i]; i++)
252                 list = __connman_timeserver_add_list(list, service_ts[i]);
253
254         /*
255          * Then add Service Gateway to the list, if UseGatewaysAsTimeservers
256          * configuration option is set to true.
257          */
258         if (connman_setting_get_bool("UseGatewaysAsTimeservers")) {
259                 network = __connman_service_get_network(service);
260                 if (network) {
261                         index = connman_network_get_index(network);
262                         service_gw = __connman_ipconfig_get_gateway_from_index(index,
263                                 CONNMAN_IPCONFIG_TYPE_ALL);
264
265                         if (service_gw)
266                                 list = __connman_timeserver_add_list(list, service_gw);
267                 }
268         }
269
270         /* Then add Global Timeservers to the list */
271         timeservers = load_timeservers();
272
273         for (i = 0; timeservers && timeservers[i]; i++)
274                 list = __connman_timeserver_add_list(list, timeservers[i]);
275
276         g_strfreev(timeservers);
277
278         fallback_ts = connman_setting_get_string_list("FallbackTimeservers");
279
280         /* Lastly add the fallback servers */
281         for (i = 0; fallback_ts && fallback_ts[i]; i++)
282                 list = __connman_timeserver_add_list(list, fallback_ts[i]);
283
284         return g_slist_reverse(list);
285 }
286
287 static gboolean ts_recheck(gpointer user_data)
288 {
289         GSList *ts;
290
291         ts = __connman_timeserver_get_all(connman_service_get_default());
292
293         if (!ts) {
294                 DBG("timeservers disabled");
295
296                 return TRUE;
297         }
298
299         if (g_strcmp0(ts_current, ts->data) != 0) {
300                 DBG("current %s preferred %s", ts_current, (char *)ts->data);
301
302                 g_slist_free_full(ts, g_free);
303
304                 __connman_timeserver_sync(NULL);
305
306                 return FALSE;
307         }
308
309         DBG("");
310
311         g_slist_free_full(ts, g_free);
312
313         return TRUE;
314 }
315
316 static void ts_recheck_disable(void)
317 {
318         if (ts_recheck_id == 0)
319                 return;
320
321         g_source_remove(ts_recheck_id);
322         ts_recheck_id = 0;
323
324         if (ts_backoff_id) {
325                 g_source_remove(ts_backoff_id);
326                 ts_backoff_id = 0;
327         }
328
329         if (ts_current) {
330                 g_free(ts_current);
331                 ts_current = NULL;
332         }
333 }
334
335 static void ts_recheck_enable(void)
336 {
337         if (ts_recheck_id > 0)
338                 return;
339
340         ts_recheck_id = g_timeout_add_seconds(TS_RECHECK_INTERVAL, ts_recheck,
341                         NULL);
342 }
343
344 /*
345  * This function must be called everytime the default service changes, the
346  * service timeserver(s) or gateway changes or the global timeserver(s) changes.
347  */
348 int __connman_timeserver_sync(struct connman_service *default_service)
349 {
350         struct connman_service *service;
351         char **nameservers;
352         int i;
353
354         if (default_service)
355                 service = default_service;
356         else
357                 service = connman_service_get_default();
358
359         if (!service)
360                 return -EINVAL;
361
362 #if !defined TIZEN_EXT
363         if (service == ts_service)
364                 return -EALREADY;
365 #endif
366
367         if (!resolv)
368                 return 0;
369         /*
370          * Before we start creating the new timeserver list we must stop
371          * any ongoing ntp query and server resolution.
372          */
373
374         __connman_ntp_stop();
375
376         ts_recheck_disable();
377
378         if (resolv_id > 0)
379                 g_resolv_cancel_lookup(resolv, resolv_id);
380
381         g_resolv_flush_nameservers(resolv);
382
383         nameservers = connman_service_get_nameservers(service);
384         if (!nameservers)
385                 return -EINVAL;
386
387         for (i = 0; nameservers[i]; i++)
388                 g_resolv_add_nameserver(resolv, nameservers[i], 53, 0);
389
390         g_strfreev(nameservers);
391
392         g_slist_free_full(timeservers_list, g_free);
393
394         timeservers_list = __connman_timeserver_get_all(service);
395
396         __connman_service_timeserver_changed(service, timeservers_list);
397
398         if (!timeservers_list) {
399                 DBG("No timeservers set.");
400                 return 0;
401         }
402
403         ts_recheck_enable();
404
405         ts_service = service;
406         timeserver_sync_start();
407
408         return 0;
409 }
410
411 static int timeserver_start(struct connman_service *service)
412 {
413         char **nameservers;
414         int i;
415
416         DBG("service %p", service);
417
418         i = __connman_service_get_index(service);
419         if (i < 0)
420                 return -EINVAL;
421
422         nameservers = connman_service_get_nameservers(service);
423
424         /* Stop an already ongoing resolution, if there is one */
425         if (resolv && resolv_id > 0)
426                 g_resolv_cancel_lookup(resolv, resolv_id);
427
428         /* get rid of the old resolver */
429         if (resolv) {
430                 g_resolv_unref(resolv);
431                 resolv = NULL;
432         }
433
434         resolv = g_resolv_new(i);
435         if (!resolv) {
436                 g_strfreev(nameservers);
437                 return -ENOMEM;
438         }
439
440         if (getenv("CONNMAN_RESOLV_DEBUG"))
441                 g_resolv_set_debug(resolv, resolv_debug, "RESOLV");
442
443         if (nameservers) {
444                 for (i = 0; nameservers[i]; i++)
445                         g_resolv_add_nameserver(resolv, nameservers[i], 53, 0);
446
447                 g_strfreev(nameservers);
448         }
449
450         return __connman_timeserver_sync(service);
451 }
452
453 static void timeserver_stop(void)
454 {
455         DBG(" ");
456
457         ts_service = NULL;
458
459         if (resolv) {
460                 g_resolv_unref(resolv);
461                 resolv = NULL;
462         }
463
464         g_slist_free_full(timeservers_list, g_free);
465         timeservers_list = NULL;
466
467         g_slist_free_full(ts_list, g_free);
468         ts_list = NULL;
469
470         __connman_ntp_stop();
471
472         ts_recheck_disable();
473 }
474
475 int __connman_timeserver_system_set(char **servers)
476 {
477         save_timeservers(servers);
478
479         __connman_timeserver_sync(NULL);
480
481         return 0;
482 }
483
484 char **__connman_timeserver_system_get()
485 {
486         char **servers;
487
488         servers = load_timeservers();
489         return servers;
490 }
491
492 static void default_changed(struct connman_service *default_service)
493 {
494         if (default_service)
495                 timeserver_start(default_service);
496         else
497                 timeserver_stop();
498 }
499
500 static const struct connman_notifier timeserver_notifier = {
501         .name                   = "timeserver",
502         .default_changed        = default_changed,
503 };
504
505 int __connman_timeserver_init(void)
506 {
507         DBG("");
508
509         connman_notifier_register(&timeserver_notifier);
510
511         return 0;
512 }
513
514 void __connman_timeserver_cleanup(void)
515 {
516         DBG("");
517
518         connman_notifier_unregister(&timeserver_notifier);
519 }