nautilus-application.c 29.1 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 24
 *  Authors: Elliot Lee <sopwith@redhat.com>,
 *           Darin Adler <darin@eazel.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>
Ramiro Estrugo's avatar
Ramiro Estrugo committed
42 43 44 45 46
#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>
47
#include <gtk/gtksignal.h>
48
#include <libgnome/gnome-config.h>
49 50
#include <libgnome/gnome-i18n.h>
#include <libgnome/gnome-util.h>
51
#include <libgnomeui/gnome-client.h>
Ramiro Estrugo's avatar
Ramiro Estrugo committed
52
#include <libgnomeui/gnome-messagebox.h>
53
#include <libgnomeui/gnome-stock.h>
54
#include <libgnomevfs/gnome-vfs-mime-handlers.h>
55
#include <libgnomevfs/gnome-vfs-ops.h>
Ramiro Estrugo's avatar
Ramiro Estrugo committed
56
#include <libgnomevfs/gnome-vfs-utils.h>
57
#include <libnautilus-extensions/nautilus-file-utilities.h>
58
#include <libnautilus-extensions/nautilus-global-preferences.h>
59
#include <libnautilus-extensions/nautilus-icon-factory.h>
Ramiro Estrugo's avatar
Ramiro Estrugo committed
60
#include <libnautilus-extensions/nautilus-metafile-factory.h>
61
#include <libnautilus-extensions/nautilus-sound.h>
62
#include <libnautilus-extensions/nautilus-undo-manager.h>
63
#include <libnautilus-extensions/nautilus-volume-monitor.h>
64
#include <liboaf/liboaf.h>
65

66 67 68
#define FACTORY_IID	     "OAFIID:nautilus_factory:bd1e1862-92d7-4391-963e-37583f0daef3"
#define ICON_VIEW_IID	     "OAFIID:nautilus_file_manager_icon_view:42681b21-d5ca-4837-87d2-394d88ecc058"
#define LIST_VIEW_IID	     "OAFIID:nautilus_file_manager_list_view:521e489d-0662-4ad7-ac3a-832deabe111c"
69
#define SEARCH_LIST_VIEW_IID "OAFIID:nautilus_file_manager_search_list_view:b186e381-198e-43cf-9c46-60b6bb35db0b"
70
#define SHELL_IID	     "OAFIID:nautilus_shell:cd5183b2-3913-4b74-9b8e-10528b0de08d"
71

72 73 74 75 76 77 78 79 80 81 82 83 84
static CORBA_boolean manufactures                          (PortableServer_Servant    servant,
							    const CORBA_char         *iid,
							    CORBA_Environment        *ev);
static CORBA_Object  create_object                         (PortableServer_Servant    servant,
							    const CORBA_char         *iid,
							    const GNOME_stringlist   *params,
							    CORBA_Environment        *ev);
static void          nautilus_application_initialize       (NautilusApplication      *application);
static void          nautilus_application_initialize_class (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);
85
static void          desktop_location_changed_callback     (gpointer                  user_data);
86 87 88 89 90 91
static void          volume_mounted_callback               (NautilusVolumeMonitor    *monitor,
							    NautilusVolume           *volume,
							    NautilusApplication      *application);
static void          volume_unmounted_callback             (NautilusVolumeMonitor    *monitor,
							    NautilusVolume           *volume,
							    NautilusApplication      *application);
92
static void	     init_session 			    (void);
93

Ramiro Estrugo's avatar
Ramiro Estrugo committed
94
EEL_DEFINE_CLASS_BOILERPLATE (NautilusApplication, nautilus_application, BONOBO_OBJECT_TYPE)
95

96
static POA_GNOME_ObjectFactory__epv factory_epv = {
Gene Z. Ragan's avatar
CVS:  
Gene Z. Ragan committed
97
	NULL,
98 99 100 101
	&manufactures,
	&create_object
};
static PortableServer_ServantBase__epv base_epv;
102
static POA_GNOME_ObjectFactory__vepv vepv = {
103 104
	&base_epv,
	&factory_epv
105 106 107
};

static CORBA_boolean
108 109 110
manufactures (PortableServer_Servant servant,
	      const CORBA_char *iid,
	      CORBA_Environment *ev)
