forked from pool/ncurses
463 lines
8.6 KiB
Bash
463 lines
8.6 KiB
Bash
#!/bin/bash
|
|
#
|
|
# cursescheck Test ACS/UTF-8 Line Graphics and REP capability
|
|
# of a terminal line described by variable TERM.
|
|
#
|
|
# Written in bash code to show and test capabilities of an terminal
|
|
# or terminal emulator without the `magic' of a binary program using
|
|
# libncurses(w) as many users do belive that ncurses defines the
|
|
# behaviour of a terminal. Here we show that the terminfo database
|
|
# given by the TERM variable simply describes the capabilities of
|
|
# a terminal. For this `infocmp(1)' and `tput(1)' is used as well
|
|
# the helpers `tty(1)', `grep(1), and `od(1)' are used herein.
|
|
#
|
|
# Author: Werner Fink <werner@suse.de>
|
|
#
|
|
|
|
typeset -i rep=0 line=0 color=0 hpa=0 ech=0
|
|
for s in 0 1 2
|
|
do
|
|
test -c /proc/$$/fd/$s || { echo "Missing /proc/$$/fd/$s" 1>&2; exit 1; }
|
|
done
|
|
for d in null tty
|
|
do
|
|
test -c /dev/$d || { echo "Missing /dev/$d" 1>&2; exit 1; }
|
|
done
|
|
for d in pts fd
|
|
do
|
|
test -d /dev/$d || { echo "Missing /dev/$d/" 1>&2; exit 1; }
|
|
done
|
|
for p in tput infocmp tty grep od
|
|
do
|
|
type -p $p 1> /dev/null 2>&1 || { echo "Missing $p in path" 1>&2; exit 1; }
|
|
done
|
|
|
|
typeset -r tty=$(tty) || { echo "Not on a terminal line" 1>&2; exit 1; }
|
|
typeset -i width=$(tput cols) || { echo "No terminal size" 1>&2; exit 1; }
|
|
typeset -i height=$(tput lines) || { echo "No terminal size" 1>&2; exit 1; }
|
|
|
|
#
|
|
# There are terminal type which uses non printable characters for
|
|
# Line Graphic. Therefore store them as numbers or sequences within
|
|
# arrays used later on.
|
|
#
|
|
typeset -i c
|
|
typeset -A acsc acsn
|
|
typeset -a tmp="($(tput acsc | od -A none -tx1))"
|
|
for ((c=0;c<${#tmp[@]};c+=2))
|
|
do
|
|
acsc[0x${tmp[c]}]="0x${tmp[c+1]}"
|
|
acsn[0x${tmp[c]}]=\\x${tmp[c+1]}
|
|
done
|
|
unset tmp c
|
|
|
|
#
|
|
# Init terminal
|
|
#
|
|
tput init || { echo "Not a terminal" 1>&2; exit 1; }
|
|
|
|
if test -n "$(infocmp -T $TERM -1 | grep "colors#")"
|
|
then
|
|
let color++
|
|
fi
|
|
if test -n "$(infocmp -T $TERM -1 | grep "hpa=")"
|
|
then
|
|
let hpa++
|
|
fi
|
|
if test -n "$(infocmp -T $TERM -1 | grep "ech=")"
|
|
then
|
|
let ech++
|
|
fi
|
|
|
|
#
|
|
# Restore screen at exit
|
|
#
|
|
trap 'tput cup 0 0; tput sgr0; tput cvvis; tput rmcup; exit' EXIT HUP INT TERM
|
|
|
|
#
|
|
# Save screen, make curse invisible, and goto upper left
|
|
#
|
|
tput smcup
|
|
tput civis
|
|
tput cup 0 0
|
|
if ((color > 0))
|
|
then
|
|
tput -S <<-!
|
|
setab 4
|
|
setaf 7
|
|
!
|
|
fi
|
|
tput ed
|
|
|
|
echo Checking for Line Graphics on $tty with TERM=$TERM
|
|
let line++
|
|
|
|
echo Found ${#acsc[@]} ACSC characters, check used Font and its Mapping
|
|
let line++
|
|
|
|
tput cup $((line + 2)) 0
|
|
typeset -i row=$((line+2)) col=4
|
|
typeset smacs=$(tput enacs; tput smacs)
|
|
typeset rmacs=$(tput rmacs)
|
|
for sub in ${!acsc[@]}
|
|
do
|
|
tput cup $row $col
|
|
printf "$sub\t\x${sub//0x/}\t${smacs}${acsn[$sub]}${rmacs}"
|
|
if ((row++ > height-4))
|
|
then
|
|
let col=width/2-4
|
|
let row=line+2
|
|
fi
|
|
done
|
|
unset sub smacs rmacs
|
|
|
|
tput cup $line 0
|
|
tput cvvis
|
|
echo -n "OK> "
|
|
read -t 5 yesno
|
|
|
|
#
|
|
# Could use clear
|
|
#
|
|
tput -S <<-!
|
|
civis
|
|
cup 0 0
|
|
ed
|
|
!
|
|
let line=0
|
|
|
|
echo Checking for UTF-8 Line Graphics on $tty with TERM=$TERM
|
|
let line++
|
|
|
|
echo Use U+2500 upto U+25FF glyps, check used Font and its Mapping
|
|
let line++
|
|
|
|
tput cup $((line+2)) 0
|
|
typeset -i row=$((line+2)) col=4
|
|
for x in 94 95 96 97
|
|
do
|
|
x=\\x$x
|
|
for ((c=128;c<=191;c++))
|
|
do
|
|
y=\\x$(printf '%x\n' $c)
|
|
tput cup $row $col
|
|
printf "\xe2${x}${y}"
|
|
if ((row++ > height-4))
|
|
then
|
|
let col+=2
|
|
let row=line+2
|
|
fi
|
|
done
|
|
done
|
|
unset sub smacs rmacs
|
|
|
|
tput cup $line 0
|
|
tput cvvis
|
|
echo -n "OK> "
|
|
read -t 5 yesno
|
|
tput civis
|
|
|
|
#
|
|
# Could use clear
|
|
#
|
|
tput -S <<-!
|
|
civis
|
|
cup 0 0
|
|
ed
|
|
!
|
|
let line=0
|
|
|
|
if ((${#acsc[@]} > 0))
|
|
then
|
|
typeset -i cx=20
|
|
echo Terminal TERM=$TERM has ASC Line Graphics
|
|
let line++
|
|
echo Use them to draw a simple box
|
|
let line++
|
|
let row=height/2-4
|
|
let col=8
|
|
tput cup $row $col
|
|
tput -S <<-!
|
|
enacs
|
|
civis
|
|
smacs
|
|
!
|
|
if ((color > 0))
|
|
then
|
|
tput -S <<-!
|
|
setab 7
|
|
setaf 0
|
|
!
|
|
fi
|
|
echo -ne ${acsn[0x6c]}
|
|
for ((c=0;c<cx;c++)); do echo -ne ${acsn[0x71]}; done
|
|
echo -ne ${acsn[0x6b]}
|
|
for ((c=1;c<4;c++))
|
|
do
|
|
tput cup $((row+c)) $col
|
|
echo -ne ${acsn[0x78]}
|
|
((color > 0 && ech > 0)) && tput ech $cx
|
|
((hpa > 0)) && tput hpa $((col+cx+1)) || tput cup $((row+c)) $((col+cx+1))
|
|
echo -ne ${acsn[0x78]}
|
|
done
|
|
tput cup $((row+c)) $col
|
|
echo -ne ${acsn[0x6d]}
|
|
for ((c=0;c<cx;c++)); do echo -ne ${acsn[0x71]}; done
|
|
echo -ne ${acsn[0x6a]}
|
|
if ((color > 0 && ech > 0))
|
|
then
|
|
tput -S <<-!
|
|
setab 0
|
|
setaf 0
|
|
cup $((row+1)) $((col+cx+2))
|
|
ech 2
|
|
cup $((row+2)) $((col+cx+2))
|
|
ech 2
|
|
cup $((row+3)) $((col+cx+2))
|
|
ech 2
|
|
cup $((row+4)) $((col+cx+2))
|
|
ech 2
|
|
cup $((row+5)) $((col+2))
|
|
ech $((cx+2))
|
|
setab 4
|
|
setaf 7
|
|
!
|
|
else
|
|
tput rev
|
|
for ((c=1;c<5;c++))
|
|
do
|
|
tput cup $((row+c)) $((col+cx+2))
|
|
echo -n " "
|
|
done
|
|
tput cup $((row+c)) $((col+2))
|
|
printf ' %.0s' $(eval echo {1..$((cx+2))})
|
|
tput sgr0
|
|
fi
|
|
tput -S <<-!
|
|
rmacs
|
|
!
|
|
tput cup $((row+2)) $((col+4))
|
|
echo -n "<ACS BOX>"
|
|
|
|
tput cup $line 0
|
|
tput cvvis
|
|
echo -n "OK> "
|
|
read -t 5 yesno
|
|
tput civis
|
|
else
|
|
echo Terminal TERM=$TERM has no ASC Line Graphics.
|
|
tput cvvis
|
|
echo -n "OK> "
|
|
read -t 5 yesno
|
|
tput civis
|
|
fi
|
|
|
|
#
|
|
# Could use clear
|
|
#
|
|
tput -S <<-!
|
|
civis
|
|
cup 0 0
|
|
ed
|
|
!
|
|
let line=0
|
|
|
|
if ((1))
|
|
then
|
|
|
|
#
|
|
# UTF-8 wide character line glyphs
|
|
#
|
|
ul=\\xe2\\x94\\x8c
|
|
ur=\\xe2\\x94\\x90
|
|
hl=\\xe2\\x94\\x80
|
|
vl=\\xe2\\x94\\x82
|
|
dl=\\xe2\\x94\\x94
|
|
dr=\\xe2\\x94\\x98
|
|
|
|
typeset -i cx=20
|
|
echo Terminal TERM=$TERM with UTF-8 Line Graphics
|
|
let line++
|
|
echo Use them to draw a simple box
|
|
let line++
|
|
let row=height/2-4
|
|
let col=8
|
|
tput cup $row $col
|
|
if ((color > 0))
|
|
then
|
|
tput -S <<-!
|
|
setab 7
|
|
setaf 0
|
|
!
|
|
fi
|
|
tput enacs
|
|
tput civis
|
|
echo -ne ${ul}
|
|
for ((c=0;c<$cx;c++)); do echo -ne ${hl}; done
|
|
echo -ne ${ur}
|
|
for ((c=1;c<4;c++))
|
|
do
|
|
tput cup $((row+c)) $col
|
|
echo -ne ${vl}
|
|
((color > 0 && ech > 0)) && tput ech $cx
|
|
((hpa > 0)) && tput hpa $((col+cx+1)) || tput cup $((row+c)) $((col+cx+1))
|
|
echo -ne ${vl}
|
|
done
|
|
tput cup $((row+c)) $col
|
|
echo -ne ${dl}
|
|
for ((c=0;c<$cx;c++)); do echo -ne ${hl}; done
|
|
echo -ne ${dr}
|
|
if ((color > 0 && ech > 0))
|
|
then
|
|
tput -S <<-!
|
|
setab 0
|
|
setaf 0
|
|
cup $((row+1)) $((col+cx+2))
|
|
ech 2
|
|
cup $((row+2)) $((col+cx+2))
|
|
ech 2
|
|
cup $((row+3)) $((col+cx+2))
|
|
ech 2
|
|
cup $((row+4)) $((col+cx+2))
|
|
ech 2
|
|
cup $((row+5)) $((col+2))
|
|
ech $((cx+2))
|
|
setab 4
|
|
setaf 7
|
|
!
|
|
else
|
|
tput rev
|
|
for ((c=1;c<5;c++))
|
|
do
|
|
tput cup $((row+c)) $((col+cx+2))
|
|
echo -n " "
|
|
done
|
|
tput cup $((row+c)) $((col+2))
|
|
printf ' %.0s' $(eval echo {1..$((cx+2))})
|
|
tput sgr0
|
|
fi
|
|
tput cup $((row+2)) $((col+4))
|
|
echo -n "<UTF-8 BOX>"
|
|
|
|
tput cup $line 0
|
|
tput cvvis
|
|
echo -n "OK> "
|
|
read -t 5 yesno
|
|
tput civis
|
|
else
|
|
echo Terminal TERM=$TERM has no UTF-8 Line Graphics.
|
|
tput cvvis
|
|
echo -n "OK> "
|
|
read -t 5 yesno
|
|
tput civis
|
|
fi
|
|
|
|
#
|
|
# Could use clear
|
|
#
|
|
tput -S <<-!
|
|
civis
|
|
cup 0 0
|
|
ed
|
|
!
|
|
let line=0
|
|
if test -n "$(infocmp -T $TERM -1 | grep rep=)"
|
|
then
|
|
echo Found rep capability in terminfo database for TERM=$TERM
|
|
let rep++
|
|
let line++
|
|
else
|
|
echo No rep capability given in terminfo database for TERM=$TERM
|
|
tput cvvis
|
|
echo -n "OK> "
|
|
read -t 5 yesno
|
|
tput -S <<-!
|
|
cup 0 0
|
|
sgr0
|
|
ed
|
|
rmcup
|
|
!
|
|
exit 0
|
|
fi
|
|
|
|
if ((${#acsc[@]} > 0 && rep > 0))
|
|
then
|
|
typeset -i cx=20
|
|
echo Testing rep capability of TERM=$TERM
|
|
let line++
|
|
let row=height/2-4
|
|
let col=8
|
|
if ((color > 0))
|
|
then
|
|
tput -S <<-!
|
|
setab 7
|
|
setaf 0
|
|
!
|
|
fi
|
|
tput -S <<-!
|
|
enacs
|
|
civis
|
|
smacs
|
|
cup $row $col
|
|
!
|
|
echo -ne ${acsn[0x6c]}
|
|
tput rep ${acsc[0x71]} $cx
|
|
echo -ne ${acsn[0x6b]}
|
|
for ((c=1;c<4;c++))
|
|
do
|
|
tput cup $((row+c)) $col
|
|
echo -ne ${acsn[0x78]}
|
|
((hpa > 0)) && tput hpa $((col+cx+1)) || tput cup $((row+c)) $((col+cx+1))
|
|
echo -ne ${acsn[0x78]}
|
|
done
|
|
tput cup $((row+c)) $col
|
|
echo -ne ${acsn[0x6d]}
|
|
tput rep ${acsc[0x71]} $cx
|
|
echo -ne ${acsn[0x6a]}
|
|
tput -S <<-!
|
|
rmacs
|
|
!
|
|
if ((color > 0 && ech > 0))
|
|
then
|
|
tput -S <<-!
|
|
cup $((row+1)) $((col+1))
|
|
ech $cx
|
|
cup $((row+2)) $((col+1))
|
|
ech $cx
|
|
cup $((row+3)) $((col+1))
|
|
ech $cx
|
|
setab 0
|
|
setaf 0
|
|
cup $((row+1)) $((col+cx+2))
|
|
ech 2
|
|
cup $((row+2)) $((col+cx+2))
|
|
ech 2
|
|
cup $((row+3)) $((col+cx+2))
|
|
ech 2
|
|
cup $((row+4)) $((col+cx+2))
|
|
ech 2
|
|
cup $((row+5)) $((col+2))
|
|
ech $((cx+2))
|
|
setab 4
|
|
setaf 7
|
|
!
|
|
else
|
|
tput rev
|
|
for ((c=1;c<5;c++))
|
|
do
|
|
tput cup $((row+c)) $((col+cx+2))
|
|
echo -n " "
|
|
done
|
|
tput cup $((row+c)) $((col+2))
|
|
printf ' %.0s' $(eval echo {1..$((cx+2))})
|
|
tput sgr0
|
|
fi
|
|
tput cup $((row+2)) $((col+4))
|
|
echo -n "<ACS BOX (REP)>"
|
|
|
|
tput cup $line 0
|
|
tput cvvis
|
|
echo -n "OK> "
|
|
read -t 5 yesno
|
|
fi
|