CORBA::ORBit - J2SE CORBA hang up
- From: "KAWAI,Takanori" <GCD00051 nifty ne jp>
- To: <orbit-list gnome org>
- Subject: CORBA::ORBit - J2SE CORBA hang up
- Date: Wed, 28 Nov 2001 17:25:19 +0900
Hi all.
I try to connect Perl(CORBA::ORBit 0.4.3) client to
Java (J2SE 1.4.0-beta) server but it hangs up.
The point seems to be at client.c (CORBA::ORBit) this line:
recv_buffer = giop_recv_reply_buffer_use_2(connection, request_id, TRUE);
Does anyone know to solve it?
Java server with Java client works well.
And Perl server with Perl and Java client also works well.
[IDL]
module HelloMod {
interface Hello {
string getMessage();
};
};
[Server(Java)]
import HelloMod.*;
import org.omg.CORBA.*;
import org.omg.PortableServer.*;
import org.omg.PortableServer.POA;
class HelloImpl extends HelloPOA {
private ORB orb;
public String getMessage() {
System.out.println("Welcome Java");
return "\nHello Java IDL world !\n";
}
}
public class HelloServer {
public static void main(String args[]) {
try{
ORB orb = ORB.init(args, null);
POA rootpoa = (POA)orb.resolve_initial_references("RootPOA");
rootpoa.the_POAManager().activate();
HelloImpl helloImpl = new HelloImpl();
org.omg.CORBA.Object ref = rootpoa.servant_to_reference(helloImpl);
String str = orb.object_to_string(ref);
java.io.PrintWriter out = new java.io.PrintWriter(
new java.io.FileOutputStream("Hello.ref"));
out.println(str);
out.flush();
System.out.println("HelloServer Startup");
orb.run();
}
catch (Exception e) {
System.err.println("ERROR: " + e);
e.printStackTrace(System.out);
}
System.out.println("HelloServer terminating");
}
}
[Client(Perl)]
#!/usr/bin/perl -w
use strict;
use CORBA::ORBit idl => [ qw(HelloMod.idl) ];
use Error qw(:try);
my $orb = CORBA::ORB_init("orbit-local-orb");
open IOR, "Hello.ref";
my $ior = <IOR>;
close IOR;
chomp($ior);
print length($ior), "\n";
my $account = $orb->string_to_object($ior);
print "ACCOUNT:$account\n";
print $account->getMessage();
[Result]
308
ACCOUNT:HelloMod::Hello=SCALAR(0x80d10d0)
Welcome Java
(Not terminate...)
==============================================
Kawai, Takanori(Hippo2000)
Mail: GCD00051@nifty.ne.jp kwitknr@cpan.org
http://member.nifty.ne.jp/hippo2000
==============================================
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]