nautilus-application.c 27.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 42
#include "nautilus-shell-interface.h"
#include "nautilus-shell.h"
#include <bonobo/bonobo-main.h>
#include <bonobo/bonobo-object.h>
#include <gtk/gtksignal.h>
43
#include <libgnome/gnome-config.h>
44 45 46
#include <libgnome/gnome-i18n.h>
#include <libgnome/gnome-util.h>
#include <libgnomeui/gnome-messagebox.h>
47
#include <libgnomeui/gnome-client.h>
48
#include <libgnomeui/gnome-stock.h>
49
#include <libgnomevfs/gnome-vfs-utils.h>
50
#include <libgnomevfs/gnome-vfs-ops.h>
51
#include <libnautilus-extensions/nautilus-file-utilities.h>
52
#include <libnautilus-extensions/nautilus-global-preferences.h>
53
#include <libnautilus-extensions/nautilus-gtk-macros.h>
54
#include <libnautilus-extensions/nautilus-icon-factory.h>
55
#include <libnautilus-extensions/nautilus-sound.h>
56
#include <libnautilus-extensions/nautilus-stock-dialogs.h>
57
#include <libnautilus-extensions/nautilus-string.h>
58
#include <libnautilus-extensions/nautilus-string-list.h>
59
#include <libnautilus-extensions/nautilus-undo-manager.h>
60
#include <libnautilus-extensions/nautilus-volume-monitor.h>
61
#include <libnautilus-extensions/nautilus-metafile-factory.h>
62
#include <liboaf/liboaf.h>
63

64 65 66
#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"
67
#define SEARCH_LIST_VIEW_IID "OAFIID:nautilus_file_manager_search_list_view:b186e381-198e-43cf-9c46-60b6bb35db0b"
68
#define SHELL_IID	     "OAFIID:nautilus_shell:cd5183b2-3913-4b74-9b8e-10528b0de08d"
69

70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88
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);
static void          volume_mounted_callback               (NautilusVolumeMonitor    *monitor,
							    NautilusVolume           *volume,
							    NautilusApplication      *application);
static void          volume_unmounted_callback             (NautilusVolumeMonitor    *monitor,
							    NautilusVolume           *volume,
							    NautilusApplication      *application);
89
static void	     init_session 			    (void);
90 91 92

NAUTILUS_DEFINE_CLASS_BOILERPLATE (NautilusApplication, nautilus_application, BONOBO_OBJECT_TYPE)

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

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

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

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

	return CORBA_Object_duplicate (bonobo_object_corba_objref (object), ev);
149 150
}

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

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

164
/* Keeps track of the one and only desktop window. */
165
static NautilusDesktopWindow *nautilus_application_desktop_window;
166 167

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

170 171
GList *
nautilus_application_get_window_list (void)
172 173 174 175
{
	return nautilus_application_window_list;
}

176
static void
177
nautilus_application_initialize_class (NautilusApplicationClass *klass)
178
{
179
	GTK_OBJECT_CLASS (klass)->destroy = nautilus_application_destroy;
180 181 182
}

