Package corba.abroc

Source Code of corba.abroc.Test75$AnyInputStream

package corba.abroc;

import java.io.Serializable;
import java.math.BigDecimal;
import java.util.List ;
import java.util.ArrayList ;

import org.omg.CORBA.Principal ;
import org.omg.CORBA.TypeCode ;
import org.omg.CORBA.Any ;
import org.omg.CORBA.CompletionStatus ;
import org.omg.CORBA.TCKind ;

import org.omg.CORBA.portable.Streamable;
import org.omg.CORBA.portable.InputStream;
import org.omg.CORBA.portable.OutputStream;
import org.omg.CORBA.TypeCodePackage.BadKind;
import org.omg.CORBA.TypeCodePackage.Bounds;

import com.sun.corba.se.spi.orb.ORB;
import com.sun.corba.se.spi.orb.ORBVersionFactory;
import com.sun.corba.se.spi.logging.CORBALogDomains;
import com.sun.corba.se.spi.presentation.rmi.StubAdapter;

import com.sun.corba.se.impl.encoding.CDRInputStream;
import com.sun.corba.se.impl.encoding.EncapsInputStream;
import com.sun.corba.se.impl.encoding.EncapsOutputStream;
import com.sun.corba.se.impl.io.ValueUtility;
import com.sun.corba.se.impl.orbutil.RepositoryIdFactory;
import com.sun.corba.se.impl.orbutil.RepositoryIdStrings;
import com.sun.corba.se.impl.orbutil.ORBUtility;
import com.sun.corba.se.impl.logging.ORBUtilSystemException;

// subclasses must provide a matching helper class
public class Test75 extends Any
{
    private static final class AnyInputStream extends EncapsInputStream
    {
  public AnyInputStream(EncapsInputStream theStream )
  {
      super( theStream );
  }
    }

    private static final class AnyOutputStream extends EncapsOutputStream
    {
  public AnyOutputStream(ORB orb)
  {
      super((ORB)orb);
  }

  public org.omg.CORBA.portable.InputStream create_input_stream()
  {
      return new AnyInputStream(
    (com.sun.corba.se.impl.encoding.EncapsInputStream)
        super.create_input_stream());
  }
    }

    //
    // Always valid.
    //
    private TypeCodeImpl typeCode;
    protected ORB orb;
    private ORBUtilSystemException wrapper ;

    //
    // Validity depends upon typecode. The 'value' and 'object' instance
    // members are used to hold immutable types as defined by the
    // isStreamed[] table below. Otherwise, 'stream' is non-null and
    // holds the value in CDR marshaled format. As an optimization, the
    // stream type is an Any extension of CDR stream that is used to
    // detect an optimization in read_value().
    //
    private CDRInputStream stream;
    private long value;
    private java.lang.Object object;

    // Setting the typecode via the type() accessor wipes out the value.
    // An attempt to extract before the value is set will result
    // in a BAD_OPERATION exception being raised.
    private boolean isInitialized = false;

    private static final int DEFAULT_BUFFER_SIZE = 32;

    /*
     * This boolean array tells us if a given typecode must be
     * streamed. Objects that are immutable don't have to be streamed.
     */
    static boolean isStreamed[] = {
  false,  // null
  false,  // void
  false,  // short
  false,  // long
  false,  // ushort
  false,  // ulong
  false,  // float
  false,  // double
  false,  // boolean
  false,  // char
  false,  // octet
  false,  // any
  false,  // TypeCode
  true,   // Principal
  false,  // objref
  true,   // struct
  true,   // union
  false,  // enum
      false,  // string
  true,   // sequence
  true,   // array
  true,   // alias
  true,   // except
  false,  // longlong
  false,  // ulonglong
  false,  // longdouble
  false,  // wchar
  false,  // wstring
  false,  // fixed
  false,  // value
  false,  // value_box (used to be true)
        false,  // native
        false   // abstract interface
    };

    static AnyImpl convertToNative(ORB orb, Any any) {
        if (any instanceof AnyImpl) {
            return (AnyImpl)any;
        } else {
            AnyImpl anyImpl = new AnyImpl(orb, any);
            anyImpl.typeCode = TypeCodeImpl.convertToNative(orb, anyImpl.typeCode);
            return anyImpl;
        }
    }

    ///////////////////////////////////////////////////////////////////////////
    // Constructors

    /**
     * A constructor that sets the Any to contain a null. It also marks
     * the value as being invalid so that extractions throw an exception
     * until an insertion has been performed.
     */
    public AnyImpl(ORB orb)
    {
  this.orb = orb;
  wrapper = ORBUtilSystemException.get( (com.sun.corba.se.spi.orb.ORB)orb,
      CORBALogDomains.RPC_PRESENTATION ) ;

  typeCode = orb.get_primitive_tc(TCKind._tk_null);
  stream = null;
  object = null;
  value = 0;
        // null is a valid value
        isInitialized = true;
    }

