nautilus-application.c 9.69 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

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

39 40
  Nautilus_ViewWindowList attr_view_windows;
} impl_POA_Nautilus_Application;
41

42 43 44 45 46 47 48 49
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,
50
				   CORBA_char *obj_iid,
51 52 53
				   CORBA_Environment * ev);
static CORBA_Object
impl_Nautilus_Application_create_object(impl_POA_Nautilus_Application *servant,
54
                                        CORBA_char *obj_iid,
55 56 57 58 59 60 61 62 63
					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

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

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

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

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

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

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

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

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

	/*
	 * 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 ();
230 231 232 233 234 235 236 237 238 239
}

static void
nautilus_app_init (NautilusApp *app)
{
  CORBA_Environment ev;
  CORBA_Object objref;

  CORBA_exception_init(&ev);
  objref = impl_Nautilus_Application__create(bonobo_poa(), app, &ev);
240 241 242

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

243 244 245 246 247 248 249 250 251 252 253 254
  bonobo_object_construct(BONOBO_OBJECT(app), objref);
  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)
255
{
256 257 258 259 260 261 262 263
	/*
	 * 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 ();
264

265
  nautilus_bookmarks_exiting();
266
  GTK_OBJECT_CLASS(app_parent_class)->destroy(object);
267 268
}

269
void
270
nautilus_app_startup(NautilusApp *app, const char *initial_url)
271 272 273 274
{
  NautilusWindow *mainwin;

  /* Set default configuration */
275
  mainwin = nautilus_app_create_window(app);
276
  bonobo_activate();
277
  nautilus_window_set_initial_state(mainwin, initial_url);
278 279 280
}

static void
281
nautilus_app_destroy_window(GtkObject *obj, NautilusApp *app)
282
{
283
  app->windows = g_slist_remove(app->windows, obj);
284

285 286
  if(!app->windows)
    gtk_main_quit();
287 288 289
}

NautilusWindow *
290
nautilus_app_create_window(NautilusApp *app)
291
{
292 293 294
  GtkWidget *win = GTK_WIDGET (gtk_object_new (nautilus_window_get_type(), "app_id", "nautilus", 
                               "app", BONOBO_OBJECT(app), NULL));

295

296
  gtk_signal_connect(GTK_OBJECT(win), "destroy", nautilus_app_destroy_window, app);
297

298 299 300 301
  /* 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.
   */
302

303 304
  app->windows = g_slist_prepend(app->windows, win);

305 306
  return NAUTILUS_WINDOW(win);
}