static void
183
nautilus_application_initialize (NautilusApplication *application)
184
{
185
	CORBA_Environment ev;
186
	CORBA_Object corba_object;
187

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

200 201 202 203 204 205 206 207 208 209 210
	/* 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);
211 212
}

213 214
NautilusApplication *
nautilus_application_new (void)
215
{
216
	return NAUTILUS_APPLICATION (gtk_object_new (nautilus_application_get_type (), NULL));
217 218 219
}

static void
220
nautilus_application_destroy (GtkObject *object)
221
{
222 223 224 225
	NautilusApplication *application;

	application = NAUTILUS_APPLICATION (object);

226
	nautilus_bookmarks_exiting ();
227
	
228 229
	bonobo_object_unref (BONOBO_OBJECT (application->undo_manager));

230
	NAUTILUS_CALL_PARENT (GTK_OBJECT_CLASS, destroy, (object));
231
}
232

233 234
static gboolean
check_required_directories (NautilusApplication *application)
235
{
236 237 238
	char			*user_directory;
	char			*user_main_directory;
	char			*desktop_directory;
239
	NautilusStringList	*dir_list;
240 241 242 243 244
	char 			*dir_list_concatenated;
	char 			*error_string;
	char 			*dialog_title;
	GnomeDialog 		*dialog;
	int			 failed_count;
245
	
246
	g_assert (NAUTILUS_IS_APPLICATION (application));
247 248 249 250 251

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

252
	dir_list = nautilus_string_list_new (TRUE);
253 254
	
	if (!g_file_test (user_directory, G_FILE_TEST_ISDIR)) {
255
		nautilus_string_list_insert (dir_list, user_directory);
256
	}
257
	g_free (user_directory);
258 259
	    
	if (!g_file_test (user_main_directory, G_FILE_TEST_ISDIR)) {
260
		nautilus_string_list_insert (dir_list, user_main_directory);
261
	}
262
	g_free (user_main_directory);
263 264
	    
	if (!g_file_test (desktop_directory, G_FILE_TEST_ISDIR)) {
265
		nautilus_string_list_insert (dir_list, desktop_directory);
266
	}
267
	g_free (desktop_directory);
268

269
	failed_count = nautilus_string_list_get_length (dir_list);
270

271
	if (failed_count != 0) {
272 273
		dir_list_concatenated = nautilus_string_list_as_concatenated_string (dir_list, "\n");

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

		g_free (dir_list_concatenated);
		g_free (error_string);
295
		g_free (dialog_title);
296 297 298
	}

	nautilus_string_list_free (dir_list);
299 300

	return failed_count == 0;
301 302
}

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

	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++) {
326 327 328 329
		translated_uri = nautilus_make_uri_from_shell_arg (strv[i]);
		uri_list->_buffer[i] = CORBA_string_dup (translated_uri);
		g_free (translated_uri);
		translated_uri = NULL;
330 331 332 333 334 335
	}
	CORBA_sequence_set_release (uri_list, CORBA_TRUE);

	return uri_list;
}

336
void
337
nautilus_application_startup (NautilusApplication *application,
338
			      gboolean kill_shell,
339
			      gboolean restart_shell,
340
			      gboolean start_desktop,
341
			      gboolean no_default_window,
342
			      gboolean do_first_time_druid_check,
343
			      const char *geometry,
344
			      const char *urls[])
345
{
346 347
	CORBA_Environment ev;
	Nautilus_Shell shell;
348 349 350
	OAF_RegistrationResult result;
	const char *message, *detailed_message;
	GnomeDialog *dialog;
351
	Nautilus_URIList *url_list;
352
	const CORBA_char *corba_geometry;
353 354 355
	int num_failures;

	num_failures = 0;
356

357
	/* Perform check for nautilus being run as super user */
358 359 360 361
	if (!(kill_shell || restart_shell)) {
		if (!confirm_ok_to_run_as_root ()) {
			return;
		}
362
	}
Ramiro Estrugo's avatar
Ramiro Estrugo committed
363

364
	/* Check the user's ~/.nautilus directories and post warnings
365
	 * if there are problems.
366
	 */
367 368 369
	if (!check_required_directories (application)) {
		return;
	}
370

371 372 373 374 375 376
	/* 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;
	}
	
377 378 379
	/* initialize the sound machinery */
	nautilus_sound_initialize ();
	
380 381
	CORBA_exception_init (&ev);

382
	/* Start up the factory. */
383
	while (TRUE) {
384 385 386 387 388 389 390
		/* 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. */
391
		case OAF_REG_ALREADY_ACTIVE:
392
			/* Another copy of nautilus already is running and registered. */
393
			message = NULL;
394
			detailed_message = NULL;
395 396 397
			break;
		case OAF_REG_NOT_LISTED:
			/* Can't register myself due to trouble locating the
398
			 * Nautilus_Shell.oaf file. This has happened when you
399 400 401
			 * launch Nautilus with an LD_LIBRARY_PATH that
			 * doesn't include the directory containg the oaf
			 * library. It could also happen if the
402
			 * Nautilus_Shell.oaf file was not present for some
403 404 405 406 407
			 * 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. "
408 409 410 411
				    "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.");
412
			/* FIXME bugzilla.eazel.com 2536: The guesses and stuff here are lame. */
413
			detailed_message = _("Nautilus can't be used now. "
414 415 416 417
					     "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"
418
					     "OAF couldn't locate the Nautilus_shell.oaf file. "
419 420 421
					     "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 "
422
					     "with a missing Nautilus_Shell.oaf file.\n\n"
423 424 425
					     "Running \"nautilus-clean.sh -x\" will kill all "
					     "OAF and GConf processes, which may be needed by "
					     "other applications.\n\n"
426
					     "Sometimes killing oafd and gconfd fixes "
427
					     "the problem, but we don't know why.\n\n"
428 429
					     "We have also seen this error when a faulty "
					     "version of oaf was installed.");
430 431 432 433 434 435 436 437 438
			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.
			 */
439
			/* FIXME bugzilla.eazel.com 2537: Looks like this does happen with the
440 441 442 443
			 * current OAF. I guess I read the code
			 * wrong. Need to figure out when and make a
			 * good message.
			 */
444 445 446 447 448
			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;
		}
449 450 451 452 453 454 455 456 457 458 459 460

		/* 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) {
461
				/* FIXME bugzilla.eazel.com 2538: When can this happen? */
462 463
				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 "
464 465 466 467 468 469 470 471 472 473 474
						     "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.");
					
				}
