[Ttssh2-commit] [6607] setflowctrl マクロコマンドを追加した

svnno****@sourc***** svnno****@sourc*****
2017年 2月 23日 (木) 07:10:00 JST


Revision: 6607
          http://sourceforge.jp/projects/ttssh2/scm/svn/commits/6607
Author:   maya
Date:     2017-02-23 07:10:00 +0900 (Thu, 23 Feb 2017)
Log Message:
-----------
setflowctrl マクロコマンドを追加した

Modified Paths:
--------------
    trunk/teraterm/teraterm/ttdde.c
    trunk/teraterm/ttpmacro/ttl.c
    trunk/teraterm/ttpmacro/ttmdde.h
    trunk/teraterm/ttpmacro/ttmparse.c
    trunk/teraterm/ttpmacro/ttmparse.h

-------------- next part --------------
Modified: trunk/teraterm/teraterm/ttdde.c
===================================================================
--- trunk/teraterm/teraterm/ttdde.c	2017-02-22 14:59:07 UTC (rev 6606)
+++ trunk/teraterm/teraterm/ttdde.c	2017-02-22 22:10:00 UTC (rev 6607)
@@ -369,6 +369,7 @@
 #define CmdLogRotate    'W'
 #define CmdLogAutoClose 'X'
 #define CmdGetModemStatus 'Y'
+#define CmdSetFlowCtrl  'Z'
 
 HDDEDATA AcceptExecute(HSZ TopicHSz, HDDEDATA Data)
 {
@@ -925,6 +926,24 @@
 		}
 		break;
 
+	case CmdSetFlowCtrl:
+		{
+		int val;
+
+		if (!cv.Open || cv.PortType != IdSerial)
+			return DDE_FNOTPROCESSED;
+
+		val = atoi(ParamFileName);
+		switch(val) {
+			case 1:
+			case 2:
+			case 3:
+				ts.Flow = val;
+				break;
+		}
+		break;
+		}
+
 	case CmdSetRts:  // add 'setrts' (2008.3.12 maya)
 		{
 		int val, ret;

Modified: trunk/teraterm/ttpmacro/ttl.c
===================================================================
--- trunk/teraterm/ttpmacro/ttl.c	2017-02-22 14:59:07 UTC (rev 6606)
+++ trunk/teraterm/ttpmacro/ttl.c	2017-02-22 22:10:00 UTC (rev 6607)
@@ -6254,6 +6254,8 @@
 			Err = TTLSetExitCode(); break;
 		case RsvSetFileAttr:
 			Err = TTLSetFileAttr(); break;
+		case RsvSetFlowCtrl:
+			Err = TTLCommCmdInt(CmdSetFlowCtrl,0); break;
 		case RsvSetRts:
 			Err = TTLCommCmdInt(CmdSetRts,0); break;
 		case RsvSetSync:

Modified: trunk/teraterm/ttpmacro/ttmdde.h
===================================================================
--- trunk/teraterm/ttpmacro/ttmdde.h	2017-02-22 14:59:07 UTC (rev 6606)
+++ trunk/teraterm/ttpmacro/ttmdde.h	2017-02-22 22:10:00 UTC (rev 6607)
@@ -63,6 +63,7 @@
 #define CmdLogRotate    'W'
 #define CmdLogAutoClose 'X'
 #define CmdGetModemStatus 'Y'
+#define CmdSetFlowCtrl  'Z'
 
 #ifdef __cplusplus
 extern "C" {

Modified: trunk/teraterm/ttpmacro/ttmparse.c
===================================================================
--- trunk/teraterm/ttpmacro/ttmparse.c	2017-02-22 14:59:07 UTC (rev 6606)
+++ trunk/teraterm/ttpmacro/ttmparse.c	2017-02-22 22:10:00 UTC (rev 6607)
@@ -348,6 +348,7 @@
 		else if (_stricmp(Str,"setecho")==0) *WordId = RsvSetEcho;
 		else if (_stricmp(Str,"setenv")==0) *WordId = RsvSetEnv;    // reactivate 'setenv' (2007.8.31 maya)
 		else if (_stricmp(Str,"setexitcode")==0) *WordId = RsvSetExitCode;
+		else if (_stricmp(Str,"setflowctrl")==0) *WordId = RsvSetFlowCtrl;
 		else if (_stricmp(Str,"setpassword")==0) *WordId = RsvSetPassword;    // add 'setpassword'  (2012.5.23 yutaka)
 		else if (_stricmp(Str,"setrts")==0) *WordId = RsvSetRts;    // add 'setrts'  (2008.3.12 maya)
 		else if (_stricmp(Str,"setsync")==0) *WordId = RsvSetSync;

Modified: trunk/teraterm/ttpmacro/ttmparse.h
===================================================================
--- trunk/teraterm/ttpmacro/ttmparse.h	2017-02-22 14:59:07 UTC (rev 6606)
+++ trunk/teraterm/ttpmacro/ttmparse.h	2017-02-22 22:10:00 UTC (rev 6607)
@@ -248,6 +248,7 @@
 #define RsvUptime		212
 #define RsvGetModemStatus	213
 #define RsvDirnameBox   214
+#define RsvSetFlowCtrl   215
 
 #define RsvOperator     1000
 #define RsvBNot         1001



Ttssh2-commit メーリングリストの案内