+static void set_time(AWeatherView *view, char *time, gpointer user_data)
+{
+ g_message("radar:setting time");
+ // format: http://mesonet.agron.iastate.edu/data/nexrd2/raw/KABR/KABR_20090510_0323
+ char *site = aweather_view_get_location(view);
+ char *base = "http://mesonet.agron.iastate.edu/data/";
+ char *path = g_strdup_printf("nexrd2/raw/K%s/K%s_%s", site, site, time);
+ //g_message("caching %s/%s", base, path);
+ cur_sweep = NULL; // Clear radar
+ gtk_widget_queue_draw(aweather_gui_get_widget(gui, "drawing"));
+ cache_file(base, path, load_radar, NULL);
+ g_free(path);
+}
+
+static void set_site(AWeatherView *view, char *site, gpointer user_data)
+{
+ g_message("Loading wsr88d list for %s", site);
+ gchar *data;
+ gsize length;
+ GError *error = NULL;
+ char *list_uri = g_strdup_printf("http://mesonet.agron.iastate.edu/data/nexrd2/raw/K%s/dir.list", site);
+ GFile *list = g_file_new_for_uri(list_uri);
+ g_free(list_uri);
+ cur_sweep = NULL; // Clear radar
+ gtk_widget_queue_draw(aweather_gui_get_widget(gui, "drawing"));
+ g_file_load_contents(list, NULL, &data, &length, NULL, &error);
+ if (error) {
+ g_warning("Error loading list for %s: %s", site, error->message);
+ return;
+ }
+ gchar **lines = g_strsplit(data, "\n", -1);
+ GtkTreeView *tview = GTK_TREE_VIEW(aweather_gui_get_widget(gui, "time"));
+ GtkListStore *lstore = GTK_LIST_STORE(gtk_tree_view_get_model(tview));
+ gtk_list_store_clear(lstore);
+ radar = NULL;
+ char *time = NULL;
+ for (int i = 0; lines[i] && lines[i][0]; i++) {
+ // format: `841907 KABR_20090510_0159'
+ //g_message("\tadding %p [%s]", lines[i], lines[i]);
+ char **parts = g_strsplit(lines[i], " ", 2);
+ time = parts[1]+5;
+ GtkTreeIter iter;
+ gtk_list_store_insert(lstore, &iter, 0);
+ gtk_list_store_set(lstore, &iter, 0, time, -1);
+ }
+ if (time != NULL)
+ aweather_view_set_time(view, time);
+ g_free(data);
+ g_strfreev(lines);
+}