111
{
112
	return strcmp (iid, ICON_VIEW_IID) == 0
113
		|| strcmp (iid, NAUTILUS_DESKTOP_ICON_VIEW_IID) == 0
114
		|| strcmp (iid, LIST_VIEW_IID) == 0
115
		|| strcmp (iid, SEARCH_LIST_VIEW_IID) == 0
116 117
		|| strcmp (iid, SHELL_IID) == 0
		|| strcmp (iid, METAFILE_FACTORY_IID) == 0;
118 119 120
}

static CORBA_Object
121 122
create_object (PortableServer_Servant servant,
	       const CORBA_char *iid,
Maciej Stachowiak's avatar
Maciej Stachowiak committed
123
	       const GNOME_stringlist *params,
124
	       CORBA_Environment *ev)
125
{
126
	BonoboObject *object;
127
	FMDirectoryView *directory_view;
128
	NautilusApplication *application;
129

130
	if (strcmp (iid, ICON_VIEW_IID) == 0) {
131
		directory_view = FM_DIRECTORY_VIEW (gtk_object_new (fm_icon_view_get_type (), NULL));
132
		object = BONOBO_OBJECT (fm_directory_view_get_nautilus_view (directory_view));
133 134 135
	} 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));
136
	} else if (strcmp (iid, LIST_VIEW_IID) == 0) {
137
		directory_view = FM_DIRECTORY_VIEW (gtk_object_new (fm_list_view_get_type (), NULL));
138
		object = BONOBO_OBJECT (fm_directory_view_get_nautilus_view (directory_view));
139 140 141
	} 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));
142
	} else if (strcmp (iid, SHELL_IID) == 0) {
143 144
		application = NAUTILUS_APPLICATION (((BonoboObjectServant *) servant)->bonobo_object);
		object = BONOBO_OBJECT (nautilus_shell_new (application));
145 146
	} 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
147
	} else {
148
		return CORBA_OBJECT_NIL;
Gene Z. Ragan's avatar
CVS:  
Gene Z. Ragan committed
149
	}
150 151

	return CORBA_Object_duplicate (bonobo_object_corba_objref (object), ev);
152 153
}

154
static CORBA_Object
155 156 157
create_factory (PortableServer_POA poa,
		NautilusApplication *bonobo_object,
		CORBA_Environment *ev)
158
{
159
	BonoboObjectServant *servant;
Gene Z. Ragan's avatar
CVS:  
Gene Z. Ragan committed
160

161
	servant = g_new0 (BonoboObjectServant, 1);
162 163
	((POA_GNOME_ObjectFactory *) servant)->vepv = &vepv;
	POA_GNOME_ObjectFactory__init ((PortableServer_Servant) servant, ev);
164
	return bonobo_object_activate_servant (BONOBO_OBJECT (bonobo_object), servant);
165 166
}

167
/* Keeps track of the one and only desktop window. */
168
static NautilusDesktopWindow *nautilus_application_desktop_window;
169 170

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

173 174
GList *
nautilus_application_get_window_list (void)
175 176 177 178
{
	return nautilus_application_window_list;
}

179
static void
180
nautilus_application_initialize_class (NautilusApplicationClass *klass)
181
{
182
	GTK_OBJECT_CLASS (klass)->destroy = nautilus_application_destroy;
183 184 185
}

static void
186
nautilus_application_initialize (NautilusApplication *application)
187
{
188
	CORBA_Environment ev;
189
	CORBA_Object corba_object;
190

191
	CORBA_exception_init (&ev);
192
	corba_object = create_factory (bonobo_poa (), application, &ev);
193 194 195 196
	if (ev._major != CORBA_NO_EXCEPTION) {
		g_error ("could not create factory");
	}
	CORBA_exception_free (&ev);
197
	
198
	bonobo_object_construct (BONOBO_OBJECT (application), corba_object);
199
	
200 201
	/* Create an undo manager */
	application->undo_manager = nautilus_undo_manager_new ();
202

203 204 205 206 207 208 209 210 211 212 213
	/* Watch for volume mounts so we can restore open windows */
	gtk_signal_connect (GTK_OBJECT (nautilus_volume_monitor_get ()),
			    "volume_mounted",
			    volume_mounted_callback,
			    application);

	/* Watch for volume unmounts so we can close open windows */
	gtk_signal_connect (GTK_OBJECT (nautilus_volume_monitor_get ()),
			    "volume_unmounted",
			    volume_unmounted_callback,
			    application);
214 215
}

