1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
|
/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */
/*
* Nautilus
*
* Copyright (C) 1999, 2000 Red Hat, Inc.
* Copyright (C) 2000 Eazel, Inc.
*
* This program is free software; you can redistribute it and/or
* 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.
*
* This program is distributed in the hope that it will be useful,
* 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
* along with this program; if not, write to the Free Software
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*
* Author: Elliot Lee <sopwith@redhat.com>,
*
*/
#include <config.h>
#include "nautilus.h"
#include <libnautilus/libnautilus.h>
#include <bonobo.h>
#include "file-manager/fm-icon-view.h"
#include "file-manager/fm-list-view.h"
#include <libgnomevfs/gnome-vfs-init.h>
#include <libnautilus-extensions/nautilus-gnome-extensions.h>
#include <libnautilus-extensions/nautilus-global-preferences.h>
#include <libnautilus/nautilus-undo-manager.h>
typedef struct {
POA_Nautilus_Application servant;
NautilusApp *app;
Nautilus_ViewWindowList attr_view_windows;
} impl_POA_Nautilus_Application;
static Nautilus_ViewWindowList *
impl_Nautilus_Application__get_view_windows(impl_POA_Nautilus_Application* servant,
CORBA_Environment * ev);
static Nautilus_ViewWindow
impl_Nautilus_Application_new_view_window(impl_POA_Nautilus_Application *servant,
CORBA_Environment * ev);
static CORBA_boolean
impl_Nautilus_Application_supports(impl_POA_Nautilus_Application * servant,
CORBA_char *obj_iid,
CORBA_Environment * ev);
static CORBA_Object
impl_Nautilus_Application_create_object(impl_POA_Nautilus_Application *servant,
CORBA_char *obj_iid,
GNOME_stringlist * params,
CORBA_Environment * ev);
static POA_Nautilus_Application__epv impl_Nautilus_Application_epv = {
NULL, /* _private */
(gpointer) &impl_Nautilus_Application__get_view_windows,
(gpointer) &impl_Nautilus_Application_new_view_window
};
static POA_Bonobo_GenericFactory__epv impl_Nautilus_Application_Bonobo_GenericFactory_epv = {
NULL, /* _private */
(gpointer) &impl_Nautilus_Application_supports,
(gpointer) &impl_Nautilus_Application_create_object
};
static PortableServer_ServantBase__epv impl_Nautilus_Application_base_epv = {
NULL, /* _private data */
NULL, /* finalize routine */
NULL, /* default_POA routine */
};
static POA_Nautilus_Application__vepv impl_Nautilus_Application_vepv = {
&impl_Nautilus_Application_base_epv,
&impl_Nautilus_Application_Bonobo_GenericFactory_epv,
NULL,
&impl_Nautilus_Application_epv,
};
static Nautilus_ViewWindowList *
impl_Nautilus_Application__get_view_windows(impl_POA_Nautilus_Application *servant,
CORBA_Environment * ev)
{
Nautilus_ViewWindowList *retval;
int i;
GSList *ltmp;
retval = Nautilus_ViewWindowList__alloc ();
retval->_length = g_slist_length (servant->app->windows);
retval->_buffer = CORBA_sequence_Nautilus_ViewWindow_allocbuf (retval->_length);
for(i = 0, ltmp = servant->app->windows; ltmp; ltmp = ltmp->next, i++) {
CORBA_Object obj;
obj = bonobo_object_corba_objref(NAUTILUS_WINDOW(ltmp->data)->ntl_viewwindow);
retval->_buffer[i] = CORBA_Object_duplicate(obj, ev);
}
CORBA_sequence_set_release (retval, CORBA_TRUE);
return retval;
}
static Nautilus_ViewWindow
impl_Nautilus_Application_new_view_window (impl_POA_Nautilus_Application *servant,
CORBA_Environment * ev)
{
NautilusWindow *win;
win = nautilus_app_create_window (servant->app);
return CORBA_Object_duplicate (bonobo_object_corba_objref (BONOBO_OBJECT (win)), ev);
}
static CORBA_boolean
impl_Nautilus_Application_supports (impl_POA_Nautilus_Application * servant,
CORBA_char * obj_iid,
CORBA_Environment * ev)
{
return strcmp(obj_iid, "OAFIID:ntl_file_manager_icon_view:42681b21-d5ca-4837-87d2-394d88ecc058") == 0
|| strcmp(obj_iid, "OAFIID:ntl_file_manager_list_view:521e489d-0662-4ad7-ac3a-832deabe111c") == 0
|| strcmp(obj_iid, "OAFIID:ntl_window:88e8b2e4-b627-4221-b566-5ba32185c88d") == 0;
}
static CORBA_Object
impl_Nautilus_Application_create_object (impl_POA_Nautilus_Application *servant,
CORBA_char *obj_iid,
GNOME_stringlist * params,
CORBA_Environment * ev)
{
FMDirectoryView *dir_view;
NautilusContentView *view;
if (!impl_Nautilus_Application_supports (servant, obj_iid, ev)) {
return CORBA_OBJECT_NIL;
}
if (strcmp (obj_iid, "OAFIID:ntl_file_manager_icon_view:42681b21-d5ca-4837-87d2-394d88ecc058") == 0) {
dir_view = FM_DIRECTORY_VIEW (gtk_object_new (fm_icon_view_get_type (), NULL));
} else if (strcmp (obj_iid, "OAFIID:ntl_file_manager_list_view:521e489d-0662-4ad7-ac3a-832deabe111c") == 0) {
dir_view = FM_DIRECTORY_VIEW (gtk_object_new (fm_list_view_get_type (), NULL));
} else if (strcmp (obj_iid,"OAFIID:ntl_window:88e8b2e4-b627-4221-b566-5ba32185c88d") == 0) {
return impl_Nautilus_Application_new_view_window (servant, ev);
} else {
return CORBA_OBJECT_NIL;
}
view = fm_directory_view_get_nautilus_view (dir_view);
return CORBA_Object_duplicate (bonobo_object_corba_objref (BONOBO_OBJECT (view)), ev);
}
static CORBA_Object
impl_Nautilus_Application__create(PortableServer_POA poa,
NautilusApp *app,
CORBA_Environment * ev)
{
impl_POA_Nautilus_Application *newservant;
newservant = g_new0(impl_POA_Nautilus_Application, 1);
newservant->servant.vepv = &impl_Nautilus_Application_vepv;
newservant->servant.vepv->Bonobo_Unknown_epv = NAUTILUS_APP_CLASS(GTK_OBJECT(app)->klass)->unknown_epv;
POA_Nautilus_Application__init((PortableServer_Servant) newservant, ev);
return bonobo_object_activate_servant(BONOBO_OBJECT(app), newservant);
}
static void nautilus_app_init (NautilusApp *app);
static void nautilus_app_class_init (NautilusAppClass *klass);
static void nautilus_app_destroy (GtkObject *object);
static GtkObjectClass *app_parent_class = NULL;
GtkType
nautilus_app_get_type (void)
{
static GtkType App_type = 0;
if (!App_type)
{
static const GtkTypeInfo App_info =
{
"NautilusApp",
sizeof (NautilusApp),
sizeof (NautilusAppClass),
(GtkClassInitFunc) nautilus_app_class_init,
(GtkObjectInitFunc) nautilus_app_init,
/* reserved_1 */ NULL,
/* reserved_2 */ NULL,
(GtkClassInitFunc) NULL,
};
App_type = gtk_type_unique (bonobo_object_get_type (), &App_info);
}
return App_type;
}
static void
nautilus_app_class_init (NautilusAppClass *klass)
{
GtkObjectClass *object_class;
klass->unknown_epv = bonobo_object_get_epv();
object_class = (GtkObjectClass*) klass;
object_class->destroy = nautilus_app_destroy;
app_parent_class = gtk_type_class (gtk_object_get_type ());
/* Startup preferences. This call is needed so that preferences have
* decent defaults. Not calling this function would cause some
* preferences to have "not nice" defaults. Things would still work
* because it is legal to use nautilus preferences implicitly.
*/
nautilus_global_preferences_startup ();
}
static void
nautilus_app_init (NautilusApp *app)
{
CORBA_Environment ev;
CORBA_Object objref;
Nautilus_Undo_Manager undo_manager;
CORBA_exception_init (&ev);
objref = impl_Nautilus_Application__create (bonobo_poa (), app, &ev);
oaf_active_server_register ("OAFIID:ntl_file_manager_factory:bd1e1862-92d7-4391-963e-37583f0daef3",
objref);
bonobo_object_construct (BONOBO_OBJECT(app), objref);
/* Init undo manager */
app->undo_manager = BONOBO_OBJECT (nautilus_undo_manager_new ());
undo_manager = bonobo_object_corba_objref (BONOBO_OBJECT (app->undo_manager));
Bonobo_Unknown_ref (undo_manager, &ev);
nautilus_attach_undo_manager ( GTK_OBJECT (app), undo_manager);
CORBA_exception_free (&ev);
}
GtkObject *
nautilus_app_new (void)
{
return gtk_object_new (nautilus_app_get_type (), NULL);
}
static void
nautilus_app_destroy (GtkObject *object)
{
/* Shut down preferences. This is needed so that the global
* preferences object and all its allocations are freed. Not
* calling this function would have NOT cause the user to lose
* preferences. The only effect would be to leak those
* objects - which would be collected at exit() time anyway,
* but it adds noice to memory profile tool runs.
*/
nautilus_global_preferences_shutdown ();
nautilus_bookmarks_exiting ();
GTK_OBJECT_CLASS(app_parent_class)->destroy (object);
}
static void
display_prototype_caveat (void)
{
/* Inform the user that Nautilus has a long way to go
* before they should be expecting it to work well.
*/
if (getenv ("NAUTILUS_NO_CAVEAT_DIALOG") == NULL) {
/* Before you change this code back to use gnome_warning_dialog
* or nautilus_warning_dialog, you better test it. See bug 963.
*/
nautilus_simple_dialog
(NULL,
_("The Nautilus shell is under development; "
"it's not ready for daily use. "
"Many features, including some of the best ones, "
"are not yet done, partly done, or unstable. "
"The program doesn't look or act the way it "
"will in version 1.0."
"\n\n"
"If you do decide to test this version of Nautilus, beware. "
"The program could do something unpredictable and may even "
"delete or overwrite files on your computer."
"\n\n"
"For more information, visit http://nautilus.eazel.com."),
_("Nautilus: caveat"),
GNOME_STOCK_BUTTON_OK, NULL);
}
}
void
nautilus_app_startup(NautilusApp *app, const char *initial_url)
{
NautilusWindow *mainwin;
/* Put up (modal) caveat. */
display_prototype_caveat ();
/* Set default configuration */
mainwin = nautilus_app_create_window (app);
bonobo_activate ();
nautilus_window_set_initial_state (mainwin, initial_url);
}
static void
nautilus_app_destroy_window (GtkObject *obj, NautilusApp *app)
{
app->windows = g_slist_remove (app->windows, obj);
if (app->windows == NULL) {
nautilus_app_quit();
}
}
/* FIXME: If we are really going to use this, it should probably be
* moved to the gnome vfs public interface.
*/
extern int gnome_vfs_debug_get_thread_count (void);
int quit_counter_hack;
/* FIXME: This waiting for quit is needed by anyone who uses gnome-vfs,
* especially users or NautilusDirectory. So we need to provide it for
* others who are not using NautilusApp.
*/
static gboolean
nautilus_app_real_quit (void *unused)
{
int count;
count = gnome_vfs_debug_get_thread_count ();
if (count == 0) {
/* g_message ("no more gnome vfs threads, ready to quit"); */
gtk_main_quit ();
return FALSE;
}
if (--quit_counter_hack == 0) {
g_message ("gnome vfs threads not going away, trying to quit anyway");
gtk_main_quit ();
return FALSE;
}
/* g_message ("%d gnome vfs threads left, will try to quit later", count); */
usleep(200000); /* 1/5 second */
return TRUE;
}
void
nautilus_app_quit (void)
{
quit_counter_hack = 20;
/* wait for gnome vfs slave threads to go away before quitting */
gtk_idle_add ((GtkFunction)nautilus_app_real_quit, NULL);
}
NautilusWindow *
nautilus_app_create_window (NautilusApp *app)
{
NautilusWindow *window;
window = NAUTILUS_WINDOW (gtk_object_new (nautilus_window_get_type(), "app", BONOBO_OBJECT(app),
"app_id", "nautilus", NULL));
gtk_signal_connect (GTK_OBJECT (window),
"destroy", nautilus_app_destroy_window, app);
/* Do not yet show the window. It will be shown later on if it can
* successfully display its initial URI. Otherwise it will be destroyed
* without ever having seen the light of day.
*/
app->windows = g_slist_prepend (app->windows, window);
return window;
}
|