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 4700 - (show annotations) (download) (as text)
Tue Nov 1 10:24:23 2011 UTC (12 years, 5 months ago) by doda
File MIME type: text/x-csrc
File size: 109163 byte(s)
リモートからのクリップボードアクセス (OSC 52) に対応した。

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