216 217
NautilusApplication *
nautilus_application_new (void)
218
{
219
	return NAUTILUS_APPLICATION (gtk_object_new (nautilus_application_get_type (), NULL));
220 221 222
}

static void
223
nautilus_application_destroy (GtkObject *object)
224
{
225 226 227 228
	NautilusApplication *application;

	application = NAUTILUS_APPLICATION (object);

229
	nautilus_bookmarks_exiting ();
230
	
231 232
	bonobo_object_unref (BONOBO_OBJECT (application->undo_manager));

Ramiro Estrugo's avatar
Ramiro Estrugo committed
233
	EEL_CALL_PARENT (GTK_OBJECT_CLASS, destroy, (object));
234
}
235

236 237
static gboolean
check_required_directories (NautilusApplication *application)
238
{
239 240 241 242 243 244 245 246 247
	char *user_directory;
	char *user_main_directory;
	char *desktop_directory;
	EelStringList *directories;
	char *directories_as_string;
	char *error_string;
	char *dialog_title;
	GnomeDialog *dialog;
	int failed_count;
248
	
249
	g_assert (NAUTILUS_IS_APPLICATION (application));
250 251 252 253 254

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

255
	directories = eel_string_list_new (TRUE);
256 257
	
	if (!g_file_test (user_directory, G_FILE_TEST_ISDIR)) {
258
		eel_string_list_insert (directories, user_directory);
259
	}
260
	g_free (user_directory);
261 262
	    
	if (!g_file_test (user_main_directory, G_FILE_TEST_ISDIR)) {
263
		eel_string_list_insert (directories, user_main_directory);
264
	}
265
	g_free (user_main_directory);
266 267
	    
	if (!g_file_test (desktop_directory, G_FILE_TEST_ISDIR)) {
268
		eel_string_list_insert (directories, desktop_directory);
269
	}
270
	g_free (desktop_directory);
271

272
	failed_count = eel_string_list_get_length (directories);
273

274
	if (failed_count != 0) {
275
		directories_as_string = eel_string_list_as_string (directories, "\n", EEL_STRING_LIST_ALL_STRINGS);
276

277 278
		if (failed_count == 1) {
			dialog_title = g_strdup (_("Couldn't Create Required Folder"));
279 280 281
			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."),
282
							directories_as_string);
283 284
		} else {
			dialog_title = g_strdup (_("Couldn't Create Required Folders"));
285 286 287 288
			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."),
289
							directories_as_string);
290 291
		}
		
Ramiro Estrugo's avatar
Ramiro Estrugo committed
292
		dialog = eel_show_error_dialog (error_string, dialog_title, NULL);
293 294
		/* We need the main event loop so the user has a chance to see the dialog. */
		nautilus_main_event_loop_register (GTK_OBJECT (dialog));
295

296
		g_free (directories_as_string);
297
		g_free (error_string);
298
		g_free (dialog_title);
299 300
	}

301
	eel_string_list_free (directories);
302 303

	return failed_count == 0;
304 305
}

306 307 308 309 310 311 312 313 314 315
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 *
316
nautilus_make_uri_list_from_shell_strv (const char * const *strv)
317 318 319
{
	int length, i;
	Nautilus_URIList *uri_list;
320
	char *translated_uri;
321 322 323 324 325 326 327 328

	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
329
		translated_uri = eel_make_uri_from_shell_arg (strv[i]);
330 331 332
		uri_list->_buffer[i] = CORBA_string_dup (translated_uri);
		g_free (translated_uri);
		translated_uri = NULL;
333 334 335 336 337 338
	}
	CORBA_sequence_set_release (uri_list, CORBA_TRUE);

	return uri_list;
}

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 367 368 369
/* This is a bit of a hack to make the Preferences dialog version of the List View/Icon View
 * default choice work with the gnome-vfs-based mechanism for choosing a handler for a MIME type.
 */
