Exemple #1
0
 public void Parse() {
   la = new Token();
   la.val = "";
   Get();
   MaximaExpression();
   Expect(0);
 }
 @Override
 public String toString() {
   StringBuilder b = new StringBuilder();
   for (Token t : left) {
     b.append(t.val()).append(" ");
   }
   b.append("compiled: ").append(hasBeenCompiled).append("; errors? ").append(compilerError);
   return b.toString();
 }
 private boolean compileLeft() {
   cleft = new ArrayList<Construct>();
   if (label != null && label.startsWith("!")) {
     if (label.length() > 1) {
       label = label.substring(1);
     }
     nolog = true;
   }
   for (int i = 0; i < left.size(); i++) {
     Token t = left.get(i);
     if (t.value.startsWith("/")) {
       cleft.add(new Command(t.val(), t.target));
     } else if (t.type == Token.TType.VARIABLE) {
       cleft.add(new Variable(t.val(), null, t.target));
     } else if (t.type.equals(TType.FINAL_VAR)) {
       Variable v = new Variable(t.val(), null, t.target);
       v.setFinal(true);
       cleft.add(v);
     } else if (t.type.equals(TType.LSQUARE_BRACKET)) {
       if (i + 2 < left.size() && left.get(i + 2).type.equals(TType.OPT_VAR_ASSIGN)) {
         Variable v = new Variable(left.get(i + 1).val(), left.get(i + 3).val(), t.target);
         v.setOptional(true);
         if (left.get(i + 1).type.equals(TType.FINAL_VAR)) {
           v.setFinal(true);
         }
         cleft.add(v);
         i += 4;
       } else {
         t = left.get(i + 1);
         Variable v = new Variable(t.val(), null, t.target);
         v.setOptional(true);
         if (t.val().equals("$")) {
           v.setFinal(true);
         }
         cleft.add(v);
         i += 2;
       }
     } else {
       cleft.add(new CString(t.val(), t.getTarget()));
     }
   }
   return true;
 }
  private boolean verifyLeft() throws ConfigCompileException {
    boolean inside_opt_var = false;
    boolean after_no_def_opt_var = false;
    String lastVar = null;
    // Go through our token list and readjust non-spaced symbols. Any time we combine a symbol,
    // the token becomes a string
    List<Token> tempLeft = new ArrayList<Token>();
    for (int i = 0; i < left.size(); i++) {
      Token t = left.get(i);
      if (i == 0 && t.type == TType.NEWLINE) {
        continue;
      }
      if (t.type.isSymbol() && left.size() - 1 > i && left.get(i + 1).type != TType.WHITESPACE) {
        StringBuilder b = new StringBuilder();
        b.append(t.value);
        i++;
        Token m = left.get(i);
        while (m.type.isSymbol() && m.type != TType.WHITESPACE) {
          b.append(m.value);
          i++;
          m = left.get(i);
        }

        if (m.type != TType.WHITESPACE && m.type != TType.LABEL) {
          b.append(m.value);
        }
        t = new Token(TType.STRING, b.toString(), t.target);
        if (m.type == TType.LABEL) {
          tempLeft.add(t);
          tempLeft.add(m);
          continue;
        }
      }
      // Go ahead and toString the other symbols too
      if (t.type.isSymbol()) {
        t = new Token(TType.STRING, t.value, t.target);
      }
      if (t.type != TType.WHITESPACE) {
        tempLeft.add(t);
      }
    }
    // Look through and concatenate all tokens before the label, if such exists.
    boolean hasLabel = false;
    for (int i = 0; i < tempLeft.size(); i++) {
      if (tempLeft.get(i).type == TType.LABEL) {
        hasLabel = true;
        break;
      }
    }
    if (hasLabel) {
      StringBuilder b = new StringBuilder();
      int count = 0;
      while (tempLeft.get(count).type != TType.LABEL) {
        b.append(tempLeft.get(count).val());
        count++;
      }
      tempLeft.set(0, new Token(TType.STRING, b.toString(), Target.UNKNOWN));
      for (int i = 0; i < count - 1; i++) {
        tempLeft.remove(1);
      }
    }
    left = tempLeft;
    for (int j = 0; j < left.size(); j++) {
      Token t = left.get(j);
      // Token prev_token = j - 2 >= 0?c.tokens.get(j - 2):new Token(TType.UNKNOWN, "", t.line_num);
      Token last_token = j - 1 >= 0 ? left.get(j - 1) : new Token(TType.UNKNOWN, "", t.getTarget());
      Token next_token =
          j + 1 < left.size() ? left.get(j + 1) : new Token(TType.UNKNOWN, "", t.getTarget());
      Token after_token =
          j + 2 < left.size() ? left.get(j + 2) : new Token(TType.UNKNOWN, "", t.getTarget());

      if (j == 0) {
        if (next_token.type == TType.LABEL) {
          this.label = t.val();
          j--;
          left.remove(0);
          left.remove(0);
          continue;
        }
      }

      if (t.type == TType.LABEL) {
        continue;
      }

      if (t.type.equals(TType.FINAL_VAR) && left.size() - j >= 5) {
        throw new ConfigCompileException(
            "FINAL_VAR must be the last argument in the alias", t.target);
      }
      if (t.type.equals(TType.VARIABLE) || t.type.equals(TType.FINAL_VAR)) {
        Variable v = new Variable(t.val(), null, t.target);
        lastVar = t.val();
        v.setOptional(last_token.type.equals(TType.LSQUARE_BRACKET));
        left_vars.put(t.val(), v);
        if (v.isOptional()) {
          after_no_def_opt_var = true;
        } else {
          v.setDefault("");
        }
      }
      // We're looking for a command up front
      if (j == 0 && !t.value.startsWith("/")) {
        if (!(next_token.type == TType.LABEL && after_token.type == TType.COMMAND)) {
          throw new ConfigCompileException(
              "Expected command (/command) at start of alias."
                  + " Instead, found "
                  + t.type
                  + " ("
                  + t.val()
                  + ")",
              t.target);
        }
      }
      if (last_token.type.equals(TType.LSQUARE_BRACKET)) {
        inside_opt_var = true;
        if (!(t.type.equals(TType.FINAL_VAR) || t.type.equals(TType.VARIABLE))) {
          throw new ConfigCompileException(
              "Unexpected "
                  + t.type.toString()
                  + " ("
                  + t.val()
                  + "), was expecting"
                  + " a $variable",
              t.target);
        }
      }
      if (after_no_def_opt_var && !inside_opt_var) {
        if (t.type.equals(TType.VARIABLE) || t.type.equals(TType.FINAL_VAR)) {
          throw new ConfigCompileException(
              "You cannot have anything other than optional arguments after your"
                  + " first optional argument.",
              t.target);
        }
      }
      if (!t.type.equals(TType.LSQUARE_BRACKET)
          && !t.type.equals(TType.OPT_VAR_ASSIGN)
          && !t.type.equals(TType.RSQUARE_BRACKET)
          && !t.type.equals(TType.VARIABLE)
          && !t.type.equals(TType.LIT)
          && !t.type.equals(TType.COMMAND)
          && !t.type.equals(TType.FINAL_VAR)) {
        if (j - 1 > 0
            && !(
            /*t.type.equals(TType.STRING) &&*/ left.get(j - 1).type.equals(TType.OPT_VAR_ASSIGN))) {
          throw new ConfigCompileException("Unexpected " + t.type + " (" + t.val() + ")", t.target);
        }
      }
      if (last_token.type.equals(TType.COMMAND)) {
        if (!(t.type.equals(TType.VARIABLE)
            || t.type.equals(TType.LSQUARE_BRACKET)
            || t.type.equals(TType.FINAL_VAR)
            || t.type.equals(TType.LIT))) {
          throw new ConfigCompileException(
              "Unexpected " + t.type + " (" + t.val() + ") after command", t.target);
        }
      }
      if (inside_opt_var && t.type.equals(TType.OPT_VAR_ASSIGN)) {
        if (!((next_token.type.equals(TType.STRING) || next_token.type.equals(TType.LIT))
                && after_token.type.equals(TType.RSQUARE_BRACKET)
            || (next_token.type.equals(TType.RSQUARE_BRACKET)))) {
          throw new ConfigCompileException("Unexpected token in optional variable", t.target);
        } else if (next_token.type.equals(TType.STRING) || next_token.type.equals(TType.LIT)) {
          left_vars.get(lastVar).setDefault(next_token.val());
        }
      }
      if (t.type.equals(TType.RSQUARE_BRACKET)) {
        if (!inside_opt_var) {
          throw new ConfigCompileException("Unexpected " + t.type.toString(), t.target);
        }
        inside_opt_var = false;
        //                if (last_token.type.equals(TType.VARIABLE)
        //                        || last_token.type.equals(TType.FINAL_VAR)) {
        //                    after_no_def_opt_var = true;
        //                }
      }
    }

    return true;
  }