Well-formedness check for goto instructions

Check that targets are well-formed and consistent.

Author: Petr Bauch

src/goto-programs/goto_program.cpp

@@ -748,6 +748,23 @@ void goto_programt::instructiont::validate(
       "asserting non-boolean condition\n" + guard.pretty(),
       source_location);
     break;
+  case GOTO:
+    DATA_CHECK_WITH_DIAGNOSTICS(
+      has_target(),
+      "goto instruction expects at least one target",
+      source_location);
+    for(const auto &t : targets)
+    {
+      DATA_CHECK_WITH_DIAGNOSTICS(
+        t->is_target() && t->target_number != 0,
+        "goto target has to be a target",
+        source_location);
+    }
+    DATA_CHECK_WITH_DIAGNOSTICS(
+      evaluates_to_boolean(guard),
+      "goto with non-boolean condition\n" + guard.pretty(),
+      source_location);
+    break;
   case FUNCTION_CALL:
     DATA_CHECK_WITH_DIAGNOSTICS(
       code.get_statement() == ID_function_call,

unit/Makefile

@@ -16,6 +16,7 @@ SRC += analyses/ai/ai.cpp \
        analyses/does_remove_const/is_type_at_least_as_const_as.cpp \
        goto-programs/goto_trace_output.cpp \
        goto-programs/goto_program_assume.cpp \
+       goto-programs/goto_program_goto_target.cpp \
        goto-programs/goto_program_function_call.cpp \
        goto-programs/goto_program_declaration.cpp \
        interpreter/interpreter.cpp \

unit/goto-programs/goto_program_goto_target.cpp

@@ -0,0 +1,68 @@
+/*******************************************************************\
+
+  Module: Unit tests for goto_program::validate
+
+  Author: Diffblue Ltd.
+
+ \*******************************************************************/
+
+#include <goto-programs/goto_function.h>
+#include <testing-utils/catch.hpp>
+#include <util/arith_tools.h>
+
+SCENARIO(
+  "Validation of well-formed goto codes",
+  "[core][goto-programs][validate]")
+{
+  GIVEN("A program with one assertion")
+  {
+    symbol_tablet symbol_table;
+    const typet type1 = signedbv_typet(32);
+    symbolt symbol;
+    irep_idt symbol_name = "a";
+    symbol.name = symbol_name;
+    symbol_exprt varx(symbol_name, type1);
+    exprt val10 = from_integer(10, type1);
+    binary_relation_exprt x_le_10(varx, ID_le, val10);
+
+    goto_functiont goto_function;
+    auto &instructions = goto_function.body.instructions;
+    instructions.emplace_back(goto_program_instruction_typet::ASSERT);
+    instructions.back().make_assertion(x_le_10);
+
+    instructions.emplace_back(goto_program_instruction_typet::GOTO);
+    instructions.back().make_goto(instructions.begin());
+
+    symbol.type = type1;
+    symbol_table.insert(symbol);
+    namespacet ns(symbol_table);
+
+    WHEN("Target is a target")
+    {
+      instructions.front().target_number = 1;
+      THEN("The consistency check succeeds")
+      {
+        goto_function.body.validate(symbol_table, validation_modet::INVARIANT);
+        REQUIRE(true);
+      }
+    }
+
+    WHEN("Target is not a target")
+    {
+      THEN("The consistency check fails")
+      {
+        bool caught = false;
+        try
+        {
+          goto_function.body.validate(
+            symbol_table, validation_modet::EXCEPTION);
+        }
+        catch(incorrect_goto_program_exceptiont &e)
+        {
+          caught = true;
+        }
+        REQUIRE(caught);
+      }
+    }
+  }
+}