Logo Search packages:      
Sourcecode: ardour version File versions  Download package

canvas-waveview.c

/*
    Copyright (C) 2000-2002 Paul Davis 

    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

    $Id: canvas-waveview.c,v 1.49 2005/07/31 20:41:21 pauld Exp $
*/

#include <stdio.h>
#include <math.h>
#include <gtk-canvas.h>
#include <string.h>
#include <limits.h>

#include <ardour/dB.h>

#include "canvas-waveview.h"
#include "rgb_macros.h"

enum {
      ARG_0,
      ARG_DATA_SRC,
      ARG_CHANNEL,
      ARG_LENGTH_FUNCTION,
      ARG_PEAK_FUNCTION,
      ARG_GAIN_FUNCTION,
      ARG_GAIN_SRC,
      ARG_CACHE,
      ARG_CACHE_UPDATER,
      ARG_SAMPLES_PER_PIXEL,
      ARG_AMPLITUDE_ABOVE_AXIS,
      ARG_X,
      ARG_Y,
      ARG_HEIGHT,
      ARG_WAVE_COLOR,
      ARG_RECTIFIED,
      ARG_SOURCEFILE_LENGTH_FUNCTION,
      ARG_REGION_START
};

static void gtk_canvas_waveview_class_init (GtkCanvasWaveViewClass *class);
static void gtk_canvas_waveview_init       (GtkCanvasWaveView      *waveview);
static void gtk_canvas_waveview_set_arg    (GtkObject              *object,
                                    GtkArg                 *arg,
                                    guint                   arg_id);
static void gtk_canvas_waveview_get_arg    (GtkObject              *object,
                                    GtkArg                 *arg,
                                    guint                   arg_id);

static void   gtk_canvas_waveview_update      (GtkCanvasItem *item, double *affine, ArtSVP *clip_path, int flags);
static void   gtk_canvas_waveview_bounds      (GtkCanvasItem *item, double *x1, double *y1, double *x2, double *y2);
static double gtk_canvas_waveview_point (GtkCanvasItem *item, double x, double y, int cx, int cy, GtkCanvasItem **actual_item);

static void gtk_canvas_waveview_render (GtkCanvasItem *item, GtkCanvasBuf *buf);
static void gtk_canvas_waveview_draw (GtkCanvasItem *item, GdkDrawable *drawable, int x, int y, int w, int h);

static void gtk_canvas_waveview_set_data_src      (GtkCanvasWaveView *, void *);
static void gtk_canvas_waveview_set_channel      (GtkCanvasWaveView *, guint32);

static gint32 gtk_canvas_waveview_ensure_cache (GtkCanvasWaveView *waveview, gulong start_sample, gulong end_sample);

static GtkCanvasItemClass *parent_class;

GtkType
gtk_canvas_waveview_get_type (void)
{
      static GtkType waveview_type = 0;

      if (!waveview_type) {
            GtkTypeInfo waveview_info = {
                  "GtkCanvasWaveView",
                  sizeof (GtkCanvasWaveView),
                  sizeof (GtkCanvasWaveViewClass),
                  (GtkClassInitFunc) gtk_canvas_waveview_class_init,
                  (GtkObjectInitFunc) gtk_canvas_waveview_init,
                  NULL, /* reserved_1 */
                  NULL, /* reserved_2 */
                  (GtkClassInitFunc) NULL
            };

            waveview_type = gtk_type_unique (gtk_canvas_item_get_type (), &waveview_info);
      }

      return waveview_type;
}

