nautilus-application.c 31.8 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
#if GNOME2_CONVERSION_COMPLETE
119
	} else if (strcmp (iid, NAUTILUS_LIST_VIEW_IID) == 0) {
120
		directory_view = FM_DIRECTORY_VIEW (gtk_object_new (fm_list_view_get_type (), NULL));
121
		object = BONOBO_OBJECT (fm_directory_view_get_nautilus_view (directory_view));
122 123 124
	} 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));
125
#endif
126
	} else if (strcmp (iid, SHELL_IID) == 0) {
127
		application = NAUTILUS_APPLICATION (bonobo_object_from_servant (servant));
128
		object = BONOBO_OBJECT (nautilus_shell_new (application));
129 130
	} 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
131
	} else {
132
		return CORBA_OBJECT_NIL;
Gene Z. Ragan's avatar
CVS:  
Gene Z. Ragan committed
133
	}
134 135

	return CORBA_Object_duplicate (bonobo_object_corba_objref (object), ev);
136 137
}

138 139
GList *
nautilus_application_get_window_list (void)
140 141 142 143
{
	return nautilus_application_window_list;
}

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

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

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

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

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

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

	application = NAUTILUS_APPLICATION (object);

184
	nautilus_bookmarks_exiting ();
185
	
186 187
	bonobo_object_unref (BONOBO_OBJECT (application->undo_manager));

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

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

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

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

220
	failed_count = eel_string_list_get_length (directories);
221

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

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

244
		g_free (directories_as_string);
245
		g_free (error_string);
246
		g_free (dialog_title);
247 248
	}

249
	eel_string_list_free (directories);
250 251

	return failed_count == 0;
252 253
}

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

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

	return uri_list;
}

287
/* Find ~/.gnome-desktop/Trash and rename it to ~/.gnome-desktop/Trash.gmc
288 289 290 291 292 293 294 295 296 297 298 299 300 301
 * 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);
302
#if GNOME2_CONVERSION_COMPLETE
303
		gnome_metadata_rename (trash_dir, dest);
304
#endif
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 365 366
	}
	
	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);
}

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

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

402
	/* initialize URI authentication manager */
403
	nautilus_authentication_manager_init ();
404

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

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

	num_failures = 0;
430

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

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

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

455 456
	CORBA_exception_init (&ev);

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

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

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

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

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

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

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

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

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

615
 out:
616
	CORBA_exception_free (&ev);
617 618 619
}

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

625 626
	nautilus_application_desktop_window = nautilus_desktop_window_new (application);
	gtk_widget_show (GTK_WIDGET (nautilus_application_desktop_window));
627 628 629 630
}

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

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

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

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

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

673
NautilusWindow *
674
nautilus_application_create_window (NautilusApplication *application)
675
{
676
	NautilusWindow *window;
677 678

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

688
	gtk_signal_connect (GTK_OBJECT (window),
689
			    "destroy", G_CALLBACK (nautilus_application_destroyed_window),
690 691
			    application);

692
	nautilus_application_window_list = g_list_prepend (nautilus_application_window_list, window);
693

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

699
	return window;
700
}
701 702

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

713 714 715 716
	if (geteuid () != 0) {
		return TRUE;
	}

717 718 719 720 721 722
	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"
723 724 725
		   "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,
726 727
		 GNOME_STOCK_BUTTON_OK, _("Quit"), NULL);
	result = gnome_dialog_run_and_close (GNOME_DIALOG (dialog));
728
	
729
	return result == 0;
730
}
Ramiro Estrugo's avatar
Ramiro Estrugo committed
731

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

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

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

Ramiro Estrugo's avatar
Ramiro Estrugo committed
761 762 763 764 765 766
/*
 * 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
767
 * presented is: ~/.nautilus/first-time-flag.
Ramiro Estrugo's avatar
Ramiro Estrugo committed
768 769 770 771 772
 *
 * 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
773
 * to kill in order to test the startup druid:
Ramiro Estrugo's avatar
Ramiro Estrugo committed
774
 *
775
 * rm -f ~/.nautilus/first-time-flag
Ramiro Estrugo's avatar
Ramiro Estrugo committed
776 777 778 779 780 781 782 783 784 785 786
 *
 * 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;
787
	
Ramiro Estrugo's avatar
Ramiro Estrugo committed
788 789
	user_directory = nautilus_get_user_directory ();

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

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

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


854 855 856 857 858 859 860 861
/* 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)
{
862
	GList *window_list, *node, *close_list;
863
	NautilusWindow *window;
864 865
	char *uri;
	char *path;
866