Tera Term

[Ttssh2-commit] [8099] 端末エミュレーションチェック用スクリプト

• 前の記事 (スレッド) [Ttssh2-commit] [8098] 不透明度パーセント計算用に四捨五入関数(round)を定義
• 次の記事 (スレッド) [Ttssh2-commit] [8100] リサイズ中の縦横サイズツールチップの表示位置をリサイズ後の座標に追従するようにした。
• 記事の並び順: [ 日付 ] [ スレッド ] [ 件名 ] [ 著者 ]

Revision: 8099
          https://osdn.net/projects/ttssh2/scm/svn/commits/8099
Author:   doda
Date:     2019-09-09 18:23:58 +0900 (Mon, 09 Sep 2019)
Log Message:
-----------
端末エミュレーションチェック用スクリプト

Added Paths:
-----------
    branches/unicode_buf/tests/unicodebuf-dch.sh
    branches/unicode_buf/tests/unicodebuf-decsel.sh
    branches/unicode_buf/tests/unicodebuf-ech.sh
    branches/unicode_buf/tests/unicodebuf-ich.sh
    branches/unicode_buf/tests/unicodebuf-irm.sh
    branches/unicode_buf/tests/unicodebuf-irm2.sh

-------------- next part --------------
Added: branches/unicode_buf/tests/unicodebuf-dch.sh
===================================================================
--- branches/unicode_buf/tests/unicodebuf-dch.sh	                        (rev 0)
+++ branches/unicode_buf/tests/unicodebuf-dch.sh	2019-09-09 09:23:58 UTC (rev 8099)
@@ -0,0 +1,59 @@
+#!/bin/sh
+
+CSI() {
+  printf "\033[%s" "$1"
+}
+
+Col() {
+  CSI "$1G"
+}
+
+InitScreen() {
+  CSI "8;24;80t" # 端末サイズを 80x24 に変更
+  CSI "2J"	# 画面消去
+  CSI "1;1H"	# カーソルを画面左上に移動
+}
+
+DCHtest() {
+  printf "1234567890abcdefgあいうえおかきくけこさしすせそ"
+  Col $2
+  CSI "$1P"
+  printf "\n"
+}
+
+ret=0
+
+InitScreen
+
+for i in 1 2 3 4 5; do
+  DCHtest $i 18
+done
+
+for i in 1 2 3 4 5; do
+  DCHtest $i 21
+done
+
+cat <<_EoF_
+
+=== 正しい出力は以下 ===
+
+1234567890abcdefg いうえおかきくけこさしすせそ
+1234567890abcdefgいうえおかきくけこさしすせそ
+1234567890abcdefg うえおかきくけこさしすせそ
+1234567890abcdefgうえおかきくけこさしすせそ
+1234567890abcdefg えおかきくけこさしすせそ
+1234567890abcdefgあ うえおかきくけこさしすせそ
+1234567890abcdefgあ  えおかきくけこさしすせそ
+1234567890abcdefgあ えおかきくけこさしすせそ
+1234567890abcdefgあ  おかきくけこさしすせそ
+1234567890abcdefgあ おかきくけこさしすせそ
+_EoF_
+
+for i in 3 2 1; do
+  printf "%d 秒後に画面を再描画します\r" $i
+  read -t 1 && ret=1 && break
+done
+
+CSI 7t		# 画面再描画
+
+exit $ret


Property changes on: branches/unicode_buf/tests/unicodebuf-dch.sh
___________________________________________________________________
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property
Added: branches/unicode_buf/tests/unicodebuf-decsel.sh
===================================================================
--- branches/unicode_buf/tests/unicodebuf-decsel.sh	                        (rev 0)
+++ branches/unicode_buf/tests/unicodebuf-decsel.sh	2019-09-09 09:23:58 UTC (rev 8099)
@@ -0,0 +1,63 @@
+#!/bin/sh
+
+CSI() {
+  printf "\033[%s" "$1"
+}
+
+DECSCA() {
+  case "$1" in
+    off|0)	ch=0;;
+    on|1)	ch=1;;
+  esac
+  CSI ${ch}\"q
+}
+
+Line() {
+  CSI "$1;1H"
+}
+
+SetLine() {
+  DECSCA off
+  printf "********************"
+  DECSCA on
+  printf "########################################"
+  DECSCA off
+  printf "********************"
+  CSI 40G
+}
+
+InitScreen() {
+  CSI "8;24;80t" # 端末サイズを 80x24 に変更
+  CSI "2J"	# 画面消去
+  CSI "1;1H"	# カーソルを画面左上に移動
+}
+
+ICHtest() {
+  SetLine
+  CSI "?0K"
+  printf "\n"
+
+  SetLine
+  CSI "?1K"
+  printf "\n"
+
+  SetLine
+  CSI "?2K"
+  printf "\n"
+}
+
+ret=0
+
+InitScreen
+
+ICHtest
+
+cat <<_EoF_
+
+=== 正しい出力は以下 ===
+
+********************########################################                    
+                    ########################################********************
+                    ########################################                    
+
+_EoF_


