nautilus-application.c 31.7 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 <gtk/gtksignal.h>
49
#include <libgnome/gnome-config.h>
50 51
#include <libgnome/gnome-i18n.h>
#include <libgnome/gnome-util.h>
52
#include <libgnomeui/gnome-client.h>
Ramiro Estrugo's avatar
Ramiro Estrugo committed
53
#include <libgnomeui/gnome-messagebox.h>
54
#include <libgnomeui/gnome-stock-icons.h>
55
#include <libgnomevfs/gnome-vfs-mime-handlers.h>
56
#include <libgnomevfs/gnome-vfs-ops.h>
Ramiro Estrugo's avatar
Ramiro Estrugo committed
57
#include <libgnomevfs/gnome-vfs-utils.h>
58 59 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>
#include <libnautilus-private/nautilus-undo-manager.h>
#include <libnautilus-private/nautilus-volume-monitor.h>
65
#include <libnautilus-private/nautilus-authn-manager.h>
66
#include <bonobo-activation/bonobo-activation.h>
67

68 69 70 71
/* Needed for the is_kdesktop_present check */
#include <gdk/gdkx.h>
#include <X11/Xlib.h>

72
#define FACTORY_IID	     "OAFIID:nautilus_factory:bd1e1862-92d7-4391-963e-37583f0daef3"
73
#define SEARCH_LIST_VIEW_IID "OAFIID:nautilus_file_manager_search_list_view:b186e381-198e-43cf-9c46-60b6bb35db0b"
74
#define SHELL_IID	     "OAFIID:nautilus_shell:cd5183b2-3913-4b74-9b8e-10528b0de08d"
75

76 77 78 79 80 81
/* Keeps track of the one and only desktop window. */
static NautilusDesktopWindow *nautilus_application_desktop_window;

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

82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101
static void     nautilus_application_init         (NautilusApplication      *application);
static void     nautilus_application_class_init   (NautilusApplicationClass *klass);
static void     nautilus_application_destroy      (GtkObject                *object);
static gboolean confirm_ok_to_run_as_root         (void);
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);

EEL_DEFINE_CLASS_BOILERPLATE (NautilusApplication,
			      nautilus_application,
			      BONOBO_GENERIC_FACTORY_TYPE)
102 103

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

112
	if (strcmp (iid, NAUTILUS_ICON_VIEW_IID) == 0) {
113
		directory_view = FM_DIRECTORY_VIEW (gtk_object_new (fm_icon_view_get_type (), NULL));
114
		object = BONOBO_OBJECT (fm_directory_view_get_nautilus_view (directory_view));
115 116 117
	} else if (strcmp (iid, NAUTILUS_DESKTOP_ICON_VIEW_IID) == 0) {
		directory_view = FM_DIRECTORY_VIEW (gtk_object_new (fm_desktop_icon_view_get_type (), NULL));
		object = BONOBO_OBJECT (fm_directory_view_get_nautilus_view (directory_view));
118
	} else if (strcmp (iid, NAUTILUS_LIST_VIEW_IID) == 0) {
119
		directory_view = FM_DIRECTORY_VIEW (gtk_object_new (fm_list_view_get_type (), NULL));
120
		object = BONOBO_OBJECT (fm_directory_view_get_nautilus_view (directory_view));
121 122 123
	} else if (strcmp (iid, SEARCH_LIST_VIEW_IID) == 0) {
		directory_view = FM_DIRECTORY_VIEW (gtk_object_new (fm_search_list_view_get_type (), NULL));
		object = BONOBO_OBJECT (fm_directory_view_get_nautilus_view (directory_view));
124
	} else if (strcmp (iid, SHELL_IID) == 0) {
125
		application = NAUTILUS_APPLICATION (bonobo_object_from_servant (servant));
126
		object = BONOBO_OBJECT (nautilus_shell_new (application));
127 128
	} 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
129
	} else {
130
		return CORBA_OBJECT_NIL;
Gene Z. Ragan's avatar
CVS:  
Gene Z. Ragan committed
131
	}
132 133

	return CORBA_Object_duplicate (bonobo_object_corba_objref (object), ev);
134 135
}

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

142
static void
143
nautilus_application_class_init (NautilusApplicationClass *klass)
144
{
145
	GTK_OBJECT_CLASS (klass)->destroy = nautilus_application_destroy;
146 147
	
	BONOBO_GENERIC_FACTORY_CLASS (klass)->epv.createObject = create_object;
148 149 150
}

