Pileus Git - aweather/blob - src/plugins/level2.c

   1 /*
   2  * Copyright (C) 2009-2011 Andy Spencer <andy753421@gmail.com>
   3  *
   4  * This program is free software: you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation, either version 3 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  16  */
  17
  18 #include <config.h>
  19 #include <math.h>
  20 #include <GL/gl.h>
  21 #include <glib/gstdio.h>
  22 #include <grits.h>
  23 #include <rsl.h>
  24
  25 #include "level2.h"
  26
  27 #define ISO_MIN 30
  28 #define ISO_MAX 80
  29
  30 /**************************
  31  * Data loading functions *
  32  **************************/
  33 /* Convert a sweep to an 2d array of data points */
  34 static void _bscan_sweep(Sweep *sweep, AWeatherColormap *colormap,
  35                 guint8 **data, int *width, int *height)
  36 {
  37         g_debug("AWeatherLevel2: _bscan_sweep - %p, %p, %p",
  38                         sweep, colormap, data);
  39         /* Calculate max number of bins */
  40         int max_bins = 0;
  41         for (int i = 0; i < sweep->h.nrays; i++)
  42                 max_bins = MAX(max_bins, sweep->ray[i]->h.nbins);
  43
  44         /* Allocate buffer using max number of bins for each ray */
  45         guint8 *buf = g_malloc0(sweep->h.nrays * max_bins * 4);
  46
  47         /* Fill the data */
  48         for (int ri = 0; ri < sweep->h.nrays; ri++) {
  49                 Ray *ray  = sweep->ray[ri];
  50                 for (int bi = 0; bi < ray->h.nbins; bi++) {
  51                         guint  buf_i = (ri*max_bins+bi)*4;
  52                         float  value = ray->h.f(ray->range[bi]);
  53
  54                         /* Check for bad values */
  55                         if (value == BADVAL     || value == RFVAL      || value == APFLAG ||
  56                             value == NOTFOUND_H || value == NOTFOUND_V || value == NOECHO) {
  57                                 buf[buf_i+3] = 0x00; // transparent
  58                                 continue;
  59                         }
  60
  61                         /* Copy color to buffer */
  62                         guint8 *data = colormap_get(colormap, value);
  63                         buf[buf_i+0] = data[0];
  64                         buf[buf_i+1] = data[1];
  65                         buf[buf_i+2] = data[2];
  66                         buf[buf_i+3] = data[3]*0.75; // TESTING
  67                 }
  68         }
  69
  70         /* set output */
  71         *width  = max_bins;
  72         *height = sweep->h.nrays;
  73         *data   = buf;
  74 }
  75
  76 /* Load a sweep into an OpenGL texture */
  77 static void _load_sweep_gl(AWeatherLevel2 *level2)
  78 {
  79         g_debug("AWeatherLevel2: _load_sweep_gl");
  80         guint8 *data;
  81         gint width, height;
  82         _bscan_sweep(level2->sweep, level2->sweep_colors, &data, &width, &height);
  83         gint tex_width  = pow(2, ceil(log(width )/log(2)));
  84         gint tex_height = pow(2, ceil(log(height)/log(2)));
  85         level2->sweep_coords[0] = (double)width  / tex_width;
  86         level2->sweep_coords[1] = (double)height / tex_height;
  87
  88         if (!level2->sweep_tex)
  89                  glGenTextures(1, &level2->sweep_tex);
  90         glBindTexture(GL_TEXTURE_2D, level2->sweep_tex);
  91         glPixelStorei(GL_PACK_ALIGNMENT, 1);
  92         glPixelStorei(GL_UNPACK_ALIGNMENT, 1);
  93         glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA8, tex_width, tex_height, 0,
  94                         GL_RGBA, GL_UNSIGNED_BYTE, NULL);
  95         glTexSubImage2D(GL_TEXTURE_2D, 0, 0,0, width,height,
  96                         GL_RGBA, GL_UNSIGNED_BYTE, data);
  97         glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
  98         glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
  99
 100         g_free(data);
 101 }
 102
 103 /* Decompress a radar file using wsr88dec */
 104 static gboolean _decompress_radar(const gchar *file, const gchar *raw)
 105 {
 106         g_debug("AWeatherLevel2: _decompress_radar - \n\t%s\n\t%s", file, raw);
 107         char *argv[] = {"wsr88ddec", (gchar*)file, (gchar*)raw, NULL};
 108         gint status;
 109         GError *error = NULL;
 110         g_spawn_sync(
 111                 NULL,    // const gchar *working_directory
 112                 argv,    // gchar **argv
 113                 NULL,    // gchar **envp
 114                 G_SPAWN_SEARCH_PATH, // GSpawnFlags flags
 115                 NULL,    // GSpawnChildSetupFunc child_setup
 116                 NULL,    // gpointer user_data
 117                 NULL,    // gchar *standard_output
 118                 NULL,    // gchar *standard_output
 119                 &status, // gint *exit_status
 120                 &error); // GError **error
 121         if (error) {
 122                 g_warning("AWeatherLevel2: _decompress_radar - %s", error->message);
 123                 g_error_free(error);
 124                 return FALSE;
 125         }
 126         if (status != 0) {
 127                 gchar *msg = g_strdup_printf("wsr88ddec exited with status %d", status);
 128                 g_warning("AWeatherLevel2: _decompress_radar - %s", msg);
 129                 g_free(msg);
 130                 return FALSE;
 131         }
 132         return TRUE;
 133 }
 134
 135 /* Load the radar into a Grits Volume */
 136 static void _cart_to_sphere(VolCoord *out, VolCoord *in)
 137 {
 138         gdouble angle = in->x;
 139         gdouble dist  = in->y;
 140         gdouble tilt  = in->z;
 141         gdouble lx    = sin(angle);
 142         gdouble ly    = cos(angle);
 143         gdouble lz    = sin(tilt);
 144         //out->x = (ly*dist)/20000;
 145         //out->y = (lz*dist)/10000-0.5;
 146         //out->z = (lx*dist)/20000-1.5;
 147         out->x = (lx*dist);
 148         out->y = (ly*dist);
 149         out->z = (lz*dist);
 150 }
 151
 152 static VolGrid *_load_grid(Volume *vol)
 153 {
 154         g_debug("AWeatherLevel2: _load_grid");
 155
 156         Sweep *sweep   = vol->sweep[0];
 157         Ray   *ray     = sweep->ray[0];
 158         gint nsweeps   = vol->h.nsweeps;
 159         gint nrays     = sweep->h.nrays/(1/sweep->h.beam_width)+1;
 160         gint nbins     = ray->h.nbins  /(1000/ray->h.gate_size);
 161         nbins = MIN(nbins, 150);
 162
 163         VolGrid  *grid = vol_grid_new(nrays, nbins, nsweeps);
 164
 165         gint rs, bs, val;
 166         gint si=0, ri=0, bi=0;
 167         for (si = 0; si < nsweeps; si++) {
 168                 sweep = vol->sweep[si];
 169                 rs    = 1.0/sweep->h.beam_width;
 170         for (ri = 0; ri < nrays; ri++) {
 171                 /* TODO: missing rays, pick ri based on azmith */
 172                 ray   = sweep->ray[(ri*rs) % sweep->h.nrays];
 173                 bs    = 1000/ray->h.gate_size;
 174         for (bi = 0; bi < nbins; bi++) {
 175                 if (bi*bs >= ray->h.nbins)
 176                         break;
 177                 val   = ray->h.f(ray->range[bi*bs]);
 178                 if (val == BADVAL     || val == RFVAL      ||
 179                     val == APFLAG     || val == NOECHO     ||
 180                     val == NOTFOUND_H || val == NOTFOUND_V ||
 181                     val > 80)
 182                         val = 0;
 183                 VolPoint *point = vol_grid_get(grid, ri, bi, si);
 184                 point->value = val;
 185                 point->c.x = deg2rad(ray->h.azimuth);
 186                 point->c.y = bi*bs*ray->h.gate_size + ray->h.range_bin1;
 187                 point->c.z = deg2rad(ray->h.elev);
 188         } } }
 189
 190         for (si = 0; si < nsweeps; si++)
 191         for (ri = 0; ri < nrays; ri++)
 192         for (bi = 0; bi < nbins; bi++) {
 193                 VolPoint *point = vol_grid_get(grid, ri, bi, si);
 194                 if (point->c.y == 0)
 195                         point->value = nan("");
 196                 else
 197                         _cart_to_sphere(&point->c, &point->c);
 198         }
 199         return grid;
 200 }
 201
 202
 203 /*********************
 204  * Drawing functions *
 205  *********************/
 206 void aweather_level2_draw(GritsObject *_level2, GritsOpenGL *opengl)
 207 {
 208         AWeatherLevel2 *level2 = AWEATHER_LEVEL2(_level2);
 209         if (!level2->sweep || !level2->sweep_tex)
 210                 return;
 211
 212         /* Draw wsr88d */
 213         Sweep *sweep = level2->sweep;
 214         //glDisable(GL_ALPHA_TEST);
 215         glDisable(GL_CULL_FACE);
 216         glDisable(GL_LIGHTING);
 217         glEnable(GL_TEXTURE_2D);
 218         glEnable(GL_POLYGON_OFFSET_FILL);
 219         glPolygonOffset(1.0, -2.0);
 220         glColor4f(1,1,1,1);
 221
 222         /* Draw the rays */
 223         gdouble xscale = level2->sweep_coords[0];
 224         gdouble yscale = level2->sweep_coords[1];
 225         glBindTexture(GL_TEXTURE_2D, level2->sweep_tex);
 226         glBegin(GL_TRIANGLE_STRIP);
 227         for (int ri = 0; ri <= sweep->h.nrays; ri++) {
 228                 Ray  *ray = NULL;
 229                 double angle = 0;
 230                 if (ri < sweep->h.nrays) {
 231                         ray = sweep->ray[ri];
 232                         angle = deg2rad(ray->h.azimuth - ((double)ray->h.beam_width/2.));
 233                 } else {
 234                         /* Do the right side of the last sweep */
 235                         ray = sweep->ray[ri-1];
 236                         angle = deg2rad(ray->h.azimuth + ((double)ray->h.beam_width/2.));
 237                 }
 238
 239                 double lx = sin(angle);
 240                 double ly = cos(angle);
 241
 242                 double near_dist = ray->h.range_bin1 - ((double)ray->h.gate_size/2.);
 243                 double far_dist  = near_dist + (double)ray->h.nbins*ray->h.gate_size;
 244
 245                 /* (find middle of bin) / scale for opengl */
 246                 // near left
 247                 glTexCoord2f(0.0, ((double)ri/sweep->h.nrays)*yscale);
 248                 glVertex3f(lx*near_dist, ly*near_dist, 2.0);
 249
 250                 // far  left
 251                 // todo: correct range-height function
 252                 double height = sin(deg2rad(ray->h.elev)) * far_dist;
 253                 glTexCoord2f(xscale, ((double)ri/sweep->h.nrays)*yscale);
 254                 glVertex3f(lx*far_dist,  ly*far_dist, height);
 255         }
 256         glEnd();
 257         //g_print("ri=%d, nr=%d, bw=%f\n", _ri, sweep->h.nrays, sweep->h.beam_width);
 258
 259         /* Texture debug */
 260         //glBegin(GL_QUADS);
 261         //glTexCoord2d( 0.,  0.); glVertex3f(-500.,   0., 0.); // bot left
 262         //glTexCoord2d( 0.,  1.); glVertex3f(-500., 500., 0.); // top left
 263         //glTexCoord2d( 1.,  1.); glVertex3f( 0.,   500., 3.); // top right
 264         //glTexCoord2d( 1.,  0.); glVertex3f( 0.,     0., 3.); // bot right
 265         //glEnd();
 266 }
 267
 268 void aweather_level2_hide(GritsObject *_level2, gboolean hidden)
 269 {
 270         AWeatherLevel2 *level2 = AWEATHER_LEVEL2(_level2);
 271         if (level2->volume)
 272                 grits_object_hide(GRITS_OBJECT(level2->volume), hidden);
 273 }
 274
 275
 276 /***********
 277  * Methods *
 278  ***********/
 279 static gboolean _set_sweep_cb(gpointer _level2)
 280 {
 281         g_debug("AWeatherLevel2: _set_sweep_cb");
 282         AWeatherLevel2 *level2 = _level2;
 283         _load_sweep_gl(level2);
 284         grits_object_queue_draw(_level2);
 285         g_object_unref(level2);
 286         return FALSE;
 287 }
 288 void aweather_level2_set_sweep(AWeatherLevel2 *level2,
 289                 int type, float elev)
 290 {
 291         g_debug("AWeatherLevel2: set_sweep - %d %f", type, elev);
 292
 293         /* Find sweep */
 294         Volume *volume = RSL_get_volume(level2->radar, type);
 295         if (!volume) return;
 296         level2->sweep = RSL_get_closest_sweep(volume, elev, 90);
 297         if (!level2->sweep) return;
 298
 299         /* Find colormap */
 300         level2->sweep_colors = NULL;
 301         for (int i = 0; level2->colormap[i].file; i++)
 302                 if (level2->colormap[i].type == type)
 303                         level2->sweep_colors = &level2->colormap[i];
 304         if (!level2->sweep_colors) {
 305                 g_warning("AWeatherLevel2: set_sweep - missing colormap[%d]", type);
 306                 level2->sweep_colors = &level2->colormap[0];
 307         }
 308
 309         /* Load data */
 310         g_object_ref(level2);
 311         g_idle_add(_set_sweep_cb, level2);
 312 }
 313
 314 void aweather_level2_set_iso(AWeatherLevel2 *level2, gfloat level)
 315 {
 316         g_debug("AWeatherLevel2: set_iso - %f", level);
 317
 318         if (!level2->volume) {
 319                 g_debug("AWeatherLevel2: set_iso - creating new volume");
 320                 Volume      *rvol = RSL_get_volume(level2->radar, DZ_INDEX);
 321                 VolGrid     *grid = _load_grid(rvol);
 322                 GritsVolume *vol  = grits_volume_new(grid);
 323                 vol->proj = GRITS_VOLUME_CARTESIAN;
 324                 vol->disp = GRITS_VOLUME_SURFACE;
 325                 GRITS_OBJECT(vol)->center = GRITS_OBJECT(level2)->center;
 326                 grits_viewer_add(GRITS_OBJECT(level2)->viewer,
 327                                 GRITS_OBJECT(vol), GRITS_LEVEL_WORLD+1, FALSE);
 328                 level2->volume = vol;
 329         }
 330         if (ISO_MIN < level && level < ISO_MAX) {
 331                 guint8 *data = colormap_get(&level2->colormap[0], level);
 332                 level2->volume->color[0] = data[0];
 333                 level2->volume->color[1] = data[1];
 334                 level2->volume->color[2] = data[2];
 335                 level2->volume->color[3] = data[3];
 336                 grits_volume_set_level(level2->volume, level);
 337                 grits_object_hide(GRITS_OBJECT(level2->volume), FALSE);
 338         } else {
 339                 grits_object_hide(GRITS_OBJECT(level2->volume), TRUE);
 340         }
 341 }
 342
 343 AWeatherLevel2 *aweather_level2_new(Radar *radar, AWeatherColormap *colormap)
 344 {
 345         g_debug("AWeatherLevel2: new - %s", radar->h.radar_name);
 346         RSL_sort_radar(radar);
 347         AWeatherLevel2 *level2 = g_object_new(AWEATHER_TYPE_LEVEL2, NULL);
 348         level2->radar    = radar;
 349         level2->colormap = colormap;
 350         aweather_level2_set_sweep(level2, DZ_INDEX, 0);
 351
 352         GritsPoint center;
 353         Radar_header *h = &radar->h;
 354         center.lat  = (double)h->latd + (double)h->latm/60 + (double)h->lats/(60*60);
 355         center.lon  = (double)h->lond + (double)h->lonm/60 + (double)h->lons/(60*60);
 356         center.elev = h->height;
 357         GRITS_OBJECT(level2)->center = center;
 358         return level2;
 359 }
 360
 361 AWeatherLevel2 *aweather_level2_new_from_file(const gchar *file, const gchar *site,
 362                 AWeatherColormap *colormap)
 363 {
 364         g_debug("AWeatherLevel2: new_from_file %s %s", site, file);
 365
 366         /* Decompress radar */
 367         gchar *raw = g_strconcat(file, ".raw", NULL);
 368         if (g_file_test(raw, G_FILE_TEST_EXISTS)) {
 369                 struct stat files, raws;
 370                 g_stat(file, &files);
 371                 g_stat(raw,  &raws);
 372                 if (files.st_mtime > raws.st_mtime)
 373                         if (!_decompress_radar(file, raw))
 374                                 return NULL;
 375         } else {
 376                 if (!_decompress_radar(file, raw))
 377                         return NULL;
 378         }
 379
 380         /* Load the radar file */
 381         RSL_read_these_sweeps("all", NULL);
 382         g_message("read start");
 383         Radar *radar = RSL_wsr88d_to_radar(raw, (gchar*)site);
 384         g_message("read done");
 385         g_free(raw);
 386         if (!radar)
 387                 return NULL;
 388
 389         return aweather_level2_new(radar, colormaps);
 390 }
 391
 392 static void _on_sweep_clicked(GtkRadioButton *button, gpointer _level2)
 393 {
 394         AWeatherLevel2 *level2 = _level2;
 395         if (gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(button))) {
 396                 gint type = (gint)g_object_get_data(G_OBJECT(button), "type");
 397                 gint elev = (gint)g_object_get_data(G_OBJECT(button), "elev");
 398                 aweather_level2_set_sweep(level2, type, (float)elev/100);
 399                 //level2->colormap = level2->sweep_colors;
 400         }
 401 }
 402
 403 static void _on_iso_changed(GtkRange *range, gpointer _level2)
 404 {
 405         AWeatherLevel2 *level2 = _level2;
 406         gfloat level = gtk_range_get_value(range);
 407         aweather_level2_set_iso(level2, level);
 408 }
 409
 410 GtkWidget *aweather_level2_get_config(AWeatherLevel2 *level2)
 411 {
 412         Radar *radar = level2->radar;
 413         g_debug("AWeatherLevel2: get_config - %p, %p", level2, radar);
 414         /* Clear existing items */
 415         gfloat elev;
 416         guint rows = 1, cols = 1, cur_cols;
 417         gchar row_label_str[64], col_label_str[64], button_str[64];
 418         GtkWidget *row_label, *col_label, *button = NULL, *elev_box = NULL;
 419         GtkWidget *table = gtk_table_new(rows, cols, FALSE);
 420
 421         /* Add date */
 422         gchar *date_str = g_strdup_printf("<b><i>%04d-%02d-%02d %02d:%02d</i></b>",
 423                         radar->h.year, radar->h.month, radar->h.day+1,
 424                         radar->h.hour, radar->h.minute);
 425         GtkWidget *date_label = gtk_label_new(date_str);
 426         gtk_label_set_use_markup(GTK_LABEL(date_label), TRUE);
 427         gtk_table_attach(GTK_TABLE(table), date_label,
 428                         0,1, 0,1, GTK_FILL,GTK_FILL, 5,0);
 429         g_free(date_str);
 430
 431         /* Add sweeps */
 432         for (guint vi = 0; vi < radar->h.nvolumes; vi++) {
 433                 Volume *vol = radar->v[vi];
 434                 if (vol == NULL) continue;
 435                 rows++; cols = 1; elev = 0;
 436
 437                 /* Row label */
 438                 g_snprintf(row_label_str, 64, "<b>%s:</b>", vol->h.type_str);
 439                 row_label = gtk_label_new(row_label_str);
 440                 gtk_label_set_use_markup(GTK_LABEL(row_label), TRUE);
 441                 gtk_misc_set_alignment(GTK_MISC(row_label), 1, 0.5);
 442                 gtk_table_attach(GTK_TABLE(table), row_label,
 443                                 0,1, rows-1,rows, GTK_FILL,GTK_FILL, 5,0);
 444
 445                 for (guint si = 0; si < vol->h.nsweeps; si++) {
 446                         Sweep *sweep = vol->sweep[si];
 447                         if (sweep == NULL || sweep->h.elev == 0) continue;
 448                         if (sweep->h.elev != elev) {
 449                                 cols++;
 450                                 elev = sweep->h.elev;
 451
 452                                 /* Column label */
 453                                 g_object_get(table, "n-columns", &cur_cols, NULL);
 454                                 if (cols >  cur_cols) {
 455                                         g_snprintf(col_label_str, 64, "<b>%.2f°</b>", elev);
 456                                         col_label = gtk_label_new(col_label_str);
 457                                         gtk_label_set_use_markup(GTK_LABEL(col_label), TRUE);
 458                                         gtk_widget_set_size_request(col_label, 50, -1);
 459                                         gtk_table_attach(GTK_TABLE(table), col_label,
 460                                                         cols-1,cols, 0,1, GTK_FILL,GTK_FILL, 0,0);
 461                                 }
 462
 463                                 elev_box = gtk_hbox_new(TRUE, 0);
 464                                 gtk_table_attach(GTK_TABLE(table), elev_box,
 465                                                 cols-1,cols, rows-1,rows, GTK_FILL,GTK_FILL, 0,0);
 466                         }
 467
 468
 469                         /* Button */
 470                         g_snprintf(button_str, 64, "%3.2f", elev);
 471                         button = gtk_radio_button_new_with_label_from_widget(
 472                                         GTK_RADIO_BUTTON(button), button_str);
 473                         gtk_widget_set_size_request(button, -1, 26);
 474                         //button = gtk_radio_button_new_from_widget(GTK_RADIO_BUTTON(button));
 475                         //gtk_widget_set_size_request(button, -1, 22);
 476                         g_object_set(button, "draw-indicator", FALSE, NULL);
 477                         gtk_box_pack_end(GTK_BOX(elev_box), button, TRUE, TRUE, 0);
 478
 479                         g_object_set_data(G_OBJECT(button), "level2", (gpointer)level2);
 480                         g_object_set_data(G_OBJECT(button), "type",   (gpointer)vi);
 481                         g_object_set_data(G_OBJECT(button), "elev",   (gpointer)(int)(elev*100));
 482                         g_signal_connect(button, "clicked", G_CALLBACK(_on_sweep_clicked), level2);
 483                 }
 484         }
 485
 486         /* Add Iso-surface volume */
 487         g_object_get(table, "n-columns", &cols, NULL);
 488         row_label = gtk_label_new("<b>Isosurface:</b>");
 489         gtk_label_set_use_markup(GTK_LABEL(row_label), TRUE);
 490         gtk_misc_set_alignment(GTK_MISC(row_label), 1, 0.5);
 491         gtk_table_attach(GTK_TABLE(table), row_label,
 492                         0,1, rows,rows+1, GTK_FILL,GTK_FILL, 5,0);
 493         GtkWidget *scale = gtk_hscale_new_with_range(ISO_MIN, ISO_MAX, 0.5);
 494         gtk_widget_set_size_request(scale, -1, 26);
 495         gtk_scale_set_value_pos(GTK_SCALE(scale), GTK_POS_LEFT);
 496         gtk_range_set_inverted(GTK_RANGE(scale), TRUE);
 497         gtk_range_set_value(GTK_RANGE(scale), ISO_MAX);
 498         g_signal_connect(scale, "value-changed", G_CALLBACK(_on_iso_changed), level2);
 499         gtk_table_attach(GTK_TABLE(table), scale,
 500                         1,cols+1, rows,rows+1, GTK_FILL|GTK_EXPAND,GTK_FILL, 0,0);
 501         /* Shove all the buttons to the left, but keep the slider expanded */
 502         gtk_table_attach(GTK_TABLE(table), gtk_label_new(""),
 503                         cols,cols+1, 0,1, GTK_FILL|GTK_EXPAND,GTK_FILL, 0,0);
 504         return table;
 505 }
 506
 507 /****************
 508  * GObject code *
 509  ****************/
 510 G_DEFINE_TYPE(AWeatherLevel2, aweather_level2, GRITS_TYPE_OBJECT);
 511 static void aweather_level2_init(AWeatherLevel2 *level2)
 512 {
 513 }
 514 static void aweather_level2_dispose(GObject *_level2)
 515 {
 516         AWeatherLevel2 *level2 = AWEATHER_LEVEL2(_level2);
 517         g_debug("AWeatherLevel2: dispose - %p", _level2);
 518         if (level2->volume) {
 519                 grits_viewer_remove(GRITS_OBJECT(level2->volume)->viewer,
 520                                 GRITS_OBJECT(level2->volume));
 521                 level2->volume = NULL;
 522         }
 523         G_OBJECT_CLASS(aweather_level2_parent_class)->dispose(_level2);
 524 }
 525 static void aweather_level2_finalize(GObject *_level2)
 526 {
 527         AWeatherLevel2 *level2 = AWEATHER_LEVEL2(_level2);
 528         g_debug("AWeatherLevel2: finalize - %p", _level2);
 529         RSL_free_radar(level2->radar);
 530         if (level2->sweep_tex)
 531                 glDeleteTextures(1, &level2->sweep_tex);
 532         G_OBJECT_CLASS(aweather_level2_parent_class)->finalize(_level2);
 533 }
 534 static void aweather_level2_class_init(AWeatherLevel2Class *klass)
 535 {
 536         G_OBJECT_CLASS(klass)->dispose  = aweather_level2_dispose;
 537         G_OBJECT_CLASS(klass)->finalize = aweather_level2_finalize;
 538         GRITS_OBJECT_CLASS(klass)->draw = aweather_level2_draw;
 539         GRITS_OBJECT_CLASS(klass)->hide = aweather_level2_hide;
 540 }