static void
default_folder_viewer_changed_callback (gpointer callback_data)
{
	int preference_value;
	const char *viewer_iid;

	g_assert (callback_data == NULL);

	preference_value = 
		nautilus_preferences_get_integer (NAUTILUS_PREFERENCES_DEFAULT_FOLDER_VIEWER);

	if (preference_value == NAUTILUS_DEFAULT_FOLDER_VIEWER_LIST_VIEW) {
		viewer_iid = LIST_VIEW_IID;
	} else {
		g_return_if_fail (preference_value == NAUTILUS_DEFAULT_FOLDER_VIEWER_ICON_VIEW);
		viewer_iid = ICON_VIEW_IID;
	}

	gnome_vfs_mime_set_default_action_type ("x-directory/normal", GNOME_VFS_MIME_ACTION_TYPE_COMPONENT);
	gnome_vfs_mime_set_default_component ("x-directory/normal", viewer_iid);

	/* FIXME bugzilla.eazel.com 8024: 
	 * when preference changes, we tell gnome-vfs. But if gnome-vfs value changes
	 * some other way, preferences mechanism isn't told, so value displayed in
	 * preferences dialog might be incorrect.
	 */
}

370
void
371
nautilus_application_startup (NautilusApplication *application,
372
			      gboolean kill_shell,
373
			      gboolean restart_shell,
374
			      gboolean start_desktop,
375
			      gboolean no_default_window,
376
			      gboolean do_first_time_druid_check,
377
			      const char *geometry,
378
			      const char *urls[])
379
{
380 381
	CORBA_Environment ev;
	Nautilus_Shell shell;
382 383 384
	OAF_RegistrationResult result;
	const char *message, *detailed_message;
	GnomeDialog *dialog;
385
	Nautilus_URIList *url_list;
386
	const CORBA_char *corba_geometry;
387 388 389
	int num_failures;

	num_failures = 0;
390

391
	/* Perform check for nautilus being run as super user */
392 393 394 395
	if (!(kill_shell || restart_shell)) {
		if (!confirm_ok_to_run_as_root ()) {
			return;
		}
396
	}
Ramiro Estrugo's avatar
Ramiro Estrugo committed
397

398
	/* Check the user's ~/.nautilus directories and post warnings
399
	 * if there are problems.
400
	 */
401 402 403
	if (!check_required_directories (application)) {
		return;
	}
404

405 406 407 408 409 410
	/* Run the first time startup druid if needed. */
	if (do_first_time_druid_check && need_to_show_first_time_druid ()) {
		nautilus_first_time_druid_show (application, start_desktop, urls);
		return;
	}
	
411 412 413
	/* initialize the sound machinery */
	nautilus_sound_initialize ();
	
414 415
	CORBA_exception_init (&ev);

416
	/* Start up the factory. */
417
	while (TRUE) {
418 419 420 421 422 423 424
		/* Try to register the file manager view factory with OAF. */
		result = oaf_active_server_register
			(FACTORY_IID,
			 bonobo_object_corba_objref (BONOBO_OBJECT (application)));
		switch (result) {
		case OAF_REG_SUCCESS:
			/* We are registered with OAF and all is right with the world. */
425
		case OAF_REG_ALREADY_ACTIVE:
426
			/* Another copy of nautilus already is running and registered. */
427
			message = NULL;
428
			detailed_message = NULL;
429 430 431
			break;
		case OAF_REG_NOT_LISTED:
			/* Can't register myself due to trouble locating the
432
			 * Nautilus_Shell.oaf file. This has happened when you
433 434 435
			 * launch Nautilus with an LD_LIBRARY_PATH that
			 * doesn't include the directory containg the oaf
			 * library. It could also happen if the
436
			 * Nautilus_Shell.oaf file was not present for some
437 438 439 440 441
			 * 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. "
442 443 444 445
				    "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.");
446
			/* FIXME bugzilla.eazel.com 2536: The guesses and stuff here are lame. */
447
			detailed_message = _("Nautilus can't be used now. "
448 449 450 451
					     "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"
452
					     "OAF couldn't locate the Nautilus_shell.oaf file. "
453 454 455
					     "One cause of this seems to be an LD_LIBRARY_PATH "
					     "that does not include the oaf library's directory. "
					     "Another possible cause would be bad install "
456
					     "with a missing Nautilus_Shell.oaf file.\n\n"
457 458 459
					     "Running \"nautilus-clean.sh -x\" will kill all "
					     "OAF and GConf processes, which may be needed by "
					     "other applications.\n\n"
460
					     "Sometimes killing oafd and gconfd fixes "
461
					     "the problem, but we don't know why.\n\n"
462 463
					     "We have also seen this error when a faulty "
					     "version of oaf was installed.");
464 465 466 467 468 469 470 471 472
			break;
		default:
			/* This should never happen. */
			g_warning ("bad error code from oaf_active_server_register");
		case OAF_REG_ERROR:
			/* Some misc. error (can never happen with current
			 * version of OAF). Show dialog and terminate the
			 * program.
			 */
473
			/* FIXME bugzilla.eazel.com 2537: Looks like this does happen with the
474 475 476 477
			 * current OAF. I guess I read the code
			 * wrong. Need to figure out when and make a
			 * good message.
			 */
478 479 480 481 482
			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 "
					     "from OAF when attempting to register the file manager view server.");
			break;
		}
483 484 485 486 487 488 489 490 491 492 493 494

		/* Get the shell object. */
		if (message == NULL) {
			shell = oaf_activate_from_id (SHELL_IID, 0, NULL, NULL);
			if (!CORBA_Object_is_nil (shell, &ev)) {
				break;
			}

			/* If we couldn't find ourselves it's a bad problem so
			 * we better stop looping.
			 */
			if (result == OAF_REG_SUCCESS) {
495
				/* FIXME bugzilla.eazel.com 2538: When can this happen? */
496 497
				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 "
498 499 500 501 502 503 504 505 506 507 508
						     "from OAF when attempting to locate the factory."
						     "Killing oafd and restarting Nautilus may help fix the problem.");
			} 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 "
							     "from OAF when attempting to locate the shell object. "
							     "Killing oafd and restarting Nautilus may help fix the problem.");
					
				}
