]> git.saurik.com Git - wxWidgets.git/blobdiff - src/gtk1/utilsgtk.cpp
updated setup.h for OpenVMS
[wxWidgets.git] / src / gtk1 / utilsgtk.cpp
index 28d35e2adc6373c11a8181a77264ea69714937f4..86a866c0f6de942770713e8f03a1de507d826976 100644 (file)
@@ -1,34 +1,36 @@
 /////////////////////////////////////////////////////////////////////////////
-// Name:        utils.cpp
+// Name:        src/gtk1/utilsgtk.cpp
 // 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/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/gtk1/private/timer.h"
+#include "wx/evtloop.h"
+#include "wx/process.h"
+
+#include "wx/unix/execute.h"
 
 #include <stdarg.h>
-#include <dirent.h>
 #include <string.h>
 #include <sys/stat.h>
 #include <sys/types.h>
+#include <sys/wait.h>   // for WNOHANG
 #include <unistd.h>
-#include <sys/wait.h>
-#include <pwd.h>
-#include <errno.h>
-#include <netdb.h>
-#include <signal.h>
 
 #include "glib.h"
 #include "gdk/gdk.h"
 #include "gtk/gtkfeatures.h"
 #include "gdk/gdkx.h"
 
-#ifdef __SVR4__
-  #include <sys/systeminfo.h>
-#endif
+#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
 
-#ifdef __SOLARIS__
-// somehow missing from sys/wait.h but in the system's docs
-extern "C"
-{
-   pid_t wait4(pid_t pid, int *statusp, int options, struct rusage
-               *rusage);
-}
-#endif
+    #include "X11/XKBlib.h"
 
-//------------------------------------------------------------------------
+    #undef explicit
+#endif // HAVE_X11_XKBLIB_H
+
+//-----------------------------------------------------------------------------
+// data
+//-----------------------------------------------------------------------------
+
+extern GtkWidget *wxGetRootWindow();
+
+//----------------------------------------------------------------------------
 // misc.
-//------------------------------------------------------------------------
+//----------------------------------------------------------------------------
 
-void wxBell(void)
+void wxBell()
 {
     gdk_beep();
 }
 
-void wxSleep(int nSecs)
+/* Don't synthesize KeyUp events holding down a key and producing
+   KeyDown events with autorepeat. */
+#ifdef HAVE_X11_XKBLIB_H
+bool wxSetDetectableAutoRepeat( bool flag )
 {
-    sleep(nSecs);
+    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
 
-int wxKill(long pid, int sig)
+// ----------------------------------------------------------------------------
+// display characterstics
+// ----------------------------------------------------------------------------
+
+void *wxGetDisplay()
 {
-    return kill(pid, sig);
+    return GDK_DISPLAY();
 }
 
 void wxDisplaySize( int *width, int *height )
@@ -74,310 +95,97 @@ void wxDisplaySize( int *width, int *height )
     if (height) *height = gdk_screen_height();
 }
 
-void wxGetMousePosition( int* x, int* y )
-{
-    gdk_window_get_pointer( (GdkWindow*) NULL, x, y, (GdkModifierType*) NULL );
-}
-
-bool wxColourDisplay(void)
+void wxDisplaySizeMM( int *width, int *height )
 {
-    return TRUE;
+    if (width) *width = gdk_screen_width_mm();
+    if (height) *height = gdk_screen_height_mm();
 }
 
