emacs: src/process.c comparison

comparison src/process.c @ 96303:ddedcecb18ef

* unexnext.c: * m/ews4800.h: * m/hp9000s300.h: * m/ibm370aix.h: * m/mips-siemens.h: * m/ncr386.h: * m/next.h: * m/pmax.h: * m/powerpcle.h: * m/tandem-s2.h: * s/386bsd.h: * s/bsd386.h: * s/bsd4-1.h: * s/bsd4-2.h: * s/bsdos2-1.h: * s/bsdos2.h: * s/bsdos3.h: * s/bsdos4.h: * s/nextstep.h: * s/ultrix4-3.h: * s/usg5-0.h: * s/usg5-2-2.h: * s/usg5-2.h: * s/usg5-4-3.h: * s/ux4800.h: * s/uxpds.h: * s/uxpv.h: Remove support for obsolete systems. * s/hpux.h, s/hpux10.h, s/hpux8.h, s/hpux9.h, s/hpux9shr.h: Remove, insert contents in s/hpux-10.20.h * s/aix3-1.h, s/aix3-2-5.h, s/aix3-2.h, s/aix4-1.h, s/aix4.h: Remove, insert contents in s/aix-4.2.h * s/usg5-3.h: Remove, insert contents in s/usg5-4.h. * s/bsd4-3.h: Rename to .. * s/bsd-common.h: ... this. * src/data.c: * src/doc.c: * src/ecrt0.c: * src/emacs.c: * src/fileio.c: * src/floatfns.c: * src/keyboard.c: * src/mem-limits.h: * src/print.c: * src/process.c: * src/sysdep.c: * src/syssignal.h: * src/systty.h: * src/syswait.h: * src/term.c: * src/unexec.c: * src/unexelf.c: * src/unexhp9k800.c: * src/m/hp800.h: * src/m/ibmrs6000.h: * src/m/mips.h: * src/m/vax.h: * src/s/darwin.h: * src/s/freebsd.h: * src/s/gnu.h: * src/s/ms-w32.h: * src/s/msdos.h: * src/s/netbsd.h: * src/s/template.h: Remove references to obsolete variables. * Makefile.in: Add dependencies for all unexec files. (admindir): Remove unused variable. (UNEXEC_SRC): Remove references. * config.nt: Remove reference to UNEXEC_SRC. * lwlib.c: Remove references to obsolete variables. * fakemail.c: Remove references to obsolete variables. * os.texi: Remove references to obsolete systems. * configure.in: * configure: Remove references to obsolete systems.

author	Dan Nicolaescu <dann@ics.uci.edu>
date	Thu, 26 Jun 2008 04:24:54 +0000
parents	99342636fa96
children	a99299e4d2de

comparison

equal deleted inserted replaced

-:b3db7e68c460
+:ddedcecb18ef
 #include <sys/ioctl.h>
 #if !defined (O_NDELAY) && defined (HAVE_PTYS) && !defined(USG5)
 #include <fcntl.h>
 #endif /* HAVE_PTYS and no O_NDELAY */
 #endif /* BSD_SYSTEM */
-#ifdef BROKEN_O_NONBLOCK
-#undef O_NONBLOCK
-#endif /* BROKEN_O_NONBLOCK */
 #ifdef NEED_BSDTTY
 #include <bsdtty.h>
 #endif
 #endif
 #endif /* HAVE_WORKING_VFORK */
 sigprocmask (SIG_BLOCK, &blocked, &procmask);
 #else /* !POSIX_SIGNALS */
 #ifdef SIGCHLD
-#ifdef BSD4_1
-sighold (SIGCHLD);
-#else /* not BSD4_1 */
 #if defined (BSD_SYSTEM) || defined (HPUX)
 sigsetmask (sigmask (SIGCHLD));
 #else /* ordinary USG */
 #if 0
 sigchld_deferred = 0;
 sigchld = signal (SIGCHLD, create_process_sigchld);
 #endif
 #endif /* ordinary USG */