    //
    // Create a new AnyImpl which is a copy of obj.
    //
    public AnyImpl(ORB orb, Any obj) {
  this(orb);

  if ((obj instanceof AnyImpl)) {
      AnyImpl objImpl = (AnyImpl)obj;
      typeCode = objImpl.typeCode;
      value = objImpl.value;
      object = objImpl.object;
            isInitialized = objImpl.isInitialized;

      if (objImpl.stream != null)
    stream = objImpl.stream.dup();

  } else {
      read_value(obj.create_input_stream(), obj.type());
  }
    }

    ///////////////////////////////////////////////////////////////////////////
    // basic accessors

    /**
     * returns the type of the element contained in the Any.
     *
     * @result    the TypeCode for the element in the Any
     */
    public TypeCode type() {
  return typeCode;
    }

    private TypeCode realType() {
        return realType(typeCode);
    }

    private TypeCode realType(TypeCode aType) {
        TypeCode realType = aType;
        try {
            // Note: Indirect types are handled in kind() method
            while (realType.kind().value() == TCKind._tk_alias) {
                realType = realType.content_type();
            }
        } catch (BadKind bad) { // impossible
      throw wrapper.badkindCannotOccur( bad ) ;
        }
        return realType;
    }

    /**
     * sets the type of the element to be contained in the Any.
     *
     * @param tc    the TypeCode for the element in the Any
     */
    public void type(TypeCode tc)
    {
  //debug.log ("type2");
  // set the typecode
  typeCode = TypeCodeImpl.convertToNative(orb, tc);

  stream = null;
  value = 0;
  object = null;
  // null is the only legal value this Any can have after resetting the type code
  isInitialized = (tc.kind().value() == TCKind._tk_null);
    }

    /**
     * checks for equality between Anys.
     *
     * @param otherAny  the Any to be compared with.
     * @result    true if the Anys are equal, false otherwise.
     */
    public boolean equal(Any otherAny)
    {
  //debug.log ("equal");

  if (otherAny == this)
      return true;

  // first check for typecode equality.
  // note that this will take aliases into account
  if (!typeCode.equal(otherAny.type()))
      return false;

  // Resolve aliases here
  TypeCode realType = realType();

  // _REVISIT_ Possible optimization for the case where
  // otherAny is a AnyImpl and the endianesses match.
  // Need implementation of CDRInputStream.equals()
  // For now we disable this to encourage testing the generic,
  // unoptimized code below.
  // Unfortunately this generic code needs to copy the whole stream
  // at least once.
  //    if (AnyImpl.isStreamed[realType.kind().value()]) {
  //        if (otherAny instanceof AnyImpl) {
  //            return ((AnyImpl)otherAny).stream.equals(stream);
  //        }
  //    }
  switch (realType.kind().value()) {
      // handle primitive types
      case TCKind._tk_null:
      case TCKind._tk_void:
    return true;
      case TCKind._tk_short:
    return (extract_short() == otherAny.extract_short());
      case TCKind._tk_long:
    return (extract_long() == otherAny.extract_long());
      case TCKind._tk_ushort:
    return (extract_ushort() == otherAny.extract_ushort());
      case TCKind._tk_ulong:
    return (extract_ulong() == otherAny.extract_ulong());
      case TCKind._tk_float:
    return (extract_float() == otherAny.extract_float());
      case TCKind._tk_double:
    return (extract_double() == otherAny.extract_double());
      case TCKind._tk_boolean:
    return (extract_boolean() == otherAny.extract_boolean());
      case TCKind._tk_char:
    return (extract_char() == otherAny.extract_char());
      case TCKind._tk_wchar:
    return (extract_wchar() == otherAny.extract_wchar());
      case TCKind._tk_octet:
    return (extract_octet() == otherAny.extract_octet());
      case TCKind._tk_any:
    return extract_any().equal(otherAny.extract_any());
      case TCKind._tk_TypeCode:
    return extract_TypeCode().equal(otherAny.extract_TypeCode());
      case TCKind._tk_string:
    return extract_string().equals(otherAny.extract_string());
      case TCKind._tk_wstring:
    return (extract_wstring().equals(otherAny.extract_wstring()));
      case TCKind._tk_longlong:
    return (extract_longlong() == otherAny.extract_longlong());
      case TCKind._tk_ulonglong:
    return (extract_ulonglong() == otherAny.extract_ulonglong());

      case TCKind._tk_objref:
    return (extract_Object().equals(otherAny.extract_Object()));
      case TCKind._tk_Principal:
    return (extract_Principal().equals(otherAny.extract_Principal()));

      case TCKind._tk_enum:
    return (extract_long() == otherAny.extract_long());
      case TCKind._tk_fixed:
    return (extract_fixed().compareTo(otherAny.extract_fixed()) == 0);
      case TCKind._tk_except:
      case TCKind._tk_struct:
      case TCKind._tk_union:
      case TCKind._tk_sequence:
      case TCKind._tk_array:
    InputStream copyOfMyStream = this.create_input_stream();
    InputStream copyOfOtherStream = otherAny.create_input_stream();
    return equalMember(realType, copyOfMyStream, copyOfOtherStream);

      // Too complicated to handle value types the way we handle
      // other complex types above. Don't try to decompose it here
      // for faster comparison, just use Object.equals().
      case TCKind._tk_value:
      case TCKind._tk_value_box:
    return extract_Value().equals(otherAny.extract_Value());

      case TCKind._tk_alias:
    throw wrapper.errorResolvingAlias() ;

      case TCKind._tk_longdouble:
    // Unspecified for Java
    throw wrapper.tkLongDoubleNotSupported() ;

      default:
    throw wrapper.typecodeNotSupported() ;
  }
    }

