svnno****@sourc*****
svnno****@sourc*****
2010年 8月 21日 (土) 23:36:58 JST
Tera TermRevision: 4037
http://sourceforge.jp/projects/ttssh2/svn/view?view=rev&revision=4037
Author: maya
Date: 2010-08-21 23:36:58 +0900 (Sat, 21 Aug 2010)
Log Message:
-----------
strsplit マクãƒã‚³ãƒžãƒ³ãƒ‰ã® count 引数çœç•¥æ™‚ã®å‹•ä½œã‚’変更ã—ãŸ
Modified Paths:
--------------
trunk/doc/en/html/macro/command/strsplit.html
trunk/doc/ja/html/macro/command/strsplit.html
trunk/teraterm/ttpmacro/ttl.c
-------------- next part --------------
Modified: trunk/doc/en/html/macro/command/strsplit.html
===================================================================
--- trunk/doc/en/html/macro/command/strsplit.html 2010-08-21 13:50:37 UTC (rev 4036)
+++ trunk/doc/en/html/macro/command/strsplit.html 2010-08-21 14:36:58 UTC (rev 4037)
@@ -29,21 +29,26 @@
Splits the string <strval> by the <separator> delimiter, and returns the 9 system variables from "groupmatchstr1" to "groupmatchstr9".
</p>
-<!--p>
-<separator> ‚É‚Í‹æØ‚è‹L†‚Æ‚µ‚Ĉµ‚¤•¶Žš‚ð1•¶Žš‚¾‚¯Žw’è‚·‚éB
-</p-->
+<p>
+<!--<separator> ‚É‚Í‹æØ‚è‹L†‚Æ‚µ‚Ĉµ‚¤•¶Žš‚ð1•¶Žš‚¾‚¯Žw’è‚·‚éB-->
+</p>
<p>
-The <count> is specified the maximum number of substrings to return.<br>
+The <count> is specified the maximum number of substrings to return. The upper limit of <count> is 9.<br>
If a number of substrings is smaller than <count>, the remaining groupmatchstr variables stores NULL.<br>
-<!--•¶Žš—ñ’†‚Ì•”•ª•¶Žš—ñ‚Ì”‚ª <count> ‚ð’´‚¦‚é‚Æ‚«AÅŒã‚Ìgroupmatchstr‚É‚ÍŽc‚è‚Ì•¶Žš—ñ‚ª‚·‚ׂđã“ü‚³‚ê‚éB<br>
-<count> ‚ªÈ—ª‚³‚ê‚½ê‡‚É‚Í 9 ‚Æ‚Ý‚È‚³‚ê‚éB-->
+<!--•¶Žš—ñ’†‚Ì•”•ª•¶Žš—ñ‚Ì”‚ª <count> ‚ð’´‚¦‚é‚Æ‚«AÅŒã‚Ìgroupmatchstr‚É‚ÍŽc‚è‚Ì•¶Žš—ñ‚ª‚·‚ׂđã“ü‚³‚ê‚éB-->
</p>
-<!--p>
-ŽÀÛ‚É•ªŠ„‚³‚ꂽŒÂ”‚ðƒVƒXƒeƒ€•Ï” result ‚ÉŠi”[‚·‚éB
-</p-->
+<p>
+<!--<count> ‚ªÈ—ª‚³‚ꂽꇂɂÍA•”•ª•¶Žš—ñ‚ÌÅ‘å”‚Í 9 ‚Æ‚Ý‚È‚³‚ê‚éB<br>
+•¶Žš—ñ’†‚Ì•”•ª•¶Žš—ñ‚Ì”‚ª 9 ‚ð’´‚¦‚é‚Æ‚«A<count> ‚ðŽw’肵‚½ê‡‚Ƃ͈Ⴂ 9 ”Ô–Ú‚Ì•”•ª•¶Žš—ñ‚Ì‚Ý‚ª‘ã“ü‚³‚ê‚éB-->
+</p>
+<p>
+<!--ŽÀÛ‚É•ªŠ„‚³‚ꂽŒÂ”‚ðƒVƒXƒeƒ€•Ï” result ‚ÉŠi”[‚·‚éB<br>
+<count> ‚ªÈ—ª‚³‚êA•¶Žš—ñ’†‚Ì•”•ª•¶Žš—ñ‚Ì”‚ª 9 ‚ð’´‚¦‚é‚Æ‚«‚ÍAƒVƒXƒeƒ€•Ï” result ‚É 10 ‚ðŠi”[‚·‚éB-->
+</p>
+
<h2>Example</h2>
<pre class="macro-example">
@@ -88,6 +93,20 @@
messagebox groupmatchstr8 "groupmatchstr8" ; ''
messagebox groupmatchstr9 "groupmatchstr9" ; ''
messagebox result "result" ; 3
+
+src='1,2,3,4,5,6,7,8,9,0'
+strsplit src ','
+
+messagebox groupmatchstr1 "groupmatchstr1" ; '1'
+messagebox groupmatchstr2 "groupmatchstr2" ; '2'
+messagebox groupmatchstr3 "groupmatchstr3" ; '3'
+messagebox groupmatchstr4 "groupmatchstr4" ; '4'
+messagebox groupmatchstr5 "groupmatchstr5" ; '5'
+messagebox groupmatchstr6 "groupmatchstr6" ; '6'
+messagebox groupmatchstr7 "groupmatchstr7" ; '7'
+messagebox groupmatchstr8 "groupmatchstr8" ; '8'
+messagebox groupmatchstr9 "groupmatchstr9" ; '9'
+messagebox result "result" ; 10
</pre>
<h2>Reference</h2>
Modified: trunk/doc/ja/html/macro/command/strsplit.html
===================================================================
--- trunk/doc/ja/html/macro/command/strsplit.html 2010-08-21 13:50:37 UTC (rev 4036)
+++ trunk/doc/ja/html/macro/command/strsplit.html 2010-08-21 14:36:58 UTC (rev 4037)
@@ -36,14 +36,19 @@
<p>
<count> ‚É‚ÍAŽæ“¾‚·‚é•”•ª•¶Žš—ñ‚ÌÅ‘å”i9ˆÈ‰ºj‚ðŽw’è‚·‚éB <br>
•¶Žš—ñ’†‚Ì•”•ª•¶Žš—ñ‚Ì”‚ª <count> –¢–ž‚Å‚ ‚é‚Æ‚«A•”•ª•¶Žš—ñ‚ª‘ã“ü‚³‚ê‚È‚©‚Á‚½groupmatchstr‚É‚ÍANULL‚ª‘ã“ü‚³‚ê‚éB<br>
-•¶Žš—ñ’†‚Ì•”•ª•¶Žš—ñ‚Ì”‚ª <count> ‚ð’´‚¦‚é‚Æ‚«AÅŒã‚Ìgroupmatchstr‚É‚ÍŽc‚è‚Ì•¶Žš—ñ‚ª‚·‚ׂđã“ü‚³‚ê‚éB<br>
-<count> ‚ªÈ—ª‚³‚ê‚½ê‡‚É‚Í 9 ‚Æ‚Ý‚È‚³‚ê‚éB
+•¶Žš—ñ’†‚Ì•”•ª•¶Žš—ñ‚Ì”‚ª <count> ‚ð’´‚¦‚é‚Æ‚«AÅŒã‚Ìgroupmatchstr‚É‚ÍŽc‚è‚Ì•¶Žš—ñ‚ª‚·‚ׂđã“ü‚³‚ê‚éB
</p>
<p>
-ŽÀÛ‚É•ªŠ„‚³‚ꂽŒÂ”‚ðƒVƒXƒeƒ€•Ï” result ‚ÉŠi”[‚·‚éB
+<count> ‚ªÈ—ª‚³‚ꂽꇂɂÍA•”•ª•¶Žš—ñ‚ÌÅ‘å”‚Í 9 ‚Æ‚Ý‚È‚³‚ê‚éB<br>
+•¶Žš—ñ’†‚Ì•”•ª•¶Žš—ñ‚Ì”‚ª 9 ‚ð’´‚¦‚é‚Æ‚«A<count> ‚ðŽw’肵‚½ê‡‚Ƃ͈Ⴂ 9 ”Ô–Ú‚Ì•”•ª•¶Žš—ñ‚Ì‚Ý‚ª‘ã“ü‚³‚ê‚éB
</p>
+<p>
+ŽÀÛ‚É•ªŠ„‚³‚ꂽŒÂ”‚ðƒVƒXƒeƒ€•Ï” result ‚ÉŠi”[‚·‚éB<br>
+<count> ‚ªÈ—ª‚³‚êA•¶Žš—ñ’†‚Ì•”•ª•¶Žš—ñ‚Ì”‚ª 9 ‚ð’´‚¦‚é‚Æ‚«‚ÍAƒVƒXƒeƒ€•Ï” result ‚É 10 ‚ðŠi”[‚·‚éB
+</p>
+
<h2>—á</h2>
<pre class="macro-example">
@@ -88,6 +93,20 @@
messagebox groupmatchstr8 "groupmatchstr8" ; ''
messagebox groupmatchstr9 "groupmatchstr9" ; ''
messagebox result "result" ; 3
+
+src='1,2,3,4,5,6,7,8,9,0'
+strsplit src ','
+
+messagebox groupmatchstr1 "groupmatchstr1" ; '1'
+messagebox groupmatchstr2 "groupmatchstr2" ; '2'
+messagebox groupmatchstr3 "groupmatchstr3" ; '3'
+messagebox groupmatchstr4 "groupmatchstr4" ; '4'
+messagebox groupmatchstr5 "groupmatchstr5" ; '5'
+messagebox groupmatchstr6 "groupmatchstr6" ; '6'
+messagebox groupmatchstr7 "groupmatchstr7" ; '7'
+messagebox groupmatchstr8 "groupmatchstr8" ; '8'
+messagebox groupmatchstr9 "groupmatchstr9" ; '9'
+messagebox result "result" ; 10
</pre>
<h2>ŽQÆ</h2>
Modified: trunk/teraterm/ttpmacro/ttl.c
===================================================================
--- trunk/teraterm/ttpmacro/ttl.c 2010-08-21 13:50:37 UTC (rev 4036)
+++ trunk/teraterm/ttpmacro/ttl.c 2010-08-21 14:36:58 UTC (rev 4037)
@@ -3641,7 +3641,7 @@
int maxvar;
int srclen, len;
int i, count;
- BOOL ary = FALSE;
+ BOOL ary = FALSE, omit = FALSE;
char *p;
char /* *last, */ *tok[MAXVARNUM];
@@ -3664,6 +3664,7 @@
}
else {
maxvar = 9;
+ omit = TRUE;
}
if ((Err==0) && (GetFirstChar()!=0))
@@ -3721,11 +3722,13 @@
p = buf;
count = 1;
tok[count-1] = p;
- for (i=0; i < srclen && count < maxvar; i++) {
+ for (i=0; i < srclen && count < maxvar + omit; i++) { // count È—ªŽž‚É‚ÍA’´‰ß•ª‚ðŽÌ‚Ă邽‚ß 1 ‚—]•ª‚Éi‚ß‚é
if (*p == *delimchars) {
*p = '\0';
count++;
- tok[count-1] = p+1;
+ if (count <= MAXVARNUM) { // tok ‚Ì—v‘f”‚ð’´‚¦‚Ä‘ã“ü‚µ‚È‚¢‚悤‚É‚·‚é(count È—ªŽž‚Ì‚½‚ß)
+ tok[count-1] = p+1;
+ }
}
p++;
}