ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE-4/src/selection/SelectionCompiler.cpp
(Generate patch)

Comparing trunk/OOPSE-4/src/selection/SelectionCompiler.cpp (file contents):
Revision 1965 by tim, Wed Feb 2 23:13:11 2005 UTC vs.
Revision 2147 by tim, Tue Apr 5 23:09:48 2005 UTC

# Line 82 | Line 82 | bool SelectionCompiler::internalCompile(){
82      for ( ; true; ichToken += cchToken) {
83          if (lookingAtLeadingWhitespace())
84              continue;
85 <        if (lookingAtComment())
86 <            continue;
85 >        //if (lookingAtComment())
86 >        //    continue;
87          bool endOfLine = lookingAtEndOfLine();
88          if (endOfLine || lookingAtEndOfStatement()) {
89              if (tokCommand != Token::nada) {
# Line 118 | Line 118 | bool SelectionCompiler::internalCompile(){
118              //    continue;
119              //}
120              if (lookingAtDecimal((tokCommand & Token::negnums) != 0)) {
121 <                float value = lexi_cast<float>(script.substr(ichToken, ichToken + cchToken));          
122 <                ltoken.push_back(Token(Token::decimal, value));/**@todo*/
121 >                float value = lexi_cast<float>(script.substr(ichToken, cchToken));        
122 >                ltoken.push_back(Token(Token::decimal, boost::any(value)));
123                  continue;
124              }
125              if (lookingAtInteger((tokCommand & Token::negnums) != 0)) {
126 <                std::string intString = script.substr(ichToken, ichToken + cchToken);
127 <                int val = lexi_cast<int>(intString);
128 <                ltoken.push_back(Token(Token::integer, val, intString));/**@todo*/
126 >
127 >                int val = lexi_cast<int>(script.substr(ichToken, cchToken));
128 >                ltoken.push_back(Token(Token::integer,   boost::any(val)));
129                  continue;
130              }
131          }
132        
133          if (lookingAtLookupToken()) {
134 <            std::string ident = script.substr(ichToken, ichToken + cchToken);
135 <
134 >            std::string ident = script.substr(ichToken, cchToken);
135              Token token;            
136              Token* pToken = TokenMap::getInstance()->getToken(ident);
137              if (pToken != NULL) {
# Line 243 | Line 242 | bool SelectionCompiler::internalCompile(){
242        previousCharBackslash = ch == '\\' ? !previousCharBackslash : false;
243      }
244      cchToken = ichT - ichToken;
245 +
246      return true;
247    }
248  
# Line 340 | Line 340 | bool SelectionCompiler::lookingAtDecimal(bool allowNeg
340          return false;
341      }
342  
343 <    // to support 1.ca, let's check the character after the dot
344 <    // to determine if it is an alpha
345 <    if (ch == '.' && (ichT + 1 < cchScript) && std::isalpha(script[ichT + 1])) {
343 >    // to support DMPC.1, let's check the character before the dot
344 >    if (ch == '.' && (ichT > 0) && std::isalpha(script[ichT - 1])) {
345          return false;
346      }
347  
# Line 385 | Line 384 | bool SelectionCompiler::lookingAtLookupToken() {
384          case '(':
385          case ')':
386          case ',':
388        case '*':
389        case '-':
387          case '[':
388          case ']':
392        case '+':
393        case ':':
394        case '@':
395        case '.':
396        case '%':
389          break;
390          case '&':
391          case '|':
# Line 418 | Line 410 | bool SelectionCompiler::lookingAtLookupToken() {
410              if ((ch < 'a' || ch > 'z') && (ch < 'A' && ch > 'Z') && ch != '_') {
411                  return false;
412              }
413 +        case '*':
414          case '?': // include question marks in identifier for atom expressions
415 <            while (ichT < cchScript && (std::isalpha(ch = script[ichT]) ||std::isdigit(ch) ||
416 <                ch == '_' || ch == '?') ||(ch == '^' && ichT > ichToken && std::isdigit(script[ichT - 1]))) {
417 <                // hack for insertion codes embedded in an atom expression :-(
425 <                // select c3^a
415 >            while (ichT < cchScript && !std::isspace(ch = script[ichT]) &&
416 >                    (std::isalpha(ch) ||std::isdigit(ch) || ch == '_' || ch == '.' || ch == '*' || ch == '?' || ch == '+' || ch == '-' || ch == '[' || ch == ']') ){
417 >
418                  ++ichT;
419              }
420          break;
421      }
422 +
423      cchToken = ichT - ichToken;
424 +
425      return true;
426   }
427  
# Line 560 | Line 554 | bool SelectionCompiler::clausePrimitive() {
554      switch (tok) {
555          case Token::within:
556              return clauseWithin();
557 <        case Token::name :
558 <            return clauseName(Token::name);
559 <        case Token::index :
560 <            return clauseIndex(Token::index);
561 <        case Token::molname :
562 <            return clauseName(Token::molname);
563 <        case Token::molindex :
570 <            return clauseIndex(Token::molindex);
571 <            
557 >
558 >        case Token::asterisk:
559 >        case Token::identifier:
560 >            return clauseChemObjName();
561 >
562 >        case Token::integer :
563 >            return clauseIndex();
564          default:
565              if ((tok & Token::atomproperty) == Token::atomproperty) {
566                  return clauseComparator();
# Line 601 | Line 593 | bool SelectionCompiler::clauseComparator() {
593      }
594  
595      Token tokenValue = tokenNext();
596 <    if (tokenValue.tok != Token::integer) {
597 <        return integerExpected();
596 >    if (tokenValue.tok != Token::integer && tokenValue.tok != Token::decimal) {
597 >        return numberExpected();
598      }
599 <    int val = tokenValue.intValue;
600 <    // note that a comparator instruction is a complicated instruction
601 <    // int intValue is the tok of the property you are comparing
602 <    // the value against which you are comparing is stored as an Integer
603 <    // in the object value
599 >    
600 >    float val;
601 >    if (tokenValue.value.type() == typeid(int)) {
602 >        val = boost::any_cast<int>(tokenValue.value);
603 >    } else if (tokenValue.value.type() == typeid(float)) {
604 >        val = boost::any_cast<float>(tokenValue.value);
605 >    } else {
606 >        return false;
607 >    }
608 >
609 >    boost::any floatVal;
610 >    floatVal = val;
611      return addTokenToPostfix(Token(tokenComparator.tok,
612 <                       tokenAtomProperty.tok, boost::any(val)));
612 >                       tokenAtomProperty.tok, floatVal));
613   }
614  
615   bool SelectionCompiler::clauseWithin() {
# Line 623 | Line 622 | bool SelectionCompiler::clauseWithin() {
622      Token tokenDistance = tokenNext();       // distance
623      switch(tokenDistance.tok) {
624          case Token::integer:
626            distance = float(tokenDistance.intValue);
627            break;
625          case Token::decimal:
626              distance = tokenDistance.value;
627              break;
# Line 647 | Line 644 | bool SelectionCompiler::clauseWithin() {
644      return addTokenToPostfix(Token(Token::within, distance));
645   }
646  
647 + bool SelectionCompiler::clauseChemObjName() {
648 +    Token token = tokenNext();
649 +    if (token.tok == Token::identifier && token.value.type() == typeid(std::string)) {
650  
651 < bool SelectionCompiler:: clauseName(int tok) {
652 <    Token tokenName = tokenNext();
653 <    std::string name = boost::any_cast<std::string>(tokenName.value);
654 <    return addTokenToPostfix(Token(tok, name)); /**@todo */
651 >        std::string name = boost::any_cast<std::string>(token.value);
652 >        if (isNameValid(name)) {
653 >            return addTokenToPostfix(Token(Token::name, name));
654 >        } else {
655 >            return compileError("invalid name: " + name);
656 >        }
657 >    }
658  
659 +    return false;
660 +        
661   }
662  
663 < bool SelectionCompiler:: clauseIndex(int tok) {
664 <    //return addTokenToPostfix(Token(tok, )); /**@todo*/
665 <    return true;
663 > bool SelectionCompiler::isNameValid(const std::string& name) {
664 >          int nbracket = 0;
665 >    int ndot = 0;
666 >    for (int i =0 ; i < name.size(); ++i) {
667 >        switch(name[i]) {
668 >
669 >          case '[' :
670 >              ++nbracket;
671 >              break;
672 >          case ']' :
673 >              --nbracket;
674 >              break;
675 >          case '.' :
676 >              ++ndot;
677 >              break;      
678 >        }
679 >    }
680 >
681 >    //only allow 3 dots at most
682 >    return (ndot <=3 && nbracket == 0) ? true : false;
683   }
684  
685 + bool SelectionCompiler::clauseIndex(){
686 +    Token token = tokenNext();
687 +    if (token.tok == Token::integer) {
688 +        int index = boost::any_cast<int>(token.value);
689 +        int tok = tokPeek();
690 +        std::cout << "Token::to is " << Token::to << ", tok = " << tok << std::endl;
691 +        if (tok == Token::to) {
692 +            tokenNext();
693 +            tok = tokPeek();
694 +            if (tok != Token::integer) {
695 +                return numberExpected();
696 +            }
697 +            
698 +            boost::any intVal = tokenNext().value;
699 +            int first = index;
700 +            if (intVal.type() != typeid(int)){
701 +                return false;
702 +            }
703 +            int second = boost::any_cast<int>(intVal);
704 +
705 +            return addTokenToPostfix(Token(Token::index, boost::any(std::make_pair(first, second))));
706 +            
707 +        }else {
708 +            return addTokenToPostfix(Token(Token::index, boost::any(index)));
709 +        }
710 +    } else {
711 +        return numberExpected();
712 +    }
713   }
714 +
715 + }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines