4 public class TypeUtil {
5 public static final String StringClass="String";
6 public static final String ObjectClass="Object";
7 public static final String StartupClass="StartupObject";
8 public static final String TagClass="TagDescriptor";
11 Hashtable subclasstable;
13 public TypeUtil(State state) {
18 public ClassDescriptor getClass(String classname) {
19 ClassDescriptor cd=(ClassDescriptor)state.getClassSymbolTable().get(classname);
23 private void createTables() {
24 supertable=new Hashtable();
26 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
27 while(classit.hasNext()) {
28 ClassDescriptor cd=(ClassDescriptor)classit.next();
29 String superc=cd.getSuper();
31 ClassDescriptor cd_super=getClass(superc);
32 supertable.put(cd,cd_super);
37 public void createFullTable() {
38 subclasstable=new Hashtable();
40 Iterator classit=state.getClassSymbolTable().getDescriptorsIterator();
41 while(classit.hasNext()) {
42 ClassDescriptor cd=(ClassDescriptor)classit.next();
43 ClassDescriptor tmp=cd.getSuperDesc();
46 if (!subclasstable.containsKey(tmp))
47 subclasstable.put(tmp,new HashSet());
48 HashSet hs=(HashSet)subclasstable.get(tmp);
50 tmp=tmp.getSuperDesc();
55 public Set getSubClasses(ClassDescriptor cd) {
56 return (Set)subclasstable.get(cd);
59 public ClassDescriptor getSuper(ClassDescriptor cd) {
60 return (ClassDescriptor)supertable.get(cd);
63 public boolean isCastable(TypeDescriptor original, TypeDescriptor casttype) {
64 if (original.isChar()&&
69 if (casttype.isChar()&&
81 public boolean isSuperorType(TypeDescriptor possiblesuper, TypeDescriptor cd2) {
82 //Matching type are always okay
83 if (possiblesuper.equals(cd2))
86 if ((possiblesuper.isTag() && !cd2.isTag())||
87 (!possiblesuper.isTag() && cd2.isTag()))
91 if (cd2.isArray()||possiblesuper.isArray()) {
92 // Object is super class of all arrays
93 if (possiblesuper.getSymbol().equals(ObjectClass)&&!possiblesuper.isArray())
96 // If we have the same dimensionality of arrays & both are classes, we can default to the normal test
97 if (cd2.isClass()&&possiblesuper.isClass()
98 &&(possiblesuper.getArrayCount()==cd2.getArrayCount())&&
99 isSuperorType(possiblesuper.getClassDesc(), cd2.getClassDesc()))
102 // Object is superclass of all array classes
103 if (possiblesuper.getSymbol().equals(ObjectClass)&&cd2.isClass()
104 &&(possiblesuper.getArrayCount()<cd2.getArrayCount()))
110 if (possiblesuper.isClass()&&
112 return isSuperorType(possiblesuper.getClassDesc(), cd2.getClassDesc());
113 else if (possiblesuper.isClass()&&
116 else if (possiblesuper.isNull())
117 throw new Error(); //not sure when this case would occur
118 else if (possiblesuper.isPrimitive()&&
120 ///Primitive widenings from 5.1.2
121 if (cd2.isByte()&&(possiblesuper.isByte()||possiblesuper.isShort()||
122 possiblesuper.isInt()||possiblesuper.isLong()||
123 possiblesuper.isFloat()||possiblesuper.isDouble()))
125 if (cd2.isShort()&&(possiblesuper.isShort()||
126 possiblesuper.isInt()||possiblesuper.isLong()||
127 possiblesuper.isFloat()||possiblesuper.isDouble()))
129 if (cd2.isChar()&&(possiblesuper.isChar()||
130 possiblesuper.isInt()||possiblesuper.isLong()||
131 possiblesuper.isFloat()||possiblesuper.isDouble()))
133 if (cd2.isInt()&&(possiblesuper.isInt()||possiblesuper.isLong()||
134 possiblesuper.isFloat()||possiblesuper.isDouble()))
136 if (cd2.isLong()&&(possiblesuper.isLong()||
137 possiblesuper.isFloat()||possiblesuper.isDouble()))
139 if (cd2.isFloat()&&(possiblesuper.isFloat()||possiblesuper.isDouble()))
141 if (cd2.isDouble()&&possiblesuper.isDouble())
144 if (cd2.isBoolean()&&possiblesuper.isBoolean())
148 } else if (possiblesuper.isPrimitive()&&(!possiblesuper.isArray())&&
149 (cd2.isArray()||cd2.isPtr()))
151 else if (cd2.isPrimitive()&&(!cd2.isArray())&&
152 (possiblesuper.isArray()||possiblesuper.isPtr()))
155 throw new Error("Case not handled:"+possiblesuper+" "+cd2);
159 public boolean isSuperorType(ClassDescriptor possiblesuper, ClassDescriptor cd2) {
160 if (possiblesuper==cd2)
163 return isSuper(possiblesuper, cd2);
166 private boolean isSuper(ClassDescriptor possiblesuper, ClassDescriptor cd2) {
169 if (cd2==possiblesuper)