rev |
line source |
meillo@0
|
1 /* This a snippet I found in sourceforge. I just changed the identing
|
meillo@0
|
2 style to my own and deleted the main function. */
|
meillo@0
|
3
|
meillo@0
|
4 #include <errno.h>
|
meillo@0
|
5 #include <stdio.h>
|
meillo@0
|
6 #include <stdlib.h>
|
meillo@0
|
7 #include <unistd.h>
|
meillo@0
|
8 #include <string.h>
|
meillo@0
|
9 #include <sys/types.h>
|
meillo@15
|
10 #include <sysexits.h>
|
meillo@0
|
11
|
meillo@0
|
12 #include "peopen.h"
|
meillo@0
|
13 #include "masqmail.h"
|
meillo@0
|
14
|
meillo@10
|
15 static void
|
meillo@10
|
16 destroy_argv(char **arr)
|
meillo@0
|
17 {
|
meillo@10
|
18 char *p = arr[0];
|
meillo@10
|
19 int i = 0;
|
meillo@0
|
20
|
meillo@10
|
21 while (p) {
|
meillo@10
|
22 free(p);
|
meillo@10
|
23 p = arr[i++];
|
meillo@10
|
24 }
|
meillo@10
|
25 free(arr);
|
meillo@0
|
26 }
|
meillo@0
|
27
|
meillo@10
|
28 static char**
|
meillo@10
|
29 create_argv(const char *cmd, int count)
|
meillo@0
|
30 {
|
meillo@10
|
31 char buf[strlen(cmd) + 1];
|
meillo@10
|
32 char **arr, *q;
|
meillo@10
|
33 const char *p;
|
meillo@10
|
34 int i = 0;
|
meillo@0
|
35
|
meillo@10
|
36 arr = (char **) malloc(sizeof(char *) * count);
|
meillo@15
|
37 /* FIXME: check return value of malloc() */
|
meillo@0
|
38
|
meillo@10
|
39 p = cmd;
|
meillo@10
|
40 while (*p && i < (count - 1)) {
|
meillo@10
|
41 while (*p && isspace(*p))
|
meillo@10
|
42 p++;
|
meillo@10
|
43 q = buf;
|
meillo@10
|
44 while (*p && !isspace(*p))
|
meillo@10
|
45 *q++ = *p++;
|
meillo@15
|
46 *q = '\0';
|
meillo@10
|
47 arr[i++] = strdup(buf);
|
meillo@10
|
48 while (*p && isspace(*p))
|
meillo@10
|
49 p++;
|
meillo@10
|
50 }
|
meillo@10
|
51 arr[i] = NULL;
|
meillo@10
|
52
|
meillo@10
|
53 return arr;
|
meillo@0
|
54 }
|
meillo@0
|
55
|
meillo@10
|
56 FILE*
|
meillo@10
|
57 peidopen(const char *command, const char *type, char *const envp[], int *ret_pid, uid_t uid, gid_t gid)
|
meillo@0
|
58 {
|
meillo@10
|
59 enum { Read, Write } mode;
|
meillo@10
|
60 int pipe_fd[2];
|
meillo@10
|
61 pid_t pid;
|
meillo@0
|
62
|
meillo@10
|
63 if (command == NULL || type == NULL) {
|
meillo@10
|
64 errno = EINVAL;
|
meillo@10
|
65 return NULL;
|
meillo@10
|
66 }
|
meillo@0
|
67
|
meillo@10
|
68 if (strcmp(type, "r")) {
|
meillo@10
|
69 if (strcmp(type, "w")) {
|
meillo@10
|
70 errno = EINVAL;
|
meillo@10
|
71 return NULL;
|
meillo@10
|
72 } else
|
meillo@10
|
73 mode = Write;
|
meillo@10
|
74 } else
|
meillo@10
|
75 mode = Read;
|
meillo@0
|
76
|
meillo@10
|
77 if (pipe(pipe_fd) == -1)
|
meillo@10
|
78 return NULL;
|
meillo@0
|
79
|
meillo@10
|
80 switch (pid = fork()) {
|
meillo@10
|
81 case 0: /* child thread */
|
meillo@0
|
82
|
meillo@10
|
83 {
|
meillo@10
|
84 int i, max_fd = sysconf(_SC_OPEN_MAX);
|
meillo@10
|
85
|
meillo@10
|
86 if (max_fd <= 0)
|
meillo@10
|
87 max_fd = 64;
|
meillo@10
|
88 for (i = 0; i < max_fd; i++)
|
meillo@10
|
89 if ((i != pipe_fd[0]) && (i != pipe_fd[1]))
|
meillo@10
|
90 close(i);
|
meillo@10
|
91 }
|
meillo@10
|
92 if (close(pipe_fd[mode == Read ? 0 : 1]) != -1 &&
|
meillo@10
|
93 dup2(pipe_fd[mode == Read ? 1 : 0],
|
meillo@10
|
94 mode == Read ? STDOUT_FILENO : STDIN_FILENO) != -1) {
|
meillo@10
|
95 // char *argv [] = { "/bin/sh", "-c", (char*) command, NULL };
|
meillo@10
|
96 char **argv = create_argv(command, 10);
|
meillo@10
|
97 int ret;
|
meillo@10
|
98
|
meillo@10
|
99 if (uid != (uid_t) - 1) {
|
meillo@10
|
100 if ((ret = seteuid(0)) != 0) {
|
meillo@10
|
101 exit(EX_NOPERM);
|
meillo@10
|
102 }
|
meillo@10
|
103 }
|
meillo@10
|
104 if (gid != (gid_t) - 1) {
|
meillo@10
|
105 if ((ret = setgid(gid)) != 0) {
|
meillo@10
|
106 exit(EX_NOPERM);
|
meillo@10
|
107 }
|
meillo@10
|
108 }
|
meillo@10
|
109 if (uid != (uid_t) - 1) {
|
meillo@10
|
110 if ((ret = setuid(uid)) != 0) {
|
meillo@10
|
111 exit(EX_NOPERM);
|
meillo@10
|
112 }
|
meillo@10
|
113 }
|
meillo@10
|
114 execve(*argv, argv, envp);
|
meillo@10
|
115 }
|
meillo@10
|
116
|
meillo@10
|
117 _exit(errno);
|
meillo@10
|
118
|
meillo@10
|
119 default: /* parent thread */
|
meillo@10
|
120 *ret_pid = pid;
|
meillo@10
|
121 close(pipe_fd[mode == Read ? 1 : 0]);
|
meillo@10
|
122 return fdopen(pipe_fd[mode == Read ? 0 : 1], type);
|
meillo@10
|
123
|
meillo@10
|
124 case -1:
|
meillo@10
|
125 close(pipe_fd[0]);
|
meillo@10
|
126 close(pipe_fd[1]);
|
meillo@10
|
127 return NULL;
|
meillo@0
|
128 }
|
meillo@0
|
129 }
|
meillo@0
|
130
|
meillo@10
|
131 FILE*
|
meillo@10
|
132 peopen(const char *command, const char *type, char *const envp[], int *ret_pid)
|
meillo@0
|
133 {
|
meillo@10
|
134 return peidopen(command, type, envp, ret_pid, -1, -1);
|
meillo@0
|
135 }
|