static void
gtk_canvas_waveview_class_init (GtkCanvasWaveViewClass *class)
{
      GtkObjectClass *object_class;
      GtkCanvasItemClass *item_class;

      object_class = (GtkObjectClass *) class;
      item_class = (GtkCanvasItemClass *) class;

      parent_class = gtk_type_class (gtk_canvas_item_get_type ());

      gtk_object_add_arg_type ("GtkCanvasWaveView::data_src", GTK_TYPE_POINTER, GTK_ARG_READWRITE, ARG_DATA_SRC);
      gtk_object_add_arg_type ("GtkCanvasWaveView::channel", GTK_TYPE_POINTER, GTK_ARG_READWRITE, ARG_CHANNEL);
      gtk_object_add_arg_type ("GtkCanvasWaveView::length_function", GTK_TYPE_POINTER, GTK_ARG_READWRITE, ARG_LENGTH_FUNCTION);
      gtk_object_add_arg_type ("GtkCanvasWaveView::sourcefile_length_function", GTK_TYPE_POINTER, GTK_ARG_READWRITE, ARG_SOURCEFILE_LENGTH_FUNCTION);
      gtk_object_add_arg_type ("GtkCanvasWaveView::peak_function", GTK_TYPE_POINTER, GTK_ARG_READWRITE, ARG_PEAK_FUNCTION);
      gtk_object_add_arg_type ("GtkCanvasWaveView::gain_function", GTK_TYPE_POINTER, GTK_ARG_READWRITE, ARG_GAIN_FUNCTION);
      gtk_object_add_arg_type ("GtkCanvasWaveView::gain_src", GTK_TYPE_POINTER, GTK_ARG_READWRITE, ARG_GAIN_SRC);
      gtk_object_add_arg_type ("GtkCanvasWaveView::cache", GTK_TYPE_POINTER, GTK_ARG_READWRITE, ARG_CACHE);
      gtk_object_add_arg_type ("GtkCanvasWaveView::cache_updater", GTK_TYPE_POINTER, GTK_ARG_READWRITE, ARG_CACHE_UPDATER);
      gtk_object_add_arg_type ("GtkCanvasWaveView::samples_per_unit", GTK_TYPE_DOUBLE, GTK_ARG_READWRITE, ARG_SAMPLES_PER_PIXEL);
      gtk_object_add_arg_type ("GtkCanvasWaveView::amplitude_above_axis", GTK_TYPE_DOUBLE, GTK_ARG_READWRITE, ARG_AMPLITUDE_ABOVE_AXIS);
      gtk_object_add_arg_type ("GtkCanvasWaveView::x", GTK_TYPE_DOUBLE, GTK_ARG_READWRITE, ARG_X);
      gtk_object_add_arg_type ("GtkCanvasWaveView::y", GTK_TYPE_DOUBLE, GTK_ARG_READWRITE, ARG_Y);
      gtk_object_add_arg_type ("GtkCanvasWaveView::height", GTK_TYPE_DOUBLE, GTK_ARG_READWRITE, ARG_HEIGHT);
      gtk_object_add_arg_type ("GtkCanvasWaveView::wave_color", GTK_TYPE_INT, GTK_ARG_READWRITE, ARG_WAVE_COLOR);
      gtk_object_add_arg_type ("GtkCanvasWaveView::rectified", GTK_TYPE_BOOL, GTK_ARG_READWRITE, ARG_RECTIFIED);
      gtk_object_add_arg_type ("GtkCanvasWaveView::region_start", GTK_TYPE_UINT, GTK_ARG_READWRITE, ARG_REGION_START);

      object_class->set_arg = gtk_canvas_waveview_set_arg;
      object_class->get_arg = gtk_canvas_waveview_get_arg;

      item_class->update = gtk_canvas_waveview_update;
      item_class->bounds = gtk_canvas_waveview_bounds;
      item_class->point = gtk_canvas_waveview_point;
      item_class->render = gtk_canvas_waveview_render;
      item_class->draw = gtk_canvas_waveview_draw;
}

GtkCanvasWaveViewCache*
gtk_canvas_waveview_cache_new ()
{
      GtkCanvasWaveViewCache *c;

      c = g_malloc (sizeof (GtkCanvasWaveViewCache));

      c->allocated = 2048;
      c->data = g_malloc (sizeof (GtkCanvasWaveViewCacheEntry) * c->allocated);
      c->data_size = 0;
      c->start = 0;
      c->end = 0;

      return c;
}

void
gtk_canvas_waveview_cache_destroy (GtkCanvasWaveViewCache* cache)
{
      g_free (cache->data);
      g_free (cache);
}

static void
gtk_canvas_waveview_init (GtkCanvasWaveView *waveview)
{
      waveview->x = 0.0;
      waveview->y = 0.0;
      waveview->cache = 0;
      waveview->cache_updater = FALSE;
      waveview->data_src = NULL;
      waveview->channel = 0;
      waveview->peak_function = NULL;
      waveview->length_function = NULL;
      waveview->sourcefile_length_function = NULL;
      waveview->gain_curve_function = NULL;
      waveview->gain_src = NULL;
      waveview->rectified = FALSE;
      waveview->region_start = 0;
      waveview->samples_per_unit = 1.0;
      waveview->amplitude_above_axis = 1.0;
      waveview->height = 100.0;
      waveview->screen_width = gdk_screen_width ();
      waveview->reload_cache_in_render = FALSE;

      waveview->wave_color = RGBA_TO_UINT(44,35,126,255);

      GTK_CANVAS_ITEM(waveview)->object.flags |= GTK_CANVAS_ITEM_NO_AUTO_REDRAW;
}