475 476 477
			}
		}

478
		if (message != NULL) {
479
			dialog = nautilus_show_error_dialog_with_details (message, NULL, detailed_message, NULL);
480 481
			/* We need the main event loop so the user has a chance to see the dialog. */
			nautilus_main_event_loop_register (GTK_OBJECT (dialog));
482
			goto out;
483 484 485
		}
	}

486 487
	if (kill_shell) {
		Nautilus_Shell_quit (shell, &ev);
488 489
	} else if (restart_shell) {
		Nautilus_Shell_restart (shell, &ev);
490 491 492 493
	} else {
		if (start_desktop) {
			Nautilus_Shell_start_desktop (shell, &ev);
		}
494 495 496 497 498 499
		
		/* 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));
500

501 502 503 504
		/* CORBA C mapping doesn't allow NULL to be passed
		   for string parameters */
		corba_geometry = (geometry != NULL) ? geometry : "";

505 506
	  	/* Create the other windows. */
		if (urls != NULL) {
507
			url_list = nautilus_make_uri_list_from_shell_strv (urls);
508
			Nautilus_Shell_open_windows (shell, url_list, corba_geometry, &ev);
509
			CORBA_free (url_list);
510
		} else if (!no_default_window) {
511
			Nautilus_Shell_open_default_window (shell, corba_geometry, &ev);
512
		}
513 514 515
		
		/* Add ourselves to the session */
		init_session ();
516
	}
517

518
	/* We're done with the shell now, so let it go. */
519 520 521 522 523
	/* 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.
	 */
524
	if (!(kill_shell || restart_shell)) {
525
		bonobo_object_release_unref (shell, NULL);
526
	}
527

528
 out:
529
	CORBA_exception_free (&ev);
530 531 532
}

static void
533 534
nautilus_application_create_desktop_window (NautilusApplication *application)
{
535 536
	g_return_if_fail (nautilus_application_desktop_window == NULL);
	g_return_if_fail (NAUTILUS_IS_APPLICATION (application));
537

538 539
	nautilus_application_desktop_window = nautilus_desktop_window_new (application);
	gtk_widget_show (GTK_WIDGET (nautilus_application_desktop_window));
540 541 542 543
}

void
nautilus_application_open_desktop (NautilusApplication *application)
544
{
545 546
	if (nautilus_application_desktop_window == NULL) {
		nautilus_application_create_desktop_window (application);
547 548 549 550 551 552
	}
}

void
nautilus_application_close_desktop (void)
{
553
	if (nautilus_application_desktop_window != NULL) {
554
		gtk_widget_destroy (GTK_WIDGET (nautilus_application_desktop_window));
555
		nautilus_application_desktop_window = NULL;
556
	}	
557 558
}

559 560 561
void
nautilus_application_close_all_windows (void)
{
562
	while (nautilus_application_window_list != NULL) {
563 564 565 566
		nautilus_window_close (NAUTILUS_WINDOW (nautilus_application_window_list->data));
	}
}

567
static void
568
nautilus_application_destroyed_window (GtkObject *object, NautilusApplication *application)
569
{
570
	nautilus_application_window_list = g_list_remove (nautilus_application_window_list, object);
571 572
}

573 574 575 576 577 578 579 580 581 582 583 584 585
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;
}				       

586
NautilusWindow *
587
nautilus_application_create_window (NautilusApplication *application)
588
{
589
	NautilusWindow *window;
590 591

	g_return_val_if_fail (NAUTILUS_IS_APPLICATION (application), NULL);
592
	
593
	window = NAUTILUS_WINDOW (gtk_widget_new (nautilus_window_get_type (),
594
						  "app", GTK_OBJECT (application),
595
						  "app_id", "nautilus", NULL));
596
	
597 598 599 600
	gtk_signal_connect (GTK_OBJECT (window), 
			    "delete_event", GTK_SIGNAL_FUNC (nautilus_window_delete_event_callback),
                    	    NULL);

601
	gtk_signal_connect (GTK_OBJECT (window),
602
			    "destroy", nautilus_application_destroyed_window,
603 604
			    application);

605
	nautilus_application_window_list = g_list_prepend (nautilus_application_window_list, window);
606

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

612
	return window;
613
}
614 615

/*
616
 * confirm_ok_to_run_as_root:
617 618 619 620
 *
 * Puts out a warning if the user is running nautilus as root.
 */
