1. /*

  2.  * @(#)TCUtility.java	1.21 03/01/23

  3.  *

  4.  * Copyright 2003 Sun Microsystems, Inc. All rights reserved.

  5.  * SUN PROPRIETARY/CONFIDENTIAL. Use is subject to license terms.

  6.  */

  7. /*

  8.  * Licensed Materials - Property of IBM

  9.  * RMI-IIOP v1.0

  10.  * Copyright IBM Corp. 1998 1999  All Rights Reserved

  11.  *

  12.  * US Government Users Restricted Rights - Use, duplication or

  13.  * disclosure restricted by GSA ADP Schedule Contract with IBM Corp.

  14.  */

  15. 

  16. package com.sun.corba.se.internal.corba;

  17. 

  18. import org.omg.CORBA.SystemException;

  19. import org.omg.CORBA.CompletionStatus;

  20. import org.omg.CORBA.UserException;

  21. import org.omg.CORBA.TCKind;

  22. import org.omg.CORBA.UNKNOWN;

  23. import org.omg.CORBA.INTERNAL;

  24. import org.omg.CORBA.NO_IMPLEMENT;

  25. import org.omg.CORBA.Any;

  26. import org.omg.CORBA.TypeCode;

  27. import org.omg.CORBA.Principal;

  28. import org.omg.CORBA_2_3.portable.InputStream;

  29. import org.omg.CORBA_2_3.portable.OutputStream;

  30. import org.omg.CORBA.portable.Streamable;

  31. import org.omg.CORBA.TypeCodePackage.BadKind;

  32. import java.util.Hashtable;

  33. import java.util.Enumeration;

  34. import java.util.NoSuchElementException;

  35. 

  36. import com.sun.corba.se.internal.core.*;

  37. import com.sun.corba.se.internal.iiop.CDRInputStream;

  38. import com.sun.corba.se.internal.iiop.CDROutputStream;

  39. import java.io.Serializable;

  40. import java.math.BigDecimal;

  41. 

  42. 

  43. /**

  44.  *  Static functions for TypeCode interpretation.

  45.  */

  46. public final class TCUtility {

  47. 

  48.     static void marshalIn(org.omg.CORBA.portable.OutputStream s, TypeCode typeCode, long l, Object o) {

  49. 	switch (typeCode.kind().value()) {

  50. 	case TCKind._tk_null:

  51. 	case TCKind._tk_void:

  52.         case TCKind._tk_native:

  53. 	    // nothing to write

  54. 	    break;

  55. 

  56. 	case TCKind._tk_short:

  57. 	    s.write_short((short)(l & 0xFFFFL));

  58. 	    break;

  59. 

  60. 	case TCKind._tk_ushort:

  61. 	    s.write_ushort((short)(l & 0xFFFFL));

  62. 	    break;

  63. 

  64. 	case TCKind._tk_enum:

  65. 	case TCKind._tk_long:

  66. 	    s.write_long((int)(l & 0xFFFFFFFFL));

  67. 	    break;

  68. 

  69. 	case TCKind._tk_ulong:

  70. 	    s.write_ulong((int)(l & 0xFFFFFFFFL));

  71. 	    break;

  72. 

  73. 	case TCKind._tk_float:

  74. 	    s.write_float(Float.intBitsToFloat((int)(l & 0xFFFFFFFFL)));

  75. 	    break;

  76. 

  77. 	case TCKind._tk_double:

  78. 	    s.write_double(Double.longBitsToDouble(l));

  79. 	    break;

  80. 

  81. 	case TCKind._tk_boolean:

  82. 	    if ( l == 0 )

  83. 	        s.write_boolean(false);

  84. 	    else	

  85. 	        s.write_boolean(true);

  86. 	    break;

  87. 

  88. 	case TCKind._tk_char:

  89. 	    s.write_char((char)(l & 0xFFFFL));

  90. 	    break;

  91. 

  92. 	case TCKind._tk_octet:

  93. 	    s.write_octet((byte)(l & 0xFFL));

  94. 	    break;

  95. 

  96. 	case TCKind._tk_any:

  97. 	    s.write_any((Any)o);

  98. 	    break;

  99. 

  100. 	case TCKind._tk_TypeCode:

  101. 	    s.write_TypeCode((TypeCode)o);

  102. 	    break;

  103. 

  104. 	case TCKind._tk_Principal:

  105. 	    s.write_Principal((Principal)o);

  106. 	    break;

  107. 

  108. 	case TCKind._tk_objref:

  109. 	    s.write_Object((org.omg.CORBA.Object)o);

  110. 	    break;

  111. 

  112. 	case TCKind._tk_longlong:

  113. 	    s.write_longlong(l);

  114. 	    break;

  115. 

  116. 	case TCKind._tk_ulonglong:

  117. 	    s.write_ulonglong(l);

  118. 	    break;

  119. 

  120. 	case TCKind._tk_wchar:

  121. 	    s.write_wchar((char)(l & 0xFFFFL));

  122. 	    break;

  123. 

  124. 	case TCKind._tk_string:

  125. 	    s.write_string((String)o);

  126. 	    break;

  127. 

  128. 	case TCKind._tk_wstring:

  129. 	    s.write_wstring((String)o);

  130. 	    break;

  131. 

  132. 	case TCKind._tk_value:

  133. 	case TCKind._tk_value_box:

  134.             ((org.omg.CORBA_2_3.portable.OutputStream)s).write_value((Serializable)o);

  135. 	    break;

  136. 

  137. 	case TCKind._tk_fixed:

  138.             // _REVISIT_ As soon as the java-rtf adds digits and scale parameters to

  139.             // OutputStream, this check will be unnecessary

  140.             if (s instanceof CDROutputStream) {

  141.                 try {

  142.                     ((CDROutputStream)s).write_fixed((BigDecimal)o,

  143.                                                     typeCode.fixed_digits(),

  144.                                                     typeCode.fixed_scale());

  145.                 } catch (BadKind badKind) { // impossible

  146.                 }

  147.             } else {

  148.                 s.write_fixed((BigDecimal)o);

  149.             }

  150. 	    break;

  151. 

  152. 	case TCKind._tk_struct:

  153. 	case TCKind._tk_union:

  154. 	case TCKind._tk_sequence:

  155. 	case TCKind._tk_array:

  156. 	case TCKind._tk_alias:

  157. 	case TCKind._tk_except:

  158.             ((Streamable)o)._write(s);

  159. 	    break;

  160. 

  161. 	case TCKind._tk_abstract_interface:

  162.             ((org.omg.CORBA_2_3.portable.OutputStream)s).write_abstract_interface(o);

  163.             break;

  164. 

  165.         case TCKind._tk_longdouble:

  166.             // Unspecified for Java

  167.         default:

  168.             throw new org.omg.CORBA.NO_IMPLEMENT();

  169.         }

  170.     }

  171. 

  172.     static void unmarshalIn(org.omg.CORBA.portable.InputStream s, TypeCode typeCode, long[] la, Object[] oa) 

  173.     {

  174.         int type = typeCode.kind().value();

  175. 	long l=0;

  176. 	Object o=oa[0];

  177. 

  178.         switch (type) {

  179. 	case TCKind._tk_null:

  180. 	case TCKind._tk_void:

  181.         case TCKind._tk_native:

  182. 	    // Nothing to read

  183. 	    break;

  184. 

  185. 	case TCKind._tk_short:

  186. 	    l = s.read_short() & 0xFFFFL;

  187. 	    break;

  188. 

  189. 	case TCKind._tk_ushort:

  190. 	    l = s.read_ushort() & 0xFFFFL;

  191. 	    break;

  192. 

  193. 	case TCKind._tk_enum:

  194. 	case TCKind._tk_long:

  195. 	    l = s.read_long() & 0xFFFFFFFFL;

  196. 	    break;

  197.  

  198. 	case TCKind._tk_ulong:

  199. 	    l = s.read_ulong() & 0xFFFFFFFFL;

  200.             break;  

  201.  

  202. 	case TCKind._tk_float:

  203. 	    l = Float.floatToIntBits(s.read_float()) & 0xFFFFFFFFL;

  204.             break;

  205.  

  206. 	case TCKind._tk_double:

  207. 	    l = Double.doubleToLongBits(s.read_double());

  208.             break;

  209.  

  210. 	case TCKind._tk_char:

  211.             l = s.read_char() & 0xFFFFL;

  212.             break;

  213. 

  214. 	case TCKind._tk_octet:

  215.             l = s.read_octet() & 0xFFL;

  216.             break;

  217. 

  218. 	case TCKind._tk_boolean:

  219.             if ( s.read_boolean() )

  220.                 l = 1;

  221. 	    else

  222.                 l = 0;

  223.             break;

  224. 

  225. 	case TCKind._tk_any:

  226.             o = s.read_any();

  227.             break;

  228. 

  229. 	case TCKind._tk_TypeCode:

  230. 	    o = s.read_TypeCode();

  231.             break;

  232. 

  233. 	case TCKind._tk_Principal:

  234.             o = s.read_Principal();

  235.             break;

  236. 

  237. 	case TCKind._tk_objref:

  238.             if (o instanceof Streamable)

  239.                 ((Streamable)o)._read(s);

  240.             else

  241.                 o = s.read_Object();

  242.             break;

  243.  

  244. 	case TCKind._tk_longlong:

  245.             l = s.read_longlong();

  246.             break;

  247.  

  248. 	case TCKind._tk_ulonglong:

  249.             l = s.read_ulonglong();

  250.             break;  

  251. 

  252. 	case TCKind._tk_wchar:

  253.             l = s.read_wchar() & 0xFFFFL;

  254.             break;

  255.  

  256. 	case TCKind._tk_string:

  257.             o = s.read_string();

  258.             break;

  259. 

  260. 	case TCKind._tk_wstring:

  261.             o = s.read_wstring();

  262.             break;

  263. 

  264. 	case TCKind._tk_value:

  265. 	case TCKind._tk_value_box:

  266.             o = ((org.omg.CORBA_2_3.portable.InputStream)s).read_value ();

  267.             break;

  268. 

  269. 	case TCKind._tk_fixed:

  270.             try {

  271.                 // _REVISIT_ As soon as the java-rtf adds digits and scale parameters to

  272.                 // InputStream, this check will be unnecessary

  273.                 if (s instanceof CDRInputStream) {

  274.                     o = ((CDRInputStream)s).read_fixed(typeCode.fixed_digits(),

  275.                                                                 typeCode.fixed_scale());

  276.                 } else {

  277.                     BigDecimal bigDecimal = s.read_fixed();

  278.                     o = bigDecimal.movePointLeft((int)typeCode.fixed_scale());

  279.                 }

  280.             } catch (BadKind badKind) { // impossible

  281.             }

  282.             break;

  283. 

  284. 	case TCKind._tk_struct:

  285. 	case TCKind._tk_union:

  286. 	case TCKind._tk_sequence:

  287. 	case TCKind._tk_array:

  288. 	case TCKind._tk_alias:

  289. 	case TCKind._tk_except:

  290.             ((Streamable)o)._read(s);

  291.             break;

  292. 

  293. 	case TCKind._tk_abstract_interface:

  294.             o = ((org.omg.CORBA_2_3.portable.InputStream)s).read_abstract_interface();

  295.             break;

  296. 

  297.         case TCKind._tk_longdouble:

  298.             // Unspecified for Java

  299.         default:

  300.             throw new org.omg.CORBA.NO_IMPLEMENT();

  301.         }

  302. 

  303. 	oa[0] = o;

  304. 	la[0] = l;

  305.     }

  306. 

  307. }