home *** CD-ROM | disk | FTP | other *** search
/ Atari FTP / ATARI_FTP_0693.zip / ATARI_FTP_0693 / Mint / mntlib32.zoo / wait3.c < prev    next >
C/C++ Source or Header  |  1993-05-16  |  1KB  |  76 lines
  1. /* wait3() emulation for MiNT. written by Eric R. Smith and placed in
  2.    the public domain
  3.  */
  4.  
  5. #include <types.h>
  6. #include <wait.h>
  7. #include <time.h>
  8. #include <resource.h>
  9. #include <mintbind.h>
  10. #include <errno.h>
  11. #include <signal.h>
  12.  
  13. extern int __mint;
  14.  
  15. extern long __waitval;        /* in thread.c */
  16. extern long __waittime;        /* ditto */
  17.  
  18. __EXTERN void _ms2tval __PROTO((unsigned long, struct timeval *));
  19.         /* in getrusage.c */
  20.  
  21. pid_t
  22. wait3(status, mode, rusage)
  23.     union wait *status;
  24.     int mode;
  25.     struct rusage *rusage;
  26. {
  27.     long r, rsc[8];
  28.     int exit_status, sig_term, pid;
  29.  
  30.     if (__mint == 0) {
  31.         r = __waitval;
  32.         __waitval = -ENOENT;
  33.         rsc[0] = __waittime;
  34.         rsc[1] = 0;
  35.     } else
  36.         r = Pwait3(mode, rsc);
  37.     if (r < 0) {
  38.         errno = (int) -r;
  39.         return -1;
  40.     }
  41.     pid = (int) ((r & 0xffff0000L) >> 16);
  42.     if (pid) {
  43.       if (status)
  44.         {
  45.         status->_i = 0;
  46.  
  47.         if ( ((short)r) == -32) {
  48.             sig_term = SIGINT;
  49.             exit_status = 0;
  50.         }
  51.         else {
  52.             exit_status = (int) (r & 0x000000ffL);
  53.             sig_term = (int) ((r & 0x00007f00L) >> 8);
  54.         }
  55.         if (sig_term >= NSIG)
  56.           sig_term = 0;
  57.         if (sig_term && exit_status != 0 && exit_status != 0177)
  58.             sig_term = 0;
  59.         if (exit_status == 0177 && sig_term) {
  60.             status->w_termsig = WSTOPPED;
  61.             status->w_stopsig = sig_term;
  62.         }
  63.         else {
  64.             status->w_termsig = sig_term;
  65.             status->w_retcode = exit_status;
  66.         }
  67.         }
  68.  
  69.         if (rusage) {
  70.             _ms2tval(rsc[0], &(rusage->ru_utime));
  71.             _ms2tval(rsc[1], &(rusage->ru_stime));
  72.         }
  73.     }
  74.     return pid;
  75. }
  76.