nautilus-application.c 34.3 KB
Newer Older
Gene Z. Ragan's avatar
CVS:  
Gene Z. Ragan committed
1
/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */
2 3 4 5 6

/*
 *  Nautilus
 *
 *  Copyright (C) 1999, 2000 Red Hat, Inc.
7
 *  Copyright (C) 2000, 2001 Eazel, Inc.
8
 *
9
 *  Nautilus is free software; you can redistribute it and/or
10 11 12 13
 *  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.
 *
14
 *  Nautilus is distributed in the hope that it will be useful,
15 16 17 18 19
 *  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
20
 *  along with this program; if not, write to the Free Software
21 22
 *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
23
 *  Authors: Elliot Lee <sopwith@redhat.com>,
24
 *           Darin Adler <darin@bentspoon.com>
25 26 27
 *
 */

28
#include <config.h>
29
#include "nautilus-application.h"
30

31
#include "file-manager/fm-desktop-icon-view.h"
32
#include "file-manager/fm-icon-view.h"
33
#include "file-manager/fm-list-view.h"
34
#include "file-manager/fm-search-list-view.h"
35 36
#include "nautilus-desktop-window.h"
#include "nautilus-first-time-druid.h"
37
#include "nautilus-main.h"
38 39 40 41
#include "nautilus-shell-interface.h"
#include "nautilus-shell.h"
#include <bonobo/bonobo-main.h>
#include <bonobo/bonobo-object.h>
42
#include <dirent.h>
Ramiro Estrugo's avatar
Ramiro Estrugo committed
43 44 45 46 47
#include <eel/eel-gtk-macros.h>
#include <eel/eel-stock-dialogs.h>
#include <eel/eel-string-list.h>
#include <eel/eel-string.h>
#include <eel/eel-vfs-extensions.h>
48
#include <eel/eel-gtk-extensions.h>
49
#include <gdk/gdkx.h>
50
#include <gtk/gtksignal.h>
51
#include <libgnome/gnome-config.h>
52 53
#include <libgnome/gnome-i18n.h>
#include <libgnome/gnome-util.h>
54
#include <libgnomeui/gnome-client.h>
Ramiro Estrugo's avatar
Ramiro Estrugo committed
55
#include <libgnomeui/gnome-messagebox.h>
56
#include <libgnomeui/gnome-stock-icons.h>
57
#include <libgnomevfs/gnome-vfs-mime-handlers.h>
58
#include <libgnomevfs/gnome-vfs-ops.h>
Ramiro Estrugo's avatar
Ramiro Estrugo committed
59
#include <libgnomevfs/gnome-vfs-utils.h>
60 61 62 63 64
#include <libnautilus-private/nautilus-file-utilities.h>
#include <libnautilus-private/nautilus-global-preferences.h>
#include <libnautilus-private/nautilus-icon-factory.h>
#include <libnautilus-private/nautilus-metafile-factory.h>
#include <libnautilus-private/nautilus-sound.h>
65
#include <libnautilus-private/nautilus-bonobo-extensions.h>
66 67
#include <libnautilus-private/nautilus-undo-manager.h>
#include <libnautilus-private/nautilus-volume-monitor.h>
68
#include <libnautilus-private/nautilus-authn-manager.h>
Alexander Larsson's avatar
Alexander Larsson committed
69
#include <libnautilus-private/nautilus-desktop-link-monitor.h>
70
#include <bonobo-activation/bonobo-activation.h>
71

72 73 74 75
/* Needed for the is_kdesktop_present check */
#include <gdk/gdkx.h>
#include <X11/Xlib.h>

76 77 78
#define FACTORY_IID	     "OAFIID:Nautilus_Factory"
#define SEARCH_LIST_VIEW_IID "OAFIID:Nautilus_File_Manager_Search_List_View"
#define SHELL_IID	     "OAFIID:Nautilus_Shell"
79

80 81
/* Keeps track of all the desktop windows. */
static GList *nautilus_application_desktop_windows;
82 83 84 85

/* Keeps track of all the nautilus windows. */
static GList *nautilus_application_window_list;

86 87 88 89 90 91 92 93 94 95 96 97 98
static gboolean need_to_show_first_time_druid     (void);
static void     desktop_changed_callback          (gpointer                  user_data);
static void     desktop_location_changed_callback (gpointer                  user_data);
static void     volume_mounted_callback           (NautilusVolumeMonitor    *monitor,
						   NautilusVolume           *volume,
						   NautilusApplication      *application);