Property changes on: branches/unicode_buf/tests/unicodebuf-decsel.sh
___________________________________________________________________
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property
Added: branches/unicode_buf/tests/unicodebuf-ech.sh
===================================================================
--- branches/unicode_buf/tests/unicodebuf-ech.sh	                        (rev 0)
+++ branches/unicode_buf/tests/unicodebuf-ech.sh	2019-09-09 09:23:58 UTC (rev 8099)
@@ -0,0 +1,59 @@
+#!/bin/sh
+
+CSI() {
+  printf "\033[%s" "$1"
+}
+
+Col() {
+  CSI "$1G"
+}
+
+InitScreen() {
+  CSI "8;24;80t" # 端末サイズを 80x24 に変更
+  CSI "2J"	# 画面消去
+  CSI "1;1H"	# カーソルを画面左上に移動
+}
+
+ECHtest() {
+  printf "1234567890abcdefgあいうえおかきくけこさしすせそ"
+  Col $2
+  CSI "$1X"
+  printf "\n"
+}
+
+ret=0
+
+InitScreen
+
+for i in 1 2 3 4 5; do
+  ECHtest $i 18
+done
+
+for i in 1 2 3 4 5; do
+  ECHtest $i 21
+done
+
+cat <<_EoF_
+
+=== 正しい出力は以下 ===
+
+1234567890abcdefg  いうえおかきくけこさしすせそ
+1234567890abcdefg  いうえおかきくけこさしすせそ
+1234567890abcdefg    うえおかきくけこさしすせそ
+1234567890abcdefg    うえおかきくけこさしすせそ
+1234567890abcdefg      えおかきくけこさしすせそ
+1234567890abcdefgあ  うえおかきくけこさしすせそ
+1234567890abcdefgあ    えおかきくけこさしすせそ
+1234567890abcdefgあ    えおかきくけこさしすせそ
+1234567890abcdefgあ      おかきくけこさしすせそ
+1234567890abcdefgあ      おかきくけこさしすせそ
+_EoF_
+
+for i in 3 2 1; do
+  printf "%d 秒後に画面を再描画します\r" $i
+  read -t 1 && ret=1 && break
+done
+
+CSI 7t		# 画面再描画
+
+exit $ret


Property changes on: branches/unicode_buf/tests/unicodebuf-ech.sh
___________________________________________________________________
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property
Added: branches/unicode_buf/tests/unicodebuf-ich.sh
===================================================================
--- branches/unicode_buf/tests/unicodebuf-ich.sh	                        (rev 0)
+++ branches/unicode_buf/tests/unicodebuf-ich.sh	2019-09-09 09:23:58 UTC (rev 8099)
@@ -0,0 +1,51 @@
+#!/bin/sh
+
+CSI() {
+  printf "\033[%s" "$1"
+}
+
+Col() {
+  CSI "$1G"
+}
+
+InitScreen() {
+  CSI "8;24;80t" # 端末サイズを 80x24 に変更
+  CSI "2J"	# 画面消去
+  CSI "1;1H"	# カーソルを画面左上に移動
+}
+
+ICHtest() {
+  printf "1234567890abcdefgあいうえおかきくけこさしすせそ"
+  Col $2
+  CSI "$1@"
+  printf "\n"
+}
+
+ret=0
+
+InitScreen
+
+for i in 1 2 3 4 5; do
+  ICHtest $i 21
+done
+
+cat <<_EoF_
+
+=== 正しい出力は以下 ===
+
+1234567890abcdefgあ   うえおかきくけこさしすせそ
+1234567890abcdefgあ    うえおかきくけこさしすせそ
+1234567890abcdefgあ     うえおかきくけこさしすせそ
+1234567890abcdefgあ      うえおかきくけこさしすせそ
+1234567890abcdefgあ       うえおかきくけこさしすせそ
+
+_EoF_
+
+for i in 3 2 1; do
+  printf "%d 秒後に画面を再描画します\r" $i
+  read -t 1 && ret=1 && break
+done
+
+CSI 7t		# 画面再描画
+
+exit $ret