static void
151
nautilus_application_init (NautilusApplication *application)
152
{
153 154
	/* Create an undo manager */
	application->undo_manager = nautilus_undo_manager_new ();
155

156 157 158
	/* Watch for volume mounts so we can restore open windows */
	gtk_signal_connect (GTK_OBJECT (nautilus_volume_monitor_get ()),
			    "volume_mounted",
159
			    G_CALLBACK (volume_mounted_callback),
160 161 162 163 164
			    application);

	/* Watch for volume unmounts so we can close open windows */
	gtk_signal_connect (GTK_OBJECT (nautilus_volume_monitor_get ()),
			    "volume_unmounted",
165
			    G_CALLBACK (volume_unmounted_callback),
166
			    application);
167 168
}

169 170
NautilusApplication *
nautilus_application_new (void)
171
{
172
	return NAUTILUS_APPLICATION (gtk_object_new (nautilus_application_get_type (), NULL));
173 174 175
}

static void
176
nautilus_application_destroy (GtkObject *object)
177
{
178 179 180 181
	NautilusApplication *application;

	application = NAUTILUS_APPLICATION (object);

182
	nautilus_bookmarks_exiting ();
183
	
184 185
	bonobo_object_unref (BONOBO_OBJECT (application->undo_manager));

Ramiro Estrugo's avatar
Ramiro Estrugo committed
186
	EEL_CALL_PARENT (GTK_OBJECT_CLASS, destroy, (object));
187
}
188

189 190
static gboolean
check_required_directories (NautilusApplication *application)
191
{
192 193 194 195 196 197
	char *user_directory;
	char *desktop_directory;
	EelStringList *directories;
	char *directories_as_string;
	char *error_string;
	char *dialog_title;
198
	GtkDialog *dialog;
199
	int failed_count;
200
	
201
	g_assert (NAUTILUS_IS_APPLICATION (application));
202 203 204 205

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

206
	directories = eel_string_list_new (TRUE);
207
	
208
	if (!g_file_test (user_directory, G_FILE_TEST_IS_DIR)) {
209
		eel_string_list_insert (directories, user_directory);
210
	}
211
	g_free (user_directory);	    
212
	    
213
	if (!g_file_test (desktop_directory, G_FILE_TEST_IS_DIR)) {
214
		eel_string_list_insert (directories, desktop_directory);
215
	}
216
	g_free (desktop_directory);
217

218
	failed_count = eel_string_list_get_length (directories);
219

220
	if (failed_count != 0) {
221
		directories_as_string = eel_string_list_as_string (directories, "\n", EEL_STRING_LIST_ALL_STRINGS);
222

223 224
		if (failed_count == 1) {
			dialog_title = g_strdup (_("Couldn't Create Required Folder"));
225 226 227
			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."),
228
							directories_as_string);
229 230
		} else {
			dialog_title = g_strdup (_("Couldn't Create Required Folders"));
231 232 233 234
			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."),
235
							directories_as_string);
236 237
		}
		
Ramiro Estrugo's avatar
Ramiro Estrugo committed
238
		dialog = eel_show_error_dialog (error_string, dialog_title, NULL);
239 240
		/* We need the main event loop so the user has a chance to see the dialog. */
		nautilus_main_event_loop_register (GTK_OBJECT (dialog));
241

242
		g_free (directories_as_string);
243
		g_free (error_string);
244
		g_free (dialog_title);
245 246
	}

247
	eel_string_list_free (directories);
248 249

	return failed_count == 0;
250 251
}

252 253 254 255 256 257 258 259 260 261
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 *
262
nautilus_make_uri_list_from_shell_strv (const char * const *strv)
263 264 265
{
	int length, i;
	Nautilus_URIList *uri_list;
266
	char *translated_uri;
267 268 269 270 271 272 273 274

	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
275
		translated_uri = eel_make_uri_from_shell_arg (strv[i]);
276 277 278
		uri_list->_buffer[i] = CORBA_string_dup (translated_uri);
		g_free (translated_uri);
		translated_uri = NULL;
279 280 281 282 283 284
	}
	CORBA_sequence_set_release (uri_list, CORBA_TRUE);

	return uri_list;
}

