]> AND Private Git Repository - blast.git/blob - FunctionalBlock.cpp
Logo AND Algorithmique Numérique Distribuée

Private GIT Repository
moved vhdl gen. into block
[blast.git] / FunctionalBlock.cpp
1 #include "FunctionalBlock.h"\r
2 #include "ReferenceBlock.h"\r
3 #include "GroupBlock.h"\r
4 #include "AbstractInterface.h"\r
5 #include "FunctionalInterface.h"\r
6 #include "ReferenceInterface.h"\r
7 #include "BlockParameter.h"\r
8 #include "ArithmeticEvaluator.h"\r
9 \r
10 \r
11 FunctionalBlock::FunctionalBlock(GroupBlock *_parent, ReferenceBlock *_reference) throw(Exception) :  AbstractBlock() {\r
12   //if (! _reference->isReferenceBlock()) throw(Exception(BLOCK_INVALID_TYPE));\r
13   //if (! _group->isGroupBlock()) throw(Exception(BLOCK_INVALID_TYPE));\r
14   reference = _reference;\r
15   parent = _parent;\r
16   name = reference->getName();\r
17 \r
18   if (reference->getImplementations().isEmpty()) {\r
19     implementation = NULL;\r
20     cout << "block has no implementation" << endl;\r
21   }\r
22   else {\r
23     implementation = reference->getImplementations().at(0);\r
24   }\r
25   lengthAP = -1;\r
26   lengthCP = -1;\r
27   lengthIP = -1;\r
28   lengthOP = -1;\r
29   lengthPP = -1;\r
30   delta = -1;\r
31   evaluator = NULL;\r
32 \r
33 }\r
34 \r
35 FunctionalBlock::~FunctionalBlock() {\r
36   if (evaluator != NULL) delete evaluator;\r
37 }\r
38 \r
39 void FunctionalBlock::parametersValidation(QList<AbstractBlock*>* checkedBlocks, QList<AbstractBlock *> *blocksToConfigure) {\r
40   /*\r
41   checkedBlocks->append(this);\r
42 \r
43   foreach(BlockParameter* param, params){\r
44     if(param->isUserParameter() && !param->isValueSet()){\r
45       if(!blocksToConfigure->contains(param->getOwner())){\r
46         blocksToConfigure->append(param->getOwner());\r
47       }\r
48     }\r
49   }\r
50   foreach(AbstractInterface *inter, outputs){\r
51     foreach(AbstractInterface *connectedInter, inter->getConnectedTo()){\r
52       if(!checkedBlocks->contains(connectedInter->getOwner())){\r
53         connectedInter->getOwner()->parametersValidation(checkedBlocks, blocksToConfigure);\r
54       }\r
55     }\r
56   }\r
57   */\r
58 }\r
59 \r
60 bool FunctionalBlock::isFunctionalBlock() {\r
61   return true;\r
62 }\r
63 \r
64 bool FunctionalBlock::isSourceBlock() {\r
65   if (parent == NULL) return true;\r
66   return false;\r
67 }\r
68 \r
69 void FunctionalBlock::populate() {\r
70   int i;\r
71   BlockParameter* p;\r
72   AbstractInterface* inter;\r
73 \r
74   // create parameters from reference block\r
75   QList<BlockParameter*> lstParam = reference->getParameters();\r
76   for(i=0;i<lstParam.size();i++) {\r
77     p = lstParam.at(i)->clone();\r
78     addParameter(p);\r
79   }\r
80 \r
81   ConnectedInterface* toClk = NULL;\r
82   ConnectedInterface* toRst = NULL;\r
83   // create interfaces from reference block\r
84   QList<AbstractInterface *> lstRef = reference->getInterfaces();\r
85   // store relation between functional and reference\r
86   QHash<AbstractInterface *, AbstractInterface *> hashIface;\r
87   for(i=0;i<lstRef.size();i++) {\r
88     try {\r
89       inter = new FunctionalInterface(this, AI_TO_REF(lstRef.at(i)));\r
90     }\r
91     catch(Exception e) {\r
92       cerr << "Abnormal case: " << qPrintable(e.getDefaultMessage()) << endl << "Aborting execution." << endl;\r
93       exit(1);\r
94     }\r
95     hashIface.insert(lstRef.at(i),inter);\r
96     addInterface(inter);\r
97     /* WARNING FOR THE FUTURE :\r
98        in case of there are several clock interfaces ofr that block\r
99        it would be a godd idea to make the user choose which one\r
100        must be connected to defautl clk.\r
101        Presently, the first encountered is chosen\r
102      */\r
103     if ((toClk == NULL) && (inter->getPurpose() == AbstractInterface::Clock)) {\r
104       toClk = AI_TO_CON(inter);\r
105     }\r
106     if ((toRst == NULL) && (inter->getPurpose() == AbstractInterface::Reset)) {\r
107       toRst = AI_TO_CON(inter);\r
108     }\r
109   }\r
110     \r
111   AbstractInterface* funCtlIface = NULL;\r
112   AbstractInterface* funDataIface = NULL;\r
113   \r
114   for(i=0;i<lstRef.size();i++) {    \r
115     AbstractInterface* refIface = lstRef.at(i);    \r
116     if (refIface->getPurpose() == AbstractInterface::Control) {\r
117       funCtlIface = hashIface.value(refIface);\r
118       funDataIface = hashIface.value(refIface->getAssociatedIface());\r
119       if (! funCtlIface->setAssociatedIface(funDataIface)) {\r
120         cerr << "Abnormal case when associating a control interface to data" << endl << "Aborting execution." << endl;\r
121         exit(1);\r
122       }       \r
123     }\r
124   }\r
125 \r
126   // connect clk and rst to group clk/rst or to clkrstgen\r
127   if ((name != "clkrstgen") && (parent != NULL)) {\r
128     try {\r
129       connectClkReset();\r
130     }\r
131     catch(Exception e) {\r
132       AbstractBlock* source = (AbstractBlock *)(e.getSource());\r
133       cerr << qPrintable(source->getName()) << ":" << qPrintable(e.getMessage()) << endl;\r
134       throw(e);\r
135     }\r
136   }\r
137 }\r
138 \r
139 QString FunctionalBlock::getReferenceXmlFile() {\r
140     return ((ReferenceBlock *)reference)->getXmlFile();\r
141 }\r
142 \r
143 QString FunctionalBlock::getReferenceHashMd5() {\r
144     return ((ReferenceBlock *)reference)->getHashMd5();\r
145 }\r
146 \r
147 void FunctionalBlock::createPatterns() throw(Exception) {\r
148   static QString fctName = "FunctionalBlock::createPatterns()";\r
149 #ifdef DEBUG_FCTNAME\r
150   cout << "call to " << qPrintable(fctName) << endl;\r
151 #endif\r
152   \r
153   cout << "create patterns for block " << qPrintable(name) << endl;\r
154   if (evaluator == NULL) evaluator = new ArithmeticEvaluator();\r
155   if (! isGeneratorBlock()) {\r
156     try {\r
157       createDelta();\r
158       createConsumptionPattern();    \r
159       createProductionCounter();\r
160     }\r
161     catch(Exception e) {\r
162       throw(e); // rethrow e\r
163     }\r
164   }\r
165   try {\r
166     createProductionPattern();\r
167   }\r
168   catch(Exception e) {\r
169     throw(e);\r
170   }\r
171   cout << "PP of " << qPrintable(name) << endl;\r
172   QMapIterator<AbstractInterface*,QList<char>* > it(productionPattern);\r
173   while (it.hasNext()) {\r
174     it.next();\r
175     QList<char>* pat = it.value();\r
176     foreach(char c, *pat) cout << (int)c;\r
177     cout << endl;\r
178   }\r
179 }\r
180 \r
181 void FunctionalBlock::createDelta() throw(Exception) {\r
182   static QString fctName = "FunctionalBlock::createDelta()";\r
183 #ifdef DEBUG_FCTNAME\r
184   cout << "call to " << qPrintable(fctName) << endl;\r
185 #endif \r
186   \r
187   QString deltaStr = implementation->getDelta();  \r
188   cout << "delta for " << qPrintable(name) << " = " << qPrintable(deltaStr) << endl;\r
189   if (deltaStr.isEmpty()) {\r
190     delta = -1;\r
191     return;\r
192   }\r
193   \r
194   // look for parameter names  \r
195   double result = 0;\r
196   try {\r
197     result = evaluateExpression(deltaStr);\r
198   }\r
199   catch(Exception e) {\r
200     throw(e);\r
201   }\r
202   delta = result;\r
203   cout << "delta = " << delta << endl;\r
204 }\r
205 \r
206 void FunctionalBlock::createConsumptionPattern()  throw(Exception) {\r
207   static QString fctName = "FunctionalBlock::createConsumptionPattern()";\r
208 #ifdef DEBUG_FCTNAME\r
209   cout << "call to " << qPrintable(fctName) << endl;\r
210 #endif\r
211   \r
212   // first clear if already exists\r
213   clearConsumptionPattern();\r
214 \r
215   lengthCP = -1;  \r
216   QHash<QString,QString> consPattern = implementation->getConsumptionPattern();  \r
217   \r
218   foreach(AbstractInterface* iface, getControlInputs()) {       \r
219     FunctionalInterface* connIface = AI_TO_FUN(iface);\r
220     QString refName = connIface->getReference()->getName();    \r
221     if (! consPattern.contains(refName)) {\r
222       throw(Exception(NO_IFACE_CP,this));\r
223       cerr << "no consumption pattern for reference interface " << qPrintable(refName) << endl;\r
224     }\r
225     QList<char>* pattern = NULL;\r
226     try {\r
227       pattern = expandPattern(consPattern.value(refName));\r
228     }\r
229     catch(Exception e) {\r
230       throw(e);\r
231     }\r
232     consumptionPattern.insert(connIface,pattern);\r
233     if (lengthCP == -1) {\r
234       lengthCP = pattern->size();\r
235     }\r
236     else {\r
237       if (pattern->size() != lengthCP) {\r
238         throw(Exception(INVALID_IFACE_CP_LENGTH,this));\r
239       }\r
240     }\r
241   }          \r
242 }\r
243 \r
244 void FunctionalBlock::createProductionPattern() throw(Exception){  \r
245   static QString fctName = "FunctionalBlock::createProductionPattern()";\r
246 #ifdef DEBUG_FCTNAME\r
247   cout << "call to " << qPrintable(fctName) << endl;\r
248 #endif\r
249 \r
250   // first clear if already exists\r
251   clearProductionPattern();\r
252   \r
253   lengthPP = -1;  \r
254   QHash<QString,QString> prodPattern = implementation->getProductionPattern();  \r
255   \r
256   foreach(AbstractInterface* iface, getControlOutputs()) {    \r
257     FunctionalInterface* connIface = AI_TO_FUN(iface);\r
258     QString refName = connIface->getReference()->getName();    \r
259     if (! prodPattern.contains(refName)) {\r
260       throw(Exception(NO_IFACE_PP,this));\r
261     }\r
262     QList<char>* pattern = NULL;\r
263     try {\r
264       pattern = expandPattern(prodPattern.value(refName));\r
265     }\r
266     catch(Exception e) {\r
267       throw(e);\r
268     }\r
269     productionPattern.insert(connIface,pattern);\r
270     if (lengthPP == -1) {\r
271       lengthPP = pattern->size();\r
272     }\r
273     else {\r
274       if (pattern->size() != lengthPP) {\r
275         throw(Exception(INVALID_IFACE_PP_LENGTH,this));\r
276       }\r
277     }\r
278   }      \r
279 }\r
280 \r
281 void FunctionalBlock::createProductionCounter() throw(Exception) {\r
282   static QString fctName = "FunctionalBlock::createProductionCounter()";\r
283 #ifdef DEBUG_FCTNAME\r
284   cout << "call to " << qPrintable(fctName) << endl;\r
285 #endif\r
286 \r
287   // first clear if already exists\r
288   productionCounter.clear();\r
289 \r
290   \r
291   QStringList counterParts = implementation->getProductionCounter().split(",");\r
292   foreach(QString s, counterParts) {\r
293     cout << "cont part = " << qPrintable(s) << endl;\r
294     bool ok;\r
295     double val = s.toDouble(&ok);\r
296     if (ok) {\r
297       productionCounter.append(val);\r
298     }\r
299     else if (s.at(0) == '{') {\r
300       s.remove(0,1);\r
301       s.chop(1);\r
302       QStringList gen = s.split(":");\r
303       if (gen.size() != 3) {\r
304         throw(Exception(INVALID_IFACE_PC,this));\r
305       }\r
306       int start = 0;\r
307       int nb = 0;\r
308       int step = 0;\r
309       for(int i=0;i<3;i++) {        \r
310         double result = 0.0;\r
311         try {\r
312           result = evaluateExpression(gen.at(i));\r
313         }\r
314         catch(Exception e) {\r
315           throw(e);\r
316         }\r
317         if (i==0) start = result;\r
318         else if (i==1) nb = result;\r
319         else if (i==2) step = result;\r
320       }\r
321       for(int j=0;j<nb;j++) {\r
322         productionCounter.append(start+j*step);\r
323       }\r
324     }\r
325     else {      \r
326       double result = 0.0;\r
327       try {\r
328         result = evaluateExpression(s);\r
329       }\r
330       catch(Exception e) {\r
331         throw(e);\r
332       }\r
333       productionCounter.append(result);      \r
334     }\r
335   }\r
336   foreach(int val, productionCounter) {\r
337     cout << val << ",";\r
338   }\r
339   cout << endl;\r
340 }\r
341 \r
342 QList<char>* FunctionalBlock::expandPattern(const QString& patternIn) throw(Exception) {\r
343   static QString fctName = "FunctionalBlock::expandPattern()";\r
344 #ifdef DEBUG_FCTNAME\r
345   cout << "call to " << qPrintable(fctName) << endl;\r
346 #endif\r
347   /* expanding a pattern is done in two steps :\r
348       - 1 : finding all variables that correspond to an expression\r
349             and copy them in the pattern\r
350       - 2 : parsing the result\r
351 \r
352       Note that the result MUST contain only variables that have a\r
353       integer/double value. Otherwise, expanding will fail.\r
354 \r
355    */\r
356 \r
357   // first step.\r
358 \r
359   QString p = replaceExpressions(patternIn);\r
360 \r
361   QList<char> lst;  \r
362   p.append(')');\r
363   int offset = 0;  \r
364   QList<char>* patternOut = new QList<char>();\r
365   try {\r
366     patternOut->append(expandPatternRecur(p,&offset));\r
367   }\r
368   catch(Exception e) {\r
369     throw(e);\r
370   }\r
371 \r
372   return patternOut;\r
373 }\r
374 \r
375 QString FunctionalBlock::replaceExpressions(const QString& patternIn) throw(Exception) {\r
376 \r
377   QString res = patternIn;\r
378   bool stop = false;\r
379   QRegularExpression re("[$][a-zA-Z0-9_]+");\r
380 \r
381   while (!stop) {\r
382     stop = true;\r
383     QRegularExpressionMatchIterator matcher = re.globalMatch(res);\r
384     while(matcher.hasNext()) {\r
385       QRegularExpressionMatch m = matcher.next();\r
386       QString param = m.captured(0);\r
387       QString paramName = param;\r
388       paramName.remove(0,1);\r
389       BlockParameter* p = getParameterFromName(paramName);\r
390       if ((p != NULL) && (p->getType() == BlockParameter::Expression)) {\r
391         res.replace(param,p->getStringValue());\r
392         stop = false;\r
393         cout << "found an expr: " << qPrintable(paramName) << ", patern => " << qPrintable(res) << endl;\r
394       }\r
395     }\r
396   }\r
397   return res;\r
398 }\r
399 \r
400 QList<char> FunctionalBlock::expandPatternRecur(const QString& patternIn, int *offset) throw(Exception) {\r
401   \r
402   QList<char> patternOut;\r
403 \r
404   while ((*offset < patternIn.size()) && (patternIn.at(*offset) != ')')) {\r
405     \r
406     QChar c = patternIn.at(*offset);\r
407     if (c == '(') {\r
408       *offset += 1;\r
409       try {\r
410         patternOut.append(expandPatternRecur(patternIn,offset));\r
411       }\r
412       catch(Exception e) {\r
413         throw(e);\r
414       }\r
415     }\r
416     else if (c == '0') {\r
417       patternOut.append(0);\r
418     }\r
419     else if (c == '1') {\r
420       patternOut.append(1);\r
421     }\r
422     else if (c == 'X') {\r
423       patternOut.append(-1);\r
424     }\r
425     else if (c == '{') {\r
426       *offset += 1;\r
427       QString expr = "";      \r
428       while ((*offset < patternIn.size()) && (patternIn.at(*offset) != '}')) {\r
429         expr += patternIn.at(*offset);        \r
430         *offset += 1;\r
431       }\r
432       if (*offset == patternIn.size()) {\r
433         throw(Exception(INVALID_IFACE_PATTERN,this));\r
434       }\r
435       double repeat = 0;\r
436       try {\r
437         repeat = evaluateExpression(expr);\r
438       }\r
439       catch(Exception e) {\r
440         throw(e);\r
441       }\r
442       // repeat just the last value in currentGroup\r
443       char last = patternOut.last();\r
444       //cout << "repeat last char " << repeat << " times : " << (int)last << endl;\r
445       \r
446       for(int i=1;i<(int)repeat;i++) {\r
447         patternOut.append(last);\r
448       }\r
449     }    \r
450     *offset += 1;\r
451   }\r
452   \r
453   // must check if after ), there is a {\r
454   if ((*offset < patternIn.size()-1) && (patternIn.at(*offset+1) == '{')) {\r
455     *offset += 2;\r
456     QString expr = "";      \r
457     while ((*offset < patternIn.size()) && (patternIn.at(*offset) != '}')) {\r
458       expr += patternIn.at(*offset);        \r
459       *offset += 1;\r
460     }\r
461     if (*offset == patternIn.size()) {\r
462       throw(Exception(INVALID_IFACE_PATTERN,this));\r
463     }\r
464     double repeat = 0;\r
465     try {\r
466       repeat = evaluateExpression(expr);\r
467     }\r
468     catch(Exception e) {\r
469       throw(e);\r
470     }\r
471     /*\r
472     cout << "repeat last group " << repeat << " times : ";\r
473     foreach (char c, currentGroup) cout <<(int)c;\r
474     cout << endl;  \r
475     */\r
476     QList<char> single = patternOut;\r
477     for(int i=1;i<(int)repeat;i++) {\r
478       patternOut.append(single);\r
479     }    \r
480   }  \r
481   return patternOut;\r
482 }\r
483 \r
484 double FunctionalBlock::evaluateExpression(const QString& expression) throw(Exception) {\r
485   static QString fctName = "FunctionalBlock::evaluateExpression()";\r
486 #ifdef DEBUG_FCTNAME\r
487   cout << "call to " << qPrintable(fctName) << endl;\r
488 #endif\r
489     \r
490   QHash<QString,double> vars;\r
491   evaluator->setExpression(expression);\r
492   QList<QString> varNames = evaluator->getVariableNames();\r
493   foreach (QString name, varNames) {\r
494     QString paramName = name;\r
495     paramName.remove(0,1);\r
496     BlockParameter* param = getParameterFromName(paramName);\r
497     if (param == NULL) {\r
498       throw(Exception(EVAL_PARAM_UNKNOWN,this));\r
499     }\r
500     bool okVal;\r
501     int val = param->getDoubleValue(&okVal);    \r
502     if (!okVal) {\r
503       throw(Exception(EVAL_PARAM_NOVALUE,this));\r
504     }\r
505     vars.insert(name,(double)val);    \r
506   }\r
507   \r
508   evaluator->setVariablesValue(vars);\r
509   double result = 0.0;\r
510   try {\r
511     result = evaluator->evaluate();\r
512   }\r
513   catch(int index) {\r
514     cerr << "Error at index " << index << ": " << qPrintable(evaluator->getError()) << endl;\r
515     throw(Exception(EVAL_INVALID_EXPR,this));\r
516   }\r
517   return result;\r
518 }\r
519 \r
520 void FunctionalBlock::computeAdmittanceDelays() throw(Exception) {\r
521   static QString fctName = "FunctionalBlock::computeAdmittanceDelays()";\r
522 #ifdef DEBUG_FCTNAME\r
523   cout << "call to " << qPrintable(fctName) << endl;\r
524 #endif\r
525   QList<int> inClock;\r
526   QList<int> delays;\r
527 \r
528   clearAdmittanceDelays();\r
529 \r
530   // trying to synchronize the first one in AP\r
531   QMapIterator<AbstractInterface*,QList<char>* > iterAP(admittance);\r
532   QMapIterator<AbstractInterface*,QList<char>* > iterIP(inputPattern);\r
533 \r
534   while (iterAP.hasNext()) {\r
535     iterAP.next();\r
536     iterIP.next();\r
537     QList<char>* ap = iterAP.value();\r
538     QList<char>* ip = iterIP.value();\r
539     int first = 0;\r
540     while ((first < lengthIP) && (ip->at(first) == 0)) first++;\r
541     while ((first < lengthAP) && (ap->at(first) == 0)) first--;\r
542     delays.append(first);\r
543     inClock.append(0);\r
544     QList<int>* delays = new QList<int>();\r
545     admittanceDelays.insert(iterAP.key(), delays);\r
546   }\r
547 \r
548   QMapIterator<AbstractInterface*,QList<int>* > iterDelays(admittanceDelays);\r
549 \r
550   // get the delay to apply\r
551   int maxDelay = 0;\r
552   for(int i=0;i<delays.size();i++) {\r
553     if (delays[i] > maxDelay) maxDelay = delays[i];\r
554   }\r
555   // adding the delays to IP\r
556   iterIP.toFront();\r
557   int i = 0;\r
558   while (iterIP.hasNext()) {\r
559     iterIP.next();\r
560     iterDelays.next();\r
561     QList<char>* ip = iterIP.value();\r
562     QList<int>* d = iterDelays.value();\r
563     d->append(maxDelay-delays[i]);\r
564     cout << "prependind " << qPrintable(iterIP.key()->getName()) << " with " << (maxDelay-delays[i]) << " 0" << endl;\r
565     for(int j=0;j<maxDelay-delays[i];j++) {\r
566       ip->prepend(0);\r
567     }\r
568     for(int j=0;j<delays[i];j++) {\r
569       ip->append(0);\r
570     }\r
571     i++;\r
572   }\r
573   lengthIP += maxDelay;\r
574 \r
575   cout << "IP length = " << lengthIP << ", AP length = " << lengthAP << endl;\r
576   bool stop = false;\r
577   int apIndex = 0;\r
578   int ipIndex = 0;\r
579   while (!stop) {\r
580 \r
581     // if AP is a valid group, search for the next valid group in IP\r
582     if (isValidDataGroup(admittance,apIndex)) {\r
583 \r
584       while ((ipIndex < lengthIP) && (! isValidDataGroup(inputPattern,ipIndex))) ipIndex++;\r
585       if (ipIndex == lengthIP) {\r
586         stop = true;\r
587         continue;\r
588       }\r
589     }\r
590 \r
591     iterAP.toFront();\r
592     iterIP.toFront();\r
593     iterDelays.toFront();\r
594 \r
595     if (samePatterns(inputPattern,ipIndex,admittance,apIndex)) {\r
596       while (iterAP.hasNext()) {\r
597         iterAP.next();\r
598         iterDelays.next();\r
599         QList<char>* ap = iterAP.value();\r
600         if (ap->at(apIndex) == 1) {\r
601           QList<int>* d = iterDelays.value();\r
602           d->append(0); // the 1 is at its good place, so no delay\r
603         }\r
604       }\r
605     }\r
606     else {\r
607       cout << "diff between IP and AP at " << apIndex << endl;\r
608       // search for the next 1 in IP for every input that has a 1 in AP\r
609 \r
610       while (iterAP.hasNext()) {\r
611         iterAP.next();\r
612         iterIP.next();\r
613         iterDelays.next();\r
614         QList<char>* ap = iterAP.value();\r
615         QList<char>* ip = iterIP.value();\r
616         QList<int>* d = iterDelays.value();\r
617         // case 1: 1 in IP is too late\r
618         if ((ap->at(apIndex) == 1) && (ip->at(ipIndex) == 0)) {\r
619           int delay = 1;\r
620           while ( ((ipIndex+delay) < lengthIP) && (ip->at(ipIndex+delay) == 0) ) delay++;\r
621           cout << "found a delay of " << (-delay) << " for iface " << qPrintable(iterAP.key()->getName()) << endl;\r
622           // moving the 1 to its normal pos.\r
623           ip->replace(ipIndex,1);\r
624           ip->replace(ipIndex+delay,0);\r
625           d->append(-delay);\r
626         }\r
627         // case 2: 1 in IP is too soon\r
628         else if ((ap->at(apIndex) == 0) && (ip->at(ipIndex) == 1)) {\r
629           int delay = 1;\r
630           while ( ((apIndex+delay) < lengthAP) && (ap->at(apIndex+delay) == 0) ) delay++;\r
631           cout << "found a delay of " << delay << " for iface " << qPrintable(iterAP.key()->getName()) << endl;\r
632           // search for next 0 in IP to put the 1\r
633           int k = ipIndex+delay;\r
634           while ((k < lengthIP) && (ip->at(k) == 1)) k++;\r
635           ip->replace(ipIndex,0);\r
636           ip->replace(k,1);\r
637           d->append(delay);\r
638         }\r
639       }\r
640       if (! samePatterns(inputPattern,inClock,admittance,apIndex)) {\r
641          cout << "Abnormal case while searching for delays" << endl;\r
642       }\r
643     }\r
644 \r
645     apIndex++;\r
646     ipIndex++;\r
647     if ((apIndex >= lengthAP) || (ipIndex >= lengthIP)) stop = true;\r
648   }\r
649   iterDelays.toFront();\r
650   while (iterDelays.hasNext()) {\r
651     iterDelays.next();\r
652     QList<int>* d = iterDelays.value();\r
653     foreach(int v, *d) {\r
654       cout << v << " ";\r
655     }\r
656     cout << endl;\r
657   }\r
658 \r
659 }\r
660 \r
661 void FunctionalBlock::createInputPattern()  throw(Exception) {\r
662   static QString fctName = "FunctionalBlock::createInputPattern())";\r
663 #ifdef DEBUG_FCTNAME\r
664   cout << "call to " << qPrintable(fctName) << endl;\r
665 #endif\r
666   \r
667   lengthIP = -1;\r
668   foreach(AbstractInterface* iface, getControlInputs()) {\r
669 \r
670     ConnectedInterface* connIface = AI_TO_CON(iface);\r
671     // check if it is connected\r
672     if (connIface->getConnectedFrom() == NULL) {\r
673       throw(Exception(IFACE_NOT_CONNECTED,this));\r
674     }\r
675     // get the precursor output pattern\r
676     QList<char>* out = connIface->getConnectedFrom()->getOutputPattern();\r
677     AbstractInputModifier* modifier = connIface->getInputModifier();\r
678     // check if the input is modified\r
679     if (modifier != NULL) {\r
680 \r
681       out = modifier->getModifiedInput(out);\r
682     }\r
683 \r
684     if (out->size() == 0) {\r
685       clearInputPattern();\r
686       throw(Exception(NO_IFACE_IP,this));\r
687     }\r
688     if (lengthIP == -1) {\r
689       lengthIP = out->size();\r
690     }\r
691     else {\r
692       if (out->size() < lengthIP) lengthIP = out->size();\r
693     }\r
694     \r
695     QList<char>* in = new QList<char>(*out);\r
696     foreach(char c, *in) {\r
697       cout << (int)c;\r
698     }\r
699     cout << endl;    \r
700     inputPattern.insert(connIface,in);    \r
701   }\r
702   // search the last valid group in IP,\r
703   while(! isValidDataGroup(inputPattern,lengthIP-1)) {\r
704     //removeDataGroup(inputPattern,lengthIP-1);\r
705     lengthIP -= 1;\r
706   }\r
707 }\r
708 \r
709 void FunctionalBlock::createAdmittance(int nbExec) throw(Exception) {\r
710   static QString fctName = "FunctionalBlock::createAdmittance()";\r
711 #ifdef DEBUG_FCTNAME\r
712   cout << "call to " << qPrintable(fctName) << endl;\r
713 #endif  \r
714   // firstly, copy CP in AP\r
715   QMapIterator<AbstractInterface*,QList<char>* > iterC(consumptionPattern);\r
716   while (iterC.hasNext()) {\r
717     iterC.next();\r
718     QList<char>* pattern = new QList<char>(*(iterC.value()));\r
719     admittance.insert(iterC.key(), pattern);    \r
720   }\r
721   lengthAP = lengthCP;\r
722   int clock = 0;  \r
723   cout << "trigger 1 at c.c. 0" << endl;\r
724   for(int i=1;i<nbExec;i++) {\r
725     // searching for the clock cycle for which a new exec starts\r
726     int nbGroup = 0;\r
727     while ((clock < lengthAP) && (nbGroup < delta)) {\r
728       if (isValidDataGroup(admittance,clock)) nbGroup+=1;\r
729       clock += 1;\r
730     }\r
731     while ((clock < lengthAP) && (! isValidDataGroup(admittance,clock))) clock+=1;\r
732     cout << "trigger " << (i+1) << " at c.c. " << clock << endl;\r
733     int sc = clock;\r
734     // combine CP with AP at sc\r
735     for(int j=0;j<lengthCP;j++) {\r
736       // first case : column of CP must be placed beyond AP's end.\r
737       if (sc == lengthAP) {\r
738         cout << i << "," << j << " append in AP at " << sc << endl;\r
739         appendToPattern(consumptionPattern,j,admittance,1);\r
740         lengthAP += 1;\r
741         sc += 1;               \r
742       }\r
743       // second case : CP and AP can be combined directly (i.e. no X | 1 to do)\r
744       else if (canCombinePatterns(consumptionPattern,j,admittance,sc)) {\r
745         cout << i << "," << j << " combine at " << sc << endl;\r
746         combinePatterns(consumptionPattern,j,admittance,sc);\r
747         sc += 1;\r
748       }\r
749       // third case : CP has an X column\r
750       else if (isOnlyXDataGroup(consumptionPattern,j)) {\r
751         cout << i << "," << j << " shift rigth AP to combine at " << sc << endl;\r
752         shiftRightPattern(admittance,sc);\r
753         lengthAP += 1;\r
754         if (! canCombinePatterns(consumptionPattern,j,admittance,sc)) {\r
755           cerr << "Abnormal case when combining AP and CP" << endl;\r
756         }\r
757         combinePatterns(consumptionPattern,j,admittance,sc);        \r
758         sc += 1;\r
759       }\r
760       // fourth case : AP has an X column\r
761       else if (isOnlyXDataGroup(admittance,sc)) {\r
762         cout << i << "," << j << " jump c.c. for CP at " << sc << endl;        \r
763         sc += 1;\r
764         j -= 1;\r
765       }\r
766       else {\r
767         throw(INVALID_DELTA_CP);        \r
768       }\r
769     }\r
770   }\r
771   // turn all X into 0\r
772   QMapIterator<AbstractInterface*,QList<char>* > iterA(admittance);\r
773   while (iterA.hasNext()) {\r
774     iterA.next();\r
775     QList<char>* pattern = iterA.value();\r
776     for(int i=0;i<pattern->size();i++) {\r
777       if (pattern->at(i) == -1) pattern->replace(i,0);\r
778       cout << (int)(pattern->at(i));\r
779     }\r
780     cout << endl;\r
781   }  \r
782 }\r
783 \r
784 void FunctionalBlock::checkInputPatternCompatibility() throw(Exception) {\r
785   static QString fctName = "FunctionalBlock::checkInputPatternCompatibility()";\r
786 #ifdef DEBUG_FCTNAME\r
787   cout << "call to " << qPrintable(fctName) << endl;\r
788 #endif\r
789     \r
790   // firstly, create input pattern\r
791   try {\r
792     createInputPattern();\r
793   }\r
794   catch(Exception e) {\r
795     throw(e);\r
796   }\r
797   int nbExec = createTriggers();\r
798   cout << qPrintable(name) << " will exec. " << nbExec << " times." << endl;\r
799   \r
800   try {\r
801     createAdmittance(nbExec);\r
802   }\r
803   catch(Exception e) {\r
804     cout << "cannot create admittance" << endl;\r
805     throw(e);\r
806   }\r
807   \r
808   int clock = 0; // index in IP  \r
809   int i = 0; // index in AP  \r
810   while ((clock < lengthIP) && (i < lengthAP)) {\r
811      \r
812     // if AP is a valid group, search for the next valid group in IP\r
813     if (isValidDataGroup(admittance,i)) {\r
814       while ((clock < lengthIP) && (! isValidDataGroup(inputPattern,clock))) clock++;\r
815       if (clock == lengthIP) {\r
816         cerr << "Abnormal case: end of IP has been reached without finding a valid group" << endl;\r
817         throw(Exception(IP_END_NULLCOL,this));\r
818       }\r
819     }    \r
820     /* at that point 2 cases of compat : IP(clock) and AP(i) are equal valid group, or\r
821        are both null columns\r
822     */\r
823     if (! samePatterns(inputPattern,clock,admittance,i)) {\r
824       cout << "AP(" << i << ") and IP(" << clock << ") are not equal" << endl;\r
825       throw(Exception(IP_AP_NOTCOMPAT,this)); // IP and AP not compatible\r
826     }\r
827     clock++;\r
828     i++;\r
829   }\r
830   if (clock < lengthIP) {\r
831     throw(Exception(AP_TOO_SHORT,this));\r
832     cerr << "Abnormal case: AP is to short" << endl;   \r
833   }  \r
834 }\r
835 \r
836 void FunctionalBlock::computeOutputPattern(int nbExec) throw(Exception) {\r
837   static QString fctName = "FunctionalBlock::computeOutputPattern()";\r
838 #ifdef DEBUG_FCTNAME\r
839   cout << "call to " << qPrintable(fctName) << endl;\r
840 #endif\r
841 \r
842   clearOutputPattern();\r
843 \r
844   /* case 1: the block is a generator for which output pattern\r
845      must be computed for a nbExec following executions\r
846   */\r
847 \r
848   if (nbExec > 0) {\r
849     cout << "computing output pattern of " << qPrintable(name) << " for " << nbExec << " executions" << endl;\r
850     foreach(AbstractInterface* iface, getControlOutputs()) {\r
851       FunctionalInterface* connIface = AI_TO_FUN(iface);\r
852       // create output pattern\r
853       QList<char>* pp = productionPattern.value(connIface);\r
854       QList<char>* pattern = new QList<char>(*pp);\r
855       for(int i=1;i<nbExec;i++) pattern->append(*pp);\r
856       // assign pattern to interface\r
857       connIface->setOutputPattern(pattern);\r
858       // store it in QMap\r
859       outputPattern.insert(connIface,pattern);      \r
860     }\r
861   }\r
862   else {\r
863     cout << "computing output pattern of " << qPrintable(name) << endl;\r
864     \r
865     // in case of inputPattern not created, do it\r
866     if (lengthIP <= 0) {\r
867 \r
868       cout << "Strange case: input pattern is not created while it is time to compute output pattern !" << endl;\r
869       // collect the input patterns for each input    \r
870       try {\r
871         createInputPattern();\r
872       }\r
873       catch(Exception e) {\r
874         throw(e);\r
875       }\r
876       cout << "input pattern array initialized with min. len " << lengthIP << endl;\r
877     }\r
878     \r
879     // initialize the output pattern    \r
880     lengthOP = 0;\r
881     foreach(AbstractInterface* iface, getControlOutputs()) {\r
882       FunctionalInterface* connIface = AI_TO_FUN(iface);      \r
883       lengthOP = lengthIP+productionPattern.value(connIface)->size();\r
884       QList<char>* pattern = new QList<char>();\r
885       for(int i=0;i<lengthOP;i++) pattern->append(0);\r
886       connIface->setOutputPattern(pattern);\r
887       outputPattern.insert(connIface,pattern);\r
888     }\r
889     cout << "output pattern array initialized" << endl;\r
890     \r
891     int clock = 0;\r
892     nbExec = 0;\r
893     // search for the beginning of the first execution.\r
894     while ((clock < lengthIP) && (! isValidDataGroup(inputPattern,clock))) clock++;\r
895     cout << "found 1st exec clock: " << clock << endl;\r
896     \r
897     while (clock < lengthIP) {\r
898       // initialize counters for current execution.\r
899       int p = 0; // index in production pattern\r
900       int o = 0; // clock+o will give the clock cycle of each output group\r
901       int cip = 0; // clock+cip give the clock cycle of an input group\r
902       int ccp = 0; // ccp give a column in the consumptio pattern\r
903       int nip = 0; // number of input data groups already consumed during the current execution, used while exploring IP\r
904       int ncp = 0; // number of input data groups already consumed during the current execution, used while exploring CP\r
905       bool cannotCompleteExec = false;\r
906       for(int m=0;m<productionCounter.size();m++) {\r
907         // search for the first production in PP\r
908         while (!isValidDataGroup(productionPattern,p)) {\r
909           p += 1;\r
910           o += 1;\r
911         }\r
912         int gap = 0; // count the number of extra null columns\r
913         // search for PC(m) valid input group in IP\r
914         while (nip < productionCounter.at(m)) {\r
915           if (clock+cip < lengthIP) {\r
916             if (isValidDataGroup(inputPattern,clock+cip)) nip += 1;\r
917             cip += 1;\r
918             gap += 1;\r
919           }\r
920           else {\r
921             cannotCompleteExec = true;\r
922             break;\r
923           }        \r
924         }        \r
925         \r
926         if (cannotCompleteExec) break; // no need to go further since the next search of input data group will lead to go outside inputPattern\r
927         \r
928         // search for PC(m) valid input group in IP\r
929         while (ncp < productionCounter.at(m)) {\r
930           if (isValidDataGroup(consumptionPattern,ccp)) ncp += 1;\r
931           ccp += 1;\r
932           gap -= 1;\r
933         }\r
934         o += gap; // to take into acocunt of extra null columns\r
935         combinePatterns(productionPattern,p,outputPattern,clock+o);\r
936         p += 1;\r
937         o += 1;\r
938       }\r
939       \r
940       if (cannotCompleteExec) break; // no need to go further since the next search of input data group will lead to go outside inputPattern\r
941       \r
942       // current exec. taken into accunt\r
943       nbExec += 1;\r
944       \r
945       // search for the next exec.\r
946       clock += 1;      \r
947       nip = 0;\r
948       while ((clock < lengthIP) && (nip < delta)) {\r
949         if (isValidDataGroup(inputPattern,clock)) nip += 1;\r
950         if (nip < delta) clock += 1;\r
951       }\r
952       cout << "found exec " << nbExec << " at clock: " << clock << endl;\r
953     }\r
954     // find the last valid output data group\r
955     while(! isValidDataGroup(outputPattern,lengthOP-1)) {\r
956       removeDataGroup(outputPattern,lengthOP-1);\r
957       lengthOP -= 1;\r
958     }\r
959 \r
960     // clear input pattern\r
961     clearInputPattern();\r
962   }  \r
963 }\r
964 \r
965 /*\r
966 \r
967 void FunctionalBlock::computeOutputPattern(int nbExec) throw(Exception) {\r
968   static QString fctName = "FunctionalBlock::computeOutputPattern()";\r
969 #ifdef DEBUG_FCTNAME\r
970   cout << "call to " << qPrintable(fctName) << endl;\r
971 #endif\r
972 \r
973   // case 1: the block is a generator for which output pattern\r
974   //   must be computed for a nbExec following executions\r
975 \r
976   if (nbExec > 0) {\r
977     cout << "computing output pattern of " << qPrintable(name) << " for " << nbExec << " executions" << endl;\r
978     foreach(AbstractInterface* iface, getControlOutputs()) {\r
979       FunctionalInterface* connIface = AI_TO_FUN(iface);\r
980       // create output pattern\r
981       QList<char>* pp = productionPattern.value(connIface);\r
982       QList<char>* pattern = new QList<char>(*pp);\r
983       for(int i=1;i<nbExec;i++) pattern->append(*pp);\r
984       // assign pattern to interface\r
985       connIface->setOutputPattern(pattern);\r
986       // store it in QMap\r
987       outputPattern.insert(connIface,pattern);\r
988     }\r
989   }\r
990   else {\r
991     cout << "computing output pattern of " << qPrintable(name) << endl;\r
992 \r
993     // in case of inputPattern not created, do it\r
994     if (lengthIP <= 0) {\r
995       // collect the input patterns for each input\r
996       try {\r
997         createInputPattern();\r
998       }\r
999       catch(Exception e) {\r
1000         throw(e);\r
1001       }\r
1002       cout << "input pattern array initialized with min. len " << lengthIP << endl;\r
1003     }\r
1004 \r
1005     // initialize the output pattern\r
1006     lengthOP = 0;\r
1007     foreach(AbstractInterface* iface, getControlOutputs()) {\r
1008       FunctionalInterface* connIface = AI_TO_FUN(iface);\r
1009       lengthOP = lengthIP+productionPattern.value(connIface)->size();\r
1010       QList<char>* pattern = new QList<char>();\r
1011       for(int i=0;i<lengthOP;i++) pattern->append(0);\r
1012       connIface->setOutputPattern(pattern);\r
1013       outputPattern.insert(connIface,pattern);\r
1014     }\r
1015     cout << "output pattern array initialized" << endl;\r
1016 \r
1017     int clock = 0;\r
1018     nbExec = 0;\r
1019     // search for the beginning of the first execution.\r
1020     while ((clock < lengthIP) && (! isValidDataGroup(inputPattern,clock))) clock++;\r
1021     cout << "found 1st exec clock: " << clock << endl;\r
1022 \r
1023     while (clock < lengthIP) {\r
1024       // initialize counters for current execution.\r
1025       int p = 0; // index in production pattern\r
1026       int o = 0; // clock+o will give the clock cycle of each output group\r
1027       int cip = 0; // clock+cip give the clock cycle of an input group\r
1028       int ccp = 0; // ccp give a column in the consumptio pattern\r
1029       int nip = 0; // number of input data groups already consumed during the current execution, used while exploring IP\r
1030       int ncp = 0; // number of input data groups already consumed during the current execution, used while exploring CP\r
1031       bool cannotCompleteExec = false;\r
1032       for(int m=0;m<productionCounter.size();m++) {\r
1033         // search for the first production in PP\r
1034         while (!isValidDataGroup(productionPattern,p)) {\r
1035           p += 1;\r
1036           o += 1;\r
1037         }\r
1038         int gap = 0; // count the number of extra null columns\r
1039         // search for PC(m) valid input group in IP\r
1040         while (nip < productionCounter.at(m)) {\r
1041           if (clock+cip < lengthIP) {\r
1042             if (isValidDataGroup(inputPattern,clock+cip)) nip += 1;\r
1043             cip += 1;\r
1044             gap += 1;\r
1045           }\r
1046           else {\r
1047             cannotCompleteExec = true;\r
1048             break;\r
1049           }\r
1050         }\r
1051 \r
1052         if (cannotCompleteExec) break; // no need to go further since the next search of input data group will lead to go outside inputPattern\r
1053 \r
1054         // search for PC(m) valid input group in IP\r
1055         while (ncp < productionCounter.at(m)) {\r
1056           if (isValidDataGroup(consumptionPattern,ccp)) ncp += 1;\r
1057           ccp += 1;\r
1058           gap -= 1;\r
1059         }\r
1060         o += gap; // to take into acocunt of extra null columns\r
1061         combinePatterns(productionPattern,p,outputPattern,clock+o);\r
1062         p += 1;\r
1063         o += 1;\r
1064       }\r
1065 \r
1066       if (cannotCompleteExec) break; // no need to go further since the next search of input data group will lead to go outside inputPattern\r
1067 \r
1068       // current exec. taken into accunt\r
1069       nbExec += 1;\r
1070 \r
1071       // search for the next exec.\r
1072       clock += 1;\r
1073       nip = 0;\r
1074       while ((clock < lengthIP) && (nip < delta)) {\r
1075         if (isValidDataGroup(inputPattern,clock)) nip += 1;\r
1076         if (nip < delta) clock += 1;\r
1077       }\r
1078       cout << "found exec " << nbExec << " at clock: " << clock << endl;\r
1079     }\r
1080     // find the last valid output data group\r
1081     while(! isValidDataGroup(outputPattern,lengthOP-1)) {\r
1082       removeDataGroup(outputPattern,lengthOP-1);\r
1083       lengthOP -= 1;\r
1084     }\r
1085 \r
1086     // clear input pattern\r
1087     clearInputPattern();\r
1088   }\r
1089 }\r
1090 */\r
1091 bool FunctionalBlock::samePatterns(const QMap<AbstractInterface*, QList<char>* >& patternSrc, int srcCol, const QMap<AbstractInterface*, QList<char>* >& patternDest, int destCol) {\r
1092   \r
1093   if (patternSrc.size() != patternDest.size()) return false;\r
1094   QMapIterator<AbstractInterface*, QList<char>* > iterSrc(patternSrc);\r
1095   QMapIterator<AbstractInterface*, QList<char>* > iterDest(patternDest);\r
1096   while (iterSrc.hasNext()) {\r
1097     iterSrc.next();\r
1098     iterDest.next();    \r
1099     QList<char>* srcPat = iterSrc.value();\r
1100     QList<char>* destPat = iterDest.value();\r
1101     if (srcCol >= srcPat->size()) return false;\r
1102     if (destCol >= destPat->size()) return false;\r
1103     if (srcPat->at(srcCol) != destPat->at(destCol)) return false;    \r
1104   }\r
1105   return true;\r
1106 }\r
1107 \r
1108 bool FunctionalBlock::samePatterns(const QMap<AbstractInterface*, QList<char>* >& patternSrc, const QList<int> &srcCols, const QMap<AbstractInterface*, QList<char>* >& patternDest, int destCol) {\r
1109   if (patternSrc.size() != srcCols.size()) return false;\r
1110   if (patternSrc.size() != patternDest.size()) return false;\r
1111 \r
1112   QMapIterator<AbstractInterface*, QList<char>* > iterSrc(patternSrc);\r
1113   QListIterator<int> iterSrcCol(srcCols);\r
1114   QMapIterator<AbstractInterface*, QList<char>* > iterDest(patternDest);\r
1115   while (iterSrc.hasNext()) {\r
1116     iterSrc.next();\r
1117     int srcCol = iterSrcCol.next();\r
1118     iterDest.next();\r
1119     QList<char>* srcPat = iterSrc.value();\r
1120     QList<char>* destPat = iterDest.value();\r
1121     if (srcCol >= srcPat->size()) return false;\r
1122     if (destCol >= destPat->size()) return false;\r
1123     if (srcPat->at(srcCol) != destPat->at(destCol)) return false;\r
1124   }\r
1125   return true;\r
1126 }\r
1127 \r
1128 bool FunctionalBlock::canCombinePatterns(const QMap<AbstractInterface*, QList<char>* >& patternSrc, int srcCol, QMap<AbstractInterface*, QList<char>* > patternDest, int destCol) {\r
1129   if (patternSrc.size() != patternDest.size()) return false;\r
1130   QMapIterator<AbstractInterface*, QList<char>* > iterSrc(patternSrc);\r
1131   QMapIterator<AbstractInterface*, QList<char>* > iterDest(patternDest);\r
1132   while (iterSrc.hasNext()) {\r
1133     iterSrc.next();\r
1134     iterDest.next();    \r
1135     QList<char>* srcPat = iterSrc.value();\r
1136     QList<char>* destPat = iterDest.value();\r
1137     if (srcCol >= srcPat->size()) return false;\r
1138     if (destCol >= destPat->size()) return false;\r
1139     if ((srcPat->at(srcCol) == -1) && (destPat->at(destCol) == 1)) return false;\r
1140     if ((srcPat->at(srcCol) == 1) && (destPat->at(destCol) == -1)) return false;\r
1141   }\r
1142   return true;\r
1143 }\r
1144 \r
1145 void FunctionalBlock::combinePatterns(const QMap<AbstractInterface*, QList<char>* >& patternSrc, int srcCol, QMap<AbstractInterface*, QList<char>* > patternDest, int destCol) {\r
1146   if (patternSrc.size() != patternDest.size()) return;\r
1147   QMapIterator<AbstractInterface*, QList<char>* > iterSrc(patternSrc);\r
1148   QMapIterator<AbstractInterface*, QList<char>* > iterDest(patternDest);\r
1149   while (iterSrc.hasNext()) {\r
1150     iterSrc.next();\r
1151     iterDest.next();    \r
1152     QList<char>* srcPat = iterSrc.value();\r
1153     QList<char>* destPat = iterDest.value();\r
1154     if (srcCol >= srcPat->size()) return;\r
1155     if (destCol >= destPat->size()) return;\r
1156     if ((srcPat->at(srcCol) == -1) && (destPat->at(destCol) == 1)) return;\r
1157     if ((srcPat->at(srcCol) == 1) && (destPat->at(destCol) == -1)) return;    \r
1158     destPat->replace(destCol,destPat->at(destCol) | srcPat->at(srcCol));\r
1159   }  \r
1160 }\r
1161 \r
1162 void FunctionalBlock::appendToPattern(const QMap<AbstractInterface*, QList<char>* >& patternSrc, int srcCol, QMap<AbstractInterface*, QList<char>* > patternDest, int nbCols) {\r
1163   if (patternSrc.size() != patternDest.size()) return;\r
1164   QMapIterator<AbstractInterface*, QList<char>* > iterSrc(patternSrc);\r
1165   QMapIterator<AbstractInterface*, QList<char>* > iterDest(patternDest);\r
1166   while (iterSrc.hasNext()) {\r
1167     iterSrc.next();\r
1168     iterDest.next();    \r
1169     QList<char>* srcPat = iterSrc.value();\r
1170     QList<char>* destPat = iterDest.value();    \r
1171     int i=0;\r
1172     while ((srcCol+i < srcPat->size()) && (i<nbCols)) {\r
1173       destPat->append(srcPat->at(srcCol+i));\r
1174       i++;\r
1175     }\r
1176   }  \r
1177 }\r
1178 \r
1179 void FunctionalBlock::removeDataGroup(QMap<AbstractInterface *, QList<char> *> &pattern, int offset) {\r
1180   QMapIterator<AbstractInterface*, QList<char>* > iterSrc(pattern);  \r
1181   while (iterSrc.hasNext()) {\r
1182     iterSrc.next();    \r
1183     QList<char>* srcPat = iterSrc.value();\r
1184     if (offset < srcPat->size()) {\r
1185       srcPat->removeAt(offset);\r
1186     }\r
1187   }\r
1188 }\r
1189 \r
1190 void FunctionalBlock::shiftRightPattern(const QMap<AbstractInterface *, QList<char> *> &pattern, int offset) {\r
1191   QMapIterator<AbstractInterface*, QList<char>* > iterSrc(pattern);  \r
1192   while (iterSrc.hasNext()) {\r
1193     iterSrc.next();    \r
1194     QList<char>* srcPat = iterSrc.value();\r
1195     if (offset < srcPat->size()) {\r
1196       srcPat->insert(offset,0);\r
1197     }\r
1198   }\r
1199 }\r
1200 \r
1201 bool FunctionalBlock::isValidDataGroup(const QMap<AbstractInterface *, QList<char> *> &pattern, int offset) {\r
1202   QMapIterator<AbstractInterface*, QList<char>* > iterSrc(pattern);  \r
1203   while (iterSrc.hasNext()) {\r
1204     iterSrc.next();    \r
1205     QList<char>* srcPat = iterSrc.value();\r
1206     if (offset >= srcPat->size()) return false;\r
1207     if (srcPat->at(offset) == 1) return true;\r
1208   }\r
1209   return false;\r
1210 }\r
1211 \r
1212 bool FunctionalBlock::isValidDataGroup(const QMap<AbstractInterface*, QList<char>* >& pattern, const QList<int> offsets) {\r
1213   QMapIterator<AbstractInterface*, QList<char>* > iterSrc(pattern);\r
1214   QListIterator<int> iterOffsets(offsets);\r
1215   while (iterSrc.hasNext()) {\r
1216     iterSrc.next();\r
1217     int offset = iterOffsets.next();\r
1218     QList<char>* srcPat = iterSrc.value();\r
1219     if (offset >= srcPat->size()) return false;\r
1220     if (srcPat->at(offset) == 1) return true;\r
1221   }\r
1222   return false;\r
1223 }\r
1224 \r
1225 bool FunctionalBlock::isOnlyXDataGroup(const QMap<AbstractInterface *, QList<char> *> &pattern, int offset) {\r
1226   QMapIterator<AbstractInterface*, QList<char>* > iterSrc(pattern);  \r
1227   while (iterSrc.hasNext()) {\r
1228     iterSrc.next();    \r
1229     QList<char>* srcPat = iterSrc.value();\r
1230     if (offset >= srcPat->size()) return false;\r
1231     if (srcPat->at(offset) != -1) return false;\r
1232   }\r
1233   return true;  \r
1234 }\r
1235 \r
1236 void FunctionalBlock::clearConsumptionPattern() {\r
1237   QMapIterator<AbstractInterface*, QList<char>* > iterP(consumptionPattern);  \r
1238   while (iterP.hasNext()) {\r
1239     iterP.next();\r
1240     QList<char>* pattern = iterP.value();\r
1241     if (pattern != NULL) delete pattern;\r
1242   }\r
1243   consumptionPattern.clear();\r
1244   lengthCP = -1;      \r
1245 }  \r
1246 \r
1247 void FunctionalBlock::clearProductionPattern() {\r
1248   QMapIterator<AbstractInterface*, QList<char>* > iterP(productionPattern);  \r
1249   while (iterP.hasNext()) {\r
1250     iterP.next();\r
1251     QList<char>* pattern = iterP.value();\r
1252     if (pattern != NULL) delete pattern;\r
1253   }\r
1254   productionPattern.clear();\r
1255   lengthPP = -1;\r
1256 }  \r
1257 \r
1258 void FunctionalBlock::clearInputPattern() {\r
1259   \r
1260   QMapIterator<AbstractInterface*,QList<char>* > iterI(inputPattern);\r
1261   while (iterI.hasNext()) {\r
1262     iterI.next();\r
1263     QList<char>* pattern = iterI.value();\r
1264     if (pattern != NULL) delete pattern;\r
1265   }\r
1266   inputPattern.clear();\r
1267   lengthIP = -1;\r
1268 }\r
1269 \r
1270 void FunctionalBlock::clearOutputPattern() {\r
1271 \r
1272   QMapIterator<AbstractInterface*,QList<char>* > iterO(outputPattern);\r
1273   while (iterO.hasNext()) {\r
1274     iterO.next();\r
1275     ConnectedInterface* connIface = AI_TO_CON(iterO.key());\r
1276     connIface->resetOutputPattern();\r
1277     QList<char>* pattern = iterO.value();\r
1278     if (pattern != NULL) delete pattern;\r
1279   }\r
1280   outputPattern.clear();\r
1281   lengthOP = -1;\r
1282 }\r
1283 \r
1284 void FunctionalBlock::clearAdmittanceDelays() {\r
1285   QMapIterator<AbstractInterface*, QList<int>* > iterA(admittanceDelays);\r
1286   while (iterA.hasNext()) {\r
1287     iterA.next();\r
1288     QList<int>* d = iterA.value();\r
1289     if (d != NULL) delete d;\r
1290   }\r
1291   admittanceDelays.clear();\r
1292 }\r
1293 \r
1294 int FunctionalBlock::createTriggers() {\r
1295   triggers.clear();\r
1296   /* NB: this method returns the number of executions that have been started\r
1297      but not necessary completed.\r
1298   */\r
1299   if (delta <= 0) return 0;  \r
1300   int offset = 0;\r
1301   // search for the first exec.\r
1302   while ((offset < lengthIP) && (! isValidDataGroup(inputPattern,offset))) offset++;\r
1303   if (offset == lengthIP) return 0;\r
1304   triggers.append(offset);  \r
1305   int nbGroup = 0;\r
1306   for(int i = offset;i<lengthIP;i++) {\r
1307     if (isValidDataGroup(inputPattern,i)) nbGroup++;\r
1308     if (nbGroup == delta+1) {\r
1309       triggers.append(i);\r
1310       nbGroup = 1;\r
1311     }\r
1312   }      \r
1313   return triggers.size();\r
1314 }\r
1315 \r
1316 void FunctionalBlock::generateVHDL(const QString& path) throw(Exception){\r
1317     \r
1318   BlockImplementation* impl = reference->getImplementations().at(0); // for now only take first impl available\r
1319   QFile implFile(impl->getXmlFile());\r
1320 \r
1321   // reading in into QDomDocument\r
1322   QDomDocument document("implFile");\r
1323 \r
1324   if (!implFile.open(QIODevice::ReadOnly)) {\r
1325     throw(Exception(IMPLFILE_NOACCESS));\r
1326   }\r
1327   if (!document.setContent(&implFile)) {\r
1328     implFile.close();\r
1329     throw(Exception(IMPLFILE_NOACCESS));\r
1330   }\r
1331   implFile.close();\r
1332 \r
1333   bool genController = false;\r
1334   QString coreFile = "";\r
1335   QString controllerFile = "";\r
1336 \r
1337   if (reference->isWBConfigurable()) {\r
1338     genController = true;\r
1339     controllerFile = path;\r
1340     controllerFile += "/";\r
1341     controllerFile.append(name);\r
1342     controllerFile.append("_ctrl.vhd");    \r
1343   }\r
1344   else {\r
1345     controllerFile = "nofile.vhd";    \r
1346   }\r
1347   coreFile = path;\r
1348   coreFile += "/";\r
1349   coreFile.append(name);\r
1350   coreFile.append(".vhd");\r
1351 \r
1352   QFile vhdlCore(coreFile);\r
1353   QFile vhdlController(controllerFile);\r
1354 \r
1355   if (!vhdlCore.open(QIODevice::WriteOnly)) {\r
1356     throw(Exception(VHDLFILE_NOACCESS));\r
1357   }\r
1358 \r
1359   if (genController) {\r
1360     if (!vhdlController.open(QIODevice::WriteOnly)) {\r
1361       throw(Exception(VHDLFILE_NOACCESS));\r
1362     }\r
1363   }\r
1364   QTextStream outCore(&vhdlCore);\r
1365   QTextStream outController;\r
1366   if (genController) {\r
1367     outController.setDevice(&vhdlController);\r
1368   }\r
1369 \r
1370   try {\r
1371     //Get the root element\r
1372     QDomElement impl = document.documentElement();\r
1373     QDomElement eltComments = impl.firstChildElement("comments");\r
1374     generateComments(outCore,eltComments, coreFile);\r
1375     QDomElement eltLibs = eltComments.nextSiblingElement("libraries");\r
1376     generateLibraries(outCore, eltLibs);\r
1377     generateEntity(outCore, genController);\r
1378     QDomElement eltArch = eltLibs.nextSiblingElement("architecture");\r
1379     generateArchitecture(outCore, eltArch );\r
1380     if (genController) {\r
1381       generateController(outController);\r
1382     }\r
1383   }\r
1384   catch(Exception err) {\r
1385     throw(err);\r
1386   }\r
1387 \r
1388   vhdlCore.close();\r
1389   vhdlController.close();\r
1390   \r
1391  }\r
1392 \r
1393 void FunctionalBlock::generateComments(QTextStream& out, QDomElement &elt, QString coreFile) throw(Exception) {\r
1394 \r
1395   for(int i = 0; i < 50; i++) {\r
1396     out << "--";\r
1397   }\r
1398   out << "\n--" << endl;\r
1399   QString fileName = coreFile;\r
1400   out << "--  File        : " << fileName << endl;\r
1401   out << "--" << endl;\r
1402   QDomElement eltAuthor = elt.firstChildElement("author");\r
1403   QString firstName = eltAuthor.attribute("firstname","");\r
1404   QString lastName = eltAuthor.attribute("lastname","");\r
1405   QString mail = eltAuthor.attribute("mail","");\r
1406   out << "--  Author(s)   : "<<firstName+" "<<lastName<<" ("<<mail<<")" << endl;\r
1407   out << "--" << endl;\r
1408   QDomElement eltDate = eltAuthor.nextSiblingElement("date");\r
1409   QString crea = eltDate.attribute("creation","");\r
1410   out << "--  Creation Date   : "<<crea<< endl;\r
1411   out << "--" << endl;\r
1412   QDomElement eltRelated = eltDate.nextSiblingElement("related_files");\r
1413   QString relateds = eltRelated.attribute("list","");\r
1414   out << "--  Related files   :\n"<<relateds<<endl;\r
1415   out << "--" << endl;\r
1416   QDomElement eltDesc = eltRelated.nextSiblingElement("description");\r
1417   QDomElement desc = eltDesc.firstChildElement();\r
1418   QString descTxt = desc.text();\r
1419   out << "--  Decription      :\n"<<descTxt<<endl;\r
1420   out << "--" << endl;\r
1421   QDomElement eltNote = eltDesc.nextSiblingElement("description");\r
1422   QDomElement note = eltNote.firstChildElement();\r
1423   QString noteTxt = note.text();\r
1424   out << "--  Note          :\n"<<noteTxt<<endl;\r
1425   out << "--" << endl;\r
1426   for(int i = 0; i < 50; i++) {\r
1427     out << "--";\r
1428   }\r
1429   out << endl << endl;\r
1430 }\r
1431 \r
1432 void FunctionalBlock::generateLibraries(QTextStream& out, QDomElement &elt) throw(Exception) {\r
1433   \r
1434   QDomNodeList listLib = elt.elementsByTagName("library");\r
1435   for(int i = 0; i < listLib.length(); i++) {\r
1436     QDomNode nodeLib = listLib.item(i);\r
1437     QDomElement eltLib = nodeLib.toElement();\r
1438     QString nameLib = eltLib.attribute("name","none");\r
1439     out << "library " << nameLib << ";" << endl;\r
1440     QDomNodeList listPack = eltLib.elementsByTagName("package");\r
1441     for(int j = 0; j < listPack.length(); j++) {\r
1442       QDomNode nodePack = listPack.item(j);\r
1443       QDomElement eltPack = nodePack.toElement();\r
1444       QString namePack = eltPack.attribute("name","none");\r
1445       QString usePack = eltPack.attribute("use","none");\r
1446       out << "use " << nameLib << "." << namePack << "." << usePack << endl;\r
1447     }\r
1448     out << endl;\r
1449   }\r
1450 }\r
1451 \r
1452 void FunctionalBlock::generateEntity(QTextStream& out, bool hasController) throw(Exception) {\r
1453 \r
1454   int i=0;\r
1455   \r
1456   //QList<BlockParameter*> listParams = reference->getParameters();\r
1457   QList<AbstractInterface*> listInputs = getInputs();\r
1458   QList<AbstractInterface*> listOutputs = getOutputs();\r
1459   QList<AbstractInterface*> listBidirs = getBidirs();\r
1460   QString typePort, namePort;\r
1461 \r
1462   out << "entity " << name << " is" << endl;\r
1463 \r
1464 \r
1465   /* TODO : rewrite the generation to take into acocunt the new object hierarchy */\r
1466 \r
1467   // Generation of the generics\r
1468   QList<BlockParameter*> listGenerics = getGenericParameters();\r
1469   if ((!listGenerics.isEmpty()) || (hasController)) {\r
1470     out << "  generic (" << endl;\r
1471     if (hasController) {\r
1472       out << "    wb_data_width : integer = 16;" << endl;\r
1473       out << "    wb_addr_width : integer = 12";\r
1474       if (!listGenerics.isEmpty()) out << ";";\r
1475       out << endl;\r
1476     }\r
1477     for(i=0;i<listGenerics.size()-1;i++) {\r
1478       out << "    " << listGenerics.at(i)->toVHDL(BlockParameter::Entity, 0) << endl;\r
1479     }\r
1480     out << "    " << listGenerics.at(i)->toVHDL(BlockParameter::Entity,BlockParameter::NoComma) << endl;\r
1481 \r
1482     out << "    );" << endl;\r
1483   }\r
1484 \r
1485   out << "  port (" << endl;\r
1486 \r
1487   // Generation of the clk & rst signals\r
1488   out << "    -- clk/rst" << endl;\r
1489   foreach(AbstractInterface* iface, listInputs) {\r
1490     if(iface->getPurpose() == AbstractInterface::Clock || iface->getPurpose() == AbstractInterface::Reset) {\r
1491       out << "    " << iface->getName() << " : in std_logic;" << endl;\r
1492     }\r
1493   }\r
1494 \r
1495   if (hasController) {\r
1496     // Generation of the wishbone signals\r
1497     out << "    -- registers r/w via wishbone" << endl;\r
1498     QList<BlockParameter*> listWB = reference->getWishboneParameters();\r
1499     for(i=0;i<listWB.size()-1;i++) {\r
1500       out << "    " << listWB.at(i)->toVHDL(BlockParameter::Entity, 0) << endl;\r
1501     }\r
1502     out << "    " << listWB.at(i)->toVHDL(BlockParameter::Entity,BlockParameter::NoComma) << endl;\r
1503   }\r
1504 \r
1505 \r
1506   int count = 0;\r
1507   foreach(AbstractInterface* iface, getInterfaces()) {\r
1508     if((iface->getPurpose() == AbstractInterface::Data)||(iface->getPurpose() == AbstractInterface::Control)) count++;\r
1509   }\r
1510   // Generation of the data/control signals\r
1511 \r
1512   int flag = 0;\r
1513   bool first = true;\r
1514 \r
1515   foreach(AbstractInterface* iface, listInputs) {\r
1516     if(iface->getPurpose() == AbstractInterface::Data) {\r
1517       if (first) {\r
1518         out << "    -- input data ports" << endl;\r
1519         first = false;\r
1520       }\r
1521       count--;\r
1522       if (count == 0) flag = AbstractInterface::NoComma;\r
1523       out << "    " << iface->toVHDL(AbstractInterface::Entity, flag) << endl;\r
1524     }\r
1525   }\r
1526   first = true;\r
1527   foreach(AbstractInterface* iface, listInputs) {\r
1528     if(iface->getPurpose() == AbstractInterface::Control) {\r
1529       if (first) {\r
1530         out << "    -- input control ports" << endl;\r
1531         first = false;\r
1532       }\r
1533       count--;\r
1534       if (count == 0) flag = AbstractInterface::NoComma;\r
1535       out << "    " << iface->toVHDL(AbstractInterface::Entity, flag) << endl;\r
1536     }\r
1537   }\r
1538   first = true;\r
1539   foreach(AbstractInterface* iface, listOutputs) {\r
1540     if(iface->getPurpose() == AbstractInterface::Data) {\r
1541       if (first) {\r
1542         out << "    -- output data ports" << endl;\r
1543         first = false;\r
1544       }\r
1545       count--;\r
1546       if (count == 0) flag = AbstractInterface::NoComma;\r
1547       out << "    " << iface->toVHDL(AbstractInterface::Entity, flag) << endl;\r
1548     }\r
1549   }\r
1550   first = true;\r
1551   foreach(AbstractInterface* iface, listOutputs) {\r
1552     if(iface->getPurpose() == AbstractInterface::Control) {\r
1553       if (first) {\r
1554         out << "    -- output control ports" << endl;\r
1555         first = false;\r
1556       }\r
1557       count--;\r
1558       if (count == 0) flag = AbstractInterface::NoComma;\r
1559       out << "    " << iface->toVHDL(AbstractInterface::Entity, flag) << endl;\r
1560     }\r
1561   }\r
1562   first = true;\r
1563   foreach(AbstractInterface* iface, listBidirs) {\r
1564     if(iface->getPurpose() == AbstractInterface::Data) {\r
1565       if (first) {\r
1566         out << "    -- bidirs data ports" << endl;\r
1567         first = false;\r
1568       }\r
1569       count--;\r
1570       if (count == 0) flag = AbstractInterface::NoComma;\r
1571       out << "    " << iface->toVHDL(AbstractInterface::Entity, flag) << endl;\r
1572     }\r
1573   }\r
1574   out << "    );" << endl << endl;\r
1575   out << "end " << name << ";" << endl << endl;\r
1576 }\r
1577 \r
1578 void FunctionalBlock::generateArchitecture(QTextStream& out, QDomElement &elt ) throw(Exception) {\r
1579   QString expr;\r
1580   QString code = elt.text();\r
1581   cout << qPrintable(code) << endl;\r
1582   out << "architecture rtl of " << name << " is" << endl;\r
1583 \r
1584   QStringList listLine = code.split("\n");\r
1585   for(int i =0; i < listLine.size(); i++) {\r
1586     QString line = listLine.at(i).simplified();\r
1587 \r
1588     /*\r
1589     if(listLine.at(i).contains(QRegularExpression("@foreach{"))) {\r
1590       while(listLine.at(i).compare("@endforeach") != -1) {\r
1591         expr = expr + listLine.at(i) + '\n';\r
1592         i++;\r
1593       }\r
1594       expr = expr + listLine.at(i);\r
1595       out << evalComplex(expr, 1) << '\n';\r
1596     }\r
1597     if(listLine.at(i).contains(QRegularExpression("@caseeach{"))) {\r
1598       while(listLine.at(i).compare("@endcaseeach") != -1) {\r
1599         expr = expr + listLine.at(i) + '\n';\r
1600         i++;\r
1601       }\r
1602       expr = expr + listLine.at(i);\r
1603       out << evalComplex(expr, 2) << '\n';\r
1604     }\r
1605 */\r
1606     if(line.contains("@{")) {\r
1607       out << line << endl;\r
1608     }\r
1609   }\r
1610 }\r
1611 \r
1612 void FunctionalBlock::generateController(QTextStream &out) throw(Exception) {\r
1613   \r
1614 }\r
1615 \r