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