509 510 511
			}
		}

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

520 521
	if (kill_shell) {
		Nautilus_Shell_quit (shell, &ev);
522 523
	} else if (restart_shell) {
		Nautilus_Shell_restart (shell, &ev);
524 525 526 527
	} else {
		if (start_desktop) {
			Nautilus_Shell_start_desktop (shell, &ev);
		}
528 529 530 531 532 533
		
		/* Monitor the preference to show or hide the desktop */
		nautilus_preferences_add_callback_while_alive (NAUTILUS_PREFERENCES_SHOW_DESKTOP,
							       desktop_changed_callback,
							       application,
							       GTK_OBJECT (application));
534

535 536 537 538 539 540 541
		/* Monitor the preference to have the desktop */
		/* point to the Unix home folder */
		nautilus_preferences_add_callback_while_alive (NAUTILUS_PREFERENCES_DESKTOP_IS_HOME_DIR,
							       desktop_location_changed_callback,
							       nautilus_application_desktop_window,
							       GTK_OBJECT (application));

542 543 544 545 546
		nautilus_preferences_add_callback_while_alive (NAUTILUS_PREFERENCES_DEFAULT_FOLDER_VIEWER, 
						   	       default_folder_viewer_changed_callback, 
						   	       NULL,
						   	       GTK_OBJECT (application));

547 548 549 550
		/* CORBA C mapping doesn't allow NULL to be passed
		   for string parameters */
		corba_geometry = (geometry != NULL) ? geometry : "";

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

564
	/* We're done with the shell now, so let it go. */
565 566 567 568 569
	/* 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.
	 */
570
	if (!(kill_shell || restart_shell)) {
571
		bonobo_object_release_unref (shell, NULL);
572
	}
573

574
 out:
575
	CORBA_exception_free (&ev);
576 577 578
}

static void
579 580
nautilus_application_create_desktop_window (NautilusApplication *application)
{
581 582
	g_return_if_fail (nautilus_application_desktop_window == NULL);
	g_return_if_fail (NAUTILUS_IS_APPLICATION (application));
583

584 585
	nautilus_application_desktop_window = nautilus_desktop_window_new (application);
	gtk_widget_show (GTK_WIDGET (nautilus_application_desktop_window));
586 587 588 589
}

