extends "res://tests/test_case.gd"

const ControlPlaneClient = preload("res://scripts/control_plane_client.gd")
const RankedProfileState = preload("res://scripts/ranked_profile_state.gd")


func test_base_url_validation_rejects_ambiguous_or_insecure_values() -> void:
	assert_true(ControlPlaneClient.is_valid_base_url("http://127.0.0.1:8080"), "local HTTP endpoint is valid")
	assert_true(ControlPlaneClient.is_valid_base_url("https://match.example"), "HTTPS endpoint is valid")
	assert_true(not ControlPlaneClient.is_valid_base_url("match.example"), "scheme is required")
	assert_true(not ControlPlaneClient.is_valid_base_url("http://match.example/"), "trailing slash is normalized before validation")
	assert_true(not ControlPlaneClient.is_valid_base_url("http://match example"), "whitespace is rejected")
	assert_true(not ControlPlaneClient.is_valid_base_url("https://user:pass@match.example"), "userinfo is rejected")
	assert_true(not ControlPlaneClient.is_valid_base_url("https://match.example?token=secret"), "query strings are rejected")

	var client := ControlPlaneClient.new()
	assert_true(client.configure("https://match.example", "session-id:opaque-token"), "safe access token configures")
	assert_true(not client.configure("https://match.example", "token\nforged-header"), "header injection is rejected")
	assert_true(ControlPlaneClient.is_valid_web_api_ticket("ticket-value"), "ordinary Steam Web API ticket is accepted")
	assert_true(not ControlPlaneClient.is_valid_web_api_ticket("ticket\nforged"), "ticket header characters are rejected")
	assert_true(not ControlPlaneClient.is_valid_web_api_ticket(""), "empty Steam ticket is rejected")
	assert_true(ControlPlaneClient.is_valid_access_token("session-id:opaque-token"), "opaque session format is accepted")
	assert_true(not ControlPlaneClient.is_valid_access_token(":opaque-token"), "missing session identifier is rejected")
	assert_true(not ControlPlaneClient.is_valid_access_token("session-id:token\nforged"), "session header injection is rejected")
	assert_eq(ControlPlaneClient.websocket_url("https://match.example"), "wss://match.example", "TLS control plane uses secure WebSocket")
	assert_eq(ControlPlaneClient.websocket_url("http://127.0.0.1:8080"), "ws://127.0.0.1:8080", "local control plane uses WebSocket")
	assert_eq(ControlPlaneClient.websocket_url("match.example"), "", "unscoped URL cannot become a WebSocket URL")
	var unconfigured := ControlPlaneClient.new()
	assert_eq(unconfigured.connect_event_stream(), ERR_UNAUTHORIZED, "event stream requires an authenticated session")


func test_ticket_normalization_preserves_payload_and_derives_expiry() -> void:
	var payload := {"ticket_id": "ticket-1", "state": "QUEUED", "expires_at": "2026-08-31T12:00:00Z"}
	var normalized := ControlPlaneClient.normalize_ticket(payload)
	assert_eq(normalized["ticket_id"], "ticket-1", "normalization preserves ticket identity")
	assert_true(normalized.has("expires_at_unix"), "RFC3339 expiry is available to the projection")
	assert_true(int(normalized["expires_at_unix"]) > 0, "expiry is converted to a positive epoch")
	assert_true(not payload.has("expires_at_unix"), "normalization does not mutate the HTTP payload")


func test_ticket_normalization_derives_authoritative_enqueue_time() -> void:
	var normalized := ControlPlaneClient.normalize_ticket({"enqueued_at": "1970-01-01T00:16:40Z"})
	assert_eq(int(normalized["enqueued_at_unix"]), 1000, "RFC3339 enqueue time is converted to epoch")
	assert_eq(ControlPlaneClient.normalize_ticket({"enqueued_at": "not-a-timestamp"})["enqueued_at_unix"], -1, "malformed enqueue time remains visibly invalid")
	assert_eq(ControlPlaneClient.normalize_ticket({"expires_at": 123})["expires_at_unix"], -1, "non-string expiry remains visibly invalid")


func test_session_expiry_is_checked_at_the_boundary_and_fails_closed() -> void:
	assert_true(not ControlPlaneClient.is_session_expired("", 1000), "legacy sessions without an expiry remain compatible")
	assert_true(not ControlPlaneClient.is_session_expired("1970-01-01T00:16:40Z", 999), "session remains valid before expiry")
	assert_true(ControlPlaneClient.is_session_expired("1970-01-01T00:16:40Z", 1000), "session expires at the exact boundary")
	assert_true(ControlPlaneClient.is_session_expired("not-a-timestamp", 1000), "malformed non-empty expiry fails closed")
	assert_true(ControlPlaneClient.is_valid_rfc3339_timestamp("2026-08-31T12:00:00.123Z"), "fractional RFC3339 timestamp is accepted")
	assert_true(not ControlPlaneClient.is_valid_rfc3339_timestamp("2026-08-31 12:00:00Z"), "space-separated timestamp is rejected")
	assert_true(not ControlPlaneClient.is_valid_rfc3339_timestamp("2026-08-31T12:00:00"), "timezone-less timestamp is rejected")


