+ aweather_gui_gl_redraw(self->gui);
+ aweather_gui_gl_end(self->gui);
+}
+
+static void load_colormap(AWeatherRadar *self, gchar *table)
+{
+ /* Set colormap so we can draw it on expose */
+ for (int i = 0; colormaps[i].name; i++)
+ if (g_str_equal(colormaps[i].name, table))
+ self->cur_colormap = &colormaps[i];
+}
+
+/* Add selectors to the config area for the sweeps */
+static void on_sweep_clicked(GtkRadioButton *button, gpointer _self);
+static void load_radar_gui(AWeatherRadar *self, Radar *radar)
+{
+ /* Clear existing items */
+ GtkWidget *child = gtk_bin_get_child(GTK_BIN(self->config_body));
+ if (child)
+ gtk_widget_destroy(child);
+
+ gdouble elev;
+ guint rows = 1, cols = 1, cur_cols;
+ gchar row_label_str[64], col_label_str[64], button_str[64];
+ GtkWidget *row_label, *col_label, *button = NULL, *elev_box = NULL;
+ GtkWidget *table = gtk_table_new(rows, cols, FALSE);
+
+ for (guint vi = 0; vi < radar->h.nvolumes; vi++) {
+ Volume *vol = radar->v[vi];
+ if (vol == NULL) continue;
+ rows++; cols = 1; elev = 0;
+
+ /* Row label */
+ g_snprintf(row_label_str, 64, "<b>%s:</b>", vol->h.type_str);
+ row_label = gtk_label_new(row_label_str);
+ gtk_label_set_use_markup(GTK_LABEL(row_label), TRUE);
+ gtk_misc_set_alignment(GTK_MISC(row_label), 1, 0.5);
+ gtk_table_attach(GTK_TABLE(table), row_label,
+ 0,1, rows-1,rows, GTK_FILL,GTK_FILL, 5,0);
+
+ for (guint si = 0; si < vol->h.nsweeps; si++) {
+ Sweep *sweep = vol->sweep[si];
+ if (sweep == NULL || sweep->h.elev == 0) continue;
+ if (sweep->h.elev != elev) {
+ cols++;
+ elev = sweep->h.elev;
+
+ /* Column label */
+ g_object_get(table, "n-columns", &cur_cols, NULL);
+ if (cols > cur_cols) {
+ g_snprintf(col_label_str, 64, "<b>%.2f°</b>", elev);
+ col_label = gtk_label_new(col_label_str);
+ gtk_label_set_use_markup(GTK_LABEL(col_label), TRUE);
+ gtk_widget_set_size_request(col_label, 40, -1);
+ gtk_table_attach(GTK_TABLE(table), col_label,
+ cols-1,cols, 0,1, GTK_FILL,GTK_FILL, 0,0);
+ }
+
+ elev_box = gtk_hbox_new(TRUE, 0);
+ gtk_table_attach(GTK_TABLE(table), elev_box,
+ cols-1,cols, rows-1,rows, GTK_FILL,GTK_FILL, 0,0);
+ }
+
+
+ /* Button */
+ g_snprintf(button_str, 64, "%3.2f", elev);
+ button = gtk_radio_button_new_with_label_from_widget(
+ GTK_RADIO_BUTTON(button), button_str);
+ gtk_widget_set_size_request(button, -1, 26);
+ //button = gtk_radio_button_new_from_widget(GTK_RADIO_BUTTON(button));
+ //gtk_widget_set_size_request(button, -1, 22);
+ g_object_set(button, "draw-indicator", FALSE, NULL);
+ gtk_box_pack_end(GTK_BOX(elev_box), button, TRUE, TRUE, 0);
+
+ g_object_set_data(G_OBJECT(button), "type", vol->h.type_str);
+ g_object_set_data(G_OBJECT(button), "sweep", sweep);
+ g_signal_connect(button, "clicked", G_CALLBACK(on_sweep_clicked), self);
+ }
+ }
+ gtk_container_add(GTK_CONTAINER(self->config_body), table);
+ gtk_widget_show_all(table);
+}
+
+/* Load a radar from a decompressed file */
+static void load_radar(AWeatherRadar *self, gchar *radar_file)
+{
+ char *dir = g_path_get_dirname(radar_file);
+ char *site = g_path_get_basename(dir);
+ g_free(dir);
+ g_debug("AWeatherRadar: load_radar - Loading new radar");
+ RSL_read_these_sweeps("all", NULL);
+ Radar *radar = self->cur_radar = RSL_wsr88d_to_radar(radar_file, site);
+ if (radar == NULL) {
+ g_warning("fail to load radar: path=%s, site=%s", radar_file, site);
+ g_free(site);
+ return;
+ }
+ g_free(site);
+
+ /* Load the first sweep by default */
+ if (radar->h.nvolumes < 1 || radar->v[0]->h.nsweeps < 1) {
+ g_warning("No sweeps found\n");
+ } else {
+ /* load first available sweep */
+ for (int vi = 0; vi < radar->h.nvolumes; vi++) {
+ if (radar->v[vi]== NULL) continue;
+ for (int si = 0; si < radar->v[vi]->h.nsweeps; si++) {
+ if (radar->v[vi]->sweep[si]== NULL) continue;
+ load_colormap(self, radar->v[vi]->h.type_str);
+ load_sweep(self, radar->v[vi]->sweep[si]);
+ break;
+ }
+ break;
+ }
+ }
+
+ load_radar_gui(self, radar);
+}
+
+static void update_times(AWeatherRadar *self, AWeatherView *view, char *site, char **last_time)
+{
+ GList *times = NULL;
+ if (aweather_view_get_offline(view)) {
+ gchar *path = g_build_filename(g_get_user_cache_dir(), PACKAGE, "nexrd2", "raw", site, NULL);
+ GDir *dir = g_dir_open(path, 0, NULL);
+ if (dir) {
+ const gchar *name;
+ while ((name = g_dir_read_name(dir))) {
+ times = g_list_prepend(times, g_strdup(name));
+ }
+ g_dir_close(dir);
+ }
+ g_free(path);
+ } else {
+ gchar *data;
+ gsize length;
+ GError *error = NULL;
+
+ char *list_uri = g_strdup_printf("http://mesonet.agron.iastate.edu/data/nexrd2/raw/%s/dir.list", site);
+ GFile *list = g_file_new_for_uri(list_uri);
+ g_file_load_contents(list, NULL, &data, &length, NULL, &error);
+ if (error) {
+ g_warning("Error loading list for %s: %s", site, error->message);
+ g_error_free(error);
+ } else {
+ gchar **lines = g_strsplit(data, "\n", -1);
+ for (int i = 0; lines[i] && lines[i][0]; i++) {
+ char **parts = g_strsplit(lines[i], " ", 2);
+ times = g_list_prepend(times, parts[1]);
+ g_strfreev(parts);
+ }
+ g_strfreev(lines);
+ g_free(data);
+ }
+
+ g_free(list_uri);
+ g_object_unref(list);
+ }
+
+ GRegex *regex = g_regex_new("^[A-Z]{4}_([0-9]{8}_[0-9]{4})$", 0, 0, NULL); // KLSX_20090622_2113
+ GMatchInfo *info;
+
+ GtkTreeView *tview = GTK_TREE_VIEW(aweather_gui_get_widget(self->gui, "time"));
+ GtkListStore *lstore = GTK_LIST_STORE(gtk_tree_view_get_model(tview));
+ gtk_list_store_clear(lstore);
+ GtkTreeIter iter;
+ times = g_list_reverse(times);
+ for (GList *cur = times; cur; cur = cur->next) {
+ g_message("trying time %s", (gchar*)cur->data);
+ if (g_regex_match(regex, cur->data, 0, &info)) {
+ gchar *time = g_match_info_fetch(info, 1);
+ g_message("adding time %s", (gchar*)cur->data);
+ gtk_list_store_insert(lstore, &iter, 0);
+ gtk_list_store_set(lstore, &iter, 0, time, -1);
+ if (last_time)
+ *last_time = time;
+ }
+ }
+
+ g_regex_unref(regex);
+ g_list_foreach(times, (GFunc)g_free, NULL);
+ g_list_free(times);
+}
+
+/*****************
+ * ASync helpers *
+ *****************/
+typedef struct {
+ AWeatherRadar *self;
+ gchar *radar_file;
+} decompressed_t;
+
+static void decompressed_cb(GPid pid, gint status, gpointer _udata)
+{
+ decompressed_t *udata = _udata;
+ if (status != 0) {
+ g_warning("wsr88ddec exited with status %d", status);
+ return;
+ }
+ load_radar(udata->self, udata->radar_file);
+ g_spawn_close_pid(pid);
+ g_free(udata->radar_file);
+ g_free(udata);
+}
+
+static void cached_cb(char *path, gboolean updated, gpointer _self)
+{
+ AWeatherRadar *self = AWEATHER_RADAR(_self);
+ char *decompressed = g_strconcat(path, ".raw", NULL);
+ if (!updated) {
+ load_radar(self, decompressed);
+ return;
+ }
+
+ decompressed_t *udata = g_malloc(sizeof(decompressed_t));
+ udata->self = self;
+ udata->radar_file = decompressed;
+ g_debug("AWeatherRadar: cached_cb - File updated, decompressing..");
+ char *argv[] = {"wsr88ddec", path, decompressed, NULL};
+ GPid pid;
+ GError *error = NULL;
+ g_spawn_async(
+ NULL, // const gchar *working_directory,
+ argv, // gchar **argv,
+ NULL, // gchar **envp,
+ G_SPAWN_SEARCH_PATH|
+ G_SPAWN_DO_NOT_REAP_CHILD,
+ // GSpawnFlags flags,
+ NULL, // GSpawnChildSetupFunc child_setup,
+ NULL, // gpointer user_data,
+ &pid, // GPid *child_pid,
+ &error); // GError **error
+ if (error) {
+ g_warning("failed to decompress WSR88D data: %s",
+ error->message);
+ g_error_free(error);
+ }
+ g_child_watch_add(pid, decompressed_cb, udata);
+}
+
+/*************
+ * Callbacks *
+ *************/
+static void on_sweep_clicked(GtkRadioButton *button, gpointer _self)
+{
+ AWeatherRadar *self = AWEATHER_RADAR(_self);
+ load_colormap(self, g_object_get_data(G_OBJECT(button), "type" ));
+ load_sweep (self, g_object_get_data(G_OBJECT(button), "sweep"));
+}
+
+static void on_time_changed(AWeatherView *view, const char *time, gpointer _self)
+{
+ AWeatherRadar *self = AWEATHER_RADAR(_self);
+ g_debug("AWeatherRadar: on_time_changed - setting time=%s", time);
+ // format: http://mesonet.agron.iastate.edu/data/nexrd2/raw/KABR/KABR_20090510_0323
+ char *site = aweather_view_get_site(view);
+ char *base = "http://mesonet.agron.iastate.edu/data/";
+ char *path = g_strdup_printf("nexrd2/raw/%s/%s_%s", site, site, time);
+
+ /* Clear out children */
+ GtkWidget *child = gtk_bin_get_child(GTK_BIN(self->config_body));
+ if (child)
+ gtk_widget_destroy(child);
+ gtk_container_add(GTK_CONTAINER(self->config_body),
+ gtk_label_new("Loading radar..."));
+ gtk_widget_show_all(self->config_body);
+ if (self->cur_radar)
+ RSL_free_radar(self->cur_radar);
+ self->cur_radar = NULL;
+ self->cur_sweep = NULL;
+ aweather_gui_gl_redraw(self->gui);
+
+ /* Start loading the new radar */
+ if (aweather_view_get_offline(view))
+ cache_file(base, path, AWEATHER_ONCE, cached_cb, self);
+ else
+ cache_file(base, path, AWEATHER_UPDATE, cached_cb, self);
+ g_free(path);
+}
+
+static void on_site_changed(AWeatherView *view, char *site, gpointer _self)
+{
+ AWeatherRadar *self = AWEATHER_RADAR(_self);
+ g_debug("AWeatherRadar: on_site_changed - Loading wsr88d list for %s", site);
+ char *time = NULL;
+ update_times(self, view, site, &time);
+ aweather_view_set_time(view, time);
+
+ g_free(time);