void
nautilus_application_open_desktop (NautilusApplication *application)
590
{
591 592
	if (nautilus_application_desktop_window == NULL) {
		nautilus_application_create_desktop_window (application);
593 594 595 596 597 598
	}
}

void
nautilus_application_close_desktop (void)
{
599
	if (nautilus_application_desktop_window != NULL) {
600
		gtk_widget_destroy (GTK_WIDGET (nautilus_application_desktop_window));
601
		nautilus_application_desktop_window = NULL;
602
	}	
603 604
}

605 606 607
void
nautilus_application_close_all_windows (void)
{
608
	while (nautilus_application_window_list != NULL) {
609 610 611 612
		nautilus_window_close (NAUTILUS_WINDOW (nautilus_application_window_list->data));
	}
}

613
static void
614
nautilus_application_destroyed_window (GtkObject *object, NautilusApplication *application)
615
{
616
	nautilus_application_window_list = g_list_remove (nautilus_application_window_list, object);
617 618
}

619 620 621 622 623 624 625 626 627 628 629 630 631
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;
}				       

632
NautilusWindow *
633
nautilus_application_create_window (NautilusApplication *application)
634
{
635
	NautilusWindow *window;
636 637

	g_return_val_if_fail (NAUTILUS_IS_APPLICATION (application), NULL);
638
	
639
	window = NAUTILUS_WINDOW (gtk_widget_new (nautilus_window_get_type (),
640
						  "app", GTK_OBJECT (application),
641
						  "app_id", "nautilus", NULL));
642
	
643 644 645 646
	gtk_signal_connect (GTK_OBJECT (window), 
			    "delete_event", GTK_SIGNAL_FUNC (nautilus_window_delete_event_callback),
                    	    NULL);

647
	gtk_signal_connect (GTK_OBJECT (window),
648
			    "destroy", nautilus_application_destroyed_window,
649 650
			    application);

651
	nautilus_application_window_list = g_list_prepend (nautilus_application_window_list, window);
652

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

658
	return window;
659
}
660 661

/*
662
 * confirm_ok_to_run_as_root:
663 664 665 666
 *
 * Puts out a warning if the user is running nautilus as root.
 */
static gboolean
667
confirm_ok_to_run_as_root (void)
668
{
669 670
	GtkWidget *dialog;
	int result;
671

672 673 674 675
	if (geteuid () != 0) {
		return TRUE;
	}

676 677 678 679 680 681
	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"
682 683 684
		   "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,
685 686
		 GNOME_STOCK_BUTTON_OK, _("Quit"), NULL);
	result = gnome_dialog_run_and_close (GNOME_DIALOG (dialog));
687
	
688
	return result == 0;
689
}
Ramiro Estrugo's avatar
Ramiro Estrugo committed
690

691 692 693 694 695 696
/* callback for changing the directory the desktop points to */
static void
desktop_location_changed_callback (gpointer user_data)
{
	NautilusDesktopWindow *desktop_window;

697 698 699 700 701
	if (user_data != NULL && NAUTILUS_IS_DESKTOP_WINDOW (user_data)) {
		desktop_window = NAUTILUS_DESKTOP_WINDOW (user_data);

		nautilus_desktop_window_update_directory (desktop_window);
	}
702 703
}

