glade-command.c 76.4 KB
Newer Older
1
2
/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/*
3
 * Copyright (C) 2002 Joaquín Cuenca Abela
4
5
6
7
8
9
10
11
12
13
14
15
16
 *
 * 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
17
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
18
19
 *
 * Authors:
20
 *   Joaquín Cuenca Abela <e98cuenc@yahoo.com>
21
 *   Archit Baweja <bighead@users.sourceforge.net>
22
 */
23
24
25
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
Paolo Borelli's avatar
Paolo Borelli committed
26

27
28
29
30
31
32
33
34
/**
 * SECTION:glade-command
 * @Short_Description: An event filter to implement the Undo/Redo stack.
 *
 * The Glade Command api allows us to view user actions as items and execute 
 * and undo those items; each #GladeProject has its own Undo/Redo stack.
 */

35
36
#include <gtk/gtk.h>
#include <string.h>
37
#include <glib/gi18n-lib.h>
38
#include "glade.h"
39
40
41
#include "glade-project.h"
#include "glade-xml-utils.h"
#include "glade-widget.h"
42
#include "glade-palette.h"
43
44
#include "glade-command.h"
#include "glade-property.h"
Paolo Borelli's avatar
Paolo Borelli committed
45
#include "glade-property-class.h"
46
47
#include "glade-debug.h"
#include "glade-placeholder.h"
48
#include "glade-clipboard.h"
49
#include "glade-signal.h"
50
#include "glade-app.h"
51
#include "glade-fixed.h"
52
#include "glade-name-context.h"
Tristan Van Berkom's avatar
Tristan Van Berkom committed
53
54
55
56
57
58
59

/* Concerning placeholders: we do not hold any reference to placeholders,
 * placeholders that are supplied by the backend are not reffed, placeholders
 * that are created by glade-command are temporarily owned by glade-command
 * untill they are added to a container; in which case it belongs to GTK+
 * and the backend (but I prefer to think of it as the backend).
 */
60
61
62
typedef struct {
	GladeWidget      *widget;
	GladeWidget      *parent;
Tristan Van Berkom's avatar
Tristan Van Berkom committed
63
	GladeProject     *project;
64
	GList            *reffed;
65
	GladePlaceholder *placeholder;
66
	gboolean          props_recorded;
67
	GList            *pack_props;
68
	gchar            *special_type;
69
	gulong            handler_id;
70
} CommandData;
71

72
73
74
75
76
77
78
79
80
81
82
83
84
85
static GObjectClass *parent_class = NULL;

/* Group description used for the current group
 */
static gchar        *gc_group_description = NULL;

/* Use an id to avoid grouping together consecutive groups
 */
static gint          gc_group_id          = 1;

/* Groups can be grouped together, push/pop must balance (duh!)
 */
static gint          gc_group_depth       = 0;

86
87

