free old resources in DoLoad(), apparently fixes memory leaks with gstreamer 0.10...

[wxWidgets.git] / src / gtk / utilsgtk.cpp

diff --git a/src/gtk/utilsgtk.cpp b/src/gtk/utilsgtk.cpp
index a55812182a70207619e9cde74a883233e71facdb..1144d39c3aacb86f41a2bc4a424f8dadcec051b9 100644 (file)
--- a/src/gtk/utilsgtk.cpp
+++ b/src/gtk/utilsgtk.cpp
@@ -1,86 +1,134 @@
 /////////////////////////////////////////////////////////////////////////////
 /////////////////////////////////////////////////////////////////////////////

-// Name:        utils.cpp
+// Name:        src/gtk/utilsgtk.cpp

 // Purpose:
 // Author:      Robert Roebling
 // Id:          $Id$
 // Purpose:
 // Author:      Robert Roebling
 // Id:          $Id$

-// Copyright:   (c) 1998 Robert Roebling, Julian Smart and Markus Holzem
-// Licence:           wxWindows licence
+// Copyright:   (c) 1998 Robert Roebling
+// Licence:     wxWindows licence

 /////////////////////////////////////////////////////////////////////////////
 
 /////////////////////////////////////////////////////////////////////////////
 

-
-//#ifdef __GNUG__
-//#pragma implementation "utils.h"
-//#endif
+// For compilers that support precompilation, includes "wx.h".
+#include "wx/wxprec.h"

 
 #include "wx/utils.h"
 
 #include "wx/utils.h"

-#include "wx/string.h"

 
 

-#include "wx/intl.h"
-#include "wx/log.h"
+#ifndef WX_PRECOMP
+    #include "wx/string.h"
+    #include "wx/intl.h"
+    #include "wx/log.h"
+#endif
+
+#include "wx/apptrait.h"

 
 #include "wx/process.h"
 
 
 #include "wx/process.h"
 

+#include "wx/unix/execute.h"
+

 #include <stdarg.h>
 #include <stdarg.h>

-#include <dirent.h>

 #include <string.h>
 #include <sys/stat.h>
 #include <sys/types.h>
 #include <string.h>
 #include <sys/stat.h>
 #include <sys/types.h>

+#include <sys/wait.h>   // for WNOHANG

 #include <unistd.h>
 #include <unistd.h>

-#include <sys/wait.h>
-#include <pwd.h>
-#include <errno.h>
-#include <netdb.h>
-#include <signal.h>
-#include <fcntl.h>          // for O_WRONLY and friends

 
 #include "glib.h"
 #include "gdk/gdk.h"
 #include "gtk/gtk.h"
 
 #include "glib.h"
 #include "gdk/gdk.h"
 #include "gtk/gtk.h"

-#include "gtk/gtkfeatures.h"

 #include "gdk/gdkx.h"
 
 #include "gdk/gdkx.h"
 

-#ifdef __SVR4__
-  #include <sys/systeminfo.h>
+#ifdef HAVE_X11_XKBLIB_H
+    /* under HP-UX and Solaris 2.6, at least, XKBlib.h defines structures with
+     * field named "explicit" - which is, of course, an error for a C++
+     * compiler. To be on the safe side, just redefine it everywhere. */
+    #define explicit __wx_explicit
+
+    #include "X11/XKBlib.h"
+
+    #undef explicit
+#endif // HAVE_X11_XKBLIB_H
+
+
+#if wxUSE_DETECT_SM
+    #include "X11/Xlib.h"
+    #include "X11/SM/SMlib.h"

 #endif
 
 #endif
 

-// many versions of Unices have this function, but it is not defined in system
-// headers - please add your system here if it is the case for your OS.
-// SunOS (and Solaris) and DG-UX are like this.
-#if defined(__SOLARIS__) || defined(__osf__)
-    extern "C"
-    {
-        pid_t wait4(pid_t pid, int *statusp, int options,
-                    struct rusage *rusage);
-    }
+//-----------------------------------------------------------------------------
+// data
+//-----------------------------------------------------------------------------

 
 

