Exemplo n.º 1
0
  /**
   * Class constructor.
   *
   * @param returns the number of values to return
   */
  public StrCpyInstruction(int returns) {
    if (PageExInfo.in())
      throw new NslContextException(
          EnumSet.of(NslContext.Section, NslContext.Function, NslContext.Global), name);
    if (returns != 1) throw new NslReturnValueException(name, 1);

    ArrayList<Expression> paramsList = Expression.matchList();
    int paramsCount = paramsList.size();
    if (paramsCount < 1 || paramsCount > 3) throw new NslArgumentException(name, 1, 3);

    this.string = paramsList.get(0);

    if (paramsCount > 1) {
      this.maxLen = paramsList.get(1);

      if (paramsCount > 2) {
        this.startOffset = paramsList.get(2);
      } else {
        this.startOffset = null;
      }
    } else {
      this.maxLen = null;
      this.startOffset = null;
    }
  }
Exemplo n.º 2
0
  /** Class constructor. */
  public SwitchStatement() {
    if (!SectionInfo.in() && !FunctionInfo.in())
      throw new NslContextException(EnumSet.of(NslContext.Section, NslContext.Function), "switch");

    int lineNo = ScriptParser.tokenizer.lineno();
    ScriptParser.tokenizer.matchOrDie('(');
    this.switchExpression = Expression.matchComplex();
    ScriptParser.tokenizer.matchOrDie(')');
    ScriptParser.tokenizer.matchOrDie('{');

    // Set non-null values so that the block statement can contain break statements.
    CodeInfo.getCurrent().setBreakLabel(RelativeJump.Zero);

    this.statementList = new ArrayList<Statement>();
    this.casesList = new ArrayList<SwitchCaseStatement>();
    this.defaultCase = null;

    // Get the statements including case statements.
    while (true) {
      if (ScriptParser.tokenizer.match("case")) {
        Statement statement = new SwitchCaseStatement();
        if (this.defaultCase != null)
          throw new NslException(
              "The \"default\" case in a \"switch\" statement must be the last case", true);
        this.casesList.add((SwitchCaseStatement) statement);
        this.statementList.add(statement);
      } else if (ScriptParser.tokenizer.match("default")) {
        this.defaultCase = new SwitchDefaultCaseStatement();
        this.statementList.add(this.defaultCase);
      } else {
        Statement statement = Statement.match();
        if (statement == null) break;
        this.statementList.add(statement);
      }
    }

    // No cases?
    if (this.casesList.isEmpty())
      throw new NslException(
          "A \"switch\" statement must have at least one \"case\" statement", true);

    // Validate switch cases for jump instructions.
    if (this.switchExpression instanceof JumpExpression)
      ((JumpExpression) this.switchExpression).checkSwitchCases(this.casesList, lineNo);

    // Check the last statement is a break statement.
    boolean noBreak = true;
    if (!this.statementList.isEmpty()) {
      Statement last = this.statementList.get(this.statementList.size() - 1);
      if (last instanceof BlockStatement) last = ((BlockStatement) last).getLast();
      if (last instanceof BreakStatement) noBreak = false;
    }
    if (noBreak)
      throw new NslException("A \"switch\" statement must end with a \"break\" statement", true);

    CodeInfo.getCurrent().setBreakLabel(null);

    ScriptParser.tokenizer.matchOrDie('}');
  }
  /**
   * Class constructor.
   *
   * @param returns the number of values to return
   */
  public GetErrorLevelInstruction(int returns) {
    if (!SectionInfo.in() && !FunctionInfo.in())
      throw new NslContextException(EnumSet.of(NslContext.Section, NslContext.Function), name);
    if (returns != 1) throw new NslReturnValueException(name, 1);

    ArrayList<Expression> paramsList = Expression.matchList();
    if (!paramsList.isEmpty()) throw new NslArgumentException(name, 0);
  }
  /**
   * Class constructor.
   *
   * @param returns the number of values to return
   */
  public FlushINIInstruction(int returns) {
    if (!SectionInfo.in() && !FunctionInfo.in())
      throw new NslContextException(EnumSet.of(NslContext.Section, NslContext.Function), name);
    if (returns > 0) throw new NslReturnValueException(name);

    ArrayList<Expression> paramsList = Expression.matchList();
    if (paramsList.size() != 1) throw new NslArgumentException(name, 1);

    this.iniFile = paramsList.get(0);
  }
  /**
   * Class constructor.
   *
   * @param returns the number of values to return
   */
  public LockWindowInstruction(int returns) {
    if (!SectionInfo.in() && !FunctionInfo.in())
      throw new NslContextException(EnumSet.of(NslContext.Section, NslContext.Function), name);
    if (returns > 0) throw new NslReturnValueException(name);

    ArrayList<Expression> paramsList = Expression.matchList();
    if (paramsList.size() != 1) throw new NslArgumentException(name, 1);

    this.value = paramsList.get(0);
    if (!ExpressionType.isString(this.value))
      throw new NslArgumentException(name, 1, ExpressionType.String);
  }