#define DEBUG_CACHE 0

static gint32
gtk_canvas_waveview_ensure_cache (GtkCanvasWaveView *waveview, gulong start_sample, gulong end_sample)
{
      gulong required_cache_entries;
      gulong rf1, rf2,rf3, required_frames;
      gulong new_cache_start, new_cache_end;
      gulong half_width;
      gulong npeaks;
      gulong offset;
      gulong ostart;
      gulong present_frames;
      gulong present_entries;
      gulong copied;
      GtkCanvasWaveViewCache *cache;
      float* gain;

      cache = waveview->cache;

      start_sample = start_sample + waveview->region_start;
      end_sample = end_sample + waveview->region_start;
#if DEBUG_CACHE
      // printf("waveview->region_start == %lu\n",waveview->region_start);
      printf ("=> 0x%x cache @ 0x%x range: %lu - %lu request: %lu - %lu (%lu frames)\n", 
            waveview, cache,
            cache->start, cache->end,
            start_sample, end_sample, end_sample - start_sample);
#endif
            
      if (cache->start <= start_sample && cache->end >= end_sample) {
#if DEBUG_CACHE
            // printf ("0x%x: cache hit for %lu-%lu (cache holds: %lu-%lu\n",
            // waveview, start_sample, end_sample, cache->start, cache->end);
#endif
            goto out;
      }

      /* make sure the cache is at least twice as wide as the screen width, and put the start sample
         in the middle, ensuring that we cover the end_sample. 
      */

      /* Note the assumption that we have a 1:1 units:pixel ratio for the canvas. Its everywhere ... */
      
      half_width = (gulong) floor ((waveview->screen_width * waveview->samples_per_unit)/2.0 + 0.5);
      
      if (start_sample < half_width) {
            new_cache_start = 0;
      } else {
            new_cache_start = start_sample - half_width;
      }

      /* figure out how many frames we want */

      rf1 = end_sample - start_sample + 1;
      rf2 = (gulong) floor ((waveview->screen_width * waveview->samples_per_unit * 2.0f));
      required_frames = MAX(rf1,rf2);

      /* but make sure it doesn't extend beyond the end of the source material */

      rf3 = (gulong) (waveview->sourcefile_length_function (waveview->data_src)) + 1;
      rf3 -= new_cache_start;

#if DEBUG_CACHE
      fprintf (stderr, "\n\nAVAILABLE FRAMES = %lu of %lu, start = %lu, sstart = %lu, cstart = %lu\n", 
             rf3, waveview->sourcefile_length_function (waveview->data_src),
             waveview->region_start, start_sample, new_cache_start);
#endif

      required_frames = MIN(required_frames,rf3);

      new_cache_end = new_cache_start + required_frames - 1;

      required_cache_entries = (gulong) floor (required_frames / waveview->samples_per_unit );

#if DEBUG_CACHE
      fprintf (stderr, "new cache = %lu - %lu\n", new_cache_start, new_cache_end);
      fprintf(stderr,"required_cach_entries = %lu, samples_per_unit = %f\n",
            required_cache_entries,waveview->samples_per_unit);
#endif

      if (required_cache_entries > cache->allocated) {
            cache->data = g_realloc (cache->data, sizeof (GtkCanvasWaveViewCacheEntry) * required_cache_entries);
            cache->allocated = required_cache_entries;
            // cache->start = 0;
            // cache->end = 0;
      }

      ostart = new_cache_start;

#undef CACHE_MEMMOVE_OPTIMIZATION
#ifdef CACHE_MEMMOVE_OPTIMIZATION
      
      /* data is not entirely in the cache, so go fetch it, making sure to fill the cache */

      /* some of the required cache entries are in the cache, but in the wrong
         locations. use memmove to fix this.
      */

      if (cache->start < new_cache_start && new_cache_start < cache->end) {
            
            /* case one: the common area is at the end of the existing cache. move it 
               to the beginning of the cache, and set up to refill whatever remains.
               
               
                     wv->cache_start                                        wv->cache_end
                     |-------------------------------------------------------| cache
                                                         |--------------------------------| requested
                                                         <------------------->
                                                               "present"
                                                      new_cache_start                      new_cache_end       
            */
                        

            present_frames = cache->end - new_cache_start;
            present_entries = (gulong) floor (present_frames / waveview->samples_per_unit);

#if DEBUG_CACHE         
            fprintf (stderr, "existing material at end of current cache, move to start of new cache\n"
                   "\tcopy from %lu to start\n", cache->data_size - present_entries);
#endif

            memmove (&cache->data[0],
                   &cache->data[cache->data_size - present_entries],
                   present_entries * sizeof (GtkCanvasWaveViewCacheEntry));
            
#if DEBUG_CACHE
            fprintf (stderr, "satisfied %lu of %lu frames, offset = %lu, will start at %lu (ptr = 0x%x)\n",
                   present_frames, required_frames, present_entries, new_cache_start + present_entries,
                   cache->data + present_entries);
#endif

            copied = present_entries;
            offset = present_entries;
            new_cache_start += present_frames;
            required_frames -= present_frames;

      } else if (new_cache_end > cache->start && new_cache_end < cache->end) {

            /* case two: the common area lives at the beginning of the existing cache. 
               
                                            wv->cache_start                                      wv->cache_end
                                       |-----------------------------------------------------|
                              |--------------------------------|
                                             <----------------->
                                      "present"

                             new_cache_start                      new_cache_end
            */
            
            present_frames = new_cache_end - cache->start;
            present_entries = (gulong) floor (present_frames / waveview->samples_per_unit);

            memmove (&cache->data[cache->data_size - present_entries],
                   &cache->data[0],
                   present_entries * sizeof (GtkCanvasWaveViewCacheEntry));
            
#if DEBUG_CACHE         
            fprintf (stderr, "existing material at start of current cache, move to start of end cache\n");
#endif

#if DEBUG_CACHE
            fprintf (stderr, "satisfied %lu of %lu frames, offset = %lu, will start at %lu (ptr = 0x%x)\n",
                   present_entries, required_frames, present_entries, new_cache_start + present_entries,
                   cache->data + present_entries);
#endif

            copied = present_entries;
            offset = 0;
            required_frames -= present_frames;

            
      } else {
            copied = 0;
            offset = 0;

      }

#else
      copied = 0;
      offset = 0;

#endif /* CACHE_MEMMOVE_OPTIMIZATION */

//    fprintf(stderr,"length == %lu\n",waveview->length_function (waveview->data_src));
//    required_frames = MIN (waveview->length_function (waveview->data_src) - new_cache_start, required_frames);
      npeaks = (gulong) floor (required_frames / waveview->samples_per_unit);
      npeaks = MAX (1, npeaks);
      required_frames = npeaks * waveview->samples_per_unit;

#if DEBUG_CACHE


      printf ("requesting %lu/%f to cover %lu-%lu at %f spu (request was %lu-%lu) into cache + %lu\n",
            required_frames, required_frames/waveview->samples_per_unit, new_cache_start, new_cache_end,
            waveview->samples_per_unit, start_sample, end_sample, offset);
#endif

#if DEBUG_CACHE
//    printf ("cache holds %lu entries, requesting %lu to cover %lu-%lu (request was %lu-%lu)\n",
//          cache->data_size, npeaks, new_cache_start, new_cache_end,
//          start_sample, end_sample);
#endif

      waveview->peak_function (waveview->data_src, npeaks, new_cache_start, required_frames, cache->data + offset, waveview->channel,waveview->samples_per_unit);

      /* take into account any copied peaks */

      npeaks += copied;

      if (npeaks < cache->allocated) {
#if DEBUG_CACHE
            fprintf (stderr, "zero fill cache for %lu at %lu\n", cache->allocated - npeaks, npeaks);
#endif
            memset (&cache->data[npeaks], 0, sizeof (GtkCanvasWaveViewCacheEntry) * (cache->allocated - npeaks));
            cache->data_size = npeaks;
      } else {
            cache->data_size = cache->allocated;
      }

      if (waveview->gain_curve_function) {
            guint32 n;

            gain = (float*) malloc (sizeof (float) * cache->data_size);

            waveview->gain_curve_function (waveview->gain_src, new_cache_start, new_cache_end, gain, cache->data_size);

            for (n = 0; n < cache->data_size; ++n) {
                  cache->data[n].min *= gain[n];
                  cache->data[n].max *= gain[n];
            }

            free (gain);
      
      }
      
      cache->start = ostart;
      cache->end = new_cache_end;

  out:
#if DEBUG_CACHE
      fprintf (stderr, "return cache index = %d\n", 
             (gint32) floor ((((double) (start_sample - cache->start)) / waveview->samples_per_unit) + 0.5));
#endif
      return (gint32) floor ((((double) (start_sample - cache->start)) / waveview->samples_per_unit) + 0.5);

}

