(root)/
gcc-13.2.0/
libiberty/
pex-one.c
       1  /* Execute a program and wait for a result.
       2     Copyright (C) 2005-2023 Free Software Foundation, Inc.
       3  
       4  This file is part of the libiberty library.
       5  Libiberty is free software; you can redistribute it and/or
       6  modify it under the terms of the GNU Library General Public
       7  License as published by the Free Software Foundation; either
       8  version 2 of the License, or (at your option) any later version.
       9  
      10  Libiberty is distributed in the hope that it will be useful,
      11  but WITHOUT ANY WARRANTY; without even the implied warranty of
      12  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      13  Library General Public License for more details.
      14  
      15  You should have received a copy of the GNU Library General Public
      16  License along with libiberty; see the file COPYING.LIB.  If not,
      17  write to the Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor,
      18  Boston, MA 02110-1301, USA.  */
      19  
      20  #include "config.h"
      21  #include "libiberty.h"
      22  
      23  const char *
      24  pex_one (int flags, const char *executable, char * const *argv,
      25  	 const char *pname, const char *outname, const char *errname,
      26  	 int *status, int *err)
      27  {
      28    struct pex_obj *obj;
      29    const char *errmsg;
      30  
      31    obj = pex_init (0, pname, NULL);
      32    errmsg = pex_run (obj, flags, executable, argv, outname, errname, err);
      33    if (errmsg == NULL)
      34      {
      35        if (!pex_get_status (obj, 1, status))
      36  	{
      37  	  *err = 0;
      38  	  errmsg = "pex_get_status failed";
      39  	}
      40      }
      41    pex_free (obj);
      42    return errmsg;  
      43  }