static void     volume_unmounted_callback         (NautilusVolumeMonitor    *monitor,
						   NautilusVolume           *volume,
						   NautilusApplication      *application);
static void     update_session                    (gpointer                  callback_data);
static void     init_session                      (void);
static gboolean is_kdesktop_present               (void);

99 100
BONOBO_CLASS_BOILERPLATE (NautilusApplication, nautilus_application,
			  BonoboGenericFactory, BONOBO_GENERIC_FACTORY_TYPE)
101 102

static CORBA_Object
103 104 105
create_object (PortableServer_Servant servant,
	       const CORBA_char *iid,
	       CORBA_Environment *ev)
106
{
107
	BonoboObject *object;
108
	FMDirectoryView *directory_view;
109
	NautilusApplication *application;
110

111
	if (strcmp (iid, NAUTILUS_ICON_VIEW_IID) == 0) {
112
		directory_view = FM_DIRECTORY_VIEW (g_object_new (fm_icon_view_get_type (), NULL));
113
		object = BONOBO_OBJECT (fm_directory_view_get_nautilus_view (directory_view));
114
	} else if (strcmp (iid, NAUTILUS_DESKTOP_ICON_VIEW_IID) == 0) {
115
		directory_view = FM_DIRECTORY_VIEW (g_object_new (fm_desktop_icon_view_get_type (), NULL));
116
		object = BONOBO_OBJECT (fm_directory_view_get_nautilus_view (directory_view));
117
	} else if (strcmp (iid, NAUTILUS_LIST_VIEW_IID) == 0) {
118
		directory_view = FM_DIRECTORY_VIEW (g_object_new (fm_list_view_get_type (), NULL));
119
		object = BONOBO_OBJECT (fm_directory_view_get_nautilus_view (directory_view));
120
	} else if (strcmp (iid, SEARCH_LIST_VIEW_IID) == 0) {
121
		directory_view = FM_DIRECTORY_VIEW (g_object_new (fm_search_list_view_get_type (), NULL));
122
		object = BONOBO_OBJECT (fm_directory_view_get_nautilus_view (directory_view));
123
	} else if (strcmp (iid, SHELL_IID) == 0) {
124
		application = NAUTILUS_APPLICATION (bonobo_object_from_servant (servant));
125
		object = BONOBO_OBJECT (nautilus_shell_new (application));
126 127
	} else if (strcmp (iid, METAFILE_FACTORY_IID) == 0) {
		object = BONOBO_OBJECT (nautilus_metafile_factory_get_instance ());
Gene Z. Ragan's avatar
CVS:  
Gene Z. Ragan committed
128
	} else {
129
		object = CORBA_OBJECT_NIL;
Gene Z. Ragan's avatar
CVS:  
Gene Z. Ragan committed
130
	}
131

132
	return CORBA_Object_duplicate (BONOBO_OBJREF (object), ev);
133 134
}

135 136
GList *
nautilus_application_get_window_list (void)
137 138 139 140
{
	return nautilus_application_window_list;
}

141
static void
142
nautilus_application_instance_init (NautilusApplication *application)
143
{
144 145
	/* Create an undo manager */
	application->undo_manager = nautilus_undo_manager_new ();
146

147
	/* Watch for volume mounts so we can restore open windows */
148 149
	g_signal_connect_object (nautilus_volume_monitor_get (), "volume_mounted",
				 G_CALLBACK (volume_mounted_callback), application, 0);
150 151

	/* Watch for volume unmounts so we can close open windows */
152 153
	g_signal_connect_object (nautilus_volume_monitor_get (), "volume_unmounted",
				 G_CALLBACK (volume_unmounted_callback), application, 0);
154 155
}

156 157
NautilusApplication *
nautilus_application_new (void)
158
{
159 160 161 162 163 164 165 166 167
	NautilusApplication *application;

	application = g_object_new (NAUTILUS_TYPE_APPLICATION, NULL);
	
	bonobo_generic_factory_construct_noreg (BONOBO_GENERIC_FACTORY (application),
						FACTORY_IID,
						NULL);
	
	return application;
168 169 170
}

static void
171
nautilus_application_destroy (BonoboObject *object)
172
{
173 174 175 176
	NautilusApplication *application;

	application = NAUTILUS_APPLICATION (object);

177
	nautilus_bookmarks_exiting ();
178
	
179
	bonobo_object_unref (application->undo_manager);
180

181
	EEL_CALL_PARENT (BONOBO_OBJECT_CLASS, destroy, (object));
182
}
183

