nautilus-application.c 26.4 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 <libnautilus-extensions/nautilus-file-utilities.h>
51
#include <libnautilus-extensions/nautilus-global-preferences.h>
52
#include <libnautilus-extensions/nautilus-gtk-macros.h>
53
#include <libnautilus-extensions/nautilus-icon-factory.h>
54
#include <libnautilus-extensions/nautilus-sound.h>
55
#include <libnautilus-extensions/nautilus-stock-dialogs.h>
56
#include <libnautilus-extensions/nautilus-string.h>
57
#include <libnautilus-extensions/nautilus-string-list.h>
58
#include <libnautilus-extensions/nautilus-undo-manager.h>
59
#include <libnautilus-extensions/nautilus-volume-monitor.h>
60
#include <libnautilus-extensions/nautilus-metafile-factory.h>
61
#include <liboaf/liboaf.h>
62

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

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

NAUTILUS_DEFINE_CLASS_BOILERPLATE (NautilusApplication, nautilus_application, BONOBO_OBJECT_TYPE)

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

	application = NAUTILUS_APPLICATION (object);

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

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

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

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

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

268
	failed_count = nautilus_string_list_get_length (dir_list);
269

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

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

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

	nautilus_string_list_free (dir_list);
298 299

	return failed_count == 0;
300 301
}

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

	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++) {
325 326 327 328
		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;
329 330 331 332 333 334
	}
	CORBA_sequence_set_release (uri_list, CORBA_TRUE);

	return uri_list;
}

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

	num_failures = 0;
355

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

604
	nautilus_application_window_list = g_list_prepend (nautilus_application_window_list, window);
605

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

611
	return window;
612
}
613 614

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

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

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

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

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

	user_directory = nautilus_get_user_directory ();

	druid_flag_file_name = g_strdup_printf ("%s/%s",
						user_directory,
						"first-time-wizard-flag");
	g_free (user_directory);

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

	return result;
}
697

698
/* Called whenever a volume is mounted.
699 700 701 702 703 704 705 706 707
 * 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)
{
}

708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734
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;
}


735 736 737 738 739 740 741 742
/* 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)
{
743
	GList *window_list, *node, *close_list;
744
	NautilusWindow *window;
745 746
	char *uri;
	char *path;
747 748 749 750
		
	close_list = NULL;
	
	/* Check and see if any of the open windows are displaying contents from the unmounted volume */
751
	window_list = nautilus_application_get_window_list ();
752
	
753 754
	/* 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) {
755
		window = NAUTILUS_WINDOW (node->data);
756
		if (window != NULL && window_can_be_closed (window)) {
757 758 759 760
			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);
761
			}
762 763
			g_free (path);
			g_free (uri);
764 765
		}
	}
766 767
		
	/* Handle the windows in the close list. */
768
	for (node = close_list; node != NULL; node = node->next) {
769 770 771 772 773 774 775
		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);
		}
776
	}
777
		
778
	g_list_free (close_list);
779 780
}

781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797

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)
{
798 799 800 801
	static char *restart_argv[] = { "nautilus", "--no-default-window", 0 };

	gnome_client_set_restart_command (client, 2, restart_argv);

802
	gnome_client_set_priority (client, 40);
803 804 805 806 807 808 809
	
	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));
	}
810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829
}

static void
init_session (void)
{
	GnomeClient *client;

	client = gnome_master_client ();

	gtk_signal_connect (GTK_OBJECT (client), "save_yourself",
			   (GtkSignalFunc) save_session,
			    NULL);

	gtk_signal_connect (GTK_OBJECT (client), "die",
			    (GtkSignalFunc) removed_from_session,
			    NULL);
			    			    			    	
	set_session_restart (client, nautilus_preferences_get_boolean (NAUTILUS_PREFERENCES_ADD_TO_SESSION));
}