-int wxDisplayDepth(void)
+void wxGetMousePosition( int* x, int* y )
 {
-    return gdk_window_get_visual( (GdkWindow*) &gdk_root_parent )->depth;
+    gdk_window_get_pointer( NULL, x, y, 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_window_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
-//------------------------------------------------------------------------
 
-bool wxGetHostName(char *buf, int sz)
-{
-    *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)
-    {
-        strcpy(buf, name);
-        if(strcmp(domain,"(none)") == 0) // standalone machine
-        {
-            strcat(buf,".");
-            strcat(buf,domain);
-        }
-    }
-    else
-        return FALSE;
-    return TRUE;
-#endif
-}
+// ----------------------------------------------------------------------------
+// subprocess routines
+// ----------------------------------------------------------------------------
 
-bool wxGetUserId(char *buf, int sz)
+extern "C" {
+static
+void GTK_EndProcessDetector(gpointer data, gint source,
+                            GdkInputCondition WXUNUSED(condition) )
 {
-    struct passwd *who;
-
-    *buf = '\0';
-    if ((who = getpwuid(getuid ())) != NULL) {
-        strncpy (buf, who->pw_name, sz-1);
-        return TRUE;
-    }
-    return FALSE;
-}
+    wxEndProcessData * const
+        proc_data = static_cast<wxEndProcessData *>(data);
 
-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;
-}
+    // child exited, end waiting
+    close(source);
 
-//------------------------------------------------------------------------
-// error and debug output routines
-//------------------------------------------------------------------------
+    // don't call us again!
+    gdk_input_remove(proc_data->tag);
 
-void wxDebugMsg( const char *format, ... )
-{
-  va_list ap;
-  va_start( ap, format );
-  vfprintf( stderr, format, ap );
-  fflush( stderr );
-  va_end(ap);
+    wxHandleProcessTermination(proc_data);
 }
-
-void wxError( 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" );
 }
 
-void wxFatalError( const wxString &msg, const wxString &title )
+int wxGUIAppTraits::AddProcessCallback(wxEndProcessData *proc_data, int fd)
 {
-  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()
+    int tag = gdk_input_add(fd,
+                            GDK_INPUT_READ,
+                            GTK_EndProcessDetector,
+                            (gpointer)proc_data);
+
+    return tag;
 }
 
-//------------------------------------------------------------------------
-// directory routines
-//------------------------------------------------------------------------
+#if wxUSE_TIMER
 
-bool wxDirExists( const wxString& dir )
+wxTimerImpl* wxGUIAppTraits::CreateTimerImpl(wxTimer *timer)
 {
-    char buf[500];
-    strcpy( buf, WXSTRINGCAST(dir) );
-    struct stat sbuf;
-    return ((stat(buf, &sbuf) != -1) && S_ISDIR(sbuf.st_mode) ? TRUE : FALSE);
+    return new wxGTKTimerImpl(timer);
 }
 
-//------------------------------------------------------------------------
-// subprocess routines
-//------------------------------------------------------------------------
+#endif // wxUSE_TIMER
 
-struct wxEndProcessData
-{
-    gint pid, tag;
-    wxProcess *process;
-};
+// ----------------------------------------------------------------------------
+// wxPlatformInfo-related
+// ----------------------------------------------------------------------------
 
-static void GTK_EndProcessDetector(gpointer data, gint source,
-                                   GdkInputCondition WXUNUSED(condition) )
+wxPortId wxGUIAppTraits::GetToolkitVersion(int *verMaj, int *verMin) const
 {
-    wxEndProcessData *proc_data = (wxEndProcessData *)data;
-    int pid;
-
-    pid = (proc_data->pid > 0) ? proc_data->pid : -(proc_data->pid);
-
-    /* wait4 is not part of any standard, use at own risk
-     * not sure what wait4 does, but wait3 seems to be closest, whats a digit ;-)
-     * --- offer@sgi.com */
-#if !defined(__sgi)
-    wait4(proc_data->pid, (int*) NULL, 0, (rusage *) NULL);
-#else
-    wait3((int *) NULL, 0, (rusage *) NULL);
-#endif
-
-    close(source);
-    gdk_input_remove(proc_data->tag);
-
-    if (proc_data->process)
-        proc_data->process->OnTerminate(proc_data->pid);
+    if ( verMaj )
+        *verMaj = gtk_major_version;
+    if ( verMin )
+        *verMin = gtk_minor_version;
 
-    if (proc_data->pid > 0)
-        delete proc_data;
-    else
-        proc_data->pid = 0;
+    return wxPORT_GTK;
 }
 
-long wxExecute( char **argv, bool sync, wxProcess *process )
+wxEventLoopBase* wxGUIAppTraits::CreateEventLoop()
 {
-    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) 
-    {
-      wxLogSysError( "Pipe creation failed" );
-      return 0;
-    }
-
-    /* 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 sub-
-       // process, the "right thing to do" is to start an xterm executing
-       // it.
-       close(STDIN_FILENO);
-       close(STDOUT_FILENO);
-       close(STDERR_FILENO);
-
-#ifdef _AIX
-        execvp ((const char *)*argv, (const char **)argv);
-#else
-        execvp (*argv, argv);
-#endif
-        // there is no return after successful exec()
-        wxLogSysError( "Can't execute '%s'", *argv);
-
-        _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);
-      data->pid = pid;
-      if (!sync) 
-      {
-        data->process = process;
-      }
-      else 
-      {
-        data->process = (wxProcess *) NULL;
-        data->pid = -(data->pid);
-
-        while (data->pid != 0)
-          wxYield();
-
-        delete data;
-      }
-
-      // @@@ our return value indicates success even if execvp() in the child
-      //     failed!
-      return pid;
-    }
+    return new wxEventLoop;
 }
 
-long wxExecute( const wxString& command, bool sync, wxProcess *process )
+#if wxUSE_INTL
+void wxGUIAppTraits::SetLocale()
 {
-    static const char *IFS = " \t\n";
-
-    wxCHECK_MSG( !command.IsEmpty(), 0, "can't exec empty command" );
-
-    int argc = 0;
-    char *argv[127];
-    char *tmp = new char[command.Len() + 1];
-    strcpy(tmp, command);
-
-    argv[argc++] = strtok(tmp, IFS);
-    while ((argv[argc++] = strtok((char *) NULL, IFS)) != NULL)
-        /* loop */ ;
-
-    long lRc = wxExecute(argv, sync, process);
-    
-    delete [] tmp;
-
-    return lRc;
+    gtk_set_locale();
 }
+#endif
+