184 185
static gboolean
check_required_directories (NautilusApplication *application)
186
{
187 188 189 190 191 192
	char *user_directory;
	char *desktop_directory;
	EelStringList *directories;
	char *directories_as_string;
	char *error_string;
	char *dialog_title;
193
	GtkDialog *dialog;
194
	int failed_count;
195
	
196
	g_assert (NAUTILUS_IS_APPLICATION (application));
197 198 199 200

	user_directory = nautilus_get_user_directory ();
	desktop_directory = nautilus_get_desktop_directory ();

201
	directories = eel_string_list_new (TRUE);
202
	
203
	if (!g_file_test (user_directory, G_FILE_TEST_IS_DIR)) {
204
		eel_string_list_insert (directories, user_directory);
205
	}
206
	g_free (user_directory);	    
207
	    
208
	if (!g_file_test (desktop_directory, G_FILE_TEST_IS_DIR)) {
209
		eel_string_list_insert (directories, desktop_directory);
210
	}
211
	g_free (desktop_directory);
212

213
	failed_count = eel_string_list_get_length (directories);
214

215
	if (failed_count != 0) {
216
		directories_as_string = eel_string_list_as_string (directories, "\n", EEL_STRING_LIST_ALL_STRINGS);
217

218 219
		if (failed_count == 1) {
			dialog_title = g_strdup (_("Couldn't Create Required Folder"));
220 221 222
			error_string = g_strdup_printf (_("Nautilus could not create the required folder \"%s\". "
							  "Before running Nautilus, please create this folder, or "
							  "set permissions such that Nautilus can create it."),
223
							directories_as_string);
224 225
		} else {
			dialog_title = g_strdup (_("Couldn't Create Required Folders"));
226 227 228 229
			error_string = g_strdup_printf (_("Nautilus could not create the following required folders:\n\n"
							  "%s\n\n"
							  "Before running Nautilus, please create these folders, or "
							  "set permissions such that Nautilus can create them."),
230
							directories_as_string);
231 232
		}
		
Ramiro Estrugo's avatar
Ramiro Estrugo committed
233
		dialog = eel_show_error_dialog (error_string, dialog_title, NULL);
234 235
		/* We need the main event loop so the user has a chance to see the dialog. */
		nautilus_main_event_loop_register (GTK_OBJECT (dialog));
236

237
		g_free (directories_as_string);
238
		g_free (error_string);
239
		g_free (dialog_title);
240 241
	}

242
	eel_string_list_free (directories);
243 244

	return failed_count == 0;
245 246
}

247 248 249 250 251 252 253 254 255 256
static int
nautilus_strv_length (const char * const *strv)
{
	const char * const *p;

	for (p = strv; *p != NULL; p++) { }
	return p - strv;
}

static Nautilus_URIList *
257
nautilus_make_uri_list_from_shell_strv (const char * const *strv)
258 259 260
{
	int length, i;
	Nautilus_URIList *uri_list;
261
	char *translated_uri;
262 263 264 265 266 267 268 269

	length = nautilus_strv_length (strv);

	uri_list = Nautilus_URIList__alloc ();
	uri_list->_maximum = length;
	uri_list->_length = length;
	uri_list->_buffer = CORBA_sequence_Nautilus_URI_allocbuf (length);
	for (i = 0; i < length; i++) {
Ramiro Estrugo's avatar
Ramiro Estrugo committed
270
		translated_uri = eel_make_uri_from_shell_arg (strv[i]);
271 272 273
		uri_list->_buffer[i] = CORBA_string_dup (translated_uri);
		g_free (translated_uri);
		translated_uri = NULL;
274 275 276 277 278 279
	}
	CORBA_sequence_set_release (uri_list, CORBA_TRUE);

	return uri_list;
}