void
gtk_canvas_waveview_set_data_src (GtkCanvasWaveView *waveview, void *data_src)
{

      if (waveview->cache_updater) {
            if (waveview->data_src == data_src) {
                  waveview->reload_cache_in_render = TRUE;
                  return;
            }
      
            waveview->cache->start  = 0;
            waveview->cache->end = 0;
      }

      waveview->data_src = data_src;
}

void
gtk_canvas_waveview_set_channel (GtkCanvasWaveView *waveview, guint32 chan)
{
      if (waveview->channel == chan) {
            return;
      }
      
      waveview->channel = chan;
}

static void 
gtk_canvas_waveview_reset_bounds (GtkCanvasItem *item)

{
      double x1, x2, y1, y2;
      ArtPoint i1, i2;
      ArtPoint w1, w2;
      int Ix1, Ix2, Iy1, Iy2;
      double i2w[6];

      gtk_canvas_waveview_bounds (item, &x1, &y1, &x2, &y2);

      i1.x = x1;
      i1.y = y1;
      i2.x = x2;
      i2.y = y2;

      gtk_canvas_item_i2w_affine (item, i2w);
      art_affine_point (&w1, &i1, i2w);
      art_affine_point (&w2, &i2, i2w);

      Ix1 = (int) rint(w1.x);
      Ix2 = (int) rint(w2.x);
      Iy1 = (int) rint(w1.y);
      Iy2 = (int) rint(w2.y);

      gtk_canvas_update_bbox (item, Ix1, Iy1, Ix2, Iy2);
}

