exp2l: Work around a NetBSD 10.0/i386 bug.
[gnulib.git] / lib / spawn_faction_destroy.c
blobd48c7b4be57383eddb96c6886a098c80763f78f2
1 /* Copyright (C) 2000, 2009-2024 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
4 This file is free software: you can redistribute it and/or modify
5 it under the terms of the GNU Lesser General Public License as
6 published by the Free Software Foundation; either version 2.1 of the
7 License, or (at your option) any later version.
9 This file is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU Lesser General Public License for more details.
14 You should have received a copy of the GNU Lesser General Public License
15 along with this program. If not, see <https://www.gnu.org/licenses/>. */
17 #include <config.h>
19 /* Specification. */
20 #include <spawn.h>
22 #include <stdlib.h>
24 #if REPLACE_POSIX_SPAWN
25 # include "spawn_int.h"
26 #endif
28 /* Initialize data structure for file attribute for 'spawn' call. */
29 int
30 posix_spawn_file_actions_destroy (posix_spawn_file_actions_t *file_actions)
31 #undef posix_spawn_file_actions_destroy
33 #if !REPLACE_POSIX_SPAWN
34 return posix_spawn_file_actions_destroy (file_actions);
35 #else
36 int i;
38 /* Free the paths in the open actions. */
39 for (i = 0; i < file_actions->_used; ++i)
41 struct __spawn_action *sa = &file_actions->_actions[i];
42 switch (sa->tag)
44 case spawn_do_open:
45 free (sa->action.open_action.path);
46 break;
47 case spawn_do_chdir:
48 free (sa->action.chdir_action.path);
49 break;
50 default:
51 /* No cleanup required. */
52 break;
56 /* Free the array of actions. */
57 free (file_actions->_actions);
59 return 0;
60 #endif