xmms-sid: src/xs_curve.c annotate

annotate src/xs_curve.c @ 554:b37c7f430c3f

author	Matti Hamalainen <ccr@tnsp.org>
date	Mon, 26 Feb 2007 14:46:03 +0000
parents	425da926d310
children	b6c7c26569cc

rev	line source
554 b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	1 /*
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	2 XMMS-SID - SIDPlay input plugin for X MultiMedia System (XMMS)
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	3
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	4 XSCurve, a custom Gtk+ spline widget for representing SIDPlay2/reSID
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	5 filter curves in the configuration GUI. Implementation based heavily
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	6 on GtkCurve from Gtk+ 1.2.10 (C) 1997 David Mosberger.
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	7 Spline formula from reSID 0.16 (C) 2004 Dag Lem.
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	8
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	9 Programmed by Matti 'ccr' Hamalainen <ccr@tnsp.org>
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	10 (C) Copyright 2006-2007 Tecnic Software productions (TNSP)
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	11
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	12 This program is free software; you can redistribute it and/or modify
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	13 it under the terms of the GNU General Public License as published by
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	14 the Free Software Foundation; either version 2 of the License, or
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	15 (at your option) any later version.
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	16
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	17 This program is distributed in the hope that it will be useful,
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	18 but WITHOUT ANY WARRANTY; without even the implied warranty of
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	20 GNU General Public License for more details.
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	21
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	22 You should have received a copy of the GNU General Public License along
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	23 with this program; if not, write to the Free Software Foundation, Inc.,
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	24 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
b37c7f430c3f Copyright header. Matti Hamalainen <ccr@tnsp.org> parents: 545 diff changeset	25 */
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	26 #include <stdlib.h>
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	27 #include <string.h>
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	28 #include <math.h>
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	29 #include <stdio.h>
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	30 #include "xs_curve.h"
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	31 #include <gtk/gtkdrawingarea.h>
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	32 #include <gtk/gtkmain.h>
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	33 #include <gtk/gtksignal.h>
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	34
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	35
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	36 #define RADIUS 3 /* radius of the control points */
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	37 #define RADIUS2 (RADIUS * 2)
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	38 #define MIN_DISTANCE 7 /* min distance between control points */
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	39
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	40
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	41 #define GRAPH_MASK (GDK_EXPOSURE_MASK \| \
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	42 GDK_POINTER_MOTION_MASK \| \
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	43 GDK_POINTER_MOTION_HINT_MASK \| \
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	44 GDK_ENTER_NOTIFY_MASK \| \
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	45 GDK_BUTTON_PRESS_MASK \| \
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	46 GDK_BUTTON_RELEASE_MASK \| \
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	47 GDK_BUTTON1_MOTION_MASK)
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	48
514 982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	49 #define GET_X(i) curve->ctlpoints[i].x
982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	50 #define GET_Y(i) curve->ctlpoints[i].y
982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	51
982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	52
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	53 enum {
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	54 ARG_0,
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	55 ARG_MIN_X,
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	56 ARG_MAX_X,
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	57 ARG_MIN_Y,
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	58 ARG_MAX_Y
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	59 };
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	60
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	61 static GtkDrawingAreaClass *parent_class = NULL;
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	62
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	63 static void xs_curve_class_init(XSCurveClass * class);
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	64 static void xs_curve_init(XSCurve * curve);
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	65 static void xs_curve_set_arg(GtkObject * object, GtkArg * arg, guint arg_id);
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	66 static void xs_curve_get_arg(GtkObject * object, GtkArg * arg, guint arg_id);
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	67 static void xs_curve_finalize(GtkObject * object);
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	68 static gint xs_curve_graph_events(GtkWidget * widget, GdkEvent * event, XSCurve * c);
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	69 static void xs_curve_size_graph(XSCurve * curve);
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	70
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	71
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	72 GtkType xs_curve_get_type(void)
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	73 {
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	74 static GtkType curve_type = 0;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	75
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	76 if (!curve_type) {
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	77 static const GtkTypeInfo curve_info = {
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	78 "XSCurve",
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	79 sizeof(XSCurve),
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	80 sizeof(XSCurveClass),
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	81 (GtkClassInitFunc) xs_curve_class_init,
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	82 (GtkObjectInitFunc) xs_curve_init,
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	83 /* reserved_1 */ NULL,
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	84 /* reserved_2 */ NULL,
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	85 (GtkClassInitFunc) NULL,
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	86 };
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	87
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	88 curve_type = gtk_type_unique(GTK_TYPE_DRAWING_AREA, &curve_info);
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	89 }
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	90 return curve_type;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	91 }
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	92
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	93
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	94 static void xs_curve_class_init(XSCurveClass *class)
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	95 {
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	96 GtkObjectClass *object_class;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	97
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	98 parent_class = gtk_type_class(GTK_TYPE_DRAWING_AREA);
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	99
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	100 object_class = (GtkObjectClass *) class;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	101
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	102 object_class->set_arg = xs_curve_set_arg;
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	103 object_class->get_arg = xs_curve_get_arg;
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	104 object_class->finalize = xs_curve_finalize;
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	105
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	106 gtk_object_add_arg_type("XSCurve::min_x", GTK_TYPE_FLOAT, GTK_ARG_READWRITE, ARG_MIN_X);
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	107 gtk_object_add_arg_type("XSCurve::max_x", GTK_TYPE_FLOAT, GTK_ARG_READWRITE, ARG_MAX_X);
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	108 gtk_object_add_arg_type("XSCurve::min_y", GTK_TYPE_FLOAT, GTK_ARG_READWRITE, ARG_MIN_Y);
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	109 gtk_object_add_arg_type("XSCurve::max_y", GTK_TYPE_FLOAT, GTK_ARG_READWRITE, ARG_MAX_Y);
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	110 }
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	111
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	112
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	113 static void xs_curve_init(XSCurve *curve)
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	114 {
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	115 gint old_mask;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	116
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	117 curve->pixmap = NULL;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	118 curve->height = 0;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	119 curve->grab_point = -1;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	120
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	121 curve->nctlpoints = 0;
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	122 curve->ctlpoints = NULL;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	123
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	124 curve->min_x = 0.0;
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	125 curve->max_x = 2047.0;
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	126 curve->min_y = 0.0;
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	127 curve->max_y = 24000.0;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	128
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	129 old_mask = gtk_widget_get_events(GTK_WIDGET(curve));
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	130 gtk_widget_set_events(GTK_WIDGET(curve), old_mask \| GRAPH_MASK);
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	131 gtk_signal_connect(GTK_OBJECT(curve), "event", (GtkSignalFunc) xs_curve_graph_events, curve);
df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	132 xs_curve_size_graph(curve);
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	133 }
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	134
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	135
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	136 static void xs_curve_set_arg(GtkObject object, GtkArg arg, guint arg_id)
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	137 {
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	138 XSCurve *curve = XS_CURVE(object);
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	139
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	140 switch (arg_id) {
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	141 case ARG_MIN_X:
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	142 xs_curve_set_range(curve, GTK_VALUE_FLOAT(*arg), curve->max_x, curve->min_y, curve->max_y);
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	143 break;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	144 case ARG_MAX_X:
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	145 xs_curve_set_range(curve, curve->min_x, GTK_VALUE_FLOAT(*arg), curve->min_y, curve->max_y);
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	146 break;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	147 case ARG_MIN_Y:
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	148 xs_curve_set_range(curve, curve->min_x, curve->max_x, GTK_VALUE_FLOAT(*arg), curve->max_y);
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	149 break;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	150 case ARG_MAX_Y:
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	151 xs_curve_set_range(curve, curve->min_x, curve->max_x, curve->min_y, GTK_VALUE_FLOAT(*arg));
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	152 break;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	153 }
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	154 }
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	155
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	156
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	157 static void xs_curve_get_arg(GtkObject object, GtkArg arg, guint arg_id)
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	158 {
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	159 XSCurve *curve = XS_CURVE(object);
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	160
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	161 switch (arg_id) {
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	162 case ARG_MIN_X:
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	163 GTK_VALUE_FLOAT(*arg) = curve->min_x;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	164 break;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	165 case ARG_MAX_X:
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	166 GTK_VALUE_FLOAT(*arg) = curve->max_x;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	167 break;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	168 case ARG_MIN_Y:
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	169 GTK_VALUE_FLOAT(*arg) = curve->min_y;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	170 break;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	171 case ARG_MAX_Y:
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	172 GTK_VALUE_FLOAT(*arg) = curve->max_y;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	173 break;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	174 default:
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	175 arg->type = GTK_TYPE_INVALID;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	176 break;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	177 }
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	178 }
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	179
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	180
374 58079c6180a0 More removal of original curve code. Matti Hamalainen <ccr@tnsp.org> parents: 370 diff changeset	181 static int xs_project(gfloat value, gfloat min, gfloat max, int norm)
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	182 {
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	183 return (norm - 1) * ((value - min) / (max - min)) + 0.5;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	184 }
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	185
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	186
374 58079c6180a0 More removal of original curve code. Matti Hamalainen <ccr@tnsp.org> parents: 370 diff changeset	187 static gfloat xs_unproject(gint value, gfloat min, gfloat max, int norm)
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	188 {
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	189 return value / (gfloat) (norm - 1) * (max - min) + min;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	190 }
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	191
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	192
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	193 static inline void xs_cubic_coeff(gfloat x1, gfloat y1,
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	194 gfloat x2, gfloat y2,
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	195 gfloat k1, gfloat k2,
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	196 gfloat a, gfloat b,
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	197 gfloat c, gfloat d)
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	198 {
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	199 gfloat dx = x2 - x1, dy = y2 - y1;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	200
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	201 a = ((k1 + k2) - 2 dy / dx) / (dx * dx);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	202 b = ((k2 - k1) / dx - 3 (x1 + x2) * (*a)) / 2;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	203 c = k1 - (3 x1 * (a) + 2 (b)) x1;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	204 d = y1 - ((x1 (a) + (b)) * x1 + (c)) x1;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	205 }
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	206
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	207
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	208 static void xs_curve_draw(XSCurve *curve, gint width, gint height)
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	209 {
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	210 gfloat res = 10.0f;
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	211 GtkStateType state;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	212 GtkStyle *style;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	213 gint i;
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	214 t_xs_point p0, p1, p2, p3;
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	215
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	216 if (!curve->pixmap)
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	217 return;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	218
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	219 state = GTK_STATE_NORMAL;
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	220 if (!GTK_WIDGET_IS_SENSITIVE(GTK_WIDGET(curve)))
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	221 state = GTK_STATE_INSENSITIVE;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	222
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	223 style = GTK_WIDGET(curve)->style;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	224
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	225 /* Clear the pixmap */
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	226 gtk_paint_flat_box(style, curve->pixmap,
374 58079c6180a0 More removal of original curve code. Matti Hamalainen <ccr@tnsp.org> parents: 370 diff changeset	227 GTK_STATE_NORMAL, GTK_SHADOW_NONE,
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	228 NULL, GTK_WIDGET(curve), "curve_bg",
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	229 0, 0,
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	230 width + RADIUS2,
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	231 height + RADIUS2);
374 58079c6180a0 More removal of original curve code. Matti Hamalainen <ccr@tnsp.org> parents: 370 diff changeset	232
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	233
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	234 /* Draw the grid */
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	235 for (i = 0; i < 5; i++) {
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	236 gdk_draw_line(curve->pixmap, style->dark_gc[state],
374 58079c6180a0 More removal of original curve code. Matti Hamalainen <ccr@tnsp.org> parents: 370 diff changeset	237 RADIUS, i * (height / 4.0) + RADIUS,
58079c6180a0 More removal of original curve code. Matti Hamalainen <ccr@tnsp.org> parents: 370 diff changeset	238 width + RADIUS, i * (height / 4.0) + RADIUS);
58079c6180a0 More removal of original curve code. Matti Hamalainen <ccr@tnsp.org> parents: 370 diff changeset	239
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	240 gdk_draw_line(curve->pixmap, style->dark_gc[state],
374 58079c6180a0 More removal of original curve code. Matti Hamalainen <ccr@tnsp.org> parents: 370 diff changeset	241 i * (width / 4.0) + RADIUS, RADIUS,
58079c6180a0 More removal of original curve code. Matti Hamalainen <ccr@tnsp.org> parents: 370 diff changeset	242 i * (width / 4.0) + RADIUS, height + RADIUS);
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	243 }
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	244
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	245 #define Qprintf(x,y,...)
520 81481e59e195 Almost working. Matti Hamalainen <ccr@tnsp.org> parents: 514 diff changeset	246
81481e59e195 Almost working. Matti Hamalainen <ccr@tnsp.org> parents: 514 diff changeset	247 #if 1
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	248 /* Draw the spline/curve itself */
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	249 p0 = curve->ctlpoints;
520 81481e59e195 Almost working. Matti Hamalainen <ccr@tnsp.org> parents: 514 diff changeset	250 p1 = p0;
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	251 p2 = p1; p2++;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	252 p3 = p2; p3++;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	253
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	254 /* Draw each curve segment */
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	255 Qprintf(stderr, "-- npoints = %d\n", curve->nctlpoints);
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	256 if (curve->nctlpoints > 5)
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	257 for (i = 0; i < curve->nctlpoints; i++, ++p0, ++p1, ++p2, ++p3) {
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	258 gfloat k1, k2, a, b, c, d, x;
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	259
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	260 Qprintf(stderr, "#%d: ", i);
514 982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	261 if (p1->x == p2->x)
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	262 continue;
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	263 #define PPASK(q, p) Qprintf(stderr, q "=[%1.3f, %1.3f] ", p->x, p->y)
514 982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	264
520 81481e59e195 Almost working. Matti Hamalainen <ccr@tnsp.org> parents: 514 diff changeset	265 PPASK("p0", p1);
81481e59e195 Almost working. Matti Hamalainen <ccr@tnsp.org> parents: 514 diff changeset	266 PPASK("p1", p1);
81481e59e195 Almost working. Matti Hamalainen <ccr@tnsp.org> parents: 514 diff changeset	267 PPASK("p2", p2);
81481e59e195 Almost working. Matti Hamalainen <ccr@tnsp.org> parents: 514 diff changeset	268 PPASK("p3", p3);
81481e59e195 Almost working. Matti Hamalainen <ccr@tnsp.org> parents: 514 diff changeset	269
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	270 Qprintf(stderr, "\ncase #");
514 982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	271 if (p0->x == p1->x && p2->x == p3->x) {
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	272 Qprintf(stderr, "1");
514 982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	273 k1 = k2 = (p2->y - p1->y) / (p2->x - p1->x);
982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	274 } else if (p0->x == p1->x) {
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	275 Qprintf(stderr, "2");
514 982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	276 k2 = (p3->y - p1->y) / (p3->x - p1->x);
982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	277 k1 = (3 * (p2->y - p1->y) / (p2->x - p1->x) - k2) / 2;
982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	278 } else if (p2->x == p3->x) {
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	279 Qprintf(stderr, "3");
514 982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	280 k1 = (p2->y - p0->y) / (p2->x - p0->x);
982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	281 k2 = (3 * (p2->y - p1->y) / (p2->x - p1->x) - k1) / 2;
982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	282 } else {
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	283 Qprintf(stderr, "4");
514 982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	284 k1 = (p2->y - p0->y) / (p2->x - p0->x);
982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	285 k2 = (p3->y - p1->y) / (p3->x - p1->x);
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	286 }
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	287
514 982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	288 xs_cubic_coeff(p1->x, p1->y, p2->x, p2->y, k1, k2, &a, &b, &c, &d);
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	289
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	290 Qprintf(stderr, " seg[%1.3f, %1.3f] => [%1.3f, %1.3f] k1=%1.3f, k2=%1.3f\n\n",
520 81481e59e195 Almost working. Matti Hamalainen <ccr@tnsp.org> parents: 514 diff changeset	291 p1->x, p1->y,
81481e59e195 Almost working. Matti Hamalainen <ccr@tnsp.org> parents: 514 diff changeset	292 p2->x, p2->y,
81481e59e195 Almost working. Matti Hamalainen <ccr@tnsp.org> parents: 514 diff changeset	293 k1, k2);
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	294
514 982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	295 for (x = p1->x; x <= p2->x; x += res) {
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	296 gfloat y = ((a * x + b) * x + c) * x + d;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	297 gint qx, qy;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	298 qx = RADIUS + xs_project(x, curve->min_x, curve->max_x, width);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	299 qy = RADIUS + xs_project(y, curve->min_y, curve->max_y, height);
520 81481e59e195 Almost working. Matti Hamalainen <ccr@tnsp.org> parents: 514 diff changeset	300
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	301 gdk_draw_point(curve->pixmap, style->fg_gc[state],
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	302 RADIUS + xs_project(x, curve->min_x, curve->max_x, width),
514 982cec405ef0 Cleaned up the drawing function a bit. Matti Hamalainen <ccr@tnsp.org> parents: 502 diff changeset	303 RADIUS + xs_project(y, curve->min_y, curve->max_y, height));
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	304
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	305 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	306 }
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	307
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	308 Qprintf(stderr, "-------\n");
520 81481e59e195 Almost working. Matti Hamalainen <ccr@tnsp.org> parents: 514 diff changeset	309 #endif
81481e59e195 Almost working. Matti Hamalainen <ccr@tnsp.org> parents: 514 diff changeset	310
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	311 /* Draw control points */
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	312 for (i = 0; i < curve->nctlpoints; ++i) {
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	313 gint x, y;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	314
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	315 if (GET_X(i) < curve->min_x \|\| GET_Y(i) < curve->min_y \|\|
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	316 GET_X(i) >= curve->max_x \|\| GET_Y(i) >= curve->max_y)
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	317 continue;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	318
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	319 x = xs_project(GET_X(i), curve->min_x, curve->max_x, width);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	320 y = xs_project(GET_Y(i), curve->min_y, curve->max_y, height);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	321
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	322 gdk_draw_arc(curve->pixmap, style->fg_gc[state], TRUE,
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	323 x, y, RADIUS2, RADIUS2, 0, 360 * 64);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	324 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	325
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	326 /* Draw pixmap in the widget */
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	327 gdk_draw_pixmap(GTK_WIDGET(curve)->window,
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	328 style->fg_gc[state], curve->pixmap,
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	329 0, 0, 0, 0,
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	330 width + RADIUS2,
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	331 height + RADIUS2);
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	332 }
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	333
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	334
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	335 static gint xs_curve_graph_events(GtkWidget widget, GdkEvent event, XSCurve *curve)
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	336 {
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	337 GdkCursorType new_type = curve->cursor_type;
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	338 GdkEventButton *bevent;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	339 GtkWidget *w;
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	340 gint i, width, height, x, y, tx, ty, cx, closest_point = 0, min_x;
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	341 guint distance;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	342
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	343 w = GTK_WIDGET(curve);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	344 width = w->allocation.width - RADIUS2;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	345 height = w->allocation.height - RADIUS2;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	346
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	347 if ((width < 0) \|\| (height < 0))
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	348 return FALSE;
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	349
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	350 /* get the pointer position */
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	351 gdk_window_get_pointer(w->window, &tx, &ty, NULL);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	352 x = CLAMP((tx - RADIUS), 0, width - 1);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	353 y = CLAMP((ty - RADIUS), 0, height - 1);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	354 min_x = curve->min_x;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	355
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	356 distance = ~0U;
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	357 for (i = 0; i < curve->nctlpoints; ++i) {
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	358 cx = xs_project(GET_X(i), min_x, curve->max_x, width);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	359 if ((guint) abs(x - cx) < distance) {
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	360 distance = abs(x - cx);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	361 closest_point = i;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	362 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	363 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	364
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	365 /* Act based on event type */
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	366 switch (event->type) {
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	367 case GDK_CONFIGURE:
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	368 if (curve->pixmap)
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	369 gdk_pixmap_unref(curve->pixmap);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	370 curve->pixmap = 0;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	371
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	372 /* fall through */
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	373
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	374 case GDK_EXPOSE:
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	375 if (!curve->pixmap) {
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	376 curve->pixmap = gdk_pixmap_new(w->window,
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	377 w->allocation.width, w->allocation.height, -1);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	378 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	379 xs_curve_draw(curve, width, height);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	380 break;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	381
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	382 case GDK_BUTTON_PRESS:
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	383 gtk_grab_add(widget);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	384
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	385 bevent = (GdkEventButton *) event;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	386 new_type = GDK_TCROSS;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	387
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	388 if (distance > MIN_DISTANCE) {
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	389 /* insert a new control point */
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	390 if (curve->nctlpoints > 0) {
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	391 cx = xs_project(GET_X(closest_point), min_x, curve->max_x, width);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	392 if (x > cx) closest_point++;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	393 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	394
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	395 curve->nctlpoints++;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	396
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	397 curve->ctlpoints = g_realloc(curve->ctlpoints,
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	398 curve->nctlpoints * sizeof(*curve->ctlpoints));
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	399
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	400 for (i = curve->nctlpoints - 1; i > closest_point; --i) {
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	401 memcpy(curve->ctlpoints + i,
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	402 curve->ctlpoints + i - 1,
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	403 sizeof(*curve->ctlpoints));
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	404 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	405 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	406
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	407 curve->grab_point = closest_point;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	408 GET_X(curve->grab_point) = xs_unproject(x, min_x, curve->max_x, width);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	409 GET_Y(curve->grab_point) = xs_unproject(y, curve->min_y, curve->max_y, height);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	410
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	411 xs_curve_draw(curve, width, height);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	412 break;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	413
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	414 case GDK_BUTTON_RELEASE:
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	415 {
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	416 gint src, dst;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	417
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	418 gtk_grab_remove(widget);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	419
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	420 /* delete inactive points: */
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	421 for (src = dst = 0; src < curve->nctlpoints; ++src) {
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	422 if (GET_X(src) >= min_x) {
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	423 memcpy(curve->ctlpoints + dst,
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	424 curve->ctlpoints + src,
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	425 sizeof(*curve->ctlpoints));
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	426 dst++;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	427 }
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	428 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	429
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	430 if (dst < src) {
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	431 curve->nctlpoints -= (src - dst);
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	432 if (curve->nctlpoints <= 0) {
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	433 curve->nctlpoints = 1;
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	434 GET_X(0) = min_x;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	435 GET_Y(0) = curve->min_y;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	436 xs_curve_draw(curve, width, height);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	437 }
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	438 curve->ctlpoints = g_realloc(curve->ctlpoints,
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	439 curve->nctlpoints * sizeof(*curve->ctlpoints));
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	440 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	441
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	442 new_type = GDK_FLEUR;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	443 curve->grab_point = -1;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	444 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	445 break;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	446
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	447 case GDK_MOTION_NOTIFY:
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	448 if (curve->grab_point == -1) {
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	449 /* if no point is grabbed... */
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	450 if (distance <= MIN_DISTANCE)
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	451 new_type = GDK_FLEUR;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	452 else
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	453 new_type = GDK_TCROSS;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	454 } else {
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	455 gint leftbound, rightbound;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	456
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	457 /* drag the grabbed point */
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	458 new_type = GDK_TCROSS;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	459
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	460 leftbound = -MIN_DISTANCE;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	461 if (curve->grab_point > 0) {
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	462 leftbound = xs_project(
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	463 GET_X(curve->grab_point-1),
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	464 min_x, curve->max_x, width);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	465 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	466
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	467 rightbound = width + RADIUS2 + MIN_DISTANCE;
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	468 if (curve->grab_point + 1 < curve->nctlpoints) {
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	469 rightbound = xs_project(
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	470 GET_X(curve->grab_point+1),
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	471 min_x, curve->max_x, width);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	472 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	473
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	474 if ((tx <= leftbound) \|\| (tx >= rightbound) \|\|
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	475 (ty > height + RADIUS2 + MIN_DISTANCE) \|\| (ty < -MIN_DISTANCE)) {
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	476 GET_X(curve->grab_point) = min_x - 1.0;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	477 } else {
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	478 GET_X(curve->grab_point) =
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	479 xs_unproject(x, min_x, curve->max_x, width);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	480 GET_Y(curve->grab_point) =
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	481 xs_unproject(y, curve->min_y, curve->max_y, height);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	482 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	483
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	484 xs_curve_draw(curve, width, height);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	485 }
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	486
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	487 /* See if cursor type was changed and update accordingly */
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	488 if (new_type != (GdkCursorType) curve->cursor_type) {
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	489 GdkCursor *cursor;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	490 curve->cursor_type = new_type;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	491 cursor = gdk_cursor_new(curve->cursor_type);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	492 gdk_window_set_cursor(w->window, cursor);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	493 gdk_cursor_destroy(cursor);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	494 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	495 break;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	496
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	497 default:
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	498 break;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	499 }
374 58079c6180a0 More removal of original curve code. Matti Hamalainen <ccr@tnsp.org> parents: 370 diff changeset	500
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	501 return FALSE;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	502 }
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	503
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	504
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	505 static void xs_curve_size_graph(XSCurve *curve)
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	506 {
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	507 gint width, height;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	508 gfloat aspect;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	509
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	510 width = (curve->max_x - curve->min_x) + 1;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	511 height = (curve->max_y - curve->min_y) + 1;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	512 aspect = width / (gfloat) height;
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	513
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	514 if (width > gdk_screen_width() / 4)
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	515 width = gdk_screen_width() / 4;
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	516
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	517 if (height > gdk_screen_height() / 4)
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	518 height = gdk_screen_height() / 4;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	519
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	520 if (aspect < 1.0)
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	521 width = height * aspect;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	522 else
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	523 height = width / aspect;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	524
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	525 gtk_drawing_area_size(GTK_DRAWING_AREA(curve), width + RADIUS2, height + RADIUS2);
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	526 }
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	527
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	528
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	529 static void xs_curve_update(XSCurve *curve)
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	530 {
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	531 if (curve->pixmap) {
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	532 gint width, height;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	533
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	534 width = GTK_WIDGET(curve)->allocation.width - RADIUS2;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	535 height = GTK_WIDGET(curve)->allocation.height - RADIUS2;
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	536 xs_curve_draw(curve, width, height);
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	537 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	538 }
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	539
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	540
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	541 void xs_curve_reset(XSCurve *curve)
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	542 {
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	543 if (curve->ctlpoints)
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	544 g_free(curve->ctlpoints);
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	545
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	546 curve->nctlpoints = 4;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	547 curve->ctlpoints = g_malloc(curve->nctlpoints * sizeof(curve->ctlpoints[0]));
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	548
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	549 GET_X(0) = curve->min_x;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	550 GET_Y(0) = curve->min_y;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	551 GET_X(1) = curve->min_x;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	552 GET_Y(1) = curve->min_y;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	553
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	554 GET_X(2) = curve->max_x;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	555 GET_Y(2) = curve->max_y;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	556 GET_X(3) = curve->max_x;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	557 GET_Y(3) = curve->max_y;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	558
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	559 xs_curve_update(curve);
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	560 }
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	561
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	562
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	563 void xs_curve_set_range(XSCurve *curve, gfloat min_x, gfloat min_y, gfloat max_x, gfloat max_y)
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	564 {
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	565 curve->min_x = min_x;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	566 curve->max_x = max_x;
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	567
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	568 curve->min_y = min_y;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	569 curve->max_y = max_y;
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	570
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	571 xs_curve_size_graph(curve);
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	572 xs_curve_reset(curve);
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	573 }
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	574
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	575
545 425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	576 gboolean xs_curve_realloc_data(XSCurve *curve, gint npoints)
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	577 {
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	578 if (npoints != curve->nctlpoints) {
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	579 curve->nctlpoints = npoints;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	580 curve->ctlpoints = (t_xs_point *) g_realloc(curve->ctlpoints,
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	581 curve->nctlpoints * sizeof(*curve->ctlpoints));
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	582
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	583 if (curve->ctlpoints == NULL)
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	584 return FALSE;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	585 }
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	586
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	587 return TRUE;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	588 }
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	589
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	590
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	591 void xs_curve_get_data(XSCurve curve, t_xs_point points, gint npoints)
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	592 {
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	593 *points = &(curve->ctlpoints);
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	594 *npoints = &(curve->nctlpoints);
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	595 }
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	596
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	597
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	598 gboolean xs_curve_set_points(XSCurve curve, t_xs_int_point points, gint npoints)
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	599 {
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	600 gint i;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	601
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	602 if (!xs_curve_realloc_data(curve, npoints + 4))
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	603 return FALSE;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	604
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	605 GET_X(0) = curve->min_x;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	606 GET_Y(0) = curve->min_y;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	607 GET_X(1) = curve->min_x;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	608 GET_Y(1) = curve->min_y;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	609
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	610 for (i = 0; i < npoints; i++) {
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	611 GET_X(i+2) = points[i].x;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	612 GET_Y(i+2) = points[i].y;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	613 }
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	614
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	615 GET_X(npoints+2) = curve->max_x;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	616 GET_Y(npoints+2) = curve->max_y;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	617 GET_X(npoints+3) = curve->max_x;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	618 GET_Y(npoints+3) = curve->max_y;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	619
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	620 xs_curve_update(curve);
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	621 return TRUE;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	622 }
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	623
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	624
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	625 gboolean xs_curve_get_points(XSCurve curve, t_xs_int_point points, gint npoints)
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	626 {
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	627 gint i, n;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	628
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	629 n = curve->nctlpoints - 4;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	630
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	631 points = g_malloc(n sizeof(t_xs_int_point));
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	632 if (*points == NULL)
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	633 return FALSE;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	634
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	635 *npoints = n;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	636 for (i = 2; i < curve->nctlpoints - 2; i++) {
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	637 (*points)[i].x = GET_X(i);
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	638 (*points)[i].y = GET_Y(i);
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	639 }
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	640
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	641 return TRUE;
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	642 }
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	643
425da926d310 Working on XSCurve widget implementation. Matti Hamalainen <ccr@tnsp.org> parents: 520 diff changeset	644
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	645 GtkWidget *xs_curve_new(void)
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	646 {
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	647 return gtk_type_new(xs_curve_get_type());
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	648 }
4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	649
374 58079c6180a0 More removal of original curve code. Matti Hamalainen <ccr@tnsp.org> parents: 370 diff changeset	650
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	651 static void xs_curve_finalize(GtkObject *object)
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	652 {
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	653 XSCurve *curve;
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	654
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	655 g_return_if_fail(object != NULL);
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	656 g_return_if_fail(XS_IS_CURVE(object));
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	657
370 df6f12a00305 Work on filter curve widget begins, based on GtkCurve widget from Gtk+ 1.2.10. Matti Hamalainen <ccr@tnsp.org> parents: 359 diff changeset	658 curve = XS_CURVE(object);
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	659
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	660 if (curve->pixmap)
b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	661 gdk_pixmap_unref(curve->pixmap);
502 54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	662
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	663 if (curve->ctlpoints)
54d86ee98b98 Alpha/preliminary curve widget code merged. Matti Hamalainen <ccr@tnsp.org> parents: 378 diff changeset	664 g_free(curve->ctlpoints);
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	665
359 b1a858b8cb1a Re-indentation all (non-generated) code. Matti Hamalainen <ccr@tnsp.org> parents: 358 diff changeset	666 (*GTK_OBJECT_CLASS(parent_class)->finalize) (object);
358 4f247b19c9ea Add new files Matti Hamalainen <ccr@tnsp.org> parents: diff changeset	667 }

Mercurial > hg > xmms-sid

annotate src/xs_curve.c @ 554:b37c7f430c3f