280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334
static void
migrate_old_nautilus_files (void)
{
	char *new_desktop_dir, *np;
	char *old_desktop_dir, *op;
	char *old_desktop_dir_new_name;
	struct stat buf;
	DIR *dir;
	struct dirent *de;
	
	old_desktop_dir = g_strconcat (g_get_home_dir (), "/.nautilus/desktop", NULL);
	if (stat (old_desktop_dir, &buf) == -1) {
		g_free (old_desktop_dir);
		return;
	}
	if (!S_ISLNK (buf.st_mode)){
		dir = opendir (old_desktop_dir);
		if (dir == NULL) {
			g_free (old_desktop_dir);
			return;
		}
	
		new_desktop_dir = nautilus_get_desktop_directory ();
		
		while ((de = readdir (dir)) != NULL){
			if (de->d_name [0] == '.'){
				if (de->d_name [0] == 0)
					continue;
				
				if (de->d_name [1] == '.' && de->d_name [2] == 0)
					continue;
			}
	
			op = g_strconcat (old_desktop_dir, "/", de->d_name, NULL);
			np = g_strconcat (new_desktop_dir, "/", de->d_name, NULL);
	
			rename (op, np);
	
			g_free (op);
			g_free (np);
		}

		closedir (dir);

		g_free (new_desktop_dir);
	}

	/* In case we miss something */
	old_desktop_dir_new_name = g_strconcat (old_desktop_dir, "-old", NULL);
	rename (old_desktop_dir, old_desktop_dir_new_name);
	g_free (old_desktop_dir_new_name);

	g_free (old_desktop_dir);
}

335 336 337 338 339 340 341 342 343
static gint
create_starthere_link_callback (gpointer data)
{
	char *desktop_path;
	char *desktop_link_file;
	char *cmd;
	
	/* Create default services icon on the desktop */
	desktop_path = nautilus_get_desktop_directory ();
344 345 346
	desktop_link_file = g_build_filename (desktop_path,
					      "starthere.desktop",
					      NULL);
347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364

	cmd = g_strconcat ("/bin/cp ",
			   NAUTILUS_DATADIR,
			   "/starthere-link.desktop ",
			   desktop_link_file,
			   NULL);

	if (system (cmd) != 0) {
		g_warning ("Failed to execute command '%s'\n", cmd);
	}
	
	g_free (desktop_path);
	g_free (desktop_link_file);
	g_free (cmd);
	
	return FALSE;
}

365 366 367 368
static void
finish_startup (NautilusApplication *application)
{
	/* initialize the sound machinery */
369
	nautilus_sound_init ();
370

371
	/* initialize URI authentication manager */
372
	nautilus_authentication_manager_init ();
373

374
	/* Make the desktop work with old Nautilus. */
375
	migrate_old_nautilus_files ();
Alexander Larsson's avatar
Alexander Larsson committed
376 377 378

	/* Initialize the desktop link monitor singleton */
	nautilus_desktop_link_monitor_get ();
379 380
}

381
void
382
nautilus_application_startup (NautilusApplication *application,
383
			      gboolean kill_shell,
384
			      gboolean restart_shell,
385
			      gboolean no_default_window,
386
			      gboolean no_desktop,
387
			      gboolean do_first_time_druid_check,
388
			      const char *geometry,
389
			      const char *urls[])
