?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Fix a memory leak in set_font_face (introduced in previous commit)
[pipeglade.git] / pipegladetest.sh
blobccdfb44332f707cd6163b23257e6e4c5dea985ac
1 #! /usr/bin/env bash
2
3 # Another possible shebang line:
4 #! /usr/bin/env mksh
5
6 # Pipeglade tests; they should be invoked in the build directory.
7 #
8 # Failure of a test can cause failure of one or more subsequent tests.
9
10 export LC_ALL=C
11 export NO_AT_BRIDGE=1
12 FIN=to-g.fifo
13 FOUT=from-g.fifo
14 FERR=err.fifo
15 LOG=test.log
16 BAD_FIFO=bad_fifo
17 PID_FILE=pid
18 DIR=test_dir
19 FILE1=saved1.txt
20 FILE2=saved2.txt
21 FILE3=saved3.txt
22 FILE4=saved4.txt
23 FILE5=saved5.txt
24 FILE6=saved6.txt
25 rm -rf $FIN $FOUT $FERR $BAD_FIFO $PID_FILE $FILE1 $FILE2 $FILE3 $FILE4 $FILE5 $FILE6 $DIR
26
27 if stat -f "%0p"; then
28 STAT_CMD='stat -f "%0p"'
29 else
30 # probably GNU stat
31 STAT_CMD='stat -c "%a"'
32 fi
33
34 # colored messages: bright green
35 OK=$'\E[32;1mOK\E[0m'
36 # bright red
37 FAIL=$'\E[31;1mFAIL\E[0m'
38 EXPECTED=$'\E[31;1mEXPECTED\E[0m'
39 # yellow
40 CALL=$'\E[33mCALL\E[0m'
41 SEND=$'\E[33mSEND\E[0m'
42
43 TESTS=0
44 FAILS=0
45 OKS=0
46
47 count_fail() {
48 (( TESTS+=1 ))
49 (( FAILS+=1 ))
50 }
51
52 count_ok() {
53 (( TESTS+=1 ))
54 (( OKS+=1 ))
55 }
56
57 check_rm() {
58 i=0
59 while test -e $1 && (( i<50 )); do
60 sleep .1
61 (( i+=1 ))
62 done
63 if test -e $1; then
64 count_fail
65 echo " $FAIL $1 should be deleted"
66 rm -f $1
67 else
68 count_ok
69 echo " $OK $1 deleted"
70 fi
71 }
72
73 check_cmd() {
74 i=0
75 while ! eval "$1" && (( i<50 )); do
76 sleep .1
77 (( i+=1 ))
78 done
79 if eval "$1"; then
80 count_ok
81 echo " $OK $1"
82 else
83 count_fail
84 echo " $FAIL $1"
85 fi
86 }
87
88 echo "
89 # BATCH ONE
90 #
91 # Situations where pipeglade should exit immediately. These tests
92 # should run automatically
93 ######################################################################
94 "
95
96 # check_call command expected_status expected_stderr expected_stdout
97 check_call() {
98 r=$2
99 e=$3
100 o=$4
101 output=$($1 2>tmperr.txt)
102 retval=$?
103 error=$(<tmperr.txt)
104 rm tmperr.txt
105 echo "$CALL $1"
106 if test "$output" = "" -a "$o" = "" || (echo "$output" | grep -Fqe "$o"); then
107 count_ok
108 echo " $OK STDOUT $output"
109 else
110 count_fail
111 echo " $FAIL STDOUT $output"
112 echo " $EXPECTED $o"
113 fi
114 if test "$error" = "" -a "$e" = "" || test "$retval" -eq "$r" && (echo "$error" | grep -Fqe "$e"); then
115 count_ok
116 echo " $OK EXIT/STDERR $retval $error"
117 else
118 count_fail
119 echo " $FAIL EXIT/STDERR $retval $error"
120 echo " $EXPECTED $r $e"
121 fi
122 }
123
124 check_call "./pipeglade -u nonexistent.ui" 1 \
125 "nonexistent.ui" ""
126 check_call "./pipeglade -u bad_window.ui" 1 \
127 "no toplevel window named 'main'" ""
128 check_call "./pipeglade -u www-template/404.html" 1 \
129 "html" ""
130 check_call "./pipeglade -u README" 1 \
131 "Document must begin with an element" ""
132 check_call "./pipeglade -e x" 1 \
133 "x is not a valid XEmbed socket id" ""
134 check_call "./pipeglade -ex" 1 \
135 "x is not a valid XEmbed socket id" ""
136 check_call "./pipeglade -e -77" 1 \
137 "-77 is not a valid XEmbed socket id" ""
138 check_call "./pipeglade -e 77x" 1 \
139 "77x is not a valid XEmbed socket id" ""
140 check_call "./pipeglade -e +77" 1 \
141 "+77 is not a valid XEmbed socket id" ""
142 check_call "./pipeglade -e 999999999999999999999999999999" 1 \
143 "999999999999999999999999999999 is not a valid XEmbed socket id" ""
144 check_call "./pipeglade -e 99999999999999999" 1 \
145 "unable to embed into XEmbed socket 99999999999999999" ""
146 touch $BAD_FIFO
147 check_call "./pipeglade -i $BAD_FIFO" 1 \
148 "making fifo" ""
149 check_call "./pipeglade -o $BAD_FIFO" 1 \
150 "making fifo" ""
151 rm $BAD_FIFO
152 check_call "./pipeglade -b" 1 \
153 "parameter -b requires both -i and -o"
154 check_call "./pipeglade -b -i $FIN" 1 \
155 "parameter -b requires both -i and -o"
156 check_call "./pipeglade -b -i $FOUT" 1 \
157 "parameter -b requires both -i and -o"
158 rm $FIN $FOUT
159 check_call "./pipeglade -h" 0 \
160 "" "usage: pipeglade [[-i in-fifo] [-o out-fifo] [-b] [-u glade-file.ui] [-e xid]
161 [-l log-file] [--display X-server]] | [-h | -G | -V]"
162 check_call "./pipeglade -G" 0 \
163 "" "GTK+ v"
164 check_call "./pipeglade -G" 0 \
165 "" "cairo v"
166 check_call "./pipeglade -V" 0 \
167 "" "."
168 check_call "./pipeglade -X" 1 \
169 "option" ""
170 check_call "./pipeglade -e" 1 \
171 "argument" ""
172 check_call "./pipeglade -u" 1 \
173 "argument" ""
174 check_call "./pipeglade -i" 1 \
175 "argument" ""
176 check_call "./pipeglade -o" 1 \
177 "argument" ""
178 check_call "./pipeglade -l" 1 \
179 "argument" ""
180 check_call "./pipeglade yyy" 1 \
181 "illegal parameter 'yyy'" ""
182 check_call "./pipeglade --display nnn" 1 \
183 "nnn"
184 mkfifo $FIN
185 echo -e "statusbar1:pop\n _:main_quit" > $FIN &
186 check_call "./pipeglade -i $FIN" 0 \
187 "" ""
188 mkfifo $FIN
189 echo -e "statusbar1:pop_id 111\n _:main_quit" > $FIN &
190 check_call "./pipeglade -i $FIN" 0 \
191 "" ""
192
193 check_rm $FIN
194 check_rm $FOUT
195
196
197
198 #exit
199 echo "
200 # BATCH TWO
201 #
202 # Error handling tests---bogus actions leading to appropriate error
203 # messages. Most of these tests should run automatically.
204 ######################################################################
205 "
206
207 mkfifo $FERR
208
209 # check_error command expected_stderr
210 check_error() {
211 echo "$SEND $1"
212 echo -e "$1" >$FIN
213 while read r <$FERR; do
214 # ignore irrelevant GTK warnings
215 if test "$r" != "" && ! grep -qe "WARNING"<<< "$r"; then
216 break;
217 fi
218 done
219 if grep -qe "$2" <<< "$r"; then
220 count_ok
221 echo " $OK $r"
222 else
223 count_fail
224 echo " $FAIL $r"
225 echo " $EXPECTED $2"
226 fi
227 }
228
229 read r 2< $FERR &
230 ./pipeglade -i $FIN 2> $FERR &
231
232 # wait for $FIN to appear
233 while test ! \( -e $FIN \); do :; done
234
235 # Non-existent name
236 check_error "nnn" \
237 "ignoring command \"nnn\""
238 check_error "nnn:set_text FFFF" \
239 "ignoring command \"nnn:set_text FFFF\""
240 check_error "nnn:set_tooltip_text FFFF" \
241 "ignoring command \"nnn:set_tooltip_text FFFF\""
242 check_error "nnn:set_sensible 0" \
243 "ignoring command \"nnn:set_sensible 0\""
244 check_error "nnn:set_sensible 1" \
245 "ignoring command \"nnn:set_sensible 1\""
246 check_error "nnn:set_visible 0" \
247 "ignoring command \"nnn:set_visible 0\""
248 check_error "nnn:set_visible 1" \
249 "ignoring command \"nnn:set_visible 1\""
250 check_error "nnn:grab_focus" \
251 "ignoring command \"nnn:grab_focus\""
252 check_error "nnn:set_size_request 100 100" \
253 "ignoring command \"nnn:set_size_request 100 100\""
254 check_error "nnn:style font:Bold 11" \
255 "ignoring command \"nnn:style font:Bold 11\""
256 check_error "nnn:force" \
257 "ignoring command \"nnn:force\""
258 # Widget that shouldn't fire callbacks
259 check_error "label1:force" \
260 "ignoring GtkLabel command \"label1:force\""
261 # Widget that can't grab focus
262 check_error "label1:grab_focus" \
263 "ignoring GtkLabel command \"label1:grab_focus\""
264 # load file
265 check_error "_:load" \
266 "ignoring command \"_:load\""
267 check_error "_:load " \
268 "ignoring command \"_:load \""
269 check_error "_:load nonexistent.txt" \
270 "ignoring command \"_:load nonexistent.txt\""
271 mkdir -p $DIR
272 cat >$DIR/$FILE1 <<< "blah"
273 check_error "_:load $DIR/$FILE1" \
274 "ignoring command \"blah\""
275 cat >$DIR/$FILE1 <<< "_:load $DIR/$FILE1"
276 check_error "_:load $DIR/$FILE1" \
277 "ignoring command \"_:load $DIR/$FILE1\""
278 cat >$DIR/$FILE1 <<< "_:load $DIR/$FILE2"
279 cat >$DIR/$FILE2 <<< "_:load $DIR/$FILE1"
280 check_error "_:load $DIR/$FILE1" \
281 "ignoring command \"_:load $DIR/$FILE1\""
282 cat >$DIR/$FILE1 <<< "_:load $DIR/$FILE2"
283 cat >$DIR/$FILE2 <<< "_:blah"
284 check_error "_:load $DIR/$FILE1" \
285 "ignoring command \"_:blah\""
286 rm -rf $DIR
287 # GtkWindow
288 check_error "main:nnn" \
289 "ignoring GtkWindow command \"main:nnn\""
290 check_error "main:move" \
291 "ignoring GtkWindow command \"main:move\""
292 check_error "main:move " \
293 "ignoring GtkWindow command \"main:move \""
294 check_error "main:move 700" \
295 "ignoring GtkWindow command \"main:move 700\""
296 check_error "main:move 700 nnn" \
297 "ignoring GtkWindow command \"main:move 700 nnn\""
298 # GtkLabel
299 check_error "label1:nnn" \
300 "ignoring GtkLabel command \"label1:nnn\""
301 # GtkImage
302 check_error "image1:nnn" \
303 "ignoring GtkImage command \"image1:nnn\""
304 # GtkNotebook
305 check_error "notebook1:nnn" \
306 "ignoring GtkNotebook command \"notebook1:nnn\""
307 # GtkExpander
308 check_error "expander1:nnn" \
309 "ignoring GtkExpander command \"expander1:nnn\""
310 # GtkTextView
311 check_error "textview1:nnn" \
312 "ignoring GtkTextView command \"textview1:nnn\""
313 check_error "textview1:save" \
314 "ignoring GtkTextView command \"textview1:save\""
315 mkdir $DIR; chmod a-w $DIR
316 check_error "textview1:save $DIR/$FILE1" \
317 "ignoring GtkTextView command \"textview1:save $DIR/$FILE1\""
318 check_error "textview1:save nonexistent/$FILE1" \
319 "ignoring GtkTextView command \"textview1:save nonexistent/$FILE1\""
320 rm -rf $DIR
321 # GtkButton
322 check_error "button1:nnn" \
323 "ignoring GtkButton command \"button1:nnn\""
324 # GtkSwitch
325 check_error "switch1:nnn" \
326 "ignoring GtkSwitch command \"switch1:nnn\""
327 # GtkToggleButton
328 check_error "togglebutton1:nnn" \
329 "ignoring GtkToggleButton command \"togglebutton1:nnn\""
330 # GtkCheckButton
331 check_error "checkbutton1:nnn" \
332 "ignoring GtkCheckButton command \"checkbutton1:nnn\""
333 # GtkRadioButton
334 check_error "radiobutton1:nnn" \
335 "ignoring GtkRadioButton command \"radiobutton1:nnn\""
336 # GtkSpinButton
337 check_error "spinbutton1:nnn" \
338 "ignoring GtkSpinButton command \"spinbutton1:nnn\""
339 # GtkFileChooserButton
340 check_error "filechooserbutton1:nnn" \
341 "ignoring GtkFileChooserButton command \"filechooserbutton1:nnn\""
342 # GtkFilechooserDialog
343 check_error "open_dialog:nnn" \
344 "ignoring GtkFileChooserDialog command \"open_dialog:nnn\""
345 # GtkFontButton
346 check_error "fontbutton1:nnn" \
347 "ignoring GtkFontButton command \"fontbutton1:nnn\""
348 # GtkColorButton
349 check_error "colorbutton1:nnn" \
350 "ignoring GtkColorButton command \"colorbutton1:nnn\""
351 # GtkPrintUnixDialog
352 check_error "printdialog:nnn" \
353 "ignoring GtkPrintUnixDialog command \"printdialog:nnn\""
354 check_error "statusbar1:push Click \"Print\"\n printdialog:print nonexistent.ps" \
355 "ignoring GtkPrintUnixDialog command \" printdialog:print nonexistent.ps\""
356 # GtkScale
357 check_error "scale1:nnn" \
358 "ignoring GtkScale command \"scale1:nnn\""
359 # GtkProgressBar
360 check_error "progressbar1:nnn" \
361 "ignoring GtkProgressBar command \"progressbar1:nnn\""
362 # GtkSpinner
363 check_error "spinner1:nnn" \
364 "ignoring GtkSpinner command \"spinner1:nnn\""
365 # GtkStatusbar
366 check_error "statusbar1:nnn" \
367 "ignoring GtkStatusbar command \"statusbar1:nnn\""
368 # GtkComboBoxText
369 check_error "comboboxtext1:nnn" \
370 "ignoring GtkComboBoxText command \"comboboxtext1:nnn\""
371 check_error "comboboxtext1:force" \
372 "ignoring GtkComboBoxText command \"comboboxtext1:force\""
373
374 # GtkTreeView #
375 check_error "treeview1:nnn" \
376 "ignoring GtkTreeView command \"treeview1:nnn\""
377 check_error "treeview2:nnn" \
378 "ignoring GtkTreeView command \"treeview2:nnn\""
379 check_error "treeview1:force" \
380 "ignoring GtkTreeView command \"treeview1:force\""
381 # GtkTreeView save
382 check_error "treeview1:save" \
383 "ignoring GtkTreeView command \"treeview1:save\""
384 mkdir $DIR; chmod a-w $DIR
385 check_error "treeview1:save $DIR/$FILE1" \
386 "ignoring GtkTreeView command \"treeview1:save $DIR/$FILE1\""
387 check_error "treeview1:save nonexistent/$FILE1" \
388 "ignoring GtkTreeView command \"treeview1:save nonexistent/$FILE1\""
389 rm -rf $DIR
390 # GtkTreeView insert_row
391 check_error "treeview1:insert_row 10000" \
392 "ignoring GtkTreeView command \"treeview1:insert_row 10000\""
393 check_error "treeview1:insert_row -1" \
394 "ignoring GtkTreeView command \"treeview1:insert_row -1\""
395 check_error "treeview1:insert_row nnn" \
396 "ignoring GtkTreeView command \"treeview1:insert_row nnn\""
397 check_error "treeview1:insert_row" \
398 "ignoring GtkTreeView command \"treeview1:insert_row\""
399 check_error "treeview1:insert_row " \
400 "ignoring GtkTreeView command \"treeview1:insert_row \""
401 check_error "treeview1:insert_row -1" \
402 "ignoring GtkTreeView command \"treeview1:insert_row -1\""
403 check_error "treeview1:insert_row 1000" \
404 "ignoring GtkTreeView command \"treeview1:insert_row 1000\""
405 check_error "treeview2:insert_row 0" \
406 "ignoring GtkTreeView command \"treeview2:insert_row 0\""
407 check_error "treeview3:insert_row end" \
408 "missing model/ignoring GtkTreeView command \"treeview3:insert_row end\""
409 check_error "treeview2:insert_row end\n treeview2:insert_row 0 as_child\n treeview2:insert_row 0:0 as_child\n treeview2:expand abc" \
410 "ignoring GtkTreeView command \" treeview2:expand abc\""
411 check_error "treeview2:expand" \
412 "ignoring GtkTreeView command \"treeview2:expand\""
413 check_error "treeview2:expand 0:abc" \
414 "ignoring GtkTreeView command \"treeview2:expand 0:abc\""
415 check_error "treeview2:expand_all abc" \
416 "ignoring GtkTreeView command \"treeview2:expand_all abc\""
417 check_error "treeview2:expand_all 0:abc" \
418 "ignoring GtkTreeView command \"treeview2:expand_all 0:abc\""
419 check_error "treeview2:collapse abc" \
420 "ignoring GtkTreeView command \"treeview2:collapse abc\""
421 check_error "treeview2:collapse 0:abc" \
422 "ignoring GtkTreeView command \"treeview2:collapse 0:abc\""
423 check_error "treeview2:insert_row" \
424 "ignoring GtkTreeView command \"treeview2:insert_row\""
425 check_error "treeview2:insert_row abc" \
426 "ignoring GtkTreeView command \"treeview2:insert_row abc\""
427 check_error "treeview2:insert_row 0:abc" \
428 "ignoring GtkTreeView command \"treeview2:insert_row 0:abc\""
429 # GtkTreeView move_row
430 check_error "treeview1:move_row" \
431 "ignoring GtkTreeView command \"treeview1:move_row\""
432 check_error "treeview1:move_row " \
433 "ignoring GtkTreeView command \"treeview1:move_row \""
434 check_error "treeview1:move_row nnn" \
435 "ignoring GtkTreeView command \"treeview1:move_row nnn\""
436 check_error "treeview1:move_row 10000 end" \
437 "ignoring GtkTreeView command \"treeview1:move_row 10000 end\""
438 check_error "treeview1:move_row -1 end" \
439 "ignoring GtkTreeView command \"treeview1:move_row -1 end\""
440 check_error "treeview1:move_row nnn end" \
441 "ignoring GtkTreeView command \"treeview1:move_row nnn end\""
442 check_error "treeview1:move_row 0 10000" \
443 "ignoring GtkTreeView command \"treeview1:move_row 0 10000\""
444 check_error "treeview1:move_row 0 -1" \
445 "ignoring GtkTreeView command \"treeview1:move_row 0 -1\""
446 check_error "treeview1:move_row 0 nnn" \
447 "ignoring GtkTreeView command \"treeview1:move_row 0 nnn\""
448 check_error "treeview2:move_row" \
449 "ignoring GtkTreeView command \"treeview2:move_row\""
450 check_error "treeview2:move_row 0:0 abc" \
451 "ignoring GtkTreeView command \"treeview2:move_row 0:0 abc\""
452 check_error "treeview2:move_row 0:0 0:abc" \
453 "ignoring GtkTreeView command \"treeview2:move_row 0:0 0:abc\""
454 check_error "treeview2:move_row abc end" \
455 "ignoring GtkTreeView command \"treeview2:move_row abc end\""
456 check_error "treeview2:move_row 0:abc end" \
457 "ignoring GtkTreeView command \"treeview2:move_row 0:abc end\""
458 # GtkTreeView remove_row
459 check_error "treeview1:remove_row 10000" \
460 "ignoring GtkTreeView command \"treeview1:remove_row 10000\""
461 check_error "treeview1:remove_row -1" \
462 "ignoring GtkTreeView command \"treeview1:remove_row -1\""
463 check_error "treeview1:remove_row nnn" \
464 "ignoring GtkTreeView command \"treeview1:remove_row nnn\""
465 check_error "treeview1:remove_row" \
466 "ignoring GtkTreeView command \"treeview1:remove_row\""
467 check_error "treeview1:remove_row " \
468 "ignoring GtkTreeView command \"treeview1:remove_row \""
469 check_error "treeview2:remove_row" \
470 "ignoring GtkTreeView command \"treeview2:remove_row\""
471 check_error "treeview2:remove_row abc" \
472 "ignoring GtkTreeView command \"treeview2:remove_row abc\""
473 check_error "treeview2:remove_row 0:abc" \
474 "ignoring GtkTreeView command \"treeview2:remove_row 0:abc\""
475 # GtkTreeView scroll
476 check_error "treeview1:scroll" \
477 "ignoring GtkTreeView command \"treeview1:scroll\""
478 check_error "treeview1:scroll " \
479 "ignoring GtkTreeView command \"treeview1:scroll \""
480 check_error "treeview1:scroll nnn" \
481 "ignoring GtkTreeView command \"treeview1:scroll nnn\""
482 check_error "treeview1:scroll -1 1" \
483 "ignoring GtkTreeView command \"treeview1:scroll -1 1\""
484 check_error "treeview1:scroll 1 -1" \
485 "ignoring GtkTreeView command \"treeview1:scroll 1 -1\""
486 check_error "treeview1:scroll nnn 1" \
487 "ignoring GtkTreeView command \"treeview1:scroll nnn 1\""
488 check_error "treeview1:scroll 1 nnn" \
489 "ignoring GtkTreeView command \"treeview1:scroll 1 nnn\""
490 check_error "treeview2:scroll" \
491 "ignoring GtkTreeView command \"treeview2:scroll\""
492 check_error "treeview2:scroll abc" \
493 "ignoring GtkTreeView command \"treeview2:scroll abc\""
494 check_error "treeview2:scroll 0:abc" \
495 "ignoring GtkTreeView command \"treeview2:scroll 0:abc\""
496 check_error "treeview2:scroll abc 0" \
497 "ignoring GtkTreeView command \"treeview2:scroll abc 0\""
498 check_error "treeview2:scroll 0:abc 0" \
499 "ignoring GtkTreeView command \"treeview2:scroll 0:abc 0\""
500 check_error "treeview2:scroll 0:0" \
501 "ignoring GtkTreeView command \"treeview2:scroll 0:0\""
502 check_error "treeview2:scroll 0:0 abc" \
503 "ignoring GtkTreeView command \"treeview2:scroll 0:0 abc\""
504 check_error "treeview2:set_cursor abc" \
505 "ignoring GtkTreeView command \"treeview2:set_cursor abc\""
506 check_error "treeview2:set_cursor 0:abc" \
507 "ignoring GtkTreeView command \"treeview2:set_cursor 0:abc\""
508 check_error "treeview2:clear 0" \
509 "ignoring GtkTreeView command \"treeview2:clear 0\""
510 check_error "treeview2:clear\n treeview2:insert_row 0" \
511 "ignoring GtkTreeView command \" treeview2:insert_row 0\""
512 # GtkTreeView set
513 check_error "treeview1:set" \
514 "ignoring GtkTreeView command \"treeview1:set\""
515 check_error "treeview1:set " \
516 "ignoring GtkTreeView command \"treeview1:set \""
517 check_error "treeview1:set nnn" \
518 "ignoring GtkTreeView command \"treeview1:set nnn\""
519 check_error "treeview1:set 0 nnn" \
520 "ignoring GtkTreeView command \"treeview1:set 0 nnn\""
521 check_error "treeview1:set nnn 0" \
522 "ignoring GtkTreeView command \"treeview1:set nnn 0\""
523 check_error "treeview1:set 1 10000 77" \
524 "ignoring GtkTreeView command \"treeview1:set 1 10000 77\""
525 check_error "treeview1:set 1 11 77" \
526 "ignoring GtkTreeView command \"treeview1:set 1 11 77\""
527 check_error "treeview1:set nnn 1 77" \
528 "ignoring GtkTreeView command \"treeview1:set nnn 1 77\""
529 check_error "treeview1:set 1 nnn 77" \
530 "ignoring GtkTreeView command \"treeview1:set 1 nnn 77\""
531 check_error "treeview1:set -1 1 77" \
532 "ignoring GtkTreeView command \"treeview1:set -1 1 77\""
533 check_error "treeview1:set 1 -1 77" \
534 "ignoring GtkTreeView command \"treeview1:set 1 -1 77\""
535 # GtkTree set "abc" into numeric column
536 check_error "treeview1:set 1 1 abc" \
537 "ignoring GtkTreeView command \"treeview1:set 1 1 abc\""
538
539 # GtkTreeViewColumn
540 check_error "treeviewcolumn3:nnn" \
541 "ignoring GtkTreeViewColumn command \"treeviewcolumn3:nnn\""
542 check_error "treeviewcolumn3:force" \
543 "ignoring GtkTreeViewColumn command \"treeviewcolumn3:force\""
544 # GtkEntry
545 check_error "entry1:nnn" \
546 "ignoring GtkEntry command \"entry1:nnn\""
547 # GtkCalendar
548 check_error "calendar1:nnn" \
549 "ignoring GtkCalendar command \"calendar1:nnn\""
550 check_error "calendar1:select_date" \
551 "ignoring GtkCalendar command \"calendar1:select_date\""
552 check_error "calendar1:select_date " \
553 "ignoring GtkCalendar command \"calendar1:select_date \""
554 check_error "calendar1:select_date nnn" \
555 "ignoring GtkCalendar command \"calendar1:select_date nnn\""
556 check_error "calendar1:select_date 2000-12-33" \
557 "ignoring GtkCalendar command \"calendar1:select_date 2000-12-33\""
558 check_error "calendar1:select_date 2000-13-20" \
559 "ignoring GtkCalendar command \"calendar1:select_date 2000-13-20\""
560 # GtkSocket
561 check_error "socket1:nnn" \
562 "ignoring GtkSocket command \"socket1:nnn\""
563 # GtkScrolledWindow
564 check_error "scrolledwindow3:nnn" \
565 "ignoring GtkScrolledWindow command \"scrolledwindow3:nnn\""
566 check_error "scrolledwindow3:hscroll" \
567 "ignoring GtkScrolledWindow command \"scrolledwindow3:hscroll\""
568 check_error "scrolledwindow3:hscroll " \
569 "ignoring GtkScrolledWindow command \"scrolledwindow3:hscroll \""
570 check_error "scrolledwindow3:hscroll nnn" \
571 "ignoring GtkScrolledWindow command \"scrolledwindow3:hscroll nnn\""
572 check_error "scrolledwindow3:vscroll" \
573 "ignoring GtkScrolledWindow command \"scrolledwindow3:vscroll\""
574 check_error "scrolledwindow3:vscroll " \
575 "ignoring GtkScrolledWindow command \"scrolledwindow3:vscroll \""
576 check_error "scrolledwindow3:vscroll nnn" \
577 "ignoring GtkScrolledWindow command \"scrolledwindow3:vscroll nnn\""
578 check_error "scrolledwindow3:hscroll_to_range" \
579 "ignoring GtkScrolledWindow command \"scrolledwindow3:hscroll_to_range\""
580 check_error "scrolledwindow3:hscroll_to_range " \
581 "ignoring GtkScrolledWindow command \"scrolledwindow3:hscroll_to_range \""
582 check_error "scrolledwindow3:hscroll_to_range nnn" \
583 "ignoring GtkScrolledWindow command \"scrolledwindow3:hscroll_to_range nnn\""
584 check_error "scrolledwindow3:hscroll_to_range 10" \
585 "ignoring GtkScrolledWindow command \"scrolledwindow3:hscroll_to_range 10\""
586 check_error "scrolledwindow3:hscroll_to_range 10 nnn" \
587 "ignoring GtkScrolledWindow command \"scrolledwindow3:hscroll_to_range 10 nnn\""
588 check_error "scrolledwindow3:hscroll_to_range nnn 10" \
589 "ignoring GtkScrolledWindow command \"scrolledwindow3:hscroll_to_range nnn 10\""
590 check_error "scrolledwindow3:vscroll_to_range" \
591 "ignoring GtkScrolledWindow command \"scrolledwindow3:vscroll_to_range\""
592 check_error "scrolledwindow3:vscroll_to_range " \
593 "ignoring GtkScrolledWindow command \"scrolledwindow3:vscroll_to_range \""
594 check_error "scrolledwindow3:vscroll_to_range nnn" \
595 "ignoring GtkScrolledWindow command \"scrolledwindow3:vscroll_to_range nnn\""
596 check_error "scrolledwindow3:vscroll_to_range 10" \
597 "ignoring GtkScrolledWindow command \"scrolledwindow3:vscroll_to_range 10\""
598 check_error "scrolledwindow3:vscroll_to_range 10 nnn" \
599 "ignoring GtkScrolledWindow command \"scrolledwindow3:vscroll_to_range 10 nnn\""
600 check_error "scrolledwindow3:vscroll_to_range nnn 10" \
601 "ignoring GtkScrolledWindow command \"scrolledwindow3:vscroll_to_range nnn 10\""
602 # GtkEventBox
603 check_error "eventbox1:nnn" \
604 "ignoring GtkEventBox command \"eventbox1:nnn\""
605 # GtkDrawingArea
606 check_error "drawingarea1:nnn" \
607 "ignoring GtkDrawingArea command \"drawingarea1:nnn\""
608 check_error "drawingarea1:rectangle" \
609 "ignoring GtkDrawingArea command \"drawingarea1:rectangle\""
610 check_error "drawingarea1:rectangle " \
611 "ignoring GtkDrawingArea command \"drawingarea1:rectangle \""
612 check_error "drawingarea1:rectangle nnn" \
613 "ignoring GtkDrawingArea command \"drawingarea1:rectangle nnn\""
614 check_error "drawingarea1:rectangle 1" \
615 "ignoring GtkDrawingArea command \"drawingarea1:rectangle 1\""
616 check_error "drawingarea1:rectangle 1 10" \
617 "ignoring GtkDrawingArea command \"drawingarea1:rectangle 1 10\""
618 check_error "drawingarea1:rectangle 1 10 10" \
619 "ignoring GtkDrawingArea command \"drawingarea1:rectangle 1 10 10\""
620 check_error "drawingarea1:rectangle 1 10 10 20" \
621 "ignoring GtkDrawingArea command \"drawingarea1:rectangle 1 10 10 20\""
622 check_error "drawingarea1:rectangle 1 10 10 20 nnn" \
623 "ignoring GtkDrawingArea command \"drawingarea1:rectangle 1 10 10 20 nnn\""
624 check_error "drawingarea1:arc" \
625 "ignoring GtkDrawingArea command \"drawingarea1:arc\""
626 check_error "drawingarea1:arc " \
627 "ignoring GtkDrawingArea command \"drawingarea1:arc \""
628 check_error "drawingarea1:arc nnn" \
629 "ignoring GtkDrawingArea command \"drawingarea1:arc nnn\""
630 check_error "drawingarea1:arc 1" \
631 "ignoring GtkDrawingArea command \"drawingarea1:arc 1\""
632 check_error "drawingarea1:arc 1 10" \
633 "ignoring GtkDrawingArea command \"drawingarea1:arc 1 10\""
634 check_error "drawingarea1:arc 1 10 10" \
635 "ignoring GtkDrawingArea command \"drawingarea1:arc 1 10 10\""
636 check_error "drawingarea1:arc 1 10 10 20" \
637 "ignoring GtkDrawingArea command \"drawingarea1:arc 1 10 10 20\""
638 check_error "drawingarea1:arc 1 10 10 20 45" \
639 "ignoring GtkDrawingArea command \"drawingarea1:arc 1 10 10 20 45\""
640 check_error "drawingarea1:arc 1 10 10 20 45 nnn" \
641 "ignoring GtkDrawingArea command \"drawingarea1:arc 1 10 10 20 45 nnn\""
642 check_error "drawingarea1:arc_negative" \
643 "ignoring GtkDrawingArea command \"drawingarea1:arc_negative\""
644 check_error "drawingarea1:arc_negative " \
645 "ignoring GtkDrawingArea command \"drawingarea1:arc_negative \""
646 check_error "drawingarea1:arc_negative nnn" \
647 "ignoring GtkDrawingArea command \"drawingarea1:arc_negative nnn\""
648 check_error "drawingarea1:arc_negative 1" \
649 "ignoring GtkDrawingArea command \"drawingarea1:arc_negative 1\""
650 check_error "drawingarea1:arc_negative 1 10" \
651 "ignoring GtkDrawingArea command \"drawingarea1:arc_negative 1 10\""
652 check_error "drawingarea1:arc_negative 1 10 10" \
653 "ignoring GtkDrawingArea command \"drawingarea1:arc_negative 1 10 10\""
654 check_error "drawingarea1:arc_negative 1 10 10 20" \
655 "ignoring GtkDrawingArea command \"drawingarea1:arc_negative 1 10 10 20\""
656 check_error "drawingarea1:arc_negative 1 10 10 20 45" \
657 "ignoring GtkDrawingArea command \"drawingarea1:arc_negative 1 10 10 20 45\""
658 check_error "drawingarea1:arc_negative 1 10 10 20 45 nnn" \
659 "ignoring GtkDrawingArea command \"drawingarea1:arc_negative 1 10 10 20 45 nnn\""
660 check_error "drawingarea1:curve_to" \
661 "ignoring GtkDrawingArea command \"drawingarea1:curve_to\""
662 check_error "drawingarea1:curve_to " \
663 "ignoring GtkDrawingArea command \"drawingarea1:curve_to \""
664 check_error "drawingarea1:curve_to nnn" \
665 "ignoring GtkDrawingArea command \"drawingarea1:curve_to nnn\""
666 check_error "drawingarea1:curve_to 1" \
667 "ignoring GtkDrawingArea command \"drawingarea1:curve_to 1\""
668 check_error "drawingarea1:curve_to 1 10" \
669 "ignoring GtkDrawingArea command \"drawingarea1:curve_to 1 10\""
670 check_error "drawingarea1:curve_to 1 10 10" \
671 "ignoring GtkDrawingArea command \"drawingarea1:curve_to 1 10 10\""
672 check_error "drawingarea1:curve_to 1 10 10 20" \
673 "ignoring GtkDrawingArea command \"drawingarea1:curve_to 1 10 10 20\""
674 check_error "drawingarea1:curve_to 1 10 10 20 20" \
675 "ignoring GtkDrawingArea command \"drawingarea1:curve_to 1 10 10 20 20\""
676 check_error "drawingarea1:curve_to 1 10 10 20 20 25" \
677 "ignoring GtkDrawingArea command \"drawingarea1:curve_to 1 10 10 20 20 25\""
678 check_error "drawingarea1:curve_to 1 10 10 20 20 25 nnn" \
679 "ignoring GtkDrawingArea command \"drawingarea1:curve_to 1 10 10 20 20 25 nnn\""
680 check_error "drawingarea1:rel_curve_to" \
681 "ignoring GtkDrawingArea command \"drawingarea1:rel_curve_to\""
682 check_error "drawingarea1:rel_curve_to " \
683 "ignoring GtkDrawingArea command \"drawingarea1:rel_curve_to \""
684 check_error "drawingarea1:rel_curve_to nnn" \
685 "ignoring GtkDrawingArea command \"drawingarea1:rel_curve_to nnn\""
686 check_error "drawingarea1:rel_curve_to 1" \
687 "ignoring GtkDrawingArea command \"drawingarea1:rel_curve_to 1\""
688 check_error "drawingarea1:rel_curve_to 1 10" \
689 "ignoring GtkDrawingArea command \"drawingarea1:rel_curve_to 1 10\""
690 check_error "drawingarea1:rel_curve_to 1 10 10" \
691 "ignoring GtkDrawingArea command \"drawingarea1:rel_curve_to 1 10 10\""
692 check_error "drawingarea1:rel_curve_to 1 10 10 20" \
693 "ignoring GtkDrawingArea command \"drawingarea1:rel_curve_to 1 10 10 20\""
694 check_error "drawingarea1:rel_curve_to 1 10 10 20 20" \
695 "ignoring GtkDrawingArea command \"drawingarea1:rel_curve_to 1 10 10 20 20\""
696 check_error "drawingarea1:rel_curve_to 1 10 10 20 20 25" \
697 "ignoring GtkDrawingArea command \"drawingarea1:rel_curve_to 1 10 10 20 20 25\""
698 check_error "drawingarea1:rel_curve_to 1 10 10 20 20 25 nnn" \
699 "ignoring GtkDrawingArea command \"drawingarea1:rel_curve_to 1 10 10 20 20 25 nnn\""
700 check_error "drawingarea1:line_to" \
701 "ignoring GtkDrawingArea command \"drawingarea1:line_to\""
702 check_error "drawingarea1:line_to " \
703 "ignoring GtkDrawingArea command \"drawingarea1:line_to \""
704 check_error "drawingarea1:line_to nnn" \
705 "ignoring GtkDrawingArea command \"drawingarea1:line_to nnn\""
706 check_error "drawingarea1:line_to 1" \
707 "ignoring GtkDrawingArea command \"drawingarea1:line_to 1\""
708 check_error "drawingarea1:line_to 1 20" \
709 "ignoring GtkDrawingArea command \"drawingarea1:line_to 1 20\""
710 check_error "drawingarea1:line_to 1 20 nnn" \
711 "ignoring GtkDrawingArea command \"drawingarea1:line_to 1 20 nnn\""
712 check_error "drawingarea1:rel_line_to" \
713 "ignoring GtkDrawingArea command \"drawingarea1:rel_line_to\""
714 check_error "drawingarea1:rel_line_to " \
715 "ignoring GtkDrawingArea command \"drawingarea1:rel_line_to \""
716 check_error "drawingarea1:rel_line_to nnn" \
717 "ignoring GtkDrawingArea command \"drawingarea1:rel_line_to nnn\""
718 check_error "drawingarea1:rel_line_to 1" \
719 "ignoring GtkDrawingArea command \"drawingarea1:rel_line_to 1\""
720 check_error "drawingarea1:rel_line_to 1 20" \
721 "ignoring GtkDrawingArea command \"drawingarea1:rel_line_to 1 20\""
722 check_error "drawingarea1:rel_line_to 1 20 nnn" \
723 "ignoring GtkDrawingArea command \"drawingarea1:rel_line_to 1 20 nnn\""
724 check_error "drawingarea1:move_to" \
725 "ignoring GtkDrawingArea command \"drawingarea1:move_to\""
726 check_error "drawingarea1:move_to " \
727 "ignoring GtkDrawingArea command \"drawingarea1:move_to \""
728 check_error "drawingarea1:move_to nnn" \
729 "ignoring GtkDrawingArea command \"drawingarea1:move_to nnn\""
730 check_error "drawingarea1:move_to 1" \
731 "ignoring GtkDrawingArea command \"drawingarea1:move_to 1\""
732 check_error "drawingarea1:move_to 1 20" \
733 "ignoring GtkDrawingArea command \"drawingarea1:move_to 1 20\""
734 check_error "drawingarea1:move_to 1 20 nnn" \
735 "ignoring GtkDrawingArea command \"drawingarea1:move_to 1 20 nnn\""
736 check_error "drawingarea1:rel_move_to" \
737 "ignoring GtkDrawingArea command \"drawingarea1:rel_move_to\""
738 check_error "drawingarea1:rel_move_to " \
739 "ignoring GtkDrawingArea command \"drawingarea1:rel_move_to \""
740 check_error "drawingarea1:rel_move_to nnn" \
741 "ignoring GtkDrawingArea command \"drawingarea1:rel_move_to nnn\""
742 check_error "drawingarea1:rel_move_to 1" \
743 "ignoring GtkDrawingArea command \"drawingarea1:rel_move_to 1\""
744 check_error "drawingarea1:rel_move_to 1 20" \
745 "ignoring GtkDrawingArea command \"drawingarea1:rel_move_to 1 20\""
746 check_error "drawingarea1:rel_move_to 1 20 nnn" \
747 "ignoring GtkDrawingArea command \"drawingarea1:rel_move_to 1 20 nnn\""
748 check_error "drawingarea1:close_path" \
749 "ignoring GtkDrawingArea command \"drawingarea1:close_path\""
750 check_error "drawingarea1:close_path " \
751 "ignoring GtkDrawingArea command \"drawingarea1:close_path \""
752 check_error "drawingarea1:close_path nnn" \
753 "ignoring GtkDrawingArea command \"drawingarea1:close_path nnn\""
754 check_error "drawingarea1:set_source_rgba" \
755 "ignoring GtkDrawingArea command \"drawingarea1:set_source_rgba\""
756 check_error "drawingarea1:set_source_rgba " \
757 "ignoring GtkDrawingArea command \"drawingarea1:set_source_rgba \""
758 check_error "drawingarea1:set_source_rgba nnn" \
759 "ignoring GtkDrawingArea command \"drawingarea1:set_source_rgba nnn\""
760 check_error "drawingarea1:set_dash" \
761 "ignoring GtkDrawingArea command \"drawingarea1:set_dash\""
762 check_error "drawingarea1:set_dash " \
763 "ignoring GtkDrawingArea command \"drawingarea1:set_dash \""
764 check_error "drawingarea1:set_dash nnn" \
765 "ignoring GtkDrawingArea command \"drawingarea1:set_dash nnn\""
766 check_error "drawingarea1:set_line_cap" \
767 "ignoring GtkDrawingArea command \"drawingarea1:set_line_cap\""
768 check_error "drawingarea1:set_line_cap " \
769 "ignoring GtkDrawingArea command \"drawingarea1:set_line_cap \""
770 check_error "drawingarea1:set_line_cap nnn" \
771 "ignoring GtkDrawingArea command \"drawingarea1:set_line_cap nnn\""
772 check_error "drawingarea1:set_line_cap 1" \
773 "ignoring GtkDrawingArea command \"drawingarea1:set_line_cap 1\""
774 check_error "drawingarea1:set_line_cap 1 nnn" \
775 "ignoring GtkDrawingArea command \"drawingarea1:set_line_cap 1 nnn\""
776 check_error "drawingarea1:set_line_join" \
777 "ignoring GtkDrawingArea command \"drawingarea1:set_line_join\""
778 check_error "drawingarea1:set_line_join " \
779 "ignoring GtkDrawingArea command \"drawingarea1:set_line_join \""
780 check_error "drawingarea1:set_line_join nnn" \
781 "ignoring GtkDrawingArea command \"drawingarea1:set_line_join nnn\""
782 check_error "drawingarea1:set_line_join 1" \
783 "ignoring GtkDrawingArea command \"drawingarea1:set_line_join 1\""
784 check_error "drawingarea1:set_line_join 1 nnn" \
785 "ignoring GtkDrawingArea command \"drawingarea1:set_line_join 1 nnn\""
786 check_error "drawingarea1:set_line_width" \
787 "ignoring GtkDrawingArea command \"drawingarea1:set_line_width\""
788 check_error "drawingarea1:set_line_width " \
789 "ignoring GtkDrawingArea command \"drawingarea1:set_line_width \""
790 check_error "drawingarea1:set_line_width nnn" \
791 "ignoring GtkDrawingArea command \"drawingarea1:set_line_width nnn\""
792 check_error "drawingarea1:set_line_width 1" \
793 "ignoring GtkDrawingArea command \"drawingarea1:set_line_width 1\""
794 check_error "drawingarea1:set_line_width 1 nnn" \
795 "ignoring GtkDrawingArea command \"drawingarea1:set_line_width 1 nnn\""
796 check_error "drawingarea1:fill" \
797 "ignoring GtkDrawingArea command \"drawingarea1:fill\""
798 check_error "drawingarea1:fill " \
799 "ignoring GtkDrawingArea command \"drawingarea1:fill \""
800 check_error "drawingarea1:fill nnn" \
801 "ignoring GtkDrawingArea command \"drawingarea1:fill nnn\""
802 check_error "drawingarea1:fill_preserve" \
803 "ignoring GtkDrawingArea command \"drawingarea1:fill_preserve\""
804 check_error "drawingarea1:fill_preserve " \
805 "ignoring GtkDrawingArea command \"drawingarea1:fill_preserve \""
806 check_error "drawingarea1:fill_preserve nnn" \
807 "ignoring GtkDrawingArea command \"drawingarea1:fill_preserve nnn\""
808 check_error "drawingarea1:stroke" \
809 "ignoring GtkDrawingArea command \"drawingarea1:stroke\""
810 check_error "drawingarea1:stroke " \
811 "ignoring GtkDrawingArea command \"drawingarea1:stroke \""
812 check_error "drawingarea1:stroke nnn" \
813 "ignoring GtkDrawingArea command \"drawingarea1:stroke nnn\""
814 check_error "drawingarea1:stroke_preserve" \
815 "ignoring GtkDrawingArea command \"drawingarea1:stroke_preserve\""
816 check_error "drawingarea1:stroke_preserve " \
817 "ignoring GtkDrawingArea command \"drawingarea1:stroke_preserve \""
818 check_error "drawingarea1:stroke_preserve nnn" \
819 "ignoring GtkDrawingArea command \"drawingarea1:stroke_preserve nnn\""
820 check_error "drawingarea1:remove" \
821 "ignoring GtkDrawingArea command \"drawingarea1:remove\""
822 check_error "drawingarea1:remove " \
823 "ignoring GtkDrawingArea command \"drawingarea1:remove \""
824 check_error "drawingarea1:remove nnn" \
825 "ignoring GtkDrawingArea command \"drawingarea1:remove nnn\""
826 check_error "drawingarea1:set_show_text" \
827 "ignoring GtkDrawingArea command \"drawingarea1:set_show_text\""
828 check_error "drawingarea1:set_show_text " \
829 "ignoring GtkDrawingArea command \"drawingarea1:set_show_text \""
830 check_error "drawingarea1:set_show_text nnn" \
831 "ignoring GtkDrawingArea command \"drawingarea1:set_show_text nnn\""
832 check_error "drawingarea1:set_font_size" \
833 "ignoring GtkDrawingArea command \"drawingarea1:set_font_size\""
834 check_error "drawingarea1:set_font_size " \
835 "ignoring GtkDrawingArea command \"drawingarea1:set_font_size \""
836 check_error "drawingarea1:set_font_size nnn" \
837 "ignoring GtkDrawingArea command \"drawingarea1:set_font_size nnn\""
838 check_error "drawingarea1:set_font_size 1" \
839 "ignoring GtkDrawingArea command \"drawingarea1:set_font_size 1\""
840 check_error "drawingarea1:set_font_size 1 nnn" \
841 "ignoring GtkDrawingArea command \"drawingarea1:set_font_size 1 nnn\""
842 check_error "drawingarea1:set_font_face" \
843 "ignoring GtkDrawingArea command \"drawingarea1:set_font_face\""
844 check_error "drawingarea1:set_font_face 1" \
845 "ignoring GtkDrawingArea command \"drawingarea1:set_font_face 1\""
846 check_error "drawingarea1:set_font_face 1 normal" \
847 "ignoring GtkDrawingArea command \"drawingarea1:set_font_face 1 normal\""
848 check_error "drawingarea1:set_font_face 1 normal nnn" \
849 "ignoring GtkDrawingArea command \"drawingarea1:set_font_face 1 normal nnn\""
850 check_error "drawingarea1:set_font_face 1 nnn normal" \
851 "ignoring GtkDrawingArea command \"drawingarea1:set_font_face 1 nnn normal\""
852 check_error "drawingarea1:set_font_face x normal normal" \
853 "ignoring GtkDrawingArea command \"drawingarea1:set_font_face x normal normal\""
854
855 echo "_:main_quit" >$FIN
856
857 check_rm $FIN
858
859
860 ## Logging to stderr
861 read r 2< $FERR &
862 ./pipeglade -i $FIN 2> $FERR -l - &
863
864 # wait for $FIN to appear
865 while test ! \( -e $FIN \); do :; done
866
867 check_error "# Comment" \
868 "########## ##### (New Pipeglade session) #####"
869 check_error "" \
870 "### (Idle) ###"
871 check_error "_:main_quit" \
872 " # Comment"
873
874 check_rm $FIN
875 rm $FERR
876
877
878
879 #exit
880 echo "
881 # BATCH THREE
882 #
883 # Tests for the principal functionality---valid actions leading to
884 # correct results. Manual intervention is required. Instructions
885 # will be given on the statusbar of the test GUI.
886 ######################################################################
887 "
888
889 mkfifo $FOUT
890
891 # check nr_of_feedback_msgs user_instruction command expected_feedback1 expected_feedback2 ...
892 check() {
893 # Flush stale pipeglade output
894 while read -t .1 <$FOUT; do : ; done
895 N=$1
896 INSTRUCTION="$2"
897 echo "$SEND $3"
898 if test "$INSTRUCTION"; then
899 echo -e "statusbar1:push_id =check= $INSTRUCTION" >$FIN
900 fi
901 echo -e "$3" >$FIN
902 i=0
903 while (( i<$N )); do
904 read r <$FOUT
905 if test "$r" != ""; then
906 if grep -qe "$4" <<< $r; then
907 count_ok
908 echo " $OK ($i) $r"
909 else
910 count_fail
911 echo " $FAIL($i) $r"
912 echo " $EXPECTED $4"
913 fi
914 shift
915 (( i+=1 ))
916 fi
917 done
918 if test "$INSTRUCTION"; then
919 echo -e "statusbar1:pop_id =check=" >$FIN
920 fi
921 }
922
923
924 ./pipeglade -i $FIN -o $FOUT -b >$PID_FILE
925 check_cmd "kill `cat $PID_FILE`"
926 rm $FIN $FOUT
927
928
929 ./pipeglade --display ${DISPLAY-:0} -i $FIN -o $FOUT &
930
931 # wait for $FIN and $FOUT to appear
932 while test ! \( -e $FIN -a -e $FOUT \); do :; done
933
934 check 0 "" \
935 "# checking --display $DISPLAY\n _:main_quit"
936
937 check_rm $FIN
938 check_rm $FOUT
939
940
941 ./pipeglade -u simple_dialog.ui -i $FIN -o $FOUT -b >$PID_FILE
942
943 # wait for $FIN and $FOUT to appear
944 while test ! \( -e $FIN -a -e $FOUT \); do :; done
945
946 check_cmd "ps -p `cat $PID_FILE` >/dev/null"
947 check 1 "" \
948 "main_apply:force" "main_apply:clicked"
949 check 0 "" \
950 "main_cancel:force"
951
952 check_rm $FIN
953 check_rm $FOUT
954 check_cmd "! ps -p `cat $PID_FILE` >/dev/null"
955 rm $PID_FILE
956
957
958 ./pipeglade -u simple_dialog.ui -i $FIN -o $FOUT &
959
960 # wait for $FIN and $FOUT to appear
961 while test ! \( -e $FIN -a -e $FOUT \); do :; done
962
963 check 1 "" \
964 "button1:force" "button1:clicked"
965 check 1 "" \
966 "main_ok:force" "main_ok:clicked"
967
968 check_rm $FIN
969 check_rm $FOUT
970
971
972 ./pipeglade -u simple_open.ui -i $FIN -o $FOUT &
973
974 # wait for $FIN and $FOUT to appear
975 while test ! \( -e $FIN -a -e $FOUT \); do :; done
976
977 check 3 "" \
978 "main_apply:force" \
979 "main_apply:clicked" \
980 "main:file" \
981 "main:folder"
982 check 0 "" \
983 "main_cancel:force"
984
985 check_rm $FIN
986 check_rm $FOUT
987
988
989 ./pipeglade -u simple_open.ui -i $FIN -o $FOUT &
990
991 # wait for $FIN and $FOUT to appear
992 while test ! \( -e $FIN -a -e $FOUT \); do :; done
993
994 check 2 "" \
995 "main_ok:force" \
996 "main_ok:clicked" \
997 "main:file" \
998 "main:folder"
999
1000 check_rm $FIN
1001 check_rm $FOUT
1002
1003
1004 mkfifo -m 777 $FIN
1005 mkfifo -m 777 $FOUT
1006 ./pipeglade -i $FIN -o $FOUT &
1007 check_cmd "$STAT_CMD $FIN | grep '600$'"
1008 check_cmd "$STAT_CMD $FOUT | grep '600$'"
1009 echo -e "_:main_quit" > $FIN
1010 check_rm $FIN
1011 check_rm $FOUT
1012
1013 ./pipeglade -i $FIN -o $FOUT &
1014
1015 # wait for $FIN and $FOUT to appear
1016 while test ! \( -e $FIN -a -e $FOUT \); do :; done
1017
1018 check_cmd "$STAT_CMD $FIN | grep '600$'"
1019 check_cmd "$STAT_CMD $FOUT | grep '600$'"
1020 echo -e "_:main_quit" > $FIN
1021 check_rm $FIN
1022 check_rm $FOUT
1023
1024
1025 echo "#### # Initial line to check if -l option appends" >$LOG
1026 ./pipeglade -i $FIN -o $FOUT -l $LOG &
1027
1028 # wait for $FIN and $FOUT to appear
1029 while test ! \( -e $FIN -a -e $FOUT \); do :; done
1030
1031 check 0 "" \
1032 "socket1:id"
1033 read XID <$FOUT
1034 XID=${XID/socket1:id }
1035 (sleep .5; ./pipeglade -u simple_dialog.ui -e $XID <<< "main_cancel:force") &
1036 check 2 "" \
1037 "" \
1038 "socket1:plug-added" \
1039 "socket1:plug-removed"
1040 (sleep .5; ./pipeglade -u simple_dialog.ui -e $XID <<< "main_cancel:force") &
1041 check 2 "" \
1042 "" \
1043 "socket1:plug-added" \
1044 "socket1:plug-removed"
1045
1046 check 1 "" \
1047 "entry1:set_text FFFF" \
1048 "entry1:text FFFF"
1049 check 1 "" \
1050 "entry1:set_text" \
1051 "entry1:text"
1052 check 1 "" \
1053 "entry1:set_text FFFF" \
1054 "entry1:text FFFF"
1055 check 1 "" \
1056 "entry1:set_text " \
1057 "entry1:text"
1058 check 0 "" \
1059 "entry1:set_placeholder_text hint hint" # not much of a test
1060 check 1 "" \
1061 "entry1:set_text FFFF" \
1062 "entry1:text FFFF"
1063 check 1 "" \
1064 "entry1:set_text GGGG" \
1065 "entry1:text GGGG"
1066 check 1 "" \
1067 "entry1:force" \
1068 "entry1:text GGGG"
1069 check 1 "" \
1070 "spinbutton1:set_text 33.0" \
1071 "spinbutton1:text 33.0"
1072 check 2 "" \
1073 "radiobutton2:set_active 1" \
1074 "radiobutton1:0" \
1075 "radiobutton2:1"
1076 check 2 "" \
1077 "radiobutton1:set_active 1" \
1078 "radiobutton2:0" \
1079 "radiobutton1:1"
1080 check 1 "" \
1081 "switch1:set_active 1" \
1082 "switch1:1"
1083 check 1 "" \
1084 "switch1:set_active 0" \
1085 "switch1:0"
1086 check 1 "" \
1087 "togglebutton1:set_active 1" \
1088 "togglebutton1:1"
1089 check 1 "" \
1090 "calendar1:select_date 1752-03-29" \
1091 "calendar1:clicked 1752-03-29"
1092 check 0 "" \
1093 "progressbar1:set_text This Is A Progressbar."
1094
1095 L=$(i=0
1096 while (( i<100 )); do
1097 (( i+=1 ))
1098 echo -n "Repetitive input that is large enough to have the realloc() machinery kick in.---"
1099 done)
1100 check 1 "" \
1101 "entry1:set_text $L" \
1102 "entry1:text $L"
1103
1104 check 1 "Open what should now be named \"EXPANDER\" and click the \"button inside expander\"" \
1105 "expander1:set_expanded 0\n expander1:set_label EXPANDER" \
1106 "button6:clicked"
1107 check 0 "" \
1108 "expander1:set_expanded 0"
1109
1110 check 12 "" \
1111 "treeview2:set_visible 0\n treeview1:set 2 0 1\n treeview1:set 2 1 -30000\n treeview1:set 2 2 66\n treeview1:set 2 3 -2000000000\n treeview1:set 2 4 4000000000\n treeview1:set 2 5 -2000000000\n treeview1:set 2 6 4000000000\n treeview1:set 2 7 3.141\n treeview1:set 2 8 3.141\n treeview1:set 2 9 TEXT\n treeview1:set_cursor 2" \
1112 "treeview1:clicked" \
1113 "treeview1:gboolean 2 0 1" \
1114 "treeview1:gint 2 1 -30000" \
1115 "treeview1:guint 2 2 66" \
1116 "treeview1:glong 2 3 -2000000000" \
1117 "treeview1:glong 2 4 4000000000" \
1118 "treeview1:glong 2 5 -2000000000" \
1119 "treeview1:gulong 2 6 4000000000" \
1120 "treeview1:gfloat 2 7 3.141000" \
1121 "treeview1:gdouble 2 8 3.141000" \
1122 "treeview1:gchararray 2 9 TEXT" \
1123 "treeview1:gchararray 2 10 zzz"
1124 mkdir -p $DIR
1125 check 0 "" \
1126 "treeview1:save $DIR/$FILE1"
1127 check 0 "" \
1128 "treeview1:save $DIR/$FILE1.bak"
1129 check 1 "" \
1130 "treeview1:set_cursor" \
1131 "treeview1:clicked"
1132 check 12 "" \
1133 "treeview1:insert_row 0\n treeview1:insert_row 2\n treeview1:set_cursor 4" \
1134 "treeview1:clicked" \
1135 "treeview1:gboolean 4 0 1" \
1136 "treeview1:gint 4 1 -30000" \
1137 "treeview1:guint 4 2 66" \
1138 "treeview1:glong 4 3 -2000000000" \
1139 "treeview1:glong 4 4 4000000000" \
1140 "treeview1:glong 4 5 -2000000000" \
1141 "treeview1:gulong 4 6 4000000000" \
1142 "treeview1:gfloat 4 7 3.141000" \
1143 "treeview1:gdouble 4 8 3.141000" \
1144 "treeview1:gchararray 4 9 TEXT" \
1145 "treeview1:gchararray 4 10 zzz"
1146 check 1 "" \
1147 "treeview1:set_cursor" \
1148 "treeview1:clicked"
1149 check 12 "" \
1150 "treeview1:move_row 4 0\n treeview1:set_cursor 0" \
1151 "treeview1:clicked" \
1152 "treeview1:gboolean 0 0 1" \
1153 "treeview1:gint 0 1 -30000" \
1154 "treeview1:guint 0 2 66" \
1155 "treeview1:glong 0 3 -2000000000" \
1156 "treeview1:glong 0 4 4000000000" \
1157 "treeview1:glong 0 5 -2000000000" \
1158 "treeview1:gulong 0 6 4000000000" \
1159 "treeview1:gfloat 0 7 3.141000" \
1160 "treeview1:gdouble 0 8 3.141000" \
1161 "treeview1:gchararray 0 9 TEXT" \
1162 "treeview1:gchararray 0 10 zzz"
1163 check 1 "" \
1164 "treeview1:set_cursor" \
1165 "treeview1:clicked"
1166 check 12 "" \
1167 "treeview1:move_row 0 2\n treeview1:set_cursor 1" \
1168 "treeview1:clicked" \
1169 "treeview1:gboolean 1 0 1" \
1170 "treeview1:gint 1 1 -30000" \
1171 "treeview1:guint 1 2 66" \
1172 "treeview1:glong 1 3 -2000000000" \
1173 "treeview1:glong 1 4 4000000000" \
1174 "treeview1:glong 1 5 -2000000000" \
1175 "treeview1:gulong 1 6 4000000000" \
1176 "treeview1:gfloat 1 7 3.141000" \
1177 "treeview1:gdouble 1 8 3.141000" \
1178 "treeview1:gchararray 1 9 TEXT" \
1179 "treeview1:gchararray 1 10 zzz"
1180 check 1 "" \
1181 "treeview1:set_cursor" \
1182 "treeview1:clicked"
1183 check 12 "" \
1184 "treeview1:insert_row end\n treeview1:move_row 1 end\n treeview1:set_cursor 6" \
1185 "treeview1:clicked" \
1186 "treeview1:gboolean 6 0 1" \
1187 "treeview1:gint 6 1 -30000" \
1188 "treeview1:guint 6 2 66" \
1189 "treeview1:glong 6 3 -2000000000" \
1190 "treeview1:glong 6 4 4000000000" \
1191 "treeview1:glong 6 5 -2000000000" \
1192 "treeview1:gulong 6 6 4000000000" \
1193 "treeview1:gfloat 6 7 3.141000" \
1194 "treeview1:gdouble 6 8 3.141000" \
1195 "treeview1:gchararray 6 9 TEXT" \
1196 "treeview1:gchararray 6 10 zzz"
1197 check 1 "" \
1198 "treeview1:set_cursor" \
1199 "treeview1:clicked"
1200 check 12 "" \
1201 "treeview1:remove_row 0\n treeview1:remove_row 2\n treeview1:set_cursor 4" \
1202 "treeview1:clicked" \
1203 "treeview1:gboolean 4 0 1" \
1204 "treeview1:gint 4 1 -30000" \
1205 "treeview1:guint 4 2 66" \
1206 "treeview1:glong 4 3 -2000000000" \
1207 "treeview1:glong 4 4 4000000000" \
1208 "treeview1:glong 4 5 -2000000000" \
1209 "treeview1:gulong 4 6 4000000000" \
1210 "treeview1:gfloat 4 7 3.141000" \
1211 "treeview1:gdouble 4 8 3.141000" \
1212 "treeview1:gchararray 4 9 TEXT" \
1213 "treeview1:gchararray 4 10 zzz"
1214 check 1 "" \
1215 "treeview1:set_cursor" \
1216 "treeview1:clicked"
1217 check 12 "Click the 66% (move_row)" \
1218 "treeview1:move_row 0 end\n treeview1:set_cursor 3" \
1219 "treeview1:clicked" \
1220 "treeview1:gboolean 3 0 1" \
1221 "treeview1:gint 3 1 -30000" \
1222 "treeview1:guint 3 2 66" \
1223 "treeview1:glong 3 3 -2000000000" \
1224 "treeview1:glong 3 4 4000000000" \
1225 "treeview1:glong 3 5 -2000000000" \
1226 "treeview1:gulong 3 6 4000000000" \
1227 "treeview1:gfloat 3 7 3.141000" \
1228 "treeview1:gdouble 3 8 3.141000" \
1229 "treeview1:gchararray 3 9 TEXT" \
1230 "treeview1:gchararray 3 10 zzz"
1231 check 24 "" \
1232 "treeview1:remove_row 3" \
1233 "treeview1:clicked" \
1234 "treeview1:gboolean 3 0 0" \
1235 "treeview1:gint 3 1 0" \
1236 "treeview1:guint 3 2 0" \
1237 "treeview1:glong 3 3 0" \
1238 "treeview1:glong 3 4 0" \
1239 "treeview1:glong 3 5 0" \
1240 "treeview1:gulong 3 6 0" \
1241 "treeview1:gfloat 3 7 0.000000" \
1242 "treeview1:gdouble 3 8 0.000000" \
1243 "treeview1:gchararray 3 9 abc" \
1244 "treeview1:gchararray 3 10 xxx" \
1245 "treeview1:clicked" \
1246 "treeview1:gboolean 3 0 0" \
1247 "treeview1:gint 3 1 0" \
1248 "treeview1:guint 3 2 0" \
1249 "treeview1:glong 3 3 0" \
1250 "treeview1:glong 3 4 0" \
1251 "treeview1:glong 3 5 0" \
1252 "treeview1:gulong 3 6 0" \
1253 "treeview1:gfloat 3 7 0.000000" \
1254 "treeview1:gdouble 3 8 0.000000" \
1255 "treeview1:gchararray 3 9 abc" \
1256 "treeview1:gchararray 3 10 xxx"
1257 check 1 "Click column col4 in the lowest line visible in the scrolled area and type 444 <Enter> (scroll)" \
1258 "treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:insert_row 2\n treeview1:scroll 24 0" \
1259 "treeview1:gint 24 1 444"
1260 check 12 "Click column col3 in the highest line visible in the scrolled area (scroll)" \
1261 "treeview1:scroll 1 0" \
1262 "treeview1:clicked" \
1263 "treeview1:gboolean 1 0 1" \
1264 "treeview1:gint 1 1 3" \
1265 "treeview1:guint 1 2 0" \
1266 "treeview1:glong 1 3 0" \
1267 "treeview1:glong 1 4 0" \
1268 "treeview1:glong 1 5 0" \
1269 "treeview1:gulong 1 6 0" \
1270 "treeview1:gfloat 1 7 0.000000" \
1271 "treeview1:gdouble 1 8 0.000000" \
1272 "treeview1:gchararray 1 9 jkl" \
1273 "treeview1:gchararray 1 10 ZZZ"
1274
1275 check 1 "Click the header of column \"col3\"" \
1276 "" \
1277 "treeviewcolumn3:clicked"
1278
1279 check 2 "" \
1280 "treeview1:clear\n button1:force" \
1281 "treeview1:clicked" \
1282 "button1:clicked"
1283
1284 check 12 "" \
1285 "treeview2:set_visible 1\n treeview2:insert_row end\n treeview2:insert_row 0 as_child\n treeview2:insert_row 0:0 as_child\n treeview2:insert_row 0:0\n treeview2:set 100:1:0 0 1\n treeview2:set 100:1:0 1 -30000\n treeview2:set 100:1:0 2 33\n treeview2:set 100:1:0 3 -2000000000\n treeview2:set 100:1:0 4 4000000000\n treeview2:set 100:1:0 5 -2000000000\n treeview2:set 100:1:0 6 4000000000\n treeview2:set 100:1:0 7 3.141\n treeview2:set 100:1:0 8 3.141\n treeview2:set 100:1:0 9 TEXT\n treeview2:expand_all\n treeview2:set_cursor 100:1:0" \
1286 "treeview2:clicked" \
1287 "treeview2:gboolean 100:1:0 0 1" \
1288 "treeview2:gint 100:1:0 1 -30000" \
1289 "treeview2:guint 100:1:0 2 33" \
1290 "treeview2:glong 100:1:0 3 -2000000000" \
1291 "treeview2:glong 100:1:0 4 4000000000" \
1292 "treeview2:glong 100:1:0 5 -2000000000" \
1293 "treeview2:gulong 100:1:0 6 4000000000" \
1294 "treeview2:gfloat 100:1:0 7 3.141000" \
1295 "treeview2:gdouble 100:1:0 8 3.141000" \
1296 "treeview2:gchararray 100:1:0 9 TEXT" \
1297 "treeview2:gchararray 100:1:0 10"
1298 check 1 "" \
1299 "treeview2:set_cursor" \
1300 "treeview2:clicked"
1301 check 12 "" \
1302 "treeview2:insert_row 0\n treeview2:insert_row 0\n treeview2:set 102:1 3 876543210\n treeview2:set 102 3 448822\n treeview2:collapse\n treeview2:set_cursor 102" \
1303 "treeview2:clicked" \
1304 "treeview2:gboolean 102 0 0" \
1305 "treeview2:gint 102 1 0" \
1306 "treeview2:guint 102 2 0" \
1307 "treeview2:glong 102 3 448822" \
1308 "treeview2:glong 102 4 0" \
1309 "treeview2:glong 102 5 0" \
1310 "treeview2:gulong 102 6 0" \
1311 "treeview2:gfloat 102 7 0.000000" \
1312 "treeview2:gdouble 102 8 0.000000" \
1313 "treeview2:gchararray 102 9" \
1314 "treeview2:gchararray 102 10"
1315 check 1 "" \
1316 "treeview2:set_cursor" \
1317 "treeview2:clicked"
1318 check 0 "" \
1319 "treeview2:save $DIR/$FILE2"
1320 check 0 "" \
1321 "treeview2:save $DIR/$FILE2.bak"
1322 check 12 "" \
1323 "treeview2:insert_row 0\n treeview2:collapse\n treeview2:set_cursor 103" \
1324 "treeview2:clicked" \
1325 "treeview2:gboolean 103 0 0" \
1326 "treeview2:gint 103 1 0" \
1327 "treeview2:guint 103 2 0" \
1328 "treeview2:glong 103 3 448822" \
1329 "treeview2:glong 103 4 0" \
1330 "treeview2:glong 103 5 0" \
1331 "treeview2:gulong 103 6 0" \
1332 "treeview2:gfloat 103 7 0.000000" \
1333 "treeview2:gdouble 103 8 0.000000" \
1334 "treeview2:gchararray 103 9" \
1335 "treeview2:gchararray 103 10"
1336 check 1 "" \
1337 "treeview2:set_cursor" \
1338 "treeview2:clicked"
1339 check 12 "Click the lowest line visible in the scrolled area (1)" \
1340 "treeview2:expand_all 103\n treeview2:scroll 103:1:0 0" \
1341 "treeview2:clicked" \
1342 "treeview2:gboolean 103:1:0 0 1" \
1343 "treeview2:gint 103:1:0 1 -30000" \
1344 "treeview2:guint 103:1:0 2 33" \
1345 "treeview2:glong 103:1:0 3 -2000000000" \
1346 "treeview2:glong 103:1:0 4 4000000000" \
1347 "treeview2:glong 103:1:0 5 -2000000000" \
1348 "treeview2:gulong 103:1:0 6 4000000000" \
1349 "treeview2:gfloat 103:1:0 7 3.141000" \
1350 "treeview2:gdouble 103:1:0 8 3.141000" \
1351 "treeview2:gchararray 103:1:0 9 TEXT" \
1352 "treeview2:gchararray 103:1:0 10"
1353 check 1 "" \
1354 "treeview2:set_cursor" \
1355 "treeview2:clicked"
1356 check 12 "Click the lowest visible line (2)" \
1357 "treeview2:collapse\n treeview2:expand 103\n treeview2:scroll 103:1 0" \
1358 "treeview2:clicked" \
1359 "treeview2:gboolean 103:1 0 0" \
1360 "treeview2:gint 103:1 1 0" \
1361 "treeview2:guint 103:1 2 0" \
1362 "treeview2:glong 103:1 3 876543210" \
1363 "treeview2:glong 103:1 4 0" \
1364 "treeview2:glong 103:1 5 0" \
1365 "treeview2:gulong 103:1 6 0" \
1366 "treeview2:gfloat 103:1 7 0.000000" \
1367 "treeview2:gdouble 103:1 8 0.000000" \
1368 "treeview2:gchararray 103:1 9" \
1369 "treeview2:gchararray 103:1 10"
1370 check 1 "" \
1371 "treeview2:set_cursor" \
1372 "treeview2:clicked"
1373 check 12 "Click the lowest visible line (3)" \
1374 "treeview2:collapse\n treeview2:expand_all\n treeview2:scroll 103:1:0 0" \
1375 "treeview2:clicked" \
1376 "treeview2:gboolean 103:1:0 0 1" \
1377 "treeview2:gint 103:1:0 1 -30000" \
1378 "treeview2:guint 103:1:0 2 33" \
1379 "treeview2:glong 103:1:0 3 -2000000000" \
1380 "treeview2:glong 103:1:0 4 4000000000" \
1381 "treeview2:glong 103:1:0 5 -2000000000" \
1382 "treeview2:gulong 103:1:0 6 4000000000" \
1383 "treeview2:gfloat 103:1:0 7 3.141000" \
1384 "treeview2:gdouble 103:1:0 8 3.141000" \
1385 "treeview2:gchararray 103:1:0 9 TEXT" \
1386 "treeview2:gchararray 103:1:0 10"
1387 check 1 "" \
1388 "treeview2:set_cursor" \
1389 "treeview2:clicked"
1390 check 12 "Click the lowest visible line (4)" \
1391 "treeview2:expand_all\n treeview2:collapse 103:1\n treeview2:scroll 103:1 0" \
1392 "treeview2:clicked" \
1393 "treeview2:gboolean 103:1 0 0" \
1394 "treeview2:gint 103:1 1 0" \
1395 "treeview2:guint 103:1 2 0" \
1396 "treeview2:glong 103:1 3 876543210" \
1397 "treeview2:glong 103:1 4 0" \
1398 "treeview2:glong 103:1 5 0" \
1399 "treeview2:gulong 103:1 6 0" \
1400 "treeview2:gfloat 103:1 7 0.000000" \
1401 "treeview2:gdouble 103:1 8 0.000000" \
1402 "treeview2:gchararray 103:1 9" \
1403 "treeview2:gchararray 103:1 10"
1404 check 1 "" \
1405 "treeview2:set_cursor" \
1406 "treeview2:clicked"
1407
1408 check 12 "" \
1409 "treeview1:clear\n treeview1:set 1 9 ABC\\\\nDEF\\\\nGHI\n treeview1:set_cursor 1" \
1410 "treeview1:clicked" \
1411 "treeview1:gboolean 1 0 0" \
1412 "treeview1:gint 1 1 0" \
1413 "treeview1:guint 1 2 0" \
1414 "treeview1:glong 1 3 0" \
1415 "treeview1:glong 1 4 0" \
1416 "treeview1:glong 1 5 0" \
1417 "treeview1:gulong 1 6 0" \
1418 "treeview1:gfloat 1 7 0.000000" \
1419 "treeview1:gdouble 1 8 0.000000" \
1420 "treeview1:gchararray 1 9 ABCnDEFnGHI" \
1421 "treeview1:gchararray 1 10"
1422
1423 check 0 "" \
1424 "treeview1:clear\n treeview2:clear"
1425 check 0 "" \
1426 "_:load $DIR/$FILE1"
1427 rm -f $DIR/$FILE1
1428 sleep .5
1429 check 1 "" \
1430 "treeview1:save $DIR/$FILE1\n button1:force" \
1431 "button1:clicked"
1432 check_cmd "cmp $DIR/$FILE1 $DIR/$FILE1.bak"
1433 check 0 "" \
1434 "treeview1:clear\n treeview2:clear"
1435 check 0 "" \
1436 "_:load $DIR/$FILE2"
1437 sleep .5
1438 rm -f $DIR/$FILE2
1439 sleep .5
1440 check 1 "" \
1441 "treeview2:save $DIR/$FILE2\n button1:force" \
1442 "button1:clicked"
1443 check_cmd "cmp $DIR/$FILE2 $DIR/$FILE2.bak"
1444 cat >$DIR/$FILE3 <<< "_:load $DIR/$FILE1.bak"
1445 cat >>$DIR/$FILE3 <<< "_:load $DIR/$FILE2.bak"
1446 cat >$DIR/$FILE4 <<< "_:load $DIR/$FILE3"
1447 cat >$DIR/$FILE5 <<< "_:load $DIR/$FILE4"
1448 cat >$DIR/$FILE6 <<< "_:load $DIR/$FILE5"
1449 rm -f $DIR/$FILE1 $DIR/$FILE2
1450 sleep .5
1451 check 0 "" \
1452 "treeview1:clear\n treeview2:clear"
1453 check 0 "" \
1454 "_:load $DIR/$FILE6"
1455 rm -f $DIR/$FILE1 $DIR/$FILE2
1456 sleep .5
1457 check 1 "" \
1458 "treeview1:save $DIR/$FILE1\n treeview2:save $DIR/$FILE2\n button1:force" \
1459 "button1:clicked"
1460 check_cmd "cmp $DIR/$FILE1 $DIR/$FILE1.bak"
1461 check_cmd "cmp $DIR/$FILE2 $DIR/$FILE2.bak"
1462 rm -rf $DIR
1463 check 0 "" \
1464 "treeview2:clear\n treeview2:set 2 0 1"
1465
1466 check 1 "Click the header of column \"col23\"" \
1467 "" \
1468 "treeviewcolumn23:clicked"
1469
1470 check 0 "" \
1471 "notebook1:set_current_page 2"
1472 check 1 "" \
1473 "nonexistent_send_text:force" \
1474 "nonexistent_send_text:clicked"
1475 check 1 "" \
1476 "nonexistent_send_selection:force" \
1477 "nonexistent_send_selection:clicked"
1478 check 1 "" \
1479 "nonexistent_ok:force" \
1480 "nonexistent_ok:clicked"
1481 check 1 "" \
1482 "nonexistent_apply:force" \
1483 "nonexistent_apply:clicked"
1484 check 1 "" \
1485 "nonexistent_cancel:force" \
1486 "nonexistent_cancel:clicked"
1487 check 0 "" \
1488 "notebook1:set_current_page 1"
1489 check 1 "" \
1490 "textview1_send_text:force" \
1491 "textview1_send_text:text some textnetcn"
1492 check 1 "" \
1493 "textview1:place_cursor 5\n textview1:insert_at_cursor MORE \n textview1_send_text:force" \
1494 "textview1_send_text:text some MORE textnetcn"
1495 check 1 "" \
1496 "textview1:place_cursor_at_line 1\n textview1:insert_at_cursor ETC \n textview1_send_text:force" \
1497 "textview1_send_text:text some MORE textnETC etcn"
1498 mkdir -p $DIR
1499 check 1 "" \
1500 "textview1:save $DIR/$FILE1\n button1:force" \
1501 "button1:clicked"
1502 i=0
1503 while (( i<2000 )); do
1504 (( i+=1 ))
1505 cat $DIR/$FILE1 >> $DIR/$FILE2
1506 done
1507 i=0
1508 while (( i<2000 )); do
1509 (( i+=1 ))
1510 echo "textview2:insert_at_cursor ##### THIS IS LINE $i.\\n" >> $DIR/$FILE3
1511 done
1512 check 0 "" \
1513 "_:load $DIR/$FILE2"
1514 check 0 "" \
1515 "textview1:save $DIR/$FILE1"
1516 check 0 "" \
1517 "textview1:save $DIR/$FILE1"
1518 check 0 "" \
1519 "textview1:delete"
1520 check 0 "" \
1521 "textview2:delete"
1522 check 0 "" \
1523 "_:load $DIR/$FILE3"
1524 check 0 "" \
1525 "_:load $DIR/$FILE1"
1526 check 0 "" \
1527 "textview2:save $DIR/$FILE3"
1528 check 1 "" \
1529 "textview1:save $DIR/$FILE2\n button1:force" \
1530 "button1:clicked"
1531 check_cmd "cmp $DIR/$FILE1 $DIR/$FILE2"
1532 echo "textview1:insert_at_cursor I'm a text containing backslashes:\\nONE\\\\\nTWO\\\\\\\\\\nTHREE\\\\\\\\\\\\\\nEnd" > $DIR/$FILE1
1533 check 0 "" \
1534 "textview1:delete\n _:load $DIR/$FILE1"
1535 check 1 "" \
1536 "textview1:save $DIR/$FILE1\n textview1:save $DIR/$FILE2\n textview1:delete\n _:load $DIR/$FILE1\n button1:force" \
1537 "button1:clicked"
1538 rm $DIR/$FILE1
1539 sleep .5
1540 check 1 "" \
1541 "textview1:save $DIR/$FILE1\n button1:force" \
1542 "button1:clicked"
1543 check_cmd "test 96 = `wc -c $DIR/$FILE1 | awk '{print $1}'`"
1544 check_cmd "cmp $DIR/$FILE1 $DIR/$FILE2"
1545 check 1 "" \
1546 "textview1:delete\n textview1_send_text:force" \
1547 "textview1_send_text:text"
1548 check 1 "Highlight the lowest visible character and press \"send_selection\"" \
1549 "textview1:place_cursor_at_line 1 \ntextview1:insert_at_cursor A\\\\nB\\\\nC\\\\nD\\\\nE\\\\nF\\\\nG\\\\nH\\\\nI\\\\nJ\\\\nK\\\\nL\\\\nM\\\\nN\\\\nO\\\\nP\\\\nQ\\\\nR\\\\nS\\\\nT\\\\nU\\\\nV\\\\nW\\\\nX\\\\nY\\\\nZ\\\\na\\\\nb\\\\nc\\\\nd\\\\ne\\\\nf\\\\ng\\\\nh\\\\ni\\\\nj\\\\nk\\\\nl\\\\nm\\\\nn\\\\no\\\\np\\\\nq\\\\nr\\\\ns\\\\nt\\\\nu\\\\nv\\\\nw\\\\nx\\\\ny\\\\nz \n textview1:place_cursor_at_line 46 \n textview1:scroll_to_cursor" \
1550 "textview1_send_selection:text u"
1551 check 1 "Again, highlight the lowest visible character and press \"send_selection\"" \
1552 "textview1:place_cursor end\n textview1:scroll_to_cursor" \
1553 "textview1_send_selection:text z"
1554 check 1 "Highlight the highest visible character and press \"send_selection\"" \
1555 "textview1:place_cursor 0 \n textview1:scroll_to_cursor" \
1556 "textview1_send_selection:text A"
1557 check 1 "" \
1558 "treeview2:set 100:10:5 2 8888888\n treeview2:save $DIR/$FILE1\n textview2:save $DIR/$FILE2\n button1:force" \
1559 "button1:clicked"
1560 cp $DIR/$FILE1 $DIR/$FILE4
1561 check_cmd "cmp $DIR/$FILE2 $DIR/$FILE3"
1562 check 1 "" \
1563 "treeview2:clear\n textview2:delete\n _:load $DIR/$FILE1\n _:load $DIR/$FILE2\n button1:force" \
1564 "button1:clicked"
1565 rm $DIR/$FILE1 $DIR/$FILE2
1566 sleep .5
1567 check 1 "" \
1568 "treeview2:save $DIR/$FILE1\n textview2:save $DIR/$FILE2\n button1:force" \
1569 "button1:clicked"
1570 check_cmd "cmp $DIR/$FILE1 $DIR/$FILE4"
1571 check_cmd "cmp $DIR/$FILE2 $DIR/$FILE3"
1572 rm -rf $DIR
1573 sleep .5
1574 check 1 "" \
1575 "scale1:set_value 10\n scale1:force" \
1576 "scale1:value 10.000000"
1577 check 6 "" \
1578 "open_dialog:set_filename q.png\n file:force\n open_dialog_invoke:force\n open_dialog_apply:force\n open_dialog_ok:force" \
1579 "file:active _File" \
1580 "open_dialog_apply:clicked" \
1581 "open_dialog:file $PWD/q.png" \
1582 "open_dialog:folder $PWD" \
1583 "open_dialog_ok:clicked" \
1584 "open_dialog:file $PWD/q.png" \
1585 "open_dialog:folder $PWD"
1586 check 2 "" \
1587 "file:force\n open_dialog_invoke:force\n open_dialog_cancel:force" \
1588 "file:active _File" \
1589 "open_dialog_cancel:clicked"
1590 check 3 "" \
1591 "save_as_dialog:set_current_name /somewhere/crazy_idea\n file:force\n save_as_dialog_invoke:force\n save_as_dialog_ok:force" \
1592 "file:active _File" \
1593 "save_as_dialog_ok:clicked" \
1594 "save_as_dialog:file /somewhere/crazy_idea" \
1595 "save_as_dialog:folder"
1596 check 1 "" \
1597 "nonexistent_invoke:force" \
1598 "nonexistent_invoke:active nonexistent"
1599 check 1 "Press the \"button\" which should now be renamed \"OK\"" \
1600 "button1:set_label OK" \
1601 "button1:clicked"
1602 check 1 "Press the \"togglebutton\" which should now be renamed \"on/off\"" \
1603 "togglebutton1:set_label on/off" \
1604 "togglebutton1:0"
1605 check 1 "" \
1606 "togglebutton1:force" \
1607 "togglebutton1:1"
1608 check 1 "Press the \"checkbutton\" which should now be renamed \"REGISTER\"" \
1609 "checkbutton1:set_label REGISTER" \
1610 "checkbutton1:1"
1611 check 1 "" \
1612 "checkbutton1:force" \
1613 "checkbutton1:0"
1614 check 2 "Press the \"radiobutton\" which should now be renamed \"RADIO\"" \
1615 "radiobutton2:set_label RADIO" \
1616 "radiobutton1:0" \
1617 "radiobutton2:1"
1618 check 2 "" \
1619 "radiobutton1:force" \
1620 "radiobutton2:0" \
1621 "radiobutton1:1"
1622 check 1 "Click the widget whose label font is now Bold Italic 20" \
1623 "switch1:style font:Bold Italic 20" \
1624 "switch1:1"
1625 check 1 "Click the widget whose label has turned red" \
1626 "switch1:style color:red" \
1627 "switch1:0"
1628 check 1 "Click the widget whose background has turned yellow" \
1629 "checkbutton1:style background-color:yellow" \
1630 "checkbutton1:1"
1631 check 1 "Press \"OK\" if font and colors changed in previous steps are back to normal\n switch1:style" \
1632 "checkbutton1:style" \
1633 "button1:clicked"
1634 check 1 "" \
1635 "switch1:force" \
1636 "switch1:1"
1637 check 1 "Press \"OK\" if the \"lorem ipsum dolor ...\" text inside \"frame1\" now reads \"LABEL\"" \
1638 "label1:set_text LABEL" \
1639 "button1:clicked"
1640 check 1 "Press \"OK\" if the label of the frame around \"LABEL\" now reads \"LOREM IPSUM\"" \
1641 "frame1:set_label LOREM IPSUM" \
1642 "button1:clicked"
1643 check 1 "Press \"OK\" if the green dot has turned red" \
1644 "image1:set_from_icon_name gtk-no" \
1645 "button1:clicked"
1646 check 1 "Press \"OK\" if the red dot has turned into a green \"Q\"" \
1647 "image1:set_from_file q.png" \
1648 "button1:clicked"
1649 check 1 "Select \"FIRST\" from the combobox" \
1650 "comboboxtext1:prepend_text FIRST" \
1651 "comboboxtext1_entry:text FIRST"
1652 check 1 "Select \"LAST\" from the combobox" \
1653 "comboboxtext1:append_text LAST" \
1654 "comboboxtext1_entry:text LAST"
1655 check 1 "Select \"AVERAGE\" from the combobox" \
1656 "comboboxtext1:insert_text 3 AVERAGE" \
1657 "comboboxtext1_entry:text AVERAGE"
1658 check 1 "Select the second entry from the combobox" \
1659 "comboboxtext1:remove 0" \
1660 "comboboxtext1_entry:text def"
1661 check 2 "Click the \"+\" of the spinbutton" \
1662 "" \
1663 "spinbutton1:text 33.00" \
1664 "spinbutton1:text 34.00"
1665 check 1 "Click the \"+\" of the spinbutton again" \
1666 "" \
1667 "spinbutton1:text 35.00"
1668 check 1 "Click the \"+\" of the spinbutton once again" \
1669 "" \
1670 "spinbutton1:text 36.00"
1671 check 1 "" \
1672 "spinbutton1:force" \
1673 "spinbutton1:text 36.00"
1674 check 1 "Using the file chooser button (now labelled \"etc\"), select \"File System\" (= \"/\")" \
1675 "filechooserbutton1:set_filename /etc/" \
1676 "filechooserbutton1:file /"
1677 check 1 "" \
1678 "filechooserbutton1:force" \
1679 "filechooserbutton1:file /"
1680 check 1 "Click \"Select\"\n fontbutton1:set_font_name Sans Bold 40" \
1681 "fontbutton1:force" \
1682 "fontbutton1:font Sans Bold 40"
1683 check 1 "Click \"Select\" (1)\n colorbutton1:set_color yellow" \
1684 "colorbutton1:force" \
1685 "colorbutton1:color rgb(255,255,0)"
1686 check 1 "Click \"Select\" (2)\n colorbutton1:set_color rgb(0,255,0)" \
1687 "colorbutton1:force" \
1688 "colorbutton1:color rgb(0,255,0)"
1689 check 1 "Click \"Select\" (3)\n colorbutton1:set_color #00f" \
1690 "colorbutton1:force" \
1691 "colorbutton1:color rgb(0,0,255)"
1692 check 1 "Click \"Select\" (4)\n colorbutton1:set_color #ffff00000000" \
1693 "colorbutton1:force" \
1694 "colorbutton1:color rgb(255,0,0)"
1695 check 1 "Click \"Select\" (5)\n colorbutton1:set_color rgba(0,255,0,.5)" \
1696 "colorbutton1:force" \
1697 "colorbutton1:color rgba(0,255,0,0.5)"
1698 check 1 "Close the dialog by hitting Escape" \
1699 "printdialog:print nonexistent.ps" \
1700 "printdialog:closed"
1701 check 1 "Press \"OK\" if both 1752-03-13 and 1752-03-14 are marked on the calendar" \
1702 "calendar1:mark_day 13\n calendar1:mark_day 14" \
1703 "button1:clicked"
1704 check 1 "Press \"OK\" if 1752-03-13 and 1752-03-14 are no longer marked on the calendar" \
1705 "calendar1:clear_marks" \
1706 "button1:clicked"
1707 check 3 "Hover over the calendar and do what the tooltip says" \
1708 "calendar1:set_tooltip_text Double-click on 1752-03-13" \
1709 "calendar1:clicked 1752-03-13" \
1710 "calendar1:clicked 1752-03-13" \
1711 "calendar1:doubleclicked 1752-03-13"
1712 check 0 "" \
1713 "calendar1:set_tooltip_text"
1714 check 1 "" \
1715 "calendar1:force" \
1716 "calendar1:clicked 1752-03-13"
1717
1718 check 0 "" \
1719 "drawingarea1:rectangle 1 0 0 150 150\n drawingarea1:fill 1\n drawingarea1:refresh"
1720 check 0 "" \
1721 "drawingarea1:remove 1\n drawingarea1:remove 2\n drawingarea1:remove 3\n drawingarea1:remove 4\n drawingarea1:refresh"
1722 check 0 "" \
1723 "drawingarea1:rectangle 1 0 0 150 150\n drawingarea1:fill 1\n drawingarea1:refresh"
1724 check 0 "" \
1725 "drawingarea1:arc 1 80 80 60 30 60\n drawingarea1:set_source_rgba 1 red\n drawingarea1:stroke_preserve 1\n drawingarea1:line_to 1 80 80\n drawingarea1:fill 1\n drawingarea1:refresh"
1726 check 0 "" \
1727 "drawingarea1:arc_negative 1 80 80 70 30 60\n drawingarea1:set_source_rgba 1 green\n drawingarea1:stroke_preserve 1\n drawingarea1:rel_line_to 1 -50 -50\n drawingarea1:stroke 1\n drawingarea1:refresh"
1728 check 0 "" \
1729 "drawingarea1:curve_to 1 30 30 90 120 120 30\n drawingarea1:set_source_rgba 1 blue\n drawingarea1:stroke 1\n drawingarea1:refresh"
1730 check 0 "" \
1731 "drawingarea1:move_to 1 160 160\n drawingarea1:rel_curve_to 1 30 30 90 120 120 30\n drawingarea1:set_source_rgba 1 orange\n drawingarea1:stroke_preserve 1\n drawingarea1:refresh"
1732 check 0 "" \
1733 "drawingarea1:move_to 1 0 0\n drawingarea1:rel_move_to 1 0 155\n drawingarea1:rel_line_to 1 300 0\n drawingarea1:set_dash 1 10\n drawingarea1:stroke 1"
1734 check 0 "" \
1735 "drawingarea1:move_to 1 0 160\n drawingarea1:rel_line_to 1 300 0\n drawingarea1:set_dash 1 20 5\n drawingarea1:stroke 1"
1736 check 0 "" \
1737 "drawingarea1:move_to 1 0 165\n drawingarea1:rel_line_to 1 300 0\n drawingarea1:set_dash 1 5 20\n drawingarea1:stroke 1"
1738 check 0 "" \
1739 "drawingarea1:move_to 1 0 170\n drawingarea1:rel_line_to 1 300 0\n drawingarea1:set_dash 1 3 3 3 3 3 15\n drawingarea1:stroke 1"
1740 check 0 "" \
1741 "drawingarea1:refresh\n drawingarea1:set_dash 1"
1742 check 0 "" \
1743 "drawingarea1:set_source_rgba 1 brown\n drawingarea1:set_line_width 1 15"
1744 check 1 "Press \"OK\" if the brown shape is rounded" \
1745 "drawingarea1:set_line_join 2 round\n drawingarea1:set_line_cap 2 round\n drawingarea1:move_to 1 160 20\n drawingarea1:rel_line_to 1 20 0\n drawingarea1:rel_line_to 1 0 20\n drawingarea1:stroke 1\n drawingarea1:refresh" \
1746 "button1:clicked"
1747 check 1 "Press \"OK\" if the second brown shape is shorter and bevelled" \
1748 "drawingarea1:set_line_join 3 bevel\n drawingarea1:set_line_cap 3 butt\n drawingarea1:move_to 1 160 70\n drawingarea1:rel_line_to 1 20 0\n drawingarea1:rel_line_to 1 0 20\n drawingarea1:stroke 1\n drawingarea1:refresh" \
1749 "button1:clicked"
1750 check 1 "Press \"OK\" if the third brown shape is square" \
1751 "drawingarea1:set_line_join 3 miter\n drawingarea1:set_line_cap 3 square\n drawingarea1:move_to 1 160 120\n drawingarea1:rel_line_to 1 20 0\n drawingarea1:rel_line_to 1 0 20\n drawingarea1:stroke 1\n drawingarea1:refresh" \
1752 "button1:clicked"
1753 check 1 "Press \"OK\" if the first brown shape is no longer rounded" \
1754 "drawingarea1:remove 2\n drawingarea1:refresh" \
1755 "button1:clicked"
1756 check 1 "Press \"OK\" if all three brown shapes look the same" \
1757 "drawingarea1:remove 3\n drawingarea1:refresh" \
1758 "button1:clicked"
1759 check 0 "" \
1760 "drawingarea1:move_to 5 50 50\n drawingarea1:line_to 5 200 10\n drawingarea1:line_to 5 150 200\n drawingarea1:close_path 1\n drawingarea1:set_source_rgba 5 rgba(0,255,0,.2)\n drawingarea1:fill_preserve 1\n drawingarea1:refresh"
1761 check 0 "" \
1762 "drawingarea1:move_to 5 10 50\n drawingarea1:set_source_rgba 5 cyan\n drawingarea1:set_font_size 5 30\n drawingarea1:show_text 5 Xyz 789\n drawingarea1:set_font_size 5 10\n drawingarea1:show_text 5 Abc 123\n drawingarea1:refresh"
1763 check 0 "" \
1764 "drawingarea1:move_to 5 10 75\n drawingarea1:set_source_rgba 5 red\n drawingarea1:set_font_face 5 italic bold Courier\n drawingarea1:set_font_size 5 30\n drawingarea1:show_text 5 Xyz 789\n drawingarea1:set_font_size 5 10\n drawingarea1:show_text 5 Abc 123\n drawingarea1:refresh"
1765 check 0 "" \
1766 "drawingarea1:remove 1\n drawingarea1:remove 2\n drawingarea1:remove 3\n drawingarea1:remove 4\n drawingarea1:refresh"
1767
1768 check 0 "" \
1769 "drawingarea2:rectangle 1 0 0 150 150\n drawingarea2:fill 1\n drawingarea2:refresh"
1770 check 0 "" \
1771 "drawingarea2:arc 1 80 80 60 30 60\n drawingarea2:set_source_rgba 1 red\n drawingarea2:stroke_preserve 1\n drawingarea2:line_to 1 80 80\n drawingarea2:fill 1\n drawingarea2:refresh"
1772 check 0 "" \
1773 "drawingarea2:arc_negative 1 80 80 70 30 60\n drawingarea2:set_source_rgba 1 green\n drawingarea2:stroke_preserve 1\n drawingarea2:rel_line_to 1 -50 -50\n drawingarea2:stroke 1\n drawingarea2:refresh"
1774 check 0 "" \
1775 "drawingarea2:curve_to 1 30 30 90 120 120 30\n drawingarea2:set_source_rgba 1 blue\n drawingarea2:stroke 1\n drawingarea2:refresh"
1776 check 0 "" \
1777 "drawingarea2:move_to 1 160 160\n drawingarea2:rel_curve_to 1 30 30 90 120 120 30\n drawingarea2:set_source_rgba 1 orange\n drawingarea2:stroke_preserve 1\n drawingarea2:refresh"
1778 check 0 "" \
1779 "drawingarea2:move_to 1 0 0\n drawingarea2:rel_move_to 1 0 155\n drawingarea2:rel_line_to 1 300 0\n drawingarea2:set_dash 1 10\n drawingarea2:stroke 1"
1780 check 0 "" \
1781 "drawingarea2:move_to 1 0 160\n drawingarea2:rel_line_to 1 300 0\n drawingarea2:set_dash 1 20 5\n drawingarea2:stroke 1"
1782 check 0 "" \
1783 "drawingarea2:move_to 1 0 165\n drawingarea2:rel_line_to 1 300 0\n drawingarea2:set_dash 1 5 20\n drawingarea2:stroke 1"
1784 check 0 "" \
1785 "drawingarea2:move_to 1 0 170\n drawingarea2:rel_line_to 1 300 0\n drawingarea2:set_dash 1 3 3 3 3 3 15\n drawingarea2:stroke 1"
1786 check 0 "" \
1787 "drawingarea2:refresh\n drawingarea2:set_dash 1"
1788 check 0 "" \
1789 "drawingarea2:set_source_rgba 1 brown\n drawingarea2:set_line_width 1 15"
1790 check 0 "" \
1791 "drawingarea2:set_line_cap 2 round\n drawingarea2:move_to 1 160 20\n drawingarea2:rel_line_to 1 20 0\n drawingarea2:rel_line_to 1 0 20\n drawingarea2:stroke 1\n drawingarea2:refresh"
1792 check 0 "" \
1793 "drawingarea2:set_line_join 3 bevel\n drawingarea2:set_line_cap 3 butt\n drawingarea2:move_to 1 160 70\n drawingarea2:rel_line_to 1 20 0\n drawingarea2:rel_line_to 1 0 20\n drawingarea2:stroke 1\n drawingarea2:refresh"
1794 check 0 "" \
1795 "drawingarea2:set_line_join 3 miter\n drawingarea2:set_line_cap 3 square\n drawingarea2:move_to 1 160 120\n drawingarea2:rel_line_to 1 20 0\n drawingarea2:rel_line_to 1 0 20\n drawingarea2:stroke 1\n drawingarea2:refresh"
1796 check 0 "" \
1797 "drawingarea2:remove 2\n drawingarea2:refresh"
1798 check 0 "" \
1799 "drawingarea2:remove 3\n drawingarea2:refresh"
1800 check 2 "Hit Backspace, Enter" \
1801 "eventbox1:grab_focus" \
1802 "eventbox1:key_press BackSpace" \
1803 "eventbox1:key_press Return"
1804 check 6 "Inside the DrawingArea, left-click, middle-click, right-click (Don't move the mouse while clicking)" \
1805 "" \
1806 "eventbox1:button_press 1" \
1807 "eventbox1:button_release 1" \
1808 "eventbox1:button_press 2" \
1809 "eventbox1:button_release 2" \
1810 "eventbox1:button_press 3" \
1811 "eventbox1:button_release 3"
1812 check 3 "Inside the DrawingArea and all within one second, hold the left button down, move around a bit, and release it again" \
1813 "" \
1814 "eventbox1:button_press 1" \
1815 "eventbox1:motion" \
1816 "eventbox1:motion"
1817 sleep 1.5
1818 check 1 "Hit Space" \
1819 "button1:grab_focus" \
1820 "button1:clicked"
1821
1822 check 1 "Press the biggest button if there is a spinning spinner" \
1823 "spinner1:start\n no_button:set_size_request 400 400" \
1824 "no_button:clicked"
1825 check 1 "Press \"OK\" if the spinner has stopped" \
1826 "spinner1:stop" \
1827 "button1:clicked"
1828 check 1 "Press \"OK\" if the \"No\" button is back to normal size" \
1829 "no_button:set_size_request" \
1830 "button1:clicked"
1831
1832 check 0 "" \
1833 "notebook1:set_current_page 3"
1834 check 1 "Click into page 4 (vscroll)" \
1835 "scrolledwindow8:vscroll 4500" \
1836 "button_sw:clicked"
1837 check 1 "Click into page 4 (hscroll)" \
1838 "scrolledwindow8:hscroll 4500" \
1839 "button_se:clicked"
1840 check 1 "Click into page 4 (hscroll_to_range, vscroll_to_range)" \
1841 "scrolledwindow8:hscroll_to_range 1600 2900\n scrolledwindow8:vscroll_to_range 1600 2900" \
1842 "button_c:clicked"
1843
1844 check 1 "Press \"OK\" if we are fullscreen now" \
1845 "main:fullscreen" \
1846 "button1:clicked"
1847 check 1 "Press \"OK\" if we are back to default size" \
1848 "main:unfullscreen" \
1849 "button1:clicked"
1850 check 1 "Press \"OK\" if window is 1000x1000 now" \
1851 "main:resize 1000 1000" \
1852 "button1:clicked"
1853 check 1 "Press \"OK\" if we are back to default size again" \
1854 "main:resize" \
1855 "button1:clicked"
1856 check 1 "Press \"OK\" if our NE corner is at 400, 200 now" \
1857 "main:move 400 200" \
1858 "button1:clicked"
1859
1860 check 1 "Press \"OK\" if there is now a \"Disconnect\" button" \
1861 "button2:set_visible 1\n button2:set_sensitive 0" \
1862 "button1:clicked"
1863 check 1 "Press \"Disconnect\"" \
1864 "button2:set_sensitive 1" \
1865 "button2:clicked"
1866 check 1 "Press \"OK\" if the window title is now \"ALMOST DONE\"" \
1867 "main:set_title ALMOST DONE" \
1868 "button1:clicked"
1869
1870 check 1 "Press \"BIG BUTTON\" inside the window titled \"PRESS ME\"" \
1871 "dialog1:set_title PRESS ME\n dialog1:set_visible 1\n dialog1:resize 800 800\n dialog1:move 50 50" \
1872 "button3:clicked"
1873 check 1 "" \
1874 "button3:set_label PRESS THIS GIANT BUTTON NOW\n dialog1:fullscreen" \
1875 "button3:clicked"
1876 check 1 "" \
1877 "button3:set_label Hit Escape to close this window\n button3:set_sensitive 0" \
1878 "dialog1:closed"
1879 check 0 "" \
1880 "dialog1:set_visible 0"
1881
1882 check 1 "Press \"OK\" if the progress bar shows 90%" \
1883 "progressbar1:set_fraction .9\n progressbar1:set_text" \
1884 "button1:clicked"
1885 check 1 "Press \"OK\" if the progress bar text reads \"The End\"" \
1886 "progressbar1:set_text The End" \
1887 "button1:clicked"
1888 check 1 "" \
1889 "statusbar1:push_id Id100 Press \"No\"\n statusbar1:push_id ABC nonsense #1\n statusbar1:push_id DEF nonsense #2.1\n statusbar1:push_id DEF nonsense 2.2\n statusbar1:pop\n statusbar1:pop\n statusbar1:pop_id 1\n statusbar1:pop_id ABC\n statusbar1:pop_id DEF\n statusbar1:pop_id DEF\n statusbar1:push_id GHI nonsense 3.1\n statusbar1:push_id GHI nonsense 3.2\n statusbar1:remove_all_id GHI" \
1890 "no_button:clicked"
1891
1892 echo "_:main_quit" >$FIN
1893
1894 check_rm $FIN
1895 check_rm $FOUT
1896
1897
1898 check_cmd "head -n 2 $LOG | tail -n 1 | grep -q '##### (New Pipeglade session) #####'"
1899 check_cmd "tail -n 4 $LOG | head -n 1 | grep -q '### (Idle) ###'"
1900 check_cmd "tail -n 3 $LOG | head -n 1 | grep -q 'statusbar1:remove_all_id GHI'"
1901 check_cmd "tail -n 2 $LOG | head -n 1 | grep -q '### (Idle) ###'"
1902 check_cmd "tail -n 1 $LOG | grep '_:main_quit'"
1903
1904
1905 echo "PASSED: $OKS/$TESTS; FAILED: $FAILS/$TESTS"
Graphical User Interfaces, The UNIX Way