-    #define wxWait4(pid, stat, flags, rusage) wait4(pid, stat, flags, rusage)
-#elif defined(__sgi) || defined(__HPUX__)
-    // no wait4() at all on these systems
-    // TODO verify whether wait3() really works in this situation
-    #define wxWait4(pid, stat, flags, rusage) wait3(stat, flags, rusage)
-#else
-    // other Unices: assume have wait4(), although it's not standard (but
-    // Linux and FreeBSD do have it)
-    #define wxWait4(pid, stat, flags, rusage) wait4(pid, stat, flags, rusage)
-#endif // wait4()
+extern GtkWidget *wxGetRootWindow();

 
 

-//------------------------------------------------------------------------
+//----------------------------------------------------------------------------

 // misc.
 // misc.

-//------------------------------------------------------------------------
+//----------------------------------------------------------------------------
+#ifndef __EMX__
+// on OS/2, we use the wxBell from wxBase library

 
 

-void wxBell(void)
+void wxBell()

 {
     gdk_beep();
 }
 {
     gdk_beep();
 }

+#endif
+
+/* Don't synthesize KeyUp events holding down a key and producing
+   KeyDown events with autorepeat. */
+#ifdef HAVE_X11_XKBLIB_H
+bool wxSetDetectableAutoRepeat( bool flag )
+{
+    Bool result;
+    XkbSetDetectableAutoRepeat( GDK_DISPLAY(), flag, &result );
+    return result;       /* true if keyboard hardware supports this mode */
+}
+#else
+bool wxSetDetectableAutoRepeat( bool WXUNUSED(flag) )
+{
+    return false;
+}
+#endif

 
 

-void wxSleep(int nSecs)
+// Escapes string so that it is valid Pango markup XML string:
+wxString wxEscapeStringForPangoMarkup(const wxString& str)

 {
 {

-    sleep(nSecs);
+    size_t len = str.length();
+    wxString out;
+    out.Alloc(len);
+    for (size_t i = 0; i < len; i++)
+    {
+        wxChar c = str[i];
+        switch (c)
+        {
+            case _T('&'):
+                out << _T("&amp;");
+                break;
+            case _T('<'):
+                out << _T("&lt;");
+                break;
+            case _T('>'):
+                out << _T("&gt;");
+                break;
+            case _T('\''):
+                out << _T("&apos;");
+                break;
+            case _T('"'):
+                out << _T("&quot;");
+                break;
+            default:
+                out << c;
+                break;
+        }
+    }
+    return out;

 }
 
 }
 

-int wxKill(long pid, int sig)
+
+// ----------------------------------------------------------------------------
+// display characterstics
+// ----------------------------------------------------------------------------
+
+void *wxGetDisplay()

 {
 {

-    return kill(pid, sig);
+    return GDK_DISPLAY();

 }
 
 void wxDisplaySize( int *width, int *height )
 }
 
 void wxDisplaySize( int *width, int *height )


@@ -89,335 +137,211 @@ void wxDisplaySize( int *width, int *height )
     if (height) *height = gdk_screen_height();
 }
 
     if (height) *height = gdk_screen_height();
 }
 

-void wxGetMousePosition( int* x, int* y )
+void wxDisplaySizeMM( int *width, int *height )

 {
 {

-    gdk_window_get_pointer( (GdkWindow*) NULL, x, y, (GdkModifierType*) NULL );
+    if (width) *width = gdk_screen_width_mm();
+    if (height) *height = gdk_screen_height_mm();

 }
 
 }
 

-bool wxColourDisplay(void)
+void wxClientDisplayRect(int *x, int *y, int *width, int *height)

 {
 {

-    return TRUE;
+    // This is supposed to return desktop dimensions minus any window
+    // manager panels, menus, taskbars, etc.  If there is a way to do that
+    // for this platform please fix this function, otherwise it defaults
+    // to the entire desktop.
+    if (x) *x = 0;
+    if (y) *y = 0;
+    wxDisplaySize(width, height);

 }
 
 }
 