    // Needed for equal() in order to achieve linear performance for complex types.
    // Uses up (recursively) copies of the InputStream in both Anys that got created in equal().
    private boolean equalMember(TypeCode memberType, InputStream myStream, InputStream otherStream) {
  // Resolve aliases here
  TypeCode realType = realType(memberType);

  try {
      switch (realType.kind().value()) {
    // handle primitive types
    case TCKind._tk_null:
    case TCKind._tk_void:
        return true;
    case TCKind._tk_short:
        return (myStream.read_short() == otherStream.read_short());
    case TCKind._tk_long:
        return (myStream.read_long() == otherStream.read_long());
    case TCKind._tk_ushort:
        return (myStream.read_ushort() == otherStream.read_ushort());
    case TCKind._tk_ulong:
        return (myStream.read_ulong() == otherStream.read_ulong());
    case TCKind._tk_float:
        return (myStream.read_float() == otherStream.read_float());
    case TCKind._tk_double:
        return (myStream.read_double() == otherStream.read_double());
    case TCKind._tk_boolean:
        return (myStream.read_boolean() == otherStream.read_boolean());
    case TCKind._tk_char:
        return (myStream.read_char() == otherStream.read_char());
    case TCKind._tk_wchar:
        return (myStream.read_wchar() == otherStream.read_wchar());
    case TCKind._tk_octet:
        return (myStream.read_octet() == otherStream.read_octet());
    case TCKind._tk_any:
        return myStream.read_any().equal(otherStream.read_any());
    case TCKind._tk_TypeCode:
        return myStream.read_TypeCode().equal(otherStream.read_TypeCode());
    case TCKind._tk_string:
        return myStream.read_string().equals(otherStream.read_string());
    case TCKind._tk_wstring:
        return (myStream.read_wstring().equals(otherStream.read_wstring()));
    case TCKind._tk_longlong:
        return (myStream.read_longlong() == otherStream.read_longlong());
    case TCKind._tk_ulonglong:
        return (myStream.read_ulonglong() == otherStream.read_ulonglong());

    case TCKind._tk_objref:
        return (myStream.read_Object().equals(otherStream.read_Object()));
    case TCKind._tk_Principal:
        return (myStream.read_Principal().equals(otherStream.read_Principal()));

    case TCKind._tk_enum:
        return (myStream.read_long() == otherStream.read_long());
    case TCKind._tk_fixed:
        return (myStream.read_fixed().compareTo(otherStream.read_fixed()) == 0);
    case TCKind._tk_except:
    case TCKind._tk_struct: {
        int length = realType.member_count();
        for (int i=0; i<length; i++) {
      if ( ! equalMember(realType.member_type(i), myStream, otherStream)) {
          return false;
      }
        }
        return true;
    }
    case TCKind._tk_union: {
        Any myDiscriminator = orb.create_any();
        Any otherDiscriminator = orb.create_any();
        myDiscriminator.read_value(myStream, realType.discriminator_type());
        otherDiscriminator.read_value(otherStream, realType.discriminator_type());

        if ( ! myDiscriminator.equal(otherDiscriminator)) {
      return false;
        }
        TypeCodeImpl realTypeCodeImpl = TypeCodeImpl.convertToNative(orb, realType);
        int memberIndex = realTypeCodeImpl.currentUnionMemberIndex(myDiscriminator);
        if (memberIndex == -1)
      throw wrapper.unionDiscriminatorError() ;

        if ( ! equalMember(realType.member_type(memberIndex), myStream, otherStream)) {
      return false;
        }
        return true;
    }
    case TCKind._tk_sequence: {
        int length = myStream.read_long();
        otherStream.read_long(); // just so that the two stream are in sync
        for (int i=0; i<length; i++) {
      if ( ! equalMember(realType.content_type(), myStream, otherStream)) {
          return false;
      }
        }
        return true;
    }
    case TCKind._tk_array: {
        int length = realType.member_count();
        for (int i=0; i<length; i++) {
      if ( ! equalMember(realType.content_type(), myStream, otherStream)) {
          return false;
      }
        }
        return true;
    }

    // Too complicated to handle value types the way we handle
    // other complex types above. Don't try to decompose it here
    // for faster comparison, just use Object.equals().
    case TCKind._tk_value:
    case TCKind._tk_value_box:
        org.omg.CORBA_2_3.portable.InputStream mine =
      (org.omg.CORBA_2_3.portable.InputStream)myStream;
        org.omg.CORBA_2_3.portable.InputStream other =
      (org.omg.CORBA_2_3.portable.InputStream)otherStream;
        return mine.read_value().equals(other.read_value());

    case TCKind._tk_alias:
        // error resolving alias above
        throw wrapper.errorResolvingAlias() ;

    case TCKind._tk_longdouble:
        throw wrapper.tkLongDoubleNotSupported() ;

    default:
        throw wrapper.typecodeNotSupported() ;
      }
  } catch (BadKind badKind) { // impossible
      throw wrapper.badkindCannotOccur() ;
  } catch (Bounds bounds) { // impossible
      throw wrapper.boundsCannotOccur() ;
  }
    }

