// Name: utils.cpp
// Purpose:
// Author: Robert Roebling
-// Created: 01/02/97
-// Id:
+// Id: $Id$
// Copyright: (c) 1998 Robert Roebling, Julian Smart and Markus Holzem
-// Licence: wxWindows licence
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
#include "wx/utils.h"
#include "wx/string.h"
+#include "wx/intl.h"
+#include "wx/log.h"
+
+#include "wx/process.h"
+
#include <stdarg.h>
#include <dirent.h>
#include <string.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 "gtk/gtkfeatures.h"
+#include "gdk/gdkx.h"
#ifdef __SVR4__
-#include <sys/systeminfo.h>
+ #include <sys/systeminfo.h>
+#endif
+
+#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
//------------------------------------------------------------------------
void wxBell(void)
{
- gdk_beep();
-};
+ gdk_beep();
+}
void wxSleep(int nSecs)
{
- sleep(nSecs);
-};
+ sleep(nSecs);
+}
int wxKill(long pid, int sig)
{
- return kill(pid, sig);
-};
+ return kill(pid, sig);
+}
void wxDisplaySize( int *width, int *height )
{
- if (width) *width = gdk_screen_width();
- if (height) *height = gdk_screen_height();
+ if (width) *width = gdk_screen_width();
+ 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)
+{
+ return TRUE;
+}
+
+int wxDisplayDepth(void)
+{
+ return gdk_window_get_visual( (GdkWindow*) &gdk_root_parent )->depth;
+}
+
+int wxGetOsVersion(int *majorVsn, int *minorVsn)
+{
+ if (majorVsn) *majorVsn = GTK_MAJOR_VERSION;
+ if (minorVsn) *minorVsn = GTK_MINOR_VERSION;
+
+ return wxGTK;
}
//------------------------------------------------------------------------
// user and home routines
//------------------------------------------------------------------------
-char* wxGetHomeDir( char *dest )
+const char* wxGetHomeDir( wxString *home )
{
- wxString tmp = wxGetUserHome( wxString() );
- if (tmp.IsNull())
- strcpy( wxBuffer, "/" );
- else
- strcpy( wxBuffer, tmp );
- if (dest) strcpy( dest, WXSTRINGCAST tmp );
- return wxBuffer;
-};
+ *home = wxGetUserHome( wxString() );
+ if (home->IsNull()) *home = "/";
+ return *home;
+}
char *wxGetUserHome( const wxString &user )
{
- struct passwd *who = NULL;
+ struct passwd *who = (struct passwd *) NULL;
- if (user.IsNull() || (user== ""))
- {
- register char *ptr;
+ 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);
+ if ((ptr = getenv("HOME")) != NULL)
+ {
+ return 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;
-};
+ 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;
+}
//------------------------------------------------------------------------
// id routines
{
*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];
- struct hostent *h;
+ char name[255], domain[255];
+ //struct hostent *h;
// Get hostname
if (gethostname(name, sizeof(name)/sizeof(char)-1) == -1)
- return FALSE;
+ return FALSE;
+ if (getdomainname(domain, sizeof(domain)/sizeof(char)-1) == -1)
+ return FALSE;
// Get official full name of host
- strncpy(buf, (h=gethostbyname(name))!=NULL ? h->h_name : name, sz-1);
+ // 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
}
*buf = '\0';
if ((who = getpwuid(getuid ())) != NULL) {
- strncpy (buf, who->pw_name, sz-1);
- return TRUE;
+ strncpy (buf, who->pw_name, sz-1);
+ return TRUE;
}
return FALSE;
}
bool wxGetUserName(char *buf, int sz)
{
struct passwd *who;
+ char *comma;
*buf = '\0';
if ((who = getpwuid (getuid ())) != NULL) {
- strncpy (buf, who->pw_gecos, sz - 1);
- return TRUE;
+ 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;
}
{
va_list ap;
va_start( ap, format );
- vfprintf( stderr, format, ap );
+ vfprintf( stderr, format, ap );
fflush( stderr );
va_end(ap);
-};
+}
void wxError( const wxString &msg, const wxString &title )
{
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 )
{
if (!title.IsNull()) fprintf( stderr, "%s ", WXSTRINGCAST(title) );
if (!msg.IsNull()) fprintf( stderr, ": %s", WXSTRINGCAST(msg) );
fprintf( stderr, ".\n" );
- exit(1);
-};
+ exit(3); // the same exit code as for abort()
+}
//------------------------------------------------------------------------
// directory routines
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);
-};
+ char buf[500];
+ strcpy( buf, WXSTRINGCAST(dir) );
+ struct stat sbuf;
+ return ((stat(buf, &sbuf) != -1) && S_ISDIR(sbuf.st_mode) ? TRUE : FALSE);
+}
//------------------------------------------------------------------------
-// wild character routines
+// subprocess routines
//------------------------------------------------------------------------
-bool wxIsWild( const wxString& pattern )
-{
- wxString tmp = pattern;
- char *pat = WXSTRINGCAST(tmp);
- while (*pat) {
- switch (*pat++) {
- case '?': case '*': case '[': case '{':
- return TRUE;
- case '\\':
- if (!*pat++)
- return FALSE;
- }
- }
- return FALSE;
-};
-
-
-bool wxMatchWild( const wxString& pat, const wxString& text, bool dot_special )
+// 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
{
- wxString tmp1 = pat;
- char *pattern = WXSTRINGCAST(tmp1);
- wxString tmp2 = text;
- char *str = WXSTRINGCAST(tmp2);
- char c;
- char *cp;
- bool done = FALSE, ret_code, ok;
- // Below is for vi fans
- const char OB = '{', CB = '}';
-
- // dot_special means '.' only matches '.'
- if (dot_special && *str == '.' && *pattern != *str)
- return FALSE;
-
- while ((*pattern != '\0') && (!done)
- && (((*str=='\0')&&((*pattern==OB)||(*pattern=='*')))||(*str!='\0'))) {
- switch (*pattern) {
- case '\\':
- pattern++;
- if (*pattern != '\0')
- pattern++;
- break;
- case '*':
- pattern++;
- ret_code = FALSE;
- while ((*str!='\0')
- && (!(ret_code=wxMatchWild(pattern, str++, FALSE))))
- /*loop*/;
- if (ret_code) {
- while (*str != '\0')
- str++;
- while (*pattern != '\0')
- pattern++;
- }
- break;
- case '[':
- pattern++;
- repeat:
- if ((*pattern == '\0') || (*pattern == ']')) {
- done = TRUE;
- break;
- }
- if (*pattern == '\\') {
- pattern++;
- if (*pattern == '\0') {
- done = TRUE;
- break;
- }
- }
- if (*(pattern + 1) == '-') {
- c = *pattern;
- pattern += 2;
- if (*pattern == ']') {
- done = TRUE;
- break;
- }
- if (*pattern == '\\') {
- pattern++;
- if (*pattern == '\0') {
- done = TRUE;
- break;
- }
- }
- if ((*str < c) || (*str > *pattern)) {
- pattern++;
- goto repeat;
- }
- } else if (*pattern != *str) {
- pattern++;
- goto repeat;
- }
- pattern++;
- while ((*pattern != ']') && (*pattern != '\0')) {
- if ((*pattern == '\\') && (*(pattern + 1) != '\0'))
- pattern++;
- pattern++;
- }
- if (*pattern != '\0') {
- pattern++, str++;
- }
- break;
- case '?':
- pattern++;
- str++;
- break;
- case OB:
- pattern++;
- while ((*pattern != CB) && (*pattern != '\0')) {
- cp = str;
- ok = TRUE;
- while (ok && (*cp != '\0') && (*pattern != '\0')
- && (*pattern != ',') && (*pattern != CB)) {
- if (*pattern == '\\')
- pattern++;
- ok = (*pattern++ == *cp++);
- }
- if (*pattern == '\0') {
- ok = FALSE;
- done = TRUE;
- break;
- } else if (ok) {
- str = cp;
- while ((*pattern != CB) && (*pattern != '\0')) {
- if (*++pattern == '\\') {
- if (*++pattern == CB)
- pattern++;
- }
- }
- } else {
- while (*pattern!=CB && *pattern!=',' && *pattern!='\0') {
- if (*++pattern == '\\') {
- if (*++pattern == CB || *pattern == ',')
- pattern++;
- }
- }
- }
- if (*pattern != '\0')
- pattern++;
- }
- break;
- default:
- if (*str == *pattern) {
- str++, pattern++;
- } else {
- done = TRUE;
- }
- }
- }
- while (*pattern == '*')
- pattern++;
- return ((*str == '\0') && (*pattern == '\0'));
+ gint pid, tag;
+ wxProcess *process;
+ int exitcode;
};
-//------------------------------------------------------------------------
-// subprocess routines
-//------------------------------------------------------------------------
-
-typedef struct {
- gint pid, tag;
- wxProcess *process;
-} wxEndProcessData;
-
static void GTK_EndProcessDetector(gpointer data, gint source,
GdkInputCondition WXUNUSED(condition) )
{
- wxEndProcessData *proc_data = (wxEndProcessData *)data;
- int pid;
-
- pid = (proc_data->pid > 0) ? proc_data->pid : -(proc_data->pid);
+ 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 */
+ // VZ: wait4() will be woken up by a signal, not wait3 - so it's quite
+ // different (also, wait3() waits for any child, wait4() only for this
+ // one)
+ int status = -1;
+#if !defined(__sgi)
+ wait4(pid, &status, 0, (rusage *) NULL);
+#else
+ wait3(&status, 0, (rusage *) NULL);
+#endif
- wait4(proc_data->pid, NULL, 0, NULL);
+ close(source);
+ gdk_input_remove(proc_data->tag);
- close(source);
- gdk_input_remove(proc_data->tag);
+ if (proc_data->process)
+ proc_data->process->OnTerminate(proc_data->pid, status);
- if (proc_data->process)
- proc_data->process->OnTerminate(proc_data->pid);
+ if (proc_data->pid > 0)
+ {
+ delete proc_data;
+ }
+ else
+ {
+ // wxExecute() will know about it
+ proc_data->exitcode = status;
- if (proc_data->pid > 0)
- delete proc_data;
- else
- proc_data->pid = 0;
-};
+ proc_data->pid = 0;
+ }
+}
long wxExecute( char **argv, bool sync, wxProcess *process )
{
wxEndProcessData *data = new wxEndProcessData;
int end_proc_detect[2];
- if (*argv == NULL)
- return 0;
+ wxCHECK_MSG( *argv, 0, "can't exec empty command" );
/* Create pipes */
- if (pipe(end_proc_detect) == -1) {
- perror("pipe failed");
- return 0;
+ if (pipe(end_proc_detect) == -1)
+ {
+ wxLogSysError( _("Pipe creation failed") );
+ return 0;
}
/* fork the process */
#else
pid_t pid = fork();
#endif
- if (pid == -1) {
- perror ("fork failed");
- return 0;
- } else if (pid == 0) {
- /* Close fd not useful */
+ if (pid == -1)
+ {
+ wxLogSysError( _("Fork failed") );
+ return 0;
+ }
+ else if (pid == 0)
+ {
+ // we're in child
close(end_proc_detect[0]); // close reading side
- /* child */
+ // 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
+
#ifdef _AIX
- execvp ((const char *)*argv, (const char **)argv);
+ execvp ((const char *)*argv, (const char **)argv);
#else
- execvp (*argv, argv);
+ execvp (*argv, argv);
#endif
- if (errno == ENOENT)
- wxError("command not found", *argv);
- else
- perror (*argv);
- wxError("could not execute", *argv);
- _exit (-1);
- }
- 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 = NULL;
- data->pid = -(data->pid);
+ // there is no return after successful exec()
+ fprintf(stderr, _("Can't execute '%s'\n"), *argv);
- while (data->pid != 0)
- wxYield();
-
- delete data;
+ _exit(-1);
}
-
- return pid;
-};
+ 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;
+
+ // it will be set to 0 from GTK_EndProcessDetector
+ while (data->pid != 0)
+ wxYield();
+
+ int exitcode = data->exitcode;
+
+ 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;
+ }
+ }
+}
long wxExecute( const wxString& command, bool sync, wxProcess *process )
{
- if (command.IsNull() || command == "") return FALSE;
+ static const char *IFS = " \t\n";
+
+ wxCHECK_MSG( !command.IsEmpty(), 0, "can't exec empty command" );
int argc = 0;
char *argv[127];
- char tmp[1024];
- const char *IFS = " \t\n";
-
- strncpy (tmp, command, sizeof(tmp) / sizeof(char) - 1);
- tmp[sizeof (tmp) / sizeof (char) - 1] = '\0';
- argv[argc++] = strtok (tmp, IFS);
- while ((argv[argc++] = strtok(NULL, IFS)) != NULL)
- /* loop */ ;
- return wxExecute(argv, sync, process);
-};
+ 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;
+}
projects / wxWidgets.git / blobdiff