-int wxDisplayDepth(void)
+void wxGetMousePosition( int* x, int* y )

 {
 {

-    return gdk_window_get_visual( (GdkWindow*) &gdk_root_parent )->depth;
+    gdk_window_get_pointer( (GdkWindow*) NULL, x, y, (GdkModifierType*) NULL );

 }
 
 }
 

-int wxGetOsVersion(int *majorVsn, int *minorVsn)
+bool wxColourDisplay()

 {
 {

-  if (majorVsn) *majorVsn = GTK_MAJOR_VERSION;
-  if (minorVsn) *minorVsn = GTK_MINOR_VERSION;
-
-  return wxGTK;
+    return true;

 }
 
 }
 

-//------------------------------------------------------------------------
-// user and home routines
-//------------------------------------------------------------------------
-
-const char* wxGetHomeDir( wxString *home  )
+int wxDisplayDepth()

 {
 {

-    *home = wxGetUserHome( wxString() );
-    if (home->IsNull()) *home = "/";
-    return *home;
+    return gdk_drawable_get_visual( wxGetRootWindow()->window )->depth;

 }
 
 }
 

-char *wxGetUserHome( const wxString &user )
+wxWindow* wxFindWindowAtPoint(const wxPoint& pt)

 {
 {

-    struct passwd *who = (struct passwd *) NULL;
-
-    if (user.IsNull() || (user== ""))
-    {
-        register char *ptr;
-
-        if ((ptr = getenv("HOME")) != NULL)
-       {
-            return ptr;
-       }
-        if ((ptr = getenv("USER")) != NULL || (ptr = getenv("LOGNAME")) != NULL)
-       {
-            who = getpwnam(ptr);
-        }
-
-        /* We now make sure the the user exists! */
-        if (who == NULL)
-       {
-            who = getpwuid(getuid());
-       }
-    }
-    else
-    {
-      who = getpwnam (user);
-    }
-
-    return who ? who->pw_dir : (char*)NULL;
+    return wxGenericFindWindowAtPoint(pt);

 }
 
 }
 

-//------------------------------------------------------------------------
-// id routines
-//------------------------------------------------------------------------
+#if !wxUSE_UNICODE

 
 