704 705 706 707 708 709 710
/* 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);
711
	if ( nautilus_preferences_get_boolean (NAUTILUS_PREFERENCES_SHOW_DESKTOP)) {
712 713 714 715 716 717
		nautilus_application_open_desktop (application);
	} else {
		nautilus_application_close_desktop ();
	}
}

Ramiro Estrugo's avatar
Ramiro Estrugo committed
718 719 720 721 722 723
/*
 * 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
724
 * presented is: ~/.nautilus/first-time-flag.
Ramiro Estrugo's avatar
Ramiro Estrugo committed
725 726 727 728 729
 *
 * 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
730
 * to kill in order to test the startup druid:
Ramiro Estrugo's avatar
Ramiro Estrugo committed
731
 *
732
 * rm -f ~/.nautilus/first-time-flag
Ramiro Estrugo's avatar
Ramiro Estrugo committed
733 734 735 736 737 738 739 740 741 742 743
 *
 * 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;
744
	
Ramiro Estrugo's avatar
Ramiro Estrugo committed
745 746 747 748
	user_directory = nautilus_get_user_directory ();

	druid_flag_file_name = g_strdup_printf ("%s/%s",
						user_directory,
749
						"first-time-flag");
Ramiro Estrugo's avatar
Ramiro Estrugo committed
750

751
	result = !g_file_exists (druid_flag_file_name);	
Ramiro Estrugo's avatar
Ramiro Estrugo committed
752 753
	g_free (druid_flag_file_name);

754 755 756 757 758 759 760 761 762 763 764
	/* 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) {
		druid_flag_file_name = g_strdup_printf ("file://%s/%s",
						user_directory,
						"first-time-wizard-flag");
		gnome_vfs_unlink (druid_flag_file_name);
		g_free (druid_flag_file_name);
	}
	g_free (user_directory); 
Ramiro Estrugo's avatar
Ramiro Estrugo committed
765 766
	return result;
}
767

768
/* Called whenever a volume is mounted.
769 770 771 772 773 774 775 776 777
 * It would also be cool to restore open windows and
 * position info saved when the volume was unmounted.
 */
static void
volume_mounted_callback (NautilusVolumeMonitor *monitor, NautilusVolume *volume,
			 NautilusApplication *application)
{
}

778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804
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;
}


805 806 807 808 809 810 811 812
/* 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)
{
813
	GList *window_list, *node, *close_list;
814
	NautilusWindow *window;
815 816
	char *uri;
	char *path;
817 818 819 820
		
	close_list = NULL;
	
	/* Check and see if any of the open windows are displaying contents from the unmounted volume */
821
	window_list = nautilus_application_get_window_list ();
822
	
823 824
	/* Construct a list of windows to be closed. Do not add the non-closable windows to the list. */
	for (node = window_list; node != NULL; node = node->next) {
825
		window = NAUTILUS_WINDOW (node->data);
826
		if (window != NULL && window_can_be_closed (window)) {
827 828
			uri = nautilus_window_get_location (window);
			path = gnome_vfs_get_local_path_from_uri (uri);
Ramiro Estrugo's avatar
Ramiro Estrugo committed
829
			if (eel_str_has_prefix (path, volume->mount_path)) {
830
				close_list = g_list_prepend (close_list, window);
831
			}
832 833
			g_free (path);
			g_free (uri);
834 835
		}
	}
836 837
		
	/* Handle the windows in the close list. */
838
	for (node = close_list; node != NULL; node = node->next) {
839 840 841 842 843 844 845
		window = NAUTILUS_WINDOW (node->data);
		if (is_last_closable_window (window)) {
			/* Don't close the last or only window. Try to redirect to the default home directory. */		 	
			nautilus_window_go_home (window);
		} else {
			nautilus_window_close (window);
		}
846
	}
847
		
848
	g_list_free (close_list);
849 850
}

851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867

static void
removed_from_session (GnomeClient *client, gpointer data)
{
	nautilus_main_event_loop_quit ();
}

static gint
save_session (GnomeClient *client, gint phase, GnomeSaveStyle save_style, gint shutdown,
	      GnomeInteractStyle interact_style, gint fast, gpointer data)
{
	return TRUE;
}

static void
set_session_restart (GnomeClient *client, gboolean restart)
{
868 869 870 871
	static char *restart_argv[] = { "nautilus", "--no-default-window", 0 };

	gnome_client_set_restart_command (client, 2, restart_argv);

872
	gnome_client_set_priority (client, 40);
873 874 875 876 877 878 879
	
	if (g_getenv ("NAUTILUS_DEBUG") != NULL) {
		/* Don't respawn in debug mode */
		gnome_client_set_restart_style (client, GNOME_RESTART_NEVER);
	} else {
		gnome_client_set_restart_style (client, (restart ? GNOME_RESTART_IMMEDIATELY : GNOME_RESTART_NEVER));
	}
880