Develop and Download Open Source Software

Tera Term

Browse Subversion Repository

/[ttssh2]/trunk/teraterm/ttpset/ttset.c

Contents of /trunk/teraterm/ttpset/ttset.c

Parent Directory Parent Directory | Revision Log Revision Log

Revision 2631 - (show annotations) (download) (as text)
Fri Jan 9 04:31:51 2009 UTC (15 years, 3 months ago) by doda
Original Path: teraterm/trunk/ttpset/ttset.c
File MIME type: text/x-csrc
File size: 88780 byte(s) 
コントロールキーを押している間は、TranslateWheelToCursorを無効に出来るようにした。
1 /* Tera Term
2 Copyright(C) 1994-1998 T. Teranishi
3 All rights reserved. */
4 /* IPv6 modification is Copyright(C) 2000 Jun-ya kato <kato@win6.jp> */
5
6 /* TTSET.DLL, setup file routines*/
7 #ifndef NO_INET6
8 #include <winsock2.h>
9 #include <ws2tcpip.h>
10 #endif /* NO_INET6 */
11 #include "teraterm.h"
12 #include "tttypes.h"
13 #include <stdio.h>
14 #include <string.h>
15 #include <direct.h>
16 #include "ttlib.h"
17 #include "tt_res.h"
18
19 #define Section "Tera Term"
20
21 static PCHAR far TermList[] =
22 { "VT100", "VT100J", "VT101", "VT102", "VT102J", "VT220J", "VT282",
23 "VT320", "VT382", NULL };
24 // expansion (2005.11.30 yutaka)
25 static PCHAR BaudList[] =
26 { "110", "300", "600", "1200", "2400", "4800", "9600",
27 "14400", "19200", "38400", "57600", "115200",
28 "230400", "460800", "921600", NULL
29 };
30
31 static PCHAR far RussList[] =
32 { "Windows", "KOI8-R", "CP-866", "ISO-8859-5", NULL };
33 static PCHAR far RussList2[] = { "Windows", "KOI8-R", NULL };
34
35 WORD str2id(PCHAR far * List, PCHAR str, WORD DefId)
36 {
37 WORD i;
38 i = 0;
39 while ((List[i] != NULL) && (_stricmp(List[i], str) != 0))
40 i++;
41 if (List[i] == NULL)
42 i = DefId;
43 else
44 i++;
45
46 return i;
47 }
48
49 void id2str(PCHAR far * List, WORD Id, WORD DefId, PCHAR str, int destlen)
50 {
51 int i;
52
53 if (Id == 0)
54 i = DefId - 1;
55 else {
56 i = 0;
57 while ((List[i] != NULL) && (i < Id - 1))
58 i++;
59 if (List[i] == NULL)
60 i = DefId - 1;
61 }
62 strncpy_s(str, destlen, List[i], _TRUNCATE);
63 }
64
65 int IconName2IconId(const char *name) {
66 int id;
67
68 if (_stricmp(name, "tterm") == 0) {
69 id = IDI_TTERM;
70 }
71 else if (_stricmp(name, "vt") == 0) {
72 id = IDI_VT;
73 }
74 else if (_stricmp(name, "tek") == 0) {
75 id = IDI_TEK;
76 }
77 else if (_stricmp(name, "tterm_classic") == 0) {
78 id = IDI_TTERM_CLASSIC;
79 }
80 else if (_stricmp(name, "vt_classic") == 0) {
81 id = IDI_VT_CLASSIC;
82 }
83 else if (_stricmp(name, "cygterm") == 0) {
84 id = IDI_CYGTERM;
85 }
86 else {
87 id = IdIconDefault;
88 }
89 return id;
90 }
91
92 void IconId2IconName(char *name, int len, int id) {
93 char *icon;
94 switch (id) {
95 case IDI_TTERM:
96 icon = "tterm";
97 break;
98 case IDI_VT:
99 icon = "vt";
100 break;
101 case IDI_TEK:
102 icon = "tek";
103 break;
104 case IDI_TTERM_CLASSIC:
105 icon = "tterm_classic";
106 break;
107 case IDI_VT_CLASSIC:
108 icon = "vt_classic";
109 break;
110 case IDI_CYGTERM:
111 icon = "cygterm";
112 break;
113 default:
114 icon = "Default";
115 }
116 strncpy_s(name, len, icon, _TRUNCATE);
117 }
118
119 WORD GetOnOff(PCHAR Sect, PCHAR Key, PCHAR FName, BOOL Default)
120 {
121 char Temp[4];
122 GetPrivateProfileString(Sect, Key, "", Temp, sizeof(Temp), FName);
123 if (Default) {
124 if (_stricmp(Temp, "off") == 0)
125 return 0;
126 else
127 return 1;
128 }
129 else {
130 if (_stricmp(Temp, "on") == 0)
131 return 1;
132 else
133 return 0;
134 }
135 }
136
137 void WriteOnOff(PCHAR Sect, PCHAR Key, PCHAR FName, WORD Flag)
138 {
139 char Temp[4];
140
141 if (Flag != 0)
142 strncpy_s(Temp, sizeof(Temp), "on", _TRUNCATE);
143 else
144 strncpy_s(Temp, sizeof(Temp), "off", _TRUNCATE);
145 WritePrivateProfileString(Sect, Key, Temp, FName);
146 }
147
148 void WriteInt(PCHAR Sect, PCHAR Key, PCHAR FName, int i)
149 {
150 char Temp[15];
151 _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d", i);
152 WritePrivateProfileString(Sect, Key, Temp, FName);
153 }
154
155 void WriteUint(PCHAR Sect, PCHAR Key, PCHAR FName, UINT i)
156 {
157 char Temp[15];
158 _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%u", i);
159 WritePrivateProfileString(Sect, Key, Temp, FName);
160 }
161
162 void WriteInt2(PCHAR Sect, PCHAR Key, PCHAR FName, int i1, int i2)
163 {
164 char Temp[32];
165 _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d,%d", i1, i2);
166 WritePrivateProfileString(Sect, Key, Temp, FName);
167 }
168
169 void WriteInt4(PCHAR Sect, PCHAR Key, PCHAR FName,
170 int i1, int i2, int i3, int i4)
171 {
172 char Temp[64];
173 _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d,%d,%d,%d",
174 i1, i2, i3, i4);
175 WritePrivateProfileString(Sect, Key, Temp, FName);
176 }
177
178 void WriteInt6(PCHAR Sect, PCHAR Key, PCHAR FName,
179 int i1, int i2, int i3, int i4, int i5, int i6)
180 {
181 char Temp[96];
182 _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d,%d,%d,%d,%d,%d",
183 i1, i2,i3, i4, i5, i6);
184 WritePrivateProfileString(Sect, Key, Temp, FName);
185 }
186
187 void WriteFont(PCHAR Sect, PCHAR Key, PCHAR FName,
188 PCHAR Name, int x, int y, int charset)
189 {
190 char Temp[80];
191 if (Name[0] != 0)
192 _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%s,%d,%d,%d",
193 Name, x, y, charset);
194 else
195 Temp[0] = 0;
196 WritePrivateProfileString(Sect, Key, Temp, FName);
197 }
198
199 void FAR PASCAL ReadIniFile(PCHAR FName, PTTSet ts)
200 {
201 int i;
202 HDC TmpDC;
203 char Temp[MAXPATHLEN];
204
205 ts->Minimize = 0;
206 ts->HideWindow = 0;
207 ts->LogFlag = 0; // Log flags
208 ts->FTFlag = 0; // File transfer flags
209 ts->MenuFlag = 0; // Menu flags
210 ts->TermFlag = 0; // Terminal flag
211 ts->ColorFlag = 0; // ANSI color flags
212 ts->PortFlag = 0; // Port flags
213 ts->TelPort = 23;
214
215 /* Version number */
216 /* GetPrivateProfileString(Section,"Version","",
217 Temp,sizeof(Temp),FName); */
218
219 /* Language */
220 GetPrivateProfileString(Section, "Language", "",
221 Temp, sizeof(Temp), FName);
222 if (_stricmp(Temp, "Japanese") == 0)
223 ts->Language = IdJapanese;
224 else if (_stricmp(Temp, "Russian") == 0)
225 ts->Language = IdRussian;
226 else if (_stricmp(Temp, "English") == 0)
227 ts->Language = IdEnglish;
228 else if (_stricmp(Temp,"Korean") == 0) // HKS
229 ts->Language = IdKorean;
230 else {
231 switch (PRIMARYLANGID(GetSystemDefaultLangID())) {
232 case LANG_JAPANESE:
233 ts->Language = IdJapanese;
234 break;
235 case LANG_RUSSIAN:
236 ts->Language = IdRussian;
237 break;
238 case LANG_KOREAN: // HKS
239 ts->Language = IdKorean;
240 break;
241 default:
242 ts->Language = IdEnglish;
243 }
244 }
245
246 /* Port type */
247 GetPrivateProfileString(Section, "Port", "",
248 Temp, sizeof(Temp), FName);
249 if (_stricmp(Temp, "tcpip") == 0)
250 ts->PortType = IdTCPIP;
251 else if (_stricmp(Temp, "serial") == 0)
252 ts->PortType = IdSerial;
253 else {
254 ts->PortType = IdTCPIP;
255 }
256
257 /* VT win position */
258 GetPrivateProfileString(Section, "VTPos", "-2147483648,-2147483648", Temp, sizeof(Temp), FName); /* default: random position */
259 GetNthNum(Temp, 1, (int far *) (&ts->VTPos.x));
260 GetNthNum(Temp, 2, (int far *) (&ts->VTPos.y));
261
262 /* TEK win position */
263 GetPrivateProfileString(Section, "TEKPos", "-2147483648,-2147483648", Temp, sizeof(Temp), FName); /* default: random position */
264 GetNthNum(Temp, 1, (int far *) &(ts->TEKPos.x));
265 GetNthNum(Temp, 2, (int far *) &(ts->TEKPos.y));
266
267 /* Save VT Window position */
268 ts->SaveVTWinPos = GetOnOff(Section, "SaveVTWinPos", FName, FALSE);
269
270 /* VT terminal size */
271 GetPrivateProfileString(Section, "TerminalSize", "80,24",
272 Temp, sizeof(Temp), FName);
273 GetNthNum(Temp, 1, &ts->TerminalWidth);
274 GetNthNum(Temp, 2, &ts->TerminalHeight);
275 if (ts->TerminalWidth < 0)
276 ts->TerminalWidth = 1;
277 if (ts->TerminalHeight < 0)
278 ts->TerminalHeight = 1;
279
280 /* Terminal size = Window size */
281 ts->TermIsWin = GetOnOff(Section, "TermIsWin", FName, FALSE);
282
283 /* Auto window resize flag */
284 ts->AutoWinResize = GetOnOff(Section, "AutoWinResize", FName, FALSE);
285
286 /* CR Receive */
287 GetPrivateProfileString(Section, "CRReceive", "",
288 Temp, sizeof(Temp), FName);
289 if (_stricmp(Temp, "CRLF") == 0) {
290 ts->CRReceive = IdCRLF;
291 }
292 else if (_stricmp(Temp, "LF") == 0) {
293 ts->CRReceive = IdLF;
294 }
295 else {
296 ts->CRReceive = IdCR;
297 }
298 /* CR Send */
299 GetPrivateProfileString(Section, "CRSend", "",
300 Temp, sizeof(Temp), FName);
301 if (_stricmp(Temp, "CRLF") == 0)
302 ts->CRSend = IdCRLF;
303 else
304 ts->CRSend = IdCR;
305 ts->CRSend_ini = ts->CRSend;
306
307 /* Local echo */
308 ts->LocalEcho = GetOnOff(Section, "LocalEcho", FName, FALSE);
309 ts->LocalEcho_ini = ts->LocalEcho;
310
311 /* Answerback */
312 GetPrivateProfileString(Section, "Answerback", "", Temp,
313 sizeof(Temp), FName);
314 ts->AnswerbackLen =
315 Hex2Str(Temp, ts->Answerback, sizeof(ts->Answerback));
316
317 /* Kanji Code (receive) */
318 GetPrivateProfileString(Section, "KanjiReceive", "",
319 Temp, sizeof(Temp), FName);
320 if (_stricmp(Temp, "EUC") == 0)
321 ts->KanjiCode = IdEUC;
322 else if (_stricmp(Temp, "JIS") == 0)
323 ts->KanjiCode = IdJIS;
324 else if (_stricmp(Temp, "UTF-8") == 0)
325 ts->KanjiCode = IdUTF8;
326 else if (_stricmp(Temp, "UTF-8m") == 0)
327 ts->KanjiCode = IdUTF8m;
328 else
329 ts->KanjiCode = IdSJIS;
330
331 /* Katakana (receive) */
332 GetPrivateProfileString(Section, "KatakanaReceive", "",
333 Temp, sizeof(Temp), FName);
334 if (_stricmp(Temp, "7") == 0)
335 ts->JIS7Katakana = 1;
336 else
337 ts->JIS7Katakana = 0;
338
339 /* Kanji Code (transmit) */
340 GetPrivateProfileString(Section, "KanjiSend", "",
341 Temp, sizeof(Temp), FName);
342 if (_stricmp(Temp, "EUC") == 0)
343 ts->KanjiCodeSend = IdEUC;
344 else if (_stricmp(Temp, "JIS") == 0)
345 ts->KanjiCodeSend = IdJIS;
346 else if (_stricmp(Temp, "UTF-8") == 0)
347 ts->KanjiCodeSend = IdUTF8;
348 else
349 ts->KanjiCodeSend = IdSJIS;
350
351 /* Katakana (receive) */
352 GetPrivateProfileString(Section, "KatakanaSend", "",
353 Temp, sizeof(Temp), FName);
354 if (_stricmp(Temp, "7") == 0)
355 ts->JIS7KatakanaSend = 1;
356 else
357 ts->JIS7KatakanaSend = 0;
358
359 /* KanjiIn */
360 GetPrivateProfileString(Section, "KanjiIn", "",
361 Temp, sizeof(Temp), FName);
362 if (_stricmp(Temp, "@") == 0)
363 ts->KanjiIn = IdKanjiInA;
364 else
365 ts->KanjiIn = IdKanjiInB;
366
367 /* KanjiOut */
368 GetPrivateProfileString(Section, "KanjiOut", "",
369 Temp, sizeof(Temp), FName);
370 if (_stricmp(Temp, "B") == 0)
371 ts->KanjiOut = IdKanjiOutB;
372 else if (_stricmp(Temp, "H") == 0)
373 ts->KanjiOut = IdKanjiOutH;
374 else
375 ts->KanjiOut = IdKanjiOutJ;
376
377 /* Auto Win Switch VT<->TEK */
378 ts->AutoWinSwitch = GetOnOff(Section, "AutoWinSwitch", FName, FALSE);
379
380 /* Terminal ID */
381 GetPrivateProfileString(Section, "TerminalID", "",
382 Temp, sizeof(Temp), FName);
383 ts->TerminalID = str2id(TermList, Temp, IdVT100);
384
385 /* Russian character set (host) */
386 GetPrivateProfileString(Section, "RussHost", "",
387 Temp, sizeof(Temp), FName);
388 ts->RussHost = str2id(RussList, Temp, IdKOI8);
389
390 /* Russian character set (client) */
391 GetPrivateProfileString(Section, "RussClient", "",
392 Temp, sizeof(Temp), FName);
393 ts->RussClient = str2id(RussList, Temp, IdWindows);
394
395 /* Title String */
396 GetPrivateProfileString(Section, "Title", "Tera Term",
397 ts->Title, sizeof(ts->Title), FName);
398
399 /* Cursor shape */
400 GetPrivateProfileString(Section, "CursorShape", "",
401 Temp, sizeof(Temp), FName);
402 if (_stricmp(Temp, "vertical") == 0)
403 ts->CursorShape = IdVCur;
404 else if (_stricmp(Temp, "horizontal") == 0)
405 ts->CursorShape = IdHCur;
406 else
407 ts->CursorShape = IdBlkCur;
408
409 /* Hide title */
410 ts->HideTitle = GetOnOff(Section, "HideTitle", FName, FALSE);
411
412 /* Popup menu */
413 ts->PopupMenu = GetOnOff(Section, "PopupMenu", FName, FALSE);
414
415 /* PC-Style bold color mapping */
416 ts->ColorFlag |=
417 CF_PCBOLD16 * GetOnOff(Section, "PcBoldColor", FName, FALSE);
418
419 /* aixterm style 16 colors mode */
420 ts->ColorFlag |=
421 CF_AIXTERM16 * GetOnOff(Section, "Aixterm16Color", FName, FALSE);
422
423 /* xterm style 256 colors mode */
424 ts->ColorFlag |=
425 CF_XTERM256 * GetOnOff(Section, "Xterm256Color", FName, TRUE);
426
427 /* Enable scroll buffer */
428 ts->EnableScrollBuff =
429 GetOnOff(Section, "EnableScrollBuff", FName, TRUE);
430
431 /* Scroll buffer size */
432 ts->ScrollBuffSize =
433 GetPrivateProfileInt(Section, "ScrollBuffSize", 100, FName);
434
435 /* VT Color */
436 GetPrivateProfileString(Section, "VTColor", "0,0,0,255,255,255",
437 Temp, sizeof(Temp), FName);
438 for (i = 0; i <= 5; i++)
439 GetNthNum(Temp, i + 1, (int far *) &(ts->TmpColor[0][i]));
440 for (i = 0; i <= 1; i++)
441 ts->VTColor[i] = RGB((BYTE) ts->TmpColor[0][i * 3],
442 (BYTE) ts->TmpColor[0][i * 3 + 1],
443 (BYTE) ts->TmpColor[0][i * 3 + 2]);
444
445 /* VT Bold Color */
446 GetPrivateProfileString(Section, "VTBoldColor", "0,0,255,255,255,255",
447 Temp, sizeof(Temp), FName);
448 for (i = 0; i <= 5; i++)
449 GetNthNum(Temp, i + 1, (int far *) &(ts->TmpColor[0][i]));
450 for (i = 0; i <= 1; i++)
451 ts->VTBoldColor[i] = RGB((BYTE) ts->TmpColor[0][i * 3],
452 (BYTE) ts->TmpColor[0][i * 3 + 1],
453 (BYTE) ts->TmpColor[0][i * 3 + 2]);
454
455 /* VT Blink Color */
456 GetPrivateProfileString(Section, "VTBlinkColor", "255,0,0,255,255,255",
457 Temp, sizeof(Temp), FName);
458 for (i = 0; i <= 5; i++)
459 GetNthNum(Temp, i + 1, (int far *) &(ts->TmpColor[0][i]));
460 for (i = 0; i <= 1; i++)
461 ts->VTBlinkColor[i] = RGB((BYTE) ts->TmpColor[0][i * 3],
462 (BYTE) ts->TmpColor[0][i * 3 + 1],
463 (BYTE) ts->TmpColor[0][i * 3 + 2]);
464
465 /* begin - ishizaki */
466 ts->EnableClickableUrl =
467 GetOnOff(Section, "EnableClickableUrl", FName, FALSE);
468
469 /* URL Color */
470 GetPrivateProfileString(Section, "URLColor", "0,255,0,255,255,255",
471 Temp, sizeof(Temp), FName);
472 for (i = 0; i <= 5; i++)
473 GetNthNum(Temp, i + 1, (int far *) &(ts->TmpColor[0][i]));
474 for (i = 0; i <= 1; i++)
475 ts->URLColor[i] = RGB((BYTE) ts->TmpColor[0][i * 3],
476 (BYTE) ts->TmpColor[0][i * 3 + 1],
477 (BYTE) ts->TmpColor[0][i * 3 + 2]);
478 /* end - ishizaki */
479
480 /* TEK Color */
481 GetPrivateProfileString(Section, "TEKColor", "0,0,0,255,255,255",
482 Temp, sizeof(Temp), FName);
483 for (i = 0; i <= 5; i++)
484 GetNthNum(Temp, i + 1, (int far *) &(ts->TmpColor[0][i]));
485 for (i = 0; i <= 1; i++)
486 ts->TEKColor[i] = RGB((BYTE) ts->TmpColor[0][i * 3],
487 (BYTE) ts->TmpColor[0][i * 3 + 1],
488 (BYTE) ts->TmpColor[0][i * 3 + 2]);
489
490 #ifndef NO_ANSI_COLOR_EXTENSION
491 /* ANSI color definition (in the case FullColor=on) -- special option
492 o UseTextColor should be off, or the background and foreground color of
493 VTColor are assigned to color-number 0 and 7 respectively, even if
494 they are specified in ANSIColor.
495 o ANSIColor is a set of 4 values that are color-number(0--15),
496 red-value(0--255), green-value(0--255) and blue-value(0--255). */
497 GetPrivateProfileString(Section, "ANSIColor",
498 " 0, 0, 0, 0,"
499 " 1,255, 0, 0,"
500 " 2, 0,255, 0,"
501 " 3,255,255, 0,"
502 " 4, 0, 0,255,"
503 " 5,255, 0,255,"
504 " 6, 0,255,255,"
505 " 7,255,255,255,"
506 " 8,128,128,128,"
507 " 9,128, 0, 0,"
508 "10, 0,128, 0,"
509 "11,128,128, 0,"
510 "12, 0, 0,128,"
511 "13,128, 0,128,"
512 "14, 0,128,128,"
513 "15,192,192,192", Temp, sizeof(Temp), FName);
514 {
515 char *t;
516 int n = 1;
517 for (t = Temp; *t; t++)
518 if (*t == ',')
519 n++;
520 n /= 4;
521 for (i = 0; i <= n; i++) {
522 int colorid, r, g, b;
523 GetNthNum(Temp, i * 4 + 1, (int far *) &colorid);
524 GetNthNum(Temp, i * 4 + 2, (int far *) &r);
525 GetNthNum(Temp, i * 4 + 3, (int far *) &g);
526 GetNthNum(Temp, i * 4 + 4, (int far *) &b);
527 ts->ANSIColor[colorid & 15] =
528 RGB((BYTE) r, (BYTE) g, (BYTE) b);
529 }
530 }
531 #endif /* NO_ANSI_COLOR_EXTENSION */
532
533 TmpDC = GetDC(0); /* Get screen device context */
534 for (i = 0; i <= 1; i++)
535 ts->VTColor[i] = GetNearestColor(TmpDC, ts->VTColor[i]);
536 for (i = 0; i <= 1; i++)
537 ts->VTBoldColor[i] = GetNearestColor(TmpDC, ts->VTBoldColor[i]);
538 for (i = 0; i <= 1; i++)
539 ts->VTBlinkColor[i] = GetNearestColor(TmpDC, ts->VTBlinkColor[i]);
540 for (i = 0; i <= 1; i++)
541 ts->TEKColor[i] = GetNearestColor(TmpDC, ts->TEKColor[i]);
542 /* begin - ishizaki */
543 for (i = 0; i <= 1; i++)
544 ts->URLColor[i] = GetNearestColor(TmpDC, ts->URLColor[i]);
545 /* end - ishizaki */
546 #ifndef NO_ANSI_COLOR_EXTENSION
547 for (i = 0; i < 16; i++)
548 ts->ANSIColor[i] = GetNearestColor(TmpDC, ts->ANSIColor[i]);
549 #endif /* NO_ANSI_COLOR_EXTENSION */
550 ReleaseDC(0, TmpDC);
551
552 /* TEK color emulation */
553 ts->TEKColorEmu = GetOnOff(Section, "TEKColorEmulation", FName, FALSE);
554
555 /* VT Font */
556 GetPrivateProfileString(Section, "VTFont", "Terminal,0,-13,1",
557 Temp, sizeof(Temp), FName);
558 GetNthString(Temp, 1, sizeof(ts->VTFont), ts->VTFont);
559 GetNthNum(Temp, 2, (int far *) &(ts->VTFontSize.x));
560 GetNthNum(Temp, 3, (int far *) &(ts->VTFontSize.y));
561 GetNthNum(Temp, 4, &(ts->VTFontCharSet));
562
563 /* Bold font flag */
564 ts->EnableBold = GetOnOff(Section, "EnableBold", FName, TRUE);
565
566 /* Russian character set (font) */
567 GetPrivateProfileString(Section, "RussFont", "",
568 Temp, sizeof(Temp), FName);
569 ts->RussFont = str2id(RussList, Temp, IdWindows);
570
571 /* TEK Font */
572 GetPrivateProfileString(Section, "TEKFont", "Courier,0,-13,0",
573 Temp, sizeof(Temp), FName);
574 GetNthString(Temp, 1, sizeof(ts->TEKFont), ts->TEKFont);
575 GetNthNum(Temp, 2, (int far *) &(ts->TEKFontSize.x));
576 GetNthNum(Temp, 3, (int far *) &(ts->TEKFontSize.y));
577 GetNthNum(Temp, 4, &(ts->TEKFontCharSet));
578
579 /* BS key */
580 GetPrivateProfileString(Section, "BSKey", "",
581 Temp, sizeof(Temp), FName);
582 if (_stricmp(Temp, "DEL") == 0)
583 ts->BSKey = IdDEL;
584 else
585 ts->BSKey = IdBS;
586 /* Delete key */
587 ts->DelKey = GetOnOff(Section, "DeleteKey", FName, FALSE);
588
589 /* Meta Key */
590 ts->MetaKey = GetOnOff(Section, "MetaKey", FName, FALSE);
591
592 /* Application Keypad */
593 ts->DisableAppKeypad =
594 GetOnOff(Section, "DisableAppKeypad", FName, FALSE);
595
596 /* Application Cursor */
597 ts->DisableAppCursor =
598 GetOnOff(Section, "DisableAppCursor", FName, FALSE);
599
600 /* Russian keyboard type */
601 GetPrivateProfileString(Section, "RussKeyb", "",
602 Temp, sizeof(Temp), FName);
603 ts->RussKeyb = str2id(RussList2, Temp, IdWindows);
604
605 /* Serial port ID */
606 ts->ComPort = GetPrivateProfileInt(Section, "ComPort", 1, FName);
607
608 /* Baud rate */
609 GetPrivateProfileString(Section, "BaudRate", "9600",
610 Temp, sizeof(Temp), FName);
611 ts->Baud = str2id(BaudList, Temp, IdBaud9600);
612
613 /* Parity */
614 GetPrivateProfileString(Section, "Parity", "",
615 Temp, sizeof(Temp), FName);
616 if (_stricmp(Temp, "even") == 0)
617 ts->Parity = IdParityEven;
618 else if (_stricmp(Temp, "odd") == 0)
619 ts->Parity = IdParityOdd;
620 else
621 ts->Parity = IdParityNone;
622
623 /* Data bit */
624 GetPrivateProfileString(Section, "DataBit", "",
625 Temp, sizeof(Temp), FName);
626 if (_stricmp(Temp, "7") == 0)
627 ts->DataBit = IdDataBit7;
628 else
629 ts->DataBit = IdDataBit8;
630
631 /* Stop bit */
632 GetPrivateProfileString(Section, "StopBit", "",
633 Temp, sizeof(Temp), FName);
634 if (_stricmp(Temp, "2") == 0)
635 ts->StopBit = IdStopBit2;
636 else
637 ts->StopBit = IdStopBit1;
638
639 /* Flow control */
640 GetPrivateProfileString(Section, "FlowCtrl", "",
641 Temp, sizeof(Temp), FName);
642 if (_stricmp(Temp, "x") == 0)
643 ts->Flow = IdFlowX;
644 else if (_stricmp(Temp, "hard") == 0)
645 ts->Flow = IdFlowHard;
646 else
647 ts->Flow = IdFlowNone;
648
649 /* Delay per character */
650 ts->DelayPerChar =
651 GetPrivateProfileInt(Section, "DelayPerChar", 0, FName);
652
653 /* Delay per line */
654 ts->DelayPerLine =
655 GetPrivateProfileInt(Section, "DelayPerLine", 0, FName);
656
657 /* Telnet flag */
658 ts->Telnet = GetOnOff(Section, "Telnet", FName, TRUE);
659
660 /* Telnet terminal type */
661 GetPrivateProfileString(Section, "TermType", "xterm", ts->TermType,
662 sizeof(ts->TermType), FName);
663
664 /* TCP port num */
665 ts->TCPPort =
666 GetPrivateProfileInt(Section, "TCPPort", ts->TelPort, FName);
667
668 /* Auto window close flag */
669 ts->AutoWinClose = GetOnOff(Section, "AutoWinClose", FName, TRUE);
670
671 /* History list */
672 ts->HistoryList = GetOnOff(Section, "HistoryList", FName, FALSE);
673
674 /* File transfer binary flag */
675 ts->TransBin = GetOnOff(Section, "TransBin", FName, FALSE);
676
677 /* Log append */
678 ts->Append = GetOnOff(Section, "LogAppend", FName, FALSE);
679
680 /* Log plain text (2005.5.7 yutaka) */
681 ts->LogTypePlainText =
682 GetOnOff(Section, "LogTypePlainText", FName, FALSE);
683
684 /* Log with timestamp (2006.7.23 maya) */
685 ts->LogTimestamp = GetOnOff(Section, "LogTimestamp", FName, FALSE);
686
687 /* Log without transfer dialog */
688 ts->LogHideDialog = GetOnOff(Section, "LogHideDialog", FName, FALSE);
689
690 /* Default Log file name (2006.8.28 maya) */
691 GetPrivateProfileString(Section, "LogDefaultName", "teraterm.log",
692 ts->LogDefaultName, sizeof(ts->LogDefaultName),
693 FName);
694
695 /* Default Log file path (2007.5.30 maya) */
696 GetPrivateProfileString(Section, "LogDefaultPath", "",
697 ts->LogDefaultPath, sizeof(ts->LogDefaultPath),
698 FName);
699
700 /* Auto start logging (2007.5.31 maya) */
701 ts->LogAutoStart = GetOnOff(Section, "LogAutoStart", FName, FALSE);
702
703 /* XMODEM option */
704 GetPrivateProfileString(Section, "XmodemOpt", "",
705 Temp, sizeof(Temp), FName);
706 if (_stricmp(Temp, "crc") == 0)
707 ts->XmodemOpt = XoptCRC;
708 else if (_stricmp(Temp, "1k") == 0)
709 ts->XmodemOpt = Xopt1K;
710 else
711 ts->XmodemOpt = XoptCheck;
712
713 /* XMODEM binary file */
714 ts->XmodemBin = GetOnOff(Section, "XmodemBin", FName, TRUE);
715
716 /* XMODEM ���M�R�}���h (2007.12.21 yutaka) */
717 GetPrivateProfileString(Section, "XModemRcvCommand", "",
718 ts->XModemRcvCommand,
719 sizeof(ts->XModemRcvCommand), FName);
720
721 /* Default directory for file transfer */
722 GetPrivateProfileString(Section, "FileDir", "",
723 ts->FileDir, sizeof(ts->FileDir), FName);
724 if (strlen(ts->FileDir) == 0)
725 strncpy_s(ts->FileDir, sizeof(ts->FileDir), ts->HomeDir, _TRUNCATE);
726 else {
727 _getcwd(Temp, sizeof(Temp));
728 if (_chdir(ts->FileDir) != 0)
729 strncpy_s(ts->FileDir, sizeof(ts->FileDir), ts->HomeDir, _TRUNCATE);
730 _chdir(Temp);
731 }
732
733 /* filter on file send (2007.6.5 maya) */
734 GetPrivateProfileString(Section, "FileSendFilter", "",
735 ts->FileSendFilter, sizeof(ts->FileSendFilter),
736 FName);
737
738 /*--------------------------------------------------*/
739 /* 8 bit control code flag -- special option */
740 ts->TermFlag |=
741 TF_ACCEPT8BITCTRL *
742 GetOnOff(Section, "Accept8BitCtrl", FName, TRUE);
743
744 /* Wrong sequence flag -- special option */
745 ts->TermFlag |=
746 TF_ALLOWWRONGSEQUENCE *
747 GetOnOff(Section, "AllowWrongSequence", FName, FALSE);
748
749 if (((ts->TermFlag & TF_ALLOWWRONGSEQUENCE) == 0) &&
750 (ts->KanjiOut == IdKanjiOutH))
751 ts->KanjiOut = IdKanjiOutJ;
752
753 // Auto file renaming --- special option
754 ts->FTFlag |=
755 FT_RENAME * GetOnOff(Section, "AutoFileRename", FName, FALSE);
756
757 // Auto invoking (character set->G0->GL) --- special option
758 ts->TermFlag |=
759 TF_AUTOINVOKE * GetOnOff(Section, "AutoInvoke", FName, FALSE);
760
761 // Auto text copy --- special option
762 ts->AutoTextCopy = GetOnOff(Section, "AutoTextCopy", FName, TRUE);
763
764 /* Back wrap -- special option */
765 ts->TermFlag |=
766 TF_BACKWRAP * GetOnOff(Section, "BackWrap", FName, FALSE);
767
768 /* Beep type -- special option */
769 GetPrivateProfileString(Section, "Beep", "", Temp, sizeof(Temp), FName);
770 if (_stricmp(Temp, "off") == 0)
771 ts->Beep = IdBeepOff;
772 else if (_stricmp(Temp, "visual") == 0)
773 ts->Beep = IdBeepVisual;
774 else
775 ts->Beep = IdBeepOn;
776
777 /* Beep on connection & disconnection -- special option */
778 ts->PortFlag |=
779 PF_BEEPONCONNECT * GetOnOff(Section, "BeepOnConnect", FName,
780 FALSE);
781
782 /* Auto B-Plus activation -- special option */
783 ts->FTFlag |= FT_BPAUTO * GetOnOff(Section, "BPAuto", FName, FALSE);
784 if ((ts->FTFlag & FT_BPAUTO) != 0) { /* Answerback */
785 strncpy_s(ts->Answerback, sizeof(ts->Answerback), "\020++\0200",
786 _TRUNCATE);
787 ts->AnswerbackLen = 5;
788 }
789
790 /* B-Plus ESCCTL flag -- special option */
791 ts->FTFlag |=
792 FT_BPESCCTL * GetOnOff(Section, "BPEscCtl", FName, FALSE);
793
794 /* B-Plus log -- special option */
795 ts->LogFlag |= LOG_BP * GetOnOff(Section, "BPLog", FName, FALSE);
796
797 /* Clear serial port buffer when port opening -- special option */
798 ts->ClearComBuffOnOpen =
799 GetOnOff(Section, "ClearComBuffOnOpen", FName, TRUE);
800
801 /* Confirm disconnection -- special option */
802 ts->PortFlag |=
803 PF_CONFIRMDISCONN * GetOnOff(Section, "ConfirmDisconnect",
804 FName, TRUE);
805
806 /* Ctrl code in Kanji -- special option */
807 ts->TermFlag |=
808 TF_CTRLINKANJI * GetOnOff(Section, "CtrlInKanji", FName, TRUE);
809
810 /* Debug flag -- special option */
811 ts->Debug = GetOnOff(Section, "Debug", FName, FALSE);
812
813 /* Delimiter list -- special option */
814 GetPrivateProfileString(Section, "DelimList",
815 "$20!\"#$24%&\'()*+,-./:;<=>?@[\\]^`{|}~",
816 Temp, sizeof(Temp), FName);
817 Hex2Str(Temp, ts->DelimList, sizeof(ts->DelimList));
818
819 /* regard DBCS characters as delimiters -- special option */
820 ts->DelimDBCS = GetOnOff(Section, "DelimDBCS", FName, TRUE);
821
822 // Enable popup menu -- special option
823 if (GetOnOff(Section, "EnablePopupMenu", FName, TRUE) == 0)
824 ts->MenuFlag |= MF_NOPOPUP;
825
826 // Enable "Show menu" -- special option
827 if (GetOnOff(Section, "EnableShowMenu", FName, TRUE) == 0)
828 ts->MenuFlag |= MF_NOSHOWMENU;
829
830 // Enable the status line -- special option
831 ts->TermFlag |=
832 TF_ENABLESLINE * GetOnOff(Section, "EnableStatusLine", FName, TRUE);
833
834 // fixed JIS --- special
835 ts->TermFlag |=
836 TF_FIXEDJIS * GetOnOff(Section, "FixedJIS", FName, FALSE);
837
838 /* IME Flag -- special option */
839 ts->UseIME = GetOnOff(Section, "IME", FName, TRUE);
840
841 /* IME-inline Flag -- special option */
842 ts->IMEInline = GetOnOff(Section, "IMEInline", FName, TRUE);
843
844 /* Kermit log -- special option */
845 ts->LogFlag |= LOG_KMT * GetOnOff(Section, "KmtLog", FName, FALSE);
846
847 // Enable language selection -- special option
848 if (GetOnOff(Section, "LanguageSelection", FName, TRUE) == 0)
849 ts->MenuFlag |= MF_NOLANGUAGE;
850
851 /* Maximum scroll buffer size -- special option */
852 ts->ScrollBuffMax =
853 GetPrivateProfileInt(Section, "MaxBuffSize", 10000, FName);
854 if (ts->ScrollBuffMax < 24)
855 ts->ScrollBuffMax = 10000;
856
857 /* Max com port number -- special option */
858 ts->MaxComPort = GetPrivateProfileInt(Section, "MaxComPort", 4, FName);
859 if (ts->MaxComPort < 4)
860 ts->MaxComPort = 4;
861 // COM16����99���g�� (2005.11.30 yutaka)
862 // 99����200���g�� (2007.7.23 maya)
863 if (ts->MaxComPort > MAXCOMPORT)
864 ts->MaxComPort = MAXCOMPORT;
865 if ((ts->ComPort < 1) || (ts->ComPort > ts->MaxComPort))
866 ts->ComPort = 1;
867
868 /* Non-blinking cursor -- special option */
869 ts->NonblinkingCursor =
870 GetOnOff(Section, "NonblinkingCursor", FName, FALSE);
871
872 // �t�H�[�J�X���������|���S���J�[�\�� (2008.1.24 yutaka)
873 ts->KillFocusCursor =
874 GetOnOff(Section, "KillFocusCursor", FName, TRUE);
875
876 /* Delay for pass-thru printing activation */
877 /* -- special option */
878 ts->PassThruDelay =
879 GetPrivateProfileInt(Section, "PassThruDelay", 3, FName);
880
881 /* Printer port for pass-thru printing */
882 /* -- special option */
883 GetPrivateProfileString(Section, "PassThruPort", "",
884 ts->PrnDev, sizeof(ts->PrnDev), FName);
885
886 /* Printer Font --- special option */
887 GetPrivateProfileString(Section, "PrnFont", "",
888 Temp, sizeof(Temp), FName);
889 if (strlen(Temp) == 0) {
890 ts->PrnFont[0] = 0;
891 ts->PrnFontSize.x = 0;
892 ts->PrnFontSize.y = 0;
893 ts->PrnFontCharSet = 0;
894 }
895 else {
896 GetNthString(Temp, 1, sizeof(ts->PrnFont), ts->PrnFont);
897 GetNthNum(Temp, 2, (int far *) &(ts->PrnFontSize.x));
898 GetNthNum(Temp, 3, (int far *) &(ts->PrnFontSize.y));
899 GetNthNum(Temp, 4, &(ts->PrnFontCharSet));
900 }
901
902 // Page margins (left, right, top, bottom) for printing
903 // -- special option
904 GetPrivateProfileString(Section, "PrnMargin", "50,50,50,50",
905 Temp, sizeof(Temp), FName);
906 for (i = 0; i <= 3; i++)
907 GetNthNum(Temp, 1 + i, &ts->PrnMargin[i]);
908
909 /* Quick-VAN log -- special option */
910 ts->LogFlag |= LOG_QV * GetOnOff(Section, "QVLog", FName, FALSE);
911
912 /* Quick-VAN window size -- special */
913 ts->QVWinSize = GetPrivateProfileInt(Section, "QVWinSize", 8, FName);
914
915 /* Russian character set (print) -- special option */
916 GetPrivateProfileString(Section, "RussPrint", "",
917 Temp, sizeof(Temp), FName);
918 ts->RussPrint = str2id(RussList, Temp, IdWindows);
919
920 /* Scroll threshold -- special option */
921 ts->ScrollThreshold =
922 GetPrivateProfileInt(Section, "ScrollThreshold", 12, FName);
923
924 ts->MouseWheelScrollLine =
925 GetPrivateProfileInt(Section, "MouseWheelScrollLine", 3, FName);
926
927 // Select on activate -- special option
928 ts->SelOnActive = GetOnOff(Section, "SelectOnActivate", FName, TRUE);
929
930 /* Send 8bit control sequence -- special option */
931 ts->Send8BitCtrl = GetOnOff(Section, "Send8BitCtrl", FName, FALSE);
932
933 /* Startup macro -- special option */
934 GetPrivateProfileString(Section, "StartupMacro", "",
935 ts->MacroFN, sizeof(ts->MacroFN), FName);
936
937 /* TEK GIN Mouse keycode -- special option */
938 ts->GINMouseCode =
939 GetPrivateProfileInt(Section, "TEKGINMouseCode", 32, FName);
940
941 /* Telnet Auto Detect -- special option */
942 ts->TelAutoDetect = GetOnOff(Section, "TelAutoDetect", FName, TRUE);
943
944 /* Telnet binary flag -- special option */
945 ts->TelBin = GetOnOff(Section, "TelBin", FName, FALSE);
946
947 /* Telnet Echo flag -- special option */
948 ts->TelEcho = GetOnOff(Section, "TelEcho", FName, FALSE);
949
950 /* Telnet log -- special option */
951 ts->LogFlag |= LOG_TEL * GetOnOff(Section, "TelLog", FName, FALSE);
952
953 /* TCP port num for telnet -- special option */
954 ts->TelPort = GetPrivateProfileInt(Section, "TelPort", 23, FName);
955
956 /* Telnet keep-alive packet(NOP command) interval -- special option */
957 ts->TelKeepAliveInterval =
958 GetPrivateProfileInt(Section, "TelKeepAliveInterval", 300, FName);
959
960 /* Max number of broadcast commad history */
961 ts->MaxBroadcatHistory =
962 GetPrivateProfileInt(Section, "MaxBroadcatHistory", 99, FName);
963
964 /* Local echo for non-telnet */
965 ts->TCPLocalEcho = GetOnOff(Section, "TCPLocalEcho", FName, FALSE);
966
967 /* "new-line (transmit)" option for non-telnet -- special option */
968 GetPrivateProfileString(Section, "TCPCRSend", "",
969 Temp, sizeof(Temp), FName);
970 if (_stricmp(Temp, "CR") == 0)
971 ts->TCPCRSend = IdCR;
972 else if (_stricmp(Temp, "CRLF") == 0)
973 ts->TCPCRSend = IdCRLF;
974 else
975 ts->TCPCRSend = 0; // disabled
976
977 /* Use text (background) color for "white (black)"
978 --- special option */
979 ts->ColorFlag |=
980 CF_USETEXTCOLOR * GetOnOff(Section, "UseTextColor", FName, FALSE);
981
982 /* Title format -- special option */
983 ts->TitleFormat =
984 GetPrivateProfileInt(Section, "TitleFormat", 5, FName);
985
986 /* VT Compatible Tab -- special option */
987 ts->VTCompatTab = GetOnOff(Section, "VTCompatTab", FName, FALSE);
988
989 /* VT Font space --- special option */
990 GetPrivateProfileString(Section, "VTFontSpace", "0,0,0,0",
991 Temp, sizeof(Temp), FName);
992 GetNthNum(Temp, 1, &ts->FontDX);
993 GetNthNum(Temp, 2, &ts->FontDW);
994 GetNthNum(Temp, 3, &ts->FontDY);
995 GetNthNum(Temp, 4, &ts->FontDH);
996 if (ts->FontDX < 0)
997 ts->FontDX = 0;
998 if (ts->FontDW < 0)
999 ts->FontDW = 0;
1000 ts->FontDW = ts->FontDW + ts->FontDX;
1001 if (ts->FontDY < 0)
1002 ts->FontDY = 0;
1003 if (ts->FontDH < 0)
1004 ts->FontDH = 0;
1005 ts->FontDH = ts->FontDH + ts->FontDY;
1006
1007 // VT-print scaling factors (pixels per inch) --- special option
1008 GetPrivateProfileString(Section, "VTPPI", "0,0",
1009 Temp, sizeof(Temp), FName);
1010 GetNthNum(Temp, 1, (int far *) &ts->VTPPI.x);
1011 GetNthNum(Temp, 2, (int far *) &ts->VTPPI.y);
1012
1013 // TEK-print scaling factors (pixels per inch) --- special option
1014 GetPrivateProfileString(Section, "TEKPPI", "0,0",
1015 Temp, sizeof(Temp), FName);
1016 GetNthNum(Temp, 1, (int far *) &ts->TEKPPI.x);
1017 GetNthNum(Temp, 2, (int far *) &ts->TEKPPI.y);
1018
1019 // Show "Window" menu -- special option
1020 ts->MenuFlag |=
1021 MF_SHOWWINMENU * GetOnOff(Section, "WindowMenu", FName, TRUE);
1022
1023 /* XMODEM log -- special option */
1024 ts->LogFlag |= LOG_X * GetOnOff(Section, "XmodemLog", FName, FALSE);
1025
1026 /* YMODEM log -- special option */
1027 ts->LogFlag |= LOG_Y * GetOnOff(Section, "YmodemLog", FName, FALSE);
1028
1029 /* Auto ZMODEM activation -- special option */
1030 ts->FTFlag |= FT_ZAUTO * GetOnOff(Section, "ZmodemAuto", FName, FALSE);
1031
1032 /* ZMODEM data subpacket length for sending -- special */
1033 ts->ZmodemDataLen =
1034 GetPrivateProfileInt(Section, "ZmodemDataLen", 1024, FName);
1035 /* ZMODEM window size for sending -- special */
1036 ts->ZmodemWinSize =
1037 GetPrivateProfileInt(Section, "ZmodemWinSize", 32767, FName);
1038
1039 /* ZMODEM ESCCTL flag -- special option */
1040 ts->FTFlag |=
1041 FT_ZESCCTL * GetOnOff(Section, "ZmodemEscCtl", FName, FALSE);
1042
1043 /* ZMODEM log -- special option */
1044 ts->LogFlag |= LOG_Z * GetOnOff(Section, "ZmodemLog", FName, FALSE);
1045
1046 /* ZMODEM ���M�R�}���h (2007.12.21 yutaka) */
1047 GetPrivateProfileString(Section, "ZModemRcvCommand", "rz",
1048 ts->ZModemRcvCommand, sizeof(ts->ZModemRcvCommand), FName);
1049
1050 #ifndef NO_COPYLINE_FIX
1051
1052 /* Enable continued-line copy -- special option */
1053 ts->EnableContinuedLineCopy =
1054 GetOnOff(Section, "EnableContinuedLineCopy", FName, FALSE);
1055 #endif /* NO_COPYLINE_FIX */
1056
1057 ts->DisablePasteMouseRButton =
1058 GetOnOff(Section, "DisablePasteMouseRButton", FName, FALSE);
1059
1060 // added DisablePasteMouseMButton (2008.3.2 maya)
1061 ts->DisablePasteMouseMButton =
1062 GetOnOff(Section, "DisablePasteMouseMButton", FName, TRUE);
1063
1064 // added ConfirmPasteMouseRButton (2007.3.17 maya)
1065 ts->ConfirmPasteMouseRButton =
1066 GetOnOff(Section, "ConfirmPasteMouseRButton", FName, FALSE);
1067
1068 // added ConfirmChangePaste (2008.2.3 yutaka)
1069 ts->ConfirmChangePaste =
1070 GetOnOff(Section, "ConfirmChangePaste", FName, FALSE);
1071
1072 // added ScrollWindowClearScreen (2008.5.3 yutaka)
1073 ts->ScrollWindowClearScreen =
1074 GetOnOff(Section, "ScrollWindowClearScreen", FName, TRUE);
1075
1076 // added SelectOnlyByLButton (2007.11.20 maya)
1077 ts->SelectOnlyByLButton =
1078 GetOnOff(Section, "SelectOnlyByLButton", FName, TRUE);
1079
1080 // added DisableAcceleratorSendBreak (2007.3.17 maya)
1081 ts->DisableAcceleratorSendBreak =
1082 GetOnOff(Section, "DisableAcceleratorSendBreak", FName, FALSE);
1083
1084 // WinSock connecting timeout value (2007.1.11 yutaka)
1085 ts->ConnectingTimeout =
1086 GetPrivateProfileInt(Section, "ConnectingTimeout", 0, FName);
1087
1088 // mouse cursor
1089 GetPrivateProfileString(Section, "MouseCursor", "IBEAM",
1090 Temp, sizeof(Temp), FName);
1091 strncpy_s(ts->MouseCursorName, sizeof(ts->MouseCursorName), Temp,
1092 _TRUNCATE);
1093
1094 // Translucent window
1095 ts->AlphaBlend =
1096 GetPrivateProfileInt(Section, "AlphaBlend ", 255, FName);
1097 ts->AlphaBlend = max(0, ts->AlphaBlend);
1098 ts->AlphaBlend = min(255, ts->AlphaBlend);
1099
1100 // Cygwin install path
1101 GetPrivateProfileString(Section, "CygwinDirectory ", "c:\\cygwin",
1102 Temp, sizeof(Temp), FName);
1103 strncpy_s(ts->CygwinDirectory, sizeof(ts->CygwinDirectory), Temp,
1104 _TRUNCATE);
1105
1106 // Viewlog Editor path
1107 GetPrivateProfileString(Section, "ViewlogEditor ", "notepad.exe",
1108 Temp, sizeof(Temp), FName);
1109 strncpy_s(ts->ViewlogEditor, sizeof(ts->ViewlogEditor), Temp,
1110 _TRUNCATE);
1111
1112 // Locale for UTF-8
1113 GetPrivateProfileString(Section, "Locale ", DEFAULT_LOCALE,
1114 Temp, sizeof(Temp), FName);
1115 strncpy_s(ts->Locale, sizeof(ts->Locale), Temp, _TRUNCATE);
1116
1117 // CodePage
1118 ts->CodePage =
1119 GetPrivateProfileInt(Section, "CodePage ", DEFAULT_CODEPAGE,
1120 FName);
1121
1122 // UI language message file
1123 GetPrivateProfileString(Section, "UILanguageFile", "lang\\Default.lng",
1124 Temp, sizeof(Temp), FName);
1125 {
1126 char CurDir[MAX_PATH];
1127
1128 // �t���p�X�������O������������������������������
1129 strncpy_s(ts->UILanguageFile_ini, sizeof(ts->UILanguageFile_ini), Temp, _TRUNCATE);
1130
1131 GetCurrentDirectory(sizeof(CurDir), CurDir);
1132 SetCurrentDirectory(ts->HomeDir);
1133 _fullpath(ts->UILanguageFile, Temp, sizeof(ts->UILanguageFile));
1134 SetCurrentDirectory(CurDir);
1135 }
1136
1137 // Broadcast Command History (2007.3.3 maya)
1138 ts->BroadcastCommandHistory =
1139 GetOnOff(Section, "BroadcastCommandHistory", FName, FALSE);
1140
1141 // 337: 2007/03/20 Accept Broadcast
1142 ts->AcceptBroadcast =
1143 GetOnOff(Section, "AcceptBroadcast", FName, TRUE);
1144
1145 // Confirm send a file when drag and drop (2007.12.28 maya)
1146 ts->ConfirmFileDragAndDrop =
1147 GetOnOff(Section, "ConfirmFileDragAndDrop", FName, TRUE);
1148
1149 // Translate mouse wheel to cursor key when application cursor mode
1150 ts->TranslateWheelToCursor =
1151 GetOnOff(Section, "TranslateWheelToCursor", FName, TRUE);
1152
1153 // Display "New Connection" dialog on startup (2008.1.18 maya)
1154 ts->HostDialogOnStartup =
1155 GetOnOff(Section, "HostDialogOnStartup", FName, TRUE);
1156
1157 // Mouse event tracking
1158 ts->MouseEventTracking =
1159 GetOnOff(Section, "MouseEventTracking", FName, TRUE);
1160
1161 // Maximized bug tweak
1162 ts->MaximizedBugTweak =
1163 GetOnOff(Section, "MaximizedBugTweak", FName, TRUE);
1164
1165 // Convert Unicode symbol characters to DEC Special characters
1166 ts->UnicodeDecSpMapping =
1167 GetPrivateProfileInt(Section, "UnicodeToDecSpMapping", 3, FName);
1168
1169 // VT Window Icon
1170 GetPrivateProfileString(Section, "VTIcon", "Default",
1171 Temp, sizeof(Temp), FName);
1172 ts->VTIcon = IconName2IconId(Temp);
1173
1174 // Tek Window Icon
1175 GetPrivateProfileString(Section, "TEKIcon", "Default",
1176 Temp, sizeof(Temp), FName);
1177 ts->TEKIcon = IconName2IconId(Temp);
1178
1179 // Unknown Unicode Character
1180 ts->UnknownUnicodeCharaAsWide =
1181 GetOnOff(Section, "UnknownUnicodeCharacterAsWide", FName, FALSE);
1182
1183 #ifdef USE_NORMAL_BGCOLOR
1184 // UseNormalBGColor
1185 ts->UseNormalBGColor =
1186 GetOnOff(Section, "UseNormalBGColor", FName, FALSE);
1187 // 2006/03/11 by 337
1188 if (ts->UseNormalBGColor) {
1189 ts->VTBoldColor[1] =
1190 ts->VTBlinkColor[1] = ts->URLColor[1] = ts->VTColor[1];
1191 }
1192 #endif
1193
1194 // AutoScrollOnlyInBottomLine
1195 ts->AutoScrollOnlyInBottomLine =
1196 GetOnOff(Section, "AutoScrollOnlyInBottomLine", FName, FALSE);
1197
1198 // Accept remote-controlled window title changing
1199 GetPrivateProfileString(Section, "AcceptTitleChangeRequest", "overwrite",
1200 Temp, sizeof(Temp), FName);
1201 if (_stricmp(Temp, "overwrite") == 0 || _stricmp(Temp, "on") == 0)
1202 ts->AcceptTitleChangeRequest = IdTitleChangeRequestOverwrite;
1203 else if (_stricmp(Temp, "ahead") == 0)
1204 ts->AcceptTitleChangeRequest = IdTitleChangeRequestAhead;
1205 else if (_stricmp(Temp, "last") == 0)
1206 ts->AcceptTitleChangeRequest = IdTitleChangeRequestLast;
1207 else
1208 ts->AcceptTitleChangeRequest = IdTitleChangeRequestOff;
1209
1210 // Size of paste confirm dialog
1211 GetPrivateProfileString(Section, "PasteDialogSize", "330,220",
1212 Temp, sizeof(Temp), FName);
1213 GetNthNum(Temp, 1, &ts->PasteDialogSize.cx);
1214 GetNthNum(Temp, 2, &ts->PasteDialogSize.cy);
1215 if (ts->PasteDialogSize.cx < 0)
1216 ts->PasteDialogSize.cx = 330;
1217 if (ts->PasteDialogSize.cy < 0)
1218 ts->PasteDialogSize.cy = 220;
1219
1220 // Disable mouse event tracking when Control-Key is pressed.
1221 ts->DisableMouseTrackingByCtrl =
1222 GetOnOff(Section, "DisableMouseTrackingByCtrl", FName, FALSE);
1223
1224 // Disable TranslateWheelToCursor setting when Control-Key is pressed.
1225 ts->DisableWheelToCursorByCtrl =
1226 GetOnOff(Section, "DisableWheelToCursorByCtrl", FName, FALSE);
1227 }
1228
1229 void FAR PASCAL WriteIniFile(PCHAR FName, PTTSet ts)
1230 {
1231 int i;
1232 char Temp[MAXPATHLEN];
1233 char buf[20];
1234
1235 /* version */
1236 WritePrivateProfileString(Section, "Version", "2.3", FName);
1237
1238 /* Language */
1239 if (ts->Language == IdJapanese)
1240 strncpy_s(Temp, sizeof(Temp), "Japanese", _TRUNCATE);
1241 else if (ts->Language == IdRussian)
1242 strncpy_s(Temp, sizeof(Temp), "Russian", _TRUNCATE);
1243 else if (ts->Language == IdKorean) //HKS
1244 strncpy_s(Temp, sizeof(Temp), "Korean", _TRUNCATE);
1245 else
1246 strncpy_s(Temp, sizeof(Temp), "English", _TRUNCATE);
1247 WritePrivateProfileString(Section, "Language", Temp, FName);
1248
1249 /* Port type */
1250 if (ts->PortType == IdSerial)
1251 strncpy_s(Temp, sizeof(Temp), "serial", _TRUNCATE);
1252 else /* IdFile -> IdTCPIP */
1253 strncpy_s(Temp, sizeof(Temp), "tcpip", _TRUNCATE);
1254
1255 WritePrivateProfileString(Section, "Port", Temp, FName);
1256
1257 /* Save win position */
1258 if (ts->SaveVTWinPos) {
1259 /* VT win position */
1260 WriteInt2(Section, "VTPos", FName, ts->VTPos.x, ts->VTPos.y);
1261 }
1262
1263 /* VT terminal size */
1264 WriteInt2(Section, "TerminalSize", FName,
1265 ts->TerminalWidth, ts->TerminalHeight);
1266
1267 /* Terminal size = Window size */
1268 WriteOnOff(Section, "TermIsWin", FName, ts->TermIsWin);
1269
1270 /* Auto window resize flag */
1271 WriteOnOff(Section, "AutoWinResize", FName, ts->AutoWinResize);
1272
1273 /* CR Receive */
1274 if (ts->CRReceive == IdCRLF) {
1275 strncpy_s(Temp, sizeof(Temp), "CRLF", _TRUNCATE);
1276 }
1277 else if (ts->CRReceive == IdLF) {
1278 strncpy_s(Temp, sizeof(Temp), "LF", _TRUNCATE);
1279 }
1280 else {
1281 strncpy_s(Temp, sizeof(Temp), "CR", _TRUNCATE);
1282 }
1283 WritePrivateProfileString(Section, "CRReceive", Temp, FName);
1284
1285 /* CR Send */
1286 if (ts->CRSend == IdCRLF)
1287 strncpy_s(Temp, sizeof(Temp), "CRLF", _TRUNCATE);
1288 else
1289 strncpy_s(Temp, sizeof(Temp), "CR", _TRUNCATE);
1290 WritePrivateProfileString(Section, "CRSend", Temp, FName);
1291
1292 /* Local echo */
1293 WriteOnOff(Section, "LocalEcho", FName, ts->LocalEcho);
1294
1295 /* Answerback */
1296 if ((ts->FTFlag & FT_BPAUTO) == 0) {
1297 Str2Hex(ts->Answerback, Temp, ts->AnswerbackLen,
1298 sizeof(Temp) - 1, TRUE);
1299 WritePrivateProfileString(Section, "Answerback", Temp, FName);
1300 }
1301
1302 /* Kanji Code (receive) */
1303 switch (ts->KanjiCode) {
1304 case IdEUC:
1305 strncpy_s(Temp, sizeof(Temp), "EUC", _TRUNCATE);
1306 break;
1307 case IdJIS:
1308 strncpy_s(Temp, sizeof(Temp), "JIS", _TRUNCATE);
1309 break;
1310 case IdUTF8:
1311 strncpy_s(Temp, sizeof(Temp), "UTF-8", _TRUNCATE);
1312 break;
1313 case IdUTF8m:
1314 strncpy_s(Temp, sizeof(Temp), "UTF-8m", _TRUNCATE);
1315 break;
1316 default:
1317 strncpy_s(Temp, sizeof(Temp), "SJIS", _TRUNCATE);
1318 }
1319 WritePrivateProfileString(Section, "KanjiReceive", Temp, FName);
1320
1321 /* Katakana (receive) */
1322 if (ts->JIS7Katakana == 1)
1323 strncpy_s(Temp, sizeof(Temp), "7", _TRUNCATE);
1324 else
1325 strncpy_s(Temp, sizeof(Temp), "8", _TRUNCATE);
1326
1327 WritePrivateProfileString(Section, "KatakanaReceive", Temp, FName);
1328
1329 /* Kanji Code (transmit) */
1330 switch (ts->KanjiCodeSend) {
1331 case IdEUC:
1332 strncpy_s(Temp, sizeof(Temp), "EUC", _TRUNCATE);
1333 break;
1334 case IdJIS:
1335 strncpy_s(Temp, sizeof(Temp), "JIS", _TRUNCATE);
1336 break;
1337 case IdUTF8:
1338 strncpy_s(Temp, sizeof(Temp), "UTF-8", _TRUNCATE);
1339 break;
1340 default:
1341 strncpy_s(Temp, sizeof(Temp), "SJIS", _TRUNCATE);
1342 }
1343 WritePrivateProfileString(Section, "KanjiSend", Temp, FName);
1344
1345 /* Katakana (transmit) */
1346 if (ts->JIS7KatakanaSend == 1)
1347 strncpy_s(Temp, sizeof(Temp), "7", _TRUNCATE);
1348 else
1349 strncpy_s(Temp, sizeof(Temp), "8", _TRUNCATE);
1350
1351 WritePrivateProfileString(Section, "KatakanaSend", Temp, FName);
1352
1353 /* KanjiIn */
1354 if (ts->KanjiIn == IdKanjiInA)
1355 strncpy_s(Temp, sizeof(Temp), "@", _TRUNCATE);
1356 else
1357 strncpy_s(Temp, sizeof(Temp), "B", _TRUNCATE);
1358
1359 WritePrivateProfileString(Section, "KanjiIn", Temp, FName);
1360
1361 /* KanjiOut */
1362 switch (ts->KanjiOut) {
1363 case IdKanjiOutB:
1364 strncpy_s(Temp, sizeof(Temp), "B", _TRUNCATE);
1365 break;
1366 case IdKanjiOutH:
1367 strncpy_s(Temp, sizeof(Temp), "H", _TRUNCATE);
1368 break;
1369 default:
1370 strncpy_s(Temp, sizeof(Temp), "J", _TRUNCATE);
1371 }
1372 WritePrivateProfileString(Section, "KanjiOut", Temp, FName);
1373
1374 // new configuration
1375 WriteInt(Section, "ConnectingTimeout", FName, ts->ConnectingTimeout);
1376
1377 WriteOnOff(Section, "DisablePasteMouseRButton", FName,
1378 ts->DisablePasteMouseRButton);
1379
1380 // added DisablePasteMouseMButton (2008.3.2 maya)
1381 WriteOnOff(Section, "DisablePasteMouseMButton", FName,
1382 ts->DisablePasteMouseMButton);
1383
1384 // added ConfirmPasteMouseRButton (2007.3.17 maya)
1385 WriteOnOff(Section, "ConfirmPasteMouseRButton", FName,
1386 ts->ConfirmPasteMouseRButton);
1387
1388 // added ConfirmChangePaste
1389 WriteOnOff(Section, "ConfirmChangePaste", FName,
1390 ts->ConfirmChangePaste);
1391
1392 // added ScrollWindowClearScreen
1393 WriteOnOff(Section, "ScrollWindowClearScreen", FName,
1394 ts->ScrollWindowClearScreen);
1395
1396 // added SelectOnlyByLButton (2007.11.20 maya)
1397 WriteOnOff(Section, "SelectOnlyByLButton", FName,
1398 ts->SelectOnlyByLButton);
1399 // added DisableAcceleratorSendBreak (2007.3.17 maya)
1400 WriteOnOff(Section, "DisableAcceleratorSendBreak", FName,
1401 ts->DisableAcceleratorSendBreak);
1402 WriteOnOff(Section, "EnableContinuedLineCopy", FName,
1403 ts->EnableContinuedLineCopy);
1404 WritePrivateProfileString(Section, "MouseCursor", ts->MouseCursorName,
1405 FName);
1406 _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d", ts->AlphaBlend);
1407 WritePrivateProfileString(Section, "AlphaBlend", Temp, FName);
1408 WritePrivateProfileString(Section, "CygwinDirectory",
1409 ts->CygwinDirectory, FName);
1410 WritePrivateProfileString(Section, "ViewlogEditor", ts->ViewlogEditor,
1411 FName);
1412 WritePrivateProfileString(Section, "Locale", ts->Locale, FName);
1413 _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d", ts->CodePage);
1414 WritePrivateProfileString(Section, "CodePage", Temp, FName);
1415
1416 // ANSI color(2004.9.5 yutaka)
1417 Temp[0] = '\0';
1418 for (i = 0; i < 15; i++) {
1419 _snprintf_s(buf, sizeof(buf), _TRUNCATE, "%d,%d,%d,%d, ",
1420 i,
1421 GetRValue(ts->ANSIColor[i]),
1422 GetGValue(ts->ANSIColor[i]),
1423 GetBValue(ts->ANSIColor[i])
1424 );
1425 strncat_s(Temp, sizeof(Temp), buf, _TRUNCATE);
1426 }
1427 i = 15;
1428 _snprintf_s(buf, sizeof(buf), _TRUNCATE, "%d,%d,%d,%d",
1429 i,
1430 GetRValue(ts->ANSIColor[i]),
1431 GetGValue(ts->ANSIColor[i]),
1432 GetBValue(ts->ANSIColor[i])
1433 );
1434 strncat_s(Temp, sizeof(Temp), buf, _TRUNCATE);
1435 WritePrivateProfileString(Section, "ANSIColor", Temp, FName);
1436
1437 /* AutoWinChange VT<->TEK */
1438 WriteOnOff(Section, "AutoWinSwitch", FName, ts->AutoWinSwitch);
1439
1440 /* Terminal ID */
1441 id2str(TermList, ts->TerminalID, IdVT100, Temp, sizeof(Temp));
1442 WritePrivateProfileString(Section, "TerminalID", Temp, FName);
1443
1444 /* Russian character set (host) */
1445 id2str(RussList, ts->RussHost, IdKOI8, Temp, sizeof(Temp));
1446 WritePrivateProfileString(Section, "RussHost", Temp, FName);
1447
1448 /* Russian character set (client) */
1449 id2str(RussList, ts->RussClient, IdWindows, Temp, sizeof(Temp));
1450 WritePrivateProfileString(Section, "RussClient", Temp, FName);
1451
1452 /* Title text */
1453 WritePrivateProfileString(Section, "Title", ts->Title, FName);
1454
1455 /* Cursor shape */
1456 switch (ts->CursorShape) {
1457 case IdVCur:
1458 strncpy_s(Temp, sizeof(Temp), "vertical", _TRUNCATE);
1459 break;
1460 case IdHCur:
1461 strncpy_s(Temp, sizeof(Temp), "horizontal", _TRUNCATE);
1462 break;
1463 default:
1464 strncpy_s(Temp, sizeof(Temp), "block", _TRUNCATE);
1465 }
1466 WritePrivateProfileString(Section, "CursorShape", Temp, FName);
1467
1468 /* Hide title */
1469 WriteOnOff(Section, "HideTitle", FName, ts->HideTitle);
1470
1471 /* Popup menu */
1472 WriteOnOff(Section, "PopupMenu", FName, ts->PopupMenu);
1473
1474 /* PC-Style bold color mapping */
1475 WriteOnOff(Section, "PcBoldColor", FName,
1476 (WORD) (ts->ColorFlag & CF_PCBOLD16));
1477
1478 /* aixterm 16 colors mode */
1479 WriteOnOff(Section, "Aixterm16Color", FName,
1480 (WORD) (ts->ColorFlag & CF_AIXTERM16));
1481
1482 /* xterm 256 colors mode */
1483 WriteOnOff(Section, "Xterm256Color", FName,
1484 (WORD) (ts->ColorFlag & CF_XTERM256));
1485
1486 /* Enable scroll buffer */
1487 WriteOnOff(Section, "EnableScrollBuff", FName, ts->EnableScrollBuff);
1488
1489 /* Scroll buffer size */
1490 WriteInt(Section, "ScrollBuffSize", FName, ts->ScrollBuffSize);
1491
1492 /* VT Color */
1493 for (i = 0; i <= 1; i++) {
1494 ts->TmpColor[0][i * 3] = GetRValue(ts->VTColor[i]);
1495 ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTColor[i]);
1496 ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTColor[i]);
1497 }
1498 WriteInt6(Section, "VTColor", FName,
1499 ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1500 ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1501
1502 /* VT bold color */
1503 for (i = 0; i <= 1; i++) {
1504 ts->TmpColor[0][i * 3] = GetRValue(ts->VTBoldColor[i]);
1505 ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTBoldColor[i]);
1506 ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTBoldColor[i]);
1507 }
1508 WriteInt6(Section, "VTBoldColor", FName,
1509 ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1510 ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1511
1512 /* VT blink color */
1513 for (i = 0; i <= 1; i++) {
1514 ts->TmpColor[0][i * 3] = GetRValue(ts->VTBlinkColor[i]);
1515 ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTBlinkColor[i]);
1516 ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTBlinkColor[i]);
1517 }
1518 WriteInt6(Section, "VTBlinkColor", FName,
1519 ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1520 ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1521
1522 /* start - ishizaki */
1523 WriteOnOff(Section, "EnableClickableUrl", FName,
1524 ts->EnableClickableUrl);
1525
1526 /* URL color */
1527 for (i = 0; i <= 1; i++) {
1528 ts->TmpColor[0][i * 3] = GetRValue(ts->URLColor[i]);
1529 ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->URLColor[i]);
1530 ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->URLColor[i]);
1531 }
1532 WriteInt6(Section, "URLColor", FName,
1533 ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1534 ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1535 /* end - ishizaki */
1536
1537 /* TEK Color */
1538 for (i = 0; i <= 1; i++) {
1539 ts->TmpColor[0][i * 3] = GetRValue(ts->TEKColor[i]);
1540 ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->TEKColor[i]);
1541 ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->TEKColor[i]);
1542 }
1543 WriteInt6(Section, "TEKColor", FName,
1544 ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1545 ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1546
1547 /* TEK color emulation */
1548 WriteOnOff(Section, "TEKColorEmulation", FName, ts->TEKColorEmu);
1549
1550 /* VT Font */
1551 WriteFont(Section, "VTFont", FName,
1552 ts->VTFont, ts->VTFontSize.x, ts->VTFontSize.y,
1553 ts->VTFontCharSet);
1554
1555 /* Enable bold font flag */
1556 WriteOnOff(Section, "EnableBold", FName, ts->EnableBold);
1557
1558 /* Russian character set (font) */
1559 id2str(RussList, ts->RussFont, IdWindows, Temp, sizeof(Temp));
1560 WritePrivateProfileString(Section, "RussFont", Temp, FName);
1561
1562 /* TEK Font */
1563 WriteFont(Section, "TEKFont", FName,
1564 ts->TEKFont, ts->TEKFontSize.x, ts->TEKFontSize.y,
1565 ts->TEKFontCharSet);
1566
1567 /* BS key */
1568 if (ts->BSKey == IdDEL)
1569 strncpy_s(Temp, sizeof(Temp), "DEL", _TRUNCATE);
1570 else
1571 strncpy_s(Temp, sizeof(Temp), "BS", _TRUNCATE);
1572 WritePrivateProfileString(Section, "BSKey", Temp, FName);
1573
1574 /* Delete key */
1575 WriteOnOff(Section, "DeleteKey", FName, ts->DelKey);
1576
1577 /* Meta key */
1578 WriteOnOff(Section, "MetaKey", FName, ts->MetaKey);
1579
1580 /* Application Keypad */
1581 WriteOnOff(Section, "DisableAppKeypad", FName, ts->DisableAppKeypad);
1582
1583 /* Application Cursor */
1584 WriteOnOff(Section, "DisableAppCursor", FName, ts->DisableAppCursor);
1585
1586 /* Russian keyboard type */
1587 id2str(RussList2, ts->RussKeyb, IdWindows, Temp, sizeof(Temp));
1588 WritePrivateProfileString(Section, "RussKeyb", Temp, FName);
1589
1590 /* Serial port ID */
1591 _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d", ts->ComPort);
1592 WritePrivateProfileString(Section, "ComPort", Temp, FName);
1593
1594 /* Baud rate */
1595 id2str(BaudList, ts->Baud, IdBaud9600, Temp, sizeof(Temp));
1596 WritePrivateProfileString(Section, "BaudRate", Temp, FName);
1597
1598 /* Parity */
1599 switch (ts->Parity) {
1600 case IdParityEven:
1601 strncpy_s(Temp, sizeof(Temp), "even", _TRUNCATE);
1602 break;
1603 case IdParityOdd:
1604 strncpy_s(Temp, sizeof(Temp), "odd", _TRUNCATE);
1605 break;
1606 default:
1607 strncpy_s(Temp, sizeof(Temp), "none", _TRUNCATE);
1608 }
1609 WritePrivateProfileString(Section, "Parity", Temp, FName);
1610
1611 /* Data bit */
1612 if (ts->DataBit == IdDataBit7)
1613 strncpy_s(Temp, sizeof(Temp), "7", _TRUNCATE);
1614 else
1615 strncpy_s(Temp, sizeof(Temp), "8", _TRUNCATE);
1616
1617 WritePrivateProfileString(Section, "DataBit", Temp, FName);
1618
1619 /* Stop bit */
1620 if (ts->StopBit == IdStopBit2)
1621 strncpy_s(Temp, sizeof(Temp), "2", _TRUNCATE);
1622 else
1623 strncpy_s(Temp, sizeof(Temp), "1", _TRUNCATE);
1624
1625 WritePrivateProfileString(Section, "StopBit", Temp, FName);
1626
1627 /* Flow control */
1628 switch (ts->Flow) {
1629 case IdFlowX:
1630 strncpy_s(Temp, sizeof(Temp), "x", _TRUNCATE);
1631 break;
1632 case IdFlowHard:
1633 strncpy_s(Temp, sizeof(Temp), "hard", _TRUNCATE);
1634 break;
1635 default:
1636 strncpy_s(Temp, sizeof(Temp), "none", _TRUNCATE);
1637 }
1638 WritePrivateProfileString(Section, "FlowCtrl", Temp, FName);
1639
1640 /* Delay per character */
1641 WriteInt(Section, "DelayPerChar", FName, ts->DelayPerChar);
1642
1643 /* Delay per line */
1644 WriteInt(Section, "DelayPerLine", FName, ts->DelayPerLine);
1645
1646 /* Telnet flag */
1647 WriteOnOff(Section, "Telnet", FName, ts->Telnet);
1648
1649 /* Telnet terminal type */
1650 WritePrivateProfileString(Section, "TermType", ts->TermType, FName);
1651
1652 /* TCP port num for non-telnet */
1653 WriteUint(Section, "TCPPort", FName, ts->TCPPort);
1654
1655 /* Auto close flag */
1656 WriteOnOff(Section, "AutoWinClose", FName, ts->AutoWinClose);
1657
1658 /* History list */
1659 WriteOnOff(Section, "Historylist", FName, ts->HistoryList);
1660
1661 /* File transfer binary flag */
1662 WriteOnOff(Section, "TransBin", FName, ts->TransBin);
1663
1664 /* Log append */
1665 WriteOnOff(Section, "LogAppend", FName, ts->Append);
1666
1667 /* File transfer binary flag */
1668 WriteOnOff(Section, "LogTypePlainText", FName, ts->LogTypePlainText);
1669
1670 /* Log with timestamp (2006.7.23 maya) */
1671 WriteOnOff(Section, "LogTimestamp", FName, ts->LogTimestamp);
1672
1673 /* Log without transfer dialog */
1674 WriteOnOff(Section, "LogHideDialog", FName, ts->LogHideDialog);
1675
1676 /* Default Log file name (2006.8.28 maya) */
1677 WritePrivateProfileString(Section, "LogDefaultName",
1678 ts->LogDefaultName, FName);
1679
1680 /* Default Log file path (2007.5.30 maya) */
1681 WritePrivateProfileString(Section, "LogDefaultPath",
1682 ts->LogDefaultPath, FName);
1683
1684 /* Auto start logging (2007.5.31 maya) */
1685 WriteOnOff(Section, "LogAutoStart", FName, ts->LogAutoStart);
1686
1687 /* XMODEM option */
1688 switch (ts->XmodemOpt) {
1689 case XoptCRC:
1690 strncpy_s(Temp, sizeof(Temp), "crc", _TRUNCATE);
1691 break;
1692 case Xopt1K:
1693 strncpy_s(Temp, sizeof(Temp), "1k", _TRUNCATE);
1694 break;
1695 default:
1696 strncpy_s(Temp, sizeof(Temp), "checksum", _TRUNCATE);
1697 }
1698 WritePrivateProfileString(Section, "XmodemOpt", Temp, FName);
1699
1700 /* XMODEM binary flag */
1701 WriteOnOff(Section, "XmodemBin", FName, ts->XmodemBin);
1702
1703 /* XMODEM ���M�R�}���h (2007.12.21 yutaka) */
1704 WritePrivateProfileString(Section, "XmodemRcvCommand",
1705 ts->XModemRcvCommand, FName);
1706
1707 /* Default directory for file transfer */
1708 WritePrivateProfileString(Section, "FileDir", ts->FileDir, FName);
1709
1710 /* filter on file send (2007.6.5 maya) */
1711 WritePrivateProfileString(Section, "FileSendFilter",
1712 ts->FileSendFilter, FName);
1713
1714 /*------------------------------------------------------------------*/
1715 /* 8 bit control code flag -- special option */
1716 WriteOnOff(Section, "Accept8BitCtrl", FName,
1717 (WORD) (ts->TermFlag & TF_ACCEPT8BITCTRL));
1718
1719 /* Wrong sequence flag -- special option */
1720 WriteOnOff(Section, "AllowWrongSequence", FName,
1721 (WORD) (ts->TermFlag & TF_ALLOWWRONGSEQUENCE));
1722
1723 /* Auto file renaming --- special option */
1724 WriteOnOff(Section, "AutoFileRename", FName,
1725 (WORD) (ts->FTFlag & FT_RENAME));
1726
1727 /* Auto text copy --- special option */
1728 WriteOnOff(Section, "AutoTextCopy", FName, ts->AutoTextCopy);
1729
1730 /* Back wrap -- special option */
1731 WriteOnOff(Section, "BackWrap", FName,
1732 (WORD) (ts->TermFlag & TF_BACKWRAP));
1733
1734 /* Beep type -- special option */
1735 WriteOnOff(Section, "Beep", FName, ts->Beep);
1736 switch (ts->Beep) {
1737 case IdBeepOff:
1738 WritePrivateProfileString(Section, "Beep", "Off", FName);
1739 break;
1740 case IdBeepOn:
1741 WritePrivateProfileString(Section, "Beep", "On", FName);
1742 break;
1743 case IdBeepVisual:
1744 WritePrivateProfileString(Section, "Beep", "Visual", FName);
1745 break;
1746 }
1747
1748 /* Beep on connection & disconnection -- special option */
1749 WriteOnOff(Section, "BeepOnConnect", FName,
1750 (WORD) (ts->PortFlag & PF_BEEPONCONNECT));
1751
1752 /* Auto B-Plus activation -- special option */
1753 WriteOnOff(Section, "BPAuto", FName, (WORD) (ts->FTFlag & FT_BPAUTO));
1754
1755 /* B-Plus ESCCTL flag -- special option */
1756 WriteOnOff(Section, "BPEscCtl", FName,
1757 (WORD) (ts->FTFlag & FT_BPESCCTL));
1758
1759 /* B-Plus log -- special option */
1760 WriteOnOff(Section, "BPLog", FName, (WORD) (ts->LogFlag & LOG_BP));
1761
1762 /* Clear serial port buffer when port opening -- special option */
1763 WriteOnOff(Section, "ClearComBuffOnOpen", FName, ts->ClearComBuffOnOpen);
1764
1765 /* Confirm disconnection -- special option */
1766 WriteOnOff(Section, "ConfirmDisconnect", FName,
1767 (WORD) (ts->PortFlag & PF_CONFIRMDISCONN));
1768
1769 /* Ctrl code in Kanji -- special option */
1770 WriteOnOff(Section, "CtrlInKanji", FName,
1771 (WORD) (ts->TermFlag & TF_CTRLINKANJI));
1772
1773 /* Debug flag -- special option */
1774 WriteOnOff(Section, "Debug", FName, ts->Debug);
1775
1776 /* Delimiter list -- special option */
1777 Str2Hex(ts->DelimList, Temp, strlen(ts->DelimList),
1778 sizeof(Temp) - 1, TRUE);
1779 WritePrivateProfileString(Section, "DelimList", Temp, FName);
1780
1781 /* regard DBCS characters as delimiters -- special option */
1782 WriteOnOff(Section, "DelimDBCS", FName, ts->DelimDBCS);
1783
1784 // Enable popup menu -- special option
1785 if ((ts->MenuFlag & MF_NOPOPUP) == 0)
1786 WriteOnOff(Section, "EnablePopupMenu", FName, 1);
1787 else
1788 WriteOnOff(Section, "EnablePopupMenu", FName, 0);
1789
1790 // Enable "Show menu" -- special option
1791 if ((ts->MenuFlag & MF_NOSHOWMENU) == 0)
1792 WriteOnOff(Section, "EnableShowMenu", FName, 1);
1793 else
1794 WriteOnOff(Section, "EnableShowMenu", FName, 0);
1795
1796 /* Enable the status line -- special option */
1797 WriteOnOff(Section, "EnableStatusLine", FName,
1798 (WORD) (ts->TermFlag & TF_ENABLESLINE));
1799
1800 /* IME Flag -- special option */
1801 WriteOnOff(Section, "IME", FName, ts->UseIME);
1802
1803 /* IME-inline Flag -- special option */
1804 WriteOnOff(Section, "IMEInline", FName, ts->IMEInline);
1805
1806 /* Kermit log -- special option */
1807 WriteOnOff(Section, "KmtLog", FName, (WORD) (ts->LogFlag & LOG_KMT));
1808
1809 // Enable language selection -- special option
1810 if ((ts->MenuFlag & MF_NOLANGUAGE) == 0)
1811 WriteOnOff(Section, "LanguageSelection", FName, 1);
1812 else
1813 WriteOnOff(Section, "LanguageSelection", FName, 0);
1814
1815 /* Maximum scroll buffer size -- special option */
1816 WriteInt(Section, "MaxBuffSize", FName, ts->ScrollBuffMax);
1817
1818 /* Max com port number -- special option */
1819 WriteInt(Section, "MaxComPort", FName, ts->MaxComPort);
1820
1821 /* Non-blinking cursor -- special option */
1822 WriteOnOff(Section, "NonblinkingCursor", FName, ts->NonblinkingCursor);
1823
1824 WriteOnOff(Section, "KillFocusCursor", FName, ts->KillFocusCursor);
1825
1826 /* Delay for pass-thru printing activation */
1827 /* -- special option */
1828 WriteUint(Section, "PassThruDelay", FName, ts->PassThruDelay);
1829
1830 /* Printer port for pass-thru printing */
1831 /* -- special option */
1832 WritePrivateProfileString(Section, "PassThruPort", ts->PrnDev, FName);
1833
1834 /* Printer Font --- special option */
1835 WriteFont(Section, "PrnFont", FName,
1836 ts->PrnFont, ts->PrnFontSize.x, ts->PrnFontSize.y,
1837 ts->PrnFontCharSet);
1838
1839 // Page margins (left, right, top, bottom) for printing
1840 // -- special option
1841 WriteInt4(Section, "PrnMargin", FName,
1842 ts->PrnMargin[0], ts->PrnMargin[1],
1843 ts->PrnMargin[2], ts->PrnMargin[3]);
1844
1845 /* Quick-VAN log -- special option */
1846 WriteOnOff(Section, "QVLog", FName, (WORD) (ts->LogFlag & LOG_QV));
1847
1848 /* Quick-VAN window size -- special */
1849 WriteInt(Section, "QVWinSize", FName, ts->QVWinSize);
1850
1851 /* Russian character set (print) -- special option */
1852 id2str(RussList, ts->RussPrint, IdWindows, Temp, sizeof(Temp));
1853 WritePrivateProfileString(Section, "RussPrint", Temp, FName);
1854
1855 /* Scroll threshold -- special option */
1856 WriteInt(Section, "ScrollThreshold", FName, ts->ScrollThreshold);
1857
1858 WriteInt(Section, "MouseWheelScrollLine", FName, ts->MouseWheelScrollLine);
1859
1860 // Select on activate -- special option
1861 WriteOnOff(Section, "SelectOnActivate", FName, ts->SelOnActive);
1862
1863 /* Send 8bit control sequence -- special option */
1864 WriteOnOff(Section, "Send8BitCtrl", FName, ts->Send8BitCtrl);
1865
1866 /* Startup macro -- special option */
1867 WritePrivateProfileString(Section, "StartupMacro", ts->MacroFN, FName);
1868
1869 /* TEK GIN Mouse keycode -- special option */
1870 WriteInt(Section, "TEKGINMouseCode", FName, ts->GINMouseCode);
1871
1872 /* Telnet Auto Detect -- special option */
1873 WriteOnOff(Section, "TelAutoDetect", FName, ts->TelAutoDetect);
1874
1875 /* Telnet binary flag -- special option */
1876 WriteOnOff(Section, "TelBin", FName, ts->TelBin);
1877
1878 /* Telnet Echo flag -- special option */
1879 WriteOnOff(Section, "TelEcho", FName, ts->TelEcho);
1880
1881 /* Telnet log -- special option */
1882 WriteOnOff(Section, "TelLog", FName, (WORD) (ts->LogFlag & LOG_TEL));
1883
1884 /* TCP port num for telnet -- special option */
1885 WriteUint(Section, "TelPort", FName, ts->TelPort);
1886
1887 /* Telnet keep-alive packet(NOP command) interval -- special option */
1888 WriteUint(Section, "TelKeepAliveInterval", FName,
1889 ts->TelKeepAliveInterval);
1890
1891 /* Max number of broadcast commad history */
1892 WriteUint(Section, "MaxBroadcatHistory", FName,
1893 ts->MaxBroadcatHistory);
1894
1895 /* Local echo for non-telnet */
1896 WriteOnOff(Section, "TCPLocalEcho", FName, ts->TCPLocalEcho);
1897
1898 /* "new-line (transmit)" option for non-telnet -- special option */
1899 if (ts->TCPCRSend == IdCRLF)
1900 strncpy_s(Temp, sizeof(Temp), "CRLF", _TRUNCATE);
1901 else if (ts->TCPCRSend == IdCR)
1902 strncpy_s(Temp, sizeof(Temp), "CR", _TRUNCATE);
1903 else
1904 Temp[0] = 0;
1905 WritePrivateProfileString(Section, "TCPCRSend", Temp, FName);
1906
1907 /* Use text (background) color for "white (black)"
1908 --- special option */
1909 WriteOnOff(Section, "UseTextColor", FName,
1910 (WORD) (ts->ColorFlag & CF_USETEXTCOLOR));
1911
1912 /* Title format -- special option */
1913 WriteUint(Section, "TitleFormat", FName, ts->TitleFormat);
1914
1915 /* VT Compatible Tab -- special option */
1916 WriteOnOff(Section, "VTCompatTab", FName, ts->VTCompatTab);
1917
1918 /* VT Font space --- special option */
1919 WriteInt4(Section, "VTFontSpace", FName,
1920 ts->FontDX, ts->FontDW - ts->FontDX,
1921 ts->FontDY, ts->FontDH - ts->FontDY);
1922
1923 // VT-print scaling factors (pixels per inch) --- special option
1924 WriteInt2(Section, "VTPPI", FName, ts->VTPPI.x, ts->VTPPI.y);
1925
1926 // TEK-print scaling factors (pixels per inch) --- special option
1927 WriteInt2(Section, "TEKPPI", FName, ts->TEKPPI.x, ts->TEKPPI.y);
1928
1929 // Show "Window" menu -- special option
1930 WriteOnOff(Section, "WindowMenu", FName,
1931 (WORD) (ts->MenuFlag & MF_SHOWWINMENU));
1932
1933 /* XMODEM log -- special option */
1934 WriteOnOff(Section, "XmodemLog", FName, (WORD) (ts->LogFlag & LOG_X));
1935
1936 /* YMODEM log -- special option */
1937 WriteOnOff(Section, "YmodemLog", FName, (WORD) (ts->LogFlag & LOG_Y));
1938
1939 /* Auto ZMODEM activation -- special option */
1940 WriteOnOff(Section, "ZmodemAuto", FName,
1941 (WORD) (ts->FTFlag & FT_ZAUTO));
1942
1943 /* ZMODEM data subpacket length for sending -- special */
1944 WriteInt(Section, "ZmodemDataLen", FName, ts->ZmodemDataLen);
1945 /* ZMODEM window size for sending -- special */
1946 WriteInt(Section, "ZmodemWinSize", FName, ts->ZmodemWinSize);
1947
1948 /* ZMODEM ESCCTL flag -- special option */
1949 WriteOnOff(Section, "ZmodemEscCtl", FName,
1950 (WORD) (ts->FTFlag & FT_ZESCCTL));
1951
1952 /* ZMODEM log -- special option */
1953 WriteOnOff(Section, "ZmodemLog", FName, (WORD) (ts->LogFlag & LOG_Z));
1954
1955 /* ZMODEM ���M�R�}���h (2007.12.21 yutaka) */
1956 WritePrivateProfileString(Section, "ZmodemRcvCommand", ts->ZModemRcvCommand, FName);
1957
1958 /* update file */
1959 WritePrivateProfileString(NULL, NULL, NULL, FName);
1960
1961 // Eterm lookfeel alphablend (2005.4.24 yutaka)
1962 #define ETERM_SECTION "BG"
1963 WriteOnOff(ETERM_SECTION, "BGEnable", FName,
1964 ts->EtermLookfeel.BGEnable);
1965 WriteOnOff(ETERM_SECTION, "BGUseAlphaBlendAPI", FName,
1966 ts->EtermLookfeel.BGUseAlphaBlendAPI);
1967 WritePrivateProfileString(ETERM_SECTION, "BGSPIPath",
1968 ts->EtermLookfeel.BGSPIPath, FName);
1969 WriteOnOff(ETERM_SECTION, "BGFastSizeMove", FName,
1970 ts->EtermLookfeel.BGFastSizeMove);
1971 WriteOnOff(ETERM_SECTION, "BGFlickerlessMove", FName,
1972 ts->EtermLookfeel.BGNoCopyBits);
1973 WriteOnOff(ETERM_SECTION, "BGNoFrame", FName,
1974 ts->EtermLookfeel.BGNoFrame);
1975 WritePrivateProfileString(ETERM_SECTION, "BGThemeFile",
1976 ts->EtermLookfeel.BGThemeFile, FName);
1977
1978 #ifdef USE_NORMAL_BGCOLOR
1979 // UseNormalBGColor
1980 WriteOnOff(Section, "UseNormalBGColor", FName, ts->UseNormalBGColor);
1981 #endif
1982
1983 // UI language message file
1984 WritePrivateProfileString(Section, "UILanguageFile",
1985 ts->UILanguageFile_ini, FName);
1986
1987 // Broadcast Command History (2007.3.3 maya)
1988 WriteOnOff(Section, "BroadcastCommandHistory", FName,
1989 ts->BroadcastCommandHistory);
1990
1991 // 337: 2007/03/20 Accept Broadcast
1992 WriteOnOff(Section, "AcceptBroadcast", FName, ts->AcceptBroadcast);
1993
1994 // Confirm send a file when drag and drop (2007.12.28 maya)
1995 WriteOnOff(Section, "ConfirmFileDragAndDrop", FName,
1996 ts->ConfirmFileDragAndDrop);
1997
1998 // Translate mouse wheel to cursor key when application cursor mode
1999 WriteOnOff(Section, "TranslateWheelToCursor", FName,
2000 ts->TranslateWheelToCursor);
2001
2002 // Display "New Connection" dialog on startup (2008.1.18 maya)
2003 WriteOnOff(Section, "HostDialogOnStartup", FName,
2004 ts->HostDialogOnStartup);
2005
2006 // Mouse event tracking
2007 WriteOnOff(Section, "MouseEventTracking", FName,
2008 ts->MouseEventTracking);
2009
2010 // Maximized bug tweak
2011 WriteOnOff(Section, "MaximizedBugTweak", FName, ts->MaximizedBugTweak);
2012
2013 // Convert Unicode symbol characters to DEC Special characters
2014 WriteUint(Section, "UnicodeToDecSpMapping", FName, ts->UnicodeDecSpMapping);
2015
2016 // VT Window Icon
2017 IconId2IconName(Temp, sizeof(Temp), ts->VTIcon);
2018 WritePrivateProfileString(Section, "VTIcon", Temp, FName);
2019
2020 // Tek Window Icon
2021 IconId2IconName(Temp, sizeof(Temp), ts->TEKIcon);
2022 WritePrivateProfileString(Section, "TEKIcon", Temp, FName);
2023
2024 // AutoScrollOnlyInBottomLine
2025 WriteOnOff(Section, "AutoScrollOnlyInBottomLine", FName,
2026 ts->AutoScrollOnlyInBottomLine);
2027
2028 // Unknown Unicode Character
2029 WriteOnOff(Section, "UnknownUnicodeCharacterAsWide", FName,
2030 ts->UnknownUnicodeCharaAsWide);
2031
2032 // Accept remote-controlled window title changing
2033 if (ts->AcceptTitleChangeRequest == IdTitleChangeRequestOff)
2034 strncpy_s(Temp, sizeof(Temp), "off", _TRUNCATE);
2035 else if (ts->AcceptTitleChangeRequest == IdTitleChangeRequestOverwrite)
2036 strncpy_s(Temp, sizeof(Temp), "overwrite", _TRUNCATE);
2037 else if (ts->AcceptTitleChangeRequest == IdTitleChangeRequestAhead)
2038 strncpy_s(Temp, sizeof(Temp), "ahead", _TRUNCATE);
2039 else if (ts->AcceptTitleChangeRequest == IdTitleChangeRequestLast)
2040 strncpy_s(Temp, sizeof(Temp), "last", _TRUNCATE);
2041 else
2042 Temp[0] = 0;
2043 WritePrivateProfileString(Section, "AcceptTitleChangeRequest", Temp, FName);
2044
2045 // Size of paste confirm dialog
2046 WriteInt2(Section, "PasteDialogSize", FName,
2047 ts->PasteDialogSize.cx, ts->PasteDialogSize.cy);
2048
2049 // Disable mouse event tracking when Control-Key is pressed.
2050 WriteOnOff(Section, "DisableMouseTrackingByCtrl", FName,
2051 ts->DisableMouseTrackingByCtrl);
2052
2053 // Disable TranslateWHeelToCursor when Control-Key is pressed.
2054 WriteOnOff(Section, "DisableWheelToCursorByCtrl", FName,
2055 ts->DisableWheelToCursorByCtrl);
2056 }
2057
2058 #define VTEditor "VT editor keypad"
2059 #define VTNumeric "VT numeric keypad"
2060 #define VTFunction "VT function keys"
2061 #define XFunction "X function keys"
2062 #define ShortCut "Shortcut keys"
2063
2064 void GetInt(PKeyMap KeyMap, int KeyId, PCHAR Sect, PCHAR Key, PCHAR FName)
2065 {
2066 char Temp[11];
2067 WORD Num;
2068
2069 GetPrivateProfileString(Sect, Key, "", Temp, sizeof(Temp), FName);
2070 if (Temp[0] == 0)
2071 Num = 0xFFFF;
2072 else if (_stricmp(Temp, "off") == 0)
2073 Num = 0xFFFF;
2074 else if (sscanf(Temp, "%d", &Num) != 1)
2075 Num = 0xFFFF;
2076
2077 KeyMap->Map[KeyId - 1] = Num;
2078 }
2079
2080 void FAR PASCAL ReadKeyboardCnf
2081 (PCHAR FName, PKeyMap KeyMap, BOOL ShowWarning) {
2082 int i, j, Ptr;
2083 char EntName[7];
2084 char TempStr[221];
2085 char KStr[201];
2086
2087 // clear key map
2088 for (i = 0; i <= IdKeyMax - 1; i++)
2089 KeyMap->Map[i] = 0xFFFF;
2090 for (i = 0; i <= NumOfUserKey - 1; i++) {
2091 KeyMap->UserKeyPtr[i] = 0;
2092 KeyMap->UserKeyLen[i] = 0;
2093 }
2094
2095 // VT editor keypad
2096 GetInt(KeyMap, IdUp, VTEditor, "Up", FName);
2097
2098 GetInt(KeyMap, IdDown, VTEditor, "Down", FName);
2099
2100 GetInt(KeyMap, IdRight, VTEditor, "Right", FName);
2101
2102 GetInt(KeyMap, IdLeft, VTEditor, "Left", FName);
2103
2104 GetInt(KeyMap, IdFind, VTEditor, "Find", FName);
2105
2106 GetInt(KeyMap, IdInsert, VTEditor, "Insert", FName);
2107
2108 GetInt(KeyMap, IdRemove, VTEditor, "Remove", FName);
2109
2110 GetInt(KeyMap, IdSelect, VTEditor, "Select", FName);
2111
2112 GetInt(KeyMap, IdPrev, VTEditor, "Prev", FName);
2113
2114 GetInt(KeyMap, IdNext, VTEditor, "Next", FName);
2115
2116 // VT numeric keypad
2117 GetInt(KeyMap, Id0, VTNumeric, "Num0", FName);
2118
2119 GetInt(KeyMap, Id1, VTNumeric, "Num1", FName);
2120
2121 GetInt(KeyMap, Id2, VTNumeric, "Num2", FName);
2122
2123 GetInt(KeyMap, Id3, VTNumeric, "Num3", FName);
2124
2125 GetInt(KeyMap, Id4, VTNumeric, "Num4", FName);
2126
2127 GetInt(KeyMap, Id5, VTNumeric, "Num5", FName);
2128
2129 GetInt(KeyMap, Id6, VTNumeric, "Num6", FName);
2130
2131 GetInt(KeyMap, Id7, VTNumeric, "Num7", FName);
2132
2133 GetInt(KeyMap, Id8, VTNumeric, "Num8", FName);
2134
2135 GetInt(KeyMap, Id9, VTNumeric, "Num9", FName);
2136
2137 GetInt(KeyMap, IdMinus, VTNumeric, "NumMinus", FName);
2138
2139 GetInt(KeyMap, IdComma, VTNumeric, "NumComma", FName);
2140
2141 GetInt(KeyMap, IdPeriod, VTNumeric, "NumPeriod", FName);
2142
2143 GetInt(KeyMap, IdEnter, VTNumeric, "NumEnter", FName);
2144
2145 GetInt(KeyMap, IdSlash, VTNumeric, "NumSlash", FName);
2146
2147 GetInt(KeyMap, IdAsterisk, VTNumeric, "NumAsterisk", FName);
2148
2149 GetInt(KeyMap, IdPlus, VTNumeric, "NumPlus", FName);
2150
2151 GetInt(KeyMap, IdPF1, VTNumeric, "PF1", FName);
2152
2153 GetInt(KeyMap, IdPF2, VTNumeric, "PF2", FName);
2154
2155 GetInt(KeyMap, IdPF3, VTNumeric, "PF3", FName);
2156
2157 GetInt(KeyMap, IdPF4, VTNumeric, "PF4", FName);
2158
2159 // VT function keys
2160 GetInt(KeyMap, IdHold, VTFunction, "Hold", FName);
2161
2162 GetInt(KeyMap, IdPrint, VTFunction, "Print", FName);
2163
2164 GetInt(KeyMap, IdBreak, VTFunction, "Break", FName);
2165
2166 GetInt(KeyMap, IdF6, VTFunction, "F6", FName);
2167
2168 GetInt(KeyMap, IdF7, VTFunction, "F7", FName);
2169
2170 GetInt(KeyMap, IdF8, VTFunction, "F8", FName);
2171
2172 GetInt(KeyMap, IdF9, VTFunction, "F9", FName);
2173
2174 GetInt(KeyMap, IdF10, VTFunction, "F10", FName);
2175
2176 GetInt(KeyMap, IdF11, VTFunction, "F11", FName);
2177
2178 GetInt(KeyMap, IdF12, VTFunction, "F12", FName);
2179
2180 GetInt(KeyMap, IdF13, VTFunction, "F13", FName);
2181
2182 GetInt(KeyMap, IdF14, VTFunction, "F14", FName);
2183
2184 GetInt(KeyMap, IdHelp, VTFunction, "Help", FName);
2185
2186 GetInt(KeyMap, IdDo, VTFunction, "Do", FName);
2187
2188 GetInt(KeyMap, IdF17, VTFunction, "F17", FName);
2189
2190 GetInt(KeyMap, IdF18, VTFunction, "F18", FName);
2191
2192 GetInt(KeyMap, IdF19, VTFunction, "F19", FName);
2193
2194 GetInt(KeyMap, IdF20, VTFunction, "F20", FName);
2195
2196 // UDK
2197 GetInt(KeyMap, IdUDK6, VTFunction, "UDK6", FName);
2198
2199 GetInt(KeyMap, IdUDK7, VTFunction, "UDK7", FName);
2200
2201 GetInt(KeyMap, IdUDK8, VTFunction, "UDK8", FName);
2202
2203 GetInt(KeyMap, IdUDK9, VTFunction, "UDK9", FName);
2204
2205 GetInt(KeyMap, IdUDK10, VTFunction, "UDK10", FName);
2206
2207 GetInt(KeyMap, IdUDK11, VTFunction, "UDK11", FName);
2208
2209 GetInt(KeyMap, IdUDK12, VTFunction, "UDK12", FName);
2210
2211 GetInt(KeyMap, IdUDK13, VTFunction, "UDK13", FName);
2212
2213 GetInt(KeyMap, IdUDK14, VTFunction, "UDK14", FName);
2214
2215 GetInt(KeyMap, IdUDK15, VTFunction, "UDK15", FName);
2216
2217 GetInt(KeyMap, IdUDK16, VTFunction, "UDK16", FName);
2218
2219 GetInt(KeyMap, IdUDK17, VTFunction, "UDK17", FName);
2220
2221 GetInt(KeyMap, IdUDK18, VTFunction, "UDK18", FName);
2222
2223 GetInt(KeyMap, IdUDK19, VTFunction, "UDK19", FName);
2224
2225 GetInt(KeyMap, IdUDK20, VTFunction, "UDK20", FName);
2226
2227 // XTERM function keys
2228 GetInt(KeyMap, IdXF1, XFunction, "XF1", FName);
2229
2230 GetInt(KeyMap, IdXF2, XFunction, "XF2", FName);
2231
2232 GetInt(KeyMap, IdXF3, XFunction, "XF3", FName);
2233
2234 GetInt(KeyMap, IdXF4, XFunction, "XF4", FName);
2235
2236 GetInt(KeyMap, IdXF5, XFunction, "XF5", FName);
2237
2238 // accelerator keys
2239 GetInt(KeyMap, IdCmdEditCopy, ShortCut, "EditCopy", FName);
2240
2241 GetInt(KeyMap, IdCmdEditPaste, ShortCut, "EditPaste", FName);
2242
2243 GetInt(KeyMap, IdCmdEditPasteCR, ShortCut, "EditPasteCR", FName);
2244
2245 GetInt(KeyMap, IdCmdEditCLS, ShortCut, "EditCLS", FName);
2246
2247 GetInt(KeyMap, IdCmdEditCLB, ShortCut, "EditCLB", FName);
2248
2249 GetInt(KeyMap, IdCmdCtrlOpenTEK, ShortCut, "ControlOpenTEK", FName);
2250
2251 GetInt(KeyMap, IdCmdCtrlCloseTEK, ShortCut, "ControlCloseTEK", FName);
2252
2253 GetInt(KeyMap, IdCmdLineUp, ShortCut, "LineUp", FName);
2254
2255 GetInt(KeyMap, IdCmdLineDown, ShortCut, "LineDown", FName);
2256
2257 GetInt(KeyMap, IdCmdPageUp, ShortCut, "PageUp", FName);
2258
2259 GetInt(KeyMap, IdCmdPageDown, ShortCut, "PageDown", FName);
2260
2261 GetInt(KeyMap, IdCmdBuffTop, ShortCut, "BuffTop", FName);
2262
2263 GetInt(KeyMap, IdCmdBuffBottom, ShortCut, "BuffBottom", FName);
2264
2265 GetInt(KeyMap, IdCmdNextWin, ShortCut, "NextWin", FName);
2266
2267 GetInt(KeyMap, IdCmdPrevWin, ShortCut, "PrevWin", FName);
2268
2269 GetInt(KeyMap, IdCmdLocalEcho, ShortCut, "LocalEcho", FName);
2270
2271 GetInt(KeyMap, IdScrollLock, ShortCut, "ScrollLock", FName);
2272
2273 /* user keys */
2274
2275 Ptr = 0;
2276
2277 i = IdUser1;
2278 do {
2279 _snprintf_s(EntName, sizeof(EntName), _TRUNCATE, "User%d", i - IdUser1 + 1);
2280 GetPrivateProfileString("User keys", EntName, "",
2281 TempStr, sizeof(TempStr), FName);
2282 if (strlen(TempStr) > 0) {
2283 /* scan code */
2284 GetNthString(TempStr, 1, sizeof(KStr), KStr);
2285 if (_stricmp(KStr, "off") == 0)
2286 KeyMap->Map[i - 1] = 0xFFFF;
2287 else {
2288 GetNthNum(TempStr, 1, &j);
2289 KeyMap->Map[i - 1] = (WORD) j;
2290 }
2291 /* conversion flag */
2292 GetNthNum(TempStr, 2, &j);
2293 KeyMap->UserKeyType[i - IdUser1] = (BYTE) j;
2294 /* key string */
2295 /* GetNthString(TempStr,3,sizeof(KStr),KStr); */
2296 KeyMap->UserKeyPtr[i - IdUser1] = Ptr;
2297 /* KeyMap->UserKeyLen[i-IdUser1] =
2298 Hex2Str(KStr,&(KeyMap->UserKeyStr[Ptr]),KeyStrMax-Ptr+1);
2299 */
2300 GetNthString(TempStr, 3, KeyStrMax - Ptr + 1,
2301 &(KeyMap->UserKeyStr[Ptr]));
2302 KeyMap->UserKeyLen[i - IdUser1] =
2303 strlen(&(KeyMap->UserKeyStr[Ptr]));
2304 Ptr = Ptr + KeyMap->UserKeyLen[i - IdUser1];
2305 }
2306
2307 i++;
2308 }
2309 while ((i <= IdKeyMax) && (strlen(TempStr) > 0) && (Ptr <= KeyStrMax));
2310
2311 for (j = 1; j <= IdKeyMax - 1; j++)
2312 if (KeyMap->Map[j] != 0xFFFF)
2313 for (i = 0; i <= j - 1; i++)
2314 if (KeyMap->Map[i] == KeyMap->Map[j]) {
2315 if (ShowWarning) {
2316 _snprintf_s(TempStr, sizeof(TempStr), _TRUNCATE,
2317 "Keycode %d is used more than once",
2318 KeyMap->Map[j]);
2319 MessageBox(0, TempStr,
2320 "Tera Term: Error in keyboard setup file",
2321 MB_ICONEXCLAMATION);
2322 }
2323 KeyMap->Map[i] = 0xFFFF;
2324 }
2325 }
2326
2327 void FAR PASCAL CopySerialList(PCHAR IniSrc, PCHAR IniDest, PCHAR section,
2328 PCHAR key, int MaxList)
2329 {
2330 int i;
2331 char EntName[10];
2332 char TempHost[HostNameMaxLength + 1];
2333
2334 if (_stricmp(IniSrc, IniDest) == 0)
2335 return;
2336
2337 WritePrivateProfileString(section, NULL, NULL, IniDest);
2338
2339 i = 1;
2340 do {
2341 _snprintf_s(EntName, sizeof(EntName), _TRUNCATE, "%s%i", key, i);
2342
2343 /* Get one hostname from file IniSrc */
2344 GetPrivateProfileString(section, EntName, "",
2345 TempHost, sizeof(TempHost), IniSrc);
2346 /* Copy it to the file IniDest */
2347 if (strlen(TempHost) > 0)
2348 WritePrivateProfileString(section, EntName, TempHost, IniDest);
2349 i++;
2350 }
2351 while ((i <= MaxList) && (strlen(TempHost) > 0));
2352
2353 /* update file */
2354 WritePrivateProfileString(NULL, NULL, NULL, IniDest);
2355 }
2356
2357 void FAR PASCAL AddValueToList(PCHAR FName, PCHAR Host, PCHAR section,
2358 PCHAR key, int MaxList)
2359 {
2360 HANDLE MemH;
2361 PCHAR MemP;
2362 char EntName[13];
2363 int i, j, Len;
2364 BOOL Update;
2365
2366 if ((FName[0] == 0) || (Host[0] == 0))
2367 return;
2368 MemH = GlobalAlloc(GHND, (HostNameMaxLength + 1) * MaxList);
2369 if (MemH == NULL)
2370 return;
2371 MemP = GlobalLock(MemH);
2372 if (MemP != NULL) {
2373 strncpy_s(MemP, (HostNameMaxLength + 1) * MaxList, Host, _TRUNCATE);
2374 j = strlen(Host) + 1;
2375 i = 1;
2376 Update = TRUE;
2377 do {
2378 _snprintf_s(EntName, sizeof(EntName), _TRUNCATE, "%s%i", key, i);
2379
2380 /* Get a hostname */
2381 GetPrivateProfileString(section, EntName, "",
2382 &MemP[j], HostNameMaxLength + 1,
2383 FName);
2384 Len = strlen(&MemP[j]);
2385 if (_stricmp(&MemP[j], Host) == 0) {
2386 if (i == 1)
2387 Update = FALSE;
2388 }
2389 else
2390 j = j + Len + 1;
2391 i++;
2392 } while ((i <= MaxList) && (Len != 0) && Update);
2393
2394 if (Update) {
2395 WritePrivateProfileString(section, NULL, NULL, FName);
2396
2397 j = 0;
2398 i = 1;
2399 do {
2400 _snprintf_s(EntName, sizeof(EntName), _TRUNCATE, "%s%i", key, i);
2401
2402 if (MemP[j] != 0)
2403 WritePrivateProfileString(section, EntName, &MemP[j],
2404 FName);
2405 j = j + strlen(&MemP[j]) + 1;
2406 i++;
2407 } while ((i <= MaxList) && (MemP[j] != 0));
2408 /* update file */
2409 WritePrivateProfileString(NULL, NULL, NULL, FName);
2410 }
2411 GlobalUnlock(MemH);
2412 }
2413 GlobalFree(MemH);
2414 }
2415
2416 /* copy hostlist from source IniFile to dest IniFile */
2417 void FAR PASCAL CopyHostList(PCHAR IniSrc, PCHAR IniDest)
2418 {
2419 CopySerialList(IniSrc, IniDest, "Hosts", "Host", MAXHOSTLIST);
2420 }
2421
2422 void FAR PASCAL AddHostToList(PCHAR FName, PCHAR Host)
2423 {
2424 AddValueToList(FName, Host, "Hosts", "Host", MAXHOSTLIST);
2425 }
2426
2427 BOOL NextParam(PCHAR Param, int *i, PCHAR Temp, int Size)
2428 {
2429 int j;
2430 char c;
2431 BOOL Quoted;
2432
2433 if ((unsigned int) (*i) >= strlen(Param))
2434 return FALSE;
2435 j = 0;
2436
2437 while (Param[*i] == ' ')
2438 (*i)++;
2439
2440 Quoted = FALSE;
2441 c = Param[*i];
2442 (*i)++;
2443 while ((c != 0) && (Quoted || (c != ' ')) &&
2444 (Quoted || (c != ';')) && (j < Size - 1)) {
2445 if (c == '"')
2446 Quoted = !Quoted;
2447 Temp[j] = c;
2448 j++;
2449 c = Param[*i];
2450 (*i)++;
2451 }
2452 if (!Quoted && (c == ';'))
2453 (*i)--;
2454
2455 Temp[j] = 0;
2456 return (strlen(Temp) > 0);
2457 }
2458
2459 void Dequote(PCHAR Source, PCHAR Dest)
2460 {
2461 int i, j;
2462 char q, c;
2463
2464 Dest[0] = 0;
2465 if (Source[0] == 0)
2466 return;
2467 i = 0;
2468 /* quoting char */
2469 q = Source[i];
2470 /* only '"' is used as quoting char */
2471 if (q != '"')
2472 q = 0;
2473 else
2474 i++;
2475
2476 c = Source[i];
2477 i++;
2478 j = 0;
2479 while ((c != 0) && (c != q)) {
2480 Dest[j] = c;
2481 j++;
2482 c = Source[i];
2483 i++;
2484 }
2485
2486 Dest[j] = 0;
2487 }
2488
2489
2490 #ifndef NO_INET6
2491 static void ParseHostName(char *HostStr, WORD * port)
2492 {
2493 /*
2494 * hostname.domain.com
2495 * hostname.domain.com:23
2496 * [3ffe:1234:1234::1] IPv6 raw address
2497 * [3ffe:1234:1234::1]:23 IPv6 raw address and port#
2498 * telnet://hostname.domain.com/
2499 * telnet://hostname.domain.com:23/
2500 * telnet://[3ffe:1234:1234::1]/
2501 * telnet://[3ffe:1234:1234::1]:23/
2502 * tn3270:// .... /
2503 */
2504
2505 int i, is_telnet_handler = 0, is_port = 0;
2506 char *s;
2507 char b;
2508
2509 /* strlen("telnet://") == 9 */
2510 if ((_strnicmp(HostStr, "telnet://", 9) == 0) ||
2511 (_strnicmp(HostStr, "tn3270://", 9) == 0)) {
2512 /* trim "telnet://" and tail "/" */
2513 memmove(HostStr, &(HostStr[9]), strlen(HostStr) - 8);
2514 i = strlen(HostStr);
2515 if (i > 0 && (HostStr[i - 1] == '/'))
2516 HostStr[i - 1] = '\0';
2517 is_telnet_handler = 1;
2518 }
2519
2520 /* parsing string enclosed by [ ] */
2521 s = HostStr;
2522 if (*s == '[') {
2523 BOOL inet6found = FALSE;
2524 s++;
2525 while (*s) {
2526 if (*s == ']') {
2527 /* found IPv6 raw address */
2528 /* triming [ ] */
2529 int len = strlen(HostStr);
2530 char *lastptr = &HostStr[len - 1];
2531 memmove(HostStr, HostStr + 1, len - 1);
2532 s = s - 1;
2533 lastptr = lastptr - 1;
2534 memmove(s, s + 1, lastptr - s);
2535 /* because of triming 2 characters */
2536 HostStr[len - 2] = '\0';
2537
2538
2539 inet6found = TRUE;
2540 break;
2541 }
2542 s++;
2543 }
2544 if (inet6found == FALSE)
2545 s = HostStr;
2546 }
2547
2548 /* parsing port# */
2549 /*
2550 * s points:
2551 * [3ffe:1234:1234::1]:XXX....
2552 * 3ffe:1234:1234::1:XXX....
2553 * |
2554 * s
2555 *
2556 * hostname.domain.com
2557 * |
2558 * s
2559 */
2560 i = 0;
2561 do {
2562 b = s[i];
2563 i++;
2564 } while (b != '\0' && b != ':');
2565 if (b == ':') {
2566 s[i - 1] = '\0';
2567 if (sscanf(&(s[i]), "%d", port) != 1)
2568 *port = 65535;
2569 is_port = 1;
2570 }
2571 if (is_telnet_handler == 1 && is_port == 0) {
2572 *port = 23;
2573 }
2574 }
2575 #endif /* NO_INET6 */
2576
2577
2578 void FAR PASCAL ParseParam(PCHAR Param, PTTSet ts, PCHAR DDETopic)
2579 {
2580 int i, pos, c;
2581 #ifdef NO_INET6
2582 BYTE b;
2583 #endif /* NO_INET6 */
2584 char Temp[MAXPATHLEN + 3];
2585 char Temp2[MAXPATHLEN];
2586 char TempDir[MAXPATHLEN];
2587 WORD ParamPort = 0;
2588 WORD ParamCom = 0;
2589 WORD ParamTCP = 65535;
2590 WORD ParamTel = 2;
2591 WORD ParamBin = 2;
2592 WORD ParamBaud = IdBaudNone;
2593 BOOL HostNameFlag = FALSE;
2594 BOOL JustAfterHost = FALSE;
2595 WORD DisableTCPEchoCR = FALSE;
2596
2597 ts->HostName[0] = 0;
2598 ts->KeyCnfFN[0] = 0;
2599 /* Set AutoConnect true as default (2008.2.16 by steven)*/
2600 ts->ComAutoConnect = TRUE;
2601
2602 #ifndef NO_INET6
2603 /* user specifies the protocol connecting to the host */
2604 /* ts->ProtocolFamily = AF_UNSPEC; */
2605 #endif /* NO_INET6 */
2606
2607 /* Get command line parameters */
2608 if (DDETopic != NULL)
2609 DDETopic[0] = 0;
2610 i = 0;
2611 /* the first term shuld be executable filename of Tera Term */
2612 NextParam(Param, &i, Temp, sizeof(Temp));
2613 while (NextParam(Param, &i, Temp, sizeof(Temp))) {
2614 if (HostNameFlag) {
2615 JustAfterHost = TRUE;
2616 HostNameFlag = FALSE;
2617 }
2618
2619 if (_strnicmp(Temp, "/BAUD=", 6) == 0) { /* Serial port baud rate */
2620 ParamPort = IdSerial;
2621 ParamBaud = str2id(BaudList, &Temp[6], IdBaudNone);
2622 }
2623 else if (_strnicmp(Temp, "/B", 2) == 0) { /* telnet binary */
2624 ParamPort = IdTCPIP;
2625 ParamBin = 1;
2626 }
2627 else if (_strnicmp(Temp, "/C=", 3) == 0) { /* COM port num */
2628 ParamPort = IdSerial;
2629 ParamCom = atoi(&Temp[3]);
2630 if ((ParamCom < 1) || (ParamCom > ts->MaxComPort))
2631 ParamCom = 0;
2632 }
2633 else if (_strnicmp(Temp, "/D=", 3) == 0) {
2634 if (DDETopic != NULL)
2635 strncpy_s(DDETopic, 21, &Temp[3], _TRUNCATE); // 21 = sizeof(TopicName)
2636 }
2637 // "New connection" �_�C�A���O���\�������� (2008.11.14 maya)
2638 else if (_strnicmp(Temp, "/DS", 3) == 0) {
2639 ts->HostDialogOnStartup = FALSE;
2640 }
2641 // TCPLocalEcho/TCPCRSend ������������ (maya 2007.4.25)
2642 else if (_strnicmp(Temp, "/E", 2) == 0) {
2643 DisableTCPEchoCR = TRUE;
2644 }
2645 else if (_strnicmp(Temp, "/F=", 3) == 0) { /* setup filename */
2646 Dequote(&Temp[3], Temp2);
2647 if (strlen(Temp2) > 0) {
2648 ConvFName(ts->HomeDir, Temp2, sizeof(Temp2), ".INI", Temp,
2649 sizeof(Temp));
2650 if (_stricmp(ts->SetupFName, Temp) != 0) {
2651 strncpy_s(ts->SetupFName, sizeof(ts->SetupFName), Temp,
2652 _TRUNCATE);
2653 ReadIniFile(ts->SetupFName, ts);
2654 }
2655 }
2656 }
2657 else if (_strnicmp(Temp, "/FD=", 4) == 0) { /* file transfer directory */
2658 Dequote(&Temp[4], Temp2);
2659 if (strlen(Temp2) > 0) {
2660 _getcwd(TempDir, sizeof(TempDir));
2661 if (_chdir(Temp2) == 0)
2662 strncpy_s(ts->FileDir, sizeof(ts->FileDir), Temp2,
2663 _TRUNCATE);
2664 _chdir(TempDir);
2665 }
2666 }
2667 else if (_strnicmp(Temp, "/H", 2) == 0) /* hide title bar */
2668 ts->HideTitle = 1;
2669 else if (_strnicmp(Temp, "/I", 2) == 0) /* iconize */
2670 ts->Minimize = 1;
2671 else if (_strnicmp(Temp, "/K=", 3) == 0) { /* Keyboard setup file */
2672 Dequote(&Temp[3], Temp2);
2673 ConvFName(ts->HomeDir, Temp2, sizeof(Temp2), ".CNF",
2674 ts->KeyCnfFN, sizeof(ts->KeyCnfFN));
2675 }
2676 else if ((_strnicmp(Temp, "/KR=", 4) == 0) ||
2677 (_strnicmp(Temp, "/KT=", 4) == 0)) { /* kanji code */
2678 if (_strnicmp(&Temp[4], "UTF8m", 5) == 0 ||
2679 _strnicmp(&Temp[4], "UTF-8m", 6) == 0)
2680 c = IdUTF8m;
2681 else if (_strnicmp(&Temp[4], "UTF8", 4) == 0 ||
2682 _strnicmp(&Temp[4], "UTF-8", 5) == 0)
2683 c = IdUTF8;
2684 else if (_strnicmp(&Temp[4], "SJIS", 4) == 0)
2685 c = IdSJIS;
2686 else if (_strnicmp(&Temp[4], "EUC", 3) == 0)
2687 c = IdEUC;
2688 else if (_strnicmp(&Temp[4], "JIS", 3) == 0)
2689 c = IdJIS;
2690 else
2691 c = -1;
2692 if (c != -1) {
2693 if (_strnicmp(Temp, "/KR=", 4) == 0)
2694 ts->KanjiCode = c;
2695 else
2696 ts->KanjiCodeSend = c;
2697 }
2698 }
2699 else if (_strnicmp(Temp, "/L=", 3) == 0) { /* log file */
2700 Dequote(&Temp[3], Temp2);
2701 strncpy_s(ts->LogFN, sizeof(ts->LogFN), Temp2, _TRUNCATE);
2702 }
2703 else if (_strnicmp(Temp, "/LA=", 4) == 0) { /* language */
2704 if (_strnicmp(&Temp[4], "E", 1) == 0)
2705 ts->Language = IdEnglish;
2706 else if (_strnicmp(&Temp[4], "J", 1) == 0)
2707 ts->Language = IdJapanese;
2708 else if (_strnicmp(&Temp[4], "R", 1) == 0)
2709 ts->Language = IdRussian;
2710 }
2711 else if (_strnicmp(Temp, "/M=", 3) == 0) { /* macro filename */
2712 if ((Temp[3] == 0) || (Temp[3] == '*'))
2713 strncpy_s(ts->MacroFN, sizeof(ts->MacroFN), "*",
2714 _TRUNCATE);
2715 else {
2716 Dequote(&Temp[3], Temp2);
2717 ConvFName(ts->HomeDir, Temp2, sizeof(Temp2), ".TTL",
2718 ts->MacroFN, sizeof(ts->MacroFN));
2719 }
2720 /* Disable auto connect to serial when macro mode (2006.9.15 maya) */
2721 ts->ComAutoConnect = FALSE;
2722 }
2723 else if (_strnicmp(Temp, "/M", 2) == 0) { /* macro option without file name */
2724 strncpy_s(ts->MacroFN, sizeof(ts->MacroFN), "*", _TRUNCATE);
2725 /* Disable auto connect to serial when macro mode (2006.9.15 maya) */
2726 ts->ComAutoConnect = FALSE;
2727 }
2728 else if (_strnicmp(Temp, "/P=", 3) == 0) { /* TCP port num */
2729 ParamPort = IdTCPIP;
2730 if (sscanf(&Temp[3], "%d", &ParamTCP) != 1)
2731 ParamTCP = 65535;
2732 }
2733 else if (_strnicmp(Temp, "/R=", 3) == 0) { /* Replay filename */
2734 Dequote(&Temp[3], Temp2);
2735 ConvFName(ts->HomeDir, Temp2, sizeof(Temp2), "", ts->HostName,
2736 sizeof(ts->HostName));
2737 if (strlen(ts->HostName) > 0)
2738 ParamPort = IdFile;
2739 }
2740 else if (_strnicmp(Temp, "/T=0", 4) == 0) { /* telnet disable */
2741 ParamPort = IdTCPIP;
2742 ParamTel = 0;
2743 }
2744 else if (_strnicmp(Temp, "/T=1", 4) == 0) { /* telnet enable */
2745 ParamPort = IdTCPIP;
2746 ParamTel = 1;
2747 }
2748 else if (_strnicmp(Temp, "/TEKICON=", 9) == 0) { /* Tek window icon */
2749 ts->TEKIcon = IconName2IconId(&Temp[9]);
2750 }
2751 else if (_strnicmp(Temp, "/VTICON=", 8) == 0) { /* VT window icon */
2752 ts->VTIcon = IconName2IconId(&Temp[8]);
2753 }
2754 else if (_strnicmp(Temp, "/V", 2) == 0) { /* invisible */
2755 ts->HideWindow = 1;
2756 }
2757 else if (_strnicmp(Temp, "/W=", 3) == 0) { /* Window title */
2758 Dequote(&Temp[3], ts->Title);
2759 }
2760 else if (_strnicmp(Temp, "/X=", 3) == 0) { /* Window pos (X) */
2761 if (sscanf(&Temp[3], "%d", &pos) == 1) {
2762 ts->VTPos.x = pos;
2763 if (ts->VTPos.y == CW_USEDEFAULT)
2764 ts->VTPos.y = 0;
2765 }
2766 }
2767 else if (_strnicmp(Temp, "/Y=", 3) == 0) { /* Window pos (Y) */
2768 if (sscanf(&Temp[3], "%d", &pos) == 1) {
2769 ts->VTPos.y = pos;
2770 if (ts->VTPos.x == CW_USEDEFAULT)
2771 ts->VTPos.x = 0;
2772 }
2773 }
2774 #ifndef NO_INET6
2775 else if (_strnicmp(Temp, "/4", 2) == 0) /* Protocol Tera Term speaking */
2776 ts->ProtocolFamily = AF_INET;
2777 else if (_strnicmp(Temp, "/6", 2) == 0)
2778 ts->ProtocolFamily = AF_INET6;
2779 #endif
2780 else if (_strnicmp(Temp, "/DUPLICATE", 9) == 0) { // duplicate session (2004.12.7. yutaka)
2781 ts->DuplicateSession = 1;
2782
2783 }
2784 else if (_strnicmp(Temp, "/TIMEOUT=", 9) == 0) { // Connecting Timeout value (2007.1.11. yutaka)
2785 if (sscanf(&Temp[9], "%d", &pos) == 1) {
2786 if (pos >= 0)
2787 ts->ConnectingTimeout = pos;
2788 }
2789
2790 }
2791 else if ((Temp[0] != '/') && (strlen(Temp) > 0)) {
2792 if (JustAfterHost && (sscanf(Temp, "%d", &c) == 1))
2793 ParamTCP = c;
2794 else {
2795 ParamPort = IdTCPIP;
2796 strncpy_s(ts->HostName, sizeof(ts->HostName), Temp, _TRUNCATE); /* host name */
2797 HostNameFlag = TRUE;
2798 }
2799 }
2800 JustAfterHost = FALSE;
2801 }
2802
2803 if ((DDETopic != NULL) && (DDETopic[0] != 0))
2804 ts->MacroFN[0] = 0;
2805
2806 if ((ts->HostName[0] != 0) && (ParamPort == IdTCPIP)) {
2807 #ifndef NO_INET6
2808 ParseHostName(ts->HostName, &ParamTCP);
2809 #else /* NO_INET6 */
2810 if ((_strnicmp(ts->HostName, "telnet://", 9) == 0) ||
2811 (_strnicmp(ts->HostName, "tn3270://", 9) == 0)) {
2812 memmove(ts->HostName, &(ts->HostName[9]),
2813 strlen(ts->HostName) - 8);
2814 i = strlen(ts->HostName);
2815 if ((i > 0) && (ts->HostName[i - 1] == '/'))
2816 ts->HostName[i - 1] = 0;
2817 }
2818 i = 0;
2819 do {
2820 b = ts->HostName[i];
2821 i++;
2822 } while ((b != 0) && (b != ':'));
2823 if (b == ':') {
2824 ts->HostName[i - 1] = 0;
2825 if (sscanf(&(ts->HostName[i]), "%d", &ParamTCP) != 1)
2826 ParamTCP =