390
{
391 392
	CORBA_Environment ev;
	Nautilus_Shell shell;
393
	Bonobo_RegistrationResult result;
394
	const char *message, *detailed_message;
395
	GtkDialog *dialog;
396
	Nautilus_URIList *url_list;
397
	const CORBA_char *corba_geometry;
398 399 400
	int num_failures;

	num_failures = 0;
401

402
	/* Check the user's ~/.nautilus directories and post warnings
403
	 * if there are problems.
404
	 */
405
	if (!kill_shell && !check_required_directories (application)) {
406 407
		return;
	}
408

409 410
	/* Run the first time startup druid if needed. */
	if (do_first_time_druid_check && need_to_show_first_time_druid ()) {
411 412 413 414 415 416
		/* Do this at idle time, once nautilus has initialized
		 * itself. Otherwise we may spawn a second nautilus
		 * process when looking for a metadata factory..
		 */
		g_idle_add (create_starthere_link_callback, NULL);
		nautilus_set_first_time_file_flag ();
417
	}
418

419 420
	CORBA_exception_init (&ev);

421
	/* Start up the factory. */
422
	while (TRUE) {
423
		/* Try to register the file manager view factory. */
424
		result = nautilus_bonobo_activation_register_for_display
425
			(FACTORY_IID, BONOBO_OBJREF (application));
426

427
		switch (result) {
428 429
		case Bonobo_ACTIVATION_REG_SUCCESS:
			/* We are registered and all is right with the world. */
430
			finish_startup (application);
431
		case Bonobo_ACTIVATION_REG_ALREADY_ACTIVE:
432
			/* Another copy of nautilus already is running and registered. */
433
			message = NULL;
434
			detailed_message = NULL;
435
			break;
436
		case Bonobo_ACTIVATION_REG_NOT_LISTED:
437
			/* Can't register myself due to trouble locating the
438
			 * Nautilus_Shell.server file. This has happened when you
439
			 * launch Nautilus with an LD_LIBRARY_PATH that
440
			 * doesn't include the directory containing the oaf
441
			 * library. It could also happen if the
442
			 * Nautilus_Shell.server file was not present for some
443 444 445 446 447
			 * reason. Sometimes killing oafd and gconfd fixes
			 * this problem but we don't exactly understand why,
			 * since neither of the above causes explain it.
			 */
			message = _("Nautilus can't be used now. "
448
				    "Running the command \"bonobo-slay\""
449 450 451
				    " from the console may fix the problem. If not,"
				    " you can try rebooting the computer or"
				    " installing Nautilus again.");
452
			/* FIXME bugzilla.gnome.org 42536: The guesses and stuff here are lame. */
453
			detailed_message = _("Nautilus can't be used now. "
454
					     "Running the command \"bonobo-slay\" "
455 456 457 458
					     "from the console may fix the problem. If not, "
					     "you can try rebooting the computer or "
					     "installing Nautilus again.\n\n"
					     "Bonobo couldn't locate the Nautilus_shell.server file. "
459
					     "One cause of this seems to be an LD_LIBRARY_PATH "
460
					     "that does not include the bonobo-activation library's directory. "
461
					     "Another possible cause would be bad install "
462
					     "with a missing Nautilus_Shell.server file.\n\n"
463
					     "Running \"bonobo-slay\" will kill all "
464
					     "Bonobo Activation and GConf processes, which may be needed by "
465
					     "other applications.\n\n"
466
					     "Sometimes killing bonobo-activation-server and gconfd fixes "
467
					     "the problem, but we don't know why.\n\n"
468
					     "We have also seen this error when a faulty "
469
					     "version of bonobo-activation was installed.");
470 471 472
			break;
		default:
			/* This should never happen. */
473
			g_warning ("bad error code from bonobo_activation_active_server_register");
474
		case Bonobo_ACTIVATION_REG_ERROR:
475
			/* Some misc. error (can never happen with current
476
			 * version of bonobo-activation). Show dialog and terminate the
477 478
			 * program.
			 */
479
			/* FIXME bugzilla.gnome.org 42537: Looks like this does happen with the
480
			 * current OAF. I guess I read the code wrong. Need to figure out when and make a
481 482
			 * good message.
			 */
483 484
			message = _("Nautilus can't be used now, due to an unexpected error.");
			detailed_message = _("Nautilus can't be used now, due to an unexpected error "
485
					     "from Bonobo when attempting to register the file manager view server.");
486 487
			break;
		}
488 489 490

		/* Get the shell object. */
		if (message == NULL) {
491
			shell = bonobo_activation_activate_from_id (SHELL_IID, 0, NULL, NULL);
492 493 494 495 496 497 498
			if (!CORBA_Object_is_nil (shell, &ev)) {
				break;
			}

			/* If we couldn't find ourselves it's a bad problem so
			 * we better stop looping.
			 */
499
			if (result == Bonobo_ACTIVATION_REG_SUCCESS) {
500
				/* FIXME bugzilla.gnome.org 42538: When can this happen? */
501 502
				message = _("Nautilus can't be used now, due to an unexpected error.");
				detailed_message = _("Nautilus can't be used now, due to an unexpected error "
503 504
						     "from Bonobo when attempting to locate the factory."
						     "Killing bonobo-activation-server and restarting Nautilus may help fix the problem.");
505 506 507 508 509
			} else {
				num_failures++;
				if (num_failures > 20) {
					message = _("Nautilus can't be used now, due to an unexpected error.");
					detailed_message = _("Nautilus can't be used now, due to an unexpected error "
510 511
							     "from Bonobo when attempting to locate the shell object. "
							     "Killing bonobo-activation-server and restarting Nautilus may help fix the problem.");
512 513
					
				}
514 515 516
			}
		}

517
		if (message != NULL) {
Ramiro Estrugo's avatar
Ramiro Estrugo committed
518
			dialog = eel_show_error_dialog_with_details (message, NULL, detailed_message, NULL);
519 520
			/* We need the main event loop so the user has a chance to see the dialog. */
			nautilus_main_event_loop_register (GTK_OBJECT (dialog));
521
			goto out;
522 523 524
		}
	}

525 526
	if (kill_shell) {
		Nautilus_Shell_quit (shell, &ev);
527 528
	} else if (restart_shell) {
		Nautilus_Shell_restart (shell, &ev);
529
	} else {
530
		/* If KDE desktop is running, then force no_desktop */
531
		if (is_kdesktop_present ()) {
532
			no_desktop = TRUE;
533
		}
534
		
535
		if (!no_desktop && eel_preferences_get_boolean (NAUTILUS_PREFERENCES_SHOW_DESKTOP)) {
536 537
			Nautilus_Shell_start_desktop (shell, &ev);
		}
538 539
		
		/* Monitor the preference to show or hide the desktop */
540
		eel_preferences_add_callback_while_alive (NAUTILUS_PREFERENCES_SHOW_DESKTOP,
Darin Adler's avatar
Darin Adler committed
541 542 543
							  desktop_changed_callback,
							  application,
							  G_OBJECT (application));
544

545 546
		/* Monitor the preference to have the desktop */
		/* point to the Unix home folder */
547
		eel_preferences_add_callback_while_alive (NAUTILUS_PREFERENCES_DESKTOP_IS_HOME_DIR,
Darin Adler's avatar
Darin Adler committed
548 549 550
							  desktop_location_changed_callback,
							  NULL,
							  G_OBJECT (application));
551

552 553 554 555
		/* CORBA C mapping doesn't allow NULL to be passed
		   for string parameters */
		corba_geometry = (geometry != NULL) ? geometry : "";

556 557
	  	/* Create the other windows. */
		if (urls != NULL) {
558
			url_list = nautilus_make_uri_list_from_shell_strv (urls);
559
			Nautilus_Shell_open_windows (shell, url_list, corba_geometry, &ev);
560
			CORBA_free (url_list);
561
		} else if (!no_default_window) {
562
			Nautilus_Shell_open_default_window (shell, corba_geometry, &ev);
563
		}
564 565 566
		
		/* Add ourselves to the session */
		init_session ();
567
	}
568

569
	/* We're done with the shell now, so let it go. */
570 571 572 573 574
	/* HACK: Don't bother releasing the shell in the case where we
	 * just told it to quit -- that just leads to hangs and does
	 * no good. We could probably fix this in some fancier way if
	 * we could figure out a better lifetime rule.
	 */
575
	if (!(kill_shell || restart_shell)) {
576
		bonobo_object_release_unref (shell, NULL);
577
	}
578

579
 out:
580
	CORBA_exception_free (&ev);
581 582 583
}