-#endif /* not BSD4_1 */
 #endif /* SIGCHLD */
 #endif /* !POSIX_SIGNALS */
 FD_SET (inchannel, &input_wait_mask);
 FD_SET (inchannel, &non_keyboard_wait_mask);
 both HAVE_SETSID and TIOCSCTTY are defined.  */
 	/* Now close the pty (if we had it open) and reopen it.
 	   This makes the pty the controlling terminal of the subprocess.  */
 	if (pty_flag)
 	  {
-#ifdef SET_CHILD_PTY_PGRP
-	    int pgrp = getpid ();
-#endif
 	    /* I wonder if emacs_close (emacs_open (pty_name, ...))
 	       would work?  */
 	    if (xforkin >= 0)
 	      emacs_close (xforkin);
 		emacs_write (1, pty_name, strlen (pty_name));
 		emacs_write (1, "\n", 1);
 		_exit (1);
 	      }
-#ifdef SET_CHILD_PTY_PGRP
-	    ioctl (xforkin, TIOCSPGRP, &pgrp);
-	    ioctl (xforkout, TIOCSPGRP, &pgrp);
-#endif
 	  }
 #endif /* not DONT_REOPEN_PTY */
 #ifdef SETUP_SLAVE_PTY
 	if (pty_flag)
 	/* Stop blocking signals in the child.  */
 #ifdef POSIX_SIGNALS
 	sigprocmask (SIG_SETMASK, &procmask, 0);
 #else /* !POSIX_SIGNALS */
 #ifdef SIGCHLD
-#ifdef BSD4_1
-	sigrelse (SIGCHLD);
-#else /* not BSD4_1 */
 #if defined (BSD_SYSTEM) || defined (HPUX)
 	sigsetmask (SIGEMPTYMASK);
 #else /* ordinary USG */
 #if 0
 	signal (SIGCHLD, sigchld);
 #endif
 #endif /* ordinary USG */
-#endif /* not BSD4_1 */
 #endif /* SIGCHLD */
 #endif /* !POSIX_SIGNALS */
 #if !defined (DONT_REOPEN_PTY)
 	if (pty_flag)
 #endif /* HAVE_WORKING_VFORK */
 /* Stop blocking signals in the parent.  */
 sigprocmask (SIG_SETMASK, &procmask, 0);
 #else /* !POSIX_SIGNALS */
 #ifdef SIGCHLD
-#ifdef BSD4_1
-sigrelse (SIGCHLD);
-#else /* not BSD4_1 */
 #if defined (BSD_SYSTEM) || defined (HPUX)
 sigsetmask (SIGEMPTYMASK);
 #else /* ordinary USG */
 #if 0
 signal (SIGCHLD, sigchld);
 that came in during this function.  */
 if (sigchld_deferred)
 kill (getpid (), SIGCHLD);
 #endif
 #endif /* ordinary USG */
-#endif /* not BSD4_1 */
 #endif /* SIGCHLD */
 #endif /* !POSIX_SIGNALS */
 /* Now generate the error if vfork failed.  */
 if (pid < 0)
 return Qnil;
 }