func test_reconfiguration_discards_the_previous_session_expiry() -> void:
	var client := ControlPlaneClient.new()
	client.session_expires_at = "1970-01-01T00:00:01Z"
	assert_true(client.configure("https://match.example", "new-session:opaque-token"), "new session configures successfully")
	assert_eq(client.session_expires_at, "", "new credentials do not inherit the old expiry")


func test_websocket_event_validation_requires_contract_specific_fields() -> void:
	var envelope := {"event": "state_changed", "revision": 1, "resource_id": "ticket_123456789", "occurred_at": "2026-08-31T12:00:00Z", "state": "QUEUED"}
	assert_true(ControlPlaneClient._valid_websocket_event(envelope), "valid state event is accepted")
	var accepted := envelope.duplicate()
	accepted["state"] = "ACCEPTED"
	assert_true(ControlPlaneClient._valid_websocket_event(accepted), "authoritative accepted queue event is accepted")
	for phase in ["ASSIGNED", "RESULT_PENDING", "COMPLETED"]:
		var lifecycle := envelope.duplicate()
		lifecycle["state"] = phase
		assert_true(ControlPlaneClient._valid_websocket_event(lifecycle), "post-match queue event is accepted: " + phase)
	var bad_state := envelope.duplicate()
	bad_state["state"] = "SECRET"
	assert_true(not ControlPlaneClient._valid_websocket_event(bad_state), "unknown state event is rejected")
	var assignment := {"event": "assignment_changed", "revision": 0, "resource_id": "match_1234567890", "occurred_at": "2026-08-31T12:00:00Z", "match_id": "match-1", "server_id": "server-1"}
	assert_true(ControlPlaneClient._valid_websocket_event(assignment), "complete assignment event is accepted")
	assignment.erase("server_id")
	assert_true(not ControlPlaneClient._valid_websocket_event(assignment), "incomplete assignment event is rejected")
	var fractional := envelope.duplicate()
	fractional["revision"] = 1.5
	assert_true(not ControlPlaneClient._valid_websocket_event(fractional), "fractional event revision is rejected")
	var negative := envelope.duplicate()
	negative["revision"] = -1
	assert_true(not ControlPlaneClient._valid_websocket_event(negative), "negative event revision is rejected")
	var malformed_time := envelope.duplicate()
	malformed_time["occurred_at"] = "yesterday"
	assert_true(not ControlPlaneClient._valid_websocket_event(malformed_time), "malformed event timestamp is rejected")
	var short_resource := envelope.duplicate()
	short_resource["resource_id"] = "short"
	assert_true(not ControlPlaneClient._valid_websocket_event(short_resource), "short resource identifier is rejected")
	var unsafe_resource := envelope.duplicate()
	unsafe_resource["resource_id"] = "ticket_123456789/secret"
	assert_true(not ControlPlaneClient._valid_websocket_event(unsafe_resource), "resource identifier with separators is rejected")


func test_websocket_reconnect_defers_recovery_while_http_mutation_is_in_flight() -> void:
	var client := ControlPlaneClient.new()
	client._ready()
	assert_true(client.state.begin_queue("ticket-reconnect", "casual"), "queue setup succeeds")
	client._operation = "queue_heartbeat"
	client._set_websocket_status("CONNECTED")
	assert_eq(client._pending_resync_resource_id, "ticket-reconnect", "reconnect recovery is retained until the mutation completes")
	client.free()


func test_resync_of_terminal_proposal_recovers_the_ticket() -> void:
	assert_eq(ControlPlaneClient.resync_target("proposal-terminal-resync", "ticket-terminal-resync", "proposal-terminal-resync", false), "ticket-terminal-resync", "terminal proposal resync targets the requeued ticket")
	assert_eq(ControlPlaneClient.resync_target("proposal-terminal-resync", "ticket-terminal-resync", "proposal-terminal-resync", true), "proposal-terminal-resync", "open proposal resync retains the proposal target")


func test_retryable_mutation_policy_only_retries_safe_failures() -> void:
	assert_true(ControlPlaneClient.is_retryable_mutation_response(0), "transport failure is retryable")
	assert_true(ControlPlaneClient.is_retryable_mutation_response(408), "request timeout is retryable")
	assert_true(ControlPlaneClient.is_retryable_mutation_response(429), "rate limit is retryable")
	assert_true(ControlPlaneClient.is_retryable_mutation_response(503), "server failure is retryable")
	assert_true(not ControlPlaneClient.is_retryable_mutation_response(401), "authentication failure is not blindly replayed")
	assert_true(not ControlPlaneClient.is_retryable_mutation_response(409), "revision/idempotency conflict is not blindly replayed")