static gboolean
621
confirm_ok_to_run_as_root (void)
622
{
623 624
	GtkWidget *dialog;
	int result;
625

626 627 628 629
	if (geteuid () != 0) {
		return TRUE;
	}

630 631 632 633 634 635
	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"
636 637 638
		   "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,
639 640
		 GNOME_STOCK_BUTTON_OK, _("Quit"), NULL);
	result = gnome_dialog_run_and_close (GNOME_DIALOG (dialog));
641
	
642
	return result == 0;
643
}
Ramiro Estrugo's avatar
Ramiro Estrugo committed
644

645 646 647 648 649 650 651
/* 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);
652
	if ( nautilus_preferences_get_boolean (NAUTILUS_PREFERENCES_SHOW_DESKTOP)) {
653 654 655 656 657 658
		nautilus_application_open_desktop (application);
	} else {
		nautilus_application_close_desktop ();
	}
}

Ramiro Estrugo's avatar
Ramiro Estrugo committed
659 660 661 662 663 664
/*
 * 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
665
 * presented is: ~/.nautilus/first-time-flag.
Ramiro Estrugo's avatar
Ramiro Estrugo committed
666 667 668 669 670
 *
 * 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
671
 * to kill in order to test the startup druid:
Ramiro Estrugo's avatar
Ramiro Estrugo committed
672
 *
673
 * rm -f ~/.nautilus/first-time-flag
Ramiro Estrugo's avatar
Ramiro Estrugo committed
674 675 676 677 678 679 680 681 682 683 684
 *
 * 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;
685
	
Ramiro Estrugo's avatar
Ramiro Estrugo committed
686 687 688 689
	user_directory = nautilus_get_user_directory ();

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

692
	result = !g_file_exists (druid_flag_file_name);	
Ramiro Estrugo's avatar
Ramiro Estrugo committed
693 694
	g_free (druid_flag_file_name);

695 696 697 698 699 700 701 702 703 704 705
	/* 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
706 707
	return result;
}
708

709
/* Called whenever a volume is mounted.
710 711 712 713 714 715 716 717 718
 * 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)
{
}

719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745
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;
}


746 747 748 749 750 751 752 753
/* 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)
{
754
	GList *window_list, *node, *close_list;
755
	NautilusWindow *window;
756 757
	char *uri;
	char *path;
758 759 760 761
		
	close_list = NULL;
	
	/* Check and see if any of the open windows are displaying contents from the unmounted volume */
762
	window_list = nautilus_application_get_window_list ();
763
	
764 765
	/* 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) {
766
		window = NAUTILUS_WINDOW (node->data);
767
		if (window != NULL && window_can_be_closed (window)) {
768 769 770 771
			uri = nautilus_window_get_location (window);
			path = gnome_vfs_get_local_path_from_uri (uri);
			if (nautilus_str_has_prefix (path, volume->mount_path)) {
				close_list = g_list_prepend (close_list, window);
772
			}
773 774
			g_free (path);
			g_free (uri);
775 776
		}
	}
777 778
		
	/* Handle the windows in the close list. */
779
	for (node = close_list; node != NULL; node = node->next) {
780 781 782 783 784 785 786
		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);
		}
787
	}
788
		
789
	g_list_free (close_list);
790 791
}

792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808

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)
{
809 810 811 812
	static char *restart_argv[] = { "nautilus", "--no-default-window", 0 };

	gnome_client_set_restart_command (client, 2, restart_argv);

813
	gnome_client_set_priority (client, 40);
814 815 816 817 818 819 820
	
	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));
	}
821 822
}

823 824 825 826 827 828 829 830
static void
update_session (gpointer callback_data)
{
	set_session_restart (callback_data,
			     nautilus_preferences_get_boolean (NAUTILUS_PREFERENCES_ADD_TO_SESSION)
			     && nautilus_preferences_get_boolean (NAUTILUS_PREFERENCES_SHOW_DESKTOP));
}

831 832 833 834 835 836 837 838
static void
init_session (void)
{
	GnomeClient *client;

	client = gnome_master_client ();

	gtk_signal_connect (GTK_OBJECT (client), "save_yourself",
839
			    (GtkSignalFunc) save_session,
840
			    NULL);
841
	
842 843 844
	gtk_signal_connect (GTK_OBJECT (client), "die",
			    (GtkSignalFunc) removed_from_session,
			    NULL);
845 846 847 848
	
	nautilus_preferences_add_callback
		(NAUTILUS_PREFERENCES_ADD_TO_SESSION,
		 update_session, client);
849

850 851 852 853 854 855
	nautilus_preferences_add_callback
		(NAUTILUS_PREFERENCES_SHOW_DESKTOP,
		 update_session, client);

	update_session (client);
}