/* 
 * CANVAS CALLBACKS 
 */

static void
gtk_canvas_waveview_set_arg (GtkObject *object, GtkArg *arg, guint arg_id)
{
      GtkCanvasItem *item;
      GtkCanvasWaveView *waveview;
      int redraw;
      int calc_bounds;

      item = GTK_CANVAS_ITEM (object);
      waveview = GTK_CANVAS_WAVEVIEW (object);

      redraw = FALSE;
      calc_bounds = FALSE;

      switch (arg_id) {
      case ARG_DATA_SRC:
            gtk_canvas_waveview_set_data_src (waveview, GTK_VALUE_POINTER(*arg));
            redraw = TRUE;
            break;

      case ARG_CHANNEL:
            gtk_canvas_waveview_set_channel (waveview, GTK_VALUE_UINT(*arg));
            redraw = TRUE;
            break;

      case ARG_LENGTH_FUNCTION:
            waveview->length_function = GTK_VALUE_POINTER(*arg);
            redraw = TRUE;
            break;
      case ARG_SOURCEFILE_LENGTH_FUNCTION:
            waveview->sourcefile_length_function = GTK_VALUE_POINTER(*arg);
            redraw = TRUE;
            break;

      case ARG_PEAK_FUNCTION:
            waveview->peak_function = GTK_VALUE_POINTER(*arg);
            redraw = TRUE;
            break;

      case ARG_GAIN_FUNCTION:
            waveview->gain_curve_function = GTK_VALUE_POINTER(*arg);
            redraw = TRUE;
            break;

      case ARG_GAIN_SRC:
            waveview->gain_src = GTK_VALUE_POINTER(*arg);
            if (waveview->cache_updater) {
                  waveview->cache->start = 0;
                  waveview->cache->end = 0;
            }
            redraw = TRUE;
            calc_bounds = TRUE;
            break;

      case ARG_CACHE:
            waveview->cache = GTK_VALUE_POINTER(*arg);
            redraw = TRUE;
            break;


      case ARG_CACHE_UPDATER:
            waveview->cache_updater = GTK_VALUE_BOOL(*arg);
            redraw = TRUE;
            break;

      case ARG_SAMPLES_PER_PIXEL:
            if ((waveview->samples_per_unit = GTK_VALUE_DOUBLE(*arg)) < 1.0) {
                  waveview->samples_per_unit = 1.0;
            }
            if (waveview->cache_updater) {
                  waveview->cache->start = 0;
                  waveview->cache->end = 0;
            }
            redraw = TRUE;
            calc_bounds = TRUE;
            break;

      case ARG_AMPLITUDE_ABOVE_AXIS:
            waveview->amplitude_above_axis = GTK_VALUE_DOUBLE(*arg);
            redraw = TRUE;
            break;

      case ARG_X:
              if (waveview->x != GTK_VALUE_DOUBLE (*arg)) {
                    waveview->x = GTK_VALUE_DOUBLE (*arg);
                  calc_bounds = TRUE;
            }
            break;

      case ARG_Y:
              if (waveview->y != GTK_VALUE_DOUBLE (*arg)) {
                    waveview->y = GTK_VALUE_DOUBLE (*arg);
                  calc_bounds = TRUE;
            }
            break;

      case ARG_HEIGHT:
              if (waveview->height != fabs (GTK_VALUE_DOUBLE (*arg))) {
                    waveview->height = fabs (GTK_VALUE_DOUBLE (*arg));
                  redraw = TRUE;
            }
            break;

      case ARG_WAVE_COLOR:
            if (waveview->wave_color != GTK_VALUE_INT(*arg)) {
                  waveview->wave_color = GTK_VALUE_INT(*arg);
                  redraw = TRUE;
            }
            break;

      case ARG_RECTIFIED:
            if (waveview->rectified != GTK_VALUE_BOOL(*arg)) {
                  waveview->rectified = GTK_VALUE_BOOL(*arg);
                  redraw = TRUE;
            }
            break;
      case ARG_REGION_START:
            waveview->region_start = GTK_VALUE_UINT(*arg);
            redraw = TRUE;
            calc_bounds = TRUE;
            break;


      default:
            break;
      }

      if (calc_bounds) {
            gtk_canvas_waveview_reset_bounds (item);
      }

      if (redraw) {
            gtk_canvas_item_request_update (item);
      }

}