Exemplo n.º 6
0
 /**
  * Assembles the source code.
  *
  * @param var the variable to assign the value to
  */
 @Override
 public void assemble(Register var) throws IOException {
   Expression varOrString = AssembleExpression.getRegisterOrExpression(this.string);
   if (this.maxLen != null) {
     Expression varOrMaxLen = AssembleExpression.getRegisterOrExpression(this.maxLen);
     if (this.startOffset != null) {
       Expression varOrStartOffset = AssembleExpression.getRegisterOrExpression(this.startOffset);
       ScriptParser.writeLine(
           name + " " + var + " " + varOrString + " " + varOrMaxLen + " " + varOrStartOffset);
       varOrStartOffset.setInUse(false);
     } else {
       ScriptParser.writeLine(name + " " + var + " " + varOrString + " " + varOrMaxLen);
     }
     varOrMaxLen.setInUse(false);
   } else {
     ScriptParser.writeLine(name + " " + var + " " + varOrString);
   }
   varOrString.setInUse(false);
 }
 /** Assembles the source code. */
 @Override
 public void assemble() throws IOException {
   Expression varOrIniFile = AssembleExpression.getRegisterOrExpression(this.iniFile);
   ScriptParser.writeLine(name + " " + varOrIniFile);
   varOrIniFile.setInUse(false);
 }
  /**
   * Class constructor.
   *
   * @param returns the number of values to return
   */
  public CreateFontInstruction(int returns) {
    if (PageExInfo.in())
      throw new NslContextException(
          EnumSet.of(NslContext.Section, NslContext.Function, NslContext.Global), name);
    if (returns != 1) throw new NslReturnValueException(name);

    ArrayList<Expression> paramsList = Expression.matchList();
    int paramsCount = paramsList.size();
    if (paramsCount < 1 || paramsCount > 6) throw new NslArgumentException(name, 1, 6);

    this.fontFace = paramsList.get(0);
    if (!ExpressionType.isString(this.fontFace))
      throw new NslArgumentException(name, 1, ExpressionType.String);

    if (paramsCount > 1) {
      this.height = paramsList.get(1);
      if (!ExpressionType.isInteger(this.height))
        throw new NslArgumentException(name, 2, ExpressionType.Integer);

      if (paramsCount > 2) {
        this.weight = paramsList.get(2);
        if (!ExpressionType.isInteger(this.weight))
          throw new NslArgumentException(name, 3, ExpressionType.Integer);

        if (paramsCount > 3) {
          this.italic = paramsList.get(3);
          if (!ExpressionType.isBoolean(this.italic))
            throw new NslArgumentException(name, 4, ExpressionType.Boolean);

          if (paramsCount > 4) {
            this.underline = paramsList.get(4);
            if (!ExpressionType.isBoolean(this.underline))
              throw new NslArgumentException(name, 5, ExpressionType.Boolean);

            if (paramsCount > 5) {
              this.strike = paramsList.get(5);
              if (!ExpressionType.isBoolean(this.strike))
                throw new NslArgumentException(name, 6, ExpressionType.Boolean);
            } else {
              this.strike = null;
            }
          } else {
            this.underline = null;
            this.strike = null;
          }
        } else {
          this.italic = null;
          this.underline = null;
          this.strike = null;
        }
      } else {
        this.weight = null;
        this.italic = null;
        this.underline = null;
        this.strike = null;
      }
    } else {
      this.height = null;
      this.weight = null;
      this.italic = null;
      this.underline = null;
      this.strike = null;
    }
  }
Exemplo n.º 9
0
  /**
   * Assembles the source code.
   *
   * @throws IOException
   */
  @Override
  public void assemble() throws IOException {
    // Do not assemble anything if there are no cases!
    if (this.casesList.isEmpty()) return;

    // Give each case a label.
    for (SwitchCaseStatement statement : this.casesList)
      statement.setLabel(LabelList.getCurrent().getNext());
    if (this.defaultCase != null) this.defaultCase.setLabel(LabelList.getCurrent().getNext());

    Label gotoEnd = LabelList.getCurrent().getNext();
    Label gotoStart = LabelList.getCurrent().getNext();

    // Go to the jump table which is assembled after the switch case labels and
    // statements.
    ScriptParser.writeLine("Goto " + gotoStart);

    // Using "break;" inside a switch jumps to the end.
    Label parentBreak = CodeInfo.getCurrent().setBreakLabel(gotoEnd);

    // Assemble all the statements inside the switch { }. This includes the
    // case labels.
    for (Statement statement : this.statementList) statement.assemble();

    // Restore the parent break label.
    CodeInfo.getCurrent().setBreakLabel(parentBreak);

    // Label at the top of the jump table.
    gotoStart.write();

    // Jump instructions can jump directly to the case labels.
    if (this.switchExpression instanceof JumpExpression) {
      ((JumpExpression) this.switchExpression).assemble(this.casesList);
    }
    // Other expressions we just assemble them if required and compare their
    // result.
    else {
      Expression varOrSwitchExpression =
          AssembleExpression.getRegisterOrExpression(this.switchExpression);
      for (SwitchCaseStatement caseStatement : this.casesList) {
        // Type is an integer; use IntCmp.
        if (caseStatement.getMatch().getType().equals(ExpressionType.Integer)) {
          ScriptParser.writeLine(
              String.format(
                  "IntCmp %s %s %s",
                  varOrSwitchExpression, caseStatement.getMatch(), caseStatement.getLabel()));
        }
        // Type is a string; use StrCmp or StrCmpS (if special `` quotes were
        // used).
        else {
          ScriptParser.writeLine(
              String.format(
                  "StrCmp%s %s %s %s",
                  caseStatement.getMatch().getType().equals(ExpressionType.StringSpecial)
                      ? "S"
                      : "",
                  varOrSwitchExpression,
                  caseStatement.getMatch(),
                  caseStatement.getLabel()));
        }
      }
      varOrSwitchExpression.setInUse(false);
    }

    // Default case jump.
    if (this.defaultCase != null) ScriptParser.writeLine("Goto " + this.defaultCase.getLabel());

    gotoEnd.write();
  }