285
/* Find ~/.gnome-desktop/Trash and rename it to ~/.gnome-desktop/Trash.gmc
286 287 288 289 290 291 292 293 294 295 296 297 298 299
 * Only if it is a directory
 */
static void
migrate_gmc_trash (void)
{
	char *dp, *trash_dir, *dest;
	struct stat buf;

	dp = nautilus_get_desktop_directory ();
	trash_dir = g_strconcat (dp, "/", "Trash", NULL);
	dest = g_strconcat (dp, "/", "Trash.gmc", NULL);
	
	if (stat (trash_dir, &buf) == 0 && S_ISDIR (buf.st_mode)) {
		rename (trash_dir, dest);
300
#if GNOME2_CONVERSION_COMPLETE
301
		gnome_metadata_rename (trash_dir, dest);
302
#endif
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 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364
	}
	
	g_free (dp);
	g_free (trash_dir);
	g_free (dest);
}

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);
}

365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393
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 ();
	desktop_link_file = nautilus_make_path (desktop_path,
						"starthere.desktop");

	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;
}

394 395 396 397
static void
finish_startup (NautilusApplication *application)
{
	/* initialize the sound machinery */
398
	nautilus_sound_init ();
399

400
	/* initialize URI authentication manager */
401
	nautilus_authentication_manager_init ();
402

403 404 405 406 407
	/* Make the desktop work with gmc and old Nautilus. */
	migrate_gmc_trash ();
	migrate_old_nautilus_files ();
}

408
void
409
nautilus_application_startup (NautilusApplication *application,
410
			      gboolean kill_shell,
411
			      gboolean restart_shell,
412
			      gboolean no_default_window,
413
			      gboolean no_desktop,
414
			      gboolean do_first_time_druid_check,
415
			      const char *geometry,
416
			      const char *urls[])
417
{
418 419
	CORBA_Environment ev;
	Nautilus_Shell shell;
420
	Bonobo_RegistrationResult result;
421
	const char *message, *detailed_message;
422
	GtkDialog *dialog;
423
	Nautilus_URIList *url_list;
424
	const CORBA_char *corba_geometry;
425 426 427
	int num_failures;

	num_failures = 0;
428

429
	/* Perform check for nautilus being run as super user */
430 431 432 433
	if (!(kill_shell || restart_shell)) {
		if (!confirm_ok_to_run_as_root ()) {
			return;
		}
434
	}
Ramiro Estrugo's avatar
Ramiro Estrugo committed
435

436
	/* Check the user's ~/.nautilus directories and post warnings
437
	 * if there are problems.
438
	 */
439
	if (!kill_shell && !check_required_directories (application)) {
440 441
		return;
	}
442

443 444
	/* Run the first time startup druid if needed. */
	if (do_first_time_druid_check && need_to_show_first_time_druid ()) {
445 446 447 448 449 450
		/* 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 ();
451
	}
452

453 454
	CORBA_exception_init (&ev);

455
	/* Start up the factory. */
456
	while (TRUE) {
457
		/* Try to register the file manager view factory. */
458
		result = bonobo_activation_active_server_register
459 460 461
			(FACTORY_IID,
			 bonobo_object_corba_objref (BONOBO_OBJECT (application)));
		switch (result) {
462 463
		case Bonobo_ACTIVATION_REG_SUCCESS:
			/* We are registered and all is right with the world. */
464
			finish_startup (application);
465
		case Bonobo_ACTIVATION_REG_ALREADY_ACTIVE:
466
			/* Another copy of nautilus already is running and registered. */
467
			message = NULL;
468
			detailed_message = NULL;
469
			break;
470
		case Bonobo_ACTIVATION_REG_NOT_LISTED:
471
			/* Can't register myself due to trouble locating the
472
			 * Nautilus_Shell.server file. This has happened when you
473 474 475
			 * launch Nautilus with an LD_LIBRARY_PATH that
			 * doesn't include the directory containg the oaf
			 * library. It could also happen if the
476
			 * Nautilus_Shell.server file was not present for some
477 478 479 480 481
			 * 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. "
482 483 484 485
				    "Running the command \"nautilus-clean.sh -x\""
				    " from the console may fix the problem. If not,"
				    " you can try rebooting the computer or"
				    " installing Nautilus again.");
486
			/* FIXME bugzilla.gnome.org 42536: The guesses and stuff here are lame. */
487
			detailed_message = _("Nautilus can't be used now. "
488 489 490 491 492
					     "Running the command \"nautilus-clean.sh -x\" "
					     "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. "
493
					     "One cause of this seems to be an LD_LIBRARY_PATH "
494
					     "that does not include the bonobo-activation library's directory. "
495
					     "Another possible cause would be bad install "
496
					     "with a missing Nautilus_Shell.server file.\n\n"
497
					     "Running \"nautilus-clean.sh -x\" will kill all "
498
					     "Bonobo Activation and GConf processes, which may be needed by "
499
					     "other applications.\n\n"
500
					     "Sometimes killing bonobo-activation-server and gconfd fixes "
501
					     "the problem, but we don't know why.\n\n"
502
					     "We have also seen this error when a faulty "
503
					     "version of bonobo-activation was installed.");
504 505 506
			break;
		default:
			/* This should never happen. */
507
			g_warning ("bad error code from bonobo_activation_active_server_register");
508
		case Bonobo_ACTIVATION_REG_ERROR:
509
			/* Some misc. error (can never happen with current
510
			 * version of bonobo-activation). Show dialog and terminate the
511 512
			 * program.
			 */
513
			/* FIXME bugzilla.gnome.org 42537: Looks like this does happen with the
514
			 * current OAF. I guess I read the code wrong. Need to figure out when and make a
515 516
			 * good message.
			 */
517 518
			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 "
519
					     "from Bonobo when attempting to register the file manager view server.");
520 521
			break;
		}
522 523 524

		/* Get the shell object. */
		if (message == NULL) {
525
			shell = bonobo_activation_activate_from_id (SHELL_IID, 0, NULL, NULL);
526 527 528 529 530 531 532
			if (!CORBA_Object_is_nil (shell, &ev)) {
				break;
			}

			/* If we couldn't find ourselves it's a bad problem so
			 * we better stop looping.
			 */
533
			if (result == Bonobo_ACTIVATION_REG_SUCCESS) {
534
				/* FIXME bugzilla.gnome.org 42538: When can this happen? */
535 536
				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 "
537 538
						     "from Bonobo when attempting to locate the factory."
						     "Killing bonobo-activation-server and restarting Nautilus may help fix the problem.");
539 540 541 542 543
			} 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 "
544 545
							     "from Bonobo when attempting to locate the shell object. "
							     "Killing bonobo-activation-server and restarting Nautilus may help fix the problem.");
546 547
					
				}
