]> git.saurik.com Git - wxWidgets.git/blobdiff - src/os2/iniconf.cpp
*** empty log message ***
[wxWidgets.git] / src / os2 / iniconf.cpp
diff --git a/src/os2/iniconf.cpp b/src/os2/iniconf.cpp
new file mode 100644 (file)
index 0000000..a72bbfa
--- /dev/null
@@ -0,0 +1,463 @@
+///////////////////////////////////////////////////////////////////////////////
+// Name:        src/os2/iniconf.cpp
+// Purpose:     implementation of wxIniConfig class
+// Author:      David Webster
+// Modified by:
+// Created:     10/09/99
+// Copyright:   David Webster
+// Licence:     wxWindows license
+///////////////////////////////////////////////////////////////////////////////
+
+// For compilers that support precompilation, includes "wx.h".
+#include "wx/wxprec.h"
+
+#ifndef   WX_PRECOMP
+  #include  <wx/string.h>
+  #include  <wx/intl.h>
+  #include  <wx/event.h>
+  #include  <wx/app.h>
+  #include  <wx/utils.h>
+#endif  //WX_PRECOMP
+
+#include  <wx/dynarray.h>
+#include  <wx/log.h>
+#include  <wx/config.h>
+
+#include  <wx/os2/iniconf.h>
+
+#define INCL_PM
+#include  <os2.h>
+
+// ----------------------------------------------------------------------------
+// constants
+// ----------------------------------------------------------------------------
+
+// we replace all path separators with this character
+#define PATH_SEP_REPLACE  '_'
+
+// ============================================================================
+// implementation
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// ctor & dtor
+// ----------------------------------------------------------------------------
+
+wxIniConfig::wxIniConfig(const wxString& strAppName,
+                         const wxString& strVendor,
+                         const wxString& localFilename,
+                         const wxString& globalFilename,
+                         long style)
+           : wxConfigBase(!strAppName && wxTheApp ? wxTheApp->GetAppName()
+                                               : strAppName,
+                          !strVendor ? (wxTheApp ? wxTheApp->GetVendorName()
+                                                  : strAppName)
+                                      : strVendor,
+                          localFilename, globalFilename, style)
+{
+    m_strLocalFilename = localFilename;
+    if (m_strLocalFilename.IsEmpty())
+    {
+        m_strLocalFilename = GetAppName() + ".ini";
+    }
+
+    // append the extension if none given and it's not an absolute file name
+    // (otherwise we assume that they know what they're doing)
+    if ( !wxIsPathSeparator(m_strLocalFilename[0u]) &&
+        m_strLocalFilename.Find('.') == wxNOT_FOUND )
+    {
+        m_strLocalFilename << ".ini";
+    }
+
+    // set root path
+    SetPath("");
+}
+
+wxIniConfig::~wxIniConfig()
+{
+}
+
+// ----------------------------------------------------------------------------
+// path management
+// ----------------------------------------------------------------------------
+
+void wxIniConfig::SetPath(const wxString& strPath)
+{
+  wxArrayString aParts;
+
+  if ( strPath.IsEmpty() ) {
+    // nothing
+  }
+  else if ( strPath[0u] == wxCONFIG_PATH_SEPARATOR ) {
+    // absolute path
+    wxSplitPath(aParts, strPath);
+  }
+  else {
+    // relative path, combine with current one
+    wxString strFullPath = GetPath();
+    strFullPath << wxCONFIG_PATH_SEPARATOR << strPath;
+    wxSplitPath(aParts, strFullPath);
+  }
+
+  size_t nPartsCount = aParts.Count();
+  m_strPath.Empty();
+  if ( nPartsCount == 0 ) {
+    // go to the root
+    m_strGroup = PATH_SEP_REPLACE;
+  }
+  else {
+    // translate
+    m_strGroup = aParts[0u];
+    for ( size_t nPart = 1; nPart < nPartsCount; nPart++ ) {
+      if ( nPart > 1 )
+        m_strPath << PATH_SEP_REPLACE;
+      m_strPath << aParts[nPart];
+    }
+  }
+
+  // other functions assume that all this is true, i.e. there are no trailing
+  // underscores at the end except if the group is the root one
+  wxASSERT( (m_strPath.IsEmpty() || m_strPath.Last() != PATH_SEP_REPLACE) &&
+            (m_strGroup == wxString(PATH_SEP_REPLACE) ||
+             m_strGroup.Last() != PATH_SEP_REPLACE) );
+}
+
+const wxString& wxIniConfig::GetPath() const
+{
+  static wxString s_str;
+
+  // always return abs path
+  s_str = wxCONFIG_PATH_SEPARATOR;
+
+  if ( m_strGroup == wxString(PATH_SEP_REPLACE) ) {
+    // we're at the root level, nothing to do
+  }
+  else {
+    s_str << m_strGroup;
+    if ( !m_strPath.IsEmpty() )
+      s_str << wxCONFIG_PATH_SEPARATOR;
+    for ( const char *p = m_strPath; *p != '\0'; p++ ) {
+      s_str << (*p == PATH_SEP_REPLACE ? wxCONFIG_PATH_SEPARATOR : *p);
+    }
+  }
+
+  return s_str;
+}
+
+wxString wxIniConfig::GetPrivateKeyName(const wxString& szKey) const
+{
+  wxString strKey;
+
+  if ( !m_strPath.IsEmpty() )
+    strKey << m_strPath << PATH_SEP_REPLACE;
+
+  strKey << szKey;
+
+  return strKey;
+}
+
+wxString wxIniConfig::GetKeyName(const wxString& szKey) const
+{
+  wxString strKey;
+
+  if ( m_strGroup != wxString(PATH_SEP_REPLACE) )
+    strKey << m_strGroup << PATH_SEP_REPLACE;
+  if ( !m_strPath.IsEmpty() )
+    strKey << m_strPath << PATH_SEP_REPLACE;
+
+  strKey << szKey;
+
+  return strKey;
+}
+
+// ----------------------------------------------------------------------------
+// enumeration
+// ----------------------------------------------------------------------------
+
+// not implemented
+bool wxIniConfig::GetFirstGroup(wxString& str, long& lIndex) const
+{
+  wxFAIL_MSG("not implemented");
+
+  return FALSE;
+}
+
+bool wxIniConfig::GetNextGroup (wxString& str, long& lIndex) const
+{
+  wxFAIL_MSG("not implemented");
+
+  return FALSE;
+}
+
+bool wxIniConfig::GetFirstEntry(wxString& str, long& lIndex) const
+{
+  wxFAIL_MSG("not implemented");
+
+  return FALSE;
+}
+
+bool wxIniConfig::GetNextEntry (wxString& str, long& lIndex) const
+{
+  wxFAIL_MSG("not implemented");
+
+  return FALSE;
+}
+
+// ----------------------------------------------------------------------------
+// misc info
+// ----------------------------------------------------------------------------
+
+// not implemented
+size_t wxIniConfig::GetNumberOfEntries(bool bRecursive) const
+{
+  wxFAIL_MSG("not implemented");
+
+  return (size_t)-1;
+}
+
+size_t wxIniConfig::GetNumberOfGroups(bool bRecursive) const
+{
+  wxFAIL_MSG("not implemented");
+
+  return (size_t)-1;
+}
+
+bool wxIniConfig::HasGroup(const wxString& strName) const
+{
+  wxFAIL_MSG("not implemented");
+
+  return FALSE;
+}
+
+bool wxIniConfig::HasEntry(const wxString& strName) const
+{
+  wxFAIL_MSG("not implemented");
+
+  return FALSE;
+}
+
+// is current group empty?
+bool wxIniConfig::IsEmpty() const
+{
+  char szBuf[1024];
+
+//  GetPrivateProfileString(m_strGroup, NULL, "",
+//                          szBuf, WXSIZEOF(szBuf), m_strLocalFilename);
+  if ( !::IsEmpty(szBuf) )
+    return FALSE;
+
+//  GetProfileString(m_strGroup, NULL, "", szBuf, WXSIZEOF(szBuf));
+//  if ( !::IsEmpty(szBuf) )
+    return FALSE;
+
+  return TRUE;
+}
+
+// ----------------------------------------------------------------------------
+// read/write
+// ----------------------------------------------------------------------------
+
+bool wxIniConfig::Read(const wxString& szKey, wxString *pstr) const
+{
+  wxConfigPathChanger path(this, szKey);
+  wxString strKey = GetPrivateKeyName(path.Name());
+
+  char szBuf[1024]; // @@ should dynamically allocate memory...
+
+  // first look in the private INI file
+
+  // NB: the lpDefault param to GetPrivateProfileString can't be NULL
+//  GetPrivateProfileString(m_strGroup, strKey, "",
+//                          szBuf, WXSIZEOF(szBuf), m_strLocalFilename);
+  if ( ::IsEmpty(szBuf) ) {
+    // now look in win.ini
+    wxString strKey = GetKeyName(path.Name());
+//    GetProfileString(m_strGroup, strKey, "", szBuf, WXSIZEOF(szBuf));
+  }
+
+  if ( ::IsEmpty(szBuf) ) {
+    return FALSE;
+  }
+  else {
+    *pstr = szBuf ;
+    return TRUE;
+  }
+}
+
+bool wxIniConfig::Read(const wxString& szKey, wxString *pstr,
+                       const wxString& szDefault) const
+{
+  wxConfigPathChanger path(this, szKey);
+  wxString strKey = GetPrivateKeyName(path.Name());
+
+  char szBuf[1024]; // @@ should dynamically allocate memory...
+
+  // first look in the private INI file
+
+  // NB: the lpDefault param to GetPrivateProfileString can't be NULL
+//  GetPrivateProfileString(m_strGroup, strKey, "",
+//                          szBuf, WXSIZEOF(szBuf), m_strLocalFilename);
+  if ( ::IsEmpty(szBuf) ) {
+    // now look in win.ini
+    wxString strKey = GetKeyName(path.Name());
+//    GetProfileString(m_strGroup, strKey, "", szBuf, WXSIZEOF(szBuf));
+  }
+
+  if ( ::IsEmpty(szBuf) ) {
+    *pstr = szDefault;
+    return FALSE;
+  }
+  else {
+    *pstr = szBuf ;
+    return TRUE;
+  }
+}
+
+bool wxIniConfig::Read(const wxString& szKey, long *pl) const
+{
+  wxConfigPathChanger path(this, szKey);
+  wxString strKey = GetPrivateKeyName(path.Name());
+
+  // hack: we have no mean to know if it really found the default value or
+  // didn't find anything, so we call it twice
+
+  static const int nMagic  = 17; // 17 is some "rare" number
+  static const int nMagic2 = 28; // arbitrary number != nMagic
+  long lVal; // = GetPrivateProfileInt(m_strGroup, strKey, nMagic, m_strLocalFilename);
+  if ( lVal != nMagic ) {
+    // the value was read from the file
+    *pl = lVal;
+    return TRUE;
+  }
+
+  // is it really nMagic?
+//  lVal = GetPrivateProfileInt(m_strGroup, strKey, nMagic2, m_strLocalFilename);
+  if ( lVal == nMagic2 ) {
+    // the nMagic it returned was indeed read from the file
+    *pl = lVal;
+    return TRUE;
+  }
+
+  // no, it was just returning the default value, so now look in win.ini
+//  *pl = GetProfileInt(GetVendorName(), GetKeyName(szKey), *pl);
+
+  return TRUE;
+}
+
+bool wxIniConfig::Write(const wxString& szKey, const wxString& szValue)
+{
+  wxConfigPathChanger path(this, szKey);
+  wxString strKey = GetPrivateKeyName(path.Name());
+
+  bool bOk; // = WritePrivateProfileString(m_strGroup, strKey,
+//                                       szValue, m_strLocalFilename) != 0;
+
+  if ( !bOk )
+    wxLogLastError("WritePrivateProfileString");
+
+  return bOk;
+}
+
+bool wxIniConfig::Write(const wxString& szKey, long lValue)
+{
+  // ltoa() is not ANSI :-(
+  char szBuf[40];   // should be good for sizeof(long) <= 16 (128 bits)
+  sprintf(szBuf, "%ld", lValue);
+
+  return Write(szKey, szBuf);
+}
+
+bool wxIniConfig::Flush(bool /* bCurrentOnly */)
+{
+  // this is just the way it works
+//  return WritePrivateProfileString(NULL, NULL, NULL, m_strLocalFilename) != 0;
+  return FALSE;
+}
+
+// ----------------------------------------------------------------------------
+// delete
+// ----------------------------------------------------------------------------
+
+bool wxIniConfig::DeleteEntry(const wxString& szKey, bool bGroupIfEmptyAlso)
+{
+  // passing NULL as value to WritePrivateProfileString deletes the key
+//  if ( !Write(szKey, (const char *)NULL) )
+//    return FALSE;
+  wxConfigPathChanger path(this, szKey);
+  wxString strKey = GetPrivateKeyName(path.Name());
+
+//  if (WritePrivateProfileString(m_strGroup, szKey,
+//                                         (const char*) NULL, m_strLocalFilename) == 0)
+//    return FALSE;
+
+  if ( !bGroupIfEmptyAlso || !IsEmpty() )
+    return TRUE;
+
+  // delete the current group too
+  bool bOk; // = WritePrivateProfileString(m_strGroup, NULL,
+//                                       NULL, m_strLocalFilename) != 0;
+
+  if ( !bOk )
+    wxLogLastError("WritePrivateProfileString");
+
+  return bOk;
+}
+
+bool wxIniConfig::DeleteGroup(const wxString& szKey)
+{
+  wxConfigPathChanger path(this, szKey);
+
+  // passing NULL as section name to WritePrivateProfileString deletes the
+  // whole section according to the docs
+  bool bOk; // = WritePrivateProfileString(path.Name(), NULL,
+  //                                     NULL, m_strLocalFilename) != 0;
+
+  if ( !bOk )
+    wxLogLastError("WritePrivateProfileString");
+
+  return bOk;
+}
+
+#ifndef MAX_PATH
+#define MAX_PATH 256
+#endif
+
+bool wxIniConfig::DeleteAll()
+{
+  // first delete our group in win.ini
+//  WriteProfileString(GetVendorName(), NULL, NULL);
+
+  // then delete our own ini file
+  char szBuf[MAX_PATH];
+  size_t nRc; // = GetWindowsDirectory(szBuf, WXSIZEOF(szBuf));
+  if ( nRc == 0 )
+  {
+    wxLogLastError("GetWindowsDirectory");
+  }
+  else if ( nRc > WXSIZEOF(szBuf) )
+  {
+    wxFAIL_MSG("buffer is too small for Windows directory.");
+  }
+
+  wxString strFile = szBuf;
+  strFile << '\\' << m_strLocalFilename;
+
+  if ( !wxRemoveFile(strFile) ) {
+    wxLogSysError(_("Can't delete the INI file '%s'"), strFile.c_str());
+    return FALSE;
+  }
+
+  return TRUE;
+}
+
+bool wxIniConfig::RenameEntry(const wxString& oldName, const wxString& newName)
+{
+    // Not implemented
+    return FALSE;
+}
+
+bool wxIniConfig::RenameGroup(const wxString& oldName, const wxString& newName)
+{
+    // Not implemented
+    return FALSE;
+}