summaryrefslogtreecommitdiffstats
path: root/app/propgui/gimppropgui-spiral.c
diff options
context:
space:
mode:
Diffstat (limited to 'app/propgui/gimppropgui-spiral.c')
-rw-r--r--app/propgui/gimppropgui-spiral.c239
1 files changed, 239 insertions, 0 deletions
diff --git a/app/propgui/gimppropgui-spiral.c b/app/propgui/gimppropgui-spiral.c
new file mode 100644
index 0000000..9aaded2
--- /dev/null
+++ b/app/propgui/gimppropgui-spiral.c
@@ -0,0 +1,239 @@
+/* GIMP - The GNU Image Manipulation Program
+ * Copyright (C) 1995-1997 Spencer Kimball and Peter Mattis
+ *
+ * gimppropgui-spiral.c
+ * Copyright (C) 2017 Michael Natterer <mitch@gimp.org>
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program. If not, see <https://www.gnu.org/licenses/>.
+ */
+
+#include "config.h"
+
+#include <gegl.h>
+#include <gtk/gtk.h>
+
+#include "libgimpmath/gimpmath.h"
+#include "libgimpwidgets/gimpwidgets.h"
+
+#include "propgui-types.h"
+
+#include "core/gimpcontext.h"
+
+#include "gimppropgui.h"
+#include "gimppropgui-generic.h"
+#include "gimppropgui-spiral.h"
+
+#include "gimp-intl.h"
+
+
+typedef enum
+{
+ GEGL_SPIRAL_TYPE_LINEAR,
+ GEGL_SPIRAL_TYPE_LOGARITHMIC
+} GeglSpiralType;
+
+
+static void
+slider_line_callback (GObject *config,
+ GeglRectangle *area,
+ gdouble x1,
+ gdouble y1,
+ gdouble x2,
+ gdouble y2,
+ const GimpControllerSlider *sliders,
+ gint n_sliders)
+{
+ GeglSpiralType type;
+ gdouble x, y;
+ gdouble radius;
+ gdouble rotation;
+ gdouble base;
+ gdouble balance;
+
+ g_object_set_data_full (G_OBJECT (config), "area",
+ g_memdup (area, sizeof (GeglRectangle)),
+ (GDestroyNotify) g_free);
+
+ g_object_get (config,
+ "type", &type,
+ "base", &base,
+ "balance", &balance,
+ NULL);
+
+ x = x1 / area->width;
+ y = y1 / area->height;
+ radius = sqrt (SQR (x2 - x1) + SQR (y2 - y1));
+ rotation = atan2 (-(y2 - y1), x2 - x1) * 180 / G_PI;
+
+ if (rotation < 0)
+ rotation += 360.0;
+
+ switch (type)
+ {
+ case GEGL_SPIRAL_TYPE_LINEAR:
+ balance = 3.0 - 4.0 * sliders[0].value;
+
+ break;
+
+ case GEGL_SPIRAL_TYPE_LOGARITHMIC:
+ {
+ gdouble old_base = base;
+
+ base = 1.0 / sliders[1].value;
+ base = MIN (base, 1000000.0);
+
+ /* keep "balance" fixed when changing "base", or when "base" is 1, in
+ * which case there's no inverse mapping for the slider value, and we
+ * can get NaN.
+ */
+ if (base == old_base && base > 1.0)
+ {
+ balance = -4.0 * log (sliders[0].value) / log (base) - 1.0;
+ balance = CLAMP (balance, -1.0, 1.0);
+ }
+ }
+ break;
+ }
+
+ g_object_set (config,
+ "x", x,
+ "y", y,
+ "radius", radius,
+ "base", base,
+ "rotation", rotation,
+ "balance", balance,
+ NULL);
+}
+
+static void
+config_notify (GObject *config,
+ const GParamSpec *pspec,
+ gpointer set_data)
+{
+ GimpControllerSliderLineCallback set_func;
+ GeglRectangle *area;
+ GeglSpiralType type;
+ gdouble x, y;
+ gdouble radius;
+ gdouble rotation;
+ gdouble base;
+ gdouble balance;
+ gdouble x1, y1, x2, y2;
+ GimpControllerSlider sliders[2];
+ gint n_sliders = 0;
+
+ set_func = g_object_get_data (G_OBJECT (config), "set-func");
+ area = g_object_get_data (G_OBJECT (config), "area");
+
+ g_object_get (config,
+ "type", &type,
+ "x", &x,
+ "y", &y,
+ "radius", &radius,
+ "rotation", &rotation,
+ "base", &base,
+ "balance", &balance,
+ NULL);
+
+ x1 = x * area->width;
+ y1 = y * area->height;
+ x2 = x1 + cos (rotation * (G_PI / 180.0)) * radius;
+ y2 = y1 - sin (rotation * (G_PI / 180.0)) * radius;
+
+ switch (type)
+ {
+ case GEGL_SPIRAL_TYPE_LINEAR:
+ n_sliders = 1;
+
+ /* balance */
+ sliders[0] = GIMP_CONTROLLER_SLIDER_DEFAULT;
+ sliders[0].min = 0.5;
+ sliders[0].max = 1.0;
+ sliders[0].value = 0.5 + (1.0 - balance) / 4.0;
+
+ break;
+
+ case GEGL_SPIRAL_TYPE_LOGARITHMIC:
+ n_sliders = 2;
+
+ /* balance */
+ sliders[0] = GIMP_CONTROLLER_SLIDER_DEFAULT;
+ sliders[0].min = 1.0 / sqrt (base);
+ sliders[0].max = 1.0;
+ sliders[0].value = pow (base, -(balance + 1.0) / 4.0);
+
+ /* base */
+ sliders[1] = GIMP_CONTROLLER_SLIDER_DEFAULT;
+ sliders[1].min = 0.0;
+ sliders[1].max = 1.0;
+ sliders[1].value = 1.0 / base;
+
+ break;
+ }
+
+ set_func (set_data, area, x1, y1, x2, y2, sliders, n_sliders);
+}
+
+GtkWidget *
+_gimp_prop_gui_new_spiral (GObject *config,
+ GParamSpec **param_specs,
+ guint n_param_specs,
+ GeglRectangle *area,
+ GimpContext *context,
+ GimpCreatePickerFunc create_picker_func,
+ GimpCreateControllerFunc create_controller_func,
+ gpointer creator)
+{
+ GtkWidget *vbox;
+
+ g_return_val_if_fail (G_IS_OBJECT (config), NULL);
+ g_return_val_if_fail (param_specs != NULL, NULL);
+ g_return_val_if_fail (n_param_specs > 0, NULL);
+ g_return_val_if_fail (GIMP_IS_CONTEXT (context), NULL);
+
+ vbox = _gimp_prop_gui_new_generic (config,
+ param_specs, n_param_specs,
+ area, context,
+ create_picker_func,
+ create_controller_func,
+ creator);
+
+
+ if (create_controller_func)
+ {
+ GCallback set_func;
+ gpointer set_data;
+
+ set_func = create_controller_func (creator,
+ GIMP_CONTROLLER_TYPE_SLIDER_LINE,
+ _("Spiral: "),
+ (GCallback) slider_line_callback,
+ config,
+ &set_data);
+
+ g_object_set_data (G_OBJECT (config), "set-func", set_func);
+
+ g_object_set_data_full (G_OBJECT (config), "area",
+ g_memdup (area, sizeof (GeglRectangle)),
+ (GDestroyNotify) g_free);
+
+ config_notify (config, NULL, set_data);
+
+ g_signal_connect (config, "notify",
+ G_CALLBACK (config_notify),
+ set_data);
+ }
+
+ return vbox;
+}