548 549 550
			}
		}

551
		if (message != NULL) {
Ramiro Estrugo's avatar
Ramiro Estrugo committed
552
			dialog = eel_show_error_dialog_with_details (message, NULL, detailed_message, NULL);
553 554
			/* We need the main event loop so the user has a chance to see the dialog. */
			nautilus_main_event_loop_register (GTK_OBJECT (dialog));
555
			goto out;
556 557 558
		}
	}

559 560
	if (kill_shell) {
		Nautilus_Shell_quit (shell, &ev);
561 562
	} else if (restart_shell) {
		Nautilus_Shell_restart (shell, &ev);
563
	} else {
564
		/* If KDE desktop is running, then force no_desktop */
565
		if (is_kdesktop_present ()) {
566
			no_desktop = TRUE;
567
		}
568
		
569
		if (!no_desktop && eel_preferences_get_boolean (NAUTILUS_PREFERENCES_SHOW_DESKTOP)) {
570 571
			Nautilus_Shell_start_desktop (shell, &ev);
		}
572 573
		
		/* Monitor the preference to show or hide the desktop */
574
		eel_preferences_add_callback_while_alive (NAUTILUS_PREFERENCES_SHOW_DESKTOP,
575 576 577
							       desktop_changed_callback,
							       application,
							       GTK_OBJECT (application));
578

579 580
		/* Monitor the preference to have the desktop */
		/* point to the Unix home folder */
581
		eel_preferences_add_callback_while_alive (NAUTILUS_PREFERENCES_DESKTOP_IS_HOME_DIR,
582
							       desktop_location_changed_callback,
583
							       NULL,
584 585
							       GTK_OBJECT (application));

586 587 588 589
		/* CORBA C mapping doesn't allow NULL to be passed
		   for string parameters */
		corba_geometry = (geometry != NULL) ? geometry : "";

590 591
	  	/* Create the other windows. */
		if (urls != NULL) {
592
			url_list = nautilus_make_uri_list_from_shell_strv (urls);
593
			Nautilus_Shell_open_windows (shell, url_list, corba_geometry, &ev);
594
			CORBA_free (url_list);
595
		} else if (!no_default_window) {
596
			Nautilus_Shell_open_default_window (shell, corba_geometry, &ev);
597
		}
598 599 600
		
		/* Add ourselves to the session */
		init_session ();
601
	}
