Return to epopen.c CVS log

Up to [MW Coherent from dump] / coherent / g / usr / lib / uucp / tay104 / unix

Annotation of coherent/g/usr/lib/uucp/tay104/unix/epopen.c, revision 1.1

1.1     ! root        1: /* epopen.c
        !             2:    A version of popen that goes through ixsspawn.
        !             3: 
        !             4:    Copyright (C) 1992 Ian Lance Taylor
        !             5: 
        !             6:    This file is part of the Taylor UUCP package.
        !             7: 
        !             8:    This program is free software; you can redistribute it and/or
        !             9:    modify it under the terms of the GNU General Public License as
        !            10:    published by the Free Software Foundation; either version 2 of the
        !            11:    License, or (at your option) any later version.
        !            12: 
        !            13:    This program is distributed in the hope that it will be useful, but
        !            14:    WITHOUT ANY WARRANTY; without even the implied warranty of
        !            15:    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
        !            16:    General Public License for more details.
        !            17: 
        !            18:    You should have received a copy of the GNU General Public License
        !            19:    along with this program; if not, write to the Free Software
        !            20:    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
        !            21: 
        !            22:    The author of the program may be contacted at [email protected] or
        !            23:    c/o Infinity Development Systems, P.O. Box 520, Waltham, MA 02254.
        !            24:    */
        !            25: 
        !            26: #include "uucp.h"
        !            27: 
        !            28: #include "sysdep.h"
        !            29: 
        !            30: #include <errno.h>
        !            31: 
        !            32: /* A version of popen that goes through ixsspawn.  This actually takes
        !            33:    an array of arguments rather than a string, and takes a boolean
        !            34:    read/write value rather than a string.  It sets *pipid to the
        !            35:    process ID of the child.  */
        !            36: 
        !            37: FILE *
        !            38: espopen (pazargs, frd, pipid)
        !            39:      const char **pazargs;
        !            40:      boolean frd;
        !            41:      pid_t *pipid;
        !            42: {
        !            43:   int aidescs[3];
        !            44:   pid_t ipid;
        !            45:   FILE *eret;
        !            46: 
        !            47:   if (frd)
        !            48:     {
        !            49:       aidescs[0] = SPAWN_NULL;
        !            50:       aidescs[1] = SPAWN_READ_PIPE;
        !            51:     }
        !            52:   else
        !            53:     {
        !            54:       aidescs[0] = SPAWN_WRITE_PIPE;
        !            55:       aidescs[1] = SPAWN_NULL;
        !            56:     }
        !            57:   aidescs[2] = SPAWN_NULL;
        !            58: 
        !            59:   ipid = ixsspawn (pazargs, aidescs, FALSE, FALSE,
        !            60:                   (const char *) NULL, FALSE, TRUE,
        !            61:                   (const char *) NULL, (const char *) NULL,
        !            62:                   (const char *) NULL);
        !            63:   if (ipid < 0)
        !            64:     return NULL;
        !            65: 
        !            66:   if (frd)
        !            67:     eret = fdopen (aidescs[1], (char *) "r");
        !            68:   else
        !            69:     eret = fdopen (aidescs[0], (char *) "w");
        !            70:   if (eret == NULL)
        !            71:     {
        !            72:       int ierr;
        !            73: 
        !            74:       ierr = errno;
        !            75:       (void) close (frd ? aidescs[1] : aidescs[0]);
        !            76:       (void) kill (ipid, SIGKILL);
        !            77:       (void) ixswait ((unsigned long) ipid, (const char *) NULL);
        !            78:       errno = ierr;
        !            79:       return NULL;
        !            80:     }
        !            81:     
        !            82:   *pipid = ipid;
        !            83: 
        !            84:   return eret;
        !            85: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.