summaryrefslogtreecommitdiffstats
path: root/plug-ins/common/procedure-browser.c
diff options
context:
space:
mode:
Diffstat (limited to 'plug-ins/common/procedure-browser.c')
-rw-r--r--plug-ins/common/procedure-browser.c147
1 files changed, 147 insertions, 0 deletions
diff --git a/plug-ins/common/procedure-browser.c b/plug-ins/common/procedure-browser.c
new file mode 100644
index 0000000..1651aa4
--- /dev/null
+++ b/plug-ins/common/procedure-browser.c
@@ -0,0 +1,147 @@
+/* GIMP - The GNU Image Manipulation Program
+ * 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/>.
+ */
+
+/*
+ * dbbrowser
+ * 0.08 26th sept 97 by Thomas NOEL <thomas@minet.net>
+ */
+
+/*
+ * This plugin gives you the list of available procedure, with the
+ * name, description and parameters for each procedure.
+ * You can do regexp search (by name and by description)
+ * Useful for scripts development.
+ *
+ * NOTE :
+ * this is only a exercice for me (my first "plug-in" (extension))
+ * so it's very (very) dirty.
+ * Btw, hope it gives you some ideas about gimp possibilities.
+ *
+ * The core of the plugin is not here. See dbbrowser_utils (shared
+ * with script-fu-console).
+ *
+ * TODO
+ * - bug fixes... (my method : rewrite from scratch :)
+ */
+
+#include "config.h"
+
+#include <gtk/gtk.h>
+
+#include <libgimp/gimp.h>
+#include <libgimp/gimpui.h>
+
+#include "libgimp/stdplugins-intl.h"
+
+
+#define PLUG_IN_PROC "plug-in-dbbrowser"
+#define PLUG_IN_BINARY "procedure-browser"
+#define PLUG_IN_ROLE "gimp-procedure-browser"
+
+
+static void query (void);
+static void run (const gchar *name,
+ gint nparams,
+ const GimpParam *param,
+ gint *nreturn_vals,
+ GimpParam **return_vals);
+
+const GimpPlugInInfo PLUG_IN_INFO =
+{
+ NULL, /* init_proc */
+ NULL, /* quit_proc */
+ query, /* query_proc */
+ run, /* run_proc */
+};
+
+
+MAIN ()
+
+static void
+query (void)
+{
+ static const GimpParamDef args[] =
+ {
+ { GIMP_PDB_INT32, "run-mode", "The run mode { RUN-INTERACTIVE (0) }" }
+ };
+
+ gimp_install_procedure (PLUG_IN_PROC,
+ N_("List available procedures in the PDB"),
+ "",
+ "Thomas Noel",
+ "Thomas Noel",
+ "23th june 1997",
+ N_("Procedure _Browser"),
+ "",
+ GIMP_PLUGIN,
+ G_N_ELEMENTS (args), 0,
+ args, NULL);
+
+ gimp_plugin_menu_register (PLUG_IN_PROC, "<Image>/Help/Programming");
+}
+
+static void
+run (const gchar *name,
+ gint nparams,
+ const GimpParam *param,
+ gint *nreturn_vals,
+ GimpParam **return_vals)
+{
+ static GimpParam values[1];
+ GimpRunMode run_mode;
+
+ run_mode = param[0].data.d_int32;
+
+ *nreturn_vals = 1;
+ *return_vals = values;
+
+ values[0].type = GIMP_PDB_STATUS;
+ values[0].data.d_status = GIMP_PDB_SUCCESS;
+
+ INIT_I18N ();
+
+ switch (run_mode)
+ {
+ case GIMP_RUN_INTERACTIVE:
+ {
+ GtkWidget *dialog;
+
+ gimp_ui_init (PLUG_IN_BINARY, FALSE);
+
+ dialog =
+ gimp_proc_browser_dialog_new (_("Procedure Browser"), PLUG_IN_BINARY,
+ gimp_standard_help_func, PLUG_IN_PROC,
+
+ _("_Close"), GTK_RESPONSE_CLOSE,
+
+ NULL);
+
+ gtk_dialog_run (GTK_DIALOG (dialog));
+ gtk_widget_destroy (dialog);
+ }
+ break;
+
+ case GIMP_RUN_WITH_LAST_VALS:
+ case GIMP_RUN_NONINTERACTIVE:
+ g_warning (PLUG_IN_PROC " allows only interactive invocation");
+ values[0].data.d_status = GIMP_PDB_CALLING_ERROR;
+ break;
+
+ default:
+ break;
+ }
+}