Develop and Download Open Source Software

Tera Term

Browse Subversion Repository

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

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

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 9498 by zmatsuo, Sat Oct 23 16:09:46 2021 UTC revision 9499 by zmatsuo, Sat Oct 23 16:09:57 2021 UTC
# Line 48  Line 48 
48  #include "codeconv.h"  #include "codeconv.h"
49  #include "win32helper.h"  #include "win32helper.h"
50  #include "inifile_com.h"  #include "inifile_com.h"
51    #include "ttlib_charset.h"
52    
53  #define DllExport __declspec(dllexport)  #define DllExport __declspec(dllexport)
54  #include "ttset.h"  #include "ttset.h"
# Line 65  static PCHAR far TermList[] = Line 66  static PCHAR far TermList[] =
66          { "VT100", "VT100J", "VT101", "VT102", "VT102J", "VT220J", "VT282",          { "VT100", "VT100J", "VT101", "VT102", "VT102J", "VT220J", "VT282",
67          "VT320", "VT382", "VT420", "VT520", "VT525", NULL };          "VT320", "VT382", "VT420", "VT520", "VT525", NULL };
68    
 static PCHAR far RussList[] =  
         { "Windows", "KOI8-R", "CP-866", "ISO-8859-5", NULL };  
69  static PCHAR far RussList2[] = { "Windows", "KOI8-R", NULL };  static PCHAR far RussList2[] = { "Windows", "KOI8-R", NULL };
70    
71    
# Line 770  void PASCAL ReadIniFile(const wchar_t *F Line 769  void PASCAL ReadIniFile(const wchar_t *F
769          /* Language */          /* Language */
770          GetPrivateProfileString(Section, "Language", "",          GetPrivateProfileString(Section, "Language", "",
771                                  Temp, sizeof(Temp), FName);                                  Temp, sizeof(Temp), FName);
772          if (_stricmp(Temp, "Japanese") == 0)          if (Temp[0] != 0) {
773                  ts->Language = IdJapanese;                  ts->Language = GetLanguageFromStr(Temp);
774          else if (_stricmp(Temp, "Russian") == 0)          }
                 ts->Language = IdRussian;  
         else if (_stricmp(Temp, "English") == 0)  
                 ts->Language = IdEnglish;  
         else if (_stricmp(Temp,"Korean") == 0) // HKS  
                 ts->Language = IdKorean;  
         else if (_stricmp(Temp,"UTF-8") == 0)  
                 ts->Language = IdUtf8;  
