Develop and Download Open Source Software

Browse Subversion Repository

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2556 - (show annotations) (download) (as text)
Sun Jul 6 06:50:40 2008 UTC (15 years, 9 months ago) by yutakapon
Original Path: teraterm/trunk/ttpset/ttset.c
File MIME type: text/x-csrc
File size: 86118 byte(s)
韓国語パッチを追加した。
http://sourceforge.jp/tracker/index.php?func=detail&aid=12957&group_id=1412&atid=5335

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

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26