mc/gnome/gcorba.c
1999-09-09 16:17:18 +00:00

663 lines
16 KiB
C
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/* CORBA support for the Midhignt Commander
*
* Copyright (C) 1999 The Free Sofware Foundation
*
* Authors: Miguel de Icaza <miguel@nuclecu.unam.mx>
* Federico Mena <federico@nuclecu.unam.mx>
* Elliot Lee <sopwith@cuc.edu>
*/
#include <config.h>
#include "panel.h"
#include "../vfs/vfs.h"
#include <libgnorba/gnorba.h>
#include "FileManager.h"
#include "gcmd.h"
#include "gcorba.h"
#include "gdesktop.h"
#include "global.h"
#include "gmain.h"
#include "gscreen.h"
#include "main.h"
/* The ORB for the whole program */
CORBA_ORB orb = CORBA_OBJECT_NIL;
/* The POA */
PortableServer_POA poa;
/* Desktop servant */
typedef struct {
POA_GNOME_FileManager_Desktop servant;
} DesktopServant;
static POA_GNOME_FileManager_Desktop__epv desktop_epv;
static POA_GNOME_FileManager_Desktop__vepv desktop_vepv;
/* Window servant */
typedef struct {
POA_GNOME_FileManager_Window servant;
WPanel *panel;
} WindowServant;
static POA_GNOME_FileManager_Window__epv window_epv;
static POA_GNOME_FileManager_Window__vepv window_vepv;
/* WindowFactory servant */
typedef struct {
POA_GNOME_FileManager_WindowFactory servant;
} WindowFactoryServant;
static POA_GNOME_FileManager_WindowFactory__epv window_factory_epv;
static POA_GNOME_FileManager_WindowFactory__vepv window_factory_vepv;
/* References to the window factory and desktop server objects */
static CORBA_Object window_factory_server = CORBA_OBJECT_NIL;
static CORBA_Object desktop_server = CORBA_OBJECT_NIL;
/* Desktop implementation */
static void
Desktop_rescan (PortableServer_Servant servant, CORBA_Environment *ev)
{
desktop_reload_icons (FALSE, 0, 0);
}
static void
Desktop_rescan_devices (PortableServer_Servant servant, CORBA_Environment *ev)
{
desktop_rescan_devices ();
}
/* Window implementation */
/* Window::close method */
static void
Window_close (PortableServer_Servant servant, CORBA_Environment *ev)
{
WindowServant *ws;
ws = (WindowServant *) ws;
gnome_close_panel (GTK_WIDGET (ws->panel->xwindow), ws->panel);
}
/* Destroys the servant for an image window */
static void
window_destroy (WindowServant *ws, CORBA_Environment *ev)
{
PortableServer_ObjectId *objid;
objid = PortableServer_POA_servant_to_id (poa, ws, ev);
PortableServer_POA_deactivate_object (poa, objid, ev);
CORBA_free (objid);
POA_GNOME_FileManager_Window__fini (ws, ev);
g_free (ws);
}
/* WindowFactory implementation */
/* WindowFactory::the_desktop attribute getter */
static GNOME_FileManager_Desktop
WindowFactory_get_the_desktop (PortableServer_Servant servant,
CORBA_Environment *ev)
{
g_assert (desktop_server != CORBA_OBJECT_NIL);
return CORBA_Object_duplicate (desktop_server, ev);
}
/* Called when a panel created through CORBA is destroyed */
static void
panel_destroyed (GtkObject *object, gpointer data)
{
WindowServant *ws;
CORBA_Environment ev;
ws = data;
CORBA_exception_init (&ev);
window_destroy (ws, &ev);
CORBA_exception_free (&ev);
}
/* Returns a servant for a panel, creating one if necessary */
static WindowServant *
window_servant_from_panel (WPanel *panel, CORBA_Environment *ev)
{
WindowServant *ws;
PortableServer_ObjectId *objid;
if (panel->servant)
return panel->servant;
ws = g_new0 (WindowServant, 1);
ws->servant.vepv = &window_vepv;
POA_GNOME_FileManager_Window__init ((PortableServer_Servant) ws, ev);
objid = PortableServer_POA_activate_object (poa, ws, ev);
CORBA_free (objid);
ws->panel = panel;
panel->servant = ws;
gtk_signal_connect (GTK_OBJECT (panel->xwindow), "destroy",
(GtkSignalFunc) panel_destroyed,
ws);
return ws;
}
/* WindowFactory::create_window method */
static GNOME_FileManager_Window
WindowFactory_create_window (PortableServer_Servant servant,
CORBA_char *dir,
CORBA_Environment *ev)
{
WPanel *panel;
WindowServant *ws;
panel = new_panel_at (dir);
ws = window_servant_from_panel (panel, ev);
return PortableServer_POA_servant_to_reference (poa, ws, ev);
}
/* WindowFactory::rescan_directory method */
static void
WindowFactory_rescan_directory (PortableServer_Servant servant,
CORBA_char *dir,
CORBA_Environment *ev)
{
PanelContainer *pc;
GList *l;
int len;
/* We do a blind compare against the panel's cwd */
len = strlen (dir);
if (dir[len - 1] == PATH_SEP)
len--;
for (l = containers; l; l = l->next) {
pc = l->data;
if (strncmp (dir, pc->panel->cwd, len) == 0
&& (pc->panel->cwd[len] == 0 || pc->panel->cwd[len] == PATH_SEP))
update_one_panel_widget (pc->panel, UP_RELOAD, UP_KEEPSEL);
}
}
/* WindowFactory::close_invalid_windows method */
static void
WindowFactory_close_invalid_windows (PortableServer_Servant servant,
CORBA_Environment *ev)
{
PanelContainer *pc;
GList *l;
/* To see if a panel is valid or not, we try to cd to its cwd. If this
* fails, then we destroy the panel's window.
*/
for (l = containers; l; l = l->next) {
pc = l->data;
if (mc_chdir (pc->panel->cwd) != 0)
gnome_close_panel (GTK_WIDGET (pc->panel->xwindow), pc->panel);
}
}
/* Creates an object reference for a panel */
static GNOME_FileManager_Window
window_reference_from_panel (WPanel *panel, CORBA_Environment *ev)
{
WindowServant *ws;
ws = window_servant_from_panel (panel, ev);
return PortableServer_POA_servant_to_reference (poa, ws, ev);
}
/* WindowFactory::get_window_by_directory method */
static GNOME_FileManager_WindowFactory_WindowSeq *
WindowFactory_get_windows_by_directory (PortableServer_Servant servant,
CORBA_char *dir,
CORBA_Environment *ev)
{
GNOME_FileManager_WindowFactory_WindowSeq *seq;
PanelContainer *pc;
GList *l;
int n, i;
/* We return a sequence of the windows that match the specified
* directory.
*/
/* Count 'em */
n = 0;
for (l = containers; l; l = l->next) {
pc = l->data;
if (strcmp (pc->panel->cwd, dir) == 0)
n++;
}
seq = GNOME_FileManager_WindowFactory_WindowSeq__alloc ();
seq->_buffer = CORBA_sequence_GNOME_FileManager_Window_allocbuf (n);
for (l = containers, i = 0; l; l = l->next, i++) {
pc = l->data;
if (strcmp (pc->panel->cwd, dir) == 0)
seq->_buffer[i] = window_reference_from_panel (pc->panel, ev);
}
return seq;
}
/* WindowFactory GenericFactory::supports method */
static CORBA_boolean
WindowFactory_supports (PortableServer_Servant servant,
CORBA_char *obj_goad_id,
CORBA_Environment *ev)
{
if (strcmp (obj_goad_id, "IDL:GNOME:FileManager:Window:1.0") == 0
|| strcmp (obj_goad_id, "IDL:GNOME:FileManager:Desktop:1.0") == 0)
return CORBA_TRUE;
else
return CORBA_FALSE;
}
/* WindowFactory GenericFactory::create_object method */
static CORBA_Object
WindowFactory_create_object (PortableServer_Servant servant,
CORBA_char *goad_id,
GNOME_stringlist *params,
CORBA_Environment *ev)
{
if (strcmp (goad_id, "IDL:GNOME:FileManager:Window:1.0") != 0)
return WindowFactory_create_window (
servant,
params->_length != 0 ? params->_buffer[0] : home_dir,
ev);
else if (strcmp (goad_id, "IDL:GNOME:FileManager:Desktop:1.0") == 0)
return WindowFactory_get_the_desktop (servant, ev);
else {
CORBA_exception_set (ev, CORBA_USER_EXCEPTION,
ex_GNOME_GenericFactory_CannotActivate,
NULL);
return CORBA_OBJECT_NIL;
}
}
/* Creates a reference for the window factory object */
static GNOME_FileManager_WindowFactory
WindowFactory_create (PortableServer_POA poa, CORBA_Environment *ev)
{
WindowFactoryServant *wfs;
PortableServer_ObjectId *objid;
wfs = g_new0 (WindowFactoryServant, 1);
wfs->servant.vepv = &window_factory_vepv;
POA_GNOME_FileManager_WindowFactory__init ((PortableServer_Servant) wfs, ev);
objid = PortableServer_POA_activate_object (poa, wfs, ev);
CORBA_free (objid);
return PortableServer_POA_servant_to_reference (poa, wfs, ev);
}
#if 0
/*** Implementation stub prototypes ***/
static void impl_GNOME_FileManagerWindow__destroy (impl_POA_GNOME_FileManagerWindow *servant,
CORBA_Environment *ev);
static void impl_GNOME_FileManagerWindow_close (impl_POA_GNOME_FileManagerWindow *servant,
CORBA_Environment *ev);
static void impl_GNOME_FileManagerFactory__destroy (impl_POA_GNOME_FileManagerFactory *servant,
CORBA_Environment *ev);
static CORBA_boolean impl_GNOME_FileManagerFactory_supports (
impl_POA_GNOME_FileManagerFactory *servant,
const CORBA_char *obj_goad_id,
CORBA_Environment *ev);
static CORBA_Object impl_GNOME_FileManagerFactory_create_object (
impl_POA_GNOME_FileManagerFactory *servant,
const CORBA_char *goad_id,
const GNOME_stringlist *params,
CORBA_Environment *ev);
static GNOME_FileManagerWindow impl_GNOME_FileManagerFactory_create_window (
impl_POA_GNOME_FileManagerFactory * servant,
const CORBA_char * dir,
CORBA_Environment * ev);
/*** epv structures ***/
static PortableServer_ServantBase__epv impl_GNOME_FileManagerWindow_base_epv =
{
NULL, /* _private data */
NULL, /* finalize routine */
NULL, /* default_POA routine */
};
static POA_GNOME_FileManagerWindow__epv impl_GNOME_FileManagerWindow_epv =
{
NULL, /* _private */
(gpointer) &impl_GNOME_FileManagerWindow_close,
};
static PortableServer_ServantBase__epv impl_GNOME_FileManagerFactory_base_epv =
{
NULL, /* _private data */
NULL, /* finalize routine */
NULL, /* default_POA routine */
};
static POA_GNOME_FileManagerFactory__epv impl_GNOME_FileManagerFactory_epv =
{
NULL, /* _private */
(gpointer) &impl_GNOME_FileManagerFactory_create_window,
};
static POA_GNOME_GenericFactory__epv impl_GNOME_FileManagerFactory_GNOME_GenericFactory_epv =
{
NULL, /* _private */
(gpointer) &impl_GNOME_FileManagerFactory_supports,
(gpointer) &impl_GNOME_FileManagerFactory_create_object
};
/*** vepv structures ***/
static POA_GNOME_FileManagerWindow__vepv impl_GNOME_FileManagerWindow_vepv =
{
&impl_GNOME_FileManagerWindow_base_epv,
&impl_GNOME_FileManagerWindow_epv
};
static POA_GNOME_FileManagerFactory__vepv impl_GNOME_FileManagerFactory_vepv =
{
&impl_GNOME_FileManagerFactory_base_epv,
&impl_GNOME_FileManagerFactory_GNOME_GenericFactory_epv,
&impl_GNOME_FileManagerFactory_epv
};
/*** Stub implementations ***/
static GNOME_FileManagerWindow
impl_GNOME_FileManagerWindow__create(PortableServer_POA poa,
impl_POA_GNOME_FileManagerWindow **servant,
CORBA_Environment *ev)
{
GNOME_FileManagerWindow retval;
impl_POA_GNOME_FileManagerWindow *newservant;
PortableServer_ObjectId *objid;
newservant = g_new0 (impl_POA_GNOME_FileManagerWindow, 1);
newservant->servant.vepv = &impl_GNOME_FileManagerWindow_vepv;
newservant->poa = poa;
POA_GNOME_FileManagerWindow__init ((PortableServer_Servant) newservant, ev);
objid = PortableServer_POA_activate_object (poa, newservant, ev);
CORBA_free (objid);
retval = PortableServer_POA_servant_to_reference (poa, newservant, ev);
if (servant)
*servant = newservant;
return retval;
}
/* You shouldn't call this routine directly without first deactivating the servant... */
static void
impl_GNOME_FileManagerWindow__destroy(impl_POA_GNOME_FileManagerWindow *servant,
CORBA_Environment *ev)
{
PortableServer_ObjectId *objid;
objid = PortableServer_POA_servant_to_id (servant->poa, servant, ev);
PortableServer_POA_deactivate_object (servant->poa, objid, ev);
CORBA_free (objid);
POA_GNOME_FileManagerWindow__fini ((PortableServer_Servant) servant, ev);
g_free(servant);
}
static void
impl_GNOME_FileManagerWindow_close(impl_POA_GNOME_FileManagerWindow *servant,
CORBA_Environment *ev)
{
gnome_close_panel (GTK_WIDGET (servant->panel->xwindow), servant->panel);
}
static GNOME_FileManagerFactory
impl_GNOME_FileManagerFactory__create(PortableServer_POA poa,
impl_POA_GNOME_FileManagerFactory **servant,
CORBA_Environment *ev)
{
GNOME_FileManagerFactory retval;
impl_POA_GNOME_FileManagerFactory *newservant;
PortableServer_ObjectId *objid;
newservant = g_new0 (impl_POA_GNOME_FileManagerFactory, 1);
newservant->servant.vepv = &impl_GNOME_FileManagerFactory_vepv;
newservant->poa = poa;
POA_GNOME_FileManagerFactory__init ((PortableServer_Servant) newservant, ev);
objid = PortableServer_POA_activate_object (poa, newservant, ev);
CORBA_free (objid);
retval = PortableServer_POA_servant_to_reference (poa, newservant, ev);
if (servant)
*servant = newservant;
return retval;
}
/* You shouldn't call this routine directly without first deactivating the servant... */
static void
impl_GNOME_FileManagerFactory__destroy(impl_POA_GNOME_FileManagerFactory *servant,
CORBA_Environment *ev)
{
PortableServer_ObjectId *objid;
objid = PortableServer_POA_servant_to_id (servant->poa, servant, ev);
PortableServer_POA_deactivate_object (servant->poa, objid, ev);
CORBA_free (objid);
POA_GNOME_FileManagerFactory__fini ((PortableServer_Servant) servant, ev);
g_free (servant);
}
static CORBA_boolean
impl_GNOME_FileManagerFactory_supports (impl_POA_GNOME_FileManagerFactory *servant,
const CORBA_char *obj_goad_id,
CORBA_Environment *ev)
{
if (strcmp (obj_goad_id, "IDL:GNOME:FileManagerWindow:1.0") == 0)
return CORBA_TRUE;
else
return CORBA_FALSE;
}
static CORBA_Object
impl_GNOME_FileManagerFactory_create_object (impl_POA_GNOME_FileManagerFactory *servant,
const CORBA_char *goad_id,
const GNOME_stringlist *params,
CORBA_Environment *ev)
{
if (strcmp (goad_id, "IDL:GNOME:FileManagerWindow:1.0") != 0) {
CORBA_exception_set (ev, CORBA_USER_EXCEPTION,
ex_GNOME_GenericFactory_CannotActivate,
NULL);
return CORBA_OBJECT_NIL;
}
return impl_GNOME_FileManagerFactory_create_window (
servant,
params->_length ? params->_buffer[0] : home_dir,
ev);
}
/* Callback used when a panel is destroyed */
static void
panel_destroyed (GtkObject *object, gpointer data)
{
impl_POA_GNOME_FileManagerWindow *servant;
CORBA_Environment ev;
servant = data;
CORBA_exception_init (&ev);
impl_GNOME_FileManagerWindow__destroy (servant, &ev);
CORBA_exception_free (&ev);
}
static GNOME_FileManagerWindow
impl_GNOME_FileManagerFactory_create_window(impl_POA_GNOME_FileManagerFactory *servant,
const CORBA_char *dir,
CORBA_Environment *ev)
{
GNOME_FileManagerWindow retval;
impl_POA_GNOME_FileManagerWindow *newservant;
WPanel *panel;
retval = impl_GNOME_FileManagerWindow__create (servant->poa,
&newservant,
ev);
panel = new_panel_at ((dir && *dir) ? dir : home_dir);
newservant->panel = panel;
gtk_signal_connect (GTK_OBJECT (panel->xwindow), "destroy",
(GtkSignalFunc) panel_destroyed,
newservant);
return retval;
}
#endif
/*** Public non-implementation functions ***/
/* Creates the CORBA server */
static int
create_server (void)
{
CORBA_Environment ev;
PortableServer_POAManager poa_manager;
int retval;
int v;
retval = FALSE;
CORBA_exception_init (&ev);
/* Get the POA and create the server */
poa = (PortableServer_POA) CORBA_ORB_resolve_initial_references (orb, "RootPOA", &ev);
if (ev._major != CORBA_NO_EXCEPTION)
goto out;
poa_manager = PortableServer_POA__get_the_POAManager (poa, &ev);
if (ev._major != CORBA_NO_EXCEPTION)
goto out;
PortableServer_POAManager_activate (poa_manager, &ev);
if (ev._major != CORBA_NO_EXCEPTION)
goto out;
window_factory_server = WindowFactory_create (poa, &ev);
if (ev._major != CORBA_NO_EXCEPTION)
goto out;
/* Register the server and see if it was already there */
v = goad_server_register (CORBA_OBJECT_NIL, window_factory_server,
"IDL:GNOME:FileManager:WindowFactory:1.0", "server", &ev);
switch (v) {
case 0:
corba_have_server = FALSE;
break;
case -2:
corba_have_server = FALSE;
break;
default:
goto out;
}
retval = TRUE;
/* Done */
out:
return retval;
}
/**
* corba_init_server:
* @void:
*
* Initializes the CORBA server for GMC. Returns whether initialization was
* successful or not, and sets the global corba_have_server variable.
*
* Return value: TRUE if successful, FALSE otherwise.
**/
int
corba_init_server (void)
{
window_factory_server = goad_server_activate_with_id (
NULL,
"IDL:GNOME:FileManager:WindowFactory:1.0",
GOAD_ACTIVATE_EXISTING_ONLY,
NULL);
if (window_factory_server != CORBA_OBJECT_NIL) {
corba_have_server = TRUE;
return TRUE;
} else
return create_server ();
}
/**
* corba_create_window:
* @dir: The directory in which to create the window, or NULL for the cwd.
*
* Creates a GMC window using a CORBA call to the server.
**/
void
corba_create_window (const char *dir)
{
CORBA_Environment ev;
char cwd[MC_MAXPATHLEN];
if (dir == NULL) {
mc_get_current_wd (cwd, MC_MAXPATHLEN);
dir = cwd;
}
CORBA_exception_init (&ev);
GNOME_FileManager_WindowFactory_create_window (window_factory_server, dir, &ev);
CORBA_exception_free (&ev);
}