Imported Upstream version 1.35
[platform/upstream/connman.git] / src / timeserver.c
index 3bdc74f..0e555a7 100644 (file)
@@ -2,7 +2,7 @@
  *
  *  Connection Manager
  *
- *  Copyright (C) 2007-2010  Intel Corporation. All rights reserved.
+ *  Copyright (C) 2007-2013  Intel Corporation. All rights reserved.
  *
  *  This program is free software; you can redistribute it and/or modify
  *  it under the terms of the GNU General Public License version 2 as
 #include <errno.h>
 
 #include <glib.h>
+#include <stdlib.h>
+#include <gweb/gresolv.h>
+#include <netdb.h>
 
 #include "connman.h"
 
-static GSList *driver_list = NULL;
-static GHashTable *server_hash = NULL;
+#define TS_RECHECK_INTERVAL     7200
 
+static GSList *ts_list = NULL;
+static char *ts_current = NULL;
+static int ts_recheck_id = 0;
+
+static GResolv *resolv = NULL;
+static int resolv_id = 0;
+
+static void resolv_debug(const char *str, void *data)
+{
+       connman_info("%s: %s\n", (const char *) data, str);
+}
 static void save_timeservers(char **servers)
 {
        GKeyFile *keyfile;
        int cnt;
 
        keyfile = __connman_storage_load_global();
-       if (keyfile == NULL)
+       if (!keyfile)
                keyfile = g_key_file_new();
 
-       for (cnt = 0; servers != NULL && servers[cnt] != NULL; cnt++);
+       for (cnt = 0; servers && servers[cnt]; cnt++);
 
        g_key_file_set_string_list(keyfile, "global", "Timeservers",
                           (const gchar **)servers, cnt);
@@ -53,243 +66,350 @@ static void save_timeservers(char **servers)
        return;
 }
 
-static char **load_timeservers()
+static char **load_timeservers(void)
 {
        GKeyFile *keyfile;
-       GError *error = NULL;
        char **servers = NULL;
 
        keyfile = __connman_storage_load_global();
-       if (keyfile == NULL)
+       if (!keyfile)
                return NULL;
 
        servers = g_key_file_get_string_list(keyfile, "global",
-                                               "Timeservers", NULL, &error);
-       if (error) {
-               DBG("Error loading timeservers: %s", error->message);
-               g_error_free(error);
-       }
+                                               "Timeservers", NULL, NULL);
 
        g_key_file_free(keyfile);
 
        return servers;
 }
 
-static gint compare_priority(gconstpointer a, gconstpointer b)
+static void resolv_result(GResolvResultStatus status, char **results,
+                               gpointer user_data)
 {
-       const struct connman_timeserver_driver *driver1 = a;
-       const struct connman_timeserver_driver *driver2 = b;
+       int i;
+
+       DBG("status %d", status);
+
+       if (status == G_RESOLV_RESULT_STATUS_SUCCESS) {
+               if (results) {
+                       for (i = 0; results[i]; i++) {
+                               DBG("result[%d]: %s", i, results[i]);
+                               if (i == 0)
+                                       continue;
+
+                               ts_list = __connman_timeserver_add_list(
+                                                       ts_list, results[i]);
+                       }
+
+                       DBG("Using timeserver %s", results[0]);
+
+                       __connman_ntp_start(results[0]);
+
+                       return;
+               }
+       }
 
-       return driver2->priority - driver1->priority;
+       /* If resolving fails, move to the next server */
+       __connman_timeserver_sync_next();
 }
 
-/**
- * connman_timeserver_driver_register:
- * @driver: timeserver driver definition
- *
- * Register a new timeserver driver
- *
- * Returns: %0 on success
+/*
+ * Once the timeserver list (ts_list) is created, we start querying the
+ * servers one by one. If resolving fails on one of them, we move to the
+ * next one. The user can enter either an IP address or a URL for the
+ * timeserver. We only resolve the URLs. Once we have an IP for the NTP
+ * server, we start querying it for time corrections.
  */
