CORBA编程
IDL的语言映射
要想用某种语言实现CORBA IDL定义的对象,需要在IDL和该语言间进行映射,称为language mapping。这也是CORBA标准的一部分。目前已制定了映射标准的语言包括:C,C++,Java,Smalltalk,COBOL等。C因为不是OO的语言,所以在CORBA应用中较少使用,但因为GNOME基本是用C实现的,所以这里使用C的映射。
GNOME中CORBA ORB的实现称为ORBit。最开始GNOME的实现者并未打算实现一个自己的ORB,因为已经有大量免费的实现。他们选择了MICO,但很快发现MICO不能满足GNOME开发的需要,于是Elliot Lee和Dick Porter 决定自己从头写一个新的符合要求的ORB,这就是ORBit。ORBit是按照CORBA2.2标准写的,特别是它的hooks使得与GNOME的应用可以很好的交互。
ORBit是用C写的,非常小而且非常快,使得它可以应用于很多以前认为不适于CORBA技术的场合。它的主要特点:
目前ORBit支持的语言包括:perl, C++, TCL, Python, Ada, Eiffel。
举例说明
编写ORBit下程序常见问题:
IDL文件
interface Echo { void echoString(in string input); };
Client程序
共分三步:1)初始化ORB, 2)获得对象; 3)使用对象。
#include "stdio.h" #include "orb/orbit.h" /* * This header file was generated from the idl */ #include "echo.h" /* * This is our Echo Object */ Echo echo_client; int main (int argc, char *argv[]) { CORBA_Environment ev; CORBA_ORB orb; FILE * ifp; char * ior; char filebuffer[1024]; /* * Standard initalisation of the orb. Notice that * ORB_init 'eats' stuff off the command line */ CORBA_exception_init(&ev); orb = CORBA_ORB_init(&argc, argv, "orbit-local-orb", &ev); /* * Get the IOR (object reference). It should be written out * by the echo-server into the file echo.ior. So - if you * are running the server in the same place as the client, * this should be fine! */ ifp = fopen("echo.ior","r"); if( ifp == NULL ) { g_error("No echo.ior file!"); exit(-1); } fgets(filebuffer,1024,ifp); ior = g_strdup(filebuffer); fclose(ifp); /* * Actually get the object. So easy! */ echo_client = CORBA_ORB_string_to_object(orb, ior, &ev); if (!echo_client) { printf("Cannot bind to %s\n", ior); return 1; } /* * Ok. Now we use the echo object... */ printf("Type messages to the server\n. as the only thing on the line stops\n"); while( fgets(filebuffer,1024,stdin) ) { if( filebuffer[0] == '.' && filebuffer[1] == '\n' ) break; /* chop the newline off */ filebuffer[strlen(filebuffer)-1] = '\0'; /* using the echoString method in the Echo object */ /* this is defined in the echo.h header, compiled from echo.idl */ Echo_echoString(echo_client,filebuffer,&ev); /* catch any exceptions (eg, network is down) */ if(ev._major != CORBA_NO_EXCEPTION) { printf("we got exception %d from echoString!\n", ev._major); return 1; } } /* Clean up */ CORBA_Object_release(echo_client, &ev); CORBA_Object_release((CORBA_Object)orb, &ev); return 0; }
Server程序
#include "stdio.h" #include "stdlib.h" #include "string.h" #include "signal.h" #include "orb/orbit.h" #include "echo.h" /* This is so we can get out a valid IOR later... */ Echo echo_client = CORBA_OBJECT_NIL; /* declaration of the meat of the process*/ static void do_echoString(PortableServer_Servant servant, CORBA_char *astring, CORBA_Environment *ev); /* * I have **no** idea what this bit does */ PortableServer_ServantBase__epv base_epv = { NULL, NULL, NULL }; POA_Echo__epv echo_epv = { NULL, do_echoString }; POA_Echo__vepv poa_echo_vepv = { &base_epv, &echo_epv }; POA_Echo poa_echo_servant = { NULL, &poa_echo_vepv }; int main (int argc, char *argv[]) { PortableServer_ObjectId objid = {0, sizeof("myEchoString"), "myEchoString"}; PortableServer_POA poa; CORBA_Environment ev; char *retval; CORBA_ORB orb; FILE * ofp; signal(SIGINT, exit); signal(SIGTERM, exit); CORBA_exception_init(&ev); orb = CORBA_ORB_init(&argc, argv, "orbit-local-orb", &ev); POA_Echo__init(&poa_echo_servant, &ev); poa = (PortableServer_POA)CORBA_ORB_resolve_initial_references(orb, "RootPOA", &ev); PortableServer_POAManager_activate(PortableServer_POA__get_the_POAManager(poa, &ev), &ev); PortableServer_POA_activate_object_with_id(poa, &objid, &poa_echo_servant, &ev); echo_client = PortableServer_POA_servant_to_reference(poa, &poa_echo_servant, &ev); if (!echo_client) { printf("Cannot get objref\n"); return 1; } retval = CORBA_ORB_object_to_string(orb, echo_client, &ev); ofp = fopen("echo.ior","w"); fprintf(ofp,"%s", retval); fclose(ofp); CORBA_free(retval); fprintf(stdout,"Written the file echo.ior with the IOR of this server.\n Now waiting for requests...\n"); fflush(stdout); CORBA_ORB_run(orb, &ev); return 0; } static void do_echoString(PortableServer_Servant servant, CORBA_char *astring, CORBA_Environment *ev) { g_message("[server] %s", astring); return; }