static void
gtk_canvas_waveview_get_arg (GtkObject *object, GtkArg *arg, guint arg_id)
{
      GtkCanvasWaveView *waveview;

      waveview = GTK_CANVAS_WAVEVIEW (object);

      switch (arg_id) {
      case ARG_DATA_SRC:
            GTK_VALUE_POINTER(*arg) = waveview->data_src;
            break;

      case ARG_CHANNEL:
            GTK_VALUE_UINT(*arg) = waveview->channel;
            break;

      case ARG_LENGTH_FUNCTION:
            GTK_VALUE_POINTER(*arg) = waveview->length_function;
            break;

      case ARG_SOURCEFILE_LENGTH_FUNCTION:
            GTK_VALUE_POINTER(*arg) = waveview->sourcefile_length_function;
            break;

      case ARG_PEAK_FUNCTION:
            GTK_VALUE_POINTER(*arg) = waveview->peak_function;
            break;

      case ARG_GAIN_FUNCTION:
            GTK_VALUE_POINTER(*arg) = waveview->gain_curve_function;
            break;

      case ARG_GAIN_SRC:
            GTK_VALUE_POINTER(*arg) = waveview->gain_src;
            break;

      case ARG_CACHE:
            GTK_VALUE_POINTER(*arg) = waveview->cache;
            break;

      case ARG_CACHE_UPDATER:
            GTK_VALUE_BOOL(*arg) = waveview->cache_updater;
            break;

      case ARG_SAMPLES_PER_PIXEL:
            GTK_VALUE_DOUBLE(*arg) = waveview->samples_per_unit;
            break;

      case ARG_AMPLITUDE_ABOVE_AXIS:
            GTK_VALUE_DOUBLE(*arg) = waveview->amplitude_above_axis;
            break;

      case ARG_X:
            GTK_VALUE_DOUBLE (*arg) = waveview->x;
            break;

      case ARG_Y:
            GTK_VALUE_DOUBLE (*arg) = waveview->y;
            break;

      case ARG_HEIGHT:
            GTK_VALUE_DOUBLE (*arg) = waveview->height;
            break;

      case ARG_WAVE_COLOR:
            GTK_VALUE_INT (*arg) = waveview->wave_color;
            break;

      case ARG_RECTIFIED:
            GTK_VALUE_BOOL (*arg) = waveview->rectified;

      case ARG_REGION_START:
            GTK_VALUE_UINT (*arg) = waveview->region_start;
      default:
            arg->type = GTK_TYPE_INVALID;
            break;
      }
}