-bool wxGetHostName(char *buf, int sz)
+wxCharBuffer wxConvertToGTK(const wxString& s, wxFontEncoding enc)

 {
 {

-    *buf = '\0';
-#if defined(__SVR4__) && !defined(__sgi)
-    //KB: does this return the fully qualified host.domain name?
-    return (sysinfo(SI_HOSTNAME, buf, sz) != -1);
-#else /* BSD Sockets */
-    char name[255], domain[255];
-    //struct hostent *h;
-    // Get hostname
-    if (gethostname(name, sizeof(name)/sizeof(char)-1) == -1)
-        return FALSE;
-    if (getdomainname(domain, sizeof(domain)/sizeof(char)-1) == -1)
-        return FALSE;
-    // Get official full name of host
-    // doesn't return the full qualified name, replaced by following
-    // code (KB)
-    // strncpy(buf, (h=gethostbyname(name))!=NULL ? h->h_name : name, sz-1);
-    if((unsigned)sz > strlen(name)+strlen(domain)+1)
+    wxCharBuffer buf;
+    if ( enc == wxFONTENCODING_UTF8 )

     {
     {

-        strcpy(buf, name);
-        if(strcmp(domain,"(none)") == 0) // standalone machine
+        // no need for conversion at all, but do check that we have a valid
+        // UTF-8 string because passing invalid UTF-8 to GTK+ is going to
+        // result in a GTK+ error message and, especially, loss of data which
+        // was supposed to be shown in the GUI
+        if ( wxConvUTF8.ToWChar(NULL, 0, s, s.length()) == wxCONV_FAILED )

         {
         {

-            strcat(buf,".");
-            strcat(buf,domain);
+            // warn the programmer that something is probably wrong in his code
+            //
+            // NB: don't include the string in output because chances are that
+            //     this invalid UTF-8 string could result in more errors itself
+            //     if the application shows logs in the GUI and so we get into
+            //     an infinite loop
+            wxLogDebug(_T("Invalid UTF-8 string in wxConvertToGTK()"));
+
+            // but still try to show at least something on the screen
+            wxMBConvUTF8 utf8permissive(wxMBConvUTF8::MAP_INVALID_UTF8_TO_OCTAL);
+            wxWCharBuffer wbuf(utf8permissive.cMB2WC(s));
+            buf = wxConvUTF8.cWC2MB(wbuf);
+        }
+        else // valid UTF-8 string, no need to convert
+        {
+            buf = wxCharBuffer(s);

         }
     }
         }
     }

-    else
-        return FALSE;
-    return TRUE;
-#endif
-}
-
-bool wxGetUserId(char *buf, int sz)
-{
-    struct passwd *who;
+    else // !UTF-8
+    {
+        wxWCharBuffer wbuf;
+        if ( enc == wxFONTENCODING_SYSTEM || enc == wxFONTENCODING_DEFAULT )
+        {
+            wbuf = wxConvUI->cMB2WC(s);
+        }
+        else // another encoding, use generic conversion class
+        {
+            wbuf = wxCSConv(enc).cMB2WC(s);
+        }

 
 

-    *buf = '\0';
-    if ((who = getpwuid(getuid ())) != NULL) {
-        strncpy (buf, who->pw_name, sz-1);
-        return TRUE;
+        if ( wbuf )
+            buf = wxConvUTF8.cWC2MB(wbuf);

     }
     }

-    return FALSE;
-}

 
 

-bool wxGetUserName(char *buf, int sz)
-{
-    struct passwd *who;
-    char *comma;
-
-    *buf = '\0';
-    if ((who = getpwuid (getuid ())) != NULL) {
-       comma = strchr(who->pw_gecos,'c');
-       if(comma) *comma = '\0'; // cut off non-name comment fields
-       strncpy (buf, who->pw_gecos, sz - 1);
-        return TRUE;
-    }
-    return FALSE;
+    return buf;

 }
 
 }
 

-//------------------------------------------------------------------------
-// error and debug output routines
-//------------------------------------------------------------------------
+#endif // !wxUSE_UNICODE

 
 

-void wxDebugMsg( const char *format, ... )
-{
-  va_list ap;
-  va_start( ap, format );
-  vfprintf( stderr, format, ap );
-  fflush( stderr );
-  va_end(ap);
-}
+// ----------------------------------------------------------------------------
+// subprocess routines
+// ----------------------------------------------------------------------------

 
 

