mirror of
https://github.com/rkd77/elinks.git
synced 2024-12-04 14:46:47 -05:00
Merge pull request #150 from mtatton/master
[ tests ] remote control test revision
This commit is contained in:
rkd77
GitHub
commit
1e84c1d2e1
12
build.sh
12
build.sh
@ -102,10 +102,12 @@ test() {
|
||||
# for arm32: qemu-arm-static
|
||||
# for win64: wine
|
||||
#
|
||||
./src/elinks$1 \
|
||||
--no-connect \
|
||||
--dump \
|
||||
./test/hello.html
|
||||
#./src/elinks$1 \
|
||||
#--no-connect \
|
||||
#--dump \
|
||||
#./test/hello.html
|
||||
# more complete testing
|
||||
./test.sh
|
||||
}
|
||||
|
||||
pub() {
|
||||
@ -123,6 +125,7 @@ info() {
|
||||
file ./src/elinks$1
|
||||
ls -lh ./src/elinks$1
|
||||
ls -l ./src/elinks$1
|
||||
./src/elinks --version
|
||||
}
|
||||
|
||||
set_arch() {
|
||||
@ -207,6 +210,7 @@ select SEL in $CC_SEL; do
|
||||
elif [ "$SEL" = "exit" ]; then
|
||||
exit
|
||||
fi
|
||||
echo "--[ elinks build system ]--"
|
||||
echo "--[ Compiler: " $CC " ]--"
|
||||
echo "--[ Host : " $MAKE_HOST " ]--"
|
||||
done
|
||||
|
||||
32
test.sh
Executable file
32
test.sh
Executable file
@ -0,0 +1,32 @@
|
||||
#!/bin/bash
|
||||
#
|
||||
# shell script to test elinks binary
|
||||
#
|
||||
|
||||
clear
|
||||
|
||||
echo ' --/ \--'
|
||||
echo ' --[ Welcome to the elinks test helper ]--'
|
||||
echo ' --[ ]--'
|
||||
echo ' --[ [*] use option 1 to run dump test ]--'
|
||||
echo ' --\ /--'
|
||||
echo ' '
|
||||
|
||||
# SET TEST
|
||||
prep_test() {
|
||||
if [ "$1" = "hello" ]; then
|
||||
./src/elinks --dump ./test/hello.html
|
||||
fi
|
||||
}
|
||||
|
||||
# MAIN LOOP
|
||||
prep_test hello
|
||||
OPTS="hello exit"
|
||||
select SEL in $OPTS; do
|
||||
if [ ! "$SEL" = "exit" ]; then
|
||||
prep_test $SEL
|
||||
else
|
||||
exit
|
||||
fi
|
||||
echo "--[ Current test : " $SEL" ]--"
|
||||
done
|
||||
@ -1,16 +1,36 @@
|
||||
#!/bin/sh
|
||||
#!/bin/bash
|
||||
#
|
||||
# Test various -remote use cases. Start an ELinks instance before
|
||||
# running the test. All arguments to this test script will be passed to
|
||||
# ELinks. Set ELINKS to change the binary to execute ELinks.
|
||||
#
|
||||
# XXX: The test will affect your current ELinks configurations. If you
|
||||
# do not want this pass --config-dir <path/to/dir/> to avoid this.
|
||||
# do not want this pass -config-dir <path/to/dir/> to avoid this.
|
||||
#
|
||||
# FIXME: Maybe make this script eun more automatic by using screen.
|
||||
|
||||
elinks=${ELINKS:-elinks}
|
||||
args="$@"
|
||||
#
|
||||
# EDIT: There is now -session-ring <num> and -base-session <num>
|
||||
# used to prevent intererence with existing running elinks
|
||||
#
|
||||
# DOC: For this test GNU screen is recommended. If I assume You'll
|
||||
# be in the elinks sources directory and there isn't and elinks
|
||||
# currently running (ps axf | grep elinks). Then use:
|
||||
#
|
||||
# $ screen -S test
|
||||
#
|
||||
# then ctrl+a and c - create new screen and create new elinks instance
|
||||
#
|
||||
# $ ./src/elinks
|
||||
#
|
||||
# then return to the original window using ctrl + a and a
|
||||
# and execute the elinks remote control tests:
|
||||
#
|
||||
# $ ./test/remote.sh
|
||||
#
|
||||
# If everything is well the remote commands should be executed in the
|
||||
# running elinks session and You'll see the results if You press:
|
||||
# ctrl+a and a
|
||||
#
|
||||
|
||||
die()
|
||||
{
|
||||
@ -20,26 +40,42 @@ die()
|
||||
|
||||
test_remote()
|
||||
{
|
||||
#echo $args
|
||||
#echo $1
|
||||
desc="$1"; shift
|
||||
testno=$(expr "$testno" + 1)
|
||||
echo "Test $testno: $desc"
|
||||
echo " > $elinks $confdir --remote '$@'"
|
||||
"$elinks" $args --remote "$@"
|
||||
echo "Press return to continue..."
|
||||
read
|
||||
echo "[*] test $testno: $desc "
|
||||
#echo " > $elinks $confdir --remote '$@'"
|
||||
$elinks $args --remote "$@"
|
||||
#echo "Press return to continue..."
|
||||
#read
|
||||
}
|
||||
|
||||
elinks=${ELINKS:-elinks}
|
||||
testno=0
|
||||
# MAIN SETUP
|
||||
# elinks binary
|
||||
elinks="`pwd`/src/elinks"
|
||||
#elinks="$elinks -config-dir /home/`whoami`/.elinks"
|
||||
# custom args
|
||||
args="$@"
|
||||
# command to start new elinks session ring
|
||||
testno=100
|
||||
# go to current directory in the shell script
|
||||
cd `pwd`
|
||||
|
||||
"$elinks" $args --remote "ping()" || die "Start ELinks instance to proceed"
|
||||
# MAIN PROGRAM
|
||||
echo "[=] Starting remote testing: " $elinks
|
||||
|
||||
# tests 010 if remote is working
|
||||
$elinks $args --remote "ping()" || die "Start ELinks instance to proceed"
|
||||
|
||||
# tests 020 infoBoxes
|
||||
test_remote "infoBox(): no quote" "infoBox(Hello World.)"
|
||||
test_remote "infoBox(): quote" 'infoBox("Hello World.")'
|
||||
test_remote "infoBox(): single quote (not considered as quote chars)" "infoBox('Hello World.')"
|
||||
test_remote "infoBox(): quoted quote" 'infoBox("Hello ""quoted"" World.")'
|
||||
test_remote "infoBox(): quoted string with comma" 'infoBox("Comma, a different kind of punctuation.")'
|
||||
|
||||
# tests 030 open url
|
||||
test_remote "openURL(): prompt URL" "openURL()"
|
||||
test_remote "openURL(): in current tab" 'openURL("http://elinks.cz/")'
|
||||
test_remote "openURL(): in new tab" 'openURL(http://elinks.cz/news.html, new-tab)'
|
||||
@ -48,9 +84,13 @@ test_remote "openURL(): in new tab" 'openURL("http://elinks.cz/news.html", "new-
|
||||
test_remote "openURL(): in new window (requires that ELinks runs in screen or a window environment)" \
|
||||
"openURL(http://elinks.cz/search.html, new-window)"
|
||||
|
||||
|
||||
# tests 040 open new window
|
||||
test_remote "xfeDoCommand(): open new window (requires that ELinks runs in screen or a window environment)" \
|
||||
"xfeDoCommand(openBrowser)"
|
||||
|
||||
# tests 050 add bookmark
|
||||
test_remote "addBookmark()" 'addBookmark("http://127.0.0.1/")'
|
||||
|
||||
# tests 060 single url
|
||||
test_remote "ELinks extension: single URL" "/"
|
||||
|
||||
Loading…
Reference in New Issue
Block a user