mirror of
https://github.com/digital-asset/daml.git
synced 2024-09-20 09:17:43 +03:00
0a8c1eba4e
This integrates the time service into DAML script thereby covering the main piece of scenarios that was missing from DAML script. This PR does two things (they are very related and doing them together makes it much easier to test): 1. It “fixes” `getTime` to return the ledger time in static mode by querying the ledger time service instead of defaulting to the Unix epoch which is pretty useless and I would consider the old behavior a bug. We keep the old behavior via the JSON API since there is no time service. 2. It adds `setTime` to set the ledger time via the time service. This is only supported in static time mode (sadbonx and other ledgers do not expose the time service in wallclock mode because changing time makes it not wallclock) or via the JSON API (no time service). fixes #6220 changelog_begin - [DAML Script] DAML Script’s `getTime` now correctly handles time changes in static time mode and returns the current time by querying the time service rather than defaulting to the Unix epoch. Note that when run via the JSON API, it still returns the Unix epoch. - [DAML Script] Add `setTime` to DAML Script which sets the ledger time via the ledger API time service. Note that this is only supported when running over gRPC in static time mode. changelog_end
72 lines
2.1 KiB
Bash
Executable File
72 lines
2.1 KiB
Bash
Executable File
#!/usr/bin/env bash
|
|
# Copyright (c) 2020 Digital Asset (Switzerland) GmbH and/or its affiliates. All rights reserved.
|
|
# SPDX-License-Identifier: Apache-2.0
|
|
|
|
# Copy-pasted from the Bazel Bash runfiles library v2.
|
|
set -uo pipefail; f=bazel_tools/tools/bash/runfiles/runfiles.bash
|
|
source "${RUNFILES_DIR:-/dev/null}/$f" 2>/dev/null || \
|
|
source "$(grep -sm1 "^$f " "${RUNFILES_MANIFEST_FILE:-/dev/null}" | cut -f2- -d' ')" 2>/dev/null || \
|
|
source "$0.runfiles/$f" 2>/dev/null || \
|
|
source "$(grep -sm1 "^$f " "$0.runfiles_manifest" | cut -f2- -d' ')" 2>/dev/null || \
|
|
source "$(grep -sm1 "^$f " "$0.exe.runfiles_manifest" | cut -f2- -d' ')" 2>/dev/null || \
|
|
{ echo>&2 "ERROR: cannot find $f"; exit 1; }; f=; set -e
|
|
# --- end runfiles.bash initialization v2 ---
|
|
|
|
set -euo pipefail
|
|
|
|
TEST_RUNNER=$(rlocation $TEST_WORKSPACE/$1)
|
|
DAR_FILE=$(rlocation $TEST_WORKSPACE/$2)
|
|
DIFF=$3
|
|
GREP=$4
|
|
SORT=$5
|
|
|
|
set +e
|
|
TEST_OUTPUT="$($TEST_RUNNER --dar=$DAR_FILE --max-inbound-message-size 41943040 2>&1)"
|
|
TEST_RESULT=$?
|
|
set -e
|
|
|
|
echo "-- Runner Output -----------------------" >&2
|
|
echo "$TEST_OUTPUT" >&2
|
|
echo "----------------------------------------" >&2
|
|
|
|
FAIL=
|
|
|
|
if [[ $TEST_RESULT = 0 ]]; then
|
|
FAIL=1
|
|
echo "Expected non-zero exit-code." >&2
|
|
fi
|
|
|
|
EXPECTED="$($SORT <<'EOF'
|
|
MultiTest:listKnownPartiesTest SUCCESS
|
|
MultiTest:multiTest SUCCESS
|
|
MultiTest:partyIdHintTest SUCCESS
|
|
ScriptExample:test SUCCESS
|
|
ScriptTest:failingTest FAILURE (com.daml.lf.speedy.SError$DamlEUserError)
|
|
ScriptTest:listKnownPartiesTest SUCCESS
|
|
ScriptTest:test0 SUCCESS
|
|
ScriptTest:test1 SUCCESS
|
|
ScriptTest:test3 SUCCESS
|
|
ScriptTest:test4 SUCCESS
|
|
ScriptTest:testCreateAndExercise SUCCESS
|
|
ScriptTest:testKey SUCCESS
|
|
ScriptTest:testGetTime SUCCESS
|
|
ScriptTest:testSetTime SUCCESS
|
|
ScriptTest:traceOrder SUCCESS
|
|
ScriptTest:partyIdHintTest SUCCESS
|
|
ScriptTest:sleepTest SUCCESS
|
|
ScriptExample:initializeFixed SUCCESS
|
|
ScriptTest:testStack SUCCESS
|
|
ScriptTest:testMaxInboundMessageSize SUCCESS
|
|
EOF
|
|
)"
|
|
|
|
ACTUAL="$(echo -n "$TEST_OUTPUT" | $GREP "SUCCESS\|FAILURE" | $SORT)"
|
|
|
|
if ! $DIFF -du0 --label expected <(echo -n "$EXPECTED") --label actual <(echo -n "$ACTUAL") >&2; then
|
|
FAIL=1
|
|
fi
|
|
|
|
if [[ $FAIL = 1 ]]; then
|
|
exit 1
|
|
fi
|