nautilus-application.c 10.4 KB
Newer Older
1 2 3 4 5 6 7 8
/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 2 -*- */

/*
 *  Nautilus
 *
 *  Copyright (C) 1999, 2000 Red Hat, Inc.
 *  Copyright (C) 2000 Eazel, Inc.
 *
9
 *  This program 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
 *  This program 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 23 24 25 26
 *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 *  Author: Elliot Lee <sopwith@redhat.com>,
 *
 */

27
#include <config.h>
28
#include "nautilus.h"
29
#include <libnautilus/libnautilus.h>
30
#include <bonobo.h>
31 32
#include "file-manager/fm-icon-view.h"
#include "file-manager/fm-list-view.h"
33
#include <libnautilus-extensions/nautilus-global-preferences.h>
34
#include <libnautilus-extensions/nautilus-undo-manager.h>
35

36 37 38
typedef struct {
  POA_Nautilus_Application servant;
  NautilusApp *app;
39

40 41
  Nautilus_ViewWindowList attr_view_windows;
} impl_POA_Nautilus_Application;
42

43 44 45
static Nautilus_ViewWindowList *
impl_Nautilus_Application__get_view_windows(impl_POA_Nautilus_Application* servant,
                                            CORBA_Environment * ev);
Gene Ragan's avatar
Gene Ragan committed
46 47 48
static Nautilus_UndoManager
impl_Nautilus_Application__get_undo_manager(impl_POA_Nautilus_Application* servant,
                                            CORBA_Environment * ev);
49 50 51 52 53
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,
54
				   CORBA_char *obj_iid,
55 56 57
				   CORBA_Environment * ev);
static CORBA_Object
impl_Nautilus_Application_create_object(impl_POA_Nautilus_Application *servant,
58
                                        CORBA_char *obj_iid,
59 60 61 62 63 64
					GNOME_stringlist * params,
					CORBA_Environment * ev);

static POA_Nautilus_Application__epv impl_Nautilus_Application_epv = {
   NULL,			/* _private */
   (gpointer) &impl_Nautilus_Application__get_view_windows,
Gene Ragan's avatar
Gene Ragan committed
65
   (gpointer) &impl_Nautilus_Application__get_undo_manager,
66 67 68
   (gpointer) &impl_Nautilus_Application_new_view_window

};
69
static POA_Bonobo_GenericFactory__epv impl_Nautilus_Application_Bonobo_GenericFactory_epv = {
70 71 72 73 74 75 76 77 78 79 80
   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,
81
   &impl_Nautilus_Application_Bonobo_GenericFactory_epv,
82 83 84 85 86
   NULL,
   &impl_Nautilus_Application_epv,
};

static Nautilus_ViewWindowList *
87 88
impl_Nautilus_Application__get_view_windows(impl_POA_Nautilus_Application *servant,
                                            CORBA_Environment * ev)
89
{
90 91
   Nautilus_ViewWindowList *retval;

92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112
   retval = Nautilus_ViewWindowList__alloc();
   retval->_length = g_slist_length(servant->app->windows);

   if(retval->_length)
     {
       int i;
       GSList *ltmp;

       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);
         }
     }
   else
     retval->_buffer = NULL;

   CORBA_sequence_set_release(retval, CORBA_TRUE);

113 114 115
   return retval;
}

Gene Ragan's avatar
Gene Ragan committed
116 117 118 119 120 121 122 123 124

static Nautilus_UndoManager
impl_Nautilus_Application__get_undo_manager(impl_POA_Nautilus_Application *servant,
                                            CORBA_Environment * ev)
{
	return CORBA_Object_duplicate(bonobo_object_corba_objref(servant->app->undo_manager), ev);
}


125 126 127 128 129 130 131 132 133 134 135 136
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,
137
				   CORBA_char * obj_iid,
138 139
				   CORBA_Environment * ev)
{
140 141 142
   return (!strcmp(obj_iid, "OAFIID:ntl_file_manager_icon_view:42681b21-d5ca-4837-87d2-394d88ecc058")
           || !strcmp(obj_iid, "OAFIID:ntl_file_manager_list_view:521e489d-0662-4ad7-ac3a-832deabe111c")
           || !strcmp(obj_iid, "OAFIID:ntl_window:88e8b2e4-b627-4221-b566-5ba32185c88d"));
143 144 145 146
}

