expect/tsp.exp

#
# Copyright (c) 2019-2022 Arm Limited. All rights reserved.
#
# SPDX-License-Identifier: BSD-3-Clause
#
# Expect script for TSP
#

source [file join [file dirname [info script]] handle-arguments.inc]

#
# Output from TSP:
#
#     NOTICE:  TSP: <version>(<mode>):<commit_id>
#     NOTICE:  TSP: Built : <hh:mm:ss>, <date>
#
# With 'TSP: Built' message, we assume a successful boot. All further messages
# are ignored.
#

# Arbitrary TSP response count during boot. Maybe adjusted as necessary
set tsp_resp_proof [get_param tsp_resp_proof 1000]
set tsp_resp_count 0

expect_string "TSP: Built" "TSP booted successfully"

# TSPD prints more messages only when built with INFO or above.
set tsp_debug [get_param tsp_debug]
if {$tsp_debug != ""} {
	while {1} {
		expect {
			# Following CPU power operations, TSP emits sample stats using
			# the below prefix. After tsp_resp_proof responses during boot,
			# we're confident TSP is functional; so quit with success.
			"TSP: cpu" {
				incr tsp_resp_count
				if {$tsp_resp_count >= $tsp_resp_proof} {
					message "TSP $tsp_resp_count responses; sufficient"
					break
				}
			}
		}
	}
}

# In case of measured boot, capture the event log that's been passed to the TSP,
# this is used to ensure that the same event log is produced in BL2. Match the
# previously stored digest with the one generated by the TSP service.
if {[info exists ::env(measured_boot)]} {
    capture_and_compare_log tsp_event_log "TSP: cpu" tfa_event_log
}

source [file join [file dirname [info script]] uart-hold.inc]