-void wxError( const wxString &msg, const wxString &title )
+extern "C" {
+static
+void GTK_EndProcessDetector(gpointer data, gint source,
+                            GdkInputCondition WXUNUSED(condition) )

 {
 {

-  fprintf( stderr, "Error " );
-  if (!title.IsNull()) fprintf( stderr, "%s ", WXSTRINGCAST(title) );
-  if (!msg.IsNull()) fprintf( stderr, ": %s", WXSTRINGCAST(msg) );
-  fprintf( stderr, ".\n" );
-}
+   wxEndProcessData *proc_data = (wxEndProcessData *)data;

 
 

-void wxFatalError( const wxString &msg, const wxString &title )
-{
-  fprintf( stderr, "Error " );
-  if (!title.IsNull()) fprintf( stderr, "%s ", WXSTRINGCAST(title) );
-  if (!msg.IsNull()) fprintf( stderr, ": %s", WXSTRINGCAST(msg) );
-  fprintf( stderr, ".\n" );
-  exit(3); // the same exit code as for abort()
-}
+   // has the process really terminated? unfortunately GDK (or GLib) seem to
+   // generate G_IO_HUP notification even when it simply tries to read from a
+   // closed fd and hasn't terminated at all
+   int pid = (proc_data->pid > 0) ? proc_data->pid : -(proc_data->pid);
+   int status = 0;
+   int rc = waitpid(pid, &status, WNOHANG);

 
 

-//------------------------------------------------------------------------
-// directory routines
-//------------------------------------------------------------------------
+   if ( rc == 0 )
+   {
+       // no, it didn't exit yet, continue waiting
+       return;
+   }

 
 

-bool wxDirExists( const wxString& dir )
-{
-    char buf[500];
-    strcpy( buf, WXSTRINGCAST(dir) );
-    struct stat sbuf;
-    return ((stat(buf, &sbuf) != -1) && S_ISDIR(sbuf.st_mode) ? TRUE : FALSE);
-}
+   // set exit code to -1 if something bad happened
+   proc_data->exitcode = rc != -1 && WIFEXITED(status) ? WEXITSTATUS(status)
+                                                      : -1;

 
 

-//------------------------------------------------------------------------
-// subprocess routines
-//------------------------------------------------------------------------
+   // child exited, end waiting
+   close(source);

 
 

-// if pid > 0, the execution is async and the data is freed in
-// GTK_EndProcessDetector, if pid < 0, the execution is synchronous and the
-// caller (wxExecute) frees the data
-struct wxEndProcessData
-{
-    gint pid, tag;
-    wxProcess *process;
-    int  exitcode;
-};
+   // don't call us again!
+   gdk_input_remove(proc_data->tag);
+
+   wxHandleProcessTermination(proc_data);
+}
+}

 
 

-static void GTK_EndProcessDetector(gpointer data, gint source,
-                                   GdkInputCondition WXUNUSED(condition) )
+int wxAddProcessCallback(wxEndProcessData *proc_data, int fd)

 {
 {

-    wxEndProcessData *proc_data = (wxEndProcessData *)data;
-    int pid;
+    int tag = gdk_input_add(fd,
+                            GDK_INPUT_READ,
+                            GTK_EndProcessDetector,
+                            (gpointer)proc_data);

 
 

-    pid = (proc_data->pid > 0) ? proc_data->pid : -(proc_data->pid);
+    return tag;
+}

 
 

-    int status = 0;
-    wxWait4(pid, &status, 0, (rusage *) NULL);

 
 

-    close(source);
-    gdk_input_remove(proc_data->tag);

 
 

-    if (proc_data->process)
-        proc_data->process->OnTerminate(proc_data->pid, status);
+// ----------------------------------------------------------------------------
+// wxPlatformInfo-related
+// ----------------------------------------------------------------------------

 
 

-    if (proc_data->pid > 0)
-    {
-        delete proc_data;
-    }
-    else
-    {
-        // wxExecute() will know about it
-        proc_data->exitcode = status;
+wxPortId wxGUIAppTraits::GetToolkitVersion(int *verMaj, int *verMin) const
+{
+    if ( verMaj )
+        *verMaj = gtk_major_version;
+    if ( verMin )
+        *verMin = gtk_minor_version;

 
 

-        proc_data->pid = 0;
-    }
+    return wxPORT_GTK;

 }
 
 }
 

