Develop and Download Open Source Software

Tera Term

Browse Subversion Repository

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

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

Parent Directory Parent Directory | Revision Log Revision Log

Revision 3743 - (hide annotations) (download) (as text)
Wed Jan 27 22:20:42 2010 UTC (14 years, 2 months ago) by doda
File MIME type: text/x-csrc
File size: 101517 byte(s) 
Alternate Screen Bufferに対応。
1 maya 3227 /* Tera Term
2     Copyright(C) 1994-1998 T. Teranishi
3     All rights reserved. */
4     /* IPv6 modification is Copyright(C) 2000 Jun-ya kato <kato@win6.jp> */
5    
6     /* TTSET.DLL, setup file routines*/
7     #ifndef NO_INET6
8     #include <winsock2.h>
9     #include <ws2tcpip.h>
10     #endif /* NO_INET6 */
11     #include "teraterm.h"
12     #include "tttypes.h"
13     #include <stdio.h>
14     #include <string.h>
15     #include <direct.h>
16     #include "ttlib.h"
17     #include "tt_res.h"
18    
19     #include "compat_w95.h"
20    
21     #define Section "Tera Term"
22    
23     static PCHAR far TermList[] =
24     { "VT100", "VT100J", "VT101", "VT102", "VT102J", "VT220J", "VT282",
25     "VT320", "VT382", NULL };
26    
27     static PCHAR far RussList[] =
28     { "Windows", "KOI8-R", "CP-866", "ISO-8859-5", NULL };
29     static PCHAR far RussList2[] = { "Windows", "KOI8-R", NULL };
30    
31     WORD str2id(PCHAR far * List, PCHAR str, WORD DefId)
32     {
33     WORD i;
34     i = 0;
35     while ((List[i] != NULL) && (_stricmp(List[i], str) != 0))
36     i++;
37     if (List[i] == NULL)
38     i = DefId;
39     else
40     i++;
41    
42     return i;
43     }
44    
45     void id2str(PCHAR far * List, WORD Id, WORD DefId, PCHAR str, int destlen)
46     {
47     int i;
48    
49     if (Id == 0)
50     i = DefId - 1;
51     else {
52     i = 0;
53     while ((List[i] != NULL) && (i < Id - 1))
54     i++;
55     if (List[i] == NULL)
56     i = DefId - 1;
57     }
58     strncpy_s(str, destlen, List[i], _TRUNCATE);
59     }
60    
61     int IconName2IconId(const char *name) {
62     int id;
63    
64     if (_stricmp(name, "tterm") == 0) {
65     id = IDI_TTERM;
66     }
67     else if (_stricmp(name, "vt") == 0) {
68     id = IDI_VT;
69     }
70     else if (_stricmp(name, "tek") == 0) {
71     id = IDI_TEK;
72     }
73     else if (_stricmp(name, "tterm_classic") == 0) {
74     id = IDI_TTERM_CLASSIC;
75     }
76     else if (_stricmp(name, "vt_classic") == 0) {
77     id = IDI_VT_CLASSIC;
78     }
79     else if (_stricmp(name, "cygterm") == 0) {
80     id = IDI_CYGTERM;
81     }
82     else {
83     id = IdIconDefault;
84     }
85     return id;
86     }
87    
88     void IconId2IconName(char *name, int len, int id) {
89     char *icon;
90     switch (id) {
91     case IDI_TTERM:
92     icon = "tterm";
93     break;
94     case IDI_VT:
95     icon = "vt";
96     break;
97     case IDI_TEK:
98     icon = "tek";
99     break;
100     case IDI_TTERM_CLASSIC:
101     icon = "tterm_classic";
102     break;
103     case IDI_VT_CLASSIC:
104     icon = "vt_classic";
105     break;
106     case IDI_CYGTERM:
107     icon = "cygterm";
108     break;
109     default:
110     icon = "Default";
111     }
112     strncpy_s(name, len, icon, _TRUNCATE);
113     }
114    
115     WORD GetOnOff(PCHAR Sect, PCHAR Key, PCHAR FName, BOOL Default)
116     {
117     char Temp[4];
118     GetPrivateProfileString(Sect, Key, "", Temp, sizeof(Temp), FName);
119     if (Default) {
120     if (_stricmp(Temp, "off") == 0)
121     return 0;
122     else
123     return 1;
124     }
125     else {
126     if (_stricmp(Temp, "on") == 0)
127     return 1;
128     else
129     return 0;
130     }
131     }
132    
133     void WriteOnOff(PCHAR Sect, PCHAR Key, PCHAR FName, WORD Flag)
134     {
135     char Temp[4];
136    
137     if (Flag != 0)
138     strncpy_s(Temp, sizeof(Temp), "on", _TRUNCATE);
139     else
140     strncpy_s(Temp, sizeof(Temp), "off", _TRUNCATE);
141     WritePrivateProfileString(Sect, Key, Temp, FName);
142     }
143    
144     void WriteInt(PCHAR Sect, PCHAR Key, PCHAR FName, int i)
145     {
146     char Temp[15];
147     _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d", i);
148     WritePrivateProfileString(Sect, Key, Temp, FName);
149     }
150    
151     void WriteUint(PCHAR Sect, PCHAR Key, PCHAR FName, UINT i)
152     {
153     char Temp[15];
154     _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%u", i);
155     WritePrivateProfileString(Sect, Key, Temp, FName);
156     }
157    
158     void WriteInt2(PCHAR Sect, PCHAR Key, PCHAR FName, int i1, int i2)
159     {
160     char Temp[32];
161     _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d,%d", i1, i2);
162     WritePrivateProfileString(Sect, Key, Temp, FName);
163     }
164    
165     void WriteInt4(PCHAR Sect, PCHAR Key, PCHAR FName,
166     int i1, int i2, int i3, int i4)
167     {
168     char Temp[64];
169     _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d,%d,%d,%d",
170     i1, i2, i3, i4);
171     WritePrivateProfileString(Sect, Key, Temp, FName);
172     }
173    
174     void WriteInt6(PCHAR Sect, PCHAR Key, PCHAR FName,
175     int i1, int i2, int i3, int i4, int i5, int i6)
176     {
177     char Temp[96];
178     _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d,%d,%d,%d,%d,%d",
179     i1, i2,i3, i4, i5, i6);
180     WritePrivateProfileString(Sect, Key, Temp, FName);
181     }
182    
183     void WriteFont(PCHAR Sect, PCHAR Key, PCHAR FName,
184     PCHAR Name, int x, int y, int charset)
185     {
186     char Temp[80];
187     if (Name[0] != 0)
188     _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%s,%d,%d,%d",
189     Name, x, y, charset);
190     else
191     Temp[0] = 0;
192     WritePrivateProfileString(Sect, Key, Temp, FName);
193     }
194    
195     void FAR PASCAL ReadIniFile(PCHAR FName, PTTSet ts)
196     {
197     int i;
198     HDC TmpDC;
199     char Temp[MAXPATHLEN];
200    
201     ts->Minimize = 0;
202     ts->HideWindow = 0;
203     ts->LogFlag = 0; // Log flags
204     ts->FTFlag = 0; // File transfer flags
205     ts->MenuFlag = 0; // Menu flags
206     ts->TermFlag = 0; // Terminal flag
207     ts->ColorFlag = 0; // ANSI/Attribute color flags
208 doda 3666 ts->FontFlag = 0; // Font flag
209 maya 3227 ts->PortFlag = 0; // Port flags
210 doda 3485 ts->WindowFlag = 0; // Window flags
211 maya 3227 ts->TelPort = 23;
212    
213 doda 3388 ts->DisableTCPEchoCR = FALSE;
214    
215 maya 3227 /* Version number */
216     /* GetPrivateProfileString(Section,"Version","",
217     Temp,sizeof(Temp),FName); */
218    
219     /* Language */
220     GetPrivateProfileString(Section, "Language", "",
221     Temp, sizeof(Temp), FName);
222     if (_stricmp(Temp, "Japanese") == 0)
223     ts->Language = IdJapanese;
224     else if (_stricmp(Temp, "Russian") == 0)
225     ts->Language = IdRussian;
226     else if (_stricmp(Temp, "English") == 0)
227     ts->Language = IdEnglish;
228     else if (_stricmp(Temp,"Korean") == 0) // HKS
229     ts->Language = IdKorean;
230 maya 3401 else if (_stricmp(Temp,"UTF-8") == 0)
231     ts->Language = IdUtf8;
232 maya 3227 else {
233     switch (PRIMARYLANGID(GetSystemDefaultLangID())) {
234     case LANG_JAPANESE:
235     ts->Language = IdJapanese;
236     break;
237     case LANG_RUSSIAN:
238     ts->Language = IdRussian;
239     break;
240 doda 3354 case LANG_KOREAN: // HKS
241 maya 3227 ts->Language = IdKorean;
242     break;
243     default:
244     ts->Language = IdEnglish;
245     }
246     }
247    
248     /* Port type */
249     GetPrivateProfileString(Section, "Port", "",
250     Temp, sizeof(Temp), FName);
251     if (_stricmp(Temp, "tcpip") == 0)
252     ts->PortType = IdTCPIP;
253     else if (_stricmp(Temp, "serial") == 0)
254     ts->PortType = IdSerial;
255     else {
256     ts->PortType = IdTCPIP;
257     }
258    
259     /* VT win position */
260     GetPrivateProfileString(Section, "VTPos", "-2147483648,-2147483648", Temp, sizeof(Temp), FName); /* default: random position */
261     GetNthNum(Temp, 1, (int far *) (&ts->VTPos.x));
262     GetNthNum(Temp, 2, (int far *) (&ts->VTPos.y));
263    
264     /* TEK win position */
265     GetPrivateProfileString(Section, "TEKPos", "-2147483648,-2147483648", Temp, sizeof(Temp), FName); /* default: random position */
266     GetNthNum(Temp, 1, (int far *) &(ts->TEKPos.x));
267     GetNthNum(Temp, 2, (int far *) &(ts->TEKPos.y));
268    
269     /* Save VT Window position */
270     ts->SaveVTWinPos = GetOnOff(Section, "SaveVTWinPos", FName, FALSE);
271    
272     /* VT terminal size */
273     GetPrivateProfileString(Section, "TerminalSize", "80,24",
274     Temp, sizeof(Temp), FName);
275     GetNthNum(Temp, 1, &ts->TerminalWidth);
276     GetNthNum(Temp, 2, &ts->TerminalHeight);
277     if (ts->TerminalWidth < 0)
278     ts->TerminalWidth = 1;
279     if (ts->TerminalHeight < 0)
280     ts->TerminalHeight = 1;
281    
282     /* Terminal size = Window size */
283     ts->TermIsWin = GetOnOff(Section, "TermIsWin", FName, FALSE);
284    
285     /* Auto window resize flag */
286     ts->AutoWinResize = GetOnOff(Section, "AutoWinResize", FName, FALSE);
287    
288     /* CR Receive */
289     GetPrivateProfileString(Section, "CRReceive", "",
290     Temp, sizeof(Temp), FName);
291     if (_stricmp(Temp, "CRLF") == 0) {
292     ts->CRReceive = IdCRLF;
293     }
294     else if (_stricmp(Temp, "LF") == 0) {
295     ts->CRReceive = IdLF;
296     }
297     else {
298     ts->CRReceive = IdCR;
299     }
300     /* CR Send */
301     GetPrivateProfileString(Section, "CRSend", "",
302     Temp, sizeof(Temp), FName);
303     if (_stricmp(Temp, "CRLF") == 0)
304     ts->CRSend = IdCRLF;
305     else
306     ts->CRSend = IdCR;
307     ts->CRSend_ini = ts->CRSend;
308    
309     /* Local echo */
310     ts->LocalEcho = GetOnOff(Section, "LocalEcho", FName, FALSE);
311     ts->LocalEcho_ini = ts->LocalEcho;
312    
313     /* Answerback */
314     GetPrivateProfileString(Section, "Answerback", "", Temp,
315     sizeof(Temp), FName);
316     ts->AnswerbackLen =
317     Hex2Str(Temp, ts->Answerback, sizeof(ts->Answerback));
318    
319     /* Kanji Code (receive) */
320     GetPrivateProfileString(Section, "KanjiReceive", "",
321     Temp, sizeof(Temp), FName);
322     if (_stricmp(Temp, "EUC") == 0)
323     ts->KanjiCode = IdEUC;
324     else if (_stricmp(Temp, "JIS") == 0)
325     ts->KanjiCode = IdJIS;
326     else if (_stricmp(Temp, "UTF-8") == 0)
327     ts->KanjiCode = IdUTF8;
328     else if (_stricmp(Temp, "UTF-8m") == 0)
329     ts->KanjiCode = IdUTF8m;
330 doda 3420 else if (_stricmp(Temp, "KS5601") == 0)
331     ts->KanjiCode = IdSJIS;
332 maya 3227 else
333     ts->KanjiCode = IdSJIS;
334 maya 3401 // KanjiCode/KanjiCodeSend �������� Language �����������l���u��������
335     {
336     WORD KanjiCode = ts->KanjiCode;
337     ts->KanjiCode = KanjiCodeTranslate(ts->Language,KanjiCode);
338     }
339 maya 3227
340     /* Katakana (receive) */
341     GetPrivateProfileString(Section, "KatakanaReceive", "",
342     Temp, sizeof(Temp), FName);
343     if (_stricmp(Temp, "7") == 0)
344     ts->JIS7Katakana = 1;
345     else
346     ts->JIS7Katakana = 0;
347    
348     /* Kanji Code (transmit) */
349     GetPrivateProfileString(Section, "KanjiSend", "",
350     Temp, sizeof(Temp), FName);
351     if (_stricmp(Temp, "EUC") == 0)
352     ts->KanjiCodeSend = IdEUC;
353     else if (_stricmp(Temp, "JIS") == 0)
354     ts->KanjiCodeSend = IdJIS;
355     else if (_stricmp(Temp, "UTF-8") == 0)
356     ts->KanjiCodeSend = IdUTF8;
357 doda 3420 else if (_stricmp(Temp, "KS5601") == 0)
358     ts->KanjiCode = IdSJIS;
359 maya 3227 else
360     ts->KanjiCodeSend = IdSJIS;
361 maya 3401 // KanjiCode/KanjiCodeSend �������� Language �����������l���u��������
362     {
363     WORD KanjiCodeSend = ts->KanjiCodeSend;
364     ts->KanjiCodeSend = KanjiCodeTranslate(ts->Language,KanjiCodeSend);
365     }
366 maya 3227
367     /* Katakana (receive) */
368     GetPrivateProfileString(Section, "KatakanaSend", "",
369     Temp, sizeof(Temp), FName);
370     if (_stricmp(Temp, "7") == 0)
371     ts->JIS7KatakanaSend = 1;
372     else
373     ts->JIS7KatakanaSend = 0;
374    
375     /* KanjiIn */
376     GetPrivateProfileString(Section, "KanjiIn", "",
377     Temp, sizeof(Temp), FName);
378     if (_stricmp(Temp, "@") == 0)
379     ts->KanjiIn = IdKanjiInA;
380     else
381     ts->KanjiIn = IdKanjiInB;
382    
383     /* KanjiOut */
384     GetPrivateProfileString(Section, "KanjiOut", "",
385     Temp, sizeof(Temp), FName);
386     if (_stricmp(Temp, "B") == 0)
387     ts->KanjiOut = IdKanjiOutB;
388     else if (_stricmp(Temp, "H") == 0)
389     ts->KanjiOut = IdKanjiOutH;
390     else
391     ts->KanjiOut = IdKanjiOutJ;
392    
393     /* Auto Win Switch VT<->TEK */
394     ts->AutoWinSwitch = GetOnOff(Section, "AutoWinSwitch", FName, FALSE);
395    
396     /* Terminal ID */
397     GetPrivateProfileString(Section, "TerminalID", "",
398     Temp, sizeof(Temp), FName);
399     ts->TerminalID = str2id(TermList, Temp, IdVT100);
400    
401     /* Russian character set (host) */
402     GetPrivateProfileString(Section, "RussHost", "",
403     Temp, sizeof(Temp), FName);
404     ts->RussHost = str2id(RussList, Temp, IdKOI8);
405    
406     /* Russian character set (client) */
407     GetPrivateProfileString(Section, "RussClient", "",
408     Temp, sizeof(Temp), FName);
409     ts->RussClient = str2id(RussList, Temp, IdWindows);
410    
411     /* Title String */
412     GetPrivateProfileString(Section, "Title", "Tera Term",
413     ts->Title, sizeof(ts->Title), FName);
414    
415     /* Cursor shape */
416     GetPrivateProfileString(Section, "CursorShape", "",
417     Temp, sizeof(Temp), FName);
418     if (_stricmp(Temp, "vertical") == 0)
419     ts->CursorShape = IdVCur;
420     else if (_stricmp(Temp, "horizontal") == 0)
421     ts->CursorShape = IdHCur;
422     else
423     ts->CursorShape = IdBlkCur;
424    
425     /* Hide title */
426     ts->HideTitle = GetOnOff(Section, "HideTitle", FName, FALSE);
427    
428     /* Popup menu */
429     ts->PopupMenu = GetOnOff(Section, "PopupMenu", FName, FALSE);
430    
431     /* PC-Style bold color mapping */
432     if (GetOnOff(Section, "PcBoldColor", FName, FALSE))
433     ts->ColorFlag |= CF_PCBOLD16;
434    
435     /* aixterm style 16 colors mode */
436     if (GetOnOff(Section, "Aixterm16Color", FName, FALSE))
437     ts->ColorFlag |= CF_AIXTERM16;
438    
439     /* xterm style 256 colors mode */
440     if (GetOnOff(Section, "Xterm256Color", FName, TRUE))
441     ts->ColorFlag |= CF_XTERM256;
442    
443     /* Enable scroll buffer */
444     ts->EnableScrollBuff =
445     GetOnOff(Section, "EnableScrollBuff", FName, TRUE);
446    
447     /* Scroll buffer size */
448     ts->ScrollBuffSize =
449     GetPrivateProfileInt(Section, "ScrollBuffSize", 100, FName);
450    
451     /* VT Color */
452     GetPrivateProfileString(Section, "VTColor", "0,0,0,255,255,255",
453     Temp, sizeof(Temp), FName);
454     for (i = 0; i <= 5; i++)
455     GetNthNum(Temp, i + 1, (int far *) &(ts->TmpColor[0][i]));
456     for (i = 0; i <= 1; i++)
457     ts->VTColor[i] = RGB((BYTE) ts->TmpColor[0][i * 3],
458     (BYTE) ts->TmpColor[0][i * 3 + 1],
459     (BYTE) ts->TmpColor[0][i * 3 + 2]);
460    
461     /* VT Bold Color */
462     GetPrivateProfileString(Section, "VTBoldColor", "0,0,255,255,255,255",
463     Temp, sizeof(Temp), FName);
464     for (i = 0; i <= 5; i++)
465     GetNthNum(Temp, i + 1, (int far *) &(ts->TmpColor[0][i]));
466     for (i = 0; i <= 1; i++)
467     ts->VTBoldColor[i] = RGB((BYTE) ts->TmpColor[0][i * 3],
468     (BYTE) ts->TmpColor[0][i * 3 + 1],
469     (BYTE) ts->TmpColor[0][i * 3 + 2]);
470     if (GetOnOff(Section, "EnableBoldAttrColor", FName, TRUE))
471     ts->ColorFlag |= CF_BOLDCOLOR;
472    
473     /* VT Blink Color */
474     GetPrivateProfileString(Section, "VTBlinkColor", "255,0,0,255,255,255",
475     Temp, sizeof(Temp), FName);
476     for (i = 0; i <= 5; i++)
477     GetNthNum(Temp, i + 1, (int far *) &(ts->TmpColor[0][i]));
478     for (i = 0; i <= 1; i++)
479     ts->VTBlinkColor[i] = RGB((BYTE) ts->TmpColor[0][i * 3],
480     (BYTE) ts->TmpColor[0][i * 3 + 1],
481     (BYTE) ts->TmpColor[0][i * 3 + 2]);
482     if (GetOnOff(Section, "EnableBlinkAttrColor", FName, TRUE))
483     ts->ColorFlag |= CF_BLINKCOLOR;
484    
485     /* VT Reverse Color */
486     GetPrivateProfileString(Section, "VTReverseColor", "255,255,255,0,0,0",
487     Temp, sizeof(Temp), FName);
488     for (i = 0; i <= 5; i++)
489     GetNthNum(Temp, i + 1, (int far *) &(ts->TmpColor[0][i]));
490     for (i = 0; i <= 1; i++)
491     ts->VTReverseColor[i] = RGB((BYTE) ts->TmpColor[0][i * 3],
492     (BYTE) ts->TmpColor[0][i * 3 + 1],
493     (BYTE) ts->TmpColor[0][i * 3 + 2]);
494     if (GetOnOff(Section, "EnableReverseAttrColor", FName, FALSE))
495     ts->ColorFlag |= CF_REVERSECOLOR;
496    
497     ts->EnableClickableUrl =
498     GetOnOff(Section, "EnableClickableUrl", FName, FALSE);
499    
500     /* URL Color */
501     GetPrivateProfileString(Section, "URLColor", "0,255,0,255,255,255",
502     Temp, sizeof(Temp), FName);
503     for (i = 0; i <= 5; i++)
504     GetNthNum(Temp, i + 1, (int far *) &(ts->TmpColor[0][i]));
505     for (i = 0; i <= 1; i++)
506     ts->URLColor[i] = RGB((BYTE) ts->TmpColor[0][i * 3],
507     (BYTE) ts->TmpColor[0][i * 3 + 1],
508     (BYTE) ts->TmpColor[0][i * 3 + 2]);
509     if (GetOnOff(Section, "EnableURLColor", FName, TRUE))
510     ts->ColorFlag |= CF_URLCOLOR;
511    
512 doda 3660 if (GetOnOff(Section, "URLUnderline", FName, TRUE))
513 doda 3666 ts->FontFlag |= FF_URLUNDERLINE;
514 doda 3660
515 maya 3227 /* TEK Color */
516     GetPrivateProfileString(Section, "TEKColor", "0,0,0,255,255,255",
517     Temp, sizeof(Temp), FName);
518     for (i = 0; i <= 5; i++)
519     GetNthNum(Temp, i + 1, (int far *) &(ts->TmpColor[0][i]));
520     for (i = 0; i <= 1; i++)
521     ts->TEKColor[i] = RGB((BYTE) ts->TmpColor[0][i * 3],
522     (BYTE) ts->TmpColor[0][i * 3 + 1],
523     (BYTE) ts->TmpColor[0][i * 3 + 2]);
524    
525     #ifndef NO_ANSI_COLOR_EXTENSION
526     /* ANSI color definition (in the case FullColor=on) -- special option
527     o UseTextColor should be off, or the background and foreground color of
528     VTColor are assigned to color-number 0 and 7 respectively, even if
529     they are specified in ANSIColor.
530     o ANSIColor is a set of 4 values that are color-number(0--15),
531     red-value(0--255), green-value(0--255) and blue-value(0--255). */
532     GetPrivateProfileString(Section, "ANSIColor",
533     " 0, 0, 0, 0,"
534     " 1,255, 0, 0,"
535     " 2, 0,255, 0,"
536     " 3,255,255, 0,"
537     " 4, 0, 0,255,"
538     " 5,255, 0,255,"
539     " 6, 0,255,255,"
540     " 7,255,255,255,"
541     " 8,128,128,128,"
542     " 9,128, 0, 0,"
543     "10, 0,128, 0,"
544     "11,128,128, 0,"
545     "12, 0, 0,128,"
546     "13,128, 0,128,"
547     "14, 0,128,128,"
548     "15,192,192,192", Temp, sizeof(Temp), FName);
549     {
550     char *t;
551     int n = 1;
552     for (t = Temp; *t; t++)
553     if (*t == ',')
554     n++;
555     n /= 4;
556     for (i = 0; i <= n; i++) {
557     int colorid, r, g, b;
558     GetNthNum(Temp, i * 4 + 1, (int far *) &colorid);
559     GetNthNum(Temp, i * 4 + 2, (int far *) &r);
560     GetNthNum(Temp, i * 4 + 3, (int far *) &g);
561     GetNthNum(Temp, i * 4 + 4, (int far *) &b);
562     ts->ANSIColor[colorid & 15] =
563     RGB((BYTE) r, (BYTE) g, (BYTE) b);
564     }
565     }
566     #endif /* NO_ANSI_COLOR_EXTENSION */
567    
568     TmpDC = GetDC(0); /* Get screen device context */
569     for (i = 0; i <= 1; i++)
570     ts->VTColor[i] = GetNearestColor(TmpDC, ts->VTColor[i]);
571     for (i = 0; i <= 1; i++)
572     ts->VTBoldColor[i] = GetNearestColor(TmpDC, ts->VTBoldColor[i]);
573     for (i = 0; i <= 1; i++)
574     ts->VTBlinkColor[i] = GetNearestColor(TmpDC, ts->VTBlinkColor[i]);
575     for (i = 0; i <= 1; i++)
576     ts->TEKColor[i] = GetNearestColor(TmpDC, ts->TEKColor[i]);
577     /* begin - ishizaki */
578     for (i = 0; i <= 1; i++)
579     ts->URLColor[i] = GetNearestColor(TmpDC, ts->URLColor[i]);
580     /* end - ishizaki */
581     #ifndef NO_ANSI_COLOR_EXTENSION
582     for (i = 0; i < 16; i++)
583     ts->ANSIColor[i] = GetNearestColor(TmpDC, ts->ANSIColor[i]);
584     #endif /* NO_ANSI_COLOR_EXTENSION */
585     ReleaseDC(0, TmpDC);
586     if (GetOnOff(Section, "EnableANSIColor", FName, TRUE))
587     ts->ColorFlag |= CF_ANSICOLOR;
588    
589     /* TEK color emulation */
590     ts->TEKColorEmu = GetOnOff(Section, "TEKColorEmulation", FName, FALSE);
591    
592     /* VT Font */
593     GetPrivateProfileString(Section, "VTFont", "Terminal,0,-13,1",
594     Temp, sizeof(Temp), FName);
595     GetNthString(Temp, 1, sizeof(ts->VTFont), ts->VTFont);
596     GetNthNum(Temp, 2, (int far *) &(ts->VTFontSize.x));
597     GetNthNum(Temp, 3, (int far *) &(ts->VTFontSize.y));
598     GetNthNum(Temp, 4, &(ts->VTFontCharSet));
599    
600     /* Bold font flag */
601 doda 3666 if (GetOnOff(Section, "EnableBold", FName, TRUE))
602     ts->FontFlag |= FF_BOLD;
603 maya 3227
604     /* Russian character set (font) */
605     GetPrivateProfileString(Section, "RussFont", "",
606     Temp, sizeof(Temp), FName);
607     ts->RussFont = str2id(RussList, Temp, IdWindows);
608    
609     /* TEK Font */
610     GetPrivateProfileString(Section, "TEKFont", "Courier,0,-13,0",
611     Temp, sizeof(Temp), FName);
612     GetNthString(Temp, 1, sizeof(ts->TEKFont), ts->TEKFont);
613     GetNthNum(Temp, 2, (int far *) &(ts->TEKFontSize.x));
614     GetNthNum(Temp, 3, (int far *) &(ts->TEKFontSize.y));
615     GetNthNum(Temp, 4, &(ts->TEKFontCharSet));
616    
617     /* BS key */
618     GetPrivateProfileString(Section, "BSKey", "",
619     Temp, sizeof(Temp), FName);
620     if (_stricmp(Temp, "DEL") == 0)
621     ts->BSKey = IdDEL;
622     else
623     ts->BSKey = IdBS;
624     /* Delete key */
625     ts->DelKey = GetOnOff(Section, "DeleteKey", FName, FALSE);
626    
627     /* Meta Key */
628     ts->MetaKey = GetOnOff(Section, "MetaKey", FName, FALSE);
629    
630     /* Application Keypad */
631     ts->DisableAppKeypad =
632     GetOnOff(Section, "DisableAppKeypad", FName, FALSE);
633    
634     /* Application Cursor */
635     ts->DisableAppCursor =
636     GetOnOff(Section, "DisableAppCursor", FName, FALSE);
637    
638     /* Russian keyboard type */
639     GetPrivateProfileString(Section, "RussKeyb", "",
640     Temp, sizeof(Temp), FName);
641     ts->RussKeyb = str2id(RussList2, Temp, IdWindows);
642    
643     /* Serial port ID */
644     ts->ComPort = GetPrivateProfileInt(Section, "ComPort", 1, FName);
645    
646     /* Baud rate */
647     GetPrivateProfileString(Section, "BaudRate", "9600",
648     Temp, sizeof(Temp), FName);
649     ts->Baud = str2id(BaudList, Temp, IdBaud9600);
650    
651     /* Parity */
652     GetPrivateProfileString(Section, "Parity", "",
653     Temp, sizeof(Temp), FName);
654     if (_stricmp(Temp, "even") == 0)
655     ts->Parity = IdParityEven;
656     else if (_stricmp(Temp, "odd") == 0)
657     ts->Parity = IdParityOdd;
658     else
659     ts->Parity = IdParityNone;
660    
661     /* Data bit */
662     GetPrivateProfileString(Section, "DataBit", "",
663     Temp, sizeof(Temp), FName);
664     if (_stricmp(Temp, "7") == 0)
665     ts->DataBit = IdDataBit7;
666     else
667     ts->DataBit = IdDataBit8;
668    
669     /* Stop bit */
670     GetPrivateProfileString(Section, "StopBit", "",
671     Temp, sizeof(Temp), FName);
672     if (_stricmp(Temp, "2") == 0)
673     ts->StopBit = IdStopBit2;
674     else
675     ts->StopBit = IdStopBit1;
676    
677     /* Flow control */
678     GetPrivateProfileString(Section, "FlowCtrl", "",
679     Temp, sizeof(Temp), FName);
680     if (_stricmp(Temp, "x") == 0)
681     ts->Flow = IdFlowX;
682     else if (_stricmp(Temp, "hard") == 0)
683     ts->Flow = IdFlowHard;
684     else
685     ts->Flow = IdFlowNone;
686    
687     /* Delay per character */
688     ts->DelayPerChar =
689     GetPrivateProfileInt(Section, "DelayPerChar", 0, FName);
690    
691     /* Delay per line */
692     ts->DelayPerLine =
693     GetPrivateProfileInt(Section, "DelayPerLine", 0, FName);
694    
695     /* Telnet flag */
696     ts->Telnet = GetOnOff(Section, "Telnet", FName, TRUE);
697    
698     /* Telnet terminal type */
699     GetPrivateProfileString(Section, "TermType", "xterm", ts->TermType,
700     sizeof(ts->TermType), FName);
701    
702     /* TCP port num */
703     ts->TCPPort =
704     GetPrivateProfileInt(Section, "TCPPort", ts->TelPort, FName);
705    
706     /* Auto window close flag */
707     ts->AutoWinClose = GetOnOff(Section, "AutoWinClose", FName, TRUE);
708    
709     /* History list */
710     ts->HistoryList = GetOnOff(Section, "HistoryList", FName, FALSE);
711    
712     /* File transfer binary flag */
713     ts->TransBin = GetOnOff(Section, "TransBin", FName, FALSE);
714    
715     /* Log append */
716     ts->Append = GetOnOff(Section, "LogAppend", FName, FALSE);
717    
718     /* Log plain text (2005.5.7 yutaka) */
719     ts->LogTypePlainText =
720     GetOnOff(Section, "LogTypePlainText", FName, FALSE);
721    
722     /* Log with timestamp (2006.7.23 maya) */
723     ts->LogTimestamp = GetOnOff(Section, "LogTimestamp", FName, FALSE);
724    
725     /* Log without transfer dialog */
726     ts->LogHideDialog = GetOnOff(Section, "LogHideDialog", FName, FALSE);
727    
728     /* Default Log file name (2006.8.28 maya) */
729     GetPrivateProfileString(Section, "LogDefaultName", "teraterm.log",
730     ts->LogDefaultName, sizeof(ts->LogDefaultName),
731     FName);
732    
733     /* Default Log file path (2007.5.30 maya) */
734     GetPrivateProfileString(Section, "LogDefaultPath", "",
735     ts->LogDefaultPath, sizeof(ts->LogDefaultPath),
736     FName);
737    
738     /* Auto start logging (2007.5.31 maya) */
739     ts->LogAutoStart = GetOnOff(Section, "LogAutoStart", FName, FALSE);
740    
741     /* XMODEM option */
742     GetPrivateProfileString(Section, "XmodemOpt", "",
743     Temp, sizeof(Temp), FName);
744     if (_stricmp(Temp, "crc") == 0)
745     ts->XmodemOpt = XoptCRC;
746     else if (_stricmp(Temp, "1k") == 0)
747     ts->XmodemOpt = Xopt1K;
748     else
749     ts->XmodemOpt = XoptCheck;
750    
751     /* XMODEM binary file */
752     ts->XmodemBin = GetOnOff(Section, "XmodemBin", FName, TRUE);
753    
754     /* XMODEM ���M�R�}���h (2007.12.21 yutaka) */
755     GetPrivateProfileString(Section, "XModemRcvCommand", "",
756     ts->XModemRcvCommand,
757     sizeof(ts->XModemRcvCommand), FName);
758    
759     /* Default directory for file transfer */
760     GetPrivateProfileString(Section, "FileDir", "",
761     ts->FileDir, sizeof(ts->FileDir), FName);
762     if (strlen(ts->FileDir) == 0)
763     strncpy_s(ts->FileDir, sizeof(ts->FileDir), ts->HomeDir, _TRUNCATE);
764     else {
765     _getcwd(Temp, sizeof(Temp));
766     if (_chdir(ts->FileDir) != 0)
767     strncpy_s(ts->FileDir, sizeof(ts->FileDir), ts->HomeDir, _TRUNCATE);
768     _chdir(Temp);
769     }
770    
771     /* filter on file send (2007.6.5 maya) */
772     GetPrivateProfileString(Section, "FileSendFilter", "",
773     ts->FileSendFilter, sizeof(ts->FileSendFilter),
774     FName);
775    
776     /*--------------------------------------------------*/
777     /* 8 bit control code flag -- special option */
778     if (GetOnOff(Section, "Accept8BitCtrl", FName, TRUE))
779     ts->TermFlag |= TF_ACCEPT8BITCTRL;
780    
781     /* Wrong sequence flag -- special option */
782     if (GetOnOff(Section, "AllowWrongSequence", FName, FALSE))
783     ts->TermFlag |= TF_ALLOWWRONGSEQUENCE;
784    
785     if (((ts->TermFlag & TF_ALLOWWRONGSEQUENCE) == 0) &&
786     (ts->KanjiOut == IdKanjiOutH))
787     ts->KanjiOut = IdKanjiOutJ;
788    
789     // Auto file renaming --- special option
790     if (GetOnOff(Section, "AutoFileRename", FName, FALSE))
791     ts->FTFlag |= FT_RENAME;
792    
793     // Auto invoking (character set->G0->GL) --- special option
794     if (GetOnOff(Section, "AutoInvoke", FName, FALSE))
795     ts->TermFlag |= TF_AUTOINVOKE;
796    
797     // Auto text copy --- special option
798     ts->AutoTextCopy = GetOnOff(Section, "AutoTextCopy", FName, TRUE);
799    
800     /* Back wrap -- special option */
801     if (GetOnOff(Section, "BackWrap", FName, FALSE))
802     ts->TermFlag |= TF_BACKWRAP;
803    
804     /* Beep type -- special option */
805     GetPrivateProfileString(Section, "Beep", "", Temp, sizeof(Temp), FName);
806     if (_stricmp(Temp, "off") == 0)
807     ts->Beep = IdBeepOff;
808     else if (_stricmp(Temp, "visual") == 0)
809     ts->Beep = IdBeepVisual;
810     else
811     ts->Beep = IdBeepOn;
812    
813     /* Beep on connection & disconnection -- special option */
814     if (GetOnOff(Section, "BeepOnConnect", FName, FALSE))
815     ts->PortFlag |= PF_BEEPONCONNECT;
816    
817     /* Auto B-Plus activation -- special option */
818     if (GetOnOff(Section, "BPAuto", FName, FALSE))
819     ts->FTFlag |= FT_BPAUTO;
820     if ((ts->FTFlag & FT_BPAUTO) != 0) { /* Answerback */
821     strncpy_s(ts->Answerback, sizeof(ts->Answerback), "\020++\0200",
822     _TRUNCATE);
823     ts->AnswerbackLen = 5;
824     }
825    
826     /* B-Plus ESCCTL flag -- special option */
827     if (GetOnOff(Section, "BPEscCtl", FName, FALSE))
828     ts->FTFlag |= FT_BPESCCTL;
829    
830     /* B-Plus log -- special option */
831     if (GetOnOff(Section, "BPLog", FName, FALSE))
832     ts->LogFlag |= LOG_BP;
833    
834     /* Clear serial port buffer when port opening -- special option */
835     ts->ClearComBuffOnOpen =
836     GetOnOff(Section, "ClearComBuffOnOpen", FName, TRUE);
837    
838     /* Confirm disconnection -- special option */
839     if (GetOnOff(Section, "ConfirmDisconnect", FName, TRUE))
840     ts->PortFlag |= PF_CONFIRMDISCONN;
841    
842     /* Ctrl code in Kanji -- special option */
843     if (GetOnOff(Section, "CtrlInKanji", FName, TRUE))
844     ts->TermFlag |= TF_CTRLINKANJI;
845    
846     /* Debug flag -- special option */
847     ts->Debug = GetOnOff(Section, "Debug", FName, FALSE);
848    
849     /* Delimiter list -- special option */
850     GetPrivateProfileString(Section, "DelimList",
851     "$20!\"#$24%&\'()*+,-./:;<=>?@[\\]^`{|}~",
852     Temp, sizeof(Temp), FName);
853     Hex2Str(Temp, ts->DelimList, sizeof(ts->DelimList));
854    
855     /* regard DBCS characters as delimiters -- special option */
856     ts->DelimDBCS = GetOnOff(Section, "DelimDBCS", FName, TRUE);
857    
858     // Enable popup menu -- special option
859     if (!GetOnOff(Section, "EnablePopupMenu", FName, TRUE))
860     ts->MenuFlag |= MF_NOPOPUP;
861    
862     // Enable "Show menu" -- special option
863     if (!GetOnOff(Section, "EnableShowMenu", FName, TRUE))
864     ts->MenuFlag |= MF_NOSHOWMENU;
865    
866     // Enable the status line -- special option
867     if (GetOnOff(Section, "EnableStatusLine", FName, TRUE))
868     ts->TermFlag |= TF_ENABLESLINE;
869    
870     // fixed JIS --- special
871     if (GetOnOff(Section, "FixedJIS", FName, FALSE))
872     ts->TermFlag |= TF_FIXEDJIS;
873    
874     /* IME Flag -- special option */
875     ts->UseIME = GetOnOff(Section, "IME", FName, TRUE);
876    
877     /* IME-inline Flag -- special option */
878     ts->IMEInline = GetOnOff(Section, "IMEInline", FName, TRUE);
879    
880     /* Kermit log -- special option */
881     if (GetOnOff(Section, "KmtLog", FName, FALSE))
882     ts->LogFlag |= LOG_KMT;
883    
884     // Enable language selection -- special option
885     if (!GetOnOff(Section, "LanguageSelection", FName, TRUE))
886     ts->MenuFlag |= MF_NOLANGUAGE;
887    
888     /* Maximum scroll buffer size -- special option */
889     ts->ScrollBuffMax =
890     GetPrivateProfileInt(Section, "MaxBuffSize", 10000, FName);
891     if (ts->ScrollBuffMax < 24)
892     ts->ScrollBuffMax = 10000;
893    
894     /* Max com port number -- special option */
895     ts->MaxComPort = GetPrivateProfileInt(Section, "MaxComPort", 4, FName);
896     if (ts->MaxComPort < 4)
897     ts->MaxComPort = 4;
898     // COM16����99���g�� (2005.11.30 yutaka)
899     // 99����200���g�� (2007.7.23 maya)
900     if (ts->MaxComPort > MAXCOMPORT)
901     ts->MaxComPort = MAXCOMPORT;
902     if ((ts->ComPort < 1) || (ts->ComPort > ts->MaxComPort))
903     ts->ComPort = 1;
904    
905     /* Non-blinking cursor -- special option */
906     ts->NonblinkingCursor =
907     GetOnOff(Section, "NonblinkingCursor", FName, FALSE);
908    
909     // �t�H�[�J�X���������|���S���J�[�\�� (2008.1.24 yutaka)
910     ts->KillFocusCursor =
911     GetOnOff(Section, "KillFocusCursor", FName, TRUE);
912    
913     /* Delay for pass-thru printing activation */
914     /* -- special option */
915     ts->PassThruDelay =
916     GetPrivateProfileInt(Section, "PassThruDelay", 3, FName);
917    
918     /* Printer port for pass-thru printing */
919     /* -- special option */
920     GetPrivateProfileString(Section, "PassThruPort", "",
921     ts->PrnDev, sizeof(ts->PrnDev), FName);
922    
923     /* Printer Font --- special option */
924     GetPrivateProfileString(Section, "PrnFont", "",
925     Temp, sizeof(Temp), FName);
926     if (strlen(Temp) == 0) {
927     ts->PrnFont[0] = 0;
928     ts->PrnFontSize.x = 0;
929     ts->PrnFontSize.y = 0;
930     ts->PrnFontCharSet = 0;
931     }
932     else {
933     GetNthString(Temp, 1, sizeof(ts->PrnFont), ts->PrnFont);
934     GetNthNum(Temp, 2, (int far *) &(ts->PrnFontSize.x));
935     GetNthNum(Temp, 3, (int far *) &(ts->PrnFontSize.y));
936     GetNthNum(Temp, 4, &(ts->PrnFontCharSet));
937     }
938    
939     // Page margins (left, right, top, bottom) for printing
940     // -- special option
941     GetPrivateProfileString(Section, "PrnMargin", "50,50,50,50",
942     Temp, sizeof(Temp), FName);
943     for (i = 0; i <= 3; i++)
944     GetNthNum(Temp, 1 + i, &ts->PrnMargin[i]);
945    
946     /* Quick-VAN log -- special option */
947     if (GetOnOff(Section, "QVLog", FName, FALSE))
948     ts->LogFlag |= LOG_QV;
949    
950     /* Quick-VAN window size -- special */
951     ts->QVWinSize = GetPrivateProfileInt(Section, "QVWinSize", 8, FName);
952    
953     /* Russian character set (print) -- special option */
954     GetPrivateProfileString(Section, "RussPrint", "",
955     Temp, sizeof(Temp), FName);
956     ts->RussPrint = str2id(RussList, Temp, IdWindows);
957    
958     /* Scroll threshold -- special option */
959     ts->ScrollThreshold =
960     GetPrivateProfileInt(Section, "ScrollThreshold", 12, FName);
961    
962     ts->MouseWheelScrollLine =
963     GetPrivateProfileInt(Section, "MouseWheelScrollLine", 3, FName);
964    
965     // Select on activate -- special option
966     ts->SelOnActive = GetOnOff(Section, "SelectOnActivate", FName, TRUE);
967    
968     /* Send 8bit control sequence -- special option */
969     ts->Send8BitCtrl = GetOnOff(Section, "Send8BitCtrl", FName, FALSE);
970    
971     /* Startup macro -- special option */
972     GetPrivateProfileString(Section, "StartupMacro", "",
973     ts->MacroFN, sizeof(ts->MacroFN), FName);
974    
975     /* TEK GIN Mouse keycode -- special option */
976     ts->GINMouseCode =
977     GetPrivateProfileInt(Section, "TEKGINMouseCode", 32, FName);
978    
979     /* Telnet Auto Detect -- special option */
980     ts->TelAutoDetect = GetOnOff(Section, "TelAutoDetect", FName, TRUE);
981    
982     /* Telnet binary flag -- special option */
983     ts->TelBin = GetOnOff(Section, "TelBin", FName, FALSE);
984    
985     /* Telnet Echo flag -- special option */
986     ts->TelEcho = GetOnOff(Section, "TelEcho", FName, FALSE);
987    
988     /* Telnet log -- special option */
989     if (GetOnOff(Section, "TelLog", FName, FALSE))
990     ts->LogFlag |= LOG_TEL;
991    
992     /* TCP port num for telnet -- special option */
993     ts->TelPort = GetPrivateProfileInt(Section, "TelPort", 23, FName);
994    
995     /* Telnet keep-alive packet(NOP command) interval -- special option */
996     ts->TelKeepAliveInterval =
997     GetPrivateProfileInt(Section, "TelKeepAliveInterval", 300, FName);
998    
999     /* Max number of broadcast commad history */
1000     ts->MaxBroadcatHistory =
1001     GetPrivateProfileInt(Section, "MaxBroadcatHistory", 99, FName);
1002    
1003     /* Local echo for non-telnet */
1004     ts->TCPLocalEcho = GetOnOff(Section, "TCPLocalEcho", FName, FALSE);
1005    
1006     /* "new-line (transmit)" option for non-telnet -- special option */
1007     GetPrivateProfileString(Section, "TCPCRSend", "",
1008     Temp, sizeof(Temp), FName);
1009     if (_stricmp(Temp, "CR") == 0)
1010     ts->TCPCRSend = IdCR;
1011     else if (_stricmp(Temp, "CRLF") == 0)
1012     ts->TCPCRSend = IdCRLF;
1013     else
1014     ts->TCPCRSend = 0; // disabled
1015    
1016     /* Use text (background) color for "white (black)" --- special option */
1017     if (GetOnOff(Section, "UseTextColor", FName, FALSE))
1018     ts->ColorFlag |= CF_USETEXTCOLOR;
1019    
1020     /* Title format -- special option */
1021     ts->TitleFormat =
1022     GetPrivateProfileInt(Section, "TitleFormat", 5, FName);
1023    
1024     /* VT Compatible Tab -- special option */
1025     ts->VTCompatTab = GetOnOff(Section, "VTCompatTab", FName, FALSE);
1026    
1027     /* VT Font space --- special option */
1028     GetPrivateProfileString(Section, "VTFontSpace", "0,0,0,0",
1029     Temp, sizeof(Temp), FName);
1030     GetNthNum(Temp, 1, &ts->FontDX);
1031     GetNthNum(Temp, 2, &ts->FontDW);
1032     GetNthNum(Temp, 3, &ts->FontDY);
1033     GetNthNum(Temp, 4, &ts->FontDH);
1034     if (ts->FontDX < 0)
1035     ts->FontDX = 0;
1036     if (ts->FontDW < 0)
1037     ts->FontDW = 0;
1038     ts->FontDW = ts->FontDW + ts->FontDX;
1039     if (ts->FontDY < 0)
1040     ts->FontDY = 0;
1041     if (ts->FontDH < 0)
1042     ts->FontDH = 0;
1043     ts->FontDH = ts->FontDH + ts->FontDY;
1044    
1045     // VT-print scaling factors (pixels per inch) --- special option
1046     GetPrivateProfileString(Section, "VTPPI", "0,0",
1047     Temp, sizeof(Temp), FName);
1048     GetNthNum(Temp, 1, (int far *) &ts->VTPPI.x);
1049     GetNthNum(Temp, 2, (int far *) &ts->VTPPI.y);
1050    
1051     // TEK-print scaling factors (pixels per inch) --- special option
1052     GetPrivateProfileString(Section, "TEKPPI", "0,0",
1053     Temp, sizeof(Temp), FName);
1054     GetNthNum(Temp, 1, (int far *) &ts->TEKPPI.x);
1055     GetNthNum(Temp, 2, (int far *) &ts->TEKPPI.y);
1056    
1057     // Show "Window" menu -- special option
1058     if (GetOnOff(Section, "WindowMenu", FName, TRUE))
1059     ts->MenuFlag |= MF_SHOWWINMENU;
1060    
1061     /* XMODEM log -- special option */
1062     if (GetOnOff(Section, "XmodemLog", FName, FALSE))
1063     ts->LogFlag |= LOG_X;
1064    
1065     /* YMODEM log -- special option */
1066     if (GetOnOff(Section, "YmodemLog", FName, FALSE))
1067     ts->LogFlag |= LOG_Y;
1068    
1069     /* Auto ZMODEM activation -- special option */
1070     if (GetOnOff(Section, "ZmodemAuto", FName, FALSE))
1071     ts->FTFlag |= FT_ZAUTO;
1072    
1073     /* ZMODEM data subpacket length for sending -- special */
1074     ts->ZmodemDataLen =
1075     GetPrivateProfileInt(Section, "ZmodemDataLen", 1024, FName);
1076     /* ZMODEM window size for sending -- special */
1077     ts->ZmodemWinSize =
1078     GetPrivateProfileInt(Section, "ZmodemWinSize", 32767, FName);
1079    
1080     /* ZMODEM ESCCTL flag -- special option */
1081     if (GetOnOff(Section, "ZmodemEscCtl", FName, FALSE))
1082     ts->FTFlag |= FT_ZESCCTL;
1083    
1084     /* ZMODEM log -- special option */
1085     if (GetOnOff(Section, "ZmodemLog", FName, FALSE))
1086     ts->LogFlag |= LOG_Z;
1087    
1088     /* ZMODEM ���M�R�}���h (2007.12.21 yutaka) */
1089     GetPrivateProfileString(Section, "ZModemRcvCommand", "rz",
1090     ts->ZModemRcvCommand, sizeof(ts->ZModemRcvCommand), FName);
1091    
1092     #ifndef NO_COPYLINE_FIX
1093    
1094     /* Enable continued-line copy -- special option */
1095     ts->EnableContinuedLineCopy =
1096     GetOnOff(Section, "EnableContinuedLineCopy", FName, FALSE);
1097     #endif /* NO_COPYLINE_FIX */
1098    
1099     ts->DisablePasteMouseRButton =
1100     GetOnOff(Section, "DisablePasteMouseRButton", FName, FALSE);
1101    
1102     // added DisablePasteMouseMButton (2008.3.2 maya)
1103     ts->DisablePasteMouseMButton =
1104     GetOnOff(Section, "DisablePasteMouseMButton", FName, TRUE);
1105    
1106     // added ConfirmPasteMouseRButton (2007.3.17 maya)
1107     ts->ConfirmPasteMouseRButton =
1108     GetOnOff(Section, "ConfirmPasteMouseRButton", FName, FALSE);
1109    
1110     // added ConfirmChangePaste (2008.2.3 yutaka)
1111     ts->ConfirmChangePaste =
1112     GetOnOff(Section, "ConfirmChangePaste", FName, TRUE);
1113 yutakapon 3535 GetPrivateProfileString(Section, "ConfirmChangePasteStringFile", "",
1114     Temp, sizeof(Temp), FName);
1115     strncpy_s(ts->ConfirmChangePasteStringFile, sizeof(ts->ConfirmChangePasteStringFile), Temp,
1116     _TRUNCATE);
1117 maya 3227
1118     // added ScrollWindowClearScreen (2008.5.3 yutaka)
1119     ts->ScrollWindowClearScreen =
1120     GetOnOff(Section, "ScrollWindowClearScreen", FName, TRUE);
1121    
1122     // added SelectOnlyByLButton (2007.11.20 maya)
1123     ts->SelectOnlyByLButton =
1124     GetOnOff(Section, "SelectOnlyByLButton", FName, TRUE);
1125    
1126     // added DisableAcceleratorSendBreak (2007.3.17 maya)
1127     ts->DisableAcceleratorSendBreak =
1128     GetOnOff(Section, "DisableAcceleratorSendBreak", FName, FALSE);
1129    
1130     // WinSock connecting timeout value (2007.1.11 yutaka)
1131     ts->ConnectingTimeout =
1132     GetPrivateProfileInt(Section, "ConnectingTimeout", 0, FName);
1133    
1134     // mouse cursor
1135     GetPrivateProfileString(Section, "MouseCursor", "IBEAM",
1136     Temp, sizeof(Temp), FName);
1137     strncpy_s(ts->MouseCursorName, sizeof(ts->MouseCursorName), Temp,
1138     _TRUNCATE);
1139    
1140     // Translucent window
1141     ts->AlphaBlend =
1142     GetPrivateProfileInt(Section, "AlphaBlend ", 255, FName);
1143     ts->AlphaBlend = max(0, ts->AlphaBlend);
1144     ts->AlphaBlend = min(255, ts->AlphaBlend);
1145    
1146     // Cygwin install path
1147     GetPrivateProfileString(Section, "CygwinDirectory ", "c:\\cygwin",
1148     Temp, sizeof(Temp), FName);
1149     strncpy_s(ts->CygwinDirectory, sizeof(ts->CygwinDirectory), Temp,
1150     _TRUNCATE);
1151    
1152     // Viewlog Editor path
1153     GetPrivateProfileString(Section, "ViewlogEditor ", "notepad.exe",
1154     Temp, sizeof(Temp), FName);
1155     strncpy_s(ts->ViewlogEditor, sizeof(ts->ViewlogEditor), Temp,
1156     _TRUNCATE);
1157    
1158     // Locale for UTF-8
1159     GetPrivateProfileString(Section, "Locale ", DEFAULT_LOCALE,
1160     Temp, sizeof(Temp), FName);
1161     strncpy_s(ts->Locale, sizeof(ts->Locale), Temp, _TRUNCATE);
1162    
1163     // CodePage
1164     ts->CodePage =
1165     GetPrivateProfileInt(Section, "CodePage ", DEFAULT_CODEPAGE,
1166     FName);
1167    
1168     // UI language message file
1169     GetPrivateProfileString(Section, "UILanguageFile", "lang\\Default.lng",
1170     Temp, sizeof(Temp), FName);
1171     {
1172     char CurDir[MAX_PATH];
1173    
1174     // �t���p�X�������O������������������������������
1175     strncpy_s(ts->UILanguageFile_ini, sizeof(ts->UILanguageFile_ini), Temp, _TRUNCATE);
1176    
1177     GetCurrentDirectory(sizeof(CurDir), CurDir);
1178     SetCurrentDirectory(ts->HomeDir);
1179     _fullpath(ts->UILanguageFile, Temp, sizeof(ts->UILanguageFile));
1180     SetCurrentDirectory(CurDir);
1181     }
1182    
1183     // Broadcast Command History (2007.3.3 maya)
1184     ts->BroadcastCommandHistory =
1185     GetOnOff(Section, "BroadcastCommandHistory", FName, FALSE);
1186    
1187     // 337: 2007/03/20 Accept Broadcast
1188     ts->AcceptBroadcast =
1189     GetOnOff(Section, "AcceptBroadcast", FName, TRUE);
1190    
1191     // Confirm send a file when drag and drop (2007.12.28 maya)
1192     ts->ConfirmFileDragAndDrop =
1193     GetOnOff(Section, "ConfirmFileDragAndDrop", FName, TRUE);
1194    
1195     // Translate mouse wheel to cursor key when application cursor mode
1196     ts->TranslateWheelToCursor =
1197     GetOnOff(Section, "TranslateWheelToCursor", FName, TRUE);
1198    
1199     // Display "New Connection" dialog on startup (2008.1.18 maya)
1200     ts->HostDialogOnStartup =
1201     GetOnOff(Section, "HostDialogOnStartup", FName, TRUE);
1202    
1203     // Mouse event tracking
1204     ts->MouseEventTracking =
1205     GetOnOff(Section, "MouseEventTracking", FName, TRUE);
1206    
1207     // Maximized bug tweak
1208     ts->MaximizedBugTweak =
1209     GetOnOff(Section, "MaximizedBugTweak", FName, TRUE);
1210    
1211     // Convert Unicode symbol characters to DEC Special characters
1212     ts->UnicodeDecSpMapping =
1213     GetPrivateProfileInt(Section, "UnicodeToDecSpMapping", 3, FName);
1214    
1215     // VT Window Icon
1216     GetPrivateProfileString(Section, "VTIcon", "Default",
1217     Temp, sizeof(Temp), FName);
1218     ts->VTIcon = IconName2IconId(Temp);
1219    
1220     // Tek Window Icon
1221     GetPrivateProfileString(Section, "TEKIcon", "Default",
1222     Temp, sizeof(Temp), FName);
1223     ts->TEKIcon = IconName2IconId(Temp);
1224    
1225     // Unknown Unicode Character
1226     ts->UnknownUnicodeCharaAsWide =
1227     GetOnOff(Section, "UnknownUnicodeCharacterAsWide", FName, FALSE);
1228    
1229     #ifdef USE_NORMAL_BGCOLOR
1230     // UseNormalBGColor
1231     ts->UseNormalBGColor =
1232     GetOnOff(Section, "UseNormalBGColor", FName, FALSE);
1233     // 2006/03/11 by 337
1234     if (ts->UseNormalBGColor) {
1235     ts->VTBoldColor[1] =
1236     ts->VTBlinkColor[1] = ts->URLColor[1] = ts->VTColor[1];
1237     }
1238     #endif
1239    
1240     // AutoScrollOnlyInBottomLine
1241     ts->AutoScrollOnlyInBottomLine =
1242     GetOnOff(Section, "AutoScrollOnlyInBottomLine", FName, FALSE);
1243    
1244     // Accept remote-controlled window title changing
1245     GetPrivateProfileString(Section, "AcceptTitleChangeRequest", "overwrite",
1246     Temp, sizeof(Temp), FName);
1247     if (_stricmp(Temp, "overwrite") == 0 || _stricmp(Temp, "on") == 0)
1248     ts->AcceptTitleChangeRequest = IdTitleChangeRequestOverwrite;
1249     else if (_stricmp(Temp, "ahead") == 0)
1250     ts->AcceptTitleChangeRequest = IdTitleChangeRequestAhead;
1251     else if (_stricmp(Temp, "last") == 0)
1252     ts->AcceptTitleChangeRequest = IdTitleChangeRequestLast;
1253     else
1254     ts->AcceptTitleChangeRequest = IdTitleChangeRequestOff;
1255    
1256     // Size of paste confirm dialog
1257     GetPrivateProfileString(Section, "PasteDialogSize", "330,220",
1258     Temp, sizeof(Temp), FName);
1259     GetNthNum(Temp, 1, &ts->PasteDialogSize.cx);
1260     GetNthNum(Temp, 2, &ts->PasteDialogSize.cy);
1261     if (ts->PasteDialogSize.cx < 0)
1262     ts->PasteDialogSize.cx = 330;
1263     if (ts->PasteDialogSize.cy < 0)
1264     ts->PasteDialogSize.cy = 220;
1265    
1266     // Disable mouse event tracking when Control-Key is pressed.
1267     ts->DisableMouseTrackingByCtrl =
1268     GetOnOff(Section, "DisableMouseTrackingByCtrl", FName, TRUE);
1269    
1270     // Disable TranslateWheelToCursor setting when Control-Key is pressed.
1271     ts->DisableWheelToCursorByCtrl =
1272     GetOnOff(Section, "DisableWheelToCursorByCtrl", FName, TRUE);
1273    
1274     // Strict Key Mapping.
1275     ts->StrictKeyMapping =
1276     GetOnOff(Section, "StrictKeyMapping", FName, FALSE);
1277    
1278     // added Wait4allMacroCommand (2009.3.23 yutaka)
1279     ts->Wait4allMacroCommand =
1280     GetOnOff(Section, "Wait4allMacroCommand", FName, FALSE);
1281 maya 3279
1282 maya 3283 // added DisableMenuSendBreak (2009.4.6 maya)
1283     ts->DisableMenuSendBreak =
1284     GetOnOff(Section, "DisableMenuSendBreak", FName, FALSE);
1285 maya 3282
1286 maya 3283 // added ClearScreenOnCloseConnection (2009.4.6 maya)
1287     ts->ClearScreenOnCloseConnection =
1288     GetOnOff(Section, "ClearScreenOnCloseConnection", FName, FALSE);
1289    
1290     // added DisableAcceleratorDuplicateSession (2009.4.6 maya)
1291 maya 3282 ts->DisableAcceleratorDuplicateSession =
1292     GetOnOff(Section, "DisableAcceleratorDuplicateSession", FName, FALSE);
1293 maya 3306
1294     // added PasteDelayPerLine (2009.4.12 maya)
1295     ts->PasteDelayPerLine =
1296     GetPrivateProfileInt(Section, "PasteDelayPerLine", 10, FName);
1297 maya 3315 {
1298     int tmp = min(max(0, ts->PasteDelayPerLine), 5000);
1299     ts->PasteDelayPerLine = tmp;
1300     }
1301 doda 3395
1302     // Font scaling -- test
1303     ts->FontScaling = GetOnOff(Section, "FontScaling", FName, FALSE);
1304 doda 3441
1305     // Meta sets MSB
1306 doda 3507 GetPrivateProfileString(Section, "Meta8Bit", "off", Temp, sizeof(Temp), FName);
1307     if (_stricmp(Temp, "raw") == 0 || _stricmp(Temp, "on") == 0)
1308     ts->Meta8Bit = IdMeta8BitRaw;
1309     else if (_stricmp(Temp, "text") == 0)
1310     ts->Meta8Bit = IdMeta8BitText;
1311     else
1312     ts->Meta8Bit = IdMeta8BitOff;
1313    
1314 maya 3479 // Window control sequence
1315 doda 3485 if (GetOnOff(Section, "WindowCtrlSequence", FName, TRUE))
1316     ts->WindowFlag |= WF_WINDOWCHANGE;
1317 maya 3479
1318     // Cursor control sequence
1319 doda 3485 if (GetOnOff(Section, "CursorCtrlSequence", FName, FALSE))
1320     ts->WindowFlag |= WF_CURSORCHANGE;
1321    
1322     // Window report sequence
1323     if (GetOnOff(Section, "WindowReportSequence", FName, TRUE))
1324     ts->WindowFlag |= WF_WINDOWREPORT;
1325    
1326     // Window report sequence
1327     if (GetOnOff(Section, "TitleReportSequence", FName, TRUE))
1328     ts->WindowFlag |= WF_TITLEREPORT;
1329 doda 3501
1330     // Line at a time mode
1331     ts->EnableLineMode = GetOnOff(Section, "EnableLineMode", FName, TRUE);
1332 doda 3721
1333     // Clear window on resize
1334     if (GetOnOff(Section, "ClearOnResize", FName, TRUE))
1335     ts->TermFlag |= TF_CLEARONRESIZE;
1336 doda 3743
1337     // Alternate Screen Buffer
1338     if (GetOnOff(Section, "AlternateScreenBuffer", FName, TRUE))
1339     ts->TermFlag |= TF_ALTSCR;
1340 maya 3227 }
1341    
1342     void FAR PASCAL WriteIniFile(PCHAR FName, PTTSet ts)
1343     {
1344     int i;
1345     char Temp[MAXPATHLEN];
1346     char buf[20];
1347    
1348     /* version */
1349     WritePrivateProfileString(Section, "Version", "2.3", FName);
1350    
1351     /* Language */
1352 doda 3359 switch (ts->Language) {
1353     case IdJapanese:
1354 maya 3227 strncpy_s(Temp, sizeof(Temp), "Japanese", _TRUNCATE);
1355 doda 3359 break;
1356     case IdKorean:
1357     strncpy_s(Temp, sizeof(Temp), "Korean", _TRUNCATE);
1358     break;
1359     case IdRussian:
1360     strncpy_s(Temp, sizeof(Temp), "Russian", _TRUNCATE);
1361     break;
1362 maya 3401 case IdUtf8:
1363     strncpy_s(Temp, sizeof(Temp), "UTF-8", _TRUNCATE);
1364     break;
1365 doda 3359 default:
1366     strncpy_s(Temp, sizeof(Temp), "English", _TRUNCATE);
1367     }
1368    
1369 maya 3227 WritePrivateProfileString(Section, "Language", Temp, FName);
1370    
1371     /* Port type */
1372     if (ts->PortType == IdSerial)
1373     strncpy_s(Temp, sizeof(Temp), "serial", _TRUNCATE);
1374     else /* IdFile -> IdTCPIP */
1375     strncpy_s(Temp, sizeof(Temp), "tcpip", _TRUNCATE);
1376    
1377     WritePrivateProfileString(Section, "Port", Temp, FName);
1378    
1379     /* Save win position */
1380     if (ts->SaveVTWinPos) {
1381     /* VT win position */
1382     WriteInt2(Section, "VTPos", FName, ts->VTPos.x, ts->VTPos.y);
1383     }
1384    
1385     /* VT terminal size */
1386     WriteInt2(Section, "TerminalSize", FName,
1387     ts->TerminalWidth, ts->TerminalHeight);
1388    
1389     /* Terminal size = Window size */
1390     WriteOnOff(Section, "TermIsWin", FName, ts->TermIsWin);
1391    
1392     /* Auto window resize flag */
1393     WriteOnOff(Section, "AutoWinResize", FName, ts->AutoWinResize);
1394    
1395     /* CR Receive */
1396     if (ts->CRReceive == IdCRLF) {
1397     strncpy_s(Temp, sizeof(Temp), "CRLF", _TRUNCATE);
1398     }
1399     else if (ts->CRReceive == IdLF) {
1400     strncpy_s(Temp, sizeof(Temp), "LF", _TRUNCATE);
1401     }
1402     else {
1403     strncpy_s(Temp, sizeof(Temp), "CR", _TRUNCATE);
1404     }
1405     WritePrivateProfileString(Section, "CRReceive", Temp, FName);
1406    
1407     /* CR Send */
1408     if (ts->CRSend == IdCRLF)
1409     strncpy_s(Temp, sizeof(Temp), "CRLF", _TRUNCATE);
1410     else
1411     strncpy_s(Temp, sizeof(Temp), "CR", _TRUNCATE);
1412     WritePrivateProfileString(Section, "CRSend", Temp, FName);
1413    
1414     /* Local echo */
1415     WriteOnOff(Section, "LocalEcho", FName, ts->LocalEcho);
1416    
1417     /* Answerback */
1418     if ((ts->FTFlag & FT_BPAUTO) == 0) {
1419     Str2Hex(ts->Answerback, Temp, ts->AnswerbackLen,
1420     sizeof(Temp) - 1, TRUE);
1421     WritePrivateProfileString(Section, "Answerback", Temp, FName);
1422     }
1423    
1424     /* Kanji Code (receive) */
1425     switch (ts->KanjiCode) {
1426     case IdEUC:
1427     strncpy_s(Temp, sizeof(Temp), "EUC", _TRUNCATE);
1428     break;
1429     case IdJIS:
1430     strncpy_s(Temp, sizeof(Temp), "JIS", _TRUNCATE);
1431     break;
1432     case IdUTF8:
1433     strncpy_s(Temp, sizeof(Temp), "UTF-8", _TRUNCATE);
1434     break;
1435     case IdUTF8m:
1436     strncpy_s(Temp, sizeof(Temp), "UTF-8m", _TRUNCATE);
1437     break;
1438     default:
1439 doda 3420 switch (ts->Language) {
1440     case IdJapanese:
1441     strncpy_s(Temp, sizeof(Temp), "SJIS", _TRUNCATE);
1442     break;
1443     case IdKorean:
1444     strncpy_s(Temp, sizeof(Temp), "KS5601", _TRUNCATE);
1445     break;
1446     default:
1447     strncpy_s(Temp, sizeof(Temp), "SJIS", _TRUNCATE);
1448     }
1449 maya 3227 }
1450     WritePrivateProfileString(Section, "KanjiReceive", Temp, FName);
1451    
1452     /* Katakana (receive) */
1453     if (ts->JIS7Katakana == 1)
1454     strncpy_s(Temp, sizeof(Temp), "7", _TRUNCATE);
1455     else
1456     strncpy_s(Temp, sizeof(Temp), "8", _TRUNCATE);
1457    
1458     WritePrivateProfileString(Section, "KatakanaReceive", Temp, FName);
1459    
1460     /* Kanji Code (transmit) */
1461     switch (ts->KanjiCodeSend) {
1462     case IdEUC:
1463     strncpy_s(Temp, sizeof(Temp), "EUC", _TRUNCATE);
1464     break;
1465     case IdJIS:
1466     strncpy_s(Temp, sizeof(Temp), "JIS", _TRUNCATE);
1467     break;
1468     case IdUTF8:
1469     strncpy_s(Temp, sizeof(Temp), "UTF-8", _TRUNCATE);
1470     break;
1471     default:
1472 doda 3420 switch (ts->Language) {
1473     case IdJapanese:
1474     strncpy_s(Temp, sizeof(Temp), "SJIS", _TRUNCATE);
1475     break;
1476     case IdKorean:
1477     strncpy_s(Temp, sizeof(Temp), "KS5601", _TRUNCATE);
1478     break;
1479     default:
1480     strncpy_s(Temp, sizeof(Temp), "SJIS", _TRUNCATE);
1481     }
1482 maya 3227 }
1483     WritePrivateProfileString(Section, "KanjiSend", Temp, FName);
1484    
1485     /* Katakana (transmit) */
1486     if (ts->JIS7KatakanaSend == 1)
1487     strncpy_s(Temp, sizeof(Temp), "7", _TRUNCATE);
1488     else
1489     strncpy_s(Temp, sizeof(Temp), "8", _TRUNCATE);
1490    
1491     WritePrivateProfileString(Section, "KatakanaSend", Temp, FName);
1492    
1493     /* KanjiIn */
1494     if (ts->KanjiIn == IdKanjiInA)
1495     strncpy_s(Temp, sizeof(Temp), "@", _TRUNCATE);
1496     else
1497     strncpy_s(Temp, sizeof(Temp), "B", _TRUNCATE);
1498    
1499     WritePrivateProfileString(Section, "KanjiIn", Temp, FName);
1500    
1501     /* KanjiOut */
1502     switch (ts->KanjiOut) {
1503     case IdKanjiOutB:
1504     strncpy_s(Temp, sizeof(Temp), "B", _TRUNCATE);
1505     break;
1506     case IdKanjiOutH:
1507     strncpy_s(Temp, sizeof(Temp), "H", _TRUNCATE);
1508     break;
1509     default:
1510     strncpy_s(Temp, sizeof(Temp), "J", _TRUNCATE);
1511     }
1512     WritePrivateProfileString(Section, "KanjiOut", Temp, FName);
1513    
1514     // new configuration
1515     WriteInt(Section, "ConnectingTimeout", FName, ts->ConnectingTimeout);
1516    
1517     WriteOnOff(Section, "DisablePasteMouseRButton", FName,
1518     ts->DisablePasteMouseRButton);
1519    
1520     // added DisablePasteMouseMButton (2008.3.2 maya)
1521     WriteOnOff(Section, "DisablePasteMouseMButton", FName,
1522     ts->DisablePasteMouseMButton);
1523    
1524     // added ConfirmPasteMouseRButton (2007.3.17 maya)
1525     WriteOnOff(Section, "ConfirmPasteMouseRButton", FName,
1526     ts->ConfirmPasteMouseRButton);
1527    
1528     // added ConfirmChangePaste
1529     WriteOnOff(Section, "ConfirmChangePaste", FName,
1530     ts->ConfirmChangePaste);
1531 yutakapon 3535 WritePrivateProfileString(Section, "ConfirmChangePasteStringFile",
1532     ts->ConfirmChangePasteStringFile, FName);
1533 maya 3227
1534     // added ScrollWindowClearScreen
1535     WriteOnOff(Section, "ScrollWindowClearScreen", FName,
1536     ts->ScrollWindowClearScreen);
1537    
1538     // added SelectOnlyByLButton (2007.11.20 maya)
1539     WriteOnOff(Section, "SelectOnlyByLButton", FName,
1540     ts->SelectOnlyByLButton);
1541     // added DisableAcceleratorSendBreak (2007.3.17 maya)
1542     WriteOnOff(Section, "DisableAcceleratorSendBreak", FName,
1543     ts->DisableAcceleratorSendBreak);
1544     WriteOnOff(Section, "EnableContinuedLineCopy", FName,
1545     ts->EnableContinuedLineCopy);
1546     WritePrivateProfileString(Section, "MouseCursor", ts->MouseCursorName,
1547     FName);
1548     _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d", ts->AlphaBlend);
1549     WritePrivateProfileString(Section, "AlphaBlend", Temp, FName);
1550     WritePrivateProfileString(Section, "CygwinDirectory",
1551     ts->CygwinDirectory, FName);
1552     WritePrivateProfileString(Section, "ViewlogEditor", ts->ViewlogEditor,
1553     FName);
1554     WritePrivateProfileString(Section, "Locale", ts->Locale, FName);
1555     _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d", ts->CodePage);
1556     WritePrivateProfileString(Section, "CodePage", Temp, FName);
1557    
1558     // ANSI color(2004.9.5 yutaka)
1559     Temp[0] = '\0';
1560     for (i = 0; i < 15; i++) {
1561     _snprintf_s(buf, sizeof(buf), _TRUNCATE, "%d,%d,%d,%d, ",
1562     i,
1563     GetRValue(ts->ANSIColor[i]),
1564     GetGValue(ts->ANSIColor[i]),
1565     GetBValue(ts->ANSIColor[i])
1566     );
1567     strncat_s(Temp, sizeof(Temp), buf, _TRUNCATE);
1568     }
1569     i = 15;
1570     _snprintf_s(buf, sizeof(buf), _TRUNCATE, "%d,%d,%d,%d",
1571     i,
1572     GetRValue(ts->ANSIColor[i]),
1573     GetGValue(ts->ANSIColor[i]),
1574     GetBValue(ts->ANSIColor[i])
1575     );
1576     strncat_s(Temp, sizeof(Temp), buf, _TRUNCATE);
1577     WritePrivateProfileString(Section, "ANSIColor", Temp, FName);
1578    
1579     /* AutoWinChange VT<->TEK */
1580     WriteOnOff(Section, "AutoWinSwitch", FName, ts->AutoWinSwitch);
1581    
1582     /* Terminal ID */
1583     id2str(TermList, ts->TerminalID, IdVT100, Temp, sizeof(Temp));
1584     WritePrivateProfileString(Section, "TerminalID", Temp, FName);
1585    
1586     /* Russian character set (host) */
1587     id2str(RussList, ts->RussHost, IdKOI8, Temp, sizeof(Temp));
1588     WritePrivateProfileString(Section, "RussHost", Temp, FName);
1589    
1590     /* Russian character set (client) */
1591     id2str(RussList, ts->RussClient, IdWindows, Temp, sizeof(Temp));
1592     WritePrivateProfileString(Section, "RussClient", Temp, FName);
1593    
1594     /* Title text */
1595     WritePrivateProfileString(Section, "Title", ts->Title, FName);
1596    
1597     /* Cursor shape */
1598     switch (ts->CursorShape) {
1599     case IdVCur:
1600     strncpy_s(Temp, sizeof(Temp), "vertical", _TRUNCATE);
1601     break;
1602     case IdHCur:
1603     strncpy_s(Temp, sizeof(Temp), "horizontal", _TRUNCATE);
1604     break;
1605     default:
1606     strncpy_s(Temp, sizeof(Temp), "block", _TRUNCATE);
1607     }
1608     WritePrivateProfileString(Section, "CursorShape", Temp, FName);
1609    
1610     /* Hide title */
1611     WriteOnOff(Section, "HideTitle", FName, ts->HideTitle);
1612    
1613     /* Popup menu */
1614     WriteOnOff(Section, "PopupMenu", FName, ts->PopupMenu);
1615    
1616     /* PC-Style bold color mapping */
1617     WriteOnOff(Section, "PcBoldColor", FName,
1618     (WORD) (ts->ColorFlag & CF_PCBOLD16));
1619    
1620     /* aixterm 16 colors mode */
1621     WriteOnOff(Section, "Aixterm16Color", FName,
1622     (WORD) (ts->ColorFlag & CF_AIXTERM16));
1623    
1624     /* xterm 256 colors mode */
1625     WriteOnOff(Section, "Xterm256Color", FName,
1626     (WORD) (ts->ColorFlag & CF_XTERM256));
1627    
1628     /* Enable scroll buffer */
1629     WriteOnOff(Section, "EnableScrollBuff", FName, ts->EnableScrollBuff);
1630    
1631     /* Scroll buffer size */
1632     WriteInt(Section, "ScrollBuffSize", FName, ts->ScrollBuffSize);
1633    
1634     /* VT Color */
1635     for (i = 0; i <= 1; i++) {
1636     if (ts->ColorFlag & CF_REVERSEVIDEO) {
1637     if (ts->ColorFlag & CF_REVERSECOLOR) {
1638     ts->TmpColor[0][i * 3] = GetRValue(ts->VTReverseColor[i]);
1639     ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTReverseColor[i]);
1640     ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTReverseColor[i]);
1641     }
1642     else {
1643     ts->TmpColor[0][i * 3] = GetRValue(ts->VTColor[!i]);
1644     ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTColor[!i]);
1645     ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTColor[!i]);
1646     }
1647     }
1648     else {
1649     ts->TmpColor[0][i * 3] = GetRValue(ts->VTColor[i]);
1650     ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTColor[i]);
1651     ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTColor[i]);
1652     }
1653     }
1654     WriteInt6(Section, "VTColor", FName,
1655     ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1656     ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1657    
1658     /* VT Bold Color */
1659     for (i = 0; i <= 1; i++) {
1660     if (ts->ColorFlag & CF_REVERSEVIDEO) {
1661     ts->TmpColor[0][i * 3] = GetRValue(ts->VTBoldColor[!i]);
1662     ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTBoldColor[!i]);
1663     ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTBoldColor[!i]);
1664     }
1665     else {
1666     ts->TmpColor[0][i * 3] = GetRValue(ts->VTBoldColor[i]);
1667     ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTBoldColor[i]);
1668     ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTBoldColor[i]);
1669     }
1670     }
1671     WriteInt6(Section, "VTBoldColor", FName,
1672     ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1673     ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1674    
1675     /* VT Blink Color */
1676     for (i = 0; i <= 1; i++) {
1677     if (ts->ColorFlag & CF_REVERSEVIDEO) {
1678     ts->TmpColor[0][i * 3] = GetRValue(ts->VTBlinkColor[!i]);
1679     ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTBlinkColor[!i]);
1680     ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTBlinkColor[!i]);
1681     }
1682     else {
1683     ts->TmpColor[0][i * 3] = GetRValue(ts->VTBlinkColor[i]);
1684     ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTBlinkColor[i]);
1685     ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTBlinkColor[i]);
1686     }
1687     }
1688     WriteInt6(Section, "VTBlinkColor", FName,
1689     ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1690     ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1691    
1692     /* VT Reverse Color */
1693     for (i = 0; i <= 1; i++) {
1694     if (ts->ColorFlag & CF_REVERSEVIDEO && ts->ColorFlag & CF_REVERSECOLOR) {
1695     ts->TmpColor[0][i * 3] = GetRValue(ts->VTColor[i]);
1696     ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTColor[i]);
1697     ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTColor[i]);
1698     }
1699     else {
1700     ts->TmpColor[0][i * 3] = GetRValue(ts->VTReverseColor[i]);
1701     ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->VTReverseColor[i]);
1702     ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->VTReverseColor[i]);
1703     }
1704     }
1705     WriteInt6(Section, "VTReverseColor", FName,
1706     ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1707     ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1708    
1709     WriteOnOff(Section, "EnableClickableUrl", FName,
1710     ts->EnableClickableUrl);
1711    
1712     /* URL color */
1713     for (i = 0; i <= 1; i++) {
1714     if (ts->ColorFlag & CF_REVERSEVIDEO) {
1715     ts->TmpColor[0][i * 3] = GetRValue(ts->URLColor[!i]);
1716     ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->URLColor[!i]);
1717     ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->URLColor[!i]);
1718     }
1719     else {
1720     ts->TmpColor[0][i * 3] = GetRValue(ts->URLColor[i]);
1721     ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->URLColor[i]);
1722     ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->URLColor[i]);
1723     }
1724     }
1725     WriteInt6(Section, "URLColor", FName,
1726     ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1727     ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1728    
1729     WriteOnOff(Section, "EnableBoldAttrColor", FName,
1730     (WORD) (ts->ColorFlag & CF_BOLDCOLOR));
1731    
1732     WriteOnOff(Section, "EnableBlinkAttrColor", FName,
1733     (WORD) (ts->ColorFlag & CF_BLINKCOLOR));
1734    
1735     WriteOnOff(Section, "EnableReverseAttrColor", FName,
1736     (WORD) (ts->ColorFlag & CF_REVERSECOLOR));
1737    
1738     WriteOnOff(Section, "EnableURLColor", FName,
1739     (WORD) (ts->ColorFlag & CF_URLCOLOR));
1740    
1741 doda 3660 WriteOnOff(Section, "URLUnderline", FName,
1742 doda 3666 (WORD) (ts->FontFlag & FF_URLUNDERLINE));
1743 doda 3660
1744 maya 3227 WriteOnOff(Section, "EnableANSIColor", FName,
1745     (WORD) (ts->ColorFlag & CF_ANSICOLOR));
1746    
1747     /* TEK Color */
1748     for (i = 0; i <= 1; i++) {
1749     ts->TmpColor[0][i * 3] = GetRValue(ts->TEKColor[i]);
1750     ts->TmpColor[0][i * 3 + 1] = GetGValue(ts->TEKColor[i]);
1751     ts->TmpColor[0][i * 3 + 2] = GetBValue(ts->TEKColor[i]);
1752     }
1753     WriteInt6(Section, "TEKColor", FName,
1754     ts->TmpColor[0][0], ts->TmpColor[0][1], ts->TmpColor[0][2],
1755     ts->TmpColor[0][3], ts->TmpColor[0][4], ts->TmpColor[0][5]);
1756    
1757     /* TEK color emulation */
1758     WriteOnOff(Section, "TEKColorEmulation", FName, ts->TEKColorEmu);
1759    
1760     /* VT Font */
1761     WriteFont(Section, "VTFont", FName,
1762     ts->VTFont, ts->VTFontSize.x, ts->VTFontSize.y,
1763     ts->VTFontCharSet);
1764    
1765     /* Enable bold font flag */
1766 doda 3666 WriteOnOff(Section, "EnableBold", FName,
1767     (WORD) (ts->FontFlag & FF_BOLD));
1768 maya 3227
1769     /* Russian character set (font) */
1770     id2str(RussList, ts->RussFont, IdWindows, Temp, sizeof(Temp));
1771     WritePrivateProfileString(Section, "RussFont", Temp, FName);
1772    
1773     /* TEK Font */
1774     WriteFont(Section, "TEKFont", FName,
1775     ts->TEKFont, ts->TEKFontSize.x, ts->TEKFontSize.y,
1776     ts->TEKFontCharSet);
1777    
1778     /* BS key */
1779     if (ts->BSKey == IdDEL)
1780     strncpy_s(Temp, sizeof(Temp), "DEL", _TRUNCATE);
1781     else
1782     strncpy_s(Temp, sizeof(Temp), "BS", _TRUNCATE);
1783     WritePrivateProfileString(Section, "BSKey", Temp, FName);
1784    
1785     /* Delete key */
1786     WriteOnOff(Section, "DeleteKey", FName, ts->DelKey);
1787    
1788     /* Meta key */
1789     WriteOnOff(Section, "MetaKey", FName, ts->MetaKey);
1790    
1791     /* Application Keypad */
1792     WriteOnOff(Section, "DisableAppKeypad", FName, ts->DisableAppKeypad);
1793    
1794     /* Application Cursor */
1795     WriteOnOff(Section, "DisableAppCursor", FName, ts->DisableAppCursor);
1796    
1797     /* Russian keyboard type */
1798     id2str(RussList2, ts->RussKeyb, IdWindows, Temp, sizeof(Temp));
1799     WritePrivateProfileString(Section, "RussKeyb", Temp, FName);
1800    
1801     /* Serial port ID */
1802     _snprintf_s(Temp, sizeof(Temp), _TRUNCATE, "%d", ts->ComPort);
1803     WritePrivateProfileString(Section, "ComPort", Temp, FName);
1804    
1805     /* Baud rate */
1806     id2str(BaudList, ts->Baud, IdBaud9600, Temp, sizeof(Temp));
1807     WritePrivateProfileString(Section, "BaudRate", Temp, FName);
1808    
1809     /* Parity */
1810     switch (ts->Parity) {
1811     case IdParityEven:
1812     strncpy_s(Temp, sizeof(Temp), "even", _TRUNCATE);
1813     break;
1814     case IdParityOdd:
1815     strncpy_s(Temp, sizeof(Temp), "odd", _TRUNCATE);
1816     break;
1817     default:
1818     strncpy_s(Temp, sizeof(Temp), "none", _TRUNCATE);
1819     }
1820     WritePrivateProfileString(Section, "Parity", Temp, FName);
1821    
1822     /* Data bit */
1823     if (ts->DataBit == IdDataBit7)
1824     strncpy_s(Temp, sizeof(Temp), "7", _TRUNCATE);
1825     else
1826     strncpy_s(Temp, sizeof(Temp), "8", _TRUNCATE);
1827    
1828     WritePrivateProfileString(Section, "DataBit", Temp, FName);
1829    
1830     /* Stop bit */
1831     if (ts->StopBit == IdStopBit2)
1832     strncpy_s(Temp, sizeof(Temp), "2", _TRUNCATE);
1833     else
1834     strncpy_s(Temp, sizeof(Temp), "1", _TRUNCATE);
1835    
1836     WritePrivateProfileString(Section, "StopBit", Temp, FName);
1837    
1838     /* Flow control */
1839     switch (ts->Flow) {
1840     case IdFlowX:
1841     strncpy_s(Temp, sizeof(Temp), "x", _TRUNCATE);
1842     break;
1843     case IdFlowHard:
1844     strncpy_s(Temp, sizeof(Temp), "hard", _TRUNCATE);
1845     break;
1846     default:
1847     strncpy_s(Temp, sizeof(Temp), "none", _TRUNCATE);
1848     }
1849     WritePrivateProfileString(Section, "FlowCtrl", Temp, FName);
1850    
1851     /* Delay per character */
1852     WriteInt(Section, "DelayPerChar", FName, ts->DelayPerChar);
1853    
1854     /* Delay per line */
1855     WriteInt(Section, "DelayPerLine", FName, ts->DelayPerLine);
1856    
1857     /* Telnet flag */
1858     WriteOnOff(Section, "Telnet", FName, ts->Telnet);
1859    
1860     /* Telnet terminal type */
1861     WritePrivateProfileString(Section, "TermType", ts->TermType, FName);
1862    
1863     /* TCP port num for non-telnet */
1864     WriteUint(Section, "TCPPort", FName, ts->TCPPort);
1865    
1866     /* Auto close flag */
1867     WriteOnOff(Section, "AutoWinClose", FName, ts->AutoWinClose);
1868    
1869     /* History list */
1870     WriteOnOff(Section, "Historylist", FName, ts->HistoryList);
1871    
1872     /* File transfer binary flag */
1873     WriteOnOff(Section, "TransBin", FName, ts->TransBin);
1874    
1875     /* Log append */
1876     WriteOnOff(Section, "LogAppend", FName, ts->Append);
1877    
1878     /* File transfer binary flag */
1879     WriteOnOff(Section, "LogTypePlainText", FName, ts->LogTypePlainText);
1880    
1881     /* Log with timestamp (2006.7.23 maya) */
1882     WriteOnOff(Section, "LogTimestamp", FName, ts->LogTimestamp);
1883    
1884     /* Log without transfer dialog */
1885     WriteOnOff(Section, "LogHideDialog", FName, ts->LogHideDialog);
1886    
1887     /* Default Log file name (2006.8.28 maya) */
1888     WritePrivateProfileString(Section, "LogDefaultName",
1889     ts->LogDefaultName, FName);
1890    
1891     /* Default Log file path (2007.5.30 maya) */
1892     WritePrivateProfileString(Section, "LogDefaultPath",
1893     ts->LogDefaultPath, FName);
1894    
1895     /* Auto start logging (2007.5.31 maya) */
1896     WriteOnOff(Section, "LogAutoStart", FName, ts->LogAutoStart);
1897    
1898     /* XMODEM option */
1899     switch (ts->XmodemOpt) {
1900     case XoptCRC:
1901     strncpy_s(Temp, sizeof(Temp), "crc", _TRUNCATE);
1902     break;
1903     case Xopt1K:
1904     strncpy_s(Temp, sizeof(Temp), "1k", _TRUNCATE);
1905     break;
1906     default:
1907     strncpy_s(Temp, sizeof(Temp), "checksum", _TRUNCATE);
1908     }
1909     WritePrivateProfileString(Section, "XmodemOpt", Temp, FName);
1910    
1911     /* XMODEM binary flag */
1912     WriteOnOff(Section, "XmodemBin", FName, ts->XmodemBin);
1913    
1914     /* XMODEM ���M�R�}���h (2007.12.21 yutaka) */
1915     WritePrivateProfileString(Section, "XmodemRcvCommand",
1916     ts->XModemRcvCommand, FName);
1917    
1918     /* Default directory for file transfer */
1919     WritePrivateProfileString(Section, "FileDir", ts->FileDir, FName);
1920    
1921     /* filter on file send (2007.6.5 maya) */
1922     WritePrivateProfileString(Section, "FileSendFilter",
1923     ts->FileSendFilter, FName);
1924    
1925     /*------------------------------------------------------------------*/
1926     /* 8 bit control code flag -- special option */
1927     WriteOnOff(Section, "Accept8BitCtrl", FName,
1928     (WORD) (ts->TermFlag & TF_ACCEPT8BITCTRL));
1929    
1930     /* Wrong sequence flag -- special option */
1931     WriteOnOff(Section, "AllowWrongSequence", FName,
1932     (WORD) (ts->TermFlag & TF_ALLOWWRONGSEQUENCE));
1933    
1934     /* Auto file renaming --- special option */
1935     WriteOnOff(Section, "AutoFileRename", FName,
1936     (WORD) (ts->FTFlag & FT_RENAME));
1937    
1938     /* Auto text copy --- special option */
1939     WriteOnOff(Section, "AutoTextCopy", FName, ts->AutoTextCopy);
1940    
1941     /* Back wrap -- special option */
1942     WriteOnOff(Section, "BackWrap", FName,
1943     (WORD) (ts->TermFlag & TF_BACKWRAP));
1944    
1945     /* Beep type -- special option */
1946     WriteOnOff(Section, "Beep", FName, ts->Beep);
1947     switch (ts->Beep) {
1948     case IdBeepOff:
1949 doda 3278 WritePrivateProfileString(Section, "Beep", "off", FName);
1950 maya 3227 break;
1951     case IdBeepOn:
1952 doda 3278 WritePrivateProfileString(Section, "Beep", "on", FName);
1953 maya 3227 break;
1954     case IdBeepVisual:
1955 doda 3278 WritePrivateProfileString(Section, "Beep", "visual", FName);
1956 maya 3227 break;
1957     }
1958    
1959     /* Beep on connection & disconnection -- special option */
1960     WriteOnOff(Section, "BeepOnConnect", FName,
1961     (WORD) (ts->PortFlag & PF_BEEPONCONNECT));
1962    
1963     /* Auto B-Plus activation -- special option */
1964     WriteOnOff(Section, "BPAuto", FName, (WORD) (ts->FTFlag & FT_BPAUTO));
1965    
1966     /* B-Plus ESCCTL flag -- special option */
1967     WriteOnOff(Section, "BPEscCtl", FName,
1968     (WORD) (ts->FTFlag & FT_BPESCCTL));
1969    
1970     /* B-Plus log -- special option */
1971     WriteOnOff(Section, "BPLog", FName, (WORD) (ts->LogFlag & LOG_BP));
1972    
1973     /* Clear serial port buffer when port opening -- special option */
1974     WriteOnOff(Section, "ClearComBuffOnOpen", FName, ts->ClearComBuffOnOpen);
1975    
1976     /* Confirm disconnection -- special option */
1977     WriteOnOff(Section, "ConfirmDisconnect", FName,
1978     (WORD) (ts->PortFlag & PF_CONFIRMDISCONN));
1979    
1980     /* Ctrl code in Kanji -- special option */
1981     WriteOnOff(Section, "CtrlInKanji", FName,
1982     (WORD) (ts->TermFlag & TF_CTRLINKANJI));
1983    
1984     /* Debug flag -- special option */
1985     WriteOnOff(Section, "Debug", FName, ts->Debug);
1986    
1987     /* Delimiter list -- special option */
1988     Str2Hex(ts->DelimList, Temp, strlen(ts->DelimList),
1989     sizeof(Temp) - 1, TRUE);
1990     WritePrivateProfileString(Section, "DelimList", Temp, FName);
1991    
1992     /* regard DBCS characters as delimiters -- special option */
1993     WriteOnOff(Section, "DelimDBCS", FName, ts->DelimDBCS);
1994    
1995     // Enable popup menu -- special option
1996     if ((ts->MenuFlag & MF_NOPOPUP) == 0)
1997     WriteOnOff(Section, "EnablePopupMenu", FName, 1);
1998     else
1999     WriteOnOff(Section, "EnablePopupMenu", FName, 0);
2000    
2001     // Enable "Show menu" -- special option
2002     if ((ts->MenuFlag & MF_NOSHOWMENU) == 0)
2003     WriteOnOff(Section, "EnableShowMenu", FName, 1);
2004     else
2005     WriteOnOff(Section, "EnableShowMenu", FName, 0);
2006    
2007     /* Enable the status line -- special option */
2008     WriteOnOff(Section, "EnableStatusLine", FName,
2009     (WORD) (ts->TermFlag & TF_ENABLESLINE));
2010    
2011     /* IME Flag -- special option */
2012     WriteOnOff(Section, "IME", FName, ts->UseIME);
2013    
2014     /* IME-inline Flag -- special option */
2015     WriteOnOff(Section, "IMEInline", FName, ts->IMEInline);
2016    
2017     /* Kermit log -- special option */
2018     WriteOnOff(Section, "KmtLog", FName, (WORD) (ts->LogFlag & LOG_KMT));
2019    
2020     // Enable language selection -- special option
2021     if ((ts->MenuFlag & MF_NOLANGUAGE) == 0)
2022     WriteOnOff(Section, "LanguageSelection", FName, 1);
2023     else
2024     WriteOnOff(Section, "LanguageSelection", FName, 0);
2025    
2026     /* Maximum scroll buffer size -- special option */
2027     WriteInt(Section, "MaxBuffSize", FName, ts->ScrollBuffMax);
2028    
2029     /* Max com port number -- special option */
2030     WriteInt(Section, "MaxComPort", FName, ts->MaxComPort);
2031    
2032     /* Non-blinking cursor -- special option */
2033     WriteOnOff(Section, "NonblinkingCursor", FName, ts->NonblinkingCursor);
2034    
2035     WriteOnOff(Section, "KillFocusCursor", FName, ts->KillFocusCursor);
2036    
2037     /* Delay for pass-thru printing activation */
2038     /* -- special option */
2039     WriteUint(Section, "PassThruDelay", FName, ts->PassThruDelay);
2040    
2041     /* Printer port for pass-thru printing */
2042     /* -- special option */
2043     WritePrivateProfileString(Section, "PassThruPort", ts->PrnDev, FName);
2044    
2045     /* Printer Font --- special option */
2046     WriteFont(Section, "PrnFont", FName,
2047     ts->PrnFont, ts->PrnFontSize.x, ts->PrnFontSize.y,
2048     ts->PrnFontCharSet);
2049    
2050     // Page margins (left, right, top, bottom) for printing
2051     // -- special option
2052     WriteInt4(Section, "PrnMargin", FName,
2053     ts->PrnMargin[0], ts->PrnMargin[1],
2054     ts->PrnMargin[2], ts->PrnMargin[3]);
2055    
2056     /* Quick-VAN log -- special option */
2057     WriteOnOff(Section, "QVLog", FName, (WORD) (ts->LogFlag & LOG_QV));
2058    
2059     /* Quick-VAN window size -- special */
2060     WriteInt(Section, "QVWinSize", FName, ts->QVWinSize);
2061    
2062     /* Russian character set (print) -- special option */
2063     id2str(RussList, ts->RussPrint, IdWindows, Temp, sizeof(Temp));
2064     WritePrivateProfileString(Section, "RussPrint", Temp, FName);
2065    
2066     /* Scroll threshold -- special option */
2067     WriteInt(Section, "ScrollThreshold", FName, ts->ScrollThreshold);
2068    
2069     WriteInt(Section, "MouseWheelScrollLine", FName, ts->MouseWheelScrollLine);
2070    
2071     // Select on activate -- special option
2072     WriteOnOff(Section, "SelectOnActivate", FName, ts->SelOnActive);
2073    
2074     /* Send 8bit control sequence -- special option */
2075     WriteOnOff(Section, "Send8BitCtrl", FName, ts->Send8BitCtrl);
2076    
2077     /* Startup macro -- special option */
2078     WritePrivateProfileString(Section, "StartupMacro", ts->MacroFN, FName);
2079    
2080     /* TEK GIN Mouse keycode -- special option */
2081     WriteInt(Section, "TEKGINMouseCode", FName, ts->GINMouseCode);
2082    
2083     /* Telnet Auto Detect -- special option */
2084     WriteOnOff(Section, "TelAutoDetect", FName, ts->TelAutoDetect);
2085    
2086     /* Telnet binary flag -- special option */
2087     WriteOnOff(Section, "TelBin", FName, ts->TelBin);
2088    
2089     /* Telnet Echo flag -- special option */
2090     WriteOnOff(Section, "TelEcho", FName, ts->TelEcho);
2091    
2092     /* Telnet log -- special option */
2093     WriteOnOff(Section, "TelLog", FName, (WORD) (ts->LogFlag & LOG_TEL));
2094    
2095     /* TCP port num for telnet -- special option */
2096     WriteUint(Section, "TelPort", FName, ts->TelPort);
2097    
2098     /* Telnet keep-alive packet(NOP command) interval -- special option */
2099     WriteUint(Section, "TelKeepAliveInterval", FName,
2100     ts->TelKeepAliveInterval);
2101    
2102     /* Max number of broadcast commad history */
2103     WriteUint(Section, "MaxBroadcatHistory", FName,
2104     ts->MaxBroadcatHistory);
2105    
2106     /* Local echo for non-telnet */
2107     WriteOnOff(Section, "TCPLocalEcho", FName, ts->TCPLocalEcho);
2108    
2109     /* "new-line (transmit)" option for non-telnet -- special option */
2110     if (ts->TCPCRSend == IdCRLF)
2111     strncpy_s(Temp, sizeof(Temp), "CRLF", _TRUNCATE);
2112     else if (ts->TCPCRSend == IdCR)
2113     strncpy_s(Temp, sizeof(Temp), "CR", _TRUNCATE);
2114     else
2115     Temp[0] = 0;
2116     WritePrivateProfileString(Section, "TCPCRSend", Temp, FName);
2117    
2118     /* Use text (background) color for "white (black)"
2119     --- special option */
2120     WriteOnOff(Section, "UseTextColor", FName,
2121     (WORD) (ts->ColorFlag & CF_USETEXTCOLOR));
2122    
2123     /* Title format -- special option */
2124     WriteUint(Section, "TitleFormat", FName, ts->TitleFormat);
2125    
2126     /* VT Compatible Tab -- special option */
2127     WriteOnOff(Section, "VTCompatTab", FName, ts->VTCompatTab);
2128    
2129     /* VT Font space --- special option */
2130     WriteInt4(Section, "VTFontSpace", FName,
2131     ts->FontDX, ts->FontDW - ts->FontDX,
2132     ts->FontDY, ts->FontDH - ts->FontDY);
2133    
2134     // VT-print scaling factors (pixels per inch) --- special option
2135     WriteInt2(Section, "VTPPI", FName, ts->VTPPI.x, ts->VTPPI.y);
2136    
2137     // TEK-print scaling factors (pixels per inch) --- special option
2138     WriteInt2(Section, "TEKPPI", FName, ts->TEKPPI.x, ts->TEKPPI.y);
2139    
2140     // Show "Window" menu -- special option
2141     WriteOnOff(Section, "WindowMenu", FName,
2142     (WORD) (ts->MenuFlag & MF_SHOWWINMENU));
2143    
2144     /* XMODEM log -- special option */
2145     WriteOnOff(Section, "XmodemLog", FName, (WORD) (ts->LogFlag & LOG_X));
2146    
2147     /* YMODEM log -- special option */
2148     WriteOnOff(Section, "YmodemLog", FName, (WORD) (ts->LogFlag & LOG_Y));
2149    
2150     /* Auto ZMODEM activation -- special option */
2151     WriteOnOff(Section, "ZmodemAuto", FName,
2152     (WORD) (ts->FTFlag & FT_ZAUTO));
2153    
2154     /* ZMODEM data subpacket length for sending -- special */
2155     WriteInt(Section, "ZmodemDataLen", FName, ts->ZmodemDataLen);
2156     /* ZMODEM window size for sending -- special */
2157     WriteInt(Section, "ZmodemWinSize", FName, ts->ZmodemWinSize);
2158    
2159     /* ZMODEM ESCCTL flag -- special option */
2160     WriteOnOff(Section, "ZmodemEscCtl", FName,
2161     (WORD) (ts->FTFlag & FT_ZESCCTL));
2162    
2163     /* ZMODEM log -- special option */
2164     WriteOnOff(Section, "ZmodemLog", FName, (WORD) (ts->LogFlag & LOG_Z));
2165    
2166     /* ZMODEM ���M�R�}���h (2007.12.21 yutaka) */
2167     WritePrivateProfileString(Section, "ZmodemRcvCommand", ts->ZModemRcvCommand, FName);
2168    
2169     /* update file */
2170     WritePrivateProfileString(NULL, NULL, NULL, FName);
2171    
2172     // Eterm lookfeel alphablend (2005.4.24 yutaka)
2173     #define ETERM_SECTION "BG"
2174     WriteOnOff(ETERM_SECTION, "BGEnable", FName,
2175     ts->EtermLookfeel.BGEnable);
2176     WriteOnOff(ETERM_SECTION, "BGUseAlphaBlendAPI", FName,
2177     ts->EtermLookfeel.BGUseAlphaBlendAPI);
2178     WritePrivateProfileString(ETERM_SECTION, "BGSPIPath",
2179     ts->EtermLookfeel.BGSPIPath, FName);
2180     WriteOnOff(ETERM_SECTION, "BGFastSizeMove", FName,
2181     ts->EtermLookfeel.BGFastSizeMove);
2182     WriteOnOff(ETERM_SECTION, "BGFlickerlessMove", FName,
2183     ts->EtermLookfeel.BGNoCopyBits);
2184     WriteOnOff(ETERM_SECTION, "BGNoFrame", FName,
2185     ts->EtermLookfeel.BGNoFrame);
2186     WritePrivateProfileString(ETERM_SECTION, "BGThemeFile",
2187     ts->EtermLookfeel.BGThemeFile, FName);
2188    
2189     #ifdef USE_NORMAL_BGCOLOR
2190     // UseNormalBGColor
2191     WriteOnOff(Section, "UseNormalBGColor", FName, ts->UseNormalBGColor);
2192     #endif
2193    
2194     // UI language message file
2195     WritePrivateProfileString(Section, "UILanguageFile",
2196     ts->UILanguageFile_ini, FName);
2197    
2198     // Broadcast Command History (2007.3.3 maya)
2199     WriteOnOff(Section, "BroadcastCommandHistory", FName,
2200     ts->BroadcastCommandHistory);
2201    
2202     // 337: 2007/03/20 Accept Broadcast
2203     WriteOnOff(Section, "AcceptBroadcast", FName, ts->AcceptBroadcast);
2204    
2205     // Confirm send a file when drag and drop (2007.12.28 maya)
2206     WriteOnOff(Section, "ConfirmFileDragAndDrop", FName,
2207     ts->ConfirmFileDragAndDrop);
2208    
2209     // Translate mouse wheel to cursor key when application cursor mode
2210     WriteOnOff(Section, "TranslateWheelToCursor", FName,
2211     ts->TranslateWheelToCursor);
2212    
2213     // Display "New Connection" dialog on startup (2008.1.18 maya)
2214     WriteOnOff(Section, "HostDialogOnStartup", FName,
2215     ts->HostDialogOnStartup);
2216    
2217     // Mouse event tracking
2218     WriteOnOff(Section, "MouseEventTracking", FName,
2219     ts->MouseEventTracking);
2220    
2221     // Maximized bug tweak
2222     WriteOnOff(Section, "MaximizedBugTweak", FName, ts->MaximizedBugTweak);
2223    
2224     // Convert Unicode symbol characters to DEC Special characters
2225     WriteUint(Section, "UnicodeToDecSpMapping", FName, ts->UnicodeDecSpMapping);
2226    
2227     // VT Window Icon
2228     IconId2IconName(Temp, sizeof(Temp), ts->VTIcon);
2229     WritePrivateProfileString(Section, "VTIcon", Temp, FName);
2230    
2231     // Tek Window Icon
2232     IconId2IconName(Temp, sizeof(Temp), ts->TEKIcon);
2233     WritePrivateProfileString(Section, "TEKIcon", Temp, FName);
2234    
2235     // AutoScrollOnlyInBottomLine
2236     WriteOnOff(Section, "AutoScrollOnlyInBottomLine", FName,
2237     ts->AutoScrollOnlyInBottomLine);
2238    
2239     // Unknown Unicode Character
2240     WriteOnOff(Section, "UnknownUnicodeCharacterAsWide", FName,
2241     ts->UnknownUnicodeCharaAsWide);
2242    
2243     // Accept remote-controlled window title changing
2244     if (ts->AcceptTitleChangeRequest == IdTitleChangeRequestOff)
2245     strncpy_s(Temp, sizeof(Temp), "off", _TRUNCATE);
2246     else if (ts->AcceptTitleChangeRequest == IdTitleChangeRequestOverwrite)
2247     strncpy_s(Temp, sizeof(Temp), "overwrite", _TRUNCATE);
2248     else if (ts->AcceptTitleChangeRequest == IdTitleChangeRequestAhead)
2249     strncpy_s(Temp, sizeof(Temp), "ahead", _TRUNCATE);
2250     else if (ts->AcceptTitleChangeRequest == IdTitleChangeRequestLast)
2251     strncpy_s(Temp, sizeof(Temp), "last", _TRUNCATE);
2252     else
2253     Temp[0] = 0;
2254     WritePrivateProfileString(Section, "AcceptTitleChangeRequest", Temp, FName);
2255    
2256     // Size of paste confirm dialog
2257     WriteInt2(Section, "PasteDialogSize", FName,
2258     ts->PasteDialogSize.cx, ts->PasteDialogSize.cy);
2259    
2260     // Disable mouse event tracking when Control-Key is pressed.
2261     WriteOnOff(Section, "DisableMouseTrackingByCtrl", FName,
2262     ts->DisableMouseTrackingByCtrl);