1 ## our_shell: ysh
2 ## oils_failures_allowed: 3
3
4 #### fastlex: NUL byte not allowed inside char literal #' '
5
6 echo $'var x = #\'\x00\'; echo x=$x' > tmp.oil
7 $SH tmp.oil
8
9 echo $'var x = #\' ' > incomplete.oil
10 $SH incomplete.oil
11
12 ## status: 2
13 ## STDOUT:
14 ## END
15
16 #### fastlex: NUL byte inside shebang line
17
18 # Hm this test doesn't really tickle the bug
19
20 echo $'#! /usr/bin/env \x00 sh \necho hi' > tmp.oil
21 env OILS_HIJACK_SHEBANG=1 $SH tmp.oil
22
23 ## STDOUT:
24 hi
25 ## END
26
27 #### Tea keywords don't interfere with YSH expressions
28
29 var d = {data: 'foo'}
30
31 echo $[d.data]
32
33 var e = {enum: 1, class: 2, import: 3, const: 4, var: 5, set: 6}
34 echo $[len(e)]
35
36 ## STDOUT:
37 foo
38 6
39 ## END
40
41 #### Catch AttributeError
42
43 var s = 'foo'
44 echo s=$s
45 var t = s.bad()
46 echo 'should not get here'
47
48 ## status: 3
49 ## STDOUT:
50 s=foo
51 ## END
52
53
54 #### Command sub paren parsing bug (#1387)
55
56 write $(if (true) { write true })
57
58 const a = $(write $[len('foo')])
59 echo $a
60
61 const b = $(write $[5 ** 3])
62 echo $b
63
64 const c = $(
65 write $[6 + 7]
66 )
67 echo $c
68
69 ## STDOUT:
70 true
71 3
72 125
73 13
74 ## END
75
76
77 #### More Command sub paren parsing
78
79 write $( var mylist = ['for']; for x in (mylist) { echo $x } )
80
81 write $( echo while; while (false) { write hi } )
82
83 write $( if (true) { write 'if' } )
84
85 write $( if (false) { write 'if' } elif (true) { write 'elif' } )
86
87 ## STDOUT:
88 for
89 while
90 if
91 elif
92 ## END
93
94 #### don't execute empty command
95
96 shopt --set ysh:all
97
98 set -x
99
100 try {
101 type -a ''
102 }
103 echo "type -a returned $_status"
104
105 $(true)
106 echo nope
107
108 ## status: 127
109 ## STDOUT:
110 type -a returned 1
111 ## END
112
113
114 #### Do && || with YSH constructs make sense/
115
116 # I guess there's nothing wrong with this?
117 #
118 # But I generally feel && || are only for
119 #
120 # test --file x && test --file y
121
122 var x = []
123 true && call x->append(42)
124 false && call x->append(43)
125 pp test_ (x)
126
127 func amp() {
128 true && return (42)
129 }
130
131 func pipe() {
132 false || return (42)
133 }
134
135 pp test_ (amp())
136 pp test_ (pipe())
137
138 ## STDOUT:
139 ## END
140
141
142 #### shvar then replace - bug #1986 context manager crash
143 source --builtin ysh/shvar.ysh
144
145 shvar FOO=bar {
146 for x in (1 .. 500) {
147 var Q = "hello"
148 setvar Q = Q=>replace("hello","world")
149 }
150 }
151 echo $Q
152
153 ## STDOUT:
154 world
155 ## END
156
157
158 #### Parsing crash - bug #2003
159
160 set +o errexit
161
162 $SH -c 'proc y (;x) { return = x }'
163 echo status=$?
164
165 $SH -c 'func y (;x) { return = x }'
166 echo status=$?
167
168 ## STDOUT:
169 status=2
170 status=2
171 ## END
172
173
174 #### proc with IFS= read -r line - dynamic scope - issue #2012
175
176 # this is an issue with lack of dynamic scope
177 # not sure exactly how to handle it ...
178
179 # shvar IFS= { read } is our replacement for dynamic scope
180
181 proc p {
182 read -r line
183 write $line
184 }
185
186 proc p-ifs {
187 IFS= read -r line
188 write $line
189 }
190
191 #set -x
192
193 echo zz | p
194
195 echo yy | p-ifs
196
197 ## STDOUT:
198 zz
199 yy
200 ## END
201
202 #### func call inside proc call - error message attribution
203
204 try 2> foo {
205 $SH -c '
206 func ident(x) {
207 return (x)
208 }
209
210 proc p (; x) {
211 echo $x
212 }
213
214 # BUG: it points to ( in ident(
215 # should point to ( in eval (
216
217 eval (ident([1,2,3]))
218 '
219 }
220
221 cat foo
222
223 ## STDOUT:
224 ## END
225
226
227 #### Crash in parsing case on EOF condition - issue #2037
228
229 var WEIGHT = ${1:-}
230 case (WEIGHT) {
231 "-" { echo "got nothing" }
232 (else) { echo $WEIGHT
233 }
234
235 ## status: 2
236 ## STDOUT:
237 ## END