func test_queue_revision_conflicts_schedule_authoritative_recovery() -> void:
	assert_true(ControlPlaneClient.should_recover_queue_after_conflict("queue_heartbeat", 409, "ticket-1"), "stale heartbeat recovers the queue ticket")
	assert_true(ControlPlaneClient.should_recover_queue_after_conflict("queue_cancel", 409, "ticket-1"), "stale cancellation recovers the queue ticket")
	assert_true(not ControlPlaneClient.should_recover_queue_after_conflict("queue_create", 409, "ticket-1"), "create conflict uses its own idempotency path")
	assert_true(not ControlPlaneClient.should_recover_queue_after_conflict("queue_heartbeat", 503, "ticket-1"), "transient outage remains retryable instead of being treated as a revision conflict")
	assert_true(not ControlPlaneClient.should_recover_queue_after_conflict("queue_cancel", 409, ""), "missing ticket cannot trigger recovery")


func test_queue_conflict_response_handler_defers_ticket_recovery() -> void:
	var client := ControlPlaneClient.new()
	client._ready()
	assert_true(client.state.begin_queue("ticket-handler", "casual"), "queue setup succeeds")
	client._operation = "queue_heartbeat"
	client._on_request_completed(HTTPRequest.RESULT_SUCCESS, 409, PackedStringArray(), JSON.stringify({"error": "revision conflict"}).to_utf8_buffer())
	assert_eq(client._pending_resync_resource_id, "ticket-handler", "heartbeat conflict queues ticket recovery")
	client._operation = "queue_cancel"
	client._pending_resync_resource_id = ""
	client._on_request_completed(HTTPRequest.RESULT_SUCCESS, 409, PackedStringArray(), JSON.stringify({"error": "revision conflict"}).to_utf8_buffer())
	assert_eq(client._pending_resync_resource_id, "ticket-handler", "cancel conflict queues ticket recovery")
	client.free()


func test_assignment_endpoint_split_never_accepts_url_or_bad_port() -> void:
	var endpoint := ControlPlaneClient._split_assignment_endpoint("127.0.0.1:31001")
	assert_eq(endpoint["host"], "127.0.0.1", "assignment host is separated from the port")
	assert_eq(endpoint["port"], 31001, "assignment port is parsed as an integer")
	for unsafe in ["127.0.0.1", "127.0.0.1:0", "127.0.0.1:65536", "127.0.0.1:31001/path", "https://127.0.0.1:31001"]:
		assert_true(ControlPlaneClient._split_assignment_endpoint(unsafe).is_empty(), "unsafe endpoint is rejected: %s" % unsafe)


func test_ranked_profile_is_backend_display_data_and_rejects_unsafe_values() -> void:
	var profile := RankedProfileState.new()
	assert_true(profile.apply({"rating": 1500.0, "rd": 200.0, "volatility": 0.06, "ranked_games": 3, "tier": "GOLD", "provisional": true, "season_id": "season_1234567890"}), "valid profile applies")
	assert_eq(profile.display_text(), "Provisional · 3 ranked games", "provisional status overrides tier presentation")
	assert_true(not profile.apply({"rating": -1.0, "rd": 200.0, "volatility": 0.06, "ranked_games": 3, "tier": "GOLD", "provisional": false}), "negative rating is rejected")
	assert_true(not profile.available, "unsafe response is not displayed")
	assert_true(not profile.apply({"rating": 1500.0, "rd": 200.0, "volatility": 0.06, "ranked_games": 3, "tier": "", "provisional": false}), "empty tier is rejected")
	assert_true(not profile.apply({"rating": 1500.0, "rd": 200.0, "volatility": 0.06, "ranked_games": 3, "tier": "GOLD", "provisional": "false"}), "string boolean is rejected")
	assert_true(not profile.apply({"rating": 1500.0, "rd": 200.0, "volatility": 0.06, "ranked_games": 3.5, "tier": "GOLD", "provisional": false}), "fractional ranked games is rejected")


func test_ranked_profile_projects_and_bounds_season_countdown() -> void:
	var profile := RankedProfileState.new()
	assert_true(profile.apply({"rating": 1500.0, "rd": 200.0, "volatility": 0.06, "ranked_games": 10, "tier": "GOLD", "provisional": false, "season_id": "season_1234567890", "season_ends_at": "1970-01-03T00:00:00Z"}), "season end applies")
	assert_true(profile.display_text(1000).contains("Season ends in 2d"), "countdown rounds up remaining season time")
	assert_true(profile.display_text(300000).contains("Season ends in 0d"), "expired season countdown is clamped")
	assert_true(not profile.apply({"rating": 1500.0, "rd": 200.0, "volatility": 0.06, "ranked_games": 10, "tier": "GOLD", "provisional": false, "season_ends_at": "not-a-timestamp"}), "malformed season expiry is rejected")
	assert_true(not profile.apply({"rating": 1500.0, "rd": 200.0, "volatility": 0.06, "ranked_games": 10, "tier": "GOLD", "provisional": false, "season_ends_at": 123}), "non-string season expiry is rejected")
	assert_true(not profile.apply({"rating": 1500.0, "rd": 200.0, "volatility": 0.06, "ranked_games": 10, "tier": "GOLD", "provisional": false, "season_id": "short"}), "short season identifier is rejected")
	assert_true(not profile.apply({"rating": 1500.0, "rd": 200.0, "volatility": 0.06, "ranked_games": 10, "tier": "GOLD", "provisional": false, "season_id": 123}), "non-string season identifier is rejected")