out.println("TAG_INTERNET_IOP Profiles:");
for( int i = 0; i < profiles.size(); i++ )
{
out.println("\tProfile Id:\t\t" + i);
ProfileBase profile = (ProfileBase)profiles.get(i);
out.println("\tIIOP Version:\t\t" +
(int)profile.version().major + "." +
(int)profile.version().minor);
if (profile instanceof IIOPProfile)
{
out.println("\tHost:\t\t\t" +
((IIOPAddress)((IIOPProfile)profile).getAddress()).getOriginalHost());
int port = ((IIOPAddress)((IIOPProfile)profile).getAddress()).getPort();
if( port < 0 )
{
port += 65536;
}
out.println("\tPort:\t\t\t" + port );
}
else if (profile instanceof MIOPProfile)
{
out.println ("MIOPProfile:\t" + ((MIOPProfile)profile).toString ());
}
out.println("\tObject key (URL):\t" + CorbaLoc.parseKey( profile.get_object_key()));
out.print ("\tObject key (hex):\t0x" );
dumpHex( profile.get_object_key(), out);
out.println();
if ( profile.version().minor >= ( char ) 1 )
{
if( profile.getComponents().size() > 0 )
{
out.println("\t-- Found " +
profile.getComponents().size() +
" Tagged Components--" );
}
printTaggedComponents(orb, profile.getComponents().asArray(), out);
}
out.print("\n");
}
TaggedComponentList multiple_components = pior.getMultipleComponents();
if( multiple_components.size() > 0 )
{
out.println("Components in MULTIPLE_COMPONENTS profile: " +
multiple_components.size() );
printTaggedComponents(orb, multiple_components.asArray(), out);
}
// Print any unknown tags. This block is a simplified version of the private
// ParsedIOR::decode function.
for (int i=0; i < ior.profiles.length; i++)
{
int tag = ior.profiles[i].tag;
boolean found = false;
// See if JacORB managed to parse this tag before into the ParsedIOR
for (int j=0; j < profiles.size(); j++)
{
final IIOPProfile profile = (IIOPProfile)profiles.get(j);
if (profile.tag () == tag)
{
found = true;
}
if (tag == TAG_MULTIPLE_COMPONENTS.value)