-int connman_timeserver_driver_register(struct connman_timeserver_driver *driver)
+void __connman_timeserver_sync_next()
 {
-       DBG("driver %p name %s", driver, driver->name);
+       if (ts_current) {
+               g_free(ts_current);
+               ts_current = NULL;
+       }
 
-       driver_list = g_slist_insert_sorted(driver_list, driver,
-                                                       compare_priority);
+       __connman_ntp_stop();
 
-       return 0;
+       /* Get the 1st server in the list */
+       if (!ts_list)
+               return;
+
+       ts_current = ts_list->data;
+
+       ts_list = g_slist_delete_link(ts_list, ts_list);
+
+       /* if it's an IP, directly query it. */
+       if (connman_inet_check_ipaddress(ts_current) > 0) {
+               DBG("Using timeserver %s", ts_current);
+
+               __connman_ntp_start(ts_current);
+
+               return;
+       }
+
+       DBG("Resolving timeserver %s", ts_current);
+
+       resolv_id = g_resolv_lookup_hostname(resolv, ts_current,
+                                               resolv_result, NULL);
+
+       return;
 }
 
-/**
- * connman_timeserver_driver_unregister:
- * @driver: timeserver driver definition
- *
- * Remove a previously registered timeserver driver
- */
-void connman_timeserver_driver_unregister(struct connman_timeserver_driver *driver)
+GSList *__connman_timeserver_add_list(GSList *server_list,
+               const char *timeserver)
 {
-       DBG("driver %p name %s", driver, driver->name);
+       GSList *list = server_list;
 
-       driver_list = g_slist_remove(driver_list, driver);
+       if (!timeserver)
+               return server_list;
+
+       while (list) {
+               char *existing_server = list->data;
+               if (strcmp(timeserver, existing_server) == 0)
+                       return server_list;
+               list = g_slist_next(list);
+       }
+       return g_slist_prepend(server_list, g_strdup(timeserver));
 }
 
-/**
- * connman_timeserver_append:
- * @server: server address
- *
- * Append time server server address to current list
+/*
+ * __connman_timeserver_get_all function creates the timeserver
+ * list which will be used to determine NTP server for time corrections.
+ * The service settings take priority over the global timeservers.
  */