Property changes on: branches/unicode_buf/tests/unicodebuf-ich.sh
___________________________________________________________________
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property
Added: branches/unicode_buf/tests/unicodebuf-irm.sh
===================================================================
--- branches/unicode_buf/tests/unicodebuf-irm.sh	                        (rev 0)
+++ branches/unicode_buf/tests/unicodebuf-irm.sh	2019-09-09 09:23:58 UTC (rev 8099)
@@ -0,0 +1,52 @@
+#!/bin/sh
+
+CSI() {
+  printf "\033[%s" "$1"
+}
+
+InitScreen() {
+  CSI "8;24;80t" # 端末サイズを 80x24 に変更
+  CSI "2J"	# 画面消去
+  CSI "1;1H"	# カーソルを画面左上に移動
+}
+
+IRMtest() {
+  printf "ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890abcdefghijklmnopqrstuvwxyz1234567890"
+  CSI 4h	# 挿入モード有効化
+  CSI 37G	# 37桁目に移動
+  printf "%*.*s\n" $1 $1 "*********************************"
+  CSI 4l	# 挿入モード解除
+}
+
+ret=0
+
+InitScreen
+
+for i in 1 2 3 4 5 6 7 8 9 10; do
+  IRMtest $i
+done
+
+cat <<_EoF_
+
+=== 正しい出力は以下 ===
+
+ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890*abcdefghijklmnopqrstuvwxyz1234567890
+ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890**abcdefghijklmnopqrstuvwxyz1234567890
+ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890***abcdefghijklmnopqrstuvwxyz1234567890
+ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890****abcdefghijklmnopqrstuvwxyz1234567890
+ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890*****abcdefghijklmnopqrstuvwxyz1234567890
+ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890******abcdefghijklmnopqrstuvwxyz1234567890
+ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890*******abcdefghijklmnopqrstuvwxyz1234567890
+ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890********abcdefghijklmnopqrstuvwxyz1234567890
+ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890*********abcdefghijklmnopqrstuvwxyz123456789
+ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890**********abcdefghijklmnopqrstuvwxyz12345678
+_EoF_
+
+for i in 3 2 1; do
+  printf "%d 秒後に画面を再描画します\r" $i
+  read -t 1 && ret=1 && break
+done
+
+CSI 7t		# 画面再描画
+
+exit $ret


Property changes on: branches/unicode_buf/tests/unicodebuf-irm.sh
___________________________________________________________________
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property
Added: branches/unicode_buf/tests/unicodebuf-irm2.sh
===================================================================
--- branches/unicode_buf/tests/unicodebuf-irm2.sh	                        (rev 0)
+++ branches/unicode_buf/tests/unicodebuf-irm2.sh	2019-09-09 09:23:58 UTC (rev 8099)
@@ -0,0 +1,71 @@
+#!/bin/sh
+
+CSI() {
+  printf "\033[%s" "$1"
+}
+
+IRM() {
+  if [ "$1" == "on" ]; then
+    CSI 4h
+  else
+    CSI 4l
+  fi
+}
+
+Col() {
+  CSI "$1G"
+}
+
+InitScreen() {
+  CSI "8;24;80t" # 端末サイズを 80x24 に変更
+  CSI "2J"	# 画面消去
+  CSI "1;1H"	# カーソルを画面左上に移動
+}
+
+IRMtest() {
+  IRM off
+
+  printf "[IRM ${1}]\n"
+  printf "1234567890abcdefgかきくけこさしすせそ"
+  IRM $1
+  Col 6		# 6 の位置にカーソルを移動
+  printf "あいうえお\n"
+  IRM off
+
+  printf "1234567890abcdefgかきくけこさしすせそ"
+  IRM $1
+  Col 21	# "き"の後半部分にカーソルを移動
+  printf "1234567890\n"
+
+  IRM off
+  printf "\n"
+}
+
+ret=0
+
+InitScreen
+
+IRMtest on
+IRMtest off
+
+cat <<_EoF_
+=== 正しい出力は以下 ===
+
+[IRM on]
+12345あいうえお67890abcdefgかきくけこさしすせそ
+1234567890abcdefgか 1234567890 くけこさしすせそ
+
+[IRM off]
+12345あいうえおfgかきくけこさしすせそ
+1234567890abcdefgか 1234567890 すせそ
+
+_EoF_
+
+for i in 3 2 1; do
+  printf "%d 秒後に画面を再描画します\r" $i
+  read -t 1 && ret=$? && break
+done
+
+CSI 7t		# 画面再描画
+
+exit $ret


Property changes on: branches/unicode_buf/tests/unicodebuf-irm2.sh
___________________________________________________________________
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property

• 前の記事 (スレッド) [Ttssh2-commit] [8098] 不透明度パーセント計算用に四捨五入関数(round)を定義
• 次の記事 (スレッド) [Ttssh2-commit] [8100] リサイズ中の縦横サイズツールチップの表示位置をリサイズ後の座標に追従するようにした。
• 記事の並び順: [ 日付 ] [ スレッド ] [ 件名 ] [ 著者 ]