-/* A version of request_sigio suitable for a record_unwind_protect.  */
-#ifdef __ultrix__
-static Lisp_Object
-unwind_request_sigio (dummy)
-Lisp_Object dummy;
-{
-if (interrupt_input)
-request_sigio ();
-return Qnil;
-}
-#endif
 #ifdef HAVE_SERIAL
 DEFUN ("serial-process-configure",
 Fserial_process_configure,
 Sserial_process_configure,
 0, MANY, 0,
 ai.ai_family = family;
 ai.ai_addr = (struct sockaddr *) &address_in;
 ai.ai_addrlen = sizeof address_in;
 open_socket:
-#ifdef __ultrix__
-/* Previously this was compiled unconditionally, but that seems
-unnecessary on modern systems, and `unrequest_sigio' was a noop
-under X anyway. --lorentey */
-/* Kernel bugs (on Ultrix at least) cause lossage (not just EINTR)
-when connect is interrupted.  So let's not let it get interrupted.
-Note we do not turn off polling, because polling is only used
-when not interrupt_input, and thus not normally used on the systems
-which have this bug.  On systems which use polling, there's no way
-to quit if polling is turned off.  */
-if (interrupt_input
-&& !is_server && socktype == SOCK_STREAM)
-{
-/* Comment from KFS: The original open-network-stream code
-	 didn't unwind protect this, but it seems like the proper
-	 thing to do.  In any case, I don't see how it could harm to
-	 do this -- and it makes cleanup (using unbind_to) easier.  */
-record_unwind_protect (unwind_request_sigio, Qnil);
-unrequest_sigio ();
-}
-#endif
 /* Do this in case we never enter the for-loop below.  */
 count1 = SPECPDL_INDEX ();
 s = -1;
 {
 EMACS_GET_TIME (end_time);
 EMACS_SET_SECS_USECS (timeout, time_limit, microsecs);
 EMACS_ADD_TIME (end_time, end_time, timeout);
 }
-#ifdef POLL_INTERRUPTED_SYS_CALL
-/* AlainF 5-Jul-1996
-HP-UX 10.10 seem to have problems with signals coming in
-Causes "poll: interrupted system call" messages when Emacs is run
-in an X window
-Turn off periodic alarms (in case they are in use),
-and then turn off any other atimers.  */
-stop_polling ();
-turn_on_atimers (0);
-#endif /* POLL_INTERRUPTED_SYS_CALL */
 while (1)
 {
 int timeout_reduced_for_timers = 0;
 	break;
 if (nfds < 0)
 	{
 	  if (xerrno == EINTR)
 	    no_avail = 1;
-#ifdef ultrix
-	  /* Ultrix select seems to return ENOMEM when it is
-	     interrupted.  Treat it just like EINTR.  Bleah.  Note
-	     that we want to test for the "ultrix" CPP symbol, not
-	     "__ultrix__"; the latter is only defined under GCC, but
-	     not by DEC's bundled CC.  -JimB  */
-	  else if (xerrno == ENOMEM)
-	    no_avail = 1;
-#endif
 	  else if (xerrno == EBADF)
 	    {
 #ifdef AIX
 	      /* AIX doesn't handle PTY closure the same way BSD does.  On AIX,
 		 the child's closure of the pts gives the parent a SIGHUP, and
 {
 /* Prevent input_pending from remaining set if we quit.  */
 clear_input_pending ();
 QUIT;
 }
-#ifdef POLL_INTERRUPTED_SYS_CALL
-/* AlainF 5-Jul-1996
-HP-UX 10.10 seems to have problems with signals coming in
-Causes "poll: interrupted system call" messages when Emacs is run
-in an X window
-Turn periodic alarms back on */
-start_polling ();
-#endif /* POLL_INTERRUPTED_SYS_CALL */
 return got_some_input;
 }
 /* Given a list (FUNCTION ARGS...), apply FUNCTION to the ARGS.  */
 SIGTYPE
 send_process_trap ()
 {
 SIGNAL_THREAD_CHECK (SIGPIPE);
-#ifdef BSD4_1
-sigrelse (SIGPIPE);
-sigrelse (SIGALRM);
-#endif /* BSD4_1 */
 sigunblock (sigmask (SIGPIPE));
 longjmp (send_process_frame, 1);
 }
 /* Send some data to process PROC.
 register struct Lisp_Process *p;
 extern EMACS_TIME *input_available_clear_time;
 SIGNAL_THREAD_CHECK (signo);
-#ifdef BSD4_1
-extern int sigheld;
-sigheld |= sigbit (SIGCHLD);
-#endif
 while (1)
 {
 pid_t pid;
 WAITTYPE w;
 Lisp_Object tail;
 	  /* USG systems forget handlers when they are used;
 	     must reestablish each time */
 #if defined (USG) && !defined (POSIX_SIGNALS)
 	  signal (signo, sigchld_handler);   /* WARNING - must come after wait3() */
-#endif
-#ifdef  BSD4_1
-	  sigheld &= ~sigbit (SIGCHLD);
-	  sigrelse (SIGCHLD);
 #endif
 	  errno = old_errno;
 	  return;
 	}
 #else

Mercurial > emacs

comparison src/process.c @ 96303:ddedcecb18ef