-long wxExecute( char **argv, bool sync, wxProcess *process )
+#if wxUSE_DETECT_SM
+static wxString GetSM()

 {
 {

-    wxEndProcessData *data = new wxEndProcessData;
-    int end_proc_detect[2];
-
-    wxCHECK_MSG( *argv, 0, "can't exec empty command" );
-
-    /* Create pipes */
-    if (pipe(end_proc_detect) == -1)
+    class Dpy

     {
     {

-        wxLogSysError( _("Pipe creation failed") );
-        return 0;
-    }
+    public:
+        Dpy() { m_dpy = XOpenDisplay(NULL); }
+        ~Dpy() { if ( m_dpy ) XCloseDisplay(m_dpy); }

 
 

-    /* fork the process */
-#if defined(sun) || defined(__ultrix) || defined(__bsdi__)
-    pid_t pid = vfork();
-#else
-    pid_t pid = fork();
-#endif
-    if (pid == -1)
-    {
-        wxLogSysError( _("Fork failed") );
-        return 0;
-    }
-    else if (pid == 0)
-    {
-        // we're in child
-        close(end_proc_detect[0]); // close reading side
-
-        // These three lines close the open file descriptors to to avoid any
-        // input/output which might block the process or irritate the user. If
-        // one wants proper IO for the subprocess, the "right thing to do is
-        // to start an xterm executing it.
-        close(STDIN_FILENO);
-        close(STDOUT_FILENO);
-
-        // leave stderr opened, it won't do any hurm
-#if 0
-        close(STDERR_FILENO);
-
-        // some programs complain about stderr not being open, so redirect
-        // them:
-        open("/dev/null", O_RDONLY);  // stdin
-        open("/dev/null", O_WRONLY);  // stdout
-        open("/dev/null", O_WRONLY);  // stderr
-#endif
+        operator Display *() const { return m_dpy; }
+    private:
+        Display *m_dpy;
+    } dpy;

 
 

-#ifdef _AIX
-        execvp ((const char *)*argv, (const char **)argv);
-#else
-        execvp (*argv, argv);
-#endif
+    if ( !dpy )
+        return wxEmptyString;

 
 

-        // there is no return after successful exec()
-        fprintf(stderr, _("Can't execute '%s'\n"), *argv);
+    char *client_id;
+    SmcConn smc_conn = SmcOpenConnection(NULL, NULL,
+                                         999, 999,
+                                         0 /* mask */, NULL /* callbacks */,
+                                         NULL, &client_id,
+                                         0, NULL);

 
 

-        _exit(-1);
-    }
-    else
-    {
-        // we're in parent
-        close(end_proc_detect[1]); // close writing side
-        data->tag = gdk_input_add(end_proc_detect[0], GDK_INPUT_READ,
-                                  GTK_EndProcessDetector, (gpointer)data);
-        if ( sync )
-        {
-            wxASSERT_MSG( !process, "wxProcess param ignored for sync exec" );
-            data->process = NULL;
-
-            // sync execution: indicate it by negating the pid
-            data->pid = -pid;
+    if ( !smc_conn )
+        return wxEmptyString;

 
 

-            // it will be set to 0 from GTK_EndProcessDetector
-            while (data->pid != 0)
-                wxYield();
+    char *vendor = SmcVendor(smc_conn);
+    wxString ret = wxString::FromAscii( vendor );
+    free(vendor);

 
 

-            int exitcode = data->exitcode;
+    SmcCloseConnection(smc_conn, 0, NULL);
+    free(client_id);

 
 

-            delete data;
-
-            return exitcode;
-        }
-        else
-        {
-            // async execution, nothing special to do - caller will be
-            // notified about the process terminationif process != NULL, data
-            // will be deleted in GTK_EndProcessDetector
-            data->process = process;
-            data->pid = pid;
-
-            return pid;
-        }
-    }
+    return ret;

 }
 }

+#endif // wxUSE_DETECT_SM

 
 

-long wxExecute( const wxString& command, bool sync, wxProcess *process )
+wxString wxGUIAppTraits::GetDesktopEnvironment() const

 {
 {

-    static const char *IFS = " \t\n";
+#if wxUSE_DETECT_SM
+    const wxString SM = GetSM();

 
 

-    wxCHECK_MSG( !command.IsEmpty(), 0, "can't exec empty command" );
+    if (SM == wxT("GnomeSM"))
+        return wxT("GNOME");

 
 

-    int argc = 0;
-    char *argv[127];
-    char *tmp = new char[command.Len() + 1];
-    strcpy(tmp, command);
+    if (SM == wxT("KDE"))
+        return wxT("KDE");
+#endif // wxUSE_DETECT_SM

 
 

-    argv[argc++] = strtok(tmp, IFS);
-    while ((argv[argc++] = strtok((char *) NULL, IFS)) != NULL)
-        /* loop */ ;
+    return wxEmptyString;
+}

 
 

-    long lRc = wxExecute(argv, sync, process);

 
 

-    delete [] tmp;

 
 

-    return lRc;
-}