nautilus-application.c 9.91 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 46 47 48 49 50
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,
51
				   CORBA_char *obj_iid,
52 53 54
				   CORBA_Environment * ev);
static CORBA_Object
impl_Nautilus_Application_create_object(impl_POA_Nautilus_Application *servant,
55
                                        CORBA_char *obj_iid,
56 57 58 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,
   (gpointer) &impl_Nautilus_Application_new_view_window

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

static Nautilus_ViewWindowList *
83 84
impl_Nautilus_Application__get_view_windows(impl_POA_Nautilus_Application *servant,
                                            CORBA_Environment * ev)
85
{
86 87
   Nautilus_ViewWindowList *retval;

88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108
   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);

109 110 111 112 113 114 115 116 117 118 119 120 121 122 123
   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,
124
				   CORBA_char * obj_iid,
125 126
				   CORBA_Environment * ev)
{
127 128 129
   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"));
130 131 132 133
}

static CORBA_Object
impl_Nautilus_Application_create_object(impl_POA_Nautilus_Application *servant,
134
                                        CORBA_char *obj_iid,
135 136 137
					GNOME_stringlist * params,
					CORBA_Environment * ev)
{
138
  CORBA_Object retval = CORBA_OBJECT_NIL;
139 140 141
  FMDirectoryView *dir_view;
  NautilusContentViewFrame *view_frame;

142
  if(!impl_Nautilus_Application_supports(servant, obj_iid, ev))
143
    return CORBA_OBJECT_NIL;
144
        
145
  if (strcmp (obj_iid, "OAFIID:ntl_file_manager_icon_view:42681b21-d5ca-4837-87d2-394d88ecc058") == 0)
146
    dir_view = FM_DIRECTORY_VIEW (gtk_object_new (fm_icon_view_get_type (), NULL));
147
  else if (strcmp (obj_iid, "OAFIID:ntl_file_manager_list_view:521e489d-0662-4ad7-ac3a-832deabe111c") == 0)
148
    dir_view = FM_DIRECTORY_VIEW (gtk_object_new (fm_list_view_get_type (), NULL));
149 150
  else if (strcmp (obj_iid,"OAFIID:ntl_window:88e8b2e4-b627-4221-b566-5ba32185c88d") == 0)
    retval = impl_Nautilus_Application_new_view_window (servant, ev);
151 152
  else
    dir_view = NULL;
153
        
154
  g_return_val_if_fail(dir_view, CORBA_OBJECT_NIL);
155
        
156 157 158
  if(dir_view)
    {
      view_frame = fm_directory_view_get_view_frame (dir_view);
159

160 161 162 163
      retval = CORBA_Object_duplicate(bonobo_object_corba_objref(BONOBO_OBJECT(view_frame)), ev);
    }

  return retval;
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
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 ());
223 224 225 226 227 228 229 230

	/*
	 * 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 ();
231 232 233 234 235
}

static void
nautilus_app_init (NautilusApp *app)
{
236 237 238 239 240
	CORBA_Environment ev;
	CORBA_Object objref;
	
	CORBA_exception_init(&ev);
	objref = impl_Nautilus_Application__create(bonobo_poa(), app, &ev);
241

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

244
	bonobo_object_construct(BONOBO_OBJECT(app), objref);
245

246 247 248 249 250
	/* Init undo manager */
	nautilus_undo_manager_initialize_global_manager ();
	app->undo_manager = BONOBO_OBJECT (nautilus_undo_manager_get_undo_manager());
	
	CORBA_exception_free(&ev);
251 252 253 254 255 256 257 258 259 260
}

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

static void
nautilus_app_destroy(GtkObject *object)
261
{
262 263 264 265 266 267 268 269
	/*
	 * 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 ();
270

271
  nautilus_bookmarks_exiting();
272
  GTK_OBJECT_CLASS(app_parent_class)->destroy(object);
273 274
}

275
void
276
nautilus_app_startup(NautilusApp *app, const char *initial_url)
277
{
278
	NautilusWindow *mainwin;
279

280 281 282 283
  	/* Set default configuration */
  	mainwin = nautilus_app_create_window(app);
  	bonobo_activate();
  	nautilus_window_set_initial_state(mainwin, initial_url);  	
284 285 286
}

static void
287
nautilus_app_destroy_window(GtkObject *obj, NautilusApp *app)
288
{
289
  app->windows = g_slist_remove(app->windows, obj);
290

291 292
  if(!app->windows)
    gtk_main_quit();
293 294 295
}

NautilusWindow *
296
nautilus_app_create_window(NautilusApp *app)
297
{
298 299 300
  GtkWidget *win = GTK_WIDGET (gtk_object_new (nautilus_window_get_type(), "app_id", "nautilus", 
                               "app", BONOBO_OBJECT(app), NULL));

301

302
  gtk_signal_connect(GTK_OBJECT(win), "destroy", nautilus_app_destroy_window, app);
303

304 305 306 307
  /* 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.
   */
308

309 310
  app->windows = g_slist_prepend(app->windows, win);

311 312
  return NAUTILUS_WINDOW(win);
}