Examples with Source org.graalvm.polyglot.Source used on opensource projects

Example 66 with Source

use of org.graalvm.polyglot.Source in project graal by oracle.

the class SLDebugTest method testNull.

@Test
public void testNull() throws Throwable {
    final Source factorial = slCode("function main() {\n" + "  res = doNull();\n" + "  return res;\n" + "}\n" + "function doNull() {}\n");
    try (DebuggerSession session = startSession()) {
        session.suspendNextExecution();
        startEval(factorial);
        expectSuspended((SuspendedEvent event) -> {
            checkState(event, "main", 2, true, "res = doNull()").prepareStepInto(1);
        });
        expectSuspended((SuspendedEvent event) -> {
            checkState(event, "main", 3, true, "return res", "res", "NULL").prepareContinue();
        });
        assertEquals("NULL", expectDone());
    }
}

Example 67 with Source

use of org.graalvm.polyglot.Source in project graal by oracle.

the class SLDebugTest method testBreakpointEverywhereBreaks.

@Test
public void testBreakpointEverywhereBreaks() throws Throwable {
    final String sourceCode = // 1
    "// A comment\n" + "function invocable(n) {\n" + "  if (n <= 1) {\n" + "    one \n" + // 5
    "        =\n" + "          1;\n" + "    return\n" + "        one;\n" + "  } else {\n" + // 10
    "    // A comment\n" + "    while (\n" + "        n > 0\n" + "          ) { \n" + "      one \n" + // 15
    "          = \n" + "            2;\n" + "      n = n -\n" + "          one *\n" + "          one;\n" + // 20
    "    }\n" + "    return\n" + "        n * n;\n" + "    \n" + "  }\n" + // 25
    "}\n" + "\n" + "function\n" + "   main()\n" + "         {\n" + "  return invocable(1) + invocable(2);\n" + "}\n" + "\n";
    Source source = Source.newBuilder("sl", sourceCode, "testBreakpointsAnywhere.sl").build();
    tester.assertBreakpointsBreakEverywhere(source);
}

Example 68 with Source

use of org.graalvm.polyglot.Source in project graal by oracle.

the class SLDebugTest method testTimeboxing.

@Test(expected = PolyglotException.class)
public void testTimeboxing() throws Throwable {
    final Source endlessLoop = slCode("function main() {\n" + "  i = 1; \n" + "  while(i > 0) {\n" + "    i = i + 1;\n" + "  }\n" + "  return i; \n" + "}\n");
    final Context context = Context.create("sl");
    Timer timer = new Timer();
    timer.schedule(new TimerTask() {

        @Override
        public void run() {
            context.getEngine().getInstruments().get("debugger").lookup(Debugger.class).startSession(new SuspendedCallback() {

                public void onSuspend(SuspendedEvent event) {
                    event.prepareKill();
                }
            }).suspendNextExecution();
        }
    }, 1000);
    context.eval(endlessLoop);
}

Example 69 with Source

use of org.graalvm.polyglot.Source in project graal by oracle.

the class SLDebugTest method checkExpressionStepPositions.

private void checkExpressionStepPositions(String stepPositions, boolean includeStatements, StepDepth... steps) {
    Source source = slCode("function main() {\n" + "  x = 2;\n" + "  while (x >= 0 && 5 >= 0) {\n" + "    a = 2 * x;\n" + "    b = (a * a) / (x * x + 1);\n" + "    x = x - transform(a, b);\n" + "  }\n" + "  return x / 1;\n" + "}\n" + "function transform(a, b) {\n" + "  return (1 + 1) * (a + b);\n" + "}\n");
    SourceElement[] elements;
    if (includeStatements) {
        elements = new SourceElement[] { SourceElement.EXPRESSION, SourceElement.STATEMENT };
    } else {
        elements = new SourceElement[] { SourceElement.EXPRESSION };
    }
    try (DebuggerSession session = startSession(elements)) {
        session.suspendNextExecution();
        startEval(source);
        // Step through the program
        StepDepth lastStep = steps[0];
        int stepIndex = 0;
        StepConfig expressionStepConfig = StepConfig.newBuilder().sourceElements(elements).build();
        for (String stepPos : stepPositions.split("\n")) {
            if (stepIndex < steps.length) {
                lastStep = steps[stepIndex++];
            }
            final StepDepth stepDepth = lastStep;
            expectSuspended((SuspendedEvent event) -> {
                if (!includeStatements) {
                    assertTrue("Needs to be an expression", event.hasSourceElement(SourceElement.EXPRESSION));
                } else {
                    assertTrue("Needs to be an expression or statement", event.hasSourceElement(SourceElement.EXPRESSION) || event.hasSourceElement(SourceElement.STATEMENT));
                }
                SourceSection ss = event.getSourceSection();
                DebugValue[] inputValues = event.getInputValues();
                String input = "";
                if (inputValues != null) {
                    StringBuilder inputBuilder = new StringBuilder("(");
                    for (DebugValue v : inputValues) {
                        if (inputBuilder.length() > 1) {
                            inputBuilder.append(',');
                        }
                        if (v != null) {
                            inputBuilder.append(v.as(String.class));
                        } else {
                            inputBuilder.append("null");
                        }
                    }
                    inputBuilder.append(") ");
                    input = inputBuilder.toString();
                }
                DebugValue returnValue = event.getReturnValue();
                String ret = (returnValue != null) ? returnValue.as(String.class) : "<none>";
                String actualPos = "<" + ss.getStartLine() + ":" + ss.getStartColumn() + " - " + ss.getEndLine() + ":" + ss.getEndColumn() + "> " + input + ret;
                assertEquals(stepPos, actualPos);
                switch(stepDepth) {
                    case INTO:
                        event.prepareStepInto(expressionStepConfig);
                        break;
                    case OVER:
                        event.prepareStepOver(expressionStepConfig);
                        break;
                    case OUT:
                        event.prepareStepOut(expressionStepConfig);
                        break;
                }
            });
        }
        expectDone();
    }
}

Example 70 with Source

use of org.graalvm.polyglot.Source in project graal by oracle.

the class SLDebugTest method testStepInOver.

@Test
public void testStepInOver() throws Throwable {
    /*
         * For recursive function we want to ensure that we don't step when we step over a function.
         */
    final Source factorial = slCode("function main() {\n" + "  return fac(5);\n" + "}\n" + "function fac(n) {\n" + "  if (n <= 1) {\n" + // break
    "    return 1;\n" + "  }\n" + "  return n * fac(n - 1);\n" + "}\n");
    try (DebuggerSession session = startSession()) {
        session.suspendNextExecution();
        startEval(factorial);
        expectSuspended((SuspendedEvent event) -> {
            checkState(event, "main", 2, true, "return fac(5)").prepareStepInto(1);
        });
        expectSuspended((SuspendedEvent event) -> {
            checkState(event, "fac", 5, true, "n <= 1", "n", "5").prepareStepOver(1);
        });
        expectSuspended((SuspendedEvent event) -> {
            checkState(event, "fac", 8, true, "return n * fac(n - 1)", "n", "5").prepareStepOver(1);
        });
        expectSuspended((SuspendedEvent event) -> {
            checkState(event, "main", 2, false, "fac(5)").prepareStepInto(1);
            assertEquals("120", event.getReturnValue().as(String.class));
        });
        expectDone();
    }
}