mirror of
https://gitlab.gnome.org/GNOME/gimp
synced 2024-10-22 12:32:37 +00:00
0164596064
2001-07-04 Michael Natterer <mitch@gimp.org> * app/core/Makefile.am * app/core/core-types.h * app/core/gimp.[ch]: added an "application object" called Gimp. Currently, it contains the image list, the clipboard, the data factories, the procedural hashtable and the tool info list. It's the toplevel object of the core object system. Finally, creating a Gimp object will return a standalone gimp core engine instance with no other global states/variables involved. * app/app_procs.[ch]: allocate a "Gimp" instance called "the_gimp" :) Removed stuff which is now done by the "Gimp" object. Merged gimp_init() into app_init() because gimp_init() is taken now. * app/context_manager.[ch]: removed stuff done by "Gimp". * app/batch.[ch] * app/gimage.[ch] * app/xcf/xcf-load.[ch] * app/xcf/xcf.[ch] * app/core/gimpedit.[ch] * app/tools/tool_manager.[ch]: pass around an additional "Gimp" argument. * app/pdb/procedural_db.[ch]: pass a "Gimp" pointer as first parameter to all internal procedures and to all procedural_db_* functions. * app/core/gimpcontext.[ch] * app/core/gimpimage.[ch]: added a "Gimp" pointer to the structs. * app/devices.c * app/errors.c * app/file-open.c * app/file-save.c * app/gimphelp.c * app/gimpunit.c * app/image_new.c * app/main.c * app/nav_window.c * app/plug_in.c * app/base/base.c * app/core/gimpdatafactory.c * app/core/gimpimage-duplicate.c * app/core/gimpimage-mask.c * app/core/gimptoolinfo.[ch] * app/gui/brush-select.c * app/gui/convert-dialog.c * app/gui/dialogs-constructors.c * app/gui/edit-commands.c * app/gui/file-open-dialog.c * app/gui/file-save-dialog.c * app/gui/gradient-editor.c * app/gui/gradient-select.c * app/gui/gui.c * app/gui/image-commands.c * app/gui/info-window.c * app/gui/menus.c * app/gui/palette-editor.c * app/gui/palette-import-dialog.c * app/gui/palette-select.c * app/gui/paths-dialog.c * app/gui/pattern-select.c * app/gui/preferences-dialog.c * app/gui/test-commands.c * app/gui/toolbox.c * app/gui/tools-commands.c * app/tools/gimpbezierselecttool.c * app/tools/gimpbucketfilltool.c * app/tools/gimppainttool.h * app/tools/gimptexttool.c * app/tools/gimptransformtool.h * app/widgets/gimpbufferview.c * app/widgets/gimpcontainerview-utils.c * app/widgets/gimpcursor.c * app/widgets/gimpdnd.c * app/widgets/gimpimagedock.c: changed accordingly. Cleaned up lots of includes. Many files still access the global "the_gimp" variable exported by app_procs.h. * tools/pdbgen/app.pl * tools/pdbgen/pdb/brush_select.pdb * tools/pdbgen/pdb/brushes.pdb * tools/pdbgen/pdb/convert.pdb * tools/pdbgen/pdb/edit.pdb * tools/pdbgen/pdb/fileops.pdb * tools/pdbgen/pdb/gradient_select.pdb * tools/pdbgen/pdb/gradients.pdb * tools/pdbgen/pdb/image.pdb * tools/pdbgen/pdb/palette.pdb * tools/pdbgen/pdb/pattern_select.pdb * tools/pdbgen/pdb/patterns.pdb * tools/pdbgen/pdb/procedural_db.pdb: changed accordingly. Don't use "the_gimp" here because all procedures get passed a "Gimp" pointer now. * app/pdb/*: regenerated.
193 lines
5.1 KiB
Plaintext
193 lines
5.1 KiB
Plaintext
# The GIMP -- an 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 2 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, write to the Free Software
|
|
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
|
|
# "Perlized" from C source by Manish Singh <yosh@gimp.org>
|
|
|
|
sub pdb_misc {
|
|
$author = $copyright = 'Andy Thomas';
|
|
$date = '1998';
|
|
}
|
|
|
|
sub brush_args {(
|
|
{ name => 'opacity', type => 'float',
|
|
desc => 'The initial opacity of the brush' },
|
|
{ name => 'spacing', type => 'int32',
|
|
desc => 'The initial spacing of the brush (if < 0 then use brush default
|
|
spacing)' },
|
|
{ name => 'paint_mode', type => 'enum LayerModeEffects',
|
|
desc => 'The initial paint mode: { %%desc%% }' }
|
|
)}
|
|
|
|
sub brushes_popup {
|
|
$blurb = 'Invokes the Gimp brush selection.';
|
|
|
|
$help = 'This procedure popups the brush selection dialog.';
|
|
|
|
&pdb_misc;
|
|
|
|
@inargs = (
|
|
{ name => 'brush_callback', type => 'string', alias => 'name',
|
|
desc => 'The callback PDB proc to call when brush selection is
|
|
made' },
|
|
{ name => 'popup_title', type => 'string', alias => 'title',
|
|
desc => 'Title to give the brush popup window' },
|
|
{ name => 'initial_brush', type => 'string', alias => 'brush',
|
|
desc => 'The name of the brush to set as the first selected',
|
|
no_success => 1 },
|
|
&brush_args
|
|
);
|
|
|
|
%invoke = (
|
|
vars => [ 'ProcRecord *prec', 'BrushSelect *newdialog' ],
|
|
code => <<'CODE'
|
|
{
|
|
if ((prec = procedural_db_lookup (gimp, name)))
|
|
{
|
|
if (brush && strlen (brush))
|
|
newdialog = brush_select_new (title, brush, opacity, spacing,
|
|
paint_mode);
|
|
else
|
|
newdialog = brush_select_new (title, NULL, 0.0, 0, 0);
|
|
|
|
/* The callback procedure to run when brush changes */
|
|
newdialog->callback_name = g_strdup (name);
|
|
}
|
|
else
|
|
success = FALSE;
|
|
}
|
|
CODE
|
|
);
|
|
}
|
|
|
|
sub brushes_close_popup {
|
|
$blurb = 'Popdown the Gimp brush selection.';
|
|
|
|
$help = 'This procedure closes an opened brush selection dialog.';
|
|
|
|
&pdb_misc;
|
|
|
|
@inargs = (
|
|
{ name => 'brush_callback', type => 'string', alias => 'name',
|
|
desc => 'The name of the callback registered for this popup' }
|
|
);
|
|
|
|
%invoke = (
|
|
vars => [ 'ProcRecord *prec', 'BrushSelect *bsp' ],
|
|
code => <<'CODE'
|
|
{
|
|
if ((prec = procedural_db_lookup (gimp, name)) &&
|
|
(bsp = brush_get_brushselect (name)))
|
|
{
|
|
if (GTK_WIDGET_VISIBLE (bsp->shell))
|
|
gtk_widget_hide (bsp->shell);
|
|
|
|
/* Free memory if poping down dialog which is not the main one */
|
|
if (bsp != brush_select_dialog)
|
|
{
|
|
gtk_widget_destroy (bsp->shell);
|
|
brush_select_free (bsp);
|
|
}
|
|
}
|
|
else
|
|
success = FALSE;
|
|
}
|
|
CODE
|
|
);
|
|
}
|
|
|
|
sub brushes_set_popup {
|
|
$blurb = 'Sets the current brush selection in a popup.';
|
|
|
|
$help = $blurb;
|
|
|
|
&pdb_misc;
|
|
|
|
@inargs = (
|
|
{ name => 'brush_callback', type => 'string', alias => 'name',
|
|
desc => 'The name of the callback registered for this popup' },
|
|
{ name => 'brush_name', type => 'string',
|
|
desc => 'The name of the brush to set as selected' },
|
|
&brush_args
|
|
);
|
|
|
|
%invoke = (
|
|
headers => [ qw("core/gimpbrush.h" "core/gimplist.h"
|
|
"widgets/gimpbrushfactoryview.h") ],
|
|
vars => [ 'ProcRecord *prec', 'BrushSelect *bsp' ],
|
|
code => <<'CODE'
|
|
{
|
|
if ((prec = procedural_db_lookup (gimp, name)) &&
|
|
(bsp = brush_get_brushselect (name)))
|
|
{
|
|
GimpObject *object =
|
|
gimp_container_get_child_by_name (gimp->brush_factory->container,
|
|
brush_name);
|
|
|
|
if (object)
|
|
{
|
|
GimpBrush *active = GIMP_BRUSH (object);
|
|
GtkAdjustment *spacing_adj;
|
|
|
|
spacing_adj = GIMP_BRUSH_FACTORY_VIEW (bsp->view)->spacing_adjustment;
|
|
|
|
/* Updating the context updates the widgets as well */
|
|
|
|
gimp_context_set_brush (bsp->context, active);
|
|
gimp_context_set_opacity (bsp->context, opacity);
|
|
gimp_context_set_paint_mode (bsp->context, paint_mode);
|
|
|
|
gtk_adjustment_set_value (spacing_adj, spacing);
|
|
}
|
|
else
|
|
success = FALSE;
|
|
}
|
|
else
|
|
success = FALSE;
|
|
}
|
|
CODE
|
|
);
|
|
}
|
|
|
|
@headers = qw(<string.h> "core/gimp.h" "core/gimpcontext.h"
|
|
"core/gimpdatafactory.h" "gui/brush-select.h");
|
|
|
|
$extra{app}->{code} = <<'CODE';
|
|
static BrushSelect *
|
|
brush_get_brushselect (gchar *name)
|
|
{
|
|
GSList *list;
|
|
BrushSelect *bsp;
|
|
|
|
for (list = brush_active_dialogs; list; list = g_slist_next (list))
|
|
{
|
|
bsp = (BrushSelect *) list->data;
|
|
|
|
if (bsp->callback_name && !strcmp (name, bsp->callback_name))
|
|
return bsp;
|
|
}
|
|
|
|
return NULL;
|
|
}
|
|
CODE
|
|
|
|
@procs = qw(brushes_popup brushes_close_popup brushes_set_popup);
|
|
%exports = (app => [@procs], lib => [@procs]);
|
|
|
|
$desc = 'Brush UI';
|
|
|
|
1;
|