src/msw/iniconf.cpp

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/msw/iniconf.cpp
   3 // Purpose:     implementation of wxIniConfig class
   4 // Author:      Vadim Zeitlin
   5 // Modified by:
   6 // Created:     27.07.98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
   9 // Licence:     wxWindows license
  10 ///////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 #pragma implementation "iniconf.h"
  14 #endif
  15
  16 // For compilers that support precompilation, includes "wx.h".
  17 #include "wx/wxprec.h"
  18
  19 #ifdef __BORLANDC__
  20 #pragma hdrstop
  21 #endif
  22
  23 #ifndef   WX_PRECOMP
  24   #include  <wx/string.h>
  25   #include  <wx/intl.h>
  26   #include  <wx/event.h>
  27   #include  <wx/app.h>
  28   #include  <wx/utils.h>
  29 #endif  //WX_PRECOMP
  30
  31 #include  <wx/dynarray.h>
  32 #include  <wx/log.h>
  33 #include  <wx/config.h>
  34
  35 #include  <wx/msw/iniconf.h>
  36
  37 // _WINDOWS_ is defined when windows.h is included,
  38 // __WXMSW__ is defined for MS Windows compilation
  39 #if       defined(__WXMSW__) && !defined(_WINDOWS_)
  40   #include  <windows.h>
  41 #endif  //windows.h
  42
  43 // ----------------------------------------------------------------------------
  44 // constants
  45 // ----------------------------------------------------------------------------
  46
  47 // we replace all path separators with this character
  48 #define PATH_SEP_REPLACE  '_'
  49
  50 // ============================================================================
  51 // implementation
  52 // ============================================================================
  53
  54 // ----------------------------------------------------------------------------
  55 // ctor & dtor
  56 // ----------------------------------------------------------------------------
  57
  58 wxIniConfig::wxIniConfig(const wxString& strAppName,
  59                          const wxString& strVendor,
  60                          const wxString& localFilename,
  61                          const wxString& globalFilename,
  62                          long style)
  63            : wxConfigBase(!appName && wxTheApp ? wxTheApp->GetAppName()
  64                                                : appName,
  65                           !vendorName ? (wxTheApp ? wxTheApp->GetVendorName()
  66                                                   : appName)
  67                                       : vendorName,
  68                           strLocal, strGlobal, style),
  69 {
  70     m_strLocalFilename = localFilename;
  71     if (m_strLocalFilename.IsEmpty())
  72     {
  73         m_strLocalFilename = GetAppName() + ".ini";
  74     }
  75
  76     // append the extension if none given and it's not an absolute file name
  77     // (otherwise we assume that they know what they're doing)
  78     if ( !wxIsPathSeparator(m_strLocalFilename[0u]) &&
  79         m_strLocalFilename.Find('.') == wxNOT_FOUND )
  80     {
  81         m_strLocalFilename << ".ini";
  82     }
  83
  84     // set root path
  85     SetPath("");
  86 }
  87
  88 wxIniConfig::~wxIniConfig()
  89 {
  90 }
  91
  92 // ----------------------------------------------------------------------------
  93 // path management
  94 // ----------------------------------------------------------------------------
  95
  96 void wxIniConfig::SetPath(const wxString& strPath)
  97 {
  98   wxArrayString aParts;
  99
 100   if ( strPath.IsEmpty() ) {
 101     // nothing
 102   }
 103   else if ( strPath[0u] == wxCONFIG_PATH_SEPARATOR ) {
 104     // absolute path
 105     wxSplitPath(aParts, strPath);
 106   }
 107   else {
 108     // relative path, combine with current one
 109     wxString strFullPath = GetPath();
 110     strFullPath << wxCONFIG_PATH_SEPARATOR << strPath;
 111     wxSplitPath(aParts, strFullPath);
 112   }
 113
 114   size_t nPartsCount = aParts.Count();
 115   m_strPath.Empty();
 116   if ( nPartsCount == 0 ) {
 117     // go to the root
 118     m_strGroup = PATH_SEP_REPLACE;
 119   }
 120   else {
 121     // translate
 122     m_strGroup = aParts[0u];
 123     for ( size_t nPart = 1; nPart < nPartsCount; nPart++ ) {
 124       if ( nPart > 1 )
 125         m_strPath << PATH_SEP_REPLACE;
 126       m_strPath << aParts[nPart];
 127     }
 128   }
 129
 130   // other functions assume that all this is true, i.e. there are no trailing
 131   // underscores at the end except if the group is the root one
 132   wxASSERT( (m_strPath.IsEmpty() || m_strPath.Last() != PATH_SEP_REPLACE) &&
 133             (m_strGroup == wxString(PATH_SEP_REPLACE) ||
 134              m_strGroup.Last() != PATH_SEP_REPLACE) );
 135 }
 136
 137 const wxString& wxIniConfig::GetPath() const
 138 {
 139   static wxString s_str;
 140
 141   // always return abs path
 142   s_str = wxCONFIG_PATH_SEPARATOR;
 143
 144   if ( m_strGroup == wxString(PATH_SEP_REPLACE) ) {
 145     // we're at the root level, nothing to do
 146   }
 147   else {
 148     s_str << m_strGroup;
 149     if ( !m_strPath.IsEmpty() )
 150       s_str << wxCONFIG_PATH_SEPARATOR;
 151     for ( const char *p = m_strPath; *p != '\0'; p++ ) {
 152       s_str << (*p == PATH_SEP_REPLACE ? wxCONFIG_PATH_SEPARATOR : *p);
 153     }
 154   }
 155
 156   return s_str;
 157 }
 158
 159 wxString wxIniConfig::GetPrivateKeyName(const wxString& szKey) const
 160 {
 161   wxString strKey;
 162
 163   if ( !m_strPath.IsEmpty() )
 164     strKey << m_strPath << PATH_SEP_REPLACE;
 165
 166   strKey << szKey;
 167
 168   return strKey;
 169 }
 170
 171 wxString wxIniConfig::GetKeyName(const wxString& szKey) const
 172 {
 173   wxString strKey;
 174
 175   if ( m_strGroup != wxString(PATH_SEP_REPLACE) )
 176     strKey << m_strGroup << PATH_SEP_REPLACE;
 177   if ( !m_strPath.IsEmpty() )
 178     strKey << m_strPath << PATH_SEP_REPLACE;
 179
 180   strKey << szKey;
 181
 182   return strKey;
 183 }
 184
 185 // ----------------------------------------------------------------------------
 186 // enumeration
 187 // ----------------------------------------------------------------------------
 188
 189 // not implemented
 190 bool wxIniConfig::GetFirstGroup(wxString& str, long& lIndex) const
 191 {
 192   wxFAIL_MSG("not implemented");
 193
 194   return FALSE;
 195 }
 196
 197 bool wxIniConfig::GetNextGroup (wxString& str, long& lIndex) const
 198 {
 199   wxFAIL_MSG("not implemented");
 200
 201   return FALSE;
 202 }
 203
 204 bool wxIniConfig::GetFirstEntry(wxString& str, long& lIndex) const
 205 {
 206   wxFAIL_MSG("not implemented");
 207
 208   return FALSE;
 209 }
 210
 211 bool wxIniConfig::GetNextEntry (wxString& str, long& lIndex) const
 212 {
 213   wxFAIL_MSG("not implemented");
 214
 215   return FALSE;
 216 }
 217
 218 // ----------------------------------------------------------------------------
 219 // misc info
 220 // ----------------------------------------------------------------------------
 221
 222 // not implemented
 223 size_t wxIniConfig::GetNumberOfEntries(bool bRecursive) const
 224 {
 225   wxFAIL_MSG("not implemented");
 226
 227   return (size_t)-1;
 228 }
 229
 230 size_t wxIniConfig::GetNumberOfGroups(bool bRecursive) const
 231 {
 232   wxFAIL_MSG("not implemented");
 233
 234   return (size_t)-1;
 235 }
 236
 237 bool wxIniConfig::HasGroup(const wxString& strName) const
 238 {
 239   wxFAIL_MSG("not implemented");
 240
 241   return FALSE;
 242 }
 243
 244 bool wxIniConfig::HasEntry(const wxString& strName) const
 245 {
 246   wxFAIL_MSG("not implemented");
 247
 248   return FALSE;
 249 }
 250
 251 // is current group empty?
 252 bool wxIniConfig::IsEmpty() const
 253 {
 254   char szBuf[1024];
 255
 256   GetPrivateProfileString(m_strGroup, NULL, "",
 257                           szBuf, WXSIZEOF(szBuf), m_strLocalFilename);
 258   if ( !::IsEmpty(szBuf) )
 259     return FALSE;
 260
 261   GetProfileString(m_strGroup, NULL, "", szBuf, WXSIZEOF(szBuf));
 262   if ( !::IsEmpty(szBuf) )
 263     return FALSE;
 264
 265   return TRUE;
 266 }
 267
 268 // ----------------------------------------------------------------------------
 269 // read/write
 270 // ----------------------------------------------------------------------------
 271
 272 bool wxIniConfig::Read(const wxString& szKey, wxString *pstr) const
 273 {
 274   wxConfigPathChanger path(this, szKey);
 275   wxString strKey = GetPrivateKeyName(path.Name());
 276
 277   char szBuf[1024]; // @@ should dynamically allocate memory...
 278
 279   // first look in the private INI file
 280
 281   // NB: the lpDefault param to GetPrivateProfileString can't be NULL
 282   GetPrivateProfileString(m_strGroup, strKey, "",
 283                           szBuf, WXSIZEOF(szBuf), m_strLocalFilename);
 284   if ( ::IsEmpty(szBuf) ) {
 285     // now look in win.ini
 286     wxString strKey = GetKeyName(path.Name());
 287     GetProfileString(m_strGroup, strKey, "", szBuf, WXSIZEOF(szBuf));
 288   }
 289
 290   if ( ::IsEmpty(szBuf) ) {
 291     return FALSE;
 292   }
 293   else {
 294     *pstr = szBuf ;
 295     return TRUE;
 296   }
 297 }
 298
 299 bool wxIniConfig::Read(const wxString& szKey, wxString *pstr,
 300                        const wxString& szDefault) const
 301 {
 302   wxConfigPathChanger path(this, szKey);
 303   wxString strKey = GetPrivateKeyName(path.Name());
 304
 305   char szBuf[1024]; // @@ should dynamically allocate memory...
 306
 307   // first look in the private INI file
 308
 309   // NB: the lpDefault param to GetPrivateProfileString can't be NULL
 310   GetPrivateProfileString(m_strGroup, strKey, "",
 311                           szBuf, WXSIZEOF(szBuf), m_strLocalFilename);
 312   if ( ::IsEmpty(szBuf) ) {
 313     // now look in win.ini
 314     wxString strKey = GetKeyName(path.Name());
 315     GetProfileString(m_strGroup, strKey, "", szBuf, WXSIZEOF(szBuf));
 316   }
 317
 318   if ( ::IsEmpty(szBuf) ) {
 319     *pstr = szDefault;
 320     return FALSE;
 321   }
 322   else {
 323     *pstr = szBuf ;
 324     return TRUE;
 325   }
 326 }
 327
 328 bool wxIniConfig::Read(const wxString& szKey, long *pl) const
 329 {
 330   wxConfigPathChanger path(this, szKey);
 331   wxString strKey = GetPrivateKeyName(path.Name());
 332
 333   // hack: we have no mean to know if it really found the default value or
 334   // didn't find anything, so we call it twice
 335
 336   static const int nMagic  = 17; // 17 is some "rare" number
 337   static const int nMagic2 = 28; // arbitrary number != nMagic
 338   long lVal = GetPrivateProfileInt(m_strGroup, strKey, nMagic, m_strLocalFilename);
 339   if ( lVal != nMagic ) {
 340     // the value was read from the file
 341     *pl = lVal;
 342     return TRUE;
 343   }
 344
 345   // is it really nMagic?
 346   lVal = GetPrivateProfileInt(m_strGroup, strKey, nMagic2, m_strLocalFilename);
 347   if ( lVal == nMagic2 ) {
 348     // the nMagic it returned was indeed read from the file
 349     *pl = lVal;
 350     return TRUE;
 351   }
 352
 353   // no, it was just returning the default value, so now look in win.ini
 354   *pl = GetProfileInt(GetVendorName(), GetKeyName(szKey), *pl);
 355
 356   return TRUE;
 357 }
 358
 359 bool wxIniConfig::Write(const wxString& szKey, const wxString& szValue)
 360 {
 361   wxConfigPathChanger path(this, szKey);
 362   wxString strKey = GetPrivateKeyName(path.Name());
 363
 364   bool bOk = WritePrivateProfileString(m_strGroup, strKey,
 365                                        szValue, m_strLocalFilename) != 0;
 366
 367   if ( !bOk )
 368     wxLogLastError("WritePrivateProfileString");
 369
 370   return bOk;
 371 }
 372
 373 bool wxIniConfig::Write(const wxString& szKey, long lValue)
 374 {
 375   // ltoa() is not ANSI :-(
 376   char szBuf[40];   // should be good for sizeof(long) <= 16 (128 bits)
 377   sprintf(szBuf, "%ld", lValue);
 378
 379   return Write(szKey, szBuf);
 380 }
 381
 382 bool wxIniConfig::Flush(bool /* bCurrentOnly */)
 383 {
 384   // this is just the way it works
 385   return WritePrivateProfileString(NULL, NULL, NULL, m_strLocalFilename) != 0;
 386 }
 387
 388 // ----------------------------------------------------------------------------
 389 // delete
 390 // ----------------------------------------------------------------------------
 391
 392 bool wxIniConfig::DeleteEntry(const wxString& szKey, bool bGroupIfEmptyAlso)
 393 {
 394   // passing NULL as value to WritePrivateProfileString deletes the key
 395 //  if ( !Write(szKey, (const char *)NULL) )
 396 //    return FALSE;
 397   wxConfigPathChanger path(this, szKey);
 398   wxString strKey = GetPrivateKeyName(path.Name());
 399
 400   if (WritePrivateProfileString(m_strGroup, szKey,
 401                                          (const char*) NULL, m_strLocalFilename) == 0)
 402     return FALSE;
 403
 404   if ( !bGroupIfEmptyAlso || !IsEmpty() )
 405     return TRUE;
 406
 407   // delete the current group too
 408   bool bOk = WritePrivateProfileString(m_strGroup, NULL,
 409                                        NULL, m_strLocalFilename) != 0;
 410
 411   if ( !bOk )
 412     wxLogLastError("WritePrivateProfileString");
 413
 414   return bOk;
 415 }
 416
 417 bool wxIniConfig::DeleteGroup(const wxString& szKey)
 418 {
 419   wxConfigPathChanger path(this, szKey);
 420
 421   // passing NULL as section name to WritePrivateProfileString deletes the
 422   // whole section according to the docs
 423   bool bOk = WritePrivateProfileString(path.Name(), NULL,
 424                                        NULL, m_strLocalFilename) != 0;
 425
 426   if ( !bOk )
 427     wxLogLastError("WritePrivateProfileString");
 428
 429   return bOk;
 430 }
 431
 432 #ifndef MAX_PATH
 433 #define MAX_PATH 256
 434 #endif
 435
 436 bool wxIniConfig::DeleteAll()
 437 {
 438   // first delete our group in win.ini
 439   WriteProfileString(GetVendorName(), NULL, NULL);
 440
 441   // then delete our own ini file
 442   char szBuf[MAX_PATH];
 443   size_t nRc = GetWindowsDirectory(szBuf, WXSIZEOF(szBuf));
 444   if ( nRc == 0 )
 445     wxLogLastError("GetWindowsDirectory");
 446   else if ( nRc > WXSIZEOF(szBuf) )
 447     wxFAIL_MSG("buffer is too small for Windows directory.");
 448
 449   wxString strFile = szBuf;
 450   strFile << '\\' << m_strLocalFilename;
 451
 452   if ( !wxRemoveFile(strFile) ) {
 453     wxLogSysError(_("Can't delete the INI file '%s'"), strFile.c_str());
 454     return FALSE;
 455   }
 456
 457   return TRUE;
 458 }
 459
 460 bool wxIniConfig::RenameEntry(const wxString& oldName, const wxString& newName)
 461 {
 462     // Not implemented
 463     return FALSE;
 464 }
 465
 466 bool wxIniConfig::RenameGroup(const wxString& oldName, const wxString& newName)
 467 {
 468     // Not implemented
 469     return FALSE;
 470 }