execve implementation for Linux w/ linuxthreads.
[kopensolaris-gnu/glibc.git] / linuxthreads / sysdeps / unix / sysv / linux / execve.c
1 /* Copyright (C) 1999, 2000, 2002 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, write to the Free
16    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
17    02111-1307 USA.  */
18
19 #include <errno.h>
20 #include <unistd.h>
21
22 #include <sysdep.h>
23 #include <alloca.h>
24 #include <sys/syscall.h>
25 #include <bp-checks.h>
26
27 extern int __syscall_execve (const char *__unbounded file,
28                              char *__unbounded const *__unbounded argv,
29                              char *__unbounded const *__unbounded envp);
30 extern void __pthread_kill_other_threads_np (void);
31 weak_extern (__pthread_kill_other_threads_np)
32
33
34 int
35 __execve (file, argv, envp)
36      const char *file;
37      char *const argv[];
38      char *const envp[];
39 {
40   /* If this is a threaded application kill all other threads.  */
41   if (__pthread_kill_other_threads_np)
42     __pthread_kill_other_threads_np ();
43 #if __BOUNDED_POINTERS__
44   {
45     char *const *v;
46     int i;
47     char *__unbounded *__unbounded ubp_argv;
48     char *__unbounded *__unbounded ubp_envp;
49     char *__unbounded *__unbounded ubp_v;
50
51     for (v = argv; *v; v++)
52       ;
53     i = v - argv + 1;
54     ubp_argv = (char *__unbounded *__unbounded) alloca (sizeof (*ubp_argv) * i);
55     for (v = argv, ubp_v = ubp_argv; --i; v++, ubp_v++)
56       *ubp_v = CHECK_STRING (*v);
57     *ubp_v = 0;
58
59     for (v = envp; *v; v++)
60       ;
61     i = v - envp + 1;
62     ubp_envp = (char *__unbounded *__unbounded) alloca (sizeof (*ubp_envp) * i);
63     for (v = envp, ubp_v = ubp_envp; --i; v++, ubp_v++)
64       *ubp_v = CHECK_STRING (*v);
65     *ubp_v = 0;
66
67     return INLINE_SYSCALL (execve, 3, CHECK_STRING (file), ubp_argv, ubp_envp);
68   }
69 #else
70   return INLINE_SYSCALL (execve, 3, file, argv, envp);
71 #endif
72 }
73 weak_alias (__execve, execve)