This commit was manufactured by cvs2svn to create tag 'buildscript'.
[IRC.git] /
1 package Analysis.TaskStateAnalysis;
2 import IR.*;
3 import IR.Tree.*;
4 import IR.Flat.*;
5 import java.util.*;
6 import java.io.File;
7 import java.io.FileWriter;
8 import java.io.FileOutputStream;
9
10 public class TaskAnalysis {
11     State state;
12     Hashtable flagstates;
13     Hashtable flags;
14     Hashtable extern_flags;
15     Queue<FlagState> toprocess;
16     TagAnalysis taganalysis;
17     Hashtable cdtorootnodes;
18
19     TypeUtil typeutil;
20
21     /** 
22      * Class Constructor
23      *
24      * @param state a flattened State object
25      * @see State
26      */
27     public TaskAnalysis(State state, TagAnalysis taganalysis)
28     {
29         this.state=state;
30         this.typeutil=new TypeUtil(state);
31         this.taganalysis=taganalysis;
32                 
33     }
34     
35     /** Builds a table of flags for each class in the Bristlecone program.  
36      *  It creates two hashtables: one which holds the ClassDescriptors and arrays of
37      *  FlagDescriptors as key-value pairs; the other holds the ClassDescriptor and the 
38      *  number of external flags for that specific class.
39      */
40
41     private void getFlagsfromClasses() {
42         flags=new Hashtable();
43         extern_flags = new Hashtable();
44         
45         /** Iterate through the classes used in the program to build the table of flags
46          */
47         for(Iterator it_classes=state.getClassSymbolTable().getDescriptorsIterator();it_classes.hasNext();) {
48                 
49             ClassDescriptor cd = (ClassDescriptor)it_classes.next();
50             Vector vFlags=new Vector();
51             FlagDescriptor flag[];
52             int ctr=0;
53             
54             
55             /* Adding the flags of the super class */
56             if (cd.getSuper()!=null) {
57                 ClassDescriptor superdesc=cd.getSuperDesc();
58                 
59                 for(Iterator it_cflags=superdesc.getFlags();it_cflags.hasNext();) {     
60                     FlagDescriptor fd = (FlagDescriptor)it_cflags.next();
61                     vFlags.add(fd);
62                 }
63             }
64
65             for(Iterator it_cflags=cd.getFlags();it_cflags.hasNext();) {
66                 FlagDescriptor fd = (FlagDescriptor)it_cflags.next();
67                 vFlags.add(fd);
68             }
69
70             if (vFlags.size()!=0) {
71                 flag=new FlagDescriptor[vFlags.size()];
72                 
73                 for(int i=0;i < vFlags.size() ; i++) {
74                     if (((FlagDescriptor)vFlags.get(i)).getExternal()) {
75                         flag[ctr]=(FlagDescriptor)vFlags.get(i);
76                         vFlags.remove(flag[ctr]);
77                         ctr++;
78                     }
79                 }
80                 for(int i=0;i < vFlags.size() ; i++) {
81                     flag[i+ctr]=(FlagDescriptor)vFlags.get(i);
82                 }
83                 extern_flags.put(cd,new Integer(ctr));
84                 flags.put(cd,flag);
85                 
86             }
87         }
88     }
89     /** Method which starts up the analysis  
90      *  
91     */
92     
93     public void taskAnalysis() throws java.io.IOException {
94         flagstates=new Hashtable();
95         Hashtable<FlagState,FlagState> sourcenodes;
96         cdtorootnodes=new Hashtable();
97         
98         getFlagsfromClasses();
99         
100         int externs;
101         toprocess=new LinkedList<FlagState>();
102         
103         for(Iterator it_classes=(Iterator)flags.keys();it_classes.hasNext();) {
104             ClassDescriptor cd=(ClassDescriptor)it_classes.next();
105             externs=((Integer)extern_flags.get(cd)).intValue();
106             FlagDescriptor[] fd=(FlagDescriptor[])flags.get(cd);
107             flagstates.put(cd,new Hashtable<FlagState,FlagState>());
108             cdtorootnodes.put(cd,new Vector());
109         }       
110         
111         
112         ClassDescriptor startupobject=typeutil.getClass(TypeUtil.StartupClass);
113         
114         sourcenodes=(Hashtable<FlagState,FlagState>)flagstates.get(startupobject);
115         FlagState fsstartup=new FlagState(startupobject);
116         
117         
118         FlagDescriptor[] fd=(FlagDescriptor[])flags.get(startupobject);
119         
120         fsstartup=fsstartup.setFlag(fd[0],true);
121         fsstartup.setAsSourceNode();
122         ((Vector)cdtorootnodes.get(startupobject)).add(fsstartup);
123
124         sourcenodes.put(fsstartup,fsstartup);
125         toprocess.add(fsstartup);
126         
127         /** Looping through the flagstates in the toprocess queue to perform the state analysis */
128         while (!toprocess.isEmpty()) {
129             FlagState trigger=toprocess.poll();
130             createPossibleRuntimeStates(trigger);
131             
132             analyseTasks(trigger);
133         }
134         
135         /** Creating DOT files */
136         Enumeration e=flagstates.keys();
137         
138         while (e.hasMoreElements()) {
139             ClassDescriptor cdtemp=(ClassDescriptor)e.nextElement();
140             createDOTfile(cdtemp);
141         }
142     }
143     
144     
145     /** Analyses the set of tasks based on the given flagstate, checking
146      *  to see which tasks are triggered and what new flagstates are created
147      *  from the base flagstate.
148      *  @param fs A FlagState object which is used to analyse the task
149      *  @see FlagState
150      */
151
152 private void analyseTasks(FlagState fs) {
153     ClassDescriptor cd=fs.getClassDescriptor();
154     Hashtable<FlagState,FlagState> sourcenodes=(Hashtable<FlagState,FlagState>)flagstates.get(cd);
155     
156     for(Iterator it_tasks=state.getTaskSymbolTable().getDescriptorsIterator();it_tasks.hasNext();) {
157         TaskDescriptor td = (TaskDescriptor)it_tasks.next();
158         String taskname=td.getSymbol();
159         
160         /** counter to keep track of the number of parameters (of the task being analyzed) that 
161          *  are satisfied by the flagstate.
162          */
163         int trigger_ctr=0;
164         TempDescriptor temp=null;
165         FlatMethod fm = state.getMethodFlat(td);        
166         
167         for(int i=0; i < td.numParameters(); i++) {
168             FlagExpressionNode fen=td.getFlag(td.getParameter(i));
169             TagExpressionList tel=td.getTag(td.getParameter(i));
170             
171             /** Checking to see if the parameter is of the same type/class as the 
172              *  flagstate's and also if the flagstate fs triggers the given task*/
173             if (typeutil.isSuperorType(td.getParamType(i).getClassDesc(),cd)
174                 && isTaskTrigger_flag(fen,fs)
175                 && isTaskTrigger_tag(tel,fs)) {
176                 temp=fm.getParameter(i);
177                 trigger_ctr++;
178             }
179         }
180         
181         if (trigger_ctr==0) //Look at next task
182             continue;
183         
184         if (trigger_ctr>1)
185             throw new Error("Illegal Operation: A single flagstate cannot satisfy more than one parameter of a task.");
186         
187         
188         Set newstates=taganalysis.getFlagStates(td);
189         for(Iterator fsit=newstates.iterator();fsit.hasNext();) {
190             FlagState fsnew=(FlagState) fsit.next();
191             fsnew.setAsSourceNode();
192             fsnew.addAllocatingTask(td);
193             ((Vector)cdtorootnodes.get(fsnew.getClassDescriptor())).add(fsnew);
194             
195             if (! ((Hashtable<FlagState,FlagState>)flagstates.get(fsnew.getClassDescriptor())).containsKey(fsnew)) {
196                 ((Hashtable<FlagState,FlagState>)flagstates.get(fsnew.getClassDescriptor())).put(fsnew, fsnew);
197                 toprocess.add(fsnew);
198             }
199         }
200         
201         Stack nodestack=new Stack();
202         HashSet discovered=new HashSet();
203         nodestack.push(fm);
204         discovered.add(fm);
205         //Iterating through the nodes
206         
207         while(!nodestack.isEmpty()) {
208             FlatNode fn1 = (FlatNode) nodestack.pop();
209             
210             if (fn1.kind()==FKind.FlatReturnNode) {
211                 /* Self edge */
212                 FEdge newedge=new FEdge(fs, taskname);
213                 fs.addEdge(newedge);
214                 continue;
215             } else if (fn1.kind()==FKind.FlatFlagActionNode) {
216                 FlatFlagActionNode ffan=(FlatFlagActionNode)fn1;
217                 if (ffan.getTaskType() == FlatFlagActionNode.PRE) {
218                     if (ffan.getTempFlagPairs().hasNext()||ffan.getTempTagPairs().hasNext())
219                         throw new Error("PRE FlagActions not supported");
220                     
221                 } else if (ffan.getTaskType() == FlatFlagActionNode.TASKEXIT) {
222                     Vector<FlagState> fsv_taskexit=evalTaskExitNode(ffan,cd,fs,temp);
223                     for(Enumeration en=fsv_taskexit.elements();en.hasMoreElements();){
224                         FlagState fs_taskexit=(FlagState)en.nextElement();
225                         if (!sourcenodes.containsKey(fs_taskexit)) {
226                             toprocess.add(fs_taskexit);
227                         }
228                         //seen this node already
229                         fs_taskexit=canonicalizeFlagState(sourcenodes,fs_taskexit);
230                         FEdge newedge=new FEdge(fs_taskexit,taskname);
231                         fs.addEdge(newedge);
232                     }
233                     continue;
234                 }
235             }
236             /* Queue other nodes past this one */
237             for(int i=0;i<fn1.numNext();i++) {
238                 FlatNode fnext=fn1.getNext(i);
239                 if (!discovered.contains(fnext)) {
240                     discovered.add(fnext);
241                     nodestack.push(fnext);
242                 }
243             }
244         }
245     }
246 }
247
248
249 /** Determines whether the given flagstate satisfies a 
250  *  single parameter in the given task.
251  *  @param fen FlagExpressionNode
252  *  @see FlagExpressionNode
253  *  @param fs  FlagState
254  *  @see FlagState
255  *  @return <CODE>true</CODE> if fs satisfies the boolean expression
256     denoted by fen else <CODE>false</CODE>.
257  */
258
259
260 private boolean isTaskTrigger_flag(FlagExpressionNode fen,FlagState fs) {
261     if (fen==null)
262         return true;
263     else if (fen instanceof FlagNode)
264         return fs.get(((FlagNode)fen).getFlag());
265     else
266         switch (((FlagOpNode)fen).getOp().getOp()) {
267         case Operation.LOGIC_AND:
268             return ((isTaskTrigger_flag(((FlagOpNode)fen).getLeft(),fs)) && (isTaskTrigger_flag(((FlagOpNode)fen).getRight(),fs)));
269         case Operation.LOGIC_OR:
270             return ((isTaskTrigger_flag(((FlagOpNode)fen).getLeft(),fs)) || (isTaskTrigger_flag(((FlagOpNode)fen).getRight(),fs)));
271         case Operation.LOGIC_NOT:
272             return !(isTaskTrigger_flag(((FlagOpNode)fen).getLeft(),fs));
273         default:
274             return false;
275         }
276 }
277
278 private boolean isTaskTrigger_tag(TagExpressionList tel, FlagState fs){
279         
280         if (tel!=null){
281         for (int i=0;i<tel.numTags() ; i++){
282                 switch (fs.getTagCount(tel.getType(i))){
283                         case FlagState.ONETAG:
284                         case FlagState.MULTITAGS:
285                                 break;
286                         case FlagState.NOTAGS:
287                                 return false;
288                 }
289         }
290         }
291         return true;
292 }
293
294 /*private int tagTypeCount(TagExpressionList tel, String tagtype){
295         int ctr=0;
296         for(int i=0;i<tel.numTags() ; i++){
297                 if (tel.getType(i).equals(tagtype))
298                         ctr++;
299         }
300         return ctr;
301 } */
302
303     private Vector<FlagState> evalTaskExitNode(FlatFlagActionNode ffan,ClassDescriptor cd,FlagState fs, TempDescriptor temp){
304         FlagState fstemp=fs;
305         Vector<FlagState> processed=new Vector<FlagState>();
306
307         //Process the flag changes
308         
309         for(Iterator it_tfp=ffan.getTempFlagPairs();it_tfp.hasNext();) {
310             TempFlagPair tfp=(TempFlagPair)it_tfp.next();
311             if (temp==tfp.getTemp())
312                 fstemp=fstemp.setFlag(tfp.getFlag(),ffan.getFlagChange(tfp));
313         }
314         
315         //Process the tag changes
316
317         processed.add(fstemp);
318         
319         //Process clears first
320         for(Iterator it_ttp=ffan.getTempTagPairs();it_ttp.hasNext();) {
321             TempTagPair ttp=(TempTagPair)it_ttp.next();
322             
323             if (temp==ttp.getTemp()) {
324                 Vector<FlagState> oldprocess=processed;
325                 processed=new Vector<FlagState>();
326
327                 for (Enumeration en=oldprocess.elements();en.hasMoreElements();){
328                     FlagState fsworking=(FlagState)en.nextElement();
329                     if (!ffan.getTagChange(ttp)){
330                         processed.addAll(Arrays.asList(fsworking.clearTag(ttp.getTag())));
331                     } else processed.add(fsworking);
332                 }
333             }
334         }
335         //Process sets next
336         for(Iterator it_ttp=ffan.getTempTagPairs();it_ttp.hasNext();) {
337             TempTagPair ttp=(TempTagPair)it_ttp.next();
338             
339             if (temp==ttp.getTemp()) {
340                 Vector<FlagState> oldprocess=processed;
341                 processed=new Vector<FlagState>();
342
343                 for (Enumeration en=oldprocess.elements();en.hasMoreElements();){
344                     FlagState fsworking=(FlagState)en.nextElement();
345                     if (ffan.getTagChange(ttp)){
346                         processed.addAll(Arrays.asList(fsworking.setTag(ttp.getTag())));
347                     } else processed.add(fsworking);
348                 }
349             }
350         }
351         return processed;
352     }           
353     
354
355     private FlagState canonicalizeFlagState(Hashtable sourcenodes, FlagState fs){
356         if (sourcenodes.containsKey(fs))
357             return (FlagState)sourcenodes.get(fs);
358         else{
359             sourcenodes.put(fs,fs);
360             return fs;
361         }
362     }
363
364    /** Creates a DOT file using the flagstates for a given class
365     *  @param cd ClassDescriptor of the class
366     *  @throws java.io.IOException
367     *  @see ClassDescriptor
368     */
369     
370     public void createDOTfile(ClassDescriptor cd) throws java.io.IOException {
371         File dotfile_flagstates= new File("graph"+cd.getSymbol()+".dot");
372         FileOutputStream dotstream=new FileOutputStream(dotfile_flagstates,true);
373         FlagState.DOTVisitor.visit(dotstream,((Hashtable)flagstates.get(cd)).values());
374     }
375
376     /** Returns the flag states for the class descriptor. */
377     public Set getFlagStates(ClassDescriptor cd) {
378         if (flagstates.containsKey(cd))
379             return ((Hashtable)flagstates.get(cd)).keySet();
380         else
381             return null;
382     }
383
384
385     private void createPossibleRuntimeStates(FlagState fs) {
386     ClassDescriptor cd = fs.getClassDescriptor();
387     Hashtable<FlagState,FlagState> sourcenodes=(Hashtable<FlagState,FlagState>)flagstates.get(cd);
388     FlagDescriptor[] fd=(FlagDescriptor[])flags.get(cd);        
389     int externs=((Integer)extern_flags.get(cd)).intValue();
390     
391     if(externs==0)
392         return;
393
394     int noOfIterations=(1<<externs) - 1;
395     boolean BoolValTable[]=new boolean[externs];
396
397
398     for(int i=0; i < externs ; i++) {
399         BoolValTable[i]=fs.get(fd[i]);
400     }
401
402         for(int k=0; k<noOfIterations; k++) {
403         for(int j=0; j < externs ;j++) {
404             if ((k% (1<<j)) == 0)
405                 BoolValTable[j]=(!BoolValTable[j]);
406         }
407         
408         FlagState fstemp=fs;
409         
410         for(int i=0; i < externs;i++) {
411             fstemp=fstemp.setFlag(fd[i],BoolValTable[i]);
412         }
413         if (!sourcenodes.containsKey(fstemp))
414             toprocess.add(fstemp);
415
416         fstemp=canonicalizeFlagState(sourcenodes,fstemp);
417         fs.addEdge(new FEdge(fstemp,"Runtime"));
418     }
419         }
420         
421         public Vector getRootNodes(ClassDescriptor cd){
422                 return (Vector)cdtorootnodes.get(cd);
423         }
424
425
426    
427
428