// 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 P4Lang
import P4Runtime
import SwiftTreeSitter
import Testing
import TreeSitter
import TreeSitterP4

@testable import P4Compiler

@Test func test_simple_runtime() 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 runtime = try #UseOkResult(P4Runtime.Runtime<InstantiatedParserState, P4Lang.ParserValue>.create(program: program))
  let (state_result, _) = try! #UseOkResult(runtime.run())

  // We should be in the accept state.
  #expect(state_result == P4Lang.accept)
}

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

  let program = try #UseOkResult(SpecialCompilers.ProgramCompiler.Compile(simple_parser_declaration))
  let runtime = try #UseOkResult(P4Runtime.Runtime<InstantiatedParserState, P4Lang.ParserValue>.create(program: program))
  let (state_result, _) = try! #UseOkResult(runtime.run())
  // We should be in the accept state.
  #expect(state_result == P4Lang.reject)
}

@Test func test_simple_runtime_no_start_state() async throws {
  let simple_parser_declaration = """
    parser main_parser() {
       state tart {
           true;
           transition reject;
       }
    };
    """

  let program = try #UseOkResult(SpecialCompilers.ProgramCompiler.Compile(simple_parser_declaration))
  let runtime = try #UseOkResult(P4Runtime.Runtime<InstantiatedParserState, P4Lang.ParserValue>.create(program: program))

  #expect(
    #RequireErrorResult<(InstantiatedParserState, ProgramExecution)>(
      Error(withMessage: "Could not find the start state"),
      runtime.run()))
}

@Test func test_simple_runtime_parser_with_parameters() async throws {
  let simple_parser_declaration = """
      parser main_parser(bool pmtr, string smtr, int imtr) {
         state start {
            transition select (pmtr) {
              true: accept;
              false: reject;
            };
         }
      };
    """
  let program = try #UseOkResult(SpecialCompilers.ProgramCompiler.Compile(simple_parser_declaration))
  let runtime = try #UseOkResult(P4Runtime.Runtime<InstantiatedParserState, P4Lang.ParserValue>.create(program: program))

  let args = ArgumentList([
    Argument(P4Value(P4BooleanValue(withValue: true)), atIndex: 1), Argument(P4Value(P4StringValue(withValue: "Testing")), atIndex: 2), Argument(P4Value(P4IntValue(withValue: 5)), atIndex: 3),
  ])
  let (state_result, _) = try! #UseOkResult(runtime.run(withArguments: args))
  // We should be in the accept state.
  #expect(state_result == P4Lang.accept)
}

@Test func test_simple_runtime_parser_with_mismatched_parameter_types() async throws {
  let simple_parser_declaration = """
      parser main_parser(bool pmtr, string smtr, int imtr) {
         state start {
            transition select (pmtr) {
              true: accept;
              false: reject;
            };
         }
      };
    """
  let program = try #UseOkResult(SpecialCompilers.ProgramCompiler.Compile(simple_parser_declaration))
  let runtime = try #UseOkResult(P4Runtime.Runtime<InstantiatedParserState, P4Lang.ParserValue>.create(program: program))

  let args = ArgumentList([
    Argument(P4Value(P4BooleanValue(withValue: true)), atIndex: 1), Argument(P4Value(P4BooleanValue(withValue: false)), atIndex: 2), Argument(P4Value(P4IntValue(withValue: 5)), atIndex: 3),
  ])

  #expect(
    #RequireErrorResult<(InstantiatedParserState, ProgramExecution)>(
      Error(withMessage: "Cannot call parser: Argument 2's type (Boolean) is incompatible with the parameter type (String)"),
      runtime.run(withArguments: args)))
}

@Test func test_simple_runtime_parser_with_mismatched_parameter_types2() async throws {
  let simple_parser_declaration = """
      parser main_parser(bool pmtr, string smtr, int imtr) {
         state start {
            transition select (pmtr) {
              true: accept;
              false: reject;
            };
         }
      };
    """
  let program = try #UseOkResult(SpecialCompilers.ProgramCompiler.Compile(simple_parser_declaration))
  let runtime = try #UseOkResult(P4Runtime.Runtime<InstantiatedParserState, P4Lang.ParserValue>.create(program: program))

  let args = ArgumentList([
    Argument(P4Value(P4IntValue(withValue: 5)), atIndex: 1), Argument(P4Value(P4StringValue(withValue: "Testing")), atIndex: 2), Argument(P4Value(P4IntValue(withValue: 5)), atIndex: 3),
  ])

  #expect(
    #RequireErrorResult<(InstantiatedParserState, ProgramExecution)>(
      Error(withMessage: "Cannot call parser: Argument 1's type (Int (width: Infinite)) is incompatible with the parameter type (Boolean)"),
      runtime.run(withArguments: args)))
}

@Test func test_simple_runtime_parser_with_mismatched_parameter_counts() async throws {
  let simple_parser_declaration = """
      parser main_parser(bool pmtr, string smtr, int imtr) {
         state start {
            transition select (pmtr) {
              true: accept;
              false: reject;
            };
         }
      };
    """
  let program = try #UseOkResult(SpecialCompilers.ProgramCompiler.Compile(simple_parser_declaration))
  let runtime = try #UseOkResult(P4Runtime.Runtime<InstantiatedParserState, P4Lang.ParserValue>.create(program: program))
  let args = ArgumentList([Argument(P4Value(P4BooleanValue(withValue: true)), atIndex: 0)])

  #expect(
    #RequireErrorResult<(InstantiatedParserState, ProgramExecution)>(
      Error(withMessage: "Cannot call parser: 1 arguments found but 3 required"),
      runtime.run(withArguments: args)))
}