    ///////////////////////////////////////////////////////////////////////////
    // accessors for marshaling/unmarshaling

    /**
     * returns an output stream that an Any value can be marshaled into.
     *
     * @result    the OutputStream to marshal value of Any into
     */
    public org.omg.CORBA.portable.OutputStream create_output_stream()
    {
  //debug.log ("create_output_stream");
  return new AnyOutputStream(orb);
    }

    /**
     * returns an input stream that an Any value can be marshaled out of.
     *
     * @result    the InputStream to marshal value of Any out of.
     */
    public org.omg.CORBA.portable.InputStream create_input_stream()
    {
  //
  // We create a new InputStream so that multiple threads can call here
  // and read the streams in parallel without thread safety problems.
  //
  //debug.log ("create_input_stream");
  if (AnyImpl.isStreamed[realType().kind().value()]) {
      return stream.dup();
  } else {
      OutputStream os = (OutputStream)orb.create_output_stream();
      TCUtility.marshalIn(os, realType(), value, object);

      return os.create_input_stream();
  }
    }

    ///////////////////////////////////////////////////////////////////////////
    // marshaling/unmarshaling routines

    //
    // If the InputStream is a CDRInputStream then we can copy the bytes
    // since it is in our format and does not have alignment issues.
    //
    public void read_value(org.omg.CORBA.portable.InputStream in, TypeCode tc)
    {
  //debug.log ("read_value");
  //
  // Assume that someone isn't going to think they can keep reading
  // from this stream after calling us. That would be likely for
  // an IIOPInputStream but if it is an AnyInputStream then they
  // presumably obtained it via our create_output_stream() so they could
  // write the contents of an IDL data type to it and then call
  // create_input_stream() for us to read it. This is how Helper classes
  // typically implement the insert() method.
  // We should probably document this behavior in the 1.1 revision
  // task force.
  //

  typeCode = TypeCodeImpl.convertToNative(orb, tc);
  int kind = realType().kind().value();
  if (kind >= isStreamed.length) {
      throw wrapper.invalidIsstreamedTckind( CompletionStatus.COMPLETED_MAYBE,
    new Integer(kind)) ;
  }

  if (AnyImpl.isStreamed[kind]) {
      if ( in instanceof AnyInputStream ) {
    // could only have been created here
    stream = (CDRInputStream)in;
      } else {
    org.omg.CORBA_2_3.portable.OutputStream out =
        (org.omg.CORBA_2_3.portable.OutputStream)orb.create_output_stream();
    typeCode.copy((org.omg.CORBA_2_3.portable.InputStream)in, out);
    stream = (CDRInputStream)out.create_input_stream();
      }
  } else {
      java.lang.Object[] objholder = new java.lang.Object[1];
      objholder[0] = object;
      long[] longholder = new long[1];
      TCUtility.unmarshalIn(in, typeCode, longholder, objholder);
      value = longholder[0];
      object = objholder[0];
      stream = null;
  }
  isInitialized = true;
    }


    //
    // We could optimize this by noticing whether the target stream
    // has ever had anything marshaled on it that required an
    // alignment of greater than 4 (was write_double() ever called on it).
    // If not, then we can just do a byte array copy without having to
    // drive the remarshaling through typecode interpretation.
    //
    public void write_value(OutputStream out)
    {
  //debug.log ("write_value");
  if (AnyImpl.isStreamed[realType().kind().value()]) {
      typeCode.copy(stream.dup(), out);
  } else {
      // _REVISIT_ check isInitialized whether all we write is TypeCode!
      TCUtility.marshalIn(out, realType(), value, object);
  }
    }

