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 2608 - (show annotations) (download) (as text)
Mon Nov 3 05:40:27 2008 UTC (15 years, 5 months ago) by maya
Original Path: teraterm/trunk/ttpset/ttset.c
File MIME type: text/x-csrc
File size: 88229 byte(s) 
AcceptTitleChangeRequest の値を ahead/last に変更
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 }
1221
1222 void FAR PASCAL WriteIniFile(PCHAR FName, PTTSet ts)
1223 {
1224 int i;
1225 char Temp[MAXPATHLEN];
1226 char buf[20];
1227
1228 /* version */
1229 WritePrivateProfileString(Section, "Version", "2.3", FName);
1230
1231 /* Language */
1232 if (ts->Language == IdJapanese)
1233 strncpy_s(Temp, sizeof(Temp), "Japanese", _TRUNCATE);
1234 else if (ts->Language == IdRussian)
1235 strncpy_s(Temp, sizeof(Temp), "Russian", _TRUNCATE);
1236 else if (ts->Language == IdKorean) //HKS
1237 strncpy_s(Temp, sizeof(Temp), "Korean", _TRUNCATE);
1238 else
1239 strncpy_s(Temp, sizeof(Temp), "English", _TRUNCATE);
1240 WritePrivateProfileString(Section, "Language", Temp, FName);
1241
1242 /* Port type */
1243 if (ts->PortType == IdSerial)
1244 strncpy_s(Temp, sizeof(Temp), "serial", _TRUNCATE);
1245 else /* IdFile -> IdTCPIP */
1246 strncpy_s(Temp, sizeof(Temp), "tcpip", _TRUNCATE);
1247
1248 WritePrivateProfileString(Section, "Port", Temp, FName);
1249
1250 /* Save win position */
1251 if (ts->SaveVTWinPos) {
1252 /* VT win position */
1253 WriteInt2(Section, "VTPos", FName, ts->VTPos.x, ts->VTPos.y);
1254 }
1255
1256 /* VT terminal size */
1257 WriteInt2(Section, "TerminalSize", FName,
1258 ts->TerminalWidth, ts->TerminalHeight);
1259
1260 /* Terminal size = Window size */
1261 WriteOnOff(Section, "TermIsWin", FName, ts->TermIsWin);
1262
1263 /* Auto window resize flag */
1264 WriteOnOff(Section, "AutoWinResize", FName, ts->AutoWinResize);
1265
1266 /* CR Receive */
1267 if (ts->CRReceive == IdCRLF) {
1268 strncpy_s(Temp, sizeof(Temp), "CRLF", _TRUNCATE);
1269 }
1270 else if (ts->CRReceive == IdLF) {
1271 strncpy_s(Temp, sizeof(Temp), "LF", _TRUNCATE);
1272 }
1273 else {
1274 strncpy_s(Temp, sizeof(Temp), "CR", _TRUNCATE);
1275 }
1276 WritePrivateProfileString(Section, "CRReceive", Temp, FName);
1277
1278 /* CR Send */
1279 if (ts->CRSend == IdCRLF)
1280 strncpy_s(Temp, sizeof(Temp), "CRLF", _TRUNCATE);
1281 else
1282 strncpy_s(Temp, sizeof(Temp), "CR", _TRUNCATE);
1283 WritePrivateProfileString(Section, "CRSend", Temp, FName);
1284
1285 /* Local echo */
1286 WriteOnOff(Section, "LocalEcho", FName, ts->LocalEcho);
1287
1288 /* Answerback */
1289 if ((ts->FTFlag & FT_BPAUTO) == 0) {
1290 Str2Hex(ts->Answerback, Temp, ts->AnswerbackLen,
1291 sizeof(Temp) - 1, TRUE);
1292 WritePrivateProfileString(Section, "Answerback", Temp, FName);
1293 }
1294
1295 /* Kanji Code (receive) */
1296 switch (ts->KanjiCode) {
1297 case IdEUC:
1298 strncpy_s(Temp, sizeof(Temp), "EUC", _TRUNCATE);
1299 break;
1300 case IdJIS:
1301 strncpy_s(Temp, sizeof(Temp), "JIS", _TRUNCATE);
1302 break;
1303 case IdUTF8:
1304 strncpy_s(Temp, sizeof(Temp), "UTF-8", _TRUNCATE);
1305 break;
1306 case IdUTF8m:
1307 strncpy_s(Temp, sizeof(Temp), "UTF-8m", _TRUNCATE);
1308 break;
1309 default:
1310 strncpy_s(Temp, sizeof(Temp), "SJIS", _TRUNCATE);
1311 }
1312 WritePrivateProfileString(Section, "KanjiReceive", Temp, FName);
1313
1314 /* Katakana (receive) */
1315 if (ts->JIS7Katakana == 1)
1316 strncpy_s(Temp, sizeof(Temp), "7", _TRUNCATE);
1317 else
1318 strncpy_s(Temp, sizeof(Temp), "8", _TRUNCATE);
1319
1320 WritePrivateProfileString(Section, "KatakanaReceive", Temp, FName);
1321
1322 /* Kanji Code (transmit) */
1323 switch (ts->KanjiCodeSend) {
1324 case IdEUC:
1325 strncpy_s(Temp, sizeof(Temp), "EUC", _TRUNCATE);
1326 break;
1327 case IdJIS:
1328 strncpy_s(Temp, sizeof(Temp), "JIS", _TRUNCATE);
1329 break;
1330 case IdUTF8:
1331 strncpy_s(Temp, sizeof(Temp), "UTF-8", _TRUNCATE);
1332 break;
1333 default:
1334 strncpy_s(Temp, sizeof(Temp), "SJIS", _TRUNCATE);
1335 }
1336 WritePrivateProfileString(Section, "KanjiSend", Temp, FName);
1337
1338 /* Katakana (transmit) */
1339 if (ts->JIS7KatakanaSend == 1)
1340 strncpy_s(Temp, sizeof(Temp), "7", _TRUNCATE);
1341 else
1342 strncpy_s(Temp, sizeof(Temp), "8", _TRUNCATE);
1343
1344 WritePrivateProfileString(Section, "KatakanaSend", Temp, FName);
1345
1346 /* KanjiIn */
1347 if (ts->KanjiIn == IdKanjiInA)
1348 strncpy_s(Temp, sizeof(Temp), "@", _TRUNCATE);
1349 else
1350 strncpy_s(Temp, sizeof(Temp), "B", _TRUNCATE);
1351
1352 WritePrivateProfileString(Section, "KanjiIn", Temp, FName);
1353
1354 /* KanjiOut */
1355 switch (ts->KanjiOut) {
1356 case IdKanjiOutB:
1357 strncpy_s(Temp, sizeof(Temp), "B", _TRUNCATE);
1358 break;
1359 case IdKanjiOutH:
1360 strncpy_s(Temp, sizeof(Temp), "H", _TRUNCATE);
1361 break;
1362 default:
1363 strncpy_s(Temp, sizeof(Temp), "J", _TRUNCATE);
1364 }
1365 WritePrivateProfileString(Section, "KanjiOut", Temp, FName);
1366
1367 // new configuration
1368 WriteInt(Section, "ConnectingTimeout", FName, ts->ConnectingTimeout);
1369
1370 WriteOnOff(Section, "DisablePasteMouseRButton", FName,
1371 ts->DisablePasteMouseRButton);
1372
1373 // added DisablePasteMouseMButton (2008.3.2 maya)
1374 WriteOnOff(Section, "DisablePasteMouseMButton", FName,
1375 ts->DisablePasteMouseMButton);
1376
1377 // added ConfirmPasteMouseRButton (2007.3.17 maya)
1378 WriteOnOff(Section, "ConfirmPasteMouseRButton", FName,
1379 ts->ConfirmPasteMouseRButton);
1380
1381 // added ConfirmChangePaste
1382 WriteOnOff(Section, "ConfirmChangePaste", FName,
1383 ts->ConfirmChangePaste);
1384
1385 // added ScrollWindowClearScreen
1386 WriteOnOff(Section, "ScrollWindowClearScreen", FName,
1387 ts->ScrollWindowClearScreen);
1388
1389 // added SelectOnlyByLButton (2007.11.20 maya)
1390 WriteOnOff(Section, "SelectOnlyByLButton", FName,
1391 ts->SelectOnlyByLButton);
1392 // added DisableAcceleratorSendBreak (2007.3.17 maya)
1393 WriteOnOff(Section, "DisableAcceleratorSendBreak", FName,
1394 ts->DisableAcceleratorSendBreak);
1395 WriteOnOff(Section, "EnableContinuedLineCopy", FName,
1396 ts->EnableContinuedLineCopy);
1397 WritePrivateProfileString(Section, "MouseCursor", ts->MouseCursorName,
1398 FName);
1399 _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d", ts->AlphaBlend);
1400 WritePrivateProfileString(Section, "AlphaBlend", Temp, FName);
1401 WritePrivateProfileString(Section, "CygwinDirectory",
1402 ts->CygwinDirectory, FName);
1403 WritePrivateProfileString(Section, "ViewlogEditor", ts->ViewlogEditor,
1404 FName);
1405 WritePrivateProfileString(Section, "Locale", ts->Locale, FName);
1406 _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d", ts->CodePage);
1407 WritePrivateProfileString(Section, "CodePage", Temp, FName);
1408
1409 // ANSI color(2004.9.5 yutaka)
1410 Temp[0] = '\0';
1411 for (i = 0; i < 15; i++) {
1412 _snprintf_s(buf, sizeof(buf), _TRUNCATE, "%d,%d,%d,%d, ",
1413 i,
1414 GetRValue(ts->ANSIColor[i]),
1415 GetGValue(ts->ANSIColor[i]),
1416 GetBValue(ts->ANSIColor[i])
1417 );
1418 strncat_s(Temp, sizeof(Temp), buf, _TRUNCATE);
1419 }
1420 i = 15;
1421 _snprintf_s(buf, sizeof(buf), _TRUNCATE, "%d,%d,%d,%d",
1422 i,
1423 GetRValue(ts->ANSIColor[i]),
1424 GetGValue(ts->ANSIColor[i]),
1425 GetBValue(ts->ANSIColor[i])
1426 );
1427 strncat_s(Temp, sizeof(Temp), buf, _TRUNCATE);
1428 WritePrivateProfileString(Section, "ANSIColor", Temp, FName);
1429
1430 /* AutoWinChange VT<->TEK */
1431 WriteOnOff(Section, "AutoWinSwitch", FName, ts->AutoWinSwitch);
1432
1433 /* Terminal ID */
1434 id2str(TermList, ts->TerminalID, IdVT100, Temp, sizeof(Temp));
1435 WritePrivateProfileString(Section, "TerminalID", Temp, FName);
1436
1437 /* Russian character set (host) */
1438 id2str(RussList, ts->RussHost, IdKOI8, Temp, sizeof(Temp));
1439 WritePrivateProfileString(Section, "RussHost", Temp, FName);
1440
1441 /* Russian character set (client) */
1442 id2str(RussList, ts->RussClient, IdWindows, Temp, sizeof(Temp));
1443 WritePrivateProfileString(Section, "RussClient", Temp, FName);
1444
1445 /* Title text */
1446 WritePrivateProfileString(Section, "Title", ts->Title, FName);
1447
1448 /* Cursor shape */
1449 switch (ts->CursorShape) {
1450 case IdVCur:
1451 strncpy_s(Temp, sizeof(Temp), "vertical", _TRUNCATE);
1452 break;
1453 case IdHCur:
1454 strncpy_s(Temp, sizeof(Temp), "horizontal", _TRUNCATE);
1455 break;
1456 default:
1457 strncpy_s(Temp, sizeof(Temp), "block", _TRUNCATE);
1458 }
1459 WritePrivateProfileString(Section, "CursorShape", Temp, FName);
1460
1461 /* Hide title */
1462 WriteOnOff(Section, "HideTitle", FName, ts->HideTitle);
1463
1464 /* Popup menu */
1465 WriteOnOff(Section, "PopupMenu", FName, ts->PopupMenu);
1466
1467 /* PC-Style bold color mapping */
1468 WriteOnOff(Section, "PcBoldColor", FName,
1469 (WORD) (ts->ColorFlag & CF_PCBOLD16));
1470
1471 /* aixterm 16 colors mode */
1472 WriteOnOff(Section, "Aixterm16Color", FName,
1473 (WORD) (ts->ColorFlag & CF_AIXTERM16));
1474
1475 /* xterm 256 colors mode */
1476 WriteOnOff(Section, "Xterm256Color", FName,
1477 (WORD) (ts->ColorFlag & CF_XTERM256));
1478
1479 /* Enable scroll buffer */
1480 WriteOnOff(Section, "EnableScrollBuff", FName, ts->EnableScrollBuff);
1481
1482 /* Scroll buffer size */
1483 WriteInt(Section, "ScrollBuffSize", FName, ts->ScrollBuffSize);
1484
1485 /* VT Color */
1486 for (i = 0; i <= 1; i++) {
1487 ts->TmpColor[0][i * 3] = GetRValue(ts->VTColor[i]);
1488 ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTColor[i]);
1489 ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTColor[i]);
1490 }
1491 WriteInt6(Section, "VTColor", FName,
1492 ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1493 ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1494
1495 /* VT bold color */
1496 for (i = 0; i <= 1; i++) {
1497 ts->TmpColor[0][i * 3] = GetRValue(ts->VTBoldColor[i]);
1498 ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTBoldColor[i]);
1499 ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTBoldColor[i]);
1500 }
1501 WriteInt6(Section, "VTBoldColor", FName,
1502 ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1503 ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1504
1505 /* VT blink color */
1506 for (i = 0; i <= 1; i++) {
1507 ts->TmpColor[0][i * 3] = GetRValue(ts->VTBlinkColor[i]);
1508 ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTBlinkColor[i]);
1509 ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTBlinkColor[i]);
1510 }
1511 WriteInt6(Section, "VTBlinkColor", FName,
1512 ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1513 ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1514
1515 /* start - ishizaki */
1516 WriteOnOff(Section, "EnableClickableUrl", FName,
1517 ts->EnableClickableUrl);
1518
1519 /* URL color */
1520 for (i = 0; i <= 1; i++) {
1521 ts->TmpColor[0][i * 3] = GetRValue(ts->URLColor[i]);
1522 ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->URLColor[i]);
1523 ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->URLColor[i]);
1524 }
1525 WriteInt6(Section, "URLColor", FName,
1526 ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1527 ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1528 /* end - ishizaki */
1529
1530 /* TEK Color */
1531 for (i = 0; i <= 1; i++) {
1532 ts->TmpColor[0][i * 3] = GetRValue(ts->TEKColor[i]);
1533 ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->TEKColor[i]);
1534 ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->TEKColor[i]);
1535 }
1536 WriteInt6(Section, "TEKColor", FName,
1537 ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1538 ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1539
1540 /* TEK color emulation */
1541 WriteOnOff(Section, "TEKColorEmulation", FName, ts->TEKColorEmu);
1542
1543 /* VT Font */
1544 WriteFont(Section, "VTFont", FName,
1545 ts->VTFont, ts->VTFontSize.x, ts->VTFontSize.y,
1546 ts->VTFontCharSet);
1547
1548 /* Enable bold font flag */
1549 WriteOnOff(Section, "EnableBold", FName, ts->EnableBold);
1550
1551 /* Russian character set (font) */
1552 id2str(RussList, ts->RussFont, IdWindows, Temp, sizeof(Temp));
1553 WritePrivateProfileString(Section, "RussFont", Temp, FName);
1554
1555 /* TEK Font */
1556 WriteFont(Section, "TEKFont", FName,
1557 ts->TEKFont, ts->TEKFontSize.x, ts->TEKFontSize.y,
1558 ts->TEKFontCharSet);
1559
1560 /* BS key */
1561 if (ts->BSKey == IdDEL)
1562 strncpy_s(Temp, sizeof(Temp), "DEL", _TRUNCATE);
1563 else
1564 strncpy_s(Temp, sizeof(Temp), "BS", _TRUNCATE);
1565 WritePrivateProfileString(Section, "BSKey", Temp, FName);
1566
1567 /* Delete key */
1568 WriteOnOff(Section, "DeleteKey", FName, ts->DelKey);
1569
1570 /* Meta key */
1571 WriteOnOff(Section, "MetaKey", FName, ts->MetaKey);
1572
1573 /* Application Keypad */
1574 WriteOnOff(Section, "DisableAppKeypad", FName, ts->DisableAppKeypad);
1575
1576 /* Application Cursor */
1577 WriteOnOff(Section, "DisableAppCursor", FName, ts->DisableAppCursor);
1578
1579 /* Russian keyboard type */
1580 id2str(RussList2, ts->RussKeyb, IdWindows, Temp, sizeof(Temp));
1581 WritePrivateProfileString(Section, "RussKeyb", Temp, FName);
1582
1583 /* Serial port ID */
1584 _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d", ts->ComPort);
1585 WritePrivateProfileString(Section, "ComPort", Temp, FName);
1586
1587 /* Baud rate */
1588 id2str(BaudList, ts->Baud, IdBaud9600, Temp, sizeof(Temp));
1589 WritePrivateProfileString(Section, "BaudRate", Temp, FName);
1590
1591 /* Parity */
1592 switch (ts->Parity) {
1593 case IdParityEven:
1594 strncpy_s(Temp, sizeof(Temp), "even", _TRUNCATE);
1595 break;
1596 case IdParityOdd:
1597 strncpy_s(Temp, sizeof(Temp), "odd", _TRUNCATE);
1598 break;
1599 default:
1600 strncpy_s(Temp, sizeof(Temp), "none", _TRUNCATE);
1601 }
1602 WritePrivateProfileString(Section, "Parity", Temp, FName);
1603
1604 /* Data bit */
1605 if (ts->DataBit == IdDataBit7)
1606 strncpy_s(Temp, sizeof(Temp), "7", _TRUNCATE);
1607 else
1608 strncpy_s(Temp, sizeof(Temp), "8", _TRUNCATE);
1609
1610 WritePrivateProfileString(Section, "DataBit", Temp, FName);
1611
1612 /* Stop bit */
1613 if (ts->StopBit == IdStopBit2)
1614 strncpy_s(Temp, sizeof(Temp), "2", _TRUNCATE);
1615 else
1616 strncpy_s(Temp, sizeof(Temp), "1", _TRUNCATE);
1617
1618 WritePrivateProfileString(Section, "StopBit", Temp, FName);
1619
1620 /* Flow control */
1621 switch (ts->Flow) {
1622 case IdFlowX:
1623 strncpy_s(Temp, sizeof(Temp), "x", _TRUNCATE);
1624 break;
1625 case IdFlowHard:
1626 strncpy_s(Temp, sizeof(Temp), "hard", _TRUNCATE);
1627 break;
1628 default:
1629 strncpy_s(Temp, sizeof(Temp), "none", _TRUNCATE);
1630 }
1631 WritePrivateProfileString(Section, "FlowCtrl", Temp, FName);
1632
1633 /* Delay per character */
1634 WriteInt(Section, "DelayPerChar", FName, ts->DelayPerChar);
1635
1636 /* Delay per line */
1637 WriteInt(Section, "DelayPerLine", FName, ts->DelayPerLine);
1638
1639 /* Telnet flag */
1640 WriteOnOff(Section, "Telnet", FName, ts->Telnet);
1641
1642 /* Telnet terminal type */
1643 WritePrivateProfileString(Section, "TermType", ts->TermType, FName);
1644
1645 /* TCP port num for non-telnet */
1646 WriteUint(Section, "TCPPort", FName, ts->TCPPort);
1647
1648 /* Auto close flag */
1649 WriteOnOff(Section, "AutoWinClose", FName, ts->AutoWinClose);
1650
1651 /* History list */
1652 WriteOnOff(Section, "Historylist", FName, ts->HistoryList);
1653
1654 /* File transfer binary flag */
1655 WriteOnOff(Section, "TransBin", FName, ts->TransBin);
1656
1657 /* Log append */
1658 WriteOnOff(Section, "LogAppend", FName, ts->Append);
1659
1660 /* File transfer binary flag */
1661 WriteOnOff(Section, "LogTypePlainText", FName, ts->LogTypePlainText);
1662
1663 /* Log with timestamp (2006.7.23 maya) */
1664 WriteOnOff(Section, "LogTimestamp", FName, ts->LogTimestamp);
1665
1666 /* Log without transfer dialog */
1667 WriteOnOff(Section, "LogHideDialog", FName, ts->LogHideDialog);
1668
1669 /* Default Log file name (2006.8.28 maya) */
1670 WritePrivateProfileString(Section, "LogDefaultName",
1671 ts->LogDefaultName, FName);
1672
1673 /* Default Log file path (2007.5.30 maya) */
1674 WritePrivateProfileString(Section, "LogDefaultPath",
1675 ts->LogDefaultPath, FName);
1676
1677 /* Auto start logging (2007.5.31 maya) */
1678 WriteOnOff(Section, "LogAutoStart", FName, ts->LogAutoStart);
1679
1680 /* XMODEM option */
1681 switch (ts->XmodemOpt) {
1682 case XoptCRC:
1683 strncpy_s(Temp, sizeof(Temp), "crc", _TRUNCATE);
1684 break;
1685 case Xopt1K:
1686 strncpy_s(Temp, sizeof(Temp), "1k", _TRUNCATE);
1687 break;
1688 default:
1689 strncpy_s(Temp, sizeof(Temp), "checksum", _TRUNCATE);
1690 }
1691 WritePrivateProfileString(Section, "XmodemOpt", Temp, FName);
1692
1693 /* XMODEM binary flag */
1694 WriteOnOff(Section, "XmodemBin", FName, ts->XmodemBin);
1695
1696 /* XMODEM ���M�R�}���h (2007.12.21 yutaka) */
1697 WritePrivateProfileString(Section, "XmodemRcvCommand",
1698 ts->XModemRcvCommand, FName);
1699
1700 /* Default directory for file transfer */
1701 WritePrivateProfileString(Section, "FileDir", ts->FileDir, FName);
1702
1703 /* filter on file send (2007.6.5 maya) */
1704 WritePrivateProfileString(Section, "FileSendFilter",
1705 ts->FileSendFilter, FName);
1706
1707 /*------------------------------------------------------------------*/
1708 /* 8 bit control code flag -- special option */
1709 WriteOnOff(Section, "Accept8BitCtrl", FName,
1710 (WORD) (ts->TermFlag & TF_ACCEPT8BITCTRL));
1711
1712 /* Wrong sequence flag -- special option */
1713 WriteOnOff(Section, "AllowWrongSequence", FName,
1714 (WORD) (ts->TermFlag & TF_ALLOWWRONGSEQUENCE));
1715
1716 /* Auto file renaming --- special option */
1717 WriteOnOff(Section, "AutoFileRename", FName,
1718 (WORD) (ts->FTFlag & FT_RENAME));
1719
1720 /* Auto text copy --- special option */
1721 WriteOnOff(Section, "AutoTextCopy", FName, ts->AutoTextCopy);
1722
1723 /* Back wrap -- special option */
1724 WriteOnOff(Section, "BackWrap", FName,
1725 (WORD) (ts->TermFlag & TF_BACKWRAP));
1726
1727 /* Beep type -- special option */
1728 WriteOnOff(Section, "Beep", FName, ts->Beep);
1729 switch (ts->Beep) {
1730 case IdBeepOff:
1731 WritePrivateProfileString(Section, "Beep", "Off", FName);
1732 break;
1733 case IdBeepOn:
1734 WritePrivateProfileString(Section, "Beep", "On", FName);
1735 break;
1736 case IdBeepVisual:
1737 WritePrivateProfileString(Section, "Beep", "Visual", FName);
1738 break;
1739 }
1740
1741 /* Beep on connection & disconnection -- special option */
1742 WriteOnOff(Section, "BeepOnConnect", FName,
1743 (WORD) (ts->PortFlag & PF_BEEPONCONNECT));
1744
1745 /* Auto B-Plus activation -- special option */
1746 WriteOnOff(Section, "BPAuto", FName, (WORD) (ts->FTFlag & FT_BPAUTO));
1747
1748 /* B-Plus ESCCTL flag -- special option */
1749 WriteOnOff(Section, "BPEscCtl", FName,
1750 (WORD) (ts->FTFlag & FT_BPESCCTL));
1751
1752 /* B-Plus log -- special option */
1753 WriteOnOff(Section, "BPLog", FName, (WORD) (ts->LogFlag & LOG_BP));
1754
1755 /* Clear serial port buffer when port opening -- special option */
1756 WriteOnOff(Section, "ClearComBuffOnOpen", FName, ts->ClearComBuffOnOpen);
1757
1758 /* Confirm disconnection -- special option */
1759 WriteOnOff(Section, "ConfirmDisconnect", FName,
1760 (WORD) (ts->PortFlag & PF_CONFIRMDISCONN));
1761
1762 /* Ctrl code in Kanji -- special option */
1763 WriteOnOff(Section, "CtrlInKanji", FName,
1764 (WORD) (ts->TermFlag & TF_CTRLINKANJI));
1765
1766 /* Debug flag -- special option */
1767 WriteOnOff(Section, "Debug", FName, ts->Debug);
1768
1769 /* Delimiter list -- special option */
1770 Str2Hex(ts->DelimList, Temp, strlen(ts->DelimList),
1771 sizeof(Temp) - 1, TRUE);
1772 WritePrivateProfileString(Section, "DelimList", Temp, FName);
1773
1774 /* regard DBCS characters as delimiters -- special option */
1775 WriteOnOff(Section, "DelimDBCS", FName, ts->DelimDBCS);
1776
1777 // Enable popup menu -- special option
1778 if ((ts->MenuFlag & MF_NOPOPUP) == 0)
1779 WriteOnOff(Section, "EnablePopupMenu", FName, 1);
1780 else
1781 WriteOnOff(Section, "EnablePopupMenu", FName, 0);
1782
1783 // Enable "Show menu" -- special option
1784 if ((ts->MenuFlag & MF_NOSHOWMENU) == 0)
1785 WriteOnOff(Section, "EnableShowMenu", FName, 1);
1786 else
1787 WriteOnOff(Section, "EnableShowMenu", FName, 0);
1788
1789 /* Enable the status line -- special option */
1790 WriteOnOff(Section, "EnableStatusLine", FName,
1791 (WORD) (ts->TermFlag & TF_ENABLESLINE));
1792
1793 /* IME Flag -- special option */
1794 WriteOnOff(Section, "IME", FName, ts->UseIME);
1795
1796 /* IME-inline Flag -- special option */
1797 WriteOnOff(Section, "IMEInline", FName, ts->IMEInline);
1798
1799 /* Kermit log -- special option */
1800 WriteOnOff(Section, "KmtLog", FName, (WORD) (ts->LogFlag & LOG_KMT));
1801
1802 // Enable language selection -- special option
1803 if ((ts->MenuFlag & MF_NOLANGUAGE) == 0)
1804 WriteOnOff(Section, "LanguageSelection", FName, 1);
1805 else
1806 WriteOnOff(Section, "LanguageSelection", FName, 0);
1807
1808 /* Maximum scroll buffer size -- special option */
1809 WriteInt(Section, "MaxBuffSize", FName, ts->ScrollBuffMax);
1810
1811 /* Max com port number -- special option */
1812 WriteInt(Section, "MaxComPort", FName, ts->MaxComPort);
1813
1814 /* Non-blinking cursor -- special option */
1815 WriteOnOff(Section, "NonblinkingCursor", FName, ts->NonblinkingCursor);
1816
1817 WriteOnOff(Section, "KillFocusCursor", FName, ts->KillFocusCursor);
1818
1819 /* Delay for pass-thru printing activation */
1820 /* -- special option */
1821 WriteUint(Section, "PassThruDelay", FName, ts->PassThruDelay);
1822
1823 /* Printer port for pass-thru printing */
1824 /* -- special option */
1825 WritePrivateProfileString(Section, "PassThruPort", ts->PrnDev, FName);
1826
1827 /* Printer Font --- special option */
1828 WriteFont(Section, "PrnFont", FName,
1829 ts->PrnFont, ts->PrnFontSize.x, ts->PrnFontSize.y,
1830 ts->PrnFontCharSet);
1831
1832 // Page margins (left, right, top, bottom) for printing
1833 // -- special option
1834 WriteInt4(Section, "PrnMargin", FName,
1835 ts->PrnMargin[0], ts->PrnMargin[1],
1836 ts->PrnMargin[2], ts->PrnMargin[3]);
1837
1838 /* Quick-VAN log -- special option */
1839 WriteOnOff(Section, "QVLog", FName, (WORD) (ts->LogFlag & LOG_QV));
1840
1841 /* Quick-VAN window size -- special */
1842 WriteInt(Section, "QVWinSize", FName, ts->QVWinSize);
1843
1844 /* Russian character set (print) -- special option */
1845 id2str(RussList, ts->RussPrint, IdWindows, Temp, sizeof(Temp));
1846 WritePrivateProfileString(Section, "RussPrint", Temp, FName);
1847
1848 /* Scroll threshold -- special option */
1849 WriteInt(Section, "ScrollThreshold", FName, ts->ScrollThreshold);
1850
1851 WriteInt(Section, "MouseWheelScrollLine", FName, ts->MouseWheelScrollLine);
1852
1853 // Select on activate -- special option
1854 WriteOnOff(Section, "SelectOnActivate", FName, ts->SelOnActive);
1855
1856 /* Send 8bit control sequence -- special option */
1857 WriteOnOff(Section, "Send8BitCtrl", FName, ts->Send8BitCtrl);
1858
1859 /* Startup macro -- special option */
1860 WritePrivateProfileString(Section, "StartupMacro", ts->MacroFN, FName);
1861
1862 /* TEK GIN Mouse keycode -- special option */
1863 WriteInt(Section, "TEKGINMouseCode", FName, ts->GINMouseCode);
1864
1865 /* Telnet Auto Detect -- special option */
1866 WriteOnOff(Section, "TelAutoDetect", FName, ts->TelAutoDetect);
1867
1868 /* Telnet binary flag -- special option */
1869 WriteOnOff(Section, "TelBin", FName, ts->TelBin);
1870
1871 /* Telnet Echo flag -- special option */
1872 WriteOnOff(Section, "TelEcho", FName, ts->TelEcho);
1873
1874 /* Telnet log -- special option */
1875 WriteOnOff(Section, "TelLog", FName, (WORD) (ts->LogFlag & LOG_TEL));
1876
1877 /* TCP port num for telnet -- special option */
1878 WriteUint(Section, "TelPort", FName, ts->TelPort);
1879
1880 /* Telnet keep-alive packet(NOP command) interval -- special option */
1881 WriteUint(Section, "TelKeepAliveInterval", FName,
1882 ts->TelKeepAliveInterval);
1883
1884 /* Max number of broadcast commad history */
1885 WriteUint(Section, "MaxBroadcatHistory", FName,
1886 ts->MaxBroadcatHistory);
1887
1888 /* Local echo for non-telnet */
1889 WriteOnOff(Section, "TCPLocalEcho", FName, ts->TCPLocalEcho);
1890
1891 /* "new-line (transmit)" option for non-telnet -- special option */
1892 if (ts->TCPCRSend == IdCRLF)
1893 strncpy_s(Temp, sizeof(Temp), "CRLF", _TRUNCATE);
1894 else if (ts->TCPCRSend == IdCR)
1895 strncpy_s(Temp, sizeof(Temp), "CR", _TRUNCATE);
1896 else
1897 Temp[0] = 0;
1898 WritePrivateProfileString(Section, "TCPCRSend", Temp, FName);
1899
1900 /* Use text (background) color for "white (black)"
1901 --- special option */
1902 WriteOnOff(Section, "UseTextColor", FName,
1903 (WORD) (ts->ColorFlag & CF_USETEXTCOLOR));
1904
1905 /* Title format -- special option */
1906 WriteUint(Section, "TitleFormat", FName, ts->TitleFormat);
1907
1908 /* VT Compatible Tab -- special option */
1909 WriteOnOff(Section, "VTCompatTab", FName, ts->VTCompatTab);
1910
1911 /* VT Font space --- special option */
1912 WriteInt4(Section, "VTFontSpace", FName,
1913 ts->FontDX, ts->FontDW - ts->FontDX,
1914 ts->FontDY, ts->FontDH - ts->FontDY);
1915
1916 // VT-print scaling factors (pixels per inch) --- special option
1917 WriteInt2(Section, "VTPPI", FName, ts->VTPPI.x, ts->VTPPI.y);
1918
1919 // TEK-print scaling factors (pixels per inch) --- special option
1920 WriteInt2(Section, "TEKPPI", FName, ts->TEKPPI.x, ts->TEKPPI.y);
1921
1922 // Show "Window" menu -- special option
1923 WriteOnOff(Section, "WindowMenu", FName,
1924 (WORD) (ts->MenuFlag & MF_SHOWWINMENU));
1925
1926 /* XMODEM log -- special option */
1927 WriteOnOff(Section, "XmodemLog", FName, (WORD) (ts->LogFlag & LOG_X));
1928
1929 /* YMODEM log -- special option */
1930 WriteOnOff(Section, "YmodemLog", FName, (WORD) (ts->LogFlag & LOG_Y));
1931
1932 /* Auto ZMODEM activation -- special option */
1933 WriteOnOff(Section, "ZmodemAuto", FName,
1934 (WORD) (ts->FTFlag & FT_ZAUTO));
1935
1936 /* ZMODEM data subpacket length for sending -- special */
1937 WriteInt(Section, "ZmodemDataLen", FName, ts->ZmodemDataLen);
1938 /* ZMODEM window size for sending -- special */
1939 WriteInt(Section, "ZmodemWinSize", FName, ts->ZmodemWinSize);
1940
1941 /* ZMODEM ESCCTL flag -- special option */
1942 WriteOnOff(Section, "ZmodemEscCtl", FName,
1943 (WORD) (ts->FTFlag & FT_ZESCCTL));
1944
1945 /* ZMODEM log -- special option */
1946 WriteOnOff(Section, "ZmodemLog", FName, (WORD) (ts->LogFlag & LOG_Z));
1947
1948 /* ZMODEM ���M�R�}���h (2007.12.21 yutaka) */
1949 WritePrivateProfileString(Section, "ZmodemRcvCommand", ts->ZModemRcvCommand, FName);
1950
1951 /* update file */
1952 WritePrivateProfileString(NULL, NULL, NULL, FName);
1953
1954 // Eterm lookfeel alphablend (2005.4.24 yutaka)
1955 #define ETERM_SECTION "BG"
1956 WriteOnOff(ETERM_SECTION, "BGEnable", FName,
1957 ts->EtermLookfeel.BGEnable);
1958 WriteOnOff(ETERM_SECTION, "BGUseAlphaBlendAPI", FName,
1959 ts->EtermLookfeel.BGUseAlphaBlendAPI);
1960 WritePrivateProfileString(ETERM_SECTION, "BGSPIPath",
1961 ts->EtermLookfeel.BGSPIPath, FName);
1962 WriteOnOff(ETERM_SECTION, "BGFastSizeMove", FName,
1963 ts->EtermLookfeel.BGFastSizeMove);
1964 WriteOnOff(ETERM_SECTION, "BGFlickerlessMove", FName,
1965 ts->EtermLookfeel.BGNoCopyBits);
1966 WriteOnOff(ETERM_SECTION, "BGNoFrame", FName,
1967 ts->EtermLookfeel.BGNoFrame);
1968 WritePrivateProfileString(ETERM_SECTION, "BGThemeFile",
1969 ts->EtermLookfeel.BGThemeFile, FName);
1970
1971 #ifdef USE_NORMAL_BGCOLOR
1972 // UseNormalBGColor
1973 WriteOnOff(Section, "UseNormalBGColor", FName, ts->UseNormalBGColor);
1974 #endif
1975
1976 // UI language message file
1977 WritePrivateProfileString(Section, "UILanguageFile",
1978 ts->UILanguageFile_ini, FName);
1979
1980 // Broadcast Command History (2007.3.3 maya)
1981 WriteOnOff(Section, "BroadcastCommandHistory", FName,
1982 ts->BroadcastCommandHistory);
1983
1984 // 337: 2007/03/20 Accept Broadcast
1985 WriteOnOff(Section, "AcceptBroadcast", FName, ts->AcceptBroadcast);
1986
1987 // Confirm send a file when drag and drop (2007.12.28 maya)
1988 WriteOnOff(Section, "ConfirmFileDragAndDrop", FName,
1989 ts->ConfirmFileDragAndDrop);
1990
1991 // Translate mouse wheel to cursor key when application cursor mode
1992 WriteOnOff(Section, "TranslateWheelToCursor", FName,
1993 ts->TranslateWheelToCursor);
1994
1995 // Display "New Connection" dialog on startup (2008.1.18 maya)
1996 WriteOnOff(Section, "HostDialogOnStartup", FName,
1997 ts->HostDialogOnStartup);
1998
1999 // Mouse event tracking
2000 WriteOnOff(Section, "MouseEventTracking", FName,
2001 ts->MouseEventTracking);
2002
2003 // Maximized bug tweak
2004 WriteOnOff(Section, "MaximizedBugTweak", FName, ts->MaximizedBugTweak);
2005
2006 // Convert Unicode symbol characters to DEC Special characters
2007 WriteUint(Section, "UnicodeToDecSpMapping", FName, ts->UnicodeDecSpMapping);
2008
2009 // VT Window Icon
2010 IconId2IconName(Temp, sizeof(Temp), ts->VTIcon);
2011 WritePrivateProfileString(Section, "VTIcon", Temp, FName);
2012
2013 // Tek Window Icon
2014 IconId2IconName(Temp, sizeof(Temp), ts->TEKIcon);
2015 WritePrivateProfileString(Section, "TEKIcon", Temp, FName);
2016
2017 // AutoScrollOnlyInBottomLine
2018 WriteOnOff(Section, "AutoScrollOnlyInBottomLine", FName,
2019 ts->AutoScrollOnlyInBottomLine);
2020
2021 // Unknown Unicode Character
2022 WriteOnOff(Section, "UnknownUnicodeCharacterAsWide", FName,
2023 ts->UnknownUnicodeCharaAsWide);
2024
2025 // Accept remote-controlled window title changing
2026 if (ts->AcceptTitleChangeRequest == IdTitleChangeRequestOff)
2027 strncpy_s(Temp, sizeof(Temp), "off", _TRUNCATE);
2028 else if (ts->AcceptTitleChangeRequest == IdTitleChangeRequestOverwrite)
2029 strncpy_s(Temp, sizeof(Temp), "overwrite", _TRUNCATE);
2030 else if (ts->AcceptTitleChangeRequest == IdTitleChangeRequestAhead)
2031 strncpy_s(Temp, sizeof(Temp), "ahead", _TRUNCATE);
2032 else if (ts->AcceptTitleChangeRequest == IdTitleChangeRequestLast)
2033 strncpy_s(Temp, sizeof(Temp), "last", _TRUNCATE);
2034 else
2035 Temp[0] = 0;
2036 WritePrivateProfileString(Section, "AcceptTitleChangeRequest", Temp, FName);
2037
2038 // Size of paste confirm dialog
2039 WriteInt2(Section, "PasteDialogSize", FName,
2040 ts->PasteDialogSize.cx, ts->PasteDialogSize.cy);
2041 }
2042
2043 #define VTEditor "VT editor keypad"
2044 #define VTNumeric "VT numeric keypad"
2045 #define VTFunction "VT function keys"
2046 #define XFunction "X function keys"
2047 #define ShortCut "Shortcut keys"
2048
2049 void GetInt(PKeyMap KeyMap, int KeyId, PCHAR Sect, PCHAR Key, PCHAR FName)
2050 {
2051 char Temp[11];
2052 WORD Num;
2053
2054 GetPrivateProfileString(Sect, Key, "", Temp, sizeof(Temp), FName);
2055 if (Temp[0] == 0)
2056 Num = 0xFFFF;
2057 else if (_stricmp(Temp, "off") == 0)
2058 Num = 0xFFFF;
2059 else if (sscanf(Temp, "%d", &Num) != 1)
2060 Num = 0xFFFF;
2061
2062 KeyMap->Map[KeyId - 1] = Num;
2063 }
2064
2065 void FAR PASCAL ReadKeyboardCnf
2066 (PCHAR FName, PKeyMap KeyMap, BOOL ShowWarning) {
2067 int i, j, Ptr;
2068 char EntName[7];
2069 char TempStr[221];
2070 char KStr[201];
2071
2072 // clear key map
2073 for (i = 0; i <= IdKeyMax - 1; i++)
2074 KeyMap->Map[i] = 0xFFFF;
2075 for (i = 0; i <= NumOfUserKey - 1; i++) {
2076 KeyMap->UserKeyPtr[i] = 0;
2077 KeyMap->UserKeyLen[i] = 0;
2078 }
2079
2080 // VT editor keypad
2081 GetInt(KeyMap, IdUp, VTEditor, "Up", FName);
2082
2083 GetInt(KeyMap, IdDown, VTEditor, "Down", FName);
2084
2085 GetInt(KeyMap, IdRight, VTEditor, "Right", FName);
2086
2087 GetInt(KeyMap, IdLeft, VTEditor, "Left", FName);
2088
2089 GetInt(KeyMap, IdFind, VTEditor, "Find", FName);
2090
2091 GetInt(KeyMap, IdInsert, VTEditor, "Insert", FName);
2092
2093 GetInt(KeyMap, IdRemove, VTEditor, "Remove", FName);
2094
2095 GetInt(KeyMap, IdSelect, VTEditor, "Select", FName);
2096
2097 GetInt(KeyMap, IdPrev, VTEditor, "Prev", FName);
2098
2099 GetInt(KeyMap, IdNext, VTEditor, "Next", FName);
2100
2101 // VT numeric keypad
2102 GetInt(KeyMap, Id0, VTNumeric, "Num0", FName);
2103
2104 GetInt(KeyMap, Id1, VTNumeric, "Num1", FName);
2105
2106 GetInt(KeyMap, Id2, VTNumeric, "Num2", FName);
2107
2108 GetInt(KeyMap, Id3, VTNumeric, "Num3", FName);
2109
2110 GetInt(KeyMap, Id4, VTNumeric, "Num4", FName);
2111
2112 GetInt(KeyMap, Id5, VTNumeric, "Num5", FName);
2113
2114 GetInt(KeyMap, Id6, VTNumeric, "Num6", FName);
2115
2116 GetInt(KeyMap, Id7, VTNumeric, "Num7", FName);
2117
2118 GetInt(KeyMap, Id8, VTNumeric, "Num8", FName);
2119
2120 GetInt(KeyMap, Id9, VTNumeric, "Num9", FName);
2121
2122 GetInt(KeyMap, IdMinus, VTNumeric, "NumMinus", FName);
2123
2124 GetInt(KeyMap, IdComma, VTNumeric, "NumComma", FName);
2125
2126 GetInt(KeyMap, IdPeriod, VTNumeric, "NumPeriod", FName);
2127
2128 GetInt(KeyMap, IdEnter, VTNumeric, "NumEnter", FName);
2129
2130 GetInt(KeyMap, IdSlash, VTNumeric, "NumSlash", FName);
2131
2132 GetInt(KeyMap, IdAsterisk, VTNumeric, "NumAsterisk", FName);
2133
2134 GetInt(KeyMap, IdPlus, VTNumeric, "NumPlus", FName);
2135
2136 GetInt(KeyMap, IdPF1, VTNumeric, "PF1", FName);
2137
2138 GetInt(KeyMap, IdPF2, VTNumeric, "PF2", FName);
2139
2140 GetInt(KeyMap, IdPF3, VTNumeric, "PF3", FName);
2141
2142 GetInt(KeyMap, IdPF4, VTNumeric, "PF4", FName);
2143
2144 // VT function keys
2145 GetInt(KeyMap, IdHold, VTFunction, "Hold", FName);
2146
2147 GetInt(KeyMap, IdPrint, VTFunction, "Print", FName);
2148
2149 GetInt(KeyMap, IdBreak, VTFunction, "Break", FName);
2150
2151 GetInt(KeyMap, IdF6, VTFunction, "F6", FName);
2152
2153 GetInt(KeyMap, IdF7, VTFunction, "F7", FName);
2154
2155 GetInt(KeyMap, IdF8, VTFunction, "F8", FName);
2156
2157 GetInt(KeyMap, IdF9, VTFunction, "F9", FName);
2158
2159 GetInt(KeyMap, IdF10, VTFunction, "F10", FName);
2160
2161 GetInt(KeyMap, IdF11, VTFunction, "F11", FName);
2162
2163 GetInt(KeyMap, IdF12, VTFunction, "F12", FName);
2164
2165 GetInt(KeyMap, IdF13, VTFunction, "F13", FName);
2166
2167 GetInt(KeyMap, IdF14, VTFunction, "F14", FName);
2168
2169 GetInt(KeyMap, IdHelp, VTFunction, "Help", FName);
2170
2171 GetInt(KeyMap, IdDo, VTFunction, "Do", FName);
2172
2173 GetInt(KeyMap, IdF17, VTFunction, "F17", FName);
2174
2175 GetInt(KeyMap, IdF18, VTFunction, "F18", FName);
2176
2177 GetInt(KeyMap, IdF19, VTFunction, "F19", FName);
2178
2179 GetInt(KeyMap, IdF20, VTFunction, "F20", FName);
2180
2181 // UDK
2182 GetInt(KeyMap, IdUDK6, VTFunction, "UDK6", FName);
2183
2184 GetInt(KeyMap, IdUDK7, VTFunction, "UDK7", FName);
2185
2186 GetInt(KeyMap, IdUDK8, VTFunction, "UDK8", FName);
2187
2188 GetInt(KeyMap, IdUDK9, VTFunction, "UDK9", FName);
2189
2190 GetInt(KeyMap, IdUDK10, VTFunction, "UDK10", FName);
2191
2192 GetInt(KeyMap, IdUDK11, VTFunction, "UDK11", FName);
2193
2194 GetInt(KeyMap, IdUDK12, VTFunction, "UDK12", FName);
2195
2196 GetInt(KeyMap, IdUDK13, VTFunction, "UDK13", FName);
2197
2198 GetInt(KeyMap, IdUDK14, VTFunction, "UDK14", FName);
2199
2200 GetInt(KeyMap, IdUDK15, VTFunction, "UDK15", FName);
2201
2202 GetInt(KeyMap, IdUDK16, VTFunction, "UDK16", FName);
2203
2204 GetInt(KeyMap, IdUDK17, VTFunction, "UDK17", FName);
2205
2206 GetInt(KeyMap, IdUDK18, VTFunction, "UDK18", FName);
2207
2208 GetInt(KeyMap, IdUDK19, VTFunction, "UDK19", FName);
2209
2210 GetInt(KeyMap, IdUDK20, VTFunction, "UDK20", FName);
2211
2212 // XTERM function keys
2213 GetInt(KeyMap, IdXF1, XFunction, "XF1", FName);
2214
2215 GetInt(KeyMap, IdXF2, XFunction, "XF2", FName);
2216
2217 GetInt(KeyMap, IdXF3, XFunction, "XF3", FName);
2218
2219 GetInt(KeyMap, IdXF4, XFunction, "XF4", FName);
2220
2221 GetInt(KeyMap, IdXF5, XFunction, "XF5", FName);
2222
2223 // accelerator keys
2224 GetInt(KeyMap, IdCmdEditCopy, ShortCut, "EditCopy", FName);
2225
2226 GetInt(KeyMap, IdCmdEditPaste, ShortCut, "EditPaste", FName);
2227
2228 GetInt(KeyMap, IdCmdEditPasteCR, ShortCut, "EditPasteCR", FName);
2229
2230 GetInt(KeyMap, IdCmdEditCLS, ShortCut, "EditCLS", FName);
2231
2232 GetInt(KeyMap, IdCmdEditCLB, ShortCut, "EditCLB", FName);
2233
2234 GetInt(KeyMap, IdCmdCtrlOpenTEK, ShortCut, "ControlOpenTEK", FName);
2235
2236 GetInt(KeyMap, IdCmdCtrlCloseTEK, ShortCut, "ControlCloseTEK", FName);
2237
2238 GetInt(KeyMap, IdCmdLineUp, ShortCut, "LineUp", FName);
2239
2240 GetInt(KeyMap, IdCmdLineDown, ShortCut, "LineDown", FName);
2241
2242 GetInt(KeyMap, IdCmdPageUp, ShortCut, "PageUp", FName);
2243
2244 GetInt(KeyMap, IdCmdPageDown, ShortCut, "PageDown", FName);
2245
2246 GetInt(KeyMap, IdCmdBuffTop, ShortCut, "BuffTop", FName);
2247
2248 GetInt(KeyMap, IdCmdBuffBottom, ShortCut, "BuffBottom", FName);
2249
2250 GetInt(KeyMap, IdCmdNextWin, ShortCut, "NextWin", FName);
2251
2252 GetInt(KeyMap, IdCmdPrevWin, ShortCut, "PrevWin", FName);
2253
2254 GetInt(KeyMap, IdCmdLocalEcho, ShortCut, "LocalEcho", FName);
2255
2256 GetInt(KeyMap, IdScrollLock, ShortCut, "ScrollLock", FName);
2257
2258 /* user keys */
2259
2260 Ptr = 0;
2261
2262 i = IdUser1;
2263 do {
2264 _snprintf_s(EntName, sizeof(EntName), _TRUNCATE, "User%d", i - IdUser1 + 1);
2265 GetPrivateProfileString("User keys", EntName, "",
2266 TempStr, sizeof(TempStr), FName);
2267 if (strlen(TempStr) > 0) {
2268 /* scan code */
2269 GetNthString(TempStr, 1, sizeof(KStr), KStr);
2270 if (_stricmp(KStr, "off") == 0)
2271 KeyMap->Map[i - 1] = 0xFFFF;
2272 else {
2273 GetNthNum(TempStr, 1, &j);
2274 KeyMap->Map[i - 1] = (WORD) j;
2275 }
2276 /* conversion flag */
2277 GetNthNum(TempStr, 2, &j);
2278 KeyMap->UserKeyType[i - IdUser1] = (BYTE) j;
2279 /* key string */
2280 /* GetNthString(TempStr,3,sizeof(KStr),KStr); */
2281 KeyMap->UserKeyPtr[i - IdUser1] = Ptr;
2282 /* KeyMap->UserKeyLen[i-IdUser1] =
2283 Hex2Str(KStr,&(KeyMap->UserKeyStr[Ptr]),KeyStrMax-Ptr+1);
2284 */
2285 GetNthString(TempStr, 3, KeyStrMax - Ptr + 1,
2286 &(KeyMap->UserKeyStr[Ptr]));
2287 KeyMap->UserKeyLen[i - IdUser1] =
2288 strlen(&(KeyMap->UserKeyStr[Ptr]));
2289 Ptr = Ptr + KeyMap->UserKeyLen[i - IdUser1];
2290 }
2291
2292 i++;
2293 }
2294 while ((i <= IdKeyMax) && (strlen(TempStr) > 0) && (Ptr <= KeyStrMax));
2295
2296 for (j = 1; j <= IdKeyMax - 1; j++)
2297 if (KeyMap->Map[j] != 0xFFFF)
2298 for (i = 0; i <= j - 1; i++)
2299 if (KeyMap->Map[i] == KeyMap->Map[j]) {
2300 if (ShowWarning) {
2301 _snprintf_s(TempStr, sizeof(TempStr), _TRUNCATE,
2302 "Keycode %d is used more than once",
2303 KeyMap->Map[j]);
2304 MessageBox(0, TempStr,
2305 "Tera Term: Error in keyboard setup file",
2306 MB_ICONEXCLAMATION);
2307 }
2308 KeyMap->Map[i] = 0xFFFF;
2309 }
2310 }
2311
2312 void FAR PASCAL CopySerialList(PCHAR IniSrc, PCHAR IniDest, PCHAR section,
2313 PCHAR key, int MaxList)
2314 {
2315 int i;
2316 char EntName[10];
2317 char TempHost[HostNameMaxLength + 1];
2318
2319 if (_stricmp(IniSrc, IniDest) == 0)
2320 return;
2321
2322 WritePrivateProfileString(section, NULL, NULL, IniDest);
2323
2324 i = 1;
2325 do {
2326 _snprintf_s(EntName, sizeof(EntName), _TRUNCATE, "%s%i", key, i);
2327
2328 /* Get one hostname from file IniSrc */
2329 GetPrivateProfileString(section, EntName, "",
2330 TempHost, sizeof(TempHost), IniSrc);
2331 /* Copy it to the file IniDest */
2332 if (strlen(TempHost) > 0)
2333 WritePrivateProfileString(section, EntName, TempHost, IniDest);
2334 i++;
2335 }
2336 while ((i <= MaxList) && (strlen(TempHost) > 0));
2337
2338 /* update file */
2339 WritePrivateProfileString(NULL, NULL, NULL, IniDest);
2340 }
2341
2342 void FAR PASCAL AddValueToList(PCHAR FName, PCHAR Host, PCHAR section,
2343 PCHAR key, int MaxList)
2344 {
2345 HANDLE MemH;
2346 PCHAR MemP;
2347 char EntName[13];
2348 int i, j, Len;
2349 BOOL Update;
2350
2351 if ((FName[0] == 0) || (Host[0] == 0))
2352 return;
2353 MemH = GlobalAlloc(GHND, (HostNameMaxLength + 1) * MaxList);
2354 if (MemH == NULL)
2355 return;
2356 MemP = GlobalLock(MemH);
2357 if (MemP != NULL) {
2358 strncpy_s(MemP, (HostNameMaxLength + 1) * MaxList, Host, _TRUNCATE);
2359 j = strlen(Host) + 1;
2360 i = 1;
2361 Update = TRUE;
2362 do {
2363 _snprintf_s(EntName, sizeof(EntName), _TRUNCATE, "%s%i", key, i);
2364
2365 /* Get a hostname */
2366 GetPrivateProfileString(section, EntName, "",
2367 &MemP[j], HostNameMaxLength + 1,
2368 FName);
2369 Len = strlen(&MemP[j]);
2370 if (_stricmp(&MemP[j], Host) == 0) {
2371 if (i == 1)
2372 Update = FALSE;
2373 }
2374 else
2375 j = j + Len + 1;
2376 i++;
2377 } while ((i <= MaxList) && (Len != 0) && Update);
2378
2379 if (Update) {
2380 WritePrivateProfileString(section, NULL, NULL, FName);
2381
2382 j = 0;
2383 i = 1;
2384 do {
2385 _snprintf_s(EntName, sizeof(EntName), _TRUNCATE, "%s%i", key, i);
2386
2387 if (MemP[j] != 0)
2388 WritePrivateProfileString(section, EntName, &MemP[j],
2389 FName);
2390 j = j + strlen(&MemP[j]) + 1;
2391 i++;
2392 } while ((i <= MaxList) && (MemP[j] != 0));
2393 /* update file */
2394 WritePrivateProfileString(NULL, NULL, NULL, FName);
2395 }
2396 GlobalUnlock(MemH);
2397 }
2398 GlobalFree(MemH);
2399 }
2400
2401 /* copy hostlist from source IniFile to dest IniFile */
2402 void FAR PASCAL CopyHostList(PCHAR IniSrc, PCHAR IniDest)
2403 {
2404 CopySerialList(IniSrc, IniDest, "Hosts", "Host", MAXHOSTLIST);
2405 }
2406
2407 void FAR PASCAL AddHostToList(PCHAR FName, PCHAR Host)
2408 {
2409 AddValueToList(FName, Host, "Hosts", "Host", MAXHOSTLIST);
2410 }
2411
2412 BOOL NextParam(PCHAR Param, int *i, PCHAR Temp, int Size)
2413 {
2414 int j;
2415 char c;
2416 BOOL Quoted;
2417
2418 if ((unsigned int) (*i) >= strlen(Param))
2419 return FALSE;
2420 j = 0;
2421
2422 while (Param[*i] == ' ')
2423 (*i)++;
2424
2425 Quoted = FALSE;
2426 c = Param[*i];
2427 (*i)++;
2428 while ((c != 0) && (Quoted || (c != ' ')) &&
2429 (Quoted || (c != ';')) && (j < Size - 1)) {
2430 if (c == '"')
2431 Quoted = !Quoted;
2432 Temp[j] = c;
2433 j++;
2434 c = Param[*i];
2435 (*i)++;
2436 }
2437 if (!Quoted && (c == ';'))
2438 (*i)--;
2439
2440 Temp[j] = 0;
2441 return (strlen(Temp) > 0);
2442 }
2443
2444 void Dequote(PCHAR Source, PCHAR Dest)
2445 {
2446 int i, j;
2447 char q, c;
2448
2449 Dest[0] = 0;
2450 if (Source[0] == 0)
2451 return;
2452 i = 0;
2453 /* quoting char */
2454 q = Source[i];
2455 /* only '"' is used as quoting char */
2456 if (q != '"')
2457 q = 0;
2458 else
2459 i++;
2460
2461 c = Source[i];
2462 i++;
2463 j = 0;
2464 while ((c != 0) && (c != q)) {
2465 Dest[j] = c;
2466 j++;
2467 c = Source[i];
2468 i++;
2469 }
2470
2471 Dest[j] = 0;
2472 }
2473
2474
2475 #ifndef NO_INET6
2476 static void ParseHostName(char *HostStr, WORD * port)
2477 {
2478 /*
2479 * hostname.domain.com
2480 * hostname.domain.com:23
2481 * [3ffe:1234:1234::1] IPv6 raw address
2482 * [3ffe:1234:1234::1]:23 IPv6 raw address and port#
2483 * telnet://hostname.domain.com/
2484 * telnet://hostname.domain.com:23/
2485 * telnet://[3ffe:1234:1234::1]/
2486 * telnet://[3ffe:1234:1234::1]:23/
2487 * tn3270:// .... /
2488 */
2489
2490 int i, is_telnet_handler = 0, is_port = 0;
2491 char *s;
2492 char b;
2493
2494 /* strlen("telnet://") == 9 */
2495 if ((_strnicmp(HostStr, "telnet://", 9) == 0) ||
2496 (_strnicmp(HostStr, "tn3270://", 9) == 0)) {
2497 /* trim "telnet://" and tail "/" */
2498 memmove(HostStr, &(HostStr[9]), strlen(HostStr) - 8);
2499 i = strlen(HostStr);
2500 if (i > 0 && (HostStr[i - 1] == '/'))
2501 HostStr[i - 1] = '\0';
2502 is_telnet_handler = 1;
2503 }
2504 /* strlen("ssh://") == 6 */
2505 else if ((_strnicmp(HostStr, "ssh://", 6) == 0)) {
2506 /* trim "ssh://" and tail "/" */
2507 memmove(HostStr, &(HostStr[6]), strlen(HostStr) - 5);
2508 i = strlen(HostStr);
2509 if (i > 0 && (HostStr[i - 1] == '/'))
2510 HostStr[i - 1] = '\0';
2511 }
2512
2513 /* parsing string enclosed by [ ] */
2514 s = HostStr;
2515 if (*s == '[') {
2516 BOOL inet6found = FALSE;
2517 s++;
2518 while (*s) {
2519 if (*s == ']') {
2520 /* found IPv6 raw address */
2521 /* triming [ ] */
2522 int len = strlen(HostStr);
2523 char *lastptr = &HostStr[len - 1];
2524 memmove(HostStr, HostStr + 1, len - 1);
2525 s = s - 1;
2526 lastptr = lastptr - 1;
2527 memmove(s, s + 1, lastptr - s);
2528 /* because of triming 2 characters */
2529 HostStr[len - 2] = '\0';
2530
2531
2532 inet6found = TRUE;
2533 break;
2534 }
2535 s++;
2536 }
2537 if (inet6found == FALSE)
2538 s = HostStr;
2539 }
2540
2541 /* parsing port# */
2542 /*
2543 * s points:
2544 * [3ffe:1234:1234::1]:XXX....
2545 * 3ffe:1234:1234::1:XXX....
2546 * |
2547 * s
2548 *
2549 * hostname.domain.com
2550 * |
2551 * s
2552 */
2553 i = 0;
2554 do {
2555 b = s[i];
2556 i++;
2557 } while (b != '\0' && b != ':');
2558 if (b == ':') {
2559 s[i - 1] = '\0';
2560 if (sscanf(&(s[i]), "%d", port) != 1)
2561 *port = 65535;
2562 is_port = 1;
2563 }
2564 if (is_telnet_handler == 1 && is_port == 0) {
2565 *port = 23;
2566 }
2567 }
2568 #endif /* NO_INET6 */
2569
2570
2571 void FAR PASCAL ParseParam(PCHAR Param, PTTSet ts, PCHAR DDETopic)
2572 {
2573 int i, pos, c;
2574 #ifdef NO_INET6
2575 BYTE b;
2576 #endif /* NO_INET6 */
2577 char Temp[MAXPATHLEN + 3];
2578 char Temp2[MAXPATHLEN];
2579 char TempDir[MAXPATHLEN];
2580 WORD ParamPort = 0;
2581 WORD ParamCom = 0;
2582 WORD ParamTCP = 65535;
2583 WORD ParamTel = 2;
2584 WORD ParamBin = 2;
2585 WORD ParamBaud = IdBaudNone;
2586 BOOL HostNameFlag = FALSE;
2587 BOOL JustAfterHost = FALSE;
2588 WORD DisableTCPEchoCR = FALSE;
2589
2590 ts->HostName[0] = 0;
2591 ts->KeyCnfFN[0] = 0;
2592 /* Set AutoConnect true as default (2008.2.16 by steven)*/
2593 ts->ComAutoConnect = TRUE;
2594
2595 #ifndef NO_INET6
2596 /* user specifies the protocol connecting to the host */
2597 /* ts->ProtocolFamily = AF_UNSPEC; */
2598 #endif /* NO_INET6 */
2599
2600 /* Get command line parameters */
2601 if (DDETopic != NULL)
2602 DDETopic[0] = 0;
2603 i = 0;
2604 /* the first term shuld be executable filename of Tera Term */
2605 NextParam(Param, &i, Temp, sizeof(Temp));
2606 while (NextParam(Param, &i, Temp, sizeof(Temp))) {
2607 if (HostNameFlag) {
2608 JustAfterHost = TRUE;
2609 HostNameFlag = FALSE;
2610 }
2611
2612 if (_strnicmp(Temp, "/BAUD=", 6) == 0) { /* Serial port baud rate */
2613 ParamPort = IdSerial;
2614 ParamBaud = str2id(BaudList, &Temp[6], IdBaudNone);
2615 }
2616 else if (_strnicmp(Temp, "/B", 2) == 0) { /* telnet binary */
2617 ParamPort = IdTCPIP;
2618 ParamBin = 1;
2619 }
2620 else if (_strnicmp(Temp, "/C=", 3) == 0) { /* COM port num */
2621 ParamPort = IdSerial;
2622 ParamCom = atoi(&Temp[3]);
2623 if ((ParamCom < 1) || (ParamCom > ts->MaxComPort))
2624 ParamCom = 0;
2625 }
2626 else if (_strnicmp(Temp, "/D=", 3) == 0) {
2627 if (DDETopic != NULL)
2628 strncpy_s(DDETopic, 21, &Temp[3], _TRUNCATE); // 21 = sizeof(TopicName)
2629 }
2630 // TCPLocalEcho/TCPCRSend ������������ (maya 2007.4.25)
2631 else if (_strnicmp(Temp, "/E", 2) == 0) {
2632 DisableTCPEchoCR = TRUE;
2633 }
2634 else if (_strnicmp(Temp, "/F=", 3) == 0) { /* setup filename */
2635 Dequote(&Temp[3], Temp2);
2636 if (strlen(Temp2) > 0) {
2637 ConvFName(ts->HomeDir, Temp2, sizeof(Temp2), ".INI", Temp,
2638 sizeof(Temp));
2639 if (_stricmp(ts->SetupFName, Temp) != 0) {
2640 strncpy_s(ts->SetupFName, sizeof(ts->SetupFName), Temp,
2641 _TRUNCATE);
2642 ReadIniFile(ts->SetupFName, ts);
2643 }
2644 }
2645 }
2646 else if (_strnicmp(Temp, "/FD=", 4) == 0) { /* file transfer directory */
2647 Dequote(&Temp[4], Temp2);
2648 if (strlen(Temp2) > 0) {
2649 _getcwd(TempDir, sizeof(TempDir));
2650 if (_chdir(Temp2) == 0)
2651 strncpy_s(ts->FileDir, sizeof(ts->FileDir), Temp2,
2652 _TRUNCATE);
2653 _chdir(TempDir);
2654 }
2655 }
2656 else if (_strnicmp(Temp, "/H", 2) == 0) /* hide title bar */
2657 ts->HideTitle = 1;
2658 else if (_strnicmp(Temp, "/I", 2) == 0) /* iconize */
2659 ts->Minimize = 1;
2660 else if (_strnicmp(Temp, "/K=", 3) == 0) { /* Keyboard setup file */
2661 Dequote(&Temp[3], Temp2);
2662 ConvFName(ts->HomeDir, Temp2, sizeof(Temp2), ".CNF",
2663 ts->KeyCnfFN, sizeof(ts->KeyCnfFN));
2664 }
2665 else if ((_strnicmp(Temp, "/KR=", 4) == 0) ||
2666 (_strnicmp(Temp, "/KT=", 4) == 0)) { /* kanji code */
2667 if (_strnicmp(&Temp[4], "UTF8m", 5) == 0 ||
2668 _strnicmp(&Temp[4], "UTF-8m", 6) == 0)
2669 c = IdUTF8m;
2670 else if (_strnicmp(&Temp[4], "UTF8", 4) == 0 ||
2671 _strnicmp(&Temp[4], "UTF-8", 5) == 0)
2672 c = IdUTF8;
2673 else if (_strnicmp(&Temp[4], "SJIS", 4) == 0)
2674 c = IdSJIS;
2675 else if (_strnicmp(&Temp[4], "EUC", 3) == 0)
2676 c = IdEUC;
2677 else if (_strnicmp(&Temp[4], "JIS", 3) == 0)
2678 c = IdJIS;
2679 else
2680 c = -1;
2681 if (c != -1) {
2682 if (_strnicmp(Temp, "/KR=", 4) == 0)
2683 ts->KanjiCode = c;
2684 else
2685 ts->KanjiCodeSend = c;
2686 }
2687 }
2688 else if (_strnicmp(Temp, "/L=", 3) == 0) { /* log file */
2689 Dequote(&Temp[3], Temp2);
2690 strncpy_s(ts->LogFN, sizeof(ts->LogFN), Temp2, _TRUNCATE);
2691 }
2692 else if (_strnicmp(Temp, "/LA=", 4) == 0) { /* language */
2693 if (_strnicmp(&Temp[4], "E", 1) == 0)
2694 ts->Language = IdEnglish;
2695 else if (_strnicmp(&Temp[4], "J", 1) == 0)
2696 ts->Language = IdJapanese;
2697 else if (_strnicmp(&Temp[4], "R", 1) == 0)
2698 ts->Language = IdRussian;
2699 }
2700 else if (_strnicmp(Temp, "/M=", 3) == 0) { /* macro filename */
2701 if ((Temp[3] == 0) || (Temp[3] == '*'))
2702 strncpy_s(ts->MacroFN, sizeof(ts->MacroFN), "*",
2703 _TRUNCATE);
2704 else {
2705 Dequote(&Temp[3], Temp2);
2706 ConvFName(ts->HomeDir, Temp2, sizeof(Temp2), ".TTL",
2707 ts->MacroFN, sizeof(ts->MacroFN));
2708 }
2709 /* Disable auto connect to serial when macro mode (2006.9.15 maya) */
2710 ts->ComAutoConnect = FALSE;
2711 }
2712 else if (_strnicmp(Temp, "/M", 2) == 0) { /* macro option without file name */
2713 strncpy_s(ts->MacroFN, sizeof(ts->MacroFN), "*", _TRUNCATE);
2714 /* Disable auto connect to serial when macro mode (2006.9.15 maya) */
2715 ts->ComAutoConnect = FALSE;
2716 }
2717 else if (_strnicmp(Temp, "/P=", 3) == 0) { /* TCP port num */
2718 ParamPort = IdTCPIP;
2719 if (sscanf(&Temp[3], "%d", &ParamTCP) != 1)
2720 ParamTCP = 65535;
2721 }
2722 else if (_strnicmp(Temp, "/R=", 3) == 0) { /* Replay filename */
2723 Dequote(&Temp[3], Temp2);
2724 ConvFName(ts->HomeDir, Temp2, sizeof(Temp2), "", ts->HostName,
2725 sizeof(ts->HostName));
2726 if (strlen(ts->HostName) > 0)
2727 ParamPort = IdFile;
2728 }
2729 else if (_strnicmp(Temp, "/T=0", 4) == 0) { /* telnet disable */
2730 ParamPort = IdTCPIP;
2731 ParamTel = 0;
2732 }
2733 else if (_strnicmp(Temp, "/T=1", 4) == 0) { /* telnet enable */
2734 ParamPort = IdTCPIP;
2735 ParamTel = 1;
2736 }
2737 else if (_strnicmp(Temp, "/TEKICON=", 9) == 0) { /* Tek window icon */
2738 ts->TEKIcon = IconName2IconId(&Temp[9]);
2739 }
2740 else if (_strnicmp(Temp, "/VTICON=", 8) == 0) { /* VT window icon */
2741 ts->VTIcon = IconName2IconId(&Temp[8]);
2742 }
2743 else if (_strnicmp(Temp, "/V", 2) == 0) { /* invisible */
2744 ts->HideWindow = 1;
2745 }
2746 else if (_strnicmp(Temp, "/W=", 3) == 0) { /* Window title */
2747 Dequote(&Temp[3], ts->Title);
2748 }
2749 else if (_strnicmp(Temp, "/X=", 3) == 0) { /* Window pos (X) */
2750 if (sscanf(&Temp[3], "%d", &pos) == 1) {
2751 ts->VTPos.x = pos;
2752 if (ts->VTPos.y == CW_USEDEFAULT)
2753 ts->VTPos.y = 0;
2754 }
2755 }
2756 else if (_strnicmp(Temp, "/Y=", 3) == 0) { /* Window pos (Y) */
2757 if (sscanf(&Temp[3], "%d", &pos) == 1) {
2758 ts->VTPos.y = pos;
2759 if (ts->VTPos.x == CW_USEDEFAULT)
2760 ts->VTPos.x = 0;
2761 }
2762 }
2763 #ifndef NO_INET6
2764 else if (_strnicmp(Temp, "/4", 2) == 0) /* Protocol Tera Term speaking */
2765 ts->ProtocolFamily = AF_INET;
2766 else if (_strnicmp(Temp, "/6", 2) == 0)
2767 ts->ProtocolFamily = AF_INET6;
2768 #endif
2769 else if (_strnicmp(Temp, "/DUPLICATE", 9) == 0) { // duplicate session (2004.12.7. yutaka)
2770 ts->DuplicateSession = 1;
2771
2772 }
2773 else if (_strnicmp(Temp, "/TIMEOUT=", 9) == 0) { // Connecting Timeout value (2007.1.11. yutaka)
2774 if (sscanf(&Temp[9], "%d", &pos) == 1) {
2775 if (pos >= 0)
2776 ts->ConnectingTimeout = pos;
2777 }
2778
2779 }
2780 else if ((Temp[0] != '/') && (strlen(Temp) > 0)) {
2781 if (JustAfterHost && (sscanf(Temp, "%d", &c) == 1))
2782 ParamTCP = c;
2783 else {
2784 ParamPort = IdTCPIP;
2785 strncpy_s(ts->HostName, sizeof(ts->HostName), Temp, _TRUNCATE); /* host name */
2786 HostNameFlag = TRUE;
2787 }
2788 }
2789 JustAfterHost = FALSE;
2790 }
2791
2792 if ((DDETopic != NULL) && (DDETopic[0] != 0))
2793 ts->MacroFN[0] = 0;
2794
2795 if ((ts->HostName[0] != 0) && (ParamPort == IdTCPIP)) {
2796 #ifndef NO_INET6
2797 ParseHostName(ts->HostName, &ParamTCP);
2798 #else /* NO_INET6 */
2799 if ((_strnicmp(ts->HostName, "telnet://", 9) == 0) ||
2800 (_strnicmp(ts->HostName, "tn3270://", 9) == 0)) {
2801 memmove(ts->HostName, &(ts->HostName[9]),
2802 strlen(ts->HostName) - 8);
2803 i = strlen(ts->HostName);
2804 if ((i > 0) && (ts->HostName[i - 1] == '/'))
2805 ts->HostName[i - 1] = 0;
2806 }
2807 i = 0;
2808 do {
2809 b = ts->HostName[i];
2810 i++;
2811 } while ((b != 0) && (b != ':'));
2812 if (b == ':') {
2813 ts->HostName[i - 1] = 0;
2814 if (sscanf(&(ts->HostName[i]), "%d", &ParamTCP) != 1)
2815 ParamTCP = 65535;
2816 }
2817 #endif /* NO_INET6 */
2818 }
2819
2820 switch (ParamPort) {
2821 case IdTCPIP:
2822 ts->PortType = IdTCPIP;
2823 if (ParamTCP < 65535)
2824 ts->TCPPort = ParamTCP;
2825 if (ParamTel < 2)
2826 ts->Telnet = ParamTel;
2827 if (ParamBin < 2)
2828 ts->TelBin = ParamBin;
2829 break;
2830