///////////////////////////////////////////////////////////////////////////////
// Name: unix/stdpaths.cpp
-// Purpose: wxStandardPaths implementation for Unix systems
+// Purpose: wxStandardPaths implementation for Unix & OpenVMS systems
// Author: Vadim Zeitlin
// Modified by:
// Created: 2004-10-19
#if wxUSE_STDPATHS
+#include "wx/stdpaths.h"
+
#ifndef WX_PRECOMP
- #include "wx/app.h"
+ #include "wx/utils.h"
#endif //WX_PRECOMP
#include "wx/filename.h"
-#include "wx/stdpaths.h"
-
-#ifdef __LINUX__
+#if defined( __LINUX__ ) || defined( __VMS )
#include <unistd.h>
#endif
// ============================================================================
-// wxStandardPaths implementation
+// common VMS/Unix part of wxStandardPaths implementation
// ============================================================================
-// ----------------------------------------------------------------------------
-// prefix management
-// ----------------------------------------------------------------------------
-
void wxStandardPaths::SetInstallPrefix(const wxString& prefix)
{
m_prefix = prefix;
}
+wxString wxStandardPaths::GetUserConfigDir() const
+{
+ return wxFileName::GetHomeDir();
+}
+
+// ============================================================================
+// wxStandardPaths implementation for VMS
+// ============================================================================
+
+#ifdef __VMS
+
wxString wxStandardPaths::GetInstallPrefix() const
{
if ( m_prefix.empty() )
{
- wxStandardPaths *self = wx_const_cast(wxStandardPaths *, this);
+ wx_const_cast(wxStandardPaths *, this)->m_prefix = wxT("/sys$system");
+ }
+
+ return m_prefix;
+}
+
+wxString wxStandardPaths::GetConfigDir() const
+{
+ return _T("/sys$manager");
+}
+
+wxString wxStandardPaths::GetDataDir() const
+{
+ return AppendAppInfo(GetInstallPrefix() + _T("/sys$share"));
+}
+
+wxString wxStandardPaths::GetLocalDataDir() const
+{
+ return AppendAppInfo(_T("/sys$manager"));
+}
+
+wxString wxStandardPaths::GetUserDataDir() const
+{
+ return wxFileName::GetHomeDir();
+}
+
+wxString wxStandardPaths::GetPluginsDir() const
+{
+ return wxString(); // TODO: this is wrong, it should return something
+}
+
+wxString
+wxStandardPaths::GetLocalizedResourcesDir(const wxString& lang,
+ ResourceCat category) const
+{
+ return wxStandardPathsBase::GetLocalizedResourcesDir(lang, category);
+}
+
+wxString wxStandardPaths::GetExecutablePath() const
+{
+ return wxStandardPathsBase::GetExecutablePath();
+}
+
+#else // !__VMS
+// ============================================================================
+// wxStandardPaths implementation for Unix
+// ============================================================================
+
+wxString wxStandardPaths::GetExecutablePath() const
+{
#ifdef __LINUX__
- // under Linux, we can get location of the executable
- char buf[4096];
- if ( readlink("/proc/self/exe", buf, WXSIZEOF(buf)) != -1 )
- {
- wxString exe(buf, wxConvLibc);
-
- // consider that we're in the last "bin" subdirectory of our prefix
- wxString basename(wxString(wxTheApp->argv[0]).AfterLast(_T('/')));
- size_t pos = exe.find(_T("/bin/") + basename);
- if ( pos != wxString::npos )
- {
- self->m_prefix.assign(exe, 0, pos);
- }
- }
-
- if ( m_prefix.empty() )
+ wxString exeStr;
+
+ char buf[4096];
+ int result = readlink("/proc/self/exe", buf, WXSIZEOF(buf) - sizeof(char));
+ if ( result != -1 )
+ {
+ buf[result] = '\0'; // readlink() doesn't NUL-terminate the buffer
+
+ // if the /proc/self/exe symlink has been dropped by the kernel for
+ // some reason, then readlink() could also return success but
+ // "(deleted)" as link destination...
+ if ( strcmp(buf, "(deleted)") != 0 )
+ exeStr = wxString(buf, wxConvLibc);
+ }
+
+ if ( exeStr.empty() )
+ {
+ // UPX-specific hack: when using UPX on linux, the kernel will drop the
+ // /proc/self/exe link; in this case we try to look for a special
+ // environment variable called " " which is created by UPX to save
+ // /proc/self/exe contents. See
+ // http://sf.net/tracker/?func=detail&atid=309863&aid=1565357&group_id=9863
+ // for more information about this issue.
+ wxGetEnv(wxT(" "), &exeStr);
+ }
+
+ if ( !exeStr.empty() )
+ return exeStr;
#endif // __LINUX__
- {
- self->m_prefix = _T("/usr/local");
- }
+
+ return wxStandardPathsBase::GetExecutablePath();
+}
+
+void wxStandardPaths::DetectPrefix()
+{
+ // we can try to infer the prefix from the location of the executable
+ wxString exeStr = GetExecutablePath();
+ if ( !exeStr.empty() )
+ {
+ // consider that we're in the last "bin" subdirectory of our prefix
+ size_t pos = exeStr.rfind(wxT("/bin/"));
+ if ( pos != wxString::npos )
+ m_prefix.assign(exeStr, 0, pos);
+ }
+
+ if ( m_prefix.empty() )
+ {
+ m_prefix = wxT("/usr/local");
+ }
+}
+
+wxString wxStandardPaths::GetInstallPrefix() const
+{
+ if ( m_prefix.empty() )
+ {
+ wxStandardPaths *pathPtr = wx_const_cast(wxStandardPaths *, this);
+ pathPtr->DetectPrefix();
}
return m_prefix;
wxString wxStandardPaths::GetConfigDir() const
{
- return _T("/etc");
-}
-
-wxString wxStandardPaths::GetUserConfigDir() const
-{
- return wxFileName::GetHomeDir();
+ return _T("/etc");
}
wxString wxStandardPaths::GetDataDir() const
{
- return AppendAppName(GetInstallPrefix() + _T("/share"));
+ return AppendAppInfo(GetInstallPrefix() + _T("/share"));
}
wxString wxStandardPaths::GetLocalDataDir() const
{
- return AppendAppName(_T("/etc"));
+ return AppendAppInfo(_T("/etc"));
}
wxString wxStandardPaths::GetUserDataDir() const
{
- return AppendAppName(wxFileName::GetHomeDir() + _T("/."));
+ return AppendAppInfo(wxFileName::GetHomeDir() + _T("/."));
}
wxString wxStandardPaths::GetPluginsDir() const
{
- return wxString();
+ return AppendAppInfo(GetInstallPrefix() + _T("/lib"));
}
+wxString
+wxStandardPaths::GetLocalizedResourcesDir(const wxString& lang,
+ ResourceCat category) const
+{
+ if ( category != ResourceCat_Messages )
+ return wxStandardPathsBase::GetLocalizedResourcesDir(lang, category);
+
+ return GetInstallPrefix() + _T("/share/locale/") + lang + _T("/LC_MESSAGES");
+}
+
+#endif // __VMS/!__VMS
+
#endif // wxUSE_STDPATHS