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