xref: /freebsd/usr.sbin/ppp/exec.c (revision daf1cffce2e07931f27c6c6998652e90df6ba87e)
1 /*-
2  * Copyright (c) 1999 Brian Somers <brian@Awfulhak.org>
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $FreeBSD$
27  */
28 
29 #include <sys/param.h>
30 #include <sys/socket.h>
31 #include <sys/un.h>
32 
33 #include <errno.h>
34 #include <fcntl.h>
35 #include <stdio.h>
36 #include <stdlib.h>
37 #include <string.h>
38 #include <sys/wait.h>
39 #include <sys/uio.h>
40 #include <termios.h>
41 #include <unistd.h>
42 
43 #include "layer.h"
44 #include "defs.h"
45 #include "mbuf.h"
46 #include "log.h"
47 #include "timer.h"
48 #include "lqr.h"
49 #include "hdlc.h"
50 #include "throughput.h"
51 #include "fsm.h"
52 #include "lcp.h"
53 #include "ccp.h"
54 #include "link.h"
55 #include "async.h"
56 #include "descriptor.h"
57 #include "physical.h"
58 #include "mp.h"
59 #include "chat.h"
60 #include "command.h"
61 #include "auth.h"
62 #include "chap.h"
63 #include "cbcp.h"
64 #include "datalink.h"
65 #include "id.h"
66 #include "exec.h"
67 
68 static struct device execdevice = {
69   EXEC_DEVICE,
70   "exec",
71   { CD_NOTREQUIRED, 0 },
72   NULL,
73   NULL,
74   NULL,
75   NULL,
76   NULL,
77   NULL,
78   NULL,
79   NULL,
80   NULL,
81   NULL,
82   NULL,
83   NULL
84 };
85 
86 struct device *
87 exec_iov2device(int type, struct physical *p, struct iovec *iov,
88                 int *niov, int maxiov, int *auxfd, int *nauxfd)
89 {
90   if (type == EXEC_DEVICE) {
91     free(iov[(*niov)++].iov_base);
92     physical_SetupStack(p, execdevice.name, PHYSICAL_FORCE_ASYNC);
93     return &execdevice;
94   }
95 
96   return NULL;
97 }
98 
99 struct device *
100 exec_Create(struct physical *p)
101 {
102   if (p->fd < 0 && *p->name.full == '!') {
103     int fids[2];
104 
105     p->fd--;	/* We own the device but maybe can't use it - change fd */
106 
107     if (socketpair(AF_UNIX, SOCK_STREAM, PF_UNSPEC, fids) < 0)
108       log_Printf(LogPHASE, "Unable to create pipe for line exec: %s\n",
109 	         strerror(errno));
110     else {
111       int stat, argc, i;
112       pid_t pid, realpid;
113       char *argv[MAXARGS];
114 
115       stat = fcntl(fids[0], F_GETFL, 0);
116       if (stat > 0) {
117         stat |= O_NONBLOCK;
118         fcntl(fids[0], F_SETFL, stat);
119       }
120       realpid = getpid();
121       switch ((pid = fork())) {
122         case -1:
123           log_Printf(LogPHASE, "Unable to create pipe for line exec: %s\n",
124 	             strerror(errno));
125           break;
126 
127         case  0:
128           close(fids[0]);
129           timer_TermService();
130           setuid(ID0realuid());
131 
132           switch (fork()) {
133             case 0:
134               break;
135 
136             case -1:
137               log_Printf(LogPHASE, "Unable to fork to drop parent: %s\n",
138 	                 strerror(errno));
139             default:
140               _exit(127);
141           }
142 
143           log_Printf(LogDEBUG, "Exec'ing ``%s''\n", p->name.base);
144 
145           if ((argc = MakeArgs(p->name.base, argv, VECSIZE(argv),
146                                PARSE_REDUCE|PARSE_NOHASH)) < 0) {
147             log_Printf(LogWARN, "Syntax error in exec command\n");
148             _exit(127);
149           }
150 
151           command_Expand(argv, argc, (char const *const *)argv,
152                          p->dl->bundle, 0, realpid);
153 
154           dup2(fids[1], STDIN_FILENO);
155           dup2(fids[1], STDOUT_FILENO);
156           dup2(fids[1], STDERR_FILENO);
157           for (i = getdtablesize(); i > STDERR_FILENO; i--)
158             fcntl(i, F_SETFD, 1);
159 
160           execvp(*argv, argv);
161           printf("execvp failed: %s: %s\r\n", *argv, strerror(errno));
162           _exit(127);
163           break;
164 
165         default:
166           close(fids[1]);
167           p->fd = fids[0];
168           waitpid(pid, &stat, 0);
169           log_Printf(LogDEBUG, "Using descriptor %d for child\n", p->fd);
170           physical_SetupStack(p, execdevice.name, PHYSICAL_FORCE_ASYNC);
171           if (p->cfg.cd.necessity != CD_DEFAULT)
172             log_Printf(LogWARN, "Carrier settings ignored\n");
173           return &execdevice;
174       }
175     }
176   }
177 
178   return NULL;
179 }
180