775          else {          else {
776                  switch (PRIMARYLANGID(GetSystemDefaultLangID())) {                  switch (PRIMARYLANGID(GetSystemDefaultLangID())) {
777                  case LANG_JAPANESE:                  case LANG_JAPANESE:
# Line 880  void PASCAL ReadIniFile(const wchar_t *F Line 872  void PASCAL ReadIniFile(const wchar_t *F
872          /* Kanji Code (receive) */          /* Kanji Code (receive) */
873          GetPrivateProfileString(Section, "KanjiReceive", "",          GetPrivateProfileString(Section, "KanjiReceive", "",
874                                  Temp, sizeof(Temp), FName);                                  Temp, sizeof(Temp), FName);
875          if (_stricmp(Temp, "EUC") == 0)          ts->KanjiCode = GetKanjiCodeFromStr(ts->Language, Temp);
                 ts->KanjiCode = IdEUC;  
         else if (_stricmp(Temp, "JIS") == 0)  
                 ts->KanjiCode = IdJIS;  
         else if (_stricmp(Temp, "UTF-8") == 0)  
                 ts->KanjiCode = IdUTF8;  
         else if (_stricmp(Temp, "UTF-8m") == 0)  
                 ts->KanjiCode = IdUTF8m;  
         else if (_stricmp(Temp, "KS5601") == 0)  
                 ts->KanjiCode = IdSJIS;  
         else  
                 ts->KanjiCode = IdSJIS;  
         // KanjiCode/KanjiCodeSend を現在の Language に存在する値に置き換える  
         {  
                 WORD KanjiCode = ts->KanjiCode;  
                 ts->KanjiCode = KanjiCodeTranslate(ts->Language,KanjiCode);  
         }  
876    
877          /* Katakana (receive) */          /* Katakana (receive) */
878          GetPrivateProfileString(Section, "KatakanaReceive", "",          GetPrivateProfileString(Section, "KatakanaReceive", "",
# Line 909  void PASCAL ReadIniFile(const wchar_t *F Line 885  void PASCAL ReadIniFile(const wchar_t *F
885          /* Kanji Code (transmit) */          /* Kanji Code (transmit) */
886          GetPrivateProfileString(Section, "KanjiSend", "",          GetPrivateProfileString(Section, "KanjiSend", "",
887                                  Temp, sizeof(Temp), FName);                                  Temp, sizeof(Temp), FName);
888          if (_stricmp(Temp, "EUC") == 0)          ts->KanjiCodeSend = GetKanjiCodeFromStr(ts->Language, Temp);
                 ts->KanjiCodeSend = IdEUC;  
         else if (_stricmp(Temp, "JIS") == 0)  
                 ts->KanjiCodeSend = IdJIS;  
         else if (_stricmp(Temp, "UTF-8") == 0)  
                 ts->KanjiCodeSend = IdUTF8;  
         else if (_stricmp(Temp, "KS5601") == 0)  
                 ts->KanjiCode = IdSJIS;  
         else  
                 ts->KanjiCodeSend = IdSJIS;  
         // KanjiCode/KanjiCodeSend を現在の Language に存在する値に置き換える  
         {  
                 WORD KanjiCodeSend = ts->KanjiCodeSend;  
                 ts->KanjiCodeSend = KanjiCodeTranslate(ts->Language,KanjiCodeSend);  
         }  
889    
890          /* Katakana (receive) */          /* Katakana (receive) */
891          GetPrivateProfileString(Section, "KatakanaSend", "",          GetPrivateProfileString(Section, "KatakanaSend", "",
# Line 2276  void PASCAL WriteIniFile(const wchar_t * Line 2238  void PASCAL WriteIniFile(const wchar_t *
2238          }          }
2239    
2240          /* Language */          /* Language */
2241          switch (ts->Language) {          {
2242          case IdJapanese:                  const char *language_str = GetLanguageStr(ts->Language);
2243                  strncpy_s(Temp, sizeof(Temp), "Japanese", _TRUNCATE);                  WritePrivateProfileString(Section, "Language", language_str, FName);
                 break;  
         case IdKorean:  
                 strncpy_s(Temp, sizeof(Temp), "Korean",   _TRUNCATE);  
                 break;  
         case IdRussian:  
                 strncpy_s(Temp, sizeof(Temp), "Russian",  _TRUNCATE);  
                 break;  
         case IdUtf8:  
                 strncpy_s(Temp, sizeof(Temp), "UTF-8",  _TRUNCATE);  
                 break;  
         default:  
                 strncpy_s(Temp, sizeof(Temp), "English",  _TRUNCATE);  
2244          }          }
2245    
         WritePrivateProfileString(Section, "Language", Temp, FName);  
   
2246          /* Port type */          /* Port type */
2247          WritePrivateProfileString(Section, "Port", (ts->PortType==IdSerial)?"serial":"tcpip", FName);          WritePrivateProfileString(Section, "Port", (ts->PortType==IdSerial)?"serial":"tcpip", FName);
2248    
# Line 2352  void PASCAL WriteIniFile(const wchar_t * Line 2300  void PASCAL WriteIniFile(const wchar_t *
2300          }          }
2301    
2302          /* Kanji Code (receive)  */          /* Kanji Code (receive)  */
2303          switch (ts->KanjiCode) {          {
2304          case IdEUC:                  const char *code_str = GetKanjiCodeStr(ts->Language, ts->KanjiCode);
2305                  strncpy_s(Temp, sizeof(Temp), "EUC", _TRUNCATE);                  WritePrivateProfileString(Section, "KanjiReceive", code_str, FName);
                 break;  
         case IdJIS:  
                 strncpy_s(Temp, sizeof(Temp), "JIS", _TRUNCATE);  
                 break;  
         case IdUTF8:  
                 strncpy_s(Temp, sizeof(Temp), "UTF-8", _TRUNCATE);  
                 break;  
         case IdUTF8m:  
                 strncpy_s(Temp, sizeof(Temp), "UTF-8m", _TRUNCATE);  
                 break;  
         default:  
                 switch (ts->Language) {  
                 case IdJapanese:  
                         strncpy_s(Temp, sizeof(Temp), "SJIS", _TRUNCATE);  
                         break;  
                 case IdKorean:  
                         strncpy_s(Temp, sizeof(Temp), "KS5601", _TRUNCATE);  
                         break;  
                 default:  
                         strncpy_s(Temp, sizeof(Temp), "SJIS", _TRUNCATE);  
                 }  
2306          }          }
         WritePrivateProfileString(Section, "KanjiReceive", Temp, FName);  
2307    
2308          /* Katakana (receive)  */          /* Katakana (receive)  */
2309          if (ts->JIS7Katakana == 1)          if (ts->JIS7Katakana == 1)
# Line 2388  void PASCAL WriteIniFile(const wchar_t * Line 2314  void PASCAL WriteIniFile(const wchar_t *
2314          WritePrivateProfileString(Section, "KatakanaReceive", Temp, FName);          WritePrivateProfileString(Section, "KatakanaReceive", Temp, FName);
2315    
2316          /* Kanji Code (transmit)  */          /* Kanji Code (transmit)  */
2317          switch (ts->KanjiCodeSend) {          {
2318          case IdEUC:                  const char *code_str = GetKanjiCodeStr(ts->Language, ts->KanjiCodeSend);
2319                  strncpy_s(Temp, sizeof(Temp), "EUC", _TRUNCATE);                  WritePrivateProfileString(Section, "KanjiSend", code_str, FName);
                 break;  
         case IdJIS:  
                 strncpy_s(Temp, sizeof(Temp), "JIS", _TRUNCATE);  
                 break;  
         case IdUTF8:  
                 strncpy_s(Temp, sizeof(Temp), "UTF-8", _TRUNCATE);  
                 break;  
         default:  
                 switch (ts->Language) {  
                 case IdJapanese:  
                         strncpy_s(Temp, sizeof(Temp), "SJIS", _TRUNCATE);  
                         break;  
                 case IdKorean:  
                         strncpy_s(Temp, sizeof(Temp), "KS5601", _TRUNCATE);  
                         break;  
                 default:  
                         strncpy_s(Temp, sizeof(Temp), "SJIS", _TRUNCATE);  
                 }  
2320          }          }
         WritePrivateProfileString(Section, "KanjiSend", Temp, FName);  
2321    
2322          /* Katakana (transmit)  */          /* Katakana (transmit)  */
2323          if (ts->JIS7KatakanaSend == 1)          if (ts->JIS7KatakanaSend == 1)
# Line 3811  static void ParseHostName(char *HostStr, Line 3718  static void ParseHostName(char *HostStr,
3718    
3719  void PASCAL ParseParam(wchar_t *Param, PTTSet ts, PCHAR DDETopic)  void PASCAL ParseParam(wchar_t *Param, PTTSet ts, PCHAR DDETopic)
3720  {  {
3721          int i, pos, c;          int pos, c;
         //int param_top;  
3722          wchar_t Temp[MaxStrLen]; // ttpmacroから呼ばれることを想定しMaxStrLenサイズとする          wchar_t Temp[MaxStrLen]; // ttpmacroから呼ばれることを想定しMaxStrLenサイズとする
3723          wchar_t Temp2[MaxStrLen];          wchar_t Temp2[MaxStrLen];
3724          WORD ParamPort = 0;          WORD ParamPort = 0;
# Line 3837  void PASCAL ParseParam(wchar_t *Param, P Line 3743  void PASCAL ParseParam(wchar_t *Param, P
3743          /* Get command line parameters */          /* Get command line parameters */
3744          if (DDETopic != NULL)          if (DDETopic != NULL)
3745                  DDETopic[0] = 0;                  DDETopic[0] = 0;
3746          i = 0;  
3747          /* the first term shuld be executable filename of Tera Term */          /* the first term shuld be executable filename of Tera Term */
3748          start = GetParam(Temp, _countof(Temp), Param);          start = GetParam(Temp, _countof(Temp), Param);
3749    
Legend:
Removed from v.9498  
changed lines
  Added in v.9499
Back to OSDN">Back to OSDN
 ViewVC Help
Powered by ViewVC 1.1.26  
About OSDN
Find Software
Develop Software
Help