static void
584
nautilus_application_create_desktop_windows (NautilusApplication *application)
585
{
586
	static gboolean create_in_progress = FALSE;
587 588 589
	GdkDisplay *display;
	NautilusDesktopWindow *window;
	int screens, i;
590

591
	g_return_if_fail (nautilus_application_desktop_windows == NULL);
592
	g_return_if_fail (NAUTILUS_IS_APPLICATION (application));
593

594 595 596 597 598 599
	if (create_in_progress) {
		return;
	}

	create_in_progress = TRUE;

600 601 602 603 604 605 606 607 608 609 610 611 612 613 614
	display = gdk_display_get_default ();
	screens = gdk_display_get_n_screens (display);

	for (i = 0; i < screens; i++) {
		window = nautilus_desktop_window_new (application,
						      gdk_display_get_screen (display, i));
		/* We realize it immediately so that the NAUTILUS_DESKTOP_WINDOW_ID
		   property is set so gnome-settings-daemon doesn't try to set the
		   background. And we do a gdk_flush() to be sure X gets it. */
		gtk_widget_realize (GTK_WIDGET (window));
		gdk_flush ();

		nautilus_application_desktop_windows =
			g_list_prepend (nautilus_application_desktop_windows, window);
	}
615 616

	create_in_progress = FALSE;
617 618 619 620
}

void
nautilus_application_open_desktop (NautilusApplication *application)
621
{
622 623
	if (nautilus_application_desktop_windows == NULL) {
		nautilus_application_create_desktop_windows (application);
624 625 626 627 628 629
	}
}

void
nautilus_application_close_desktop (void)
{
630 631 632 633 634
	if (nautilus_application_desktop_windows != NULL) {
		g_list_foreach (nautilus_application_desktop_windows,
				(GFunc) gtk_widget_destroy, NULL);
		g_list_free (nautilus_application_desktop_windows);
		nautilus_application_desktop_windows = NULL;
635
	}
636 637
}