#define MAKE_TYPE(func, type, parent)			\
88
GType							\
89
90
func ## _get_type (void)				\
{							\
91
	static GType cmd_type = 0;			\
92
							\
93
	if (!cmd_type)					\
94
	{						\
95
		static const GTypeInfo info =		\
96
97
		{					\
			sizeof (type ## Class),		\
98
99
100
101
			(GBaseInitFunc) NULL,		\
			(GBaseFinalizeFunc) NULL,	\
			(GClassInitFunc) func ## _class_init,	\
			(GClassFinalizeFunc) NULL,	\
102
103
104
			NULL,				\
			sizeof (type),			\
			0,				\
105
			(GInstanceInitFunc) NULL	\
106
107
		};					\
							\
108
		cmd_type = g_type_register_static (parent, #type, &info, 0);	\
109
110
	}						\
							\
111
	return cmd_type;				\
112
113
114
115
116
117
118
119
}							\

static void
glade_command_finalize (GObject *obj)
{
        GladeCommand *cmd = (GladeCommand *) obj;
        g_return_if_fail (cmd != NULL);

120
121
	if (cmd->description)
		g_free (cmd->description);
122
123
124
125
126
127

        /* Call the base class dtor */
	(* G_OBJECT_CLASS (parent_class)->finalize) (obj);
}

static gboolean
128
glade_command_unifies_impl (GladeCommand *this_cmd, GladeCommand *other_cmd)
129
130
131
132
133
{
	return FALSE;
}

static void
134
glade_command_collapse_impl (GladeCommand *this_cmd, GladeCommand *other_cmd)
135
136
137
138
139
{
	g_return_if_reached ();
}

static void
140
glade_command_class_init (GladeCommandClass *klass)
141
142
143
{
	GObjectClass* object_class;

144
145
146
	object_class = G_OBJECT_CLASS (klass);
	parent_class = g_type_class_peek_parent (klass);

147
148
	object_class->finalize = glade_command_finalize;

149
150
151
152
	klass->undo            = NULL;
	klass->execute         = NULL;
	klass->unifies         = glade_command_unifies_impl;
	klass->collapse        = glade_command_collapse_impl;
153
154
}

155
156
157
/* compose the _get_type function for GladeCommand */
MAKE_TYPE (glade_command, GladeCommand, G_TYPE_OBJECT)

158
159
160
161
162
163
164
165
166

#define GLADE_MAKE_COMMAND(type, func)					\
static gboolean								\
func ## _undo (GladeCommand *me);					\
static gboolean								\
func ## _execute (GladeCommand *me);					\
static void								\
func ## _finalize (GObject *object);					\
static gboolean								\
167
func ## _unifies (GladeCommand *this_cmd, GladeCommand *other_cmd);		\
168
static void								\
169
func ## _collapse (GladeCommand *this_cmd, GladeCommand *other_cmd);		\
170
171
172
173
174
static void								\
func ## _class_init (gpointer parent_tmp, gpointer notused)		\
{									\
	GladeCommandClass *parent = parent_tmp;				\
	GObjectClass* object_class;					\
175
	object_class = G_OBJECT_CLASS (parent);				\
176
177
	parent->undo =  func ## _undo;					\
	parent->execute =  func ## _execute;				\
178
179
	parent->unifies =  func ## _unifies;				\
	parent->collapse =  func ## _collapse;				\
180
181
182
183
184
	object_class->finalize = func ## _finalize;			\
}									\
typedef struct {							\
	GladeCommandClass cmd;						\
} type ## Class;							\
185
static MAKE_TYPE(func, type, GLADE_TYPE_COMMAND)
186

187

188
189
190
191
192
193
194
195
196
197
/**
 * glade_command_execute:
 * @command: A #GladeCommand
 *
 * Executes @command
 *
 * Returns: whether the command was successfully executed
 */
gboolean
glade_command_execute (GladeCommand *command)
198
{
199
	g_return_val_if_fail (GLADE_IS_COMMAND (command), FALSE);
200
	return GLADE_COMMAND_GET_CLASS (command)->execute (command);
201
202
203
}


204
205
206
207
208
209
/**
 * glade_command_undo:
 * @command: A #GladeCommand
 *
 * Undo the effects of @command
 *
210
 * Returns: whether the command was successfully reversed
211
212
213
 */
gboolean
glade_command_undo (GladeCommand *command)
214
{
215
	g_return_val_if_fail (GLADE_IS_COMMAND (command), FALSE);
216
	return GLADE_COMMAND_GET_CLASS (command)->undo (command);
217
218
}

219
/**
220
221
222
223
224
225
 * glade_command_unifies:
 * @command: A #GladeCommand
 * @other: another #GladeCommand
 *
 * Checks whether @command and @other can be unified
 * to make one single command.
226
 *
227
 * Returns: whether they can be unified.
228
 */
229
230
231
gboolean
glade_command_unifies (GladeCommand *command,
		       GladeCommand *other)
232
{
233
	g_return_val_if_fail (command, FALSE);
234
235
236
237
238
239
240

	/* Cannot unify with a part of a command group.
	 * Unify atomic commands only
	 */
	if (command->group_id != 0 || (other && other->group_id != 0))
		return FALSE;

241
	return GLADE_COMMAND_GET_CLASS (command)->unifies (command, other);
242
243
}

244
/**
245
246
247
 * glade_command_collapse:
 * @command: A #GladeCommand
 * @other: another #GladeCommand
248
 *
249
250
 * Merges @other into @command, so that @command now
 * covers both commands and @other can be dispensed with.
251
 */
252
void
253
254
glade_command_collapse (GladeCommand  *command,
			GladeCommand  *other)
255
{
256
257
	g_return_if_fail (command);
	GLADE_COMMAND_GET_CLASS (command)->collapse (command, other);
258
259
260
261
}

/**
 * glade_command_push_group:
262
 * @fmt:         The collective desctiption of the command group.
263
264
 *               only the description of the first group on the 
 *               stack is used when embedding groups.
265
 * @...: args to the format string.
266
267
268
269
 *
 * Marks the begining of a group.
 */
void
270
glade_command_push_group (const gchar *fmt, ...)
271
{
272
273
274
	va_list         args;

	g_return_if_fail (fmt);
275
276
277
278

	/* Only use the description for the first group.
	 */
	if (gc_group_depth++ == 0)
279
280
281
282
283
	{
		va_start (args, fmt);
		gc_group_description = g_strdup_vprintf (fmt, args);
		va_end (args);
	}
284
285
286
287
288
289
290
291
292
293
294
}

/**
 * glade_command_pop_group:
 *
 * Mark the end of a command group.
 */
void
glade_command_pop_group (void)
{
	if (gc_group_depth-- == 1)
295
	{
296
297
		gc_group_description = (g_free (gc_group_description), NULL);
		gc_group_id++;
298
299
	}

300
301
	if (gc_group_depth < 0)
		g_critical ("Unbalanced group stack detected in %s\n",
302
			    G_STRFUNC);
303
}
304

305
306
307
308
309
310
gint
glade_command_get_group_depth (void)
{
	return gc_group_depth;
}

311
312
313
314
315
316
317
318
319
320
static void
glade_command_check_group (GladeCommand *cmd)
{
	g_return_if_fail (GLADE_IS_COMMAND (cmd));
	if (gc_group_description)
	{
		cmd->description = 
			(g_free (cmd->description), g_strdup (gc_group_description));
		cmd->group_id = gc_group_id;
	}
321
322
}

323
324
/**************************************************/
/*******     GLADE_COMMAND_SET_PROPERTY     *******/
325
326
/**************************************************/

327
328
/* create a new GladeCommandSetProperty class.  Objects of this class will
 * encapsulate a "set property" operation */
329
330

typedef struct {
331
332
333
334
	GladeCommand  parent;
	gboolean      set_once;
	gboolean      undo;
	GList        *sdata;
335
} GladeCommandSetProperty;
336

337
/* standard macros */
338
339
340
341
GLADE_MAKE_COMMAND (GladeCommandSetProperty, glade_command_set_property);
#define GLADE_COMMAND_SET_PROPERTY_TYPE		(glade_command_set_property_get_type ())
#define GLADE_COMMAND_SET_PROPERTY(o)	  	(G_TYPE_CHECK_INSTANCE_CAST ((o), GLADE_COMMAND_SET_PROPERTY_TYPE, GladeCommandSetProperty))
#define GLADE_COMMAND_SET_PROPERTY_CLASS(k)	(G_TYPE_CHECK_CLASS_CAST ((k), GLADE_COMMAND_SET_PROPERTY_TYPE, GladeCommandSetPropertyClass))
342
343
#define GLADE_IS_COMMAND_SET_PROPERTY(o)	(G_TYPE_CHECK_INSTANCE_TYPE ((o), GLADE_COMMAND_SET_PROPERTY_TYPE))
#define GLADE_IS_COMMAND_SET_PROPERTY_CLASS(k)	(G_TYPE_CHECK_CLASS_TYPE ((k), GLADE_COMMAND_SET_PROPERTY_TYPE))
344

345
/* Undo the last "set property command" */
346
static gboolean
347
glade_command_set_property_undo (GladeCommand *cmd)
348
{
349
	return glade_command_set_property_execute (cmd);
350
351
}

Tristan Van Berkom's avatar
Tristan Van Berkom committed
352
/*
353
354
 * Execute the set property command and revert it. IE, after the execution of 
 * this function cmd will point to the undo action
355
356
 */
static gboolean
357
glade_command_set_property_execute (GladeCommand *cmd)
358
{
359
	GladeCommandSetProperty* me = (GladeCommandSetProperty*) cmd;
360
	GList *l;
361
362
	gboolean success;
	gboolean retval = FALSE;
363

364
	g_return_val_if_fail (me != NULL, FALSE);
365

366
367
368
	if (me->set_once != FALSE)
		glade_property_push_superuser ();

369
370
371
	for (l = me->sdata; l; l = l->next)
	{
		GValue new_value = { 0, };
372
		GCSetPropData *sdata = l->data;
373

374
375
		g_value_init (&new_value, G_VALUE_TYPE (sdata->new_value));
		
376
377
378
379
380
		if (me->undo)
			g_value_copy (sdata->old_value, &new_value);
		else
			g_value_copy (sdata->new_value, &new_value);

381
#if 0
382
383
		{
			gchar *str =
384
385
386
				glade_widget_adaptor_string_from_value
				(GLADE_WIDGET_ADAPTOR (sdata->property->klass->handle),
				 sdata->property->klass, &new_value);
387
388

			g_print ("Setting %s property of %s to %s (sumode: %d)\n",
389
				 sdata->property->klass->id,
390
391
392
393
394
395
396
397
398
399
				 sdata->property->widget->name,
				 str, glade_property_superuser ());

			g_free (str);
		}
#endif

		/* Packing properties need to be refreshed here since
		 * they are reset when they get added to containers.
		 */
400
		if (sdata->property->klass->packing)
401
402
403
404
		{
			GladeProperty *tmp_prop;

			tmp_prop = glade_widget_get_pack_property
405
				(sdata->property->widget, sdata->property->klass->id);
406
407
408
409
410
411
412
413
414

			if (sdata->property != tmp_prop)
			{
				g_object_unref (sdata->property);
				sdata->property = g_object_ref (tmp_prop);
				
			}
		}

415
416
		success = glade_property_set_value (sdata->property, &new_value);
		retval = retval || success;
417

418
		if (!me->set_once && success)
419
420
421
422
423
424
425
426
427
428
		{
			/* If some verify functions didnt pass on 
			 * the first go.. we need to record the actual
			 * properties here.
			 */
			g_value_copy (sdata->property->value, 
				      sdata->new_value);
		}


429
		g_value_unset (&new_value);
430

431

432
	}
433
434
435
436
437
438
439

	if (me->set_once != FALSE)
		glade_property_pop_superuser ();

	me->set_once = TRUE;
	me->undo     = !me->undo;

440
	return retval;
441
442
443
}

static void
444
glade_command_set_property_finalize (GObject *obj)
445
{
446
	GladeCommandSetProperty *me;
447
	GList *l;
448
449
450

	me = GLADE_COMMAND_SET_PROPERTY (obj);

451
452
	for (l = me->sdata; l; l = l->next)
	{
453
		GCSetPropData *sdata = l->data;
454
455
456
457
458
459
460
461
462
463
464
465
466
		
		if (sdata->property)
			g_object_unref (G_OBJECT (sdata->property));

		if (sdata->old_value)
		{
			if (G_VALUE_TYPE (sdata->old_value) != 0)
				g_value_unset (sdata->old_value);
			g_free (sdata->old_value);
		}
		if (G_VALUE_TYPE (sdata->new_value) != 0)
			g_value_unset (sdata->new_value);
		g_free (sdata->new_value);
467

468
	}
469
	glade_command_finalize (obj);
470
471
472
}

static gboolean
473
glade_command_set_property_unifies (GladeCommand *this_cmd, GladeCommand *other_cmd)
474
{
475
476
477
       GladeCommandSetProperty *cmd1,   *cmd2;
       GCSetPropData           *pdata1, *pdata2;
       GList                   *list, *l;
478

479
480
481
482
483
484
485
486
	if (!other_cmd)
	{
		if (GLADE_IS_COMMAND_SET_PROPERTY (this_cmd))
		{
			cmd1 = (GladeCommandSetProperty*) this_cmd;
			
			for (list = cmd1->sdata; list; list = list->next)
			{
487
488
				GladeProject *project;
				GladeProjectFormat fmt = GLADE_PROJECT_FORMAT_GTKBUILDER;
489
				pdata1 = list->data;
490
491
492
493
494
495
				
				if (pdata1->property->widget)
				{
					project = glade_widget_get_project (pdata1->property->widget);
					fmt     = glade_project_get_format (project);
				}
496
497
498

				if (glade_property_class_compare (pdata1->property->klass,
								  pdata1->old_value,
499
								  pdata1->new_value, fmt))
500
501
502
503
504
505
506
507
					return FALSE;
			}
			return TRUE;
				
		}
		return FALSE;
	}

508
509
       if (GLADE_IS_COMMAND_SET_PROPERTY (this_cmd) && 
	   GLADE_IS_COMMAND_SET_PROPERTY (other_cmd))
510
       {
511
512
               cmd1 = (GladeCommandSetProperty*) this_cmd;
               cmd2 = (GladeCommandSetProperty*) other_cmd;
513
514
515
516
517
518
519
520
521
522
523
524

	       if (g_list_length (cmd1->sdata) != 
		   g_list_length (cmd2->sdata))
		       return FALSE;

	       for (list = cmd1->sdata; list; list = list->next)
	       {
		       pdata1 = list->data;
		       for (l = cmd2->sdata; l; l = l->next)
		       {
			       pdata2 = l->data;

525
			       if (pdata1->property->widget == pdata2->property->widget &&
526
527
				   glade_property_class_match (pdata1->property->klass,
							       pdata2->property->klass))
528
529
530
531
532
533
534
535
536
537
538
539
				       break;
		       }
		       
		       /* If both lists are the same length, and one class type
			* is not found in the other list, then we cant unify.
			*/
		       if (l == NULL)
			       return FALSE;

	       }

	       return TRUE;
540
541
       }
       return FALSE;
542
543
544
}

static void
545
glade_command_set_property_collapse (GladeCommand *this_cmd, GladeCommand *other_cmd)
546
{
547
548
549
550
	GladeCommandSetProperty *cmd1,   *cmd2;
	GCSetPropData           *pdata1, *pdata2;
	GList                   *list, *l;
	
551
552
	g_return_if_fail (GLADE_IS_COMMAND_SET_PROPERTY (this_cmd) &&
			  GLADE_IS_COMMAND_SET_PROPERTY (other_cmd));
553
	
554
555
	cmd1 = (GladeCommandSetProperty*) this_cmd;
	cmd2 = (GladeCommandSetProperty*) other_cmd;
556
557
558
559
560
561
562
563
564


	for (list = cmd1->sdata; list; list = list->next)
	{
		pdata1 = list->data;
		for (l = cmd2->sdata; l; l = l->next)
		{
			pdata2 = l->data;
			
565
566
			if (glade_property_class_match (pdata1->property->klass,
							pdata2->property->klass))
567
568
569
570
571
572
573
574
			{
				/* Merge the GCSetPropData structs manually here
				 */
				g_value_copy (pdata2->new_value, pdata1->new_value);
				break;
			}
		}
	}
Paolo Borelli's avatar
Paolo Borelli committed
575

576
577
	/* Set the description
	 */
578
579
580
	g_free (this_cmd->description);
	this_cmd->description = other_cmd->description;
	other_cmd->description = NULL;
581

Tristan Van Berkom's avatar
Updated    
Tristan Van Berkom committed
582
	glade_app_update_ui ();
583
584
}

585
586

#define MAX_UNDO_MENU_ITEM_VALUE_LEN	10
587
static gchar *
588
589
glade_command_set_property_description (GladeCommandSetProperty *me,
					GladeProjectFormat       fmt)
590
{
591
	GCSetPropData   *sdata;
592
593
594
595
596
597
598
599
600
601
	gchar *description = NULL;
	gchar *value_name;

	g_assert (me->sdata);

	if (g_list_length (me->sdata) > 1)
		description = g_strdup_printf (_("Setting multiple properties"));
	else 
	{
		sdata = me->sdata->data;
602
603
		value_name = glade_widget_adaptor_string_from_value
			(GLADE_WIDGET_ADAPTOR (sdata->property->klass->handle),
604
			 sdata->property->klass, sdata->new_value, fmt);
605

606
607
608
		if (!value_name || strlen (value_name) > MAX_UNDO_MENU_ITEM_VALUE_LEN
		    || strchr (value_name, '_')) {
			description = g_strdup_printf (_("Setting %s of %s"),
609
						       sdata->property->klass->name,
610
611
612
						       sdata->property->widget->name);
		} else {
			description = g_strdup_printf (_("Setting %s of %s to %s"),
613
						       sdata->property->klass->name,
614
615
616
617
618
619
620
621
						       sdata->property->widget->name, value_name);
		}
		g_free (value_name);
	}

	return description;
}

622

623
void
624
glade_command_set_properties_list (GladeProject *project, GList *props)
625
{
626
	GladeCommandSetProperty *me;
627
	GladeCommand  *cmd;
628
629
	GCSetPropData *sdata;
	GList         *list;
630
	gboolean       success;
631
	gboolean       multiple;
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646

	g_return_if_fail (GLADE_IS_PROJECT (project));
	g_return_if_fail (props);

	me = (GladeCommandSetProperty*) g_object_new (GLADE_COMMAND_SET_PROPERTY_TYPE, NULL);
	cmd = GLADE_COMMAND (me);

	/* Ref all props */
	for (list = props; list; list = list->next)
	{
		sdata = list->data;
		g_object_ref (G_OBJECT (sdata->property));
	}

	me->sdata        = props;
647
648
649
650
651
652
653
654
655
	cmd->description = 
		glade_command_set_property_description 
		(me, glade_project_get_format (project));


	multiple = g_list_length (me->sdata) > 1;
	if (multiple)
		glade_command_push_group (cmd->description);

656
657

	glade_command_check_group (GLADE_COMMAND (me));
658
659

	/* Push onto undo stack only if it executes successfully. */
660
661
662
	success = glade_command_set_property_execute (GLADE_COMMAND (me));
	
	if (success)
663
		glade_project_push_undo (GLADE_PROJECT (project),
664
665
666
667
					 GLADE_COMMAND (me));
	else
		/* No leaks on my shift! */
		g_object_unref (G_OBJECT (me));
668
669
670
	
	if (multiple)
		glade_command_pop_group ();
671
672
673
674
675
676
677
}


void
glade_command_set_properties (GladeProperty *property, const GValue *old_value, const GValue *new_value, ...)
{
	GCSetPropData *sdata;
678
679
	GladeProperty *prop;
	GValue        *ovalue, *nvalue;
680
	GList         *list = NULL;
681
	va_list        vl;
Paolo Borelli's avatar
Paolo Borelli committed
682
683

	g_return_if_fail (GLADE_IS_PROPERTY (property));
684

685
	/* Add first set */
686
687
	sdata = g_new (GCSetPropData, 1);
	sdata->property = property;
688
689
690
691
692
693
	sdata->old_value = g_new0 (GValue, 1);
	sdata->new_value = g_new0 (GValue, 1);
	g_value_init (sdata->old_value, G_VALUE_TYPE (old_value));
	g_value_init (sdata->new_value, G_VALUE_TYPE (new_value));
	g_value_copy (old_value, sdata->old_value);
	g_value_copy (new_value, sdata->new_value);
694
	list = g_list_prepend (list, sdata);
695
696
697
698
699
700
701
702
703
704
705

	va_start (vl, new_value);
	while ((prop = va_arg (vl, GladeProperty *)) != NULL)
	{
		ovalue = va_arg (vl, GValue *);
		nvalue = va_arg (vl, GValue *);
		
		g_assert (GLADE_IS_PROPERTY (prop));
		g_assert (G_IS_VALUE (ovalue));
		g_assert (G_IS_VALUE (nvalue));

706
		sdata = g_new (GCSetPropData, 1);
707
708
709
710
711
712
713
		sdata->property = g_object_ref (G_OBJECT (prop));
		sdata->old_value = g_new0 (GValue, 1);
		sdata->new_value = g_new0 (GValue, 1);
		g_value_init (sdata->old_value, G_VALUE_TYPE (ovalue));
		g_value_init (sdata->new_value, G_VALUE_TYPE (nvalue));
		g_value_copy (ovalue, sdata->old_value);
		g_value_copy (nvalue, sdata->new_value);
714
		list = g_list_prepend (list, sdata);
715
716
717
	}	
	va_end (vl);

718
	glade_command_set_properties_list (property->widget->project, list);
719
720
}

721
void
722
glade_command_set_property_value (GladeProperty *property, const GValue* pvalue)
723
{
724
725
726
727
728
729

	/* Dont generate undo/redo items for unchanging property values.
	 */
	if (glade_property_equals_value (property, pvalue))
		return;

730
731
732
	glade_command_set_properties (property, property->value, pvalue, NULL);
}

733
734
735
736
737
738
739
740
741
void
glade_command_set_property (GladeProperty *property, ...)
{
	GValue *value;
	va_list args;
	
	g_return_if_fail (GLADE_IS_PROPERTY (property));

	va_start (args, property);
742
	value = glade_property_class_make_gvalue_from_vl (property->klass, args);
743
744
745
746
747
	va_end (args);
	
	glade_command_set_property_value (property, value);
}

748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
/**************************************************/
/*******       GLADE_COMMAND_SET_NAME       *******/
/**************************************************/

/* create a new GladeCommandSetName class.  Objects of this class will
 * encapsulate a "set name" operation */
typedef struct {
	GladeCommand parent;

	GladeWidget *widget;
	gchar *old_name;
	gchar *name;
} GladeCommandSetName;

/* standard macros */
GLADE_MAKE_COMMAND (GladeCommandSetName, glade_command_set_name);
#define GLADE_COMMAND_SET_NAME_TYPE		(glade_command_set_name_get_type ())
#define GLADE_COMMAND_SET_NAME(o)	  	(G_TYPE_CHECK_INSTANCE_CAST ((o), GLADE_COMMAND_SET_NAME_TYPE, GladeCommandSetName))
#define GLADE_COMMAND_SET_NAME_CLASS(k)	(G_TYPE_CHECK_CLASS_CAST ((k), GLADE_COMMAND_SET_NAME_TYPE, GladeCommandSetNameClass))
767
768
#define GLADE_IS_COMMAND_SET_NAME(o)		(G_TYPE_CHECK_INSTANCE_TYPE ((o), GLADE_COMMAND_SET_NAME_TYPE))
#define GLADE_IS_COMMAND_SET_NAME_CLASS(k)	(G_TYPE_CHECK_CLASS_TYPE ((k), GLADE_COMMAND_SET_NAME_TYPE))
769
770
771
772
773
774
775
776

/* Undo the last "set name command" */
static gboolean
glade_command_set_name_undo (GladeCommand *cmd)
{
	return glade_command_set_name_execute (cmd);
}

Tristan Van Berkom's avatar
Tristan Van Berkom committed
777
/*
778
779
780
781
782
783
 * Execute the set name command and revert it.  Ie, after the execution of this
 * function cmd will point to the undo action
 */
static gboolean
glade_command_set_name_execute (GladeCommand *cmd)
{
784
	GladeCommandSetName* me = GLADE_COMMAND_SET_NAME (cmd);
785
786
787
788
789
790
	char* tmp;

	g_return_val_if_fail (me != NULL, TRUE);
	g_return_val_if_fail (me->widget != NULL, TRUE);
	g_return_val_if_fail (me->name != NULL, TRUE);

791
792
	glade_project_set_widget_name (me->widget->project, 
				       me->widget, me->name);
793
	
794
795
796
797
	tmp = me->old_name;
	me->old_name = me->name;
	me->name = tmp;

798
	return TRUE;
799
800
801
802
803
}

static void
glade_command_set_name_finalize (GObject *obj)
{
804
805
806
807
808
809
	GladeCommandSetName* me;

	g_return_if_fail (GLADE_IS_COMMAND_SET_NAME (obj));

	me = GLADE_COMMAND_SET_NAME (obj);

810
811
	g_free (me->old_name);
	g_free (me->name);
812

813
814
815
816
	glade_command_finalize (obj);
}

static gboolean
817
glade_command_set_name_unifies (GladeCommand *this_cmd, GladeCommand *other_cmd)
818
819
820
821
{
	GladeCommandSetName *cmd1;
	GladeCommandSetName *cmd2;

822
	if (GLADE_IS_COMMAND_SET_NAME (this_cmd) && GLADE_IS_COMMAND_SET_NAME (other_cmd))
823
	{
824
825
		cmd1 = GLADE_COMMAND_SET_NAME (this_cmd);
		cmd2 = GLADE_COMMAND_SET_NAME (other_cmd);
826
827
828
829
830
831
832
833

		return (cmd1->widget == cmd2->widget);
	}

	return FALSE;
}

static void
834
glade_command_set_name_collapse (GladeCommand *this_cmd, GladeCommand *other_cmd)
835
{
836
837
	GladeCommandSetName *nthis = GLADE_COMMAND_SET_NAME (this_cmd);
	GladeCommandSetName *nother = GLADE_COMMAND_SET_NAME (other_cmd);
838

839
	g_return_if_fail (GLADE_IS_COMMAND_SET_NAME (this_cmd) && GLADE_IS_COMMAND_SET_NAME (other_cmd));
840
841
842
843
844

	g_free (nthis->old_name);
	nthis->old_name = nother->old_name;
	nother->old_name = NULL;

845
846
	g_free (this_cmd->description);
	this_cmd->description = g_strdup_printf (_("Renaming %s to %s"), nthis->name, nthis->old_name);
847

Tristan Van Berkom's avatar
Updated    
Tristan Van Berkom committed
848
	glade_app_update_ui ();
849
850
851
852
853
854
855
856
}

/* this function takes the ownership of name */
void
glade_command_set_name (GladeWidget *widget, const gchar* name)
{
	GladeCommandSetName *me;
	GladeCommand *cmd;
857
858
859
860

	g_return_if_fail (GLADE_IS_WIDGET (widget));
	g_return_if_fail (name != NULL);

861
862
863
864
865
	/* Dont spam the queue with false name changes.
	 */
	if (!strcmp (widget->name, name))
		return;

866
867
	me = g_object_new (GLADE_COMMAND_SET_NAME_TYPE, NULL);
	cmd = GLADE_COMMAND (me);
868

869
870
871
872
873
	me->widget = widget;
	me->name = g_strdup (name);
	me->old_name = g_strdup (widget->name);

	cmd->description = g_strdup_printf (_("Renaming %s to %s"), me->old_name, me->name);
874
875

	glade_command_check_group (GLADE_COMMAND (me));
876

877
	if (glade_command_set_name_execute (GLADE_COMMAND (me)))
878
		glade_project_push_undo (GLADE_PROJECT (widget->project), GLADE_COMMAND (me));
879
880
	else
		g_object_unref (G_OBJECT (me));
881
882
}

Tristan Van Berkom's avatar
Tristan Van Berkom committed
883
884
885
886
887
888
889
/******************************************************************************
 * 
 * add/remove
 * 
 * These canonical commands add/remove a widget list to/from the project.
 * 
 *****************************************************************************/
890
891

typedef struct {
Tristan Van Berkom's avatar
Tristan Van Berkom committed
892
893
	GladeCommand	parent;
	GladeProject	*project;
894
895
	GList		*widgets;
	gboolean	add;
Tristan Van Berkom's avatar
Tristan Van Berkom committed
896
897
	gboolean        from_clipboard;
} GladeCommandAddRemove;
898

Tristan Van Berkom's avatar
Tristan Van Berkom committed
899
900
901
902
903
904
905

GLADE_MAKE_COMMAND (GladeCommandAddRemove, glade_command_add_remove);
#define GLADE_COMMAND_ADD_REMOVE_TYPE			(glade_command_add_remove_get_type ())
#define GLADE_COMMAND_ADD_REMOVE(o)	  			(G_TYPE_CHECK_INSTANCE_CAST ((o), GLADE_COMMAND_ADD_REMOVE_TYPE, GladeCommandAddRemove))
#define GLADE_COMMAND_ADD_REMOVE_CLASS(k)		(G_TYPE_CHECK_CLASS_CAST ((k), GLADE_COMMAND_ADD_REMOVE_TYPE, GladeCommandAddRemoveClass))
#define GLADE_IS_COMMAND_ADD_REMOVE(o)			(G_TYPE_CHECK_INSTANCE_TYPE ((o), GLADE_COMMAND_ADD_REMOVE_TYPE))
#define GLADE_IS_COMMAND_ADD_REMOVE_CLASS(k)	(G_TYPE_CHECK_CLASS_TYPE ((k), GLADE_COMMAND_ADD_REMOVE_TYPE))
906

907
908
909
910
911
912
913
914
915
916
static void 
glade_command_placeholder_destroyed (GtkObject *object, CommandData *cdata)
{
	if (GTK_OBJECT (cdata->placeholder) == object)
	{
		cdata->placeholder = NULL;
		cdata->handler_id = 0;
	}
}

Tristan Van Berkom's avatar
Tristan Van Berkom committed
917
918
919
920
921
922
static void
glade_command_placeholder_connect (CommandData *cdata,
				   GladePlaceholder *placeholder)
{
	g_assert (cdata && cdata->placeholder == NULL);

923
924
925
926
	/* Something like a no-op with no placeholder */
	if ((cdata->placeholder = placeholder) == NULL)
		return;

Tristan Van Berkom's avatar
Tristan Van Berkom committed
927
928
929
930
931
	cdata->handler_id = g_signal_connect 
		(placeholder, "destroy",
		 G_CALLBACK (glade_command_placeholder_destroyed), cdata);
}

932
933
934
935
936
937
938

static GList *
get_all_parentless_reffed_widgets (GList *reffed, GladeWidget *widget)
{
	GList *children, *l, *list;
	GladeWidget *child;

Tristan Van Berkom's avatar
Tristan Van Berkom committed
939
940
941
	if ((list = glade_widget_get_parentless_reffed_widgets (widget)) != NULL)
		reffed = g_list_concat (reffed, list);

942
943
944
945
946
	children = glade_widget_adaptor_get_children (widget->adaptor,
						      widget->object);

	for (l = children; l; l = l->next)
	{
947
		if ((child = glade_widget_get_from_gobject (l->data)) != NULL)
948
949
950
		{
			reffed = get_all_parentless_reffed_widgets (reffed, child);
		}
951
952
	}

Tristan Van Berkom's avatar
Tristan Van Berkom committed
953
954
	g_list_free (children);

955
956
957
	return reffed;
}

Tristan Van Berkom's avatar
Tristan Van Berkom committed
958
959
960
961
962
/**
 * glade_command_add:
 * @widgets: a #Glist
 * @parent: a #GladeWidget
 * @placeholder: a #GladePlaceholder
963
 * @pasting: whether we are pasting an existing widget or creating a new one.
Tristan Van Berkom's avatar
Tristan Van Berkom committed
964
965
966
967
 *
 * Performs an add command on all widgets in @widgets to @parent, possibly
 * replacing @placeholder (note toplevels dont need a parent; the active project
 * will be used when pasting toplevel objects).
968
969
970
 * Pasted widgets will persist packing properties from thier cut/copy source
 * while newly added widgets will prefer packing defaults.
 *
Tristan Van Berkom's avatar
Tristan Van Berkom committed
971
 */
972
static void
973
974
975
976
glade_command_add (GList            *widgets, 
		   GladeWidget      *parent, 
		   GladePlaceholder *placeholder,
		   gboolean          pasting)
977
{
Tristan Van Berkom's avatar
Tristan Van Berkom committed
978
979
980
981
982
	GladeCommandAddRemove	*me;
	CommandData				*cdata;
	GladeWidget				*widget = NULL;
	GList					*l, *list, *children, *placeholders = NULL;
	GtkWidget				*child;
983

Tristan Van Berkom's avatar
Tristan Van Berkom committed
984
985
	g_return_if_fail (widgets && widgets->data);
	g_return_if_fail (parent == NULL || GLADE_IS_WIDGET (parent));
986

Tristan Van Berkom's avatar
Tristan Van Berkom committed
987
988
	me = g_object_new (GLADE_COMMAND_ADD_REMOVE_TYPE, NULL);
	me->add = TRUE;
989
	me->from_clipboard = pasting;
990

Tristan Van Berkom's avatar
Tristan Van Berkom committed
991
992
993
994
995
996
	/* Things can go wrong in this function if the dataset is inacurate,
	 * we make no real attempt here to recover, just g_critical() and
	 * fix the bugs as they pop up.
	 */
	widget = GLADE_WIDGET (widgets->data);
	if (placeholder && GTK_IS_WINDOW (widget->object) == FALSE)
Tristan Van Berkom's avatar
Tristan Van Berkom committed
997
998
999
		me->project = glade_placeholder_get_project (placeholder);
	else 
		me->project = glade_app_get_project();
1000

Tristan Van Berkom's avatar
Tristan Van Berkom committed
1001
1002
1003
	GLADE_COMMAND (me)->description = 
		g_strdup_printf (_("Add %s"), g_list_length (widgets) == 1 ? 
				 widget->name : _("multiple"));
1004

Tristan Van Berkom's avatar
Tristan Van Berkom committed
1005
	for (list = widgets; list && list->data; list = list->next)
1006
	{
Tristan Van Berkom's avatar
Tristan Van Berkom committed
1007
1008
1009
1010
1011
1012
1013
		widget = list->data;
		cdata = g_new0 (CommandData, 1);
		if (widget->internal)
			g_critical ("Internal widget in Add");

		/* Widget */
		cdata->widget = g_object_ref (G_OBJECT (widget));
1014
1015

		/* Parentless ref */
1016
		if ((cdata->reffed = get_all_parentless_reffed_widgets (cdata->reffed, widget)) != NULL)
1017
1018
			g_list_foreach (cdata->reffed, (GFunc)g_object_ref, NULL);

Tristan Van Berkom's avatar
Tristan Van Berkom committed
1019
1020
1021
1022
1023
1024
1025
		/* Parent */
		if (parent == NULL)
			cdata->parent = glade_widget_get_parent (widget);
		else if (placeholder && GTK_IS_WINDOW (widget->object) == FALSE)
			cdata->parent = glade_placeholder_get_parent (placeholder);
		else if (GTK_IS_WINDOW (widget->object) == FALSE)
			cdata->parent = parent;
1026

Tristan Van Berkom's avatar
Tristan Van Berkom committed
1027
1028
		/* Placeholder */
		if (placeholder != NULL && g_list_length (widgets) == 1)
1029
		{
Tristan Van Berkom's avatar
Tristan Van Berkom committed
1030
			glade_command_placeholder_connect (cdata, placeholder);
Paolo Borelli's avatar
Paolo Borelli committed
1031
		}
1032
1033
		else if (cdata->parent && 
			 glade_widget_placeholder_relation (cdata->parent, widget))
Tristan Van Berkom's avatar
Tristan Van Berkom committed
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
		{
			GtkContainer *cont = GTK_CONTAINER (cdata->parent->object);
			
			child = glade_util_get_placeholder_from_pointer (cont);
			if (child && g_list_find (placeholders, child) == NULL)
			{
				placeholders = g_list_append (placeholders, child);
				glade_command_placeholder_connect
						(cdata, GLADE_PLACEHOLDER (child));
			}
			else if ((children = glade_widget_adaptor_get_children
				 (cdata->parent->adaptor, cdata->parent->object)) != NULL)
			{
				for (l = children; l && l->data; l = l->next)
				{
					child = l->data;
Paolo Borelli's avatar
Paolo Borelli committed
1050

Tristan Van Berkom's avatar
Tristan Van Berkom committed
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063
					/* Find a placeholder for this child */
					if (GLADE_IS_PLACEHOLDER (child) &&
					    g_list_find (placeholders, child) == NULL)
					{
						placeholders = g_list_append (placeholders, child);
						glade_command_placeholder_connect
							(cdata, GLADE_PLACEHOLDER (child));
						break;
					}
				}
				g_list_free (children);
			}
		}
1064

Tristan Van Berkom's avatar
Tristan Van Berkom committed
1065
1066
1067
1068
1069
1070
		/* 
		 * Save a copy of the original project so we can forward that to glade-project, 
		 * who'll copy in any resource files needed by any properties that are getting 
		 * cross-project pasted.
		 */
		cdata->project = cdata->widget->project;
1071

Tristan Van Berkom's avatar
Tristan Van Berkom committed
1072
		me->widgets = g_list_prepend (me->widgets, cdata);
1073
1074
	}

Tristan Van Berkom's avatar
Tristan Van Berkom committed
1075
	glade_command_check_group (GLADE_COMMAND (me));
1076

Tristan Van Berkom's avatar
Tristan Van Berkom committed
1077
1078
1079
1080
1081
	/*
	 * Push it onto the undo stack only on success
	 */
	if (glade_command_add_remove_execute (GLADE_COMMAND (me)))
		glade_project_push_undo (glade_app_get_project(), GLADE_COMMAND (me));
1082
	else
Tristan Van Berkom's avatar
Tristan Van Berkom committed
1083
		g_object_unref (G_OBJECT (me));
1084

Tristan Van Berkom's avatar
Tristan Van Berkom committed
1085
1086
	if (placeholders) 
		g_list_free (placeholders);
1087
		
Tristan Van Berkom's avatar
Tristan Van Berkom committed
1088
} /* end of glade_command_add() */
1089

1090
1091
1092
1093
1094
1095
1096
1097
1098
1099
1100
1101
1102
1103


static void
glade_command_delete_prop_refs (GladeWidget *widget)
{
	GladeProperty *property;

	while (widget->prop_refs)
	{
		property = GLADE_PROPERTY (widget->prop_refs->data);
		glade_command_set_property (property, NULL);
	}
}

1104
1105
1106
static void glade_command_remove (GList *widgets);

static void
1107
glade_command_remove_locked (GladeWidget *widget, GList *reffed)
1108
{
1109
	GList list = { 0, }, *widgets, *l;
1110
1111
	GladeWidget *locked;

1112
1113
1114
	widgets = g_list_copy (widget->locked_widgets);

	for (l = widget->locked_widgets; l; l = l->next)
1115
	{
1116
		locked = l->data;
1117
1118
		list.data = locked;

1119
1120
1121
		if (g_list_find (reffed, locked))
			continue;

1122
1123
1124
		glade_command_unlock_widget (locked);
		glade_command_remove (&list);
	}
1125
1126

	g_list_free (widgets);
1127
}
1128

1129
/**
Tristan Van Berkom's avatar
Tristan Van Berkom committed
1130
 * glade_command_remove:
Tristan Van Berkom's avatar
Tristan Van Berkom committed
1131
 * @widgets: a #GList of #GladeWidgets
1132
 * @return_placeholders: whether or not to return a list of placehodlers
1133
 *
Tristan Van Berkom's avatar
Tristan Van Berkom committed
1134
 * Performs a remove command on all widgets in @widgets from @parent.
1135
 */
1136
static void
Tristan Van Berkom's avatar
Tristan Van Berkom committed
1137
glade_command_remove (GList *widgets)
1138
{
Tristan Van Berkom's avatar
Tristan Van Berkom committed
1139
1140
1141
	GladeCommandAddRemove	*me;
	GladeWidget				*widget = NULL;
	CommandData				*cdata;
1142
	GtkWidget                               *placeholder;
Tristan Van Berkom's avatar
Tristan Van Berkom committed
1143
	GList					*list, *l;
1144