1 /////////////////////////////////////////////////////////////////////////////
3 // Purpose: generic Unix implementation of many wx functions
4 // Author: Vadim Zeitlin
6 // Copyright: (c) 1998 Robert Roebling, Vadim Zeitlin
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
10 // ============================================================================
12 // ============================================================================
14 // ----------------------------------------------------------------------------
16 // ----------------------------------------------------------------------------
19 #include "wx/string.h"
25 #include "wx/process.h"
26 #include "wx/thread.h"
28 #include "wx/stream.h"
31 #include "wx/unix/execute.h"
38 #include <sys/types.h>
45 #include <fcntl.h> // for O_WRONLY and friends
46 #include <time.h> // nanosleep() and/or usleep()
47 #include <ctype.h> // isspace()
48 #include <sys/time.h> // needed for FD_SETSIZE
51 #include <sys/utsname.h> // for uname()
54 // ----------------------------------------------------------------------------
55 // conditional compilation
56 // ----------------------------------------------------------------------------
58 // many versions of Unices have this function, but it is not defined in system
59 // headers - please add your system here if it is the case for your OS.
60 // SunOS < 5.6 (i.e. Solaris < 2.6) and DG-UX are like this.
61 #if !defined(HAVE_USLEEP) && \
62 (defined(__SUN__) && !defined(__SunOs_5_6) && \
63 !defined(__SunOs_5_7) && !defined(__SUNPRO_CC)) || \
64 defined(__osf__) || defined(__EMX__)
68 int usleep(unsigned int usec
);
71 /* I copied this from the XFree86 diffs. AV. */
72 #define INCL_DOSPROCESS
74 inline void usleep(unsigned long delay
)
76 DosSleep(delay
? (delay
/1000l) : 1l);
79 void usleep(unsigned long usec
);
81 #endif // Sun/EMX/Something else
85 #endif // Unices without usleep()
87 // ============================================================================
89 // ============================================================================
91 // ----------------------------------------------------------------------------
93 // ----------------------------------------------------------------------------
95 void wxSleep(int nSecs
)
100 void wxUsleep(unsigned long milliseconds
)
102 #if defined(HAVE_NANOSLEEP)
104 tmReq
.tv_sec
= (time_t)(milliseconds
/ 1000);
105 tmReq
.tv_nsec
= (milliseconds
% 1000) * 1000 * 1000;
107 // we're not interested in remaining time nor in return value
108 (void)nanosleep(&tmReq
, (timespec
*)NULL
);
109 #elif defined(HAVE_USLEEP)
110 // uncomment this if you feel brave or if you are sure that your version
111 // of Solaris has a safe usleep() function but please notice that usleep()
112 // is known to lead to crashes in MT programs in Solaris 2.[67] and is not
113 // documented as MT-Safe
114 #if defined(__SUN__) && wxUSE_THREADS
115 #error "usleep() cannot be used in MT programs under Solaris."
118 usleep(milliseconds
* 1000); // usleep(3) wants microseconds
119 #elif defined(HAVE_SLEEP)
120 // under BeOS sleep() takes seconds (what about other platforms, if any?)
121 sleep(milliseconds
* 1000);
122 #else // !sleep function
123 #error "usleep() or nanosleep() function required for wxUsleep"
124 #endif // sleep function
127 // ----------------------------------------------------------------------------
128 // process management
129 // ----------------------------------------------------------------------------
131 int wxKill(long pid
, wxSignal sig
)
133 return kill((pid_t
)pid
, (int)sig
);
136 #define WXEXECUTE_NARGS 127
138 long wxExecute( const wxString
& command
, bool sync
, wxProcess
*process
)
140 wxCHECK_MSG( !command
.IsEmpty(), 0, wxT("can't exec empty command") );
143 wxChar
*argv
[WXEXECUTE_NARGS
];
145 const wxChar
*cptr
= command
.c_str();
146 wxChar quotechar
= wxT('\0'); // is arg quoted?
147 bool escaped
= FALSE
;
149 // split the command line in arguments
153 quotechar
= wxT('\0');
155 // eat leading whitespace:
156 while ( wxIsspace(*cptr
) )
159 if ( *cptr
== wxT('\'') || *cptr
== wxT('"') )
164 if ( *cptr
== wxT('\\') && ! escaped
)
171 // all other characters:
175 // have we reached the end of the argument?
176 if ( (*cptr
== quotechar
&& ! escaped
)
177 || (quotechar
== wxT('\0') && wxIsspace(*cptr
))
178 || *cptr
== wxT('\0') )
180 wxASSERT_MSG( argc
< WXEXECUTE_NARGS
,
181 wxT("too many arguments in wxExecute") );
183 argv
[argc
] = new wxChar
[argument
.length() + 1];
184 wxStrcpy(argv
[argc
], argument
.c_str());
187 // if not at end of buffer, swallow last character:
191 break; // done with this one, start over
197 // do execute the command
198 long lRc
= wxExecute(argv
, sync
, process
);
203 delete [] argv
[argc
++];
208 bool wxShell(const wxString
& command
)
212 cmd
.Printf(wxT("xterm -e %s"), command
.c_str());
216 return wxExecute(cmd
) != 0;
221 void wxHandleProcessTermination(wxEndProcessData
*proc_data
)
223 int pid
= (proc_data
->pid
> 0) ? proc_data
->pid
: -(proc_data
->pid
);
225 // waitpid is POSIX so should be available everywhere, however on older
226 // systems wait() might be used instead in a loop (until the right pid
231 // wait for child termination and if waitpid() was interrupted, try again
234 rc
= waitpid(pid
, &status
, 0);
236 while ( rc
== -1 && errno
== EINTR
);
239 if( rc
== -1 || ! (WIFEXITED(status
) || WIFSIGNALED(status
)) )
241 wxLogSysError(_("Waiting for subprocess termination failed"));
242 /* AFAIK, this can only happen if something went wrong within
243 wxGTK, i.e. due to a race condition or some serious bug.
244 After having fixed the order of statements in
245 GTK_EndProcessDetector(). (KB)
250 // notify user about termination if required
251 if (proc_data
->process
)
253 proc_data
->process
->OnTerminate(proc_data
->pid
,
254 WEXITSTATUS(status
));
257 if ( proc_data
->pid
> 0 )
263 // wxExecute() will know about it
264 proc_data
->exitcode
= status
;
274 #define WXUNUSED_UNLESS_GUI(p) p
276 #define WXUNUSED_UNLESS_GUI(p)
279 // New wxStream classes to clean up the data when the process terminates
282 class wxProcessFileInputStream
: public wxInputStream
{
284 wxProcessFileInputStream(int fd
);
285 ~wxProcessFileInputStream();
288 size_t OnSysRead(void *buffer
, size_t bufsize
);
289 off_t
OnSysSeek(off_t seek
, wxSeekMode mode
);
290 off_t
OnSysTell() const;
296 class wxProcessFileOutputStream
: public wxOutputStream
{
298 wxProcessFileOutputStream(int fd
);
299 ~wxProcessFileOutputStream();
302 size_t OnSysWrite(const void *buffer
, size_t bufsize
);
303 off_t
OnSysSeek(off_t seek
, wxSeekMode mode
);
304 off_t
OnSysTell() const;
310 wxProcessFileInputStream::wxProcessFileInputStream(int fd
)
315 wxProcessFileInputStream::~wxProcessFileInputStream()
320 size_t wxProcessFileInputStream::OnSysRead(void *buffer
, size_t bufsize
)
324 ret
= read(m_fd
, buffer
, bufsize
);
325 m_lasterror
= wxSTREAM_NOERROR
;
327 m_lasterror
= wxSTREAM_EOF
;
329 m_lasterror
= wxSTREAM_READ_ERROR
;
335 off_t
wxProcessFileInputStream::OnSysSeek(off_t
WXUNUSED(seek
),
336 wxSeekMode
WXUNUSED(mode
))
338 return wxInvalidOffset
;
341 off_t
wxProcessFileInputStream::OnSysTell() const
343 return wxInvalidOffset
;
347 wxProcessFileOutputStream::wxProcessFileOutputStream(int fd
)
352 wxProcessFileOutputStream::~wxProcessFileOutputStream()
357 size_t wxProcessFileOutputStream::OnSysWrite(const void *buffer
, size_t bufsize
)
361 ret
= write(m_fd
, buffer
, bufsize
);
362 m_lasterror
= wxSTREAM_NOERROR
;
364 m_lasterror
= wxSTREAM_WRITE_ERROR
;
370 off_t
wxProcessFileOutputStream::OnSysSeek(off_t
WXUNUSED(seek
),
371 wxSeekMode
WXUNUSED(mode
))
373 return wxInvalidOffset
;
376 off_t
wxProcessFileOutputStream::OnSysTell() const
378 return wxInvalidOffset
;
383 long wxExecute(wxChar
**argv
,
385 wxProcess
* WXUNUSED_UNLESS_GUI(process
))
387 wxCHECK_MSG( *argv
, 0, wxT("can't exec empty command") );
391 char *mb_argv
[WXEXECUTE_NARGS
];
393 while (argv
[mb_argc
])
395 wxWX2MBbuf mb_arg
= wxConvertWX2MB(argv
[mb_argc
]);
396 mb_argv
[mb_argc
] = strdup(mb_arg
);
399 mb_argv
[mb_argc
] = (char *) NULL
;
401 // this macro will free memory we used above
402 #define ARGS_CLEANUP \
403 for ( mb_argc = 0; mb_argv[mb_argc]; mb_argc++ ) \
404 free(mb_argv[mb_argc])
406 // no need for cleanup
409 wxChar
**mb_argv
= argv
;
410 #endif // Unicode/ANSI
414 int end_proc_detect
[2];
415 if (pipe(end_proc_detect
) == -1)
417 wxLogSysError( _("Pipe creation failed") );
426 int in_pipe
[2] = { -1, -1 };
427 int out_pipe
[2] = { -1, -1 };
428 // Only asynchronous mode is interresting
429 if (!sync
&& process
&& process
->NeedPipe())
431 if (pipe(in_pipe
) == -1 || pipe(out_pipe
) == -1)
434 close(end_proc_detect
[0]);
435 close(end_proc_detect
[1]);
436 wxLogSysError( _("Pipe creation failed (Console pipes)") );
454 close(end_proc_detect
[0]);
455 close(end_proc_detect
[1]);
461 wxLogSysError( _("Fork failed") );
471 close(end_proc_detect
[0]); // close reading side
474 // These three lines close the open file descriptors to to avoid any
475 // input/output which might block the process or irritate the user. If
476 // one wants proper IO for the subprocess, the right thing to do is
477 // to start an xterm executing it.
480 // leave stderr opened, it won't do any hurm
481 for ( int fd
= 0; fd
< FD_SETSIZE
; fd
++ )
484 if ( fd
== end_proc_detect
[1] || fd
== in_pipe
[0] || fd
== out_pipe
[1] )
488 if ( fd
!= STDERR_FILENO
)
493 // Fake a console by duplicating pipes
495 if (in_pipe
[0] != -1) {
496 dup2(in_pipe
[0], STDIN_FILENO
);
497 dup2(out_pipe
[1], STDOUT_FILENO
);
504 close(STDERR_FILENO
);
506 // some programs complain about stderr not being open, so redirect
508 open("/dev/null", O_RDONLY
); // stdin
509 open("/dev/null", O_WRONLY
); // stdout
510 open("/dev/null", O_WRONLY
); // stderr
513 execvp (*mb_argv
, mb_argv
);
515 // there is no return after successful exec()
516 wxFprintf(stderr
, _("Can't execute '%s'\n"), *argv
);
523 wxEndProcessData
*data
= new wxEndProcessData
;
529 wxASSERT_MSG( !process
, wxT("wxProcess param ignored for sync exec") );
530 data
->process
= NULL
;
532 // sync execution: indicate it by negating the pid
534 data
->tag
= wxAddProcessCallback(data
, end_proc_detect
[0]);
536 close(end_proc_detect
[1]); // close writing side
538 // it will be set to 0 from GTK_EndProcessDetector
539 while (data
->pid
!= 0)
542 int exitcode
= data
->exitcode
;
550 // pipe initialization: construction of the wxStreams
551 if (process
&& process
->NeedPipe()) {
552 // These two streams are relative to this process.
553 wxOutputStream
*my_output_stream
;
554 wxInputStream
*my_input_stream
;
556 my_output_stream
= new wxProcessFileOutputStream(in_pipe
[1]);
557 my_input_stream
= new wxProcessFileInputStream(out_pipe
[0]);
558 close(in_pipe
[0]); // close reading side
559 close(out_pipe
[1]); // close writing side
561 process
->SetPipeStreams(my_input_stream
, my_output_stream
);
564 // async execution, nothing special to do - caller will be
565 // notified about the process termination if process != NULL, data
566 // will be deleted in GTK_EndProcessDetector
567 data
->process
= process
;
569 data
->tag
= wxAddProcessCallback(data
, end_proc_detect
[0]);
571 close(end_proc_detect
[1]); // close writing side
576 wxASSERT_MSG( sync
, wxT("async execution not supported yet") );
579 if ( waitpid(pid
, &exitcode
, 0) == -1 || !WIFEXITED(exitcode
) )
581 wxLogSysError(_("Waiting for subprocess termination failed"));
592 // ----------------------------------------------------------------------------
593 // file and directory functions
594 // ----------------------------------------------------------------------------
596 const wxChar
* wxGetHomeDir( wxString
*home
)
598 *home
= wxGetUserHome( wxString() );
599 if ( home
->IsEmpty() )
602 return home
->c_str();
606 const wxMB2WXbuf
wxGetUserHome( const wxString
&user
)
607 #else // just for binary compatibility -- there is no 'const' here
608 char *wxGetUserHome( const wxString
&user
)
611 struct passwd
*who
= (struct passwd
*) NULL
;
617 if ((ptr
= wxGetenv(wxT("HOME"))) != NULL
)
621 if ((ptr
= wxGetenv(wxT("USER"))) != NULL
|| (ptr
= wxGetenv(wxT("LOGNAME"))) != NULL
)
623 who
= getpwnam(wxConvertWX2MB(ptr
));
626 // We now make sure the the user exists!
629 who
= getpwuid(getuid());
634 who
= getpwnam (user
.mb_str());
637 return wxConvertMB2WX(who
? who
->pw_dir
: 0);
640 // ----------------------------------------------------------------------------
641 // network and user id routines
642 // ----------------------------------------------------------------------------
644 // retrieve either the hostname or FQDN depending on platform (caller must
645 // check whether it's one or the other, this is why this function is for
647 static bool wxGetHostNameInternal(wxChar
*buf
, int sz
)
649 wxCHECK_MSG( buf
, FALSE
, wxT("NULL pointer in wxGetHostNameInternal") );
653 // we're using uname() which is POSIX instead of less standard sysinfo()
654 #if defined(HAVE_UNAME)
656 bool ok
= uname(&uts
) != -1;
659 wxStrncpy(buf
, wxConvertMB2WX(uts
.nodename
), sz
- 1);
662 #elif defined(HAVE_GETHOSTNAME)
663 bool ok
= gethostname(buf
, sz
) != -1;
664 #else // no uname, no gethostname
665 wxFAIL_MSG(wxT("don't know host name for this machine"));
668 #endif // uname/gethostname
672 wxLogSysError(_("Cannot get the hostname"));
678 bool wxGetHostName(wxChar
*buf
, int sz
)
680 bool ok
= wxGetHostNameInternal(buf
, sz
);
684 // BSD systems return the FQDN, we only want the hostname, so extract
685 // it (we consider that dots are domain separators)
686 wxChar
*dot
= wxStrchr(buf
, wxT('.'));
697 bool wxGetFullHostName(wxChar
*buf
, int sz
)
699 bool ok
= wxGetHostNameInternal(buf
, sz
);
703 if ( !wxStrchr(buf
, wxT('.')) )
705 struct hostent
*host
= gethostbyname(wxConvertWX2MB(buf
));
708 wxLogSysError(_("Cannot get the official hostname"));
714 // the canonical name
715 wxStrncpy(buf
, wxConvertMB2WX(host
->h_name
), sz
);
718 //else: it's already a FQDN (BSD behaves this way)
724 bool wxGetUserId(wxChar
*buf
, int sz
)
729 if ((who
= getpwuid(getuid ())) != NULL
)
731 wxStrncpy (buf
, wxConvertMB2WX(who
->pw_name
), sz
- 1);
738 bool wxGetUserName(wxChar
*buf
, int sz
)
743 if ((who
= getpwuid (getuid ())) != NULL
)
745 // pw_gecos field in struct passwd is not standard
747 char *comma
= strchr(who
->pw_gecos
, ',');
749 *comma
= '\0'; // cut off non-name comment fields
750 wxStrncpy (buf
, wxConvertMB2WX(who
->pw_gecos
), sz
- 1);
751 #else // !HAVE_PW_GECOS
752 wxStrncpy (buf
, wxConvertMB2WX(who
->pw_name
), sz
- 1);
753 #endif // HAVE_PW_GECOS/!HAVE_PW_GECOS
760 wxString
wxGetOsDescription()
762 #ifndef WXWIN_OS_DESCRIPTION
763 #error WXWIN_OS_DESCRIPTION should be defined in config.h by configure
765 return WXWIN_OS_DESCRIPTION
;
769 // ----------------------------------------------------------------------------
770 // error and debug output routines (deprecated, use wxLog)
771 // ----------------------------------------------------------------------------
773 void wxDebugMsg( const char *format
, ... )
776 va_start( ap
, format
);
777 vfprintf( stderr
, format
, ap
);
782 void wxError( const wxString
&msg
, const wxString
&title
)
784 wxFprintf( stderr
, _("Error ") );
785 if (!title
.IsNull()) wxFprintf( stderr
, wxT("%s "), WXSTRINGCAST(title
) );
786 if (!msg
.IsNull()) wxFprintf( stderr
, wxT(": %s"), WXSTRINGCAST(msg
) );
787 wxFprintf( stderr
, wxT(".\n") );
790 void wxFatalError( const wxString
&msg
, const wxString
&title
)
792 wxFprintf( stderr
, _("Error ") );
793 if (!title
.IsNull()) wxFprintf( stderr
, wxT("%s "), WXSTRINGCAST(title
) );
794 if (!msg
.IsNull()) wxFprintf( stderr
, wxT(": %s"), WXSTRINGCAST(msg
) );
795 wxFprintf( stderr
, wxT(".\n") );
796 exit(3); // the same exit code as for abort()