nautilus-application.c 27 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-ops.h>
Ramiro Estrugo's avatar
Ramiro Estrugo committed
55
#include <libgnomevfs/gnome-vfs-utils.h>
56
#include <libnautilus-extensions/nautilus-file-utilities.h>
57
#include <libnautilus-extensions/nautilus-global-preferences.h>
58
#include <libnautilus-extensions/nautilus-icon-factory.h>
Ramiro Estrugo's avatar
Ramiro Estrugo committed
59
#include <libnautilus-extensions/nautilus-metafile-factory.h>
60
#include <libnautilus-extensions/nautilus-sound.h>
61
#include <libnautilus-extensions/nautilus-undo-manager.h>
62
#include <libnautilus-extensions/nautilus-volume-monitor.h>
63
#include <liboaf/liboaf.h>
64

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

71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89
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);
90
static void	     init_session 			    (void);
91

Ramiro Estrugo's avatar
Ramiro Estrugo committed
92
EEL_DEFINE_CLASS_BOILERPLATE (NautilusApplication, nautilus_application, BONOBO_OBJECT_TYPE)
93

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

	application = NAUTILUS_APPLICATION (object);

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

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

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

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

Ramiro Estrugo's avatar
Ramiro Estrugo committed
253
	dir_list = eel_string_list_new (TRUE);
254 255
	
	if (!g_file_test (user_directory, G_FILE_TEST_ISDIR)) {
Ramiro Estrugo's avatar
Ramiro Estrugo committed
256
		eel_string_list_insert (dir_list, user_directory);
257
	}
258
	g_free (user_directory);
259 260
	    
	if (!g_file_test (user_main_directory, G_FILE_TEST_ISDIR)) {
Ramiro Estrugo's avatar
Ramiro Estrugo committed
261
		eel_string_list_insert (dir_list, user_main_directory);
262
	}
263
	g_free (user_main_directory);
264 265
	    
	if (!g_file_test (desktop_directory, G_FILE_TEST_ISDIR)) {
Ramiro Estrugo's avatar
Ramiro Estrugo committed
266
		eel_string_list_insert (dir_list, desktop_directory);
267
	}
268
	g_free (desktop_directory);
269

Ramiro Estrugo's avatar
Ramiro Estrugo committed
270
	failed_count = eel_string_list_get_length (dir_list);
271

272
	if (failed_count != 0) {
Ramiro Estrugo's avatar
Ramiro Estrugo committed
273
		dir_list_concatenated = eel_string_list_as_concatenated_string (dir_list, "\n");
274

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

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

Ramiro Estrugo's avatar
Ramiro Estrugo committed
299
	eel_string_list_free (dir_list);
300 301

	return failed_count == 0;
302 303
}

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

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

	return uri_list;
}

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

	num_failures = 0;
357

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

606
	nautilus_application_window_list = g_list_prepend (nautilus_application_window_list, window);
607

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

613
	return window;
614
}
615 616

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

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

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

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

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

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

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

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

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

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


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

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

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

	gnome_client_set_restart_command (client, 2, restart_argv);

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

824 825 826 827 828 829 830 831
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));
}

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

	client = gnome_master_client ();

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

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

	update_session (client);
}