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