16
16
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
19
/* NOTE: This file is autogenerated by pdbgen.pl. */
19
/* NOTE: This file is auto-generated by pdbgen.pl. */
21
21
#include "config.h"
29
#include <sys/types.h>
24
36
#include <glib-object.h>
26
38
#include "libgimpbase/gimpbase.h"
28
40
#include "pdb-types.h"
29
#include "procedural_db.h"
42
#include "gimpprocedure.h"
43
#include "core/gimpparamspecs.h"
31
45
#include "core/gimp.h"
33
static ProcRecord version_proc;
34
static ProcRecord quit_proc;
47
#include "internal_procs.h"
51
version_invoker (GimpProcedure *procedure,
54
GimpProgress *progress,
55
const GValueArray *args)
57
GValueArray *return_vals;
58
gchar *version = NULL;
60
version = g_strdup (GIMP_VERSION);
62
return_vals = gimp_procedure_get_return_values (procedure, TRUE);
63
g_value_take_string (&return_vals->values[1], version);
69
getpid_invoker (GimpProcedure *procedure,
72
GimpProgress *progress,
73
const GValueArray *args)
75
GValueArray *return_vals;
80
return_vals = gimp_procedure_get_return_values (procedure, TRUE);
81
g_value_set_int (&return_vals->values[1], pid);
87
quit_invoker (GimpProcedure *procedure,
90
GimpProgress *progress,
91
const GValueArray *args)
93
gboolean success = TRUE;
96
force = g_value_get_boolean (&args->values[0]);
100
gimp_exit (gimp, force);
103
return gimp_procedure_get_return_values (procedure, success);
37
register_misc_procs (Gimp *gimp)
39
procedural_db_register (gimp, &version_proc);
40
procedural_db_register (gimp, &quit_proc);
44
version_invoker (Gimp *gimp,
46
GimpProgress *progress,
49
Argument *return_args;
51
return_args = procedural_db_return_args (&version_proc, TRUE);
52
return_args[1].value.pdb_pointer = g_strdup (GIMP_VERSION);
57
static ProcArg version_outargs[] =
66
static ProcRecord version_proc =
69
"Returns the host gimp version.",
70
"This procedure returns the version number of the currently running gimp.",
80
{ { version_invoker } }
84
quit_invoker (Gimp *gimp,
86
GimpProgress *progress,
91
force = args[0].value.pdb_int ? TRUE : FALSE;
93
gimp_exit (gimp, force);
95
return procedural_db_return_args (&quit_proc, TRUE);
98
static ProcArg quit_inargs[] =
103
"Flag specifying whether to force the gimp to or exit normally"
107
static ProcRecord quit_proc =
110
"Causes the gimp to exit gracefully.",
111
"The internal procedure which can either be used to make the gimp quit. If there are unsaved images in an interactive GIMP session, the user will be asked for confirmation. If force is TRUE, the application is quit without querying the user to save any dirty images.",
112
"Spencer Kimball & Peter Mattis",
113
"Spencer Kimball & Peter Mattis",
107
register_misc_procs (GimpPDB *pdb)
109
GimpProcedure *procedure;
114
procedure = gimp_procedure_new (version_invoker);
115
gimp_object_set_static_name (GIMP_OBJECT (procedure), "gimp-version");
116
gimp_procedure_set_static_strings (procedure,
118
"Returns the host GIMP version.",
119
"This procedure returns the version number of the currently running GIMP.",
124
gimp_procedure_add_return_value (procedure,
125
gimp_param_spec_string ("version",
127
"GIMP version number",
130
GIMP_PARAM_READWRITE));
131
gimp_pdb_register_procedure (pdb, procedure);
132
g_object_unref (procedure);
137
procedure = gimp_procedure_new (getpid_invoker);
138
gimp_object_set_static_name (GIMP_OBJECT (procedure), "gimp-getpid");
139
gimp_procedure_set_static_strings (procedure,
141
"Returns the PID of the host GIMP process.",
142
"This procedure returns the process ID of the currently running GIMP.",
143
"Michael Natterer <mitch@gimp.org>",
147
gimp_procedure_add_return_value (procedure,
148
gimp_param_spec_int32 ("pid",
151
G_MININT32, G_MAXINT32, 0,
152
GIMP_PARAM_READWRITE));
153
gimp_pdb_register_procedure (pdb, procedure);
154
g_object_unref (procedure);
159
procedure = gimp_procedure_new (quit_invoker);
160
gimp_object_set_static_name (GIMP_OBJECT (procedure), "gimp-quit");
161
gimp_procedure_set_static_strings (procedure,
163
"Causes GIMP to exit gracefully.",
164
"If there are unsaved images in an interactive GIMP session, the user will be asked for confirmation. If force is TRUE, the application is quit without querying the user to save any dirty images.",
165
"Spencer Kimball & Peter Mattis",
166
"Spencer Kimball & Peter Mattis",
169
gimp_procedure_add_argument (procedure,
170
g_param_spec_boolean ("force",
172
"Force GIMP to quit without asking",
174
GIMP_PARAM_READWRITE));
175
gimp_pdb_register_procedure (pdb, procedure);
176
g_object_unref (procedure);