gp4/Tests/p4rseTests/ParserCompilerTests.swift

// p4rse, Copyright 2026, Will Hawkins
//
// This file is part of p4rse.
//
// This file is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program. If not, see <https://www.gnu.org/licenses/>.

import Common
import Foundation
import Macros
import Runtime
import SwiftTreeSitter
import Testing
import TreeSitter
import TreeSitterP4
import P4Lang

@testable import P4Compiler

@Test func test_simple_parser_syntax_error() async throws {
  let simple_parser_declaration = """
    parser main_parser() {
       state
           transition start;
       }
    };
    """
  #expect(
    #RequireErrorResult(
      Error(withMessage: "Could not compile the P4 program"),
      SpecialCompilers.ProgramCompiler.Compile(simple_parser_declaration)))
}

@Test func test_simple_compilation_with_statement() async throws {
  let simple_parser_declaration = """
    parser main_parser() {
       state start {
           true;
           transition accept;
       }
    };
    """

  let program = try #UseOkResult(SpecialCompilers.ProgramCompiler.Compile(simple_parser_declaration))
  let parser = try #UseOkResult(program.find_parser(withName: Identifier(name: "main_parser")))

  #expect(parser.states.count() == 1)

  let state = (try! #require(parser.states.find(withIdentifier: Identifier(name: "start"))))
  #expect(state.getName() == Identifier(name: "start"))
  #expect(state.statements.count == 1)
}

@Test func test_invalid_transition_expression_keyset_expressions() async throws {
  let simple_parser_declaration = """
    parser main_parser() {
       state start {
           transition select (false) {
              asdf: reject;
              asde: reject;
           };
       }
    };
    """

  let compilation_error = try #UseErrorResult(SpecialCompilers.ProgramCompiler.Compile(simple_parser_declaration))

  #expect(compilation_error.msg().contains("asde"))
  #expect(compilation_error.msg().contains("asdf"))
}

@Test func test_simple_compiler_macro_nodetype_test() async throws {
  let simple = """
    parser main_parser() {
       state start {
           transition select (false) {
              asdf: reject;
              asde: reject;
           };
       }
    };
  """

  let p = try! #UseOkResult(ConfigureP4Parser())
  let result = try! #require(p.parse(simple))

  #expect(
    #RequireErrorResult<(EvaluatableStatement, CompilerContext)>(
      ErrorWithLocation(sourceLocation: SourceLocation(2, 154), withError: "Did not find assignment statement"),
      ParserAssignmentStatement.Compile( // Note: Calling ParserAssignmentStatement compilation directly.
        node: result.rootNode!, withContext: CompilerContext())))
}

@Test func test_simple_compiler_parser_with_parameters() async throws {
  let simple = """
    parser main_parser(bool pmtr) {
       state start {
           transition accept;
       }
    };
  """

  let program = try! #UseOkResult(SpecialCompilers.ProgramCompiler.Compile(simple))
  let parser = try! #UseOkResult(program.find_parser(withName: Identifier(name: "main_parser")))
  let parameters = parser.parameters

  // Check that the parameters match.
  #expect(parameters.parameters.count == 1)

  #expect(parameters.parameters[0].name == Identifier(name: "pmtr"))
  #expect(parameters.parameters[0].type.baseType().eq(rhs: P4Boolean()))
}

@Test func test_simple_compiler_parser_with_multiple_parameters() async throws {
  let simple = """
    parser main_parser(bool pmtr, string smtr) {
       state start {
           transition accept;
       }
    };
  """

  let program = try! #UseOkResult(SpecialCompilers.ProgramCompiler.Compile(simple))
  let parser = try! #UseOkResult(program.find_parser(withName: Identifier(name: "main_parser")))
  let parameters = parser.parameters

  // Check that the parameters match.
  #expect(parameters.parameters.count == 2)

  #expect(parameters.parameters[0].name == Identifier(name: "pmtr"))
  #expect(parameters.parameters[0].type.baseType().eq(rhs: P4Boolean()))

  #expect(parameters.parameters[1].name == Identifier(name: "smtr"))
  #expect(parameters.parameters[1].type.baseType().eq(rhs: P4String()))
}

@Test func test_simple_compiler_parser_with_multiple_parameters2() async throws {
  let simple = """
    parser main_parser(bool pmtr, string smtr, int imtr) {
       state start {
           transition accept;
       }
    };
  """

  let program = try! #UseOkResult(SpecialCompilers.ProgramCompiler.Compile(simple))
  let parser = try! #UseOkResult(program.find_parser(withName: Identifier(name: "main_parser")))
  let parameters = parser.parameters

  // Check that the parameters match.
  #expect(parameters.parameters.count == 3)

  #expect(parameters.parameters[0].name == Identifier(name: "pmtr"))
  #expect(parameters.parameters[0].type.baseType().eq(rhs: P4Boolean()))

  #expect(parameters.parameters[1].name == Identifier(name: "smtr"))
  #expect(parameters.parameters[1].type.baseType().eq(rhs: P4String()))

  #expect(parameters.parameters[2].name == Identifier(name: "imtr"))
  #expect(parameters.parameters[2].type.baseType().eq(rhs: P4Int()))
}

@Test func test_simple_compiler_parser_use_parameters() async throws {
  let simple = """
    parser main_parser(bool pmtr, string smtr, int imtr) {
       state start {
           pmtr = true;
           transition accept;
       }
    };
  """

  #expect(#RequireOkResult(SpecialCompilers.ProgramCompiler.Compile(simple)))
}

@Test func test_simple_compiler_with_instantiation() async throws {
    let simple_instantiation_program = """
        parser MainParser() {
            state start {
                transition accept;
            }
        };

        MainParser() mp;
    """
  #expect(#RequireOkResult(SpecialCompilers.ProgramCompiler.Compile(simple_instantiation_program)))
}