638 639 640
void
nautilus_application_close_all_windows (void)
{
641
	while (nautilus_application_window_list != NULL) {
642 643 644 645
		nautilus_window_close (NAUTILUS_WINDOW (nautilus_application_window_list->data));
	}
}

646
static void
647
nautilus_application_destroyed_window (GtkObject *object, NautilusApplication *application)
648
{
649
	nautilus_application_window_list = g_list_remove (nautilus_application_window_list, object);
650 651
}

652 653 654 655 656 657 658 659 660 661 662 663 664
static gboolean
nautilus_window_delete_event_callback (GtkWidget *widget,
				       GdkEvent *event,
				       gpointer user_data)
{
	NautilusWindow *window;

	window = NAUTILUS_WINDOW (widget);
	nautilus_window_close (window);

	return TRUE;
}				       

665
static gboolean
666
save_window_geometry_timeout (gpointer callback_data)
667 668 669 670 671 672
{
	NautilusWindow *window;
	
	window = NAUTILUS_WINDOW (callback_data);
	
	nautilus_window_save_geometry (window);
673 674

	window->save_geometry_timeout_id = 0;
675 676 677 678 679 680 681 682 683
	return FALSE;
}
 
static gboolean
nautilus_window_configure_event_callback (GtkWidget *widget,
						GdkEventConfigure *event,
						gpointer callback_data)
{
	NautilusWindow *window;
684
	char *geometry_string;
685 686 687
	
	window = NAUTILUS_WINDOW (widget);
	
688 689
	/* Only save the geometry if the user hasn't resized the window
	 * for half a second. Otherwise delay the callback another half second.
690
	 */
691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717
	if (window->save_geometry_timeout_id != 0) {
		g_source_remove (window->save_geometry_timeout_id);	
	}
	if (GTK_WIDGET_VISIBLE (GTK_WIDGET (window)) && !NAUTILUS_IS_DESKTOP_WINDOW (window)) {
		
		geometry_string = eel_gtk_window_get_geometry_string (GTK_WINDOW (window));
	
		/* If the last geometry is NULL the window must have just
		 * been shown. No need to save geometry to disk since it
		 * must be the same.
		 */
		if (window->last_geometry == NULL) {
			window->last_geometry = geometry_string;
			return FALSE;
		}
	
		/* Don't save geometry if it's the same as before. */
		if (!strcmp (window->last_geometry, geometry_string)) {
			g_free (geometry_string);
			return FALSE;
		}

		g_free (window->last_geometry);
		window->last_geometry = geometry_string;

		window->save_geometry_timeout_id = 
				g_timeout_add (500, save_window_geometry_timeout, window);
718 719 720 721 722 723 724 725 726 727 728 729 730 731
	}

	return FALSE;
}

static gboolean
nautilus_window_unrealize_event_callback (GtkWidget *widget,
						GdkEvent *event,
						gpointer callback_data)
{
	NautilusWindow *window;
	
	window = NAUTILUS_WINDOW (widget);

732 733 734
	if (window->save_geometry_timeout_id != 0) {
		g_source_remove (window->save_geometry_timeout_id);
		window->save_geometry_timeout_id = 0;
735 736 737 738 739 740
		nautilus_window_save_geometry (window);
	}

	return FALSE;
}

741
NautilusWindow *
742 743
nautilus_application_create_window (NautilusApplication *application,
				    GdkScreen           *screen)
744
{
745
	NautilusWindow *window;
746 747

	g_return_val_if_fail (NAUTILUS_IS_APPLICATION (application), NULL);
748
	
749
	window = NAUTILUS_WINDOW (gtk_widget_new (nautilus_window_get_type (),
750
						  "app", application,
751 752 753 754
						  "app_id", "nautilus",
						  "screen", screen,
						  NULL));

755 756
	g_signal_connect (window, "delete_event",
			  G_CALLBACK (nautilus_window_delete_event_callback), NULL);
757

758 759
	g_signal_connect_object (window, "destroy",
				 G_CALLBACK (nautilus_application_destroyed_window), application, 0);
760

761
	g_signal_connect (window, "configure_event",
Alexander Larsson's avatar
Alexander Larsson committed
762
			  G_CALLBACK (nautilus_window_configure_event_callback), NULL);
763 764

	g_signal_connect (window, "unrealize",
Alexander Larsson's avatar
Alexander Larsson committed
765
			  G_CALLBACK (nautilus_window_unrealize_event_callback), NULL);
766

767
	nautilus_application_window_list = g_list_prepend (nautilus_application_window_list, window);
768

Gene Z. Ragan's avatar
CVS:  
Gene Z. Ragan committed
769
	/* Do not yet show the window. It will be shown later on if it can
770 771 772
	 * successfully display its initial URI. Otherwise it will be destroyed
	 * without ever having seen the light of day.
	 */
773

774
	return window;
775
}
776