    /**
     * takes a streamable and inserts its reference into the any
     *
     * @param s    the streamable to insert
     */
    public void insert_Streamable(Streamable s)
    {
  //debug.log ("insert_Streamable");
  typeCode = TypeCodeImpl.convertToNative(orb, s._type());
  object = s;
  isInitialized = true;
    }
    
    public Streamable extract_Streamable()
    {
  //debug.log( "extract_Streamable" ) ;
  return (Streamable)object;
    }

    ///////////////////////////////////////////////////////////////////////////
    // insertion/extraction/replacement for all basic types

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_short(short s)
    {
  //debug.log ("insert_short");
  typeCode = orb.get_primitive_tc(TCKind._tk_short);
  value = s;
  isInitialized = true;
    }

    private String getTCKindName( int tc )
    {
  if ((tc >= 0) && (tc < TypeCodeImpl.kindNames.length))
      return TypeCodeImpl.kindNames[tc] ;
  else
      return "UNKNOWN(" + tc + ")" ;
    }

    private void checkExtractBadOperation( int expected )
    {
  if (!isInitialized)
      throw wrapper.extractNotInitialized() ;

  int tc = realType().kind().value() ;
  if (tc != expected) {
      String tcName = getTCKindName( tc ) ;
      String expectedName = getTCKindName( expected ) ;
      throw wrapper.extractWrongType( expectedName, tcName ) ;
  }
    }