static void
gtk_canvas_waveview_update (GtkCanvasItem *item, double *affine, ArtSVP *clip_path, int flags)
{
      GtkCanvasWaveView *waveview;
      double x, y;

      waveview = GTK_CANVAS_WAVEVIEW (item);

//    check_cache (waveview, "start of update");

      if (parent_class->update)
            (* parent_class->update) (item, affine, clip_path, flags);

      gtk_canvas_waveview_reset_bounds (item);

      /* get the canvas coordinates of the view. Do NOT use affines
         for this, because they do not round to the integer units used
         by the canvas, resulting in subtle pixel-level errors later.
      */

      x = waveview->x;
      y = waveview->y;

      gtk_canvas_item_i2w (item, &x, &y);
      gtk_canvas_w2c (GTK_CANVAS(item->canvas), x, y, &waveview->bbox_ulx, &waveview->bbox_uly);

      waveview->samples = waveview->length_function (waveview->data_src);

      x = waveview->x + (waveview->samples / waveview->samples_per_unit);
      y = waveview->y + waveview->height;

      gtk_canvas_item_i2w (item, &x, &y);
      gtk_canvas_w2c (GTK_CANVAS(item->canvas), x, y, &waveview->bbox_lrx, &waveview->bbox_lry);

      /* cache the half-height and the end point in canvas units */

      waveview->half_height = waveview->height / 2.0;

      /* parse the color */

      UINT_TO_RGBA (waveview->wave_color, &waveview->wave_r, &waveview->wave_g, &waveview->wave_b,
                  &waveview->wave_a);

//    check_cache (waveview, "end of update");
}

static void
gtk_canvas_waveview_render (GtkCanvasItem *item,
                      GtkCanvasBuf *buf)
{
      GtkCanvasWaveView *waveview;
      gulong s1, s2;
      int clip_length = 0;
      int pymin, pymax;
      int cache_index;
      double half_height;
      int x, end, begin;

      waveview = GTK_CANVAS_WAVEVIEW (item);

//    check_cache (waveview, "start of render");

      if (parent_class->render) {
            (*parent_class->render) (item, buf);
      }

      if (buf->is_bg) {
            gtk_canvas_buf_ensure_buf (buf);
            buf->is_bg = FALSE;
      }

      begin = MAX(waveview->bbox_ulx,buf->rect.x0);

      if (waveview->bbox_lrx >= 0) {
            end = MIN(waveview->bbox_lrx,buf->rect.x1);
      } else {
            end = buf->rect.x1;
      }

      if (begin == end) {
            return;
      }

      s1 = floor ((begin - waveview->bbox_ulx) * waveview->samples_per_unit) ;

      // fprintf (stderr, "0x%x begins at sample %f\n", waveview, waveview->bbox_ulx * waveview->samples_per_unit);

      if (end == waveview->bbox_lrx) {
            /* This avoids minor rounding errors when we have the
               entire region visible.
            */
            s2 = waveview->samples;
      } else {
            s2 = s1 + floor ((end - begin) * waveview->samples_per_unit);
      }

#if 0
      printf ("0x%x r (%d..%d)(%d..%d) bbox (%d..%d)(%d..%d)"
            " b/e %d..%d s= %lu..%lu\n",
            waveview,
            buf->rect.x0,
            buf->rect.x1,
            buf->rect.y0,
            buf->rect.y1,
            waveview->bbox_ulx,
            waveview->bbox_lrx,
            waveview->bbox_uly,
            waveview->bbox_lry,
            begin, end, s1, s2);
#endif

      /* now ensure that the cache is full and properly
         positioned.
      */

//    check_cache (waveview, "pre-ensure");

      if (waveview->cache_updater && waveview->reload_cache_in_render) {
            waveview->cache->start = 0;
            waveview->cache->end = 0;
            waveview->reload_cache_in_render = FALSE;
      }

      cache_index = gtk_canvas_waveview_ensure_cache (waveview, s1, s2);

//    check_cache (waveview, "post-ensure");

      /* 
         Now draw each line, clipping it appropriately. The clipping
         is done by the macros PAINT_FOO().
      */

      half_height = waveview->half_height;

/* this makes it slightly easier to comprehend whats going on */

#define origin half_height

      for (x = begin; x < end; x++) {

            double max, min;
            int clip_max, clip_min;
            
            clip_max = 0;
            clip_min = 0;

            max = waveview->cache->data[cache_index].max;
            min = waveview->cache->data[cache_index].min;
            
            if (max >= 1.0) {
                  max = 1.0;
                  clip_max = 1;
            }

            if (min <= -1.0) {
                  min = -1.0;
                  clip_min = 1;
            }

            /* don't rectify at single-sample zoom */

            if (waveview->rectified && waveview->samples_per_unit > 1) {

                  if (fabs (min) > fabs (max)) {
                        max = fabs (min);
                  } 

                  max = max * waveview->height;

                  pymax = (int) rint ((item->y1 + waveview->height - max) * item->canvas->pixels_per_unit);
                  pymin = (int) rint ((item->y1 + waveview->height) * item->canvas->pixels_per_unit);

            } else {
                  
                  max = max * half_height;
                  min = min * half_height;
                  
                  pymax = (int) rint ((item->y1 + origin - max) * item->canvas->pixels_per_unit);
                  pymin = (int) rint ((item->y1 + origin - min) * item->canvas->pixels_per_unit);
            }

            /* OK, now fill the RGB buffer at x=i with a line between pymin and pymax,
               or, if samples_per_unit == 1, then a dot at each location.
            */

            if (pymax == pymin) {
                  PAINT_DOTA(buf, waveview->wave_r, waveview->wave_g, waveview->wave_b, waveview->wave_a, x, pymin);
            } else {
                  PAINT_VERTA(buf, waveview->wave_r, waveview->wave_g, waveview->wave_b, waveview->wave_a, x, pymax, pymin);
            }
            
            /* show clipped waveforms with small red lines */

            if (clip_max || clip_min) {
                  clip_length = MIN(5,(waveview->height/4));
            }

            if (clip_max) {
                  PAINT_VERT(buf, 255, 0, 0, x, pymax, pymax+clip_length);
            }

            if (clip_min) {
                  PAINT_VERT(buf, 255, 0, 0, x, pymin-clip_length, pymin);
            }

            /* presto, we're done */
            
            cache_index++;
      }

#undef origin

}