777 778 779 780
/* callback for changing the directory the desktop points to */
static void
desktop_location_changed_callback (gpointer user_data)
{
781 782 783
	if (nautilus_application_desktop_windows != NULL) {
		g_list_foreach (nautilus_application_desktop_windows,
				(GFunc) nautilus_desktop_window_update_directory, NULL);
784
	}
785 786
}

787 788 789 790 791 792 793
/* callback for showing or hiding the desktop based on the user's preference */
static void
desktop_changed_callback (gpointer user_data)
{
	NautilusApplication *application;
	
	application = NAUTILUS_APPLICATION (user_data);
794
	if ( eel_preferences_get_boolean (NAUTILUS_PREFERENCES_SHOW_DESKTOP)) {
795 796 797 798
		nautilus_application_open_desktop (application);
	} else {
		nautilus_application_close_desktop ();
	}
799 800 801 802 803

	/* Can't make this function just watch the preference
	 * itself changing since ordering is important
	 */
	update_session (gnome_master_client ());
804 805
}

Ramiro Estrugo's avatar
Ramiro Estrugo committed
806 807 808 809 810 811
/*
 * need_to_show_first_time_druid
 *
 * Determine whether Nautilus needs to show the first time druid.
 * 
 * Note that the flag file indicating whether the druid has been
812
 * presented is: ~/.nautilus/first-time-flag.
Ramiro Estrugo's avatar
Ramiro Estrugo committed
813 814
 *
 * Another alternative could be to use preferences to store this flag
Darin Adler's avatar
Darin Adler committed
815
 * However, there because of bug 41229 this is not yet possible.
Ramiro Estrugo's avatar
Ramiro Estrugo committed
816 817
 *
 * Also, for debugging purposes, it is convenient to have just one file
818
 * to kill in order to test the startup druid:
Ramiro Estrugo's avatar
Ramiro Estrugo committed
819
 *
820
 * rm -f ~/.nautilus/first-time-flag
Ramiro Estrugo's avatar
Ramiro Estrugo committed
821 822 823 824 825 826 827 828 829 830 831
 *
 * In order to accomplish the same thing with preferences, you would have
 * to either kill ALL your preferences or spend time digging in ~/.gconf
 * xml files finding the right one.
 */
static gboolean
need_to_show_first_time_druid (void)
{
	gboolean result;
	char *user_directory;
	char *druid_flag_file_name;
832
	
Ramiro Estrugo's avatar
Ramiro Estrugo committed
833 834
	user_directory = nautilus_get_user_directory ();

835
	druid_flag_file_name = g_strconcat (user_directory, "/first-time-flag", NULL);
836
	result = !g_file_test (druid_flag_file_name, G_FILE_TEST_EXISTS);
Ramiro Estrugo's avatar
Ramiro Estrugo committed
837 838
	g_free (druid_flag_file_name);

839 840 841 842
	/* we changed the name of the flag for version 1.0, so we should
	 * check for and delete the old one, if the new one didn't exist 
	 */
	if (result) {
843 844
		druid_flag_file_name = g_strconcat (user_directory, "/first-time-wizard-flag", NULL);
		unlink (druid_flag_file_name);
845 846 847
		g_free (druid_flag_file_name);
	}
	g_free (user_directory); 
Ramiro Estrugo's avatar
Ramiro Estrugo committed
848 849
	return result;
}
850

851 852 853 854 855 856 857 858 859 860 861 862 863 864 865
/* Apps like redhat-config-packages that are using the CD-ROM
 * directly, can grab ownership of the _NAUTILUS_DISABLE_MOUNT_WINDOW
 * selection to temporarily disable the new window behavior.
 */
static gboolean
check_mount_window_disabled (void)
{
        Atom selection_atom = gdk_x11_get_xatom_by_name ("_NAUTILUS_DISABLE_MOUNT_WINDOW");

        if (XGetSelectionOwner (GDK_DISPLAY(), selection_atom) != None)
                return TRUE;
	else
		return FALSE;
}

866 867