[9238] TTLコマンド getdate で問題が発生するかチェック (Ttssh2-commit) - Tera Term

Revision: 9238
          https://osdn.net/projects/ttssh2/scm/svn/commits/9238
Author:   zmatsuo
Date:     2021-05-10 23:11:03 +0900 (Mon, 10 May 2021)
Log Message:
-----------
TTLコマンド getdate で問題が発生するかチェック

- Visual Studio 2005 のCランタイムに不具合がある
  - 修正パッチが適応されている場合は問題は発生しない
- 不具合がある場合、実際の時刻とより1時間進んだ値を返す
- 環境変数TZの内容、localtime() の呼び出し方によって発生
- ビルドした Tera Term に問題がないかチェックする
- 引数に exitcode_only をつけると、messageboxを表示しない

ticket #41952

MF4-stable
  r9213, r9214

Revision Links:
--------------
    https://osdn.net/projects/ttssh2/scm/svn/commits/9213
    https://osdn.net/projects/ttssh2/scm/svn/commits/9214

Ticket Links:
------------
    https://osdn.net/projects/ttssh2/tracker/detail/41952

Added Paths:
-----------
    trunk/tests/#41952-gettime.ttl

-------------- next part --------------
Added: trunk/tests/#41952-gettime.ttl
===================================================================

--- trunk/tests/#41952-gettime.ttl	                        (rev 0)
+++ trunk/tests/#41952-gettime.ttl	2021-05-10 14:11:03 UTC (rev 9238)
@@ -0,0 +1,38 @@
+; gettime\x82̕s\x8B\x82\xF0\x8C\x9F\x8Fo\x82\xB7\x82\xE9
+;
+; - Visual Studio 2005 \x82\xCCC\x83\x89\x83\x93\x83^\x83C\x83\x80\x82ɕs\x8B\x82\xAA\x82\xA0\x82\xE9
+;   - \x8FC\x90\xB3\x83p\x83b\x83`\x82\xAA\x93K\x89\x9E\x82\xB3\x82\xEA\x82Ă\xA2\x82\xE9\x8Fꍇ\x82͖\xE2\x91\xE8\x82͔\xAD\x90\xB6\x82\xB5\x82Ȃ\xA2
+; - \x95s\x8B\x82\xAA\x82\xA0\x82\xE9\x8Fꍇ\x81A\x8E\xC0\x8Dۂ̎\x9E\x8D\x8F\x82Ƃ\xE6\x82\xE81\x8E\x9E\x8AԐi\x82񂾒l\x82\xF0\x95Ԃ\xB7
+; - \x8A\xAB\x95ϐ\x94 TZ\x82̓\xE0\x97e\x81Alocaltime() \x82̌Ăяo\x82\xB5\x95\xFB\x82ɂ\xE6\x82\xC1\x82Ĕ\xAD\x90\xB6
+; - \x83r\x83\x8B\x83h\x82\xB5\x82\xBD Tera Term \x82ɖ\xE2\x91肪\x82Ȃ\xA2\x82\xA9\x83`\x83F\x83b\x83N\x82\xB7\x82\xE9
+;
+; ticket #41952
+; https://ja.osdn.net/projects/ttssh2/ticket/41952
+
+exitcode_only = 0
+if paramcnt == 2 then
+    strcompare params[2] "exitcode_only"
+    if result == 0 then
+       exitcode_only = 1
+    endif
+endif
+
+tz2="UTC"
+gettime tm2 "%Y/%m/%d %H:%M:%S" tz2
+
+gettime tm1 "%Y/%m/%d %H:%M:%S"
+
+tz3="GMT"
+gettime tm3 "%Y/%m/%d %H:%M:%S" tz3
+
+strcompare tm2 tm3
+if result <> 0 then
+    setexitcode 0;
+    msg = "getdate has problem!"
+else
+    setexitcode 1;
+    msg = "no problem"
+endif
+if exitcode_only == 0 then
+    messagebox msg "tera term"
+endif


Tera Term

[Ttssh2-commit] [9238] TTLコマンド getdate で問題が発生するかチェック