602

603
	/* We're done with the shell now, so let it go. */
604 605 606 607 608
	/* 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.
	 */
609
	if (!(kill_shell || restart_shell)) {
610
		bonobo_object_release_unref (shell, NULL);
611
	}
612

613
 out:
614
	CORBA_exception_free (&ev);
615 616 617
}

static void
618 619
nautilus_application_create_desktop_window (NautilusApplication *application)
{
620 621
	g_return_if_fail (nautilus_application_desktop_window == NULL);
	g_return_if_fail (NAUTILUS_IS_APPLICATION (application));
622

623 624
	nautilus_application_desktop_window = nautilus_desktop_window_new (application);
	gtk_widget_show (GTK_WIDGET (nautilus_application_desktop_window));
625 626 627 628
}

void
nautilus_application_open_desktop (NautilusApplication *application)
629
{
630 631
	if (nautilus_application_desktop_window == NULL) {
		nautilus_application_create_desktop_window (application);
632 633 634 635 636 637
	}
}

void
nautilus_application_close_desktop (void)
{
638
	if (nautilus_application_desktop_window != NULL) {
639
		gtk_widget_destroy (GTK_WIDGET (nautilus_application_desktop_window));
640
		nautilus_application_desktop_window = NULL;
641
	}
642 643
}

644 645 646
void
nautilus_application_close_all_windows (void)
{
647
	while (nautilus_application_window_list != NULL) {
648 649 650 651
		nautilus_window_close (NAUTILUS_WINDOW (nautilus_application_window_list->data));
	}
}

652
static void
653
nautilus_application_destroyed_window (GtkObject *object, NautilusApplication *application)
654
{
655
	nautilus_application_window_list = g_list_remove (nautilus_application_window_list, object);
656 657
}

658 659 660 661 662 663 664 665 666 667 668 669 670
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;
}				       

671
NautilusWindow *
672
nautilus_application_create_window (NautilusApplication *application)
673
{
674
	NautilusWindow *window;
675 676

	g_return_val_if_fail (NAUTILUS_IS_APPLICATION (application), NULL);
677
	
678
	window = NAUTILUS_WINDOW (gtk_widget_new (nautilus_window_get_type (),
679
						  "app", GTK_OBJECT (application),
680
						  "app_id", "nautilus", NULL));
681
	
682
	gtk_signal_connect (GTK_OBJECT (window), 
683
			    "delete_event", G_CALLBACK (nautilus_window_delete_event_callback),
684 685
                    	    NULL);

686
	gtk_signal_connect (GTK_OBJECT (window),
687
			    "destroy", G_CALLBACK (nautilus_application_destroyed_window),
688 689
			    application);

690
	nautilus_application_window_list = g_list_prepend (nautilus_application_window_list, window);
691

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

697
	return window;
698
}
699 700

/*
701
 * confirm_ok_to_run_as_root:
702 703 704 705
 *
 * Puts out a warning if the user is running nautilus as root.
 */
static gboolean
706
confirm_ok_to_run_as_root (void)
707
{
708 709
	GtkWidget *dialog;
	int result;
710

711 712 713 714
	if (geteuid () != 0) {
		return TRUE;
	}

715 716 717 718 719 720
	if (g_getenv ("NAUTILUS_OK_TO_RUN_AS_ROOT") != NULL) {
		return TRUE;
	}

	dialog = gnome_message_box_new
		(_("You are about to run Nautilus as root.\n\n"
721 722 723
		   "As root, you can damage your system if you are not careful, and\n"
		   "Nautilus will not stop you from doing it."),
		 GNOME_MESSAGE_BOX_WARNING,
724 725
		 GNOME_STOCK_BUTTON_OK, _("Quit"), NULL);
	result = gnome_dialog_run_and_close (GNOME_DIALOG (dialog));
726
	
727
	return result == 0;
728
}
Ramiro Estrugo's avatar
Ramiro Estrugo committed
729

