+wxString wxGetCurrentDir()
+{
+ wxString dir;
+ size_t len = 1024;
+ bool ok;
+ do
+ {
+ ok = getcwd(dir.GetWriteBuf(len + 1), len) != NULL;
+ dir.UngetWriteBuf();
+
+ if ( !ok )
+ {
+ if ( errno != ERANGE )
+ {
+ wxLogSysError(_T("Failed to get current directory"));
+
+ return wxEmptyString;
+ }
+ else
+ {
+ // buffer was too small, retry with a larger one
+ len *= 2;
+ }
+ }
+ //else: ok
+ } while ( !ok );
+
+ return dir;
+}
+
+#endif // 0
+
+// ----------------------------------------------------------------------------
+// wxExecute
+// ----------------------------------------------------------------------------
+
+// wxDoExecuteWithCapture() helper: reads an entire stream into one array
+//
+// returns true if ok, false if error
+#if wxUSE_STREAMS
+static bool ReadAll(wxInputStream *is, wxArrayString& output)
+{
+ wxCHECK_MSG( is, false, _T("NULL stream in wxExecute()?") );
+
+ // the stream could be already at EOF or in wxSTREAM_BROKEN_PIPE state
+ is->Reset();
+
+ wxTextInputStream tis(*is);
+
+ bool cont = true;
+ while ( cont )
+ {
+ wxString line = tis.ReadLine();
+ if ( is->Eof() )
+ break;
+
+ if ( !*is )
+ {
+ cont = false;
+ }
+ else
+ {
+ output.Add(line);
+ }
+ }
+
+ return cont;
+}
+#endif // wxUSE_STREAMS
+
+// this is a private function because it hasn't a clean interface: the first
+// array is passed by reference, the second by pointer - instead we have 2
+// public versions of wxExecute() below
+static long wxDoExecuteWithCapture(const wxString& command,
+ wxArrayString& output,
+ wxArrayString* error,
+ int flags)
+{
+ // create a wxProcess which will capture the output
+ wxProcess *process = new wxProcess;
+ process->Redirect();
+
+ long rc = wxExecute(command, wxEXEC_SYNC | flags, process);
+
+#if wxUSE_STREAMS
+ if ( rc != -1 )
+ {
+ if ( !ReadAll(process->GetInputStream(), output) )
+ rc = -1;
+
+ if ( error )
+ {
+ if ( !ReadAll(process->GetErrorStream(), *error) )
+ rc = -1;
+ }
+
+ }
+#else
+ wxUnusedVar(output);
+ wxUnusedVar(error);
+#endif // wxUSE_STREAMS/!wxUSE_STREAMS
+
+ delete process;
+
+ return rc;
+}
+
+long wxExecute(const wxString& command, wxArrayString& output, int flags)
+{
+ return wxDoExecuteWithCapture(command, output, NULL, flags);
+}
+
+long wxExecute(const wxString& command,
+ wxArrayString& output,
+ wxArrayString& error,
+ int flags)
+{
+ return wxDoExecuteWithCapture(command, output, &error, flags);
+}
+
+// ----------------------------------------------------------------------------
+// Launch default browser
+// ----------------------------------------------------------------------------
+
+bool wxLaunchDefaultBrowser(const wxString& url)
+{
+ wxString finalurl = url;
+
+ //if it isn't a full url, try appending http:// to it
+ if(wxURI(url).IsReference())
+ finalurl = wxString(wxT("http://")) + url;
+
+#if defined(__WXMSW__) && wxUSE_CONFIG_NATIVE
+
+ wxString command;
+
+ // ShellExecute() always opens in the same window,
+ // so do it manually for new window (from Mahogany)
+ wxRegKey key(wxRegKey::HKCR, url.BeforeFirst(':') + wxT("\\shell\\open"));
+ if ( key.Exists() )
+ {
+ wxRegKey keyDDE(key, wxT("DDEExec"));
+ if ( keyDDE.Exists() )
+ {
+ wxString ddeTopic = wxRegKey(keyDDE, wxT("topic"));
+
+ // we only know the syntax of WWW_OpenURL DDE request
+ if ( ddeTopic == wxT("WWW_OpenURL") )
+ {
+ wxString ddeCmd = keyDDE;
+
+ // this is a bit naive but should work as -1 can't appear
+ // elsewhere in the DDE topic, normally
+ if ( ddeCmd.Replace(wxT("-1"), wxT("0"),
+ false /* only first occurence */) == 1 )
+ {
+ // and also replace the parameters
+ if ( ddeCmd.Replace(wxT("%1"), url, false) == 1 )
+ {
+ // magic incantation understood by wxMSW
+ command << wxT("WX_DDE#")
+ << wxRegKey(key, wxT("command")).QueryDefaultValue() << wxT('#')
+ << wxRegKey(keyDDE, wxT("application")).QueryDefaultValue()
+ << wxT('#') << ddeTopic << wxT('#')
+ << ddeCmd;
+ }
+ }
+ }
+ }
+ }
+
+ //Try wxExecute - if it doesn't work or the regkey stuff
+ //above failed, fallback to opening the file in the same
+ //browser window
+ if ( command.empty() || wxExecute(command) == -1)
+ {
+ // CYGWIN and MINGW may have problems - so load ShellExecute
+ // dynamically
+ typedef HINSTANCE (*LPShellExecute)(HWND hwnd, const wxChar* lpOperation,
+ const wxChar* lpFile,
+ const wxChar* lpParameters,
+ const wxChar* lpDirectory,
+ INT nShowCmd);
+
+ HINSTANCE hShellDll = ::LoadLibrary(wxT("shell32.dll"));
+ if(hShellDll == NULL)
+ return false;
+
+ LPShellExecute lpShellExecute =
+ (LPShellExecute) ::GetProcAddress(hShellDll,
+ wxString::Format(wxT("ShellExecute%s"),
+
+#ifdef __WXUNICODE__
+ wxT("W")
+#else
+ wxT("A")
+#endif
+#ifdef __WXWINCE__
+ )
+#else
+ ).mb_str(wxConvLocal)
+#endif
+ );
+ if(lpShellExecute == NULL)
+ return false;
+
+ // Windows sometimes doesn't open the browser correctly when using mime
+ // types, so do ShellExecute - i.e. start <url> (from James Carroll)
+ unsigned int nResult = (int) (*lpShellExecute)(NULL, NULL, finalurl.c_str(),
+ NULL, wxT(""), SW_SHOWNORMAL);
+
+ // Unload Shell32.dll
+ ::FreeLibrary(hShellDll);
+
+ // HINSTANCE_ERROR not defined on WinCE
+#ifndef __WXWINCE__
+ // Hack for Firefox (returns file not found for some reason)
+ // from Angelo Mandato's wxHyperlinksCtrl
+ // HINSTANCE_ERROR == 32
+ if (nResult <= HINSTANCE_ERROR && nResult != SE_ERR_FNF)
+ return false;
+#endif
+
+#ifdef __WXDEBUG__
+ // Log something if SE_ERR_FNF happens
+ if(nResult == SE_ERR_FNF)
+ wxLogDebug(wxT("Got SE_ERR_FNF from ShellExecute - maybe FireFox"));
+#endif
+ }
+
+#elif wxUSE_MIMETYPE
+
+ // Non-windows way
+ wxFileType *ft = wxTheMimeTypesManager->GetFileTypeFromExtension (_T("html"));
+ if (!ft)
+ {
+ wxLogError(_T("No default application can open .html extension"));
+ return false;
+ }
+
+ wxString mt;
+ ft->GetMimeType(&mt);
+
+ wxString cmd;
+ bool ok = ft->GetOpenCommand (&cmd, wxFileType::MessageParameters(finalurl));
+ delete ft;
+
+ if (ok)
+ {
+ if( wxExecute (cmd, wxEXEC_ASYNC) == -1 )
+ {
+ wxLogError(_T("Failed to launch application for wxLaunchDefaultBrowser"));
+ return false;
+ }
+ }
+ else
+ {
+ // fallback to checking for the BROWSER environment variable
+ cmd = wxGetenv(wxT("BROWSER"));
+ if ( cmd.empty() || wxExecute(cmd + wxT(" ") + finalurl) == -1)
+ return false;
+ }
+
+
+#else // !wxUSE_MIMETYPE && !(WXMSW && wxUSE_NATIVE_CONFIG)
+
+ return false;
+
+#endif
+
+ //success - hopefully
+ return true;
+}
+
+// ----------------------------------------------------------------------------
+// wxApp::Yield() wrappers for backwards compatibility
+// ----------------------------------------------------------------------------
+
+bool wxYield()
+{
+ return wxTheApp && wxTheApp->Yield();
+}
+
+bool wxYieldIfNeeded()
+{
+ return wxTheApp && wxTheApp->Yield(true);
+}
+
+#endif // wxUSE_BASE
+
+// ============================================================================
+// GUI-only functions from now on
+// ============================================================================
+
+#if wxUSE_GUI
+
+// Id generation
+static long wxCurrentId = 100;
+
+long wxNewId()
+{
+ // skip the part of IDs space that contains hard-coded values:
+ if (wxCurrentId == wxID_LOWEST)
+ wxCurrentId = wxID_HIGHEST + 1;
+
+ return wxCurrentId++;
+}
+
+long
+wxGetCurrentId(void) { return wxCurrentId; }
+
+void
+wxRegisterId (long id)
+{
+ if (id >= wxCurrentId)
+ wxCurrentId = id + 1;
+}
+
+#if wxUSE_MENUS
+
+// ----------------------------------------------------------------------------
+// Menu accelerators related functions
+// ----------------------------------------------------------------------------
+
+wxChar *wxStripMenuCodes(const wxChar *in, wxChar *out)
+{
+ wxString s = wxMenuItem::GetLabelFromText(in);
+ if ( out )
+ {
+ // go smash their buffer if it's not big enough - I love char * params
+ memcpy(out, s.c_str(), s.length() * sizeof(wxChar));
+ }
+ else
+ {
+ // MYcopystring - for easier search...
+ out = new wxChar[s.length() + 1];
+ wxStrcpy(out, s.c_str());
+ }
+
+ return out;
+}
+
+wxString wxStripMenuCodes(const wxString& in)
+{
+ wxString out;
+
+ size_t len = in.length();
+ out.reserve(len);
+
+ for ( size_t n = 0; n < len; n++ )
+ {
+ wxChar ch = in[n];
+ if ( ch == _T('&') )
+ {
+ // skip it, it is used to introduce the accel char (or to quote
+ // itself in which case it should still be skipped): note that it
+ // can't be the last character of the string
+ if ( ++n == len )
+ {
+ wxLogDebug(_T("Invalid menu string '%s'"), in.c_str());
+ }
+ else
+ {
+ // use the next char instead
+ ch = in[n];
+ }
+ }
+ else if ( ch == _T('\t') )
+ {
+ // everything after TAB is accel string, exit the loop
+ break;
+ }
+
+ out += ch;
+ }
+
+ return out;
+}
+
+#endif // wxUSE_MENUS
+
+// ----------------------------------------------------------------------------
+// Window search functions
+// ----------------------------------------------------------------------------
+
+/*
+ * If parent is non-NULL, look through children for a label or title
+ * matching the specified string. If NULL, look through all top-level windows.
+ *
+ */
+
+wxWindow *
+wxFindWindowByLabel (const wxString& title, wxWindow * parent)
+{
+ return wxWindow::FindWindowByLabel( title, parent );
+}
+
+
+/*
+ * If parent is non-NULL, look through children for a name
+ * matching the specified string. If NULL, look through all top-level windows.
+ *
+ */
+
+wxWindow *
+wxFindWindowByName (const wxString& name, wxWindow * parent)
+{
+ return wxWindow::FindWindowByName( name, parent );
+}
+
+// Returns menu item id or wxNOT_FOUND if none.
+int
+wxFindMenuItemId (wxFrame * frame, const wxString& menuString, const wxString& itemString)
+{
+#if wxUSE_MENUS
+ wxMenuBar *menuBar = frame->GetMenuBar ();
+ if ( menuBar )
+ return menuBar->FindMenuItem (menuString, itemString);
+#endif // wxUSE_MENUS
+
+ return wxNOT_FOUND;
+}
+
+// Try to find the deepest child that contains 'pt'.
+// We go backwards, to try to allow for controls that are spacially
+// within other controls, but are still siblings (e.g. buttons within
+// static boxes). Static boxes are likely to be created _before_ controls
+// that sit inside them.
+wxWindow* wxFindWindowAtPoint(wxWindow* win, const wxPoint& pt)
+{
+ if (!win->IsShown())
+ return NULL;
+
+ // Hack for wxNotebook case: at least in wxGTK, all pages
+ // claim to be shown, so we must only deal with the selected one.
+#if wxUSE_NOTEBOOK
+ if (win->IsKindOf(CLASSINFO(wxNotebook)))