    private void checkExtractBadOperationList( int[] expected )
    {
  if (!isInitialized)
      throw wrapper.extractNotInitialized() ;

  int tc = realType().kind().value() ;
  for (int ctr=0; ctr<expected.length; ctr++)
      if (tc == expected[ctr])
    return ;

  List list = new ArrayList() ;
  for (int ctr=0; ctr<expected.length; ctr++)
      list.add( getTCKindName( expected[ctr] ) ) ;

  String tcName = getTCKindName( tc ) ;
  throw wrapper.extractWrongTypeList( list, tcName ) ;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public short extract_short()
    {
  //debug.log ("extract_short");
  checkExtractBadOperation( TCKind._tk_short ) ;
  return (short)value;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_long(int l)
    {
  //debug.log ("insert_long");
  // A long value is applicable to enums as well, so don't erase the enum type code
  // in case it was initialized that way before.
  int kind = realType().kind().value();
  if (kind != TCKind._tk_long && kind != TCKind._tk_enum) {
      typeCode = orb.get_primitive_tc(TCKind._tk_long);
  }
  value = l;
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public int extract_long()
    {
  //debug.log ("extract_long");
  checkExtractBadOperationList( new int[] { TCKind._tk_long, TCKind._tk_enum } ) ;
  return (int)value;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_ushort(short s)
    {
  //debug.log ("insert_ushort");
  typeCode = orb.get_primitive_tc(TCKind._tk_ushort);
  value = s;
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public short extract_ushort()
    {
  //debug.log ("extract_ushort");
  checkExtractBadOperation( TCKind._tk_ushort ) ;
  return (short)value;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_ulong(int l)
    {
  //debug.log ("insert_ulong");
  typeCode = orb.get_primitive_tc(TCKind._tk_ulong);
  value = l;
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public int extract_ulong()
    {
  //debug.log ("extract_ulong");
  checkExtractBadOperation( TCKind._tk_ulong ) ;
  return (int)value;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_float(float f)
    {
  //debug.log ("insert_float");
  typeCode = orb.get_primitive_tc(TCKind._tk_float);
  value = Float.floatToIntBits(f);
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public float extract_float()
    {
  //debug.log ("extract_float");
  checkExtractBadOperation( TCKind._tk_float ) ;
  return Float.intBitsToFloat((int)value);
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_double(double d)
    {
  //debug.log ("insert_double");
  typeCode = orb.get_primitive_tc(TCKind._tk_double);
  value = Double.doubleToLongBits(d);
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public double extract_double()
    {
  //debug.log ("extract_double");
  checkExtractBadOperation( TCKind._tk_double ) ;
  return Double.longBitsToDouble(value);
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_longlong(long l)
    {
  //debug.log ("insert_longlong");
  typeCode = orb.get_primitive_tc(TCKind._tk_longlong);
  value = l;
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public long extract_longlong()
    {
  //debug.log ("extract_longlong");
  checkExtractBadOperation( TCKind._tk_longlong ) ;
  return value;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_ulonglong(long l)
    {
  //debug.log ("insert_ulonglong");
  typeCode = orb.get_primitive_tc(TCKind._tk_ulonglong);
  value = l;
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public long extract_ulonglong()
    {
  //debug.log ("extract_ulonglong");
  checkExtractBadOperation( TCKind._tk_ulonglong ) ;
  return value;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_boolean(boolean b)
    {
  //debug.log ("insert_boolean");
  typeCode = orb.get_primitive_tc(TCKind._tk_boolean);
  value = (b)? 1:0;
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public boolean extract_boolean()
    {
  //debug.log ("extract_boolean");
  checkExtractBadOperation( TCKind._tk_boolean ) ;
  return (value == 0)? false: true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_char(char c)
    {
  //debug.log ("insert_char");
  typeCode = orb.get_primitive_tc(TCKind._tk_char);
  value = c;
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public char extract_char()
    {
  //debug.log ("extract_char");
  checkExtractBadOperation( TCKind._tk_char ) ;
  return (char)value;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_wchar(char c)
    {
  //debug.log ("insert_wchar");
  typeCode = orb.get_primitive_tc(TCKind._tk_wchar);
  value = c;
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public char extract_wchar()
    {
  //debug.log ("extract_wchar");
  checkExtractBadOperation( TCKind._tk_wchar ) ;
  return (char)value;
    }


    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_octet(byte b)
    {
  //debug.log ("insert_octet");
  typeCode = orb.get_primitive_tc(TCKind._tk_octet);
  value = b;
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public byte extract_octet()
    {
  //debug.log ("extract_octet");
  checkExtractBadOperation( TCKind._tk_octet ) ;
  return (byte)value;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_string(String s)
    {
  //debug.log ("insert_string");
  // Make sure type code information for bounded strings is not erased
  if (typeCode.kind() == TCKind.tk_string) {
      int length = 0;
      try {
    length = typeCode.length();
      } catch (BadKind bad) {
    throw wrapper.badkindCannotOccur() ;
      }

      // Check if bounded strings length is not exceeded
      if (length != 0 && s != null && s.length() > length) {
    throw wrapper.badStringBounds( new Integer(s.length()),
        new Integer(length) ) ;
      }
  } else {
      typeCode = orb.get_primitive_tc(TCKind._tk_string);
  }
  object = s;
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public String extract_string()
    {
  //debug.log ("extract_string");
  checkExtractBadOperation( TCKind._tk_string ) ;
  return (String)object;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_wstring(String s)
    {
  //debug.log ("insert_wstring");
  // Make sure type code information for bounded strings is not erased
  if (typeCode.kind() == TCKind.tk_wstring) {
      int length = 0;
      try {
    length = typeCode.length();
      } catch (BadKind bad) {
    throw wrapper.badkindCannotOccur() ;
      }

      // Check if bounded strings length is not exceeded
      if (length != 0 && s != null && s.length() > length) {
    throw wrapper.badStringBounds( new Integer(s.length()),
        new Integer(length) ) ;
      }
  } else {
      typeCode = orb.get_primitive_tc(TCKind._tk_wstring);
  }
  object = s;
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public String extract_wstring()
    {
  //debug.log ("extract_wstring");
  checkExtractBadOperation( TCKind._tk_wstring ) ;
  return (String)object;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_any(Any a)
    {
  //debug.log ("insert_any");
  typeCode = orb.get_primitive_tc(TCKind._tk_any);
  object = a;
  stream = null;
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public Any extract_any()
    {
  //debug.log ("extract_any");
  checkExtractBadOperation( TCKind._tk_any ) ;
  return (Any)object;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_Object(org.omg.CORBA.Object o)
    {
  //debug.log ("insert_Object");
  if ( o == null ) {
      typeCode = orb.get_primitive_tc(TCKind._tk_objref);
  } else {
      if (StubAdapter.isStub(o)) {
    String[] ids = StubAdapter.getTypeIds( o ) ;
    typeCode = new TypeCodeImpl(orb, TCKind._tk_objref, ids[0], "");
      } else {
    throw wrapper.badInsertobjParam(
        CompletionStatus.COMPLETED_MAYBE, o.getClass().getName() ) ;
      }
  }
 
  object = o;
  isInitialized = true;
    }

    /**
     * A variant of the insertion operation that takes a typecode
     * argument as well.
     */
    public void insert_Object(org.omg.CORBA.Object o, TypeCode tc)
    {
  //debug.log ("insert_Object2");
  try {
      if ( tc.id().equals("IDL:omg.org/CORBA/Object:1.0") || o._is_a(tc.id()) )
    {
        typeCode = TypeCodeImpl.convertToNative(orb, tc);
        object = o;
    }
      else {
    throw wrapper.insertObjectIncompatible() ;
      }
  } catch ( Exception ex ) {
      throw wrapper.insertObjectFailed(ex) ;
  }
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public org.omg.CORBA.Object extract_Object()
    {
  //debug.log ("extract_Object");
  if (!isInitialized)
      throw wrapper.extractNotInitialized() ;

  // Check if the object contained here is of the type in typeCode
  org.omg.CORBA.Object obj = null;
  try {
      obj = (org.omg.CORBA.Object) object;
      if (typeCode.id().equals("IDL:omg.org/CORBA/Object:1.0") || obj._is_a(typeCode.id())) {
    return obj;
      } else {
    throw wrapper.extractObjectIncompatible() ;
      }
  } catch ( Exception ex ) {
      throw wrapper.extractObjectFailed(ex);
  }
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public void insert_TypeCode(TypeCode tc)
    {
  //debug.log ("insert_TypeCode");
  typeCode = orb.get_primitive_tc(TCKind._tk_TypeCode);
  object = tc;
  isInitialized = true;
    }

    /**
     * See the description of the <a href="#anyOps">general Any operations.</a>
     */
    public TypeCode extract_TypeCode()
    {
  //debug.log ("extract_TypeCode");
  checkExtractBadOperation( TCKind._tk_TypeCode ) ;
  return (TypeCode)object;
    }

    /**
     * @deprecated
     */
    @Deprecated
    public void insert_Principal(Principal p)
    {
  typeCode = orb.get_primitive_tc(TCKind._tk_Principal);
  object = p;
  isInitialized = true;
    }

    /**
     * @deprecated
     */
    @Deprecated
    public Principal extract_Principal()
    {
  checkExtractBadOperation( TCKind._tk_Principal ) ;
  return (Principal)object;
    }

    /**
     * Note that the Serializable really should be an IDLEntity of
     * some kind.  It shouldn't just be an RMI-IIOP type.  Currently,
     * we accept and will produce RMI repIds with the latest
     * calculations if given a non-IDLEntity Serializable.
     */
    public Serializable extract_Value()
    {
  //debug.log ("extract_Value");
  checkExtractBadOperationList( new int[] { TCKind._tk_value,
      TCKind._tk_value_box, TCKind._tk_abstract_interface } ) ;
  return (Serializable)object;
    }

    public void insert_Value(Serializable v)
    {
  //debug.log ("insert_Value");
  object = v;

  TypeCode tc;

  if ( v == null ) {
      tc = orb.get_primitive_tc (TCKind.tk_value);
  } else {
      // See note in getPrimitiveTypeCodeForClass.  We
      // have to use the latest type code fixes in this
      // case since there is no way to know what ORB will
      // actually send this Any.  In RMI-IIOP, when using
      // Util.writeAny, we can do the versioning correctly,
      // and use the insert_Value(Serializable, TypeCode)
      // method.
      //
      // The ORB singleton uses the latest version.
      tc = createTypeCodeForClass (v.getClass(), (ORB)ORB.init());
  }

  typeCode = TypeCodeImpl.convertToNative(orb, tc);
  isInitialized = true;
    }
     
    public void insert_Value(Serializable v, org.omg.CORBA.TypeCode t)
    {
  //debug.log ("insert_Value2");
  object = v;
  typeCode = TypeCodeImpl.convertToNative(orb, t);
  isInitialized = true;
    }

    public void insert_fixed(java.math.BigDecimal value) {
  typeCode = TypeCodeImpl.convertToNative(orb,
      orb.create_fixed_tc(TypeCodeImpl.digits(value), TypeCodeImpl.scale(value)));
  object = value;
  isInitialized = true;
    }

    public void insert_fixed(java.math.BigDecimal value, org.omg.CORBA.TypeCode type)
    {
  try {
      if (TypeCodeImpl.digits(value) > type.fixed_digits() ||
    TypeCodeImpl.scale(value) > type.fixed_scale())
      {
    throw wrapper.fixedNotMatch() ;
      }
  } catch (org.omg.CORBA.TypeCodePackage.BadKind bk) {
      // type isn't even of kind fixed
      throw wrapper.fixedBadTypecode( bk ) ;
  }
  typeCode = TypeCodeImpl.convertToNative(orb, type);
  object = value;
  isInitialized = true;
    }

    public java.math.BigDecimal extract_fixed() {
  checkExtractBadOperation( TCKind._tk_fixed ) ;
  return (BigDecimal)object;
    }

    /**
     * Utility method for insert_Value and Util.writeAny.
     *
     * The ORB passed in should have the desired ORBVersion.  It
     * is used to generate the type codes.
     */
    public TypeCode createTypeCodeForClass (java.lang.Class c, ORB tcORB)
    {
  // Look in the cache first
  TypeCodeImpl classTC = tcORB.getTypeCodeForClass(c);
  if (classTC != null)
      return classTC;

  // All cases need to be able to create repository IDs.
  //
  // See bug 4391648 for more info about the tcORB in this
  // case.
  RepositoryIdStrings repStrs
      = RepositoryIdFactory.getRepIdStringsFactory(tcORB);


  // Assertion: c instanceof Serializable?

  if ( c.isArray() ) {
      // Arrays - may recurse for multi-dimensional arrays
      Class componentClass = c.getComponentType();
      TypeCode embeddedType;
      if ( componentClass.isPrimitive() ) {
    embeddedType = getPrimitiveTypeCodeForClass(componentClass,
                  tcORB);
      } else {
    embeddedType = createTypeCodeForClass (componentClass,
                   tcORB);
      }
      TypeCode t = tcORB.create_sequence_tc (0, embeddedType);

      String id = repStrs.createForJavaType(c);

      return tcORB.create_value_box_tc (id, "Sequence", t);
  } else if ( c == java.lang.String.class ) {
      // Strings
      TypeCode t = tcORB.create_string_tc (0);

      String id = repStrs.createForJavaType(c);

      return tcORB.create_value_box_tc (id, "StringValue", t);
  }

  // Anything else
  // We know that this is a TypeCodeImpl since it is our ORB
  classTC = (TypeCodeImpl)ValueUtility.createTypeCodeForClass(
      tcORB, c, ORBUtility.createValueHandler(tcORB));
  // Intruct classTC to store its buffer
  classTC.setCaching(true);
  // Update the cache
  tcORB.setTypeCodeForClass(c, classTC);
  return classTC;
    }

    /**
     * It looks like this was copied from io.ValueUtility at some
     * point.
     *
     * It's used by createTypeCodeForClass.  The tcORB passed in
     * should have the desired ORB version, and is used to
     * create the type codes.
     */
    private TypeCode getPrimitiveTypeCodeForClass (Class c, ORB tcORB)
    {
  //debug.log ("getPrimitiveTypeCodeForClass");

  if (c == Integer.TYPE) {
      return tcORB.get_primitive_tc (TCKind.tk_long);
  } else if (c == Byte.TYPE) {
      return tcORB.get_primitive_tc (TCKind.tk_octet);
  } else if (c == Long.TYPE) {
      return tcORB.get_primitive_tc (TCKind.tk_longlong);
  } else if (c == Float.TYPE) {
      return tcORB.get_primitive_tc (TCKind.tk_float);
  } else if (c == Double.TYPE) {
      return tcORB.get_primitive_tc (TCKind.tk_double);
  } else if (c == Short.TYPE) {
      return tcORB.get_primitive_tc (TCKind.tk_short);
  } else if (c == Character.TYPE) {
      // For Merlin or later JDKs, or for foreign ORBs,
      // we correctly say that a Java char maps to a
      // CORBA wchar.  For backwards compatibility
      // with our older ORBs, we say it maps to a
      // CORBA char.  This is only used in RMI-IIOP
      // in our javax.rmi.CORBA.Util delegate's
      // writeAny method.  In Java IDL, there's no way
      // to know the ORB version that the Any will be
      // sent out with -- it could be different than
      // the one used to create the Any -- so we use the
      // most recent version (see insert_Value).
      if (ORBVersionFactory.getFOREIGN().compareTo(tcORB.getORBVersion()) == 0 ||
    ORBVersionFactory.getNEWER().compareTo(tcORB.getORBVersion()) <= 0)
    return tcORB.get_primitive_tc(TCKind.tk_wchar);
      else
    return tcORB.get_primitive_tc(TCKind.tk_char);
  } else if (c == Boolean.TYPE) {
      return tcORB.get_primitive_tc (TCKind.tk_boolean);
  } else {
      // _REVISIT_ Not sure if this is right.
      return tcORB.get_primitive_tc (TCKind.tk_any);
  }
    }

    // Extracts a member value according to the given TypeCode from the given complex Any
    // (at the Anys current internal stream position, consuming the anys stream on the way)
    // and returns it wrapped into a new Any
    public Any extractAny(TypeCode memberType, ORB orb) {
        Any returnValue = orb.create_any();
        OutputStream out = returnValue.create_output_stream();
        TypeCodeImpl.convertToNative(orb, memberType).copy((InputStream)stream, out);
        returnValue.read_value(out.create_input_stream(), memberType);
        return returnValue;
    }

    // This method could very well be moved into TypeCodeImpl or a common utility class,
    // but is has to be in this package.
    static public Any extractAnyFromStream(TypeCode memberType, InputStream input, ORB orb) {
        Any returnValue = orb.create_any();
        OutputStream out = returnValue.create_output_stream();
        TypeCodeImpl.convertToNative(orb, memberType).copy(input, out);
        returnValue.read_value(out.create_input_stream(), memberType);
        return returnValue;
    }

    // There is no other way for DynAnys to find out whether the Any is initialized.
    public boolean isInitialized() {
        return isInitialized;
    }
}
TOP

Related Classes of corba.abroc.Test75$AnyInputStream

TOP
Copyright © 2018 www.massapi.com. All rights reserved.
All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.