[girl] Add test code.

[Ole Aamot <ole src gnome org>]

commit f088248f63356c4b6bef9d8c7b79cc5512d567fb
Author: Ole Aamot <oka oka no>
Date:   Tue May 26 13:30:04 2015 +0200

    Add test code.

 src/test-stations-gfx.c |   57 ++++++++++++++++++++++++++
 src/test-stations.c     |  101 +++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 158 insertions(+), 0 deletions(-)
---
diff --git a/src/test-stations-gfx.c b/src/test-stations-gfx.c
new file mode 100644
index 0000000..3c8dfd2
--- /dev/null
+++ b/src/test-stations-gfx.c
@@ -0,0 +1,57 @@
+#include <config.h>
+#include <locale.h>
+#include "girl-stations-map.h"
+#include "girl-tz.h"
+
+int main (int argc, char **argv)
+{
+       TzDB *db;
+       GPtrArray *locs;
+       guint i;
+       char *pixmap_dir;
+       int retval = 0;
+
+        setlocale (LC_ALL, "");
+
+       if (argc == 2) {
+               pixmap_dir = g_strdup (argv[1]);
+       } else if (argc == 1) {
+               pixmap_dir = g_strdup ("data/");
+       } else {
+               g_message ("Usage: %s [PIXMAP DIRECTORY]", argv[0]);
+               return 1;
+       }
+
+       /* Timezone map */
+       
+       db = tz_load_db ();
+       locs = tz_get_locations (db);
+       for (i = 0; i < locs->len ; i++) {
+               TzLocation *loc = locs->pdata[i];
+               TzInfo *info;
+               char *filename, *path;
+               gdouble selected_offset;
+                char buf[16];
+
+               info = tz_info_from_location (loc);
+               selected_offset = tz_location_get_utc_offset (loc)
+                       / (60.0*60.0) + ((info->daylight) ? -1.0 : 0.0);
+
+               filename = g_strdup_printf ("timezone_%s.png",
+                                            g_ascii_formatd (buf, sizeof (buf),
+                                                             "%g", selected_offset));
+               path = g_build_filename (pixmap_dir, filename, NULL);
+
+               if (g_file_test (path, G_FILE_TEST_IS_REGULAR) == FALSE) {
+                       g_message ("File '%s' missing for zone '%s'", filename, loc->zone);
+                       retval = 1;
+               }
+
+               g_free (filename);
+               g_free (path);
+       }
+       tz_db_free (db);
+       g_free (pixmap_dir);
+
+       return retval;
+}
diff --git a/src/test-stations.c b/src/test-stations.c
new file mode 100644
index 0000000..29967fe
--- /dev/null
+++ b/src/test-stations.c
@@ -0,0 +1,101 @@
+#include <gtk/gtk.h>
+#include "girl-stations-map.h"
+
+#define TZ_DIR "/usr/share/zoneinfo/"
+
+static GList *
+get_stations_list (GList *tzs,
+                  const char *top_path,
+                  const char *subpath)
+{
+       GDir *dir;
+       char *fullpath;
+       const char *name;
+
+       if (subpath == NULL)
+               fullpath = g_strdup (top_path);
+       else
+               fullpath = g_build_filename (top_path, subpath, NULL);
+       dir = g_dir_open (fullpath, 0, NULL);
+       if (dir == NULL) {
+               g_warning ("Could not open %s", fullpath);
+               return NULL;
+       }
+       while ((name = g_dir_read_name (dir)) != NULL) {
+               char *path;
+
+               if (g_str_has_suffix (name, ".tab"))
+                       continue;
+
+               if (subpath != NULL)
+                       path = g_build_filename (top_path, subpath, name, NULL);
+               else
+                       path = g_build_filename (top_path, name, NULL);
+               if (g_file_test (path, G_FILE_TEST_IS_DIR)) {
+                       if (subpath == NULL) {
+                               tzs = get_stations_list (tzs, top_path, name);
+                       } else {
+                               char *new_subpath;
+                               new_subpath = g_strdup_printf ("%s/%s", subpath, name);
+                               tzs = get_stations_list (tzs, top_path, new_subpath);
+                               g_free (new_subpath);
+                       }
+               } else if (g_file_test (path, G_FILE_TEST_IS_REGULAR)) {
+                       if (subpath == NULL)
+                               tzs = g_list_prepend (tzs, g_strdup (name));
+                       else {
+                               char *tz;
+                               tz = g_strdup_printf ("%s/%s", subpath, name);
+                               tzs = g_list_prepend (tzs, tz);
+                       }
+               }
+               g_free (path);
+       }
+       g_dir_close (dir);
+
+       return tzs;
+}
+
+int main (int argc, char **argv)
+{
+       GirlStationsMap *map;
+       TzDB *tz_db;
+       GList *tzs, *l;
+       GHashTable *ht;
+       int ret = 0;
+
+       gtk_init (&argc, &argv);
+
+       ht = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, NULL);
+       map = girl_stations_map_new ();
+       tz_db = tz_load_db ();
+       tzs = get_stations_list (NULL, TZ_DIR, NULL);
+       for (l = tzs; l != NULL; l = l->next) {
+               char *stations = l->data;
+               char *clean_tz;
+
+               clean_tz = tz_info_get_clean_name (tz_db, stations);
+
+               if (girl_stations_map_set_location (map, clean_tz) == FALSE) {
+                       if (g_hash_table_lookup (ht, clean_tz) == NULL) {
+                               if (g_strcmp0 (clean_tz, stations) == 0)
+                                       g_print ("Failed to locate station: '%s'\n", stations);
+                               else
+                                       g_print ("Failed to locate station: '%s' (original name: '%s')\n", 
clean_tz, stations);
+                               g_hash_table_insert (ht, g_strdup (clean_tz), GINT_TO_POINTER (TRUE));
+                       }
+                       /* We don't warn for those two, we'll just fallback
+                        * in the panel code */
+                       if (!g_str_equal (clean_tz, "posixrules") &&
+                           !g_str_equal (clean_tz, "Factory"))
+                               ret = 1;
+               }
+               g_free (stations);
+               g_free (clean_tz);
+       }
+       g_list_free (tzs);
+       tz_db_free (tz_db);
+       g_hash_table_destroy (ht);
+
+       return ret;
+}