730 731 732 733
/* callback for changing the directory the desktop points to */
static void
desktop_location_changed_callback (gpointer user_data)
{
734 735 736
	if (nautilus_application_desktop_window != NULL) {
		nautilus_desktop_window_update_directory
			(nautilus_application_desktop_window);
737
	}
738 739
}

740 741 742 743 744 745 746
/* 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);
747
	if ( eel_preferences_get_boolean (NAUTILUS_PREFERENCES_SHOW_DESKTOP)) {
748 749 750 751
		nautilus_application_open_desktop (application);
	} else {
		nautilus_application_close_desktop ();
	}
752 753 754 755 756

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

Ramiro Estrugo's avatar
Ramiro Estrugo committed
759 760 761 762 763 764
/*
 * 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
765
 * presented is: ~/.nautilus/first-time-flag.
Ramiro Estrugo's avatar
Ramiro Estrugo committed
766 767 768 769 770
 *
 * Another alternative could be to use preferences to store this flag
 * However, there because of bug 1229 this is not yet possible.
 *
 * Also, for debugging purposes, it is convenient to have just one file
771
 * to kill in order to test the startup druid:
Ramiro Estrugo's avatar
Ramiro Estrugo committed
772
 *
773
 * rm -f ~/.nautilus/first-time-flag
Ramiro Estrugo's avatar
Ramiro Estrugo committed
774 775 776 777 778 779 780 781 782 783 784
 *
 * 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;
785
	
Ramiro Estrugo's avatar
Ramiro Estrugo committed
786 787
	user_directory = nautilus_get_user_directory ();

788
	druid_flag_file_name = g_strconcat (user_directory, "/first-time-flag", NULL);
789
	result = !g_file_exists (druid_flag_file_name);	
Ramiro Estrugo's avatar
Ramiro Estrugo committed
790 791
	g_free (druid_flag_file_name);

792 793 794 795
	/* 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) {
796 797
		druid_flag_file_name = g_strconcat (user_directory, "/first-time-wizard-flag", NULL);
		unlink (druid_flag_file_name);
798 799 800
		g_free (druid_flag_file_name);
	}
	g_free (user_directory); 
Ramiro Estrugo's avatar
Ramiro Estrugo committed
801 802
	return result;
}
803 804 805 806 807

static void
volume_mounted_callback (NautilusVolumeMonitor *monitor, NautilusVolume *volume,
			 NautilusApplication *application)
{
808 809 810 811 812 813 814 815
	NautilusWindow *window;
	char *uri;
	
	if (volume == NULL || application == NULL) {
		return;
	}
	
	/* Open a window to the CD if the user has set that preference. */
816
	if (nautilus_volume_get_device_type (volume) == NAUTILUS_DEVICE_CDROM_DRIVE
817 818
		&& gnome_config_get_bool ("/magicdev/Options/do_fileman_window=true")) {		
		window = nautilus_application_create_window (application);
819
		uri = gnome_vfs_get_uri_from_local_path (nautilus_volume_get_mount_path (volume));
820 821 822
		nautilus_window_go_to (window, uri);
		g_free (uri);
	}
823 824
}

825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851
static gboolean
window_can_be_closed (NautilusWindow *window)
{
	if (!NAUTILUS_IS_DESKTOP_WINDOW (window)) {
		return TRUE;
	}
	
	return FALSE;
}

static gboolean
is_last_closable_window (NautilusWindow *window)
{
	GList *node, *window_list;
	
	window_list = nautilus_application_get_window_list ();
	
	for (node = window_list; node != NULL; node = node->next) {
		if (window != NAUTILUS_WINDOW (node->data) && window_can_be_closed (NAUTILUS_WINDOW (node->data))) {
			return FALSE;
		}
	}
	
	return TRUE;
}


852 853 854 855 856 857 858 859
/* Called whenever a volume is unmounted. Check and see if there are any windows open
 * displaying contents on the volume. If there are, close them.
 * It would also be cool to save open window and position info.
 */
static void
volume_unmounted_callback (NautilusVolumeMonitor *monitor, NautilusVolume *volume,
			   NautilusApplication *application)
{
860
	GList *window_list, *node, *close_list;
861
	NautilusWindow *window;
862 863
	char *uri;
	char *path;
864 865 866 867
		
	close_list = NULL;
	
	/* Check and see if any of the open windows are displaying contents from the unmounted volume */
868
	window_list = nautilus_application_get_window_list ();