-int connman_timeserver_append(const char *server)
+GSList *__connman_timeserver_get_all(struct connman_service *service)
 {
-       GSList *list;
+       GSList *list = NULL;
+       struct connman_network *network;
+       char **timeservers;
+       char **service_ts;
+       char **service_ts_config;
+       const char *service_gw;
+       char **fallback_ts;
+       int index, i;
+
+       if (__connman_clock_timeupdates() == TIME_UPDATES_MANUAL)
+               return NULL;
 
-       DBG("server %s", server);
+       service_ts_config = connman_service_get_timeservers_config(service);
 
-       if (server == NULL)
-               return -EINVAL;
+       /* First add Service Timeservers.Configuration to the list */
+       for (i = 0; service_ts_config && service_ts_config[i];
+                       i++)
+               list = __connman_timeserver_add_list(list,
+                               service_ts_config[i]);
 
-       /* This server is already handled by a driver */
-       if (g_hash_table_lookup(server_hash, server))
-               return 0;
+       service_ts = connman_service_get_timeservers(service);
 
-       for (list = driver_list; list; list = list->next) {
-               struct connman_timeserver_driver *driver = list->data;
-               char *new_server;
+       /* Then add Service Timeservers via DHCP to the list */
+       for (i = 0; service_ts && service_ts[i]; i++)
+               list = __connman_timeserver_add_list(list, service_ts[i]);
 
-               if (driver->append == NULL)
-                       continue;
+       network = __connman_service_get_network(service);
+       if (network) {
+               index = connman_network_get_index(network);
+               service_gw = __connman_ipconfig_get_gateway_from_index(index,
+                       CONNMAN_IPCONFIG_TYPE_ALL);
 
-               new_server = g_strdup(server);
-               if (new_server == NULL)
-                       return -ENOMEM;
-
-               if (driver->append(server) == 0) {
-                       g_hash_table_insert(server_hash, new_server, driver);
-                       return 0;
-               } else {
-                       g_free(new_server);
-               }
+               /* Then add Service Gateway to the list */
+               if (service_gw)
+                       list = __connman_timeserver_add_list(list, service_gw);
        }
 
-       return -ENOENT;
+       /* Then add Global Timeservers to the list */
+       timeservers = load_timeservers();
+
+       for (i = 0; timeservers && timeservers[i]; i++)
+               list = __connman_timeserver_add_list(list, timeservers[i]);
+
+       g_strfreev(timeservers);
+
+       fallback_ts = connman_setting_get_string_list("FallbackTimeservers");
+
+       /* Lastly add the fallback servers */
+       for (i = 0; fallback_ts && fallback_ts[i]; i++)
+               list = __connman_timeserver_add_list(list, fallback_ts[i]);
+
+       return g_slist_reverse(list);
 }
 
-/**
- * connman_timeserver_remove:
- * @server: server address
- *
- * Remover time server server address from current list
- */
-int connman_timeserver_remove(const char *server)
+static gboolean ts_recheck(gpointer user_data)
 {
-       struct connman_timeserver_driver *driver;
+       GSList *ts;
 
-       DBG("server %s", server);
+       ts = __connman_timeserver_get_all(__connman_service_get_default());
 
-       if (server == NULL)
-               return -EINVAL;
+       if (!ts) {
+               DBG("timeservers disabled");
 
-       driver = g_hash_table_lookup(server_hash, server);
-       if (driver == NULL)
-               return -EINVAL;
+               return TRUE;
+       }
 
-       g_hash_table_remove(server_hash, server);
+       if (g_strcmp0(ts_current, ts->data) != 0) {
+               DBG("current %s preferred %s", ts_current, (char *)ts->data);
 
-       if (driver->remove == NULL)
-               return -ENOENT;
+               g_slist_free_full(ts, g_free);
 
-       return driver->remove(server);
-}
+               __connman_timeserver_sync(NULL);
 
-void connman_timeserver_sync(void)
-{
-       GSList *list;
+               return FALSE;
+       }
 
        DBG("");
 
-       for (list = driver_list; list; list = list->next) {
-               struct connman_timeserver_driver *driver = list->data;
+       g_slist_free_full(ts, g_free);
+
+       return TRUE;
+}
+
+static void ts_recheck_disable(void)
+{
+       if (ts_recheck_id == 0)
+               return;
 
-               if (driver->sync == NULL)
-                       continue;
+       g_source_remove(ts_recheck_id);
+       ts_recheck_id = 0;
 
-               driver->sync();
+       if (ts_current) {
+               g_free(ts_current);
+               ts_current = NULL;
        }
 }
 
-int __connman_timeserver_system_append(const char *server)
+static void ts_recheck_enable(void)
 {
-       int len;
-       char **servers = NULL;
+       if (ts_recheck_id > 0)
+               return;
+
+       ts_recheck_id = g_timeout_add_seconds(TS_RECHECK_INTERVAL, ts_recheck,
+                       NULL);
+}
+
+/*
+ * This function must be called everytime the default service changes, the
+ * service timeserver(s) or gateway changes or the global timeserver(s) changes.
+ */
+int __connman_timeserver_sync(struct connman_service *default_service)
+{
+       struct connman_service *service;
+       char **nameservers;
+       int i;
+
+       if (default_service)
+               service = default_service;
+       else
+               service = __connman_service_get_default();
 
-       if (server == NULL) {
-               save_timeservers(servers);
+       if (!service)
+               return -EINVAL;
+
+       if (!resolv)
                return 0;
-       }
+       /*
+        * Before we start creating the new timeserver list we must stop
+        * any ongoing ntp query and server resolution.
+        */
 
-       DBG("server %s", server);
+       __connman_ntp_stop();
 
-       servers = load_timeservers();
+       ts_recheck_disable();
 
-       if (servers != NULL) {
-               int i;
+       if (resolv_id > 0)
+               g_resolv_cancel_lookup(resolv, resolv_id);
 
-               for (i = 0; servers[i] != NULL; i++)
-                       if (g_strcmp0(servers[i], server) == 0) {
-                               g_strfreev(servers);
-                               return -EEXIST;
-                       }
+       g_resolv_flush_nameservers(resolv);
 
-               len = g_strv_length(servers);
-               servers = g_try_renew(char *, servers, len + 2);
-       } else {
-               len = 0;
-               servers = g_try_new0(char *, len + 2);
-       }
+       nameservers = connman_service_get_nameservers(service);
+       if (!nameservers)
+               return -EINVAL;
 
-       if (servers == NULL)
-               return -ENOMEM;
+       for (i = 0; nameservers[i]; i++)
+               g_resolv_add_nameserver(resolv, nameservers[i], 53, 0);
 
-       servers[len] = g_strdup(server);
-       servers[len + 1] = NULL;
+       g_strfreev(nameservers);
 
-       save_timeservers(servers);
+       g_slist_free_full(ts_list, g_free);
+
+       ts_list = __connman_timeserver_get_all(service);
 
-       g_strfreev(servers);
+       __connman_service_timeserver_changed(service, ts_list);
+
+       if (!ts_list) {
+               DBG("No timeservers set.");
+               return 0;
+       }
+
+       ts_recheck_enable();
+
+       __connman_timeserver_sync_next();
 
        return 0;
 }
 
-int __connman_timeserver_system_remove(const char *server)
+static int timeserver_start(struct connman_service *service)
 {
-       char **servers;
-       char **temp;
-       int len, i, j;
+       char **nameservers;
+       int i;
 
-       if (server == NULL)
-               return -EINVAL;
-
-       DBG("server %s", server);
+       DBG("service %p", service);
 
-       servers = load_timeservers();
+       i = __connman_service_get_index(service);
+       if (i < 0)
+               return -EINVAL;
 
-       if (servers == NULL)
-               return 0;
+       nameservers = connman_service_get_nameservers(service);
+       if (!nameservers)
+               return -EINVAL;
 
-       len = g_strv_length(servers);
-       if (len == 1) {
-               if (g_strcmp0(servers[0], server) != 0) {
-                       g_strfreev(servers);
-                       return 0;
-               }
+       /* Stop an already ongoing resolution, if there is one */
+       if (resolv && resolv_id > 0)
+               g_resolv_cancel_lookup(resolv, resolv_id);
 
-               g_strfreev(servers);
-               servers = NULL;
-               save_timeservers(servers);
-               return 0;
+       /* get rid of the old resolver */
+       if (resolv) {
+               g_resolv_unref(resolv);
+               resolv = NULL;
        }
 
-       temp = g_try_new0(char *, len - 1);
-       if (temp == NULL) {
-                       g_strfreev(servers);
-                       return -ENOMEM;
+       resolv = g_resolv_new(i);
+       if (!resolv) {
+               g_strfreev(nameservers);
+               return -ENOMEM;
        }
 
-       for (i = 0, j = 0; i < len; i++) {
-               if (g_strcmp0(servers[i], server) != 0) {
-                       temp[j] = g_strdup(servers[i]);
-                       j++;
-               }
+       if (getenv("CONNMAN_RESOLV_DEBUG"))
+               g_resolv_set_debug(resolv, resolv_debug, "RESOLV");
+
+       for (i = 0; nameservers[i]; i++)
+               g_resolv_add_nameserver(resolv, nameservers[i], 53, 0);
+
+       g_strfreev(nameservers);
+
+       return __connman_timeserver_sync(service);
+}
+
+static void timeserver_stop(void)
+{
+       DBG(" ");
+
+       if (resolv) {
+               g_resolv_unref(resolv);
+               resolv = NULL;
        }
-       temp[len - 1] = NULL;
 
-       g_strfreev(servers);
-       servers = g_strdupv(temp);
-       g_strfreev(temp);
+       g_slist_free_full(ts_list, g_free);
+
+       ts_list = NULL;
+
+       __connman_ntp_stop();
+
+       ts_recheck_disable();
+}
 
+int __connman_timeserver_system_set(char **servers)
+{
        save_timeservers(servers);
-       g_strfreev(servers);
+
+       __connman_timeserver_sync(NULL);
 
        return 0;
 }
@@ -302,12 +422,24 @@ char **__connman_timeserver_system_get()
        return servers;
 }
 
+static void default_changed(struct connman_service *default_service)
+{
+       if (default_service)
+               timeserver_start(default_service);
+       else
+               timeserver_stop();
+}
+
+static struct connman_notifier timeserver_notifier = {
+       .name                   = "timeserver",
+       .default_changed        = default_changed,
+};
+
 int __connman_timeserver_init(void)
 {
        DBG("");
 
-       server_hash = g_hash_table_new_full(g_str_hash, g_str_equal,
-                                               g_free, NULL);
+       connman_notifier_register(&timeserver_notifier);
 
        return 0;
 }
@@ -316,5 +448,5 @@ void __connman_timeserver_cleanup(void)
 {
        DBG("");
 
-       g_hash_table_destroy(server_hash);
+       connman_notifier_unregister(&timeserver_notifier);
 }