1/* Copyright (C) 1991-2020 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Lesser General Public
6 License as published by the Free Software Foundation; either
7 version 2.1 of the License, or (at your option) any later version.
8
9 The GNU C Library 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 GNU
12 Lesser General Public License for more details.
13
14 You should have received a copy of the GNU Lesser General Public
15 License along with the GNU C Library; if not, see
16 <https://www.gnu.org/licenses/>. */
17
18#include <errno.h>
19#include <signal.h>
20#include <stdlib.h>
21#include <unistd.h>
22#include <sigsetops.h>
23#include <spawn.h>
24#include <pthread.h>
25#include <sys/types.h>
26#include <sys/wait.h>
27#include <stdio.h>
28
29#include <libc-lock.h>
30#include <not-errno.h>
31#include <not-cancel.h>
32#include <internal-signals.h>
33
34#define SHELL_PATH "/bin/sh" /* Path of the shell. */
35#define SHELL_NAME "sh" /* Name to give it. */
36
37
38/* This system implementation aims to be thread-safe, which requires to
39 restore the signal dispositions for SIGINT and SIGQUIT correctly and to
40 deal with cancellation by terminating the child process.
41
42 The signal disposition restoration on the single-thread case is
43 straighfoward. For multithreaded case, a reference-counter with a lock
44 is used, so the first thread will set the SIGINT/SIGQUIT dispositions and
45 last thread will restore them.
46
47 Cancellation handling is done with thread cancellation clean-up handlers
48 on waitpid call. */
49
50#ifdef _LIBC_REENTRANT
51static struct sigaction intr, quit;
52static int sa_refcntr;
53__libc_lock_define_initialized (static, lock);
54
55# define DO_LOCK() __libc_lock_lock (lock)
56# define DO_UNLOCK() __libc_lock_unlock (lock)
57# define INIT_LOCK() ({ __libc_lock_init (lock); sa_refcntr = 0; })
58# define ADD_REF() sa_refcntr++
59# define SUB_REF() --sa_refcntr
60#else
61# define DO_LOCK()
62# define DO_UNLOCK()
63# define INIT_LOCK()
64# define ADD_REF() 0
65# define SUB_REF() 0
66#endif
67
68
69#if defined(_LIBC_REENTRANT) && defined(SIGCANCEL)
70struct cancel_handler_args
71{
72 struct sigaction *quit;
73 struct sigaction *intr;
74 pid_t pid;
75};
76
77static void
78cancel_handler (void *arg)
79{
80 struct cancel_handler_args *args = (struct cancel_handler_args *) (arg);
81
82 __kill_noerrno (args->pid, SIGKILL);
83
84 int state;
85 __libc_ptf_call (__pthread_setcancelstate,
86 (PTHREAD_CANCEL_DISABLE, &state), 0);
87 TEMP_FAILURE_RETRY (__waitpid (args->pid, NULL, 0));
88 __libc_ptf_call (__pthread_setcancelstate, (state, NULL), 0);
89
90 DO_LOCK ();
91 if (SUB_REF () == 0)
92 {
93 __sigaction (SIGQUIT, args->quit, NULL);
94 __sigaction (SIGINT, args->intr, NULL);
95 }
96 DO_UNLOCK ();
97}
98#endif
99
100/* Execute LINE as a shell command, returning its status. */
101static int
102do_system (const char *line)
103{
104 int status;
105 pid_t pid;
106 struct sigaction sa;
107#ifndef _LIBC_REENTRANT
108 struct sigaction intr, quit;
109#endif
110 sigset_t omask;
111 sigset_t reset;
112
113 sa.sa_handler = SIG_IGN;
114 sa.sa_flags = 0;
115 __sigemptyset (&sa.sa_mask);
116
117 DO_LOCK ();
118 if (ADD_REF () == 0)
119 {
120 /* sigaction can not fail with SIGINT/SIGQUIT used with SIG_IGN. */
121 __sigaction (SIGINT, &sa, &intr);
122 __sigaction (SIGQUIT, &sa, &quit);
123 }
124 DO_UNLOCK ();
125
126 __sigaddset (&sa.sa_mask, SIGCHLD);
127 /* sigprocmask can not fail with SIG_BLOCK used with valid input
128 arguments. */
129 __sigprocmask (SIG_BLOCK, &sa.sa_mask, &omask);
130
131 __sigemptyset (&reset);
132 if (intr.sa_handler != SIG_IGN)
133 __sigaddset(&reset, SIGINT);
134 if (quit.sa_handler != SIG_IGN)
135 __sigaddset(&reset, SIGQUIT);
136
137 posix_spawnattr_t spawn_attr;
138 /* None of the posix_spawnattr_* function returns an error, including
139 posix_spawnattr_setflags for the follow specific usage (using valid
140 flags). */
141 __posix_spawnattr_init (&spawn_attr);
142 __posix_spawnattr_setsigmask (&spawn_attr, &omask);
143 __posix_spawnattr_setsigdefault (&spawn_attr, &reset);
144 __posix_spawnattr_setflags (&spawn_attr,
145 POSIX_SPAWN_SETSIGDEF | POSIX_SPAWN_SETSIGMASK);
146
147 status = __posix_spawn (&pid, SHELL_PATH, 0, &spawn_attr,
148 (char *const[]){ (char*) SHELL_NAME,
149 (char*) "-c",
150 (char *) line, NULL },
151 __environ);
152 __posix_spawnattr_destroy (&spawn_attr);
153
154 if (status == 0)
155 {
156 /* Cancellation results in cleanup handlers running as exceptions in
157 the block where they were installed, so it is safe to reference
158 stack variable allocate in the broader scope. */
159#if defined(_LIBC_REENTRANT) && defined(SIGCANCEL)
160 struct cancel_handler_args cancel_args =
161 {
162 .quit = &quit,
163 .intr = &intr,
164 .pid = pid
165 };
166 __libc_cleanup_region_start (1, cancel_handler, &cancel_args);
167#endif
168 /* Note the system() is a cancellation point. But since we call
169 waitpid() which itself is a cancellation point we do not
170 have to do anything here. */
171 if (TEMP_FAILURE_RETRY (__waitpid (pid, &status, 0)) != pid)
172 status = -1;
173#if defined(_LIBC_REENTRANT) && defined(SIGCANCEL)
174 __libc_cleanup_region_end (0);
175#endif
176 }
177
178 DO_LOCK ();
179 if (SUB_REF () == 0)
180 {
181 /* sigaction can not fail with SIGINT/SIGQUIT used with old
182 disposition. Same applies for sigprocmask. */
183 __sigaction (SIGINT, &intr, NULL);
184 __sigaction (SIGQUIT, &quit, NULL);
185 __sigprocmask (SIG_SETMASK, &omask, NULL);
186 }
187 DO_UNLOCK ();
188
189 return status;
190}
191
192int
193__libc_system (const char *line)
194{
195 if (line == NULL)
196 /* Check that we have a command processor available. It might
197 not be available after a chroot(), for example. */
198 return do_system ("exit 0") == 0;
199
200 return do_system (line);
201}
202weak_alias (__libc_system, system)
203