PIKApp/app/plug-in/pikapluginprocframe.c

205 lines
6.4 KiB
C

/* 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
*
* pikapluginprocframe.c
*
* 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 <string.h>
#include <gdk-pixbuf/gdk-pixbuf.h>
#include <gegl.h>
#include "libpikabase/pikabase.h"
#include "plug-in-types.h"
#include "core/pikaprogress.h"
#include "pdb/pikapdbcontext.h"
#include "pdb/pikapdberror.h"
#include "pikaplugin.h"
#include "pikaplugin-cleanup.h"
#include "pikaplugin-progress.h"
#include "pikapluginprocedure.h"
#include "pika-intl.h"
/* public functions */
PikaPlugInProcFrame *
pika_plug_in_proc_frame_new (PikaContext *context,
PikaProgress *progress,
PikaPlugInProcedure *procedure)
{
PikaPlugInProcFrame *proc_frame;
g_return_val_if_fail (PIKA_IS_PDB_CONTEXT (context), NULL);
g_return_val_if_fail (progress == NULL || PIKA_IS_PROGRESS (progress), NULL);
g_return_val_if_fail (PIKA_IS_PLUG_IN_PROCEDURE (procedure), NULL);
proc_frame = g_slice_new0 (PikaPlugInProcFrame);
proc_frame->ref_count = 1;
pika_plug_in_proc_frame_init (proc_frame, context, progress, procedure);
return proc_frame;
}
void
pika_plug_in_proc_frame_init (PikaPlugInProcFrame *proc_frame,
PikaContext *context,
PikaProgress *progress,
PikaPlugInProcedure *procedure)
{
g_return_if_fail (proc_frame != NULL);
g_return_if_fail (PIKA_IS_PDB_CONTEXT (context));
g_return_if_fail (progress == NULL || PIKA_IS_PROGRESS (progress));
g_return_if_fail (procedure == NULL ||
PIKA_IS_PLUG_IN_PROCEDURE (procedure));
proc_frame->main_context = g_object_ref (context);
proc_frame->context_stack = NULL;
proc_frame->procedure = procedure ? g_object_ref (PIKA_PROCEDURE (procedure)) : NULL;
proc_frame->main_loop = NULL;
proc_frame->return_vals = NULL;
proc_frame->progress = progress ? g_object_ref (progress) : NULL;
proc_frame->progress_created = FALSE;
proc_frame->progress_cancel_id = 0;
proc_frame->error_handler = PIKA_PDB_ERROR_HANDLER_INTERNAL;
if (progress)
pika_plug_in_progress_attach (progress);
}
void
pika_plug_in_proc_frame_dispose (PikaPlugInProcFrame *proc_frame,
PikaPlugIn *plug_in)
{
g_return_if_fail (proc_frame != NULL);
g_return_if_fail (PIKA_IS_PLUG_IN (plug_in));
if (proc_frame->progress)
{
pika_plug_in_progress_end (plug_in, proc_frame);
g_clear_object (&proc_frame->progress);
}
if (proc_frame->context_stack)
{
g_list_free_full (proc_frame->context_stack,
(GDestroyNotify) g_object_unref);
proc_frame->context_stack = NULL;
}
g_clear_object (&proc_frame->main_context);
g_clear_pointer (&proc_frame->return_vals, pika_value_array_unref);
g_clear_pointer (&proc_frame->main_loop, g_main_loop_unref);
if (proc_frame->image_cleanups || proc_frame->item_cleanups)
pika_plug_in_cleanup (plug_in, proc_frame);
g_clear_object (&proc_frame->procedure);
}
PikaPlugInProcFrame *
pika_plug_in_proc_frame_ref (PikaPlugInProcFrame *proc_frame)
{
g_return_val_if_fail (proc_frame != NULL, NULL);
proc_frame->ref_count++;
return proc_frame;
}
void
pika_plug_in_proc_frame_unref (PikaPlugInProcFrame *proc_frame,
PikaPlugIn *plug_in)
{
g_return_if_fail (proc_frame != NULL);
g_return_if_fail (PIKA_IS_PLUG_IN (plug_in));
proc_frame->ref_count--;
if (proc_frame->ref_count < 1)
{
pika_plug_in_proc_frame_dispose (proc_frame, plug_in);
g_slice_free (PikaPlugInProcFrame, proc_frame);
}
}
PikaValueArray *
pika_plug_in_proc_frame_get_return_values (PikaPlugInProcFrame *proc_frame)
{
PikaValueArray *return_vals;
g_return_val_if_fail (proc_frame != NULL, NULL);
if (proc_frame->return_vals)
{
if (pika_value_array_length (proc_frame->return_vals) >=
proc_frame->procedure->num_values + 1)
{
return_vals = proc_frame->return_vals;
}
else
{
/* Allocate new return values of the correct size. */
return_vals = pika_procedure_get_return_values (proc_frame->procedure,
TRUE, NULL);
/* Copy all of the arguments we can. */
memcpy (pika_value_array_index (return_vals, 0),
pika_value_array_index (proc_frame->return_vals, 0),
sizeof (GValue) *
pika_value_array_length (proc_frame->return_vals));
/* Free the old arguments. */
memset (pika_value_array_index (proc_frame->return_vals, 0), 0,
sizeof (GValue) *
pika_value_array_length (proc_frame->return_vals));
pika_value_array_unref (proc_frame->return_vals);
}
/* We have consumed any saved values, so clear them. */
proc_frame->return_vals = NULL;
}
else
{
PikaProcedure *procedure = proc_frame->procedure;
GError *error;
error = g_error_new (PIKA_PDB_ERROR, PIKA_PDB_ERROR_INVALID_RETURN_VALUE,
_("Procedure '%s' returned no return values"),
pika_object_get_name (procedure));
return_vals = pika_procedure_get_return_values (procedure, FALSE,
error);
g_error_free (error);
}
return return_vals;
}