static void
gtk_canvas_waveview_draw (GtkCanvasItem *item,
                    GdkDrawable *drawable,
                    int x, int y,
                    int width, int height)
{
      GtkCanvasWaveView *waveview;

      waveview = GTK_CANVAS_WAVEVIEW (item);

      if (parent_class->draw) {
            (* parent_class->draw) (item, drawable, x, y, width, height);
      }

      fprintf (stderr, "please don't use the CanvasWaveView item in a non-aa Canvas\n");
      abort ();
}

static void
gtk_canvas_waveview_bounds (GtkCanvasItem *item, double *x1, double *y1, double *x2, double *y2)
{
      GtkCanvasWaveView *waveview = GTK_CANVAS_WAVEVIEW (item);

      *x1 = waveview->x;
      *y1 = waveview->y;

      *x2 = ceil (*x1 + (waveview->length_function (waveview->data_src) / waveview->samples_per_unit));
      *y2 = *y1 + waveview->height;

#if 0
      x = 0; y = 0;
      gtk_canvas_item_i2w (item, &x, &y);
      gtk_canvas_w2c_d (GTK_CANVAS(item->canvas), x, y, &a, &b);
      x = *x2;
      y = *y2;
      gtk_canvas_item_i2w (item, &x, &y);
      gtk_canvas_w2c_d (GTK_CANVAS(item->canvas), x, y, &c, &d);
      printf ("item bounds now (%g,%g),(%g,%g)\n", a, b, c, d);
#endif            

}

static double
gtk_canvas_waveview_point (GtkCanvasItem *item, double x, double y, int cx, int cy, GtkCanvasItem **actual_item)
{
      /* XXX for now, point is never inside the wave 
      GtkCanvasWaveView *waveview;
      double x1, y1, x2, y2;
      double dx, dy;
      */

      return DBL_MAX;

#if 0
      waveview = GTK_CANVAS_WAVEVIEW (item);

      *actual_item = item;

      /* Find the bounds for the rectangle plus its outline width */

      gtk_canvas_waveview_bounds (item, &x1, &y1, &x2, &y2);

      /* Is point inside rectangle */
      
      if ((x >= x1) && (y >= y1) && (x <= x2) && (y <= y2)) {
            return 0.0;
      }

      /* Point is outside rectangle */

      if (x < x1)
            dx = x1 - x;
      else if (x > x2)
            dx = x - x2;
      else
            dx = 0.0;

      if (y < y1)
            dy = y1 - y;
      else if (y > y2)
            dy = y - y2;
      else
            dy = 0.0;

      return sqrt (dx * dx + dy * dy);
#endif
}


Generated by  Doxygen 1.6.0   Back to index