4 * StructureTypeDescriptor
6 * represents structure types
11 public class StructureTypeDescriptor extends TypeDescriptor {
13 TypeDescriptor subtype;
15 Hashtable fields = new Hashtable(); /* fast lookups */
16 Vector fieldlist = new Vector(); /* ordering information */
17 Hashtable labels = new Hashtable();
20 public StructureTypeDescriptor(String name) {
24 public TypeDescriptor getGenerateType() {
25 return ReservedTypeDescriptor.INT;
28 public Enumeration getFieldKeys() {
32 public void setSubClass(boolean b) {
36 public Expr getSizeExpr() {
37 return getOffsetExpr(null);
41 Hashtable oexpr=new Hashtable();
43 public Expr getOffsetExpr(FieldDescriptor field) {
46 sizeexpr=internalgetOffsetExpr(field);
49 } else if (oexpr.containsKey(field)) {
50 return (Expr)oexpr.get(field);
52 Expr tmp=internalgetOffsetExpr(field);
59 private Expr internalgetOffsetExpr(FieldDescriptor field) {
60 /* Fix sizeof calculations */
61 if ((field==null)&&(subtype!=null)&&(!subclass))
62 return subtype.getSizeExpr();
65 Expr size = new IntegerLiteralExpr(0);
67 for (int i = 0; i < fieldlist.size(); i++) {
68 FieldDescriptor fd = (FieldDescriptor)fieldlist.elementAt(i);
70 TypeDescriptor td = fd.getType();
71 boolean ptr = fd.getPtr();
73 if (ptr) { /* ptrs are 32bits */
74 basesize = new IntegerLiteralExpr(32);
76 basesize = td.getSizeExpr();
79 if (fd instanceof ArrayDescriptor) {
80 Expr totalsize = new OpExpr(Opcode.MULT, basesize, ((ArrayDescriptor) fd).getIndexBound());
85 if (td instanceof ReservedTypeDescriptor) {
86 ReservedTypeDescriptor rtd=(ReservedTypeDescriptor) td;
87 if (rtd==ReservedTypeDescriptor.BIT) {
91 size=new OpExpr(Opcode.RND, size,null);
97 size=new OpExpr(Opcode.RND, size,null);
102 if (fd == field) { /* stop, reached target field */
106 size = new OpExpr(Opcode.ADD, fieldsize, size);
109 if ((field==null)&&(!aligned))
110 return new OpExpr(Opcode.RND, size, null);
114 public Iterator getFields() {
115 return fields.values().iterator();
118 public Iterator getLabels() {
119 return labels.values().iterator();
122 public FieldDescriptor getField(String name) {
123 return (FieldDescriptor) fields.get(name);
126 public LabelDescriptor getLabel(String name) {
127 return (LabelDescriptor) labels.get(name);
130 public void addField(FieldDescriptor fd) {
131 if (getField(fd.getSymbol()) != null) {
132 throw new IRException("Can not overwrite a field once it has been added.");
134 fields.put(fd.getSymbol(), fd);
135 fieldlist.addElement(fd);
138 public void addLabel(LabelDescriptor ld) {
139 if (getLabel(ld.getSymbol()) != null) {
140 throw new IRException("Can not overwrite a label once it has been added.");
142 labels.put(ld.getSymbol(), ld);
145 public TypeDescriptor getSuperType() {
149 public void setSuperType(TypeDescriptor td) {
153 public boolean isSubtypeOf(TypeDescriptor td) {
159 return subtype.isSubtypeOf(td);
163 public void generate_printout(CodeWriter cr, VarDescriptor vd) {
164 // #TBD#: does not support printing out fields that have variable size, substructures, etc
166 cr.outputline("printf(\"" + getSymbol() + " %p: \", " + vd.getSafeSymbol() + ");");
167 for (int i = 0; i < fieldlist.size(); i++) {
168 FieldDescriptor fd = (FieldDescriptor) fieldlist.elementAt(i);
169 cr.outputline("printf(\"\\n\\t" + fd.getSymbol() + " = \");");
171 cr.outputline("printf(\"(" + fd.getType().getSymbol() + ") %p \", ((int *)" + vd.getSafeSymbol() + ")[" + i + "]);");
172 } else if ( fd.getType() instanceof ReservedTypeDescriptor) {
173 cr.outputline("printf(\"%d \", ((int *)" + vd.getSafeSymbol() + ")[" + i + "]);");
175 cr.outputline("printf(\"unsupported, breaking\");");
180 cr.outputline("printf(\"\\n\");");