| Index: bison/src/bison/2.4.1/bison-2.4.1-src/lib/subpipe.c
|
| ===================================================================
|
| --- bison/src/bison/2.4.1/bison-2.4.1-src/lib/subpipe.c (revision 0)
|
| +++ bison/src/bison/2.4.1/bison-2.4.1-src/lib/subpipe.c (revision 0)
|
| @@ -0,0 +1,214 @@
|
| +/* Subprocesses with pipes.
|
| +
|
| + Copyright (C) 2002, 2004, 2005, 2006 Free Software Foundation, Inc.
|
| +
|
| + This program is free software: you can redistribute it and/or modify
|
| + it under the terms of the GNU General Public License as published by
|
| + the Free Software Foundation, either version 3 of the License, or
|
| + (at your option) any later version.
|
| +
|
| + This program is distributed in the hope that it will be useful,
|
| + but WITHOUT ANY WARRANTY; without even the implied warranty of
|
| + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
| + GNU General Public License for more details.
|
| +
|
| + You should have received a copy of the GNU General Public License
|
| + along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
| +
|
| +/* Written by Paul Eggert <eggert@twinsun.com>
|
| + and Florian Krohm <florian@edamail.fishkill.ibm.com>. */
|
| +
|
| +#include <config.h>
|
| +
|
| +#include "subpipe.h"
|
| +
|
| +#include <errno.h>
|
| +
|
| +#include <signal.h>
|
| +#if ! defined SIGCHLD && defined SIGCLD
|
| +# define SIGCHLD SIGCLD
|
| +#endif
|
| +
|
| +#include <stdlib.h>
|
| +
|
| +#include <unistd.h>
|
| +#ifndef STDIN_FILENO
|
| +# define STDIN_FILENO 0
|
| +#endif
|
| +#ifndef STDOUT_FILENO
|
| +# define STDOUT_FILENO 1
|
| +#endif
|
| +#if ! HAVE_DUP2 && ! defined dup2
|
| +# include <fcntl.h>
|
| +# define dup2(f, t) (close (t), fcntl (f, F_DUPFD, t))
|
| +#endif
|
| +
|
| +#if HAVE_SYS_WAIT_H
|
| +# include <sys/wait.h>
|
| +#endif
|
| +#ifndef WEXITSTATUS
|
| +# define WEXITSTATUS(stat_val) ((unsigned int) (stat_val) >> 8)
|
| +#endif
|
| +#ifndef WIFEXITED
|
| +# define WIFEXITED(stat_val) (((stat_val) & 255) == 0)
|
| +#endif
|
| +
|
| +#if HAVE_VFORK_H
|
| +# include <vfork.h>
|
| +#endif
|
| +#if ! HAVE_WORKING_VFORK
|
| +# define vfork fork
|
| +#endif
|
| +
|
| +#include "error.h"
|
| +#include "unistd-safer.h"
|
| +
|
| +#include "gettext.h"
|
| +#define _(Msgid) gettext (Msgid)
|
| +
|
| +#ifndef __attribute__
|
| +/* This feature is available in gcc versions 2.5 and later. */
|
| +# if ! defined __GNUC__ || __GNUC__ < 2 || \
|
| +(__GNUC__ == 2 && __GNUC_MINOR__ < 5) || __STRICT_ANSI__
|
| +# define __attribute__(Spec) /* empty */
|
| +# endif
|
| +#endif
|
| +
|
| +#ifndef ATTRIBUTE_UNUSED
|
| +# define ATTRIBUTE_UNUSED __attribute__ ((__unused__))
|
| +#endif
|
| +
|
| +/* Initialize this module. */
|
| +
|
| +void
|
| +init_subpipe (void)
|
| +{
|
| +#ifdef SIGCHLD
|
| + /* System V fork+wait does not work if SIGCHLD is ignored. */
|
| + signal (SIGCHLD, SIG_DFL);
|
| +#endif
|
| +}
|
| +
|
| +
|
| +/* Create a subprocess that is run as a filter. ARGV is the
|
| + NULL-terminated argument vector for the subprocess. Store read and
|
| + write file descriptors for communication with the subprocess into
|
| + FD[0] and FD[1]: input meant for the process can be written into
|
| + FD[0], and output from the process can be read from FD[1]. Return
|
| + the subprocess id.
|
| +
|
| + To avoid deadlock, the invoker must not let incoming data pile up
|
| + in FD[1] while writing data to FD[0]. */
|
| +
|
| +pid_t
|
| +create_subpipe (char const * const *argv, int fd[2])
|
| +{
|
| + int pipe_fd[2];
|
| + int child_fd[2];
|
| + pid_t pid;
|
| +
|
| + if (pipe_safer (child_fd) != 0 || pipe_safer (pipe_fd) != 0)
|
| + error (EXIT_FAILURE, errno, "pipe");
|
| + fd[0] = child_fd[1];
|
| + fd[1] = pipe_fd[0];
|
| + child_fd[1] = pipe_fd[1];
|
| +
|
| +/* WIN32 patch taken from the Mingw port:
|
| + http://prdownloads.sourceforge.net/mingw/bison-1.875-2003.02.10-1-src.tar.bz2?download
|
| +*/
|
| +#ifdef _WIN32
|
| + /* In windows we must control what the child inherits with the parent process
|
| + * and then use a spawn function instead of a fork/exec pair.
|
| + *
|
| + * So, in assigning the pipe pair we must dup stdio to save the originals,
|
| + * dup2 the pipe handles to the stdio handles, spawn and then dup2 the saved
|
| + * handles back to stdio and close the dupped ones.
|
| + */
|
| + int osi, oso;
|
| +
|
| + if ((osi = dup (STDIN_FILENO)) < 0)
|
| + error (EXIT_FAILURE, errno, "pipe");
|
| + setmode(osi, O_NOINHERIT);
|
| + if ((oso = dup (STDOUT_FILENO)) < 0)
|
| + error (EXIT_FAILURE, errno, "pipe");
|
| + setmode(oso, O_NOINHERIT);
|
| +
|
| + if (dup2(child_fd[0], STDIN_FILENO) < 0)
|
| + error (EXIT_FAILURE, errno, "pipe");
|
| + if (dup2(child_fd[1], STDOUT_FILENO) < 0)
|
| + error (EXIT_FAILURE, errno, "pipe");
|
| +
|
| +#include <conio.h>
|
| + pid = spawnvp(P_NOWAIT, argv[0], argv);
|
| + if (pid < 0) {
|
| + printf ("spawnvp: %s\n", argv[0]);
|
| + error (EXIT_FAILURE, errno, argv[0]);
|
| + }
|
| + if (dup2 (osi, STDIN_FILENO))
|
| + error (EXIT_FAILURE, errno, "dup2");
|
| + close (osi);
|
| + if (dup2 (oso, STDOUT_FILENO))
|
| + error (EXIT_FAILURE, errno, "dup2");
|
| + close (oso);
|
| +
|
| +#else
|
| + pid = vfork ();
|
| + if (pid < 0)
|
| + error (EXIT_FAILURE, errno, "fork");
|
| +
|
| + if (! pid)
|
| + {
|
| + /* Child. */
|
| + close (fd[0]);
|
| + close (fd[1]);
|
| + dup2 (child_fd[0], STDIN_FILENO);
|
| + close (child_fd[0]);
|
| + dup2 (child_fd[1], STDOUT_FILENO);
|
| + close (child_fd[1]);
|
| +
|
| + /* The cast to (char **) rather than (char * const *) is needed
|
| + for portability to older hosts with a nonstandard prototype
|
| + for execvp. */
|
| + execvp (argv[0], (char **) argv);
|
| +
|
| + _exit (errno == ENOENT ? 127 : 126);
|
| + }
|
| +#endif /* _WIN32 */
|
| + /* Parent. */
|
| + close (child_fd[0]);
|
| + close (child_fd[1]);
|
| + return pid;
|
| +}
|
| +
|
| +
|
| +/* Wait for the subprocess to exit. */
|
| +
|
| +void
|
| +reap_subpipe (pid_t pid, char const *program)
|
| +{
|
| +#if HAVE_WAITPID || defined waitpid
|
| + int wstatus;
|
| + if (waitpid (pid, &wstatus, 0) < 0)
|
| + error (EXIT_FAILURE, errno, "waitpid");
|
| + else
|
| + {
|
| + int status = WIFEXITED (wstatus) ? WEXITSTATUS (wstatus) : -1;
|
| + if (status)
|
| + error (EXIT_FAILURE, 0,
|
| + _(status == 126
|
| + ? "subsidiary program `%s' could not be invoked"
|
| + : status == 127
|
| + ? "subsidiary program `%s' not found"
|
| + : status < 0
|
| + ? "subsidiary program `%s' failed"
|
| + : "subsidiary program `%s' failed (exit status %d)"),
|
| + program, status);
|
| + }
|
| +#endif
|
| +}
|
| +
|
| +void
|
| +end_of_output_subpipe (pid_t pid ATTRIBUTE_UNUSED,
|
| + int fd[2] ATTRIBUTE_UNUSED)
|
| +{
|
| +}
|
|
|
| Property changes on: bison\src\bison\2.4.1\bison-2.4.1-src\lib\subpipe.c
|
| ___________________________________________________________________
|
| Added: svn:eol-style
|
| + LF
|
|
|
|
|