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