PIKApp/app/actions/procedure-commands.c

427 lines
13 KiB
C
Raw Permalink Normal View History

2023-09-26 00:35:21 +02:00
/* PIKA - Photo and Image Kooker Application
* a rebranding of The GNU Image Manipulation Program (created with heckimp)
* A derived work which may be trivial. However, any changes may be (C)2023 by Aldercone Studio
*
* Original copyright, applying to most contents (license remains unchanged):
* Copyright (C) 1995 Spencer Kimball and Peter Mattis
*
* 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 "libpikabase/pikabase.h"
#include "actions-types.h"
#include "core/pika.h"
#include "core/pikaimage.h"
#include "core/pikadrawable.h"
#include "core/pikaparamspecs.h"
#include "core/pikaprogress.h"
#include "pdb/pikaprocedure.h"
#include "display/pikadisplay.h"
#include "procedure-commands.h"
static inline gboolean
PIKA_IS_PARAM_SPEC_RUN_MODE (GParamSpec *pspec)
{
return (G_IS_PARAM_SPEC_ENUM (pspec) &&
pspec->value_type == PIKA_TYPE_RUN_MODE);
}
PikaValueArray *
procedure_commands_get_run_mode_arg (PikaProcedure *procedure)
{
PikaValueArray *args;
gint n_args = 0;
args = pika_procedure_get_arguments (procedure);
/* initialize the first argument */
if (pika_value_array_length (args) > n_args &&
PIKA_IS_PARAM_SPEC_RUN_MODE (procedure->args[n_args]))
{
g_value_set_enum (pika_value_array_index (args, n_args),
PIKA_RUN_INTERACTIVE);
n_args++;
}
if (n_args > 0)
pika_value_array_truncate (args, n_args);
return args;
}
PikaValueArray *
procedure_commands_get_data_args (PikaProcedure *procedure,
PikaObject *object)
{
PikaValueArray *args;
gint n_args = 0;
args = pika_procedure_get_arguments (procedure);
/* initialize the first argument */
if (pika_value_array_length (args) > n_args &&
PIKA_IS_PARAM_SPEC_RUN_MODE (procedure->args[n_args]))
{
g_value_set_enum (pika_value_array_index (args, n_args),
PIKA_RUN_INTERACTIVE);
n_args++;
}
if (pika_value_array_length (args) > n_args &&
G_IS_PARAM_SPEC_STRING (procedure->args[n_args]))
{
if (object)
{
g_value_set_string (pika_value_array_index (args, n_args),
pika_object_get_name (object));
n_args++;
}
else
{
g_warning ("Uh-oh, no active data object for the plug-in!");
pika_value_array_unref (args);
return NULL;
}
}
if (n_args > 0)
pika_value_array_truncate (args, n_args);
return args;
}
PikaValueArray *
procedure_commands_get_image_args (PikaProcedure *procedure,
PikaImage *image)
{
PikaValueArray *args;
gint n_args = 0;
args = pika_procedure_get_arguments (procedure);
/* initialize the first argument */
if (pika_value_array_length (args) > n_args &&
PIKA_IS_PARAM_SPEC_RUN_MODE (procedure->args[n_args]))
{
g_value_set_enum (pika_value_array_index (args, n_args),
PIKA_RUN_INTERACTIVE);
n_args++;
}
if (pika_value_array_length (args) > n_args &&
PIKA_IS_PARAM_SPEC_IMAGE (procedure->args[n_args]))
{
if (image)
{
g_value_set_object (pika_value_array_index (args, n_args), image);
n_args++;
}
else
{
g_warning ("Uh-oh, no active image for the plug-in!");
pika_value_array_unref (args);
return NULL;
}
}
if (n_args)
pika_value_array_truncate (args, n_args);
return args;
}
PikaValueArray *
procedure_commands_get_items_args (PikaProcedure *procedure,
PikaImage *image,
GList *items_list)
{
PikaValueArray *args;
gint n_args = 0;
args = pika_procedure_get_arguments (procedure);
/* initialize the first argument */
if (pika_value_array_length (args) > n_args &&
PIKA_IS_PARAM_SPEC_RUN_MODE (procedure->args[n_args]))
{
g_value_set_enum (pika_value_array_index (args, n_args),
PIKA_RUN_INTERACTIVE);
n_args++;
}
if (pika_value_array_length (args) > n_args &&
PIKA_IS_PARAM_SPEC_IMAGE (procedure->args[n_args]))
{
if (image)
{
g_value_set_object (pika_value_array_index (args, n_args), image);
n_args++;
if (pika_value_array_length (args) > n_args &&
PIKA_IS_PARAM_SPEC_ITEM (procedure->args[n_args]))
{
if (items_list)
{
g_printerr ("%s: plug-in procedures expecting a single item are deprecated!\n",
G_STRFUNC);
g_value_set_object (pika_value_array_index (args, n_args),
items_list->data);
n_args++;
}
else
{
g_warning ("Uh-oh, no selected items for the plug-in!");
pika_value_array_unref (args);
return NULL;
}
}
else if (pika_value_array_length (args) > n_args + 1 &&
G_IS_PARAM_SPEC_INT (procedure->args[n_args]) &&
PIKA_IS_PARAM_SPEC_OBJECT_ARRAY (procedure->args[n_args + 1]))
{
PikaItem **items = NULL;
gint n_items;
n_items = g_list_length (items_list);
g_value_set_int (pika_value_array_index (args, n_args++),
n_items);
if (items_list)
{
GList *iter;
gint i;
items = g_new (PikaItem *, n_items);
for (iter = items_list, i = 0; iter; iter = iter->next, i++)
items[i] = iter->data;
}
pika_value_set_object_array (pika_value_array_index (args, n_args++),
PIKA_TYPE_ITEM,
(GObject **) items, n_items);
g_free (items);
}
}
}
if (n_args)
pika_value_array_truncate (args, n_args);
return args;
}
PikaValueArray *
procedure_commands_get_display_args (PikaProcedure *procedure,
PikaDisplay *display,
PikaObject *settings)
{
PikaValueArray *args;
gint n_args = 0;
args = pika_procedure_get_arguments (procedure);
/* initialize the first argument */
if (pika_value_array_length (args) > n_args &&
PIKA_IS_PARAM_SPEC_RUN_MODE (procedure->args[n_args]))
{
g_value_set_enum (pika_value_array_index (args, n_args),
PIKA_RUN_INTERACTIVE);
n_args++;
}
if (pika_value_array_length (args) > n_args &&
PIKA_IS_PARAM_SPEC_DISPLAY (procedure->args[n_args]))
{
if (display)
{
g_value_set_object (pika_value_array_index (args, n_args), display);
n_args++;
}
else
{
g_warning ("Uh-oh, no active display for the plug-in!");
pika_value_array_unref (args);
return NULL;
}
}
if (pika_value_array_length (args) > n_args &&
PIKA_IS_PARAM_SPEC_IMAGE (procedure->args[n_args]))
{
PikaImage *image = display ? pika_display_get_image (display) : NULL;
if (image)
{
GList *drawables_list = pika_image_get_selected_drawables (image);
g_value_set_object (pika_value_array_index (args, n_args), image);
n_args++;
if (pika_value_array_length (args) > n_args &&
PIKA_IS_PARAM_SPEC_DRAWABLE (procedure->args[n_args]))
{
if (drawables_list)
{
g_printerr ("%s: plug-in procedures expecting a single drawable are deprecated!\n",
G_STRFUNC);
g_value_set_object (pika_value_array_index (args, n_args),
drawables_list->data);
n_args++;
}
else
{
g_warning ("Uh-oh, no selected drawables for the plug-in!");
pika_value_array_unref (args);
g_list_free (drawables_list);
return NULL;
}
}
else if (pika_value_array_length (args) > n_args + 1 &&
G_IS_PARAM_SPEC_INT (procedure->args[n_args]) &&
PIKA_IS_PARAM_SPEC_OBJECT_ARRAY (procedure->args[n_args + 1]))
{
PikaDrawable **drawables = NULL;
gint n_drawables;
n_drawables = g_list_length (drawables_list);
g_value_set_int (pika_value_array_index (args, n_args++),
n_drawables);
if (drawables_list)
{
GList *iter;
gint i;
drawables = g_new (PikaDrawable *, n_drawables);
for (iter = drawables_list, i = 0; iter; iter = iter->next, i++)
drawables[i] = iter->data;
}
pika_value_set_object_array (pika_value_array_index (args, n_args++),
PIKA_TYPE_DRAWABLE,
(GObject **) drawables, n_drawables);
g_free (drawables);
}
g_list_free (drawables_list);
}
}
if (pika_value_array_length (args) > n_args &&
g_type_is_a (G_PARAM_SPEC_VALUE_TYPE (procedure->args[n_args]),
PIKA_TYPE_OBJECT))
{
g_value_set_object (pika_value_array_index (args, n_args), settings);
n_args++;
}
if (n_args)
pika_value_array_truncate (args, n_args);
return args;
}
gboolean
procedure_commands_run_procedure (PikaProcedure *procedure,
Pika *pika,
PikaProgress *progress,
PikaValueArray *args)
{
PikaValueArray *return_vals;
GError *error = NULL;
g_return_val_if_fail (PIKA_IS_PROCEDURE (procedure), FALSE);
g_return_val_if_fail (PIKA_IS_PIKA (pika), FALSE);
g_return_val_if_fail (progress == NULL || PIKA_IS_PROGRESS (progress), FALSE);
g_return_val_if_fail (args != NULL, FALSE);
if (pika_value_array_length (args) > 0 &&
PIKA_IS_PARAM_SPEC_RUN_MODE (procedure->args[0]))
g_value_set_enum (pika_value_array_index (args, 0),
PIKA_RUN_NONINTERACTIVE);
return_vals = pika_procedure_execute (procedure, pika,
pika_get_user_context (pika),
progress, args,
&error);
pika_value_array_unref (return_vals);
if (error)
{
pika_message_literal (pika,
G_OBJECT (progress), PIKA_MESSAGE_ERROR,
error->message);
g_clear_error (&error);
return FALSE;
}
return TRUE;
}
gboolean
procedure_commands_run_procedure_async (PikaProcedure *procedure,
Pika *pika,
PikaProgress *progress,
PikaRunMode run_mode,
PikaValueArray *args,
PikaDisplay *display)
{
GError *error = NULL;
g_return_val_if_fail (PIKA_IS_PROCEDURE (procedure), FALSE);
g_return_val_if_fail (PIKA_IS_PIKA (pika), FALSE);
g_return_val_if_fail (progress == NULL || PIKA_IS_PROGRESS (progress), FALSE);
g_return_val_if_fail (display == NULL || PIKA_IS_DISPLAY (display), FALSE);
g_return_val_if_fail (args != NULL, FALSE);
if (pika_value_array_length (args) > 0 &&
PIKA_IS_PARAM_SPEC_RUN_MODE (procedure->args[0]))
g_value_set_enum (pika_value_array_index (args, 0),
run_mode);
pika_procedure_execute_async (procedure, pika,
pika_get_user_context (pika),
progress, args,
display, &error);
if (error)
{
pika_message_literal (pika,
G_OBJECT (progress), PIKA_MESSAGE_ERROR,
error->message);
g_clear_error (&error);
return FALSE;
}
return TRUE;
}