static CORBA_Object
impl_Nautilus_Application_create_object(impl_POA_Nautilus_Application *servant,
147
                                        CORBA_char *obj_iid,
148 149 150
					GNOME_stringlist * params,
					CORBA_Environment * ev)
{
151
  CORBA_Object retval = CORBA_OBJECT_NIL;
152 153 154
  FMDirectoryView *dir_view;
  NautilusContentViewFrame *view_frame;

155
  if(!impl_Nautilus_Application_supports(servant, obj_iid, ev))
156
    return CORBA_OBJECT_NIL;
157
        
158
  if (strcmp (obj_iid, "OAFIID:ntl_file_manager_icon_view:42681b21-d5ca-4837-87d2-394d88ecc058") == 0)
159
    dir_view = FM_DIRECTORY_VIEW (gtk_object_new (fm_icon_view_get_type (), NULL));
160
  else if (strcmp (obj_iid, "OAFIID:ntl_file_manager_list_view:521e489d-0662-4ad7-ac3a-832deabe111c") == 0)
161
    dir_view = FM_DIRECTORY_VIEW (gtk_object_new (fm_list_view_get_type (), NULL));
162 163
  else if (strcmp (obj_iid,"OAFIID:ntl_window:88e8b2e4-b627-4221-b566-5ba32185c88d") == 0)
    retval = impl_Nautilus_Application_new_view_window (servant, ev);
164 165
  else
    dir_view = NULL;
166
        
167
  g_return_val_if_fail(dir_view, CORBA_OBJECT_NIL);
168
        
169 170 171
  if(dir_view)
    {
      view_frame = fm_directory_view_get_view_frame (dir_view);
172

173 174 175 176
      retval = CORBA_Object_duplicate(bonobo_object_corba_objref(BONOBO_OBJECT(view_frame)), ev);
    }

  return retval;
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
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 ());
236 237 238 239 240 241 242 243

	/*
	 * 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 ();
244 245 246 247 248
}

static void
nautilus_app_init (NautilusApp *app)
{
249 250 251 252 253
	CORBA_Environment ev;
	CORBA_Object objref;
	
	CORBA_exception_init(&ev);
	objref = impl_Nautilus_Application__create(bonobo_poa(), app, &ev);
254

255
	oaf_active_server_register("OAFIID:ntl_file_manager_factory:bd1e1862-92d7-4391-963e-37583f0daef3", objref);
256

257
	bonobo_object_construct(BONOBO_OBJECT(app), objref);
258

259 260 261 262 263
	/* Init undo manager */
	nautilus_undo_manager_initialize_global_manager ();
	app->undo_manager = BONOBO_OBJECT (nautilus_undo_manager_get_undo_manager());
	
	CORBA_exception_free(&ev);
264 265 266 267 268 269 270 271 272 273
}

GtkObject *
nautilus_app_new      (void)
{
  return gtk_object_new(nautilus_app_get_type(), NULL);
}

static void
nautilus_app_destroy(GtkObject *object)
274
{
275 276 277 278 279 280 281 282
	/*
	 * Shutdown preferences.  This is needed so that the global preferences
	 * obejct 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 ();
283

284
  nautilus_bookmarks_exiting();
285
  GTK_OBJECT_CLASS(app_parent_class)->destroy(object);
286 287
}

288
void
289
nautilus_app_startup(NautilusApp *app, const char *initial_url)
290
{
291
	NautilusWindow *mainwin;
292

293 294 295 296
  	/* Set default configuration */
  	mainwin = nautilus_app_create_window(app);
  	bonobo_activate();
  	nautilus_window_set_initial_state(mainwin, initial_url);  	
297 298 299
}

static void
300
nautilus_app_destroy_window(GtkObject *obj, NautilusApp *app)
301
{
302
  app->windows = g_slist_remove(app->windows, obj);
303

304 305
  if(!app->windows)
    gtk_main_quit();
306 307 308
}

NautilusWindow *
309
nautilus_app_create_window(NautilusApp *app)
310
{
311 312 313
  GtkWidget *win = GTK_WIDGET (gtk_object_new (nautilus_window_get_type(), "app_id", "nautilus", 
                               "app", BONOBO_OBJECT(app), NULL));

314

315
  gtk_signal_connect(GTK_OBJECT(win), "destroy", nautilus_app_destroy_window, app);
316

317 318 319 320
  /* 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.
   */
321

322 323
  app->windows = g_slist_prepend(app->windows, win);

324 325
  return NAUTILUS_WINDOW(win);
}