1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
#!/bin/ksh -p
#
# This file and its contents are supplied under the terms of the
# Common Development and Distribution License ("CDDL"), version 1.0.
# You may only use this file in accordance with the terms of version
# 1.0 of the CDDL.
#
# A full copy of the text of the CDDL should have accompanied this
# source. A copy of the CDDL is also available via the Internet at
# http://www.illumos.org/license/CDDL.
#
#
# Copyright (c) 2016 by Delphix. All rights reserved.
#
. $STF_SUITE/tests/functional/channel_program/channel_common.kshlib
#
# DESCRIPTION:
# Try returning various values that lua allows you to construct,
# but that cannot be represented as nvlists and therefore should
# cause the script to fail (but not panic). Try sending the values
# back to userland from both "return" and "error()".
#
verify_runnable "both"
set -A args 'function() return 1 end' \
'{[{}]=true}' \
'{[function() return 1 end]=0}' \
'assert' \
'0, assert' \
'true, {[{}]=0}' \
'{val=true}, {val=false}' \
'{1, 2, 3}, {[4]=5}' \
'nil, true, 1, "test", {}, {val=true}' \
'{[false]=true, ["false"]=false}' \
'{[true]=false, ["true"]=true}' \
'{[0]=true, ["0"]=false}' \
'{0,0,0,["1"]=0}' \
'{0,0,0,["2"]=0}' \
'{0,0,0,["3"]=0}'
typeset -i last_index=$((${#args[*]} - 1))
for i in $(seq 0 $last_index); do
log_note "running program: ${args[i]}"
log_mustnot_checkerror_program "execution failed" $TESTPOOL - <<-EOF
return ${args[i]}
EOF
((i = i + 1))
done
for i in $(seq 0 $last_index); do
log_note "running program: ${args[i]}"
log_mustnot_checkerror_program "execution failed" $TESTPOOL - <<-EOF
error(${args[i]})
EOF
((i = i + 1))
done
log_pass "Returning lua constructs that cannot be converted to " \
"nvlists fails as expected."
|