1 | #include "rxvtlib.h" |
1 | /*----------------------------------------------------------------------* |
2 | #include "rxvtdaemon.h" |
2 | * File: rxvtd.C |
3 | #include "iom.h" |
3 | *----------------------------------------------------------------------* |
|
|
4 | * |
|
|
5 | * All portions of code are copyright by their respective author/s. |
|
|
6 | * Copyright (c) 2003-2007 Marc Lehmann <schmorp@schmorp.de> |
|
|
7 | * |
|
|
8 | * This program is free software; you can redistribute it and/or modify |
|
|
9 | * it under the terms of the GNU General Public License as published by |
|
|
10 | * the Free Software Foundation; either version 3 of the License, or |
|
|
11 | * (at your option) any later version. |
|
|
12 | * |
|
|
13 | * This program is distributed in the hope that it will be useful, |
|
|
14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
|
15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|
|
16 | * GNU General Public License for more details. |
|
|
17 | * |
|
|
18 | * You should have received a copy of the GNU General Public License |
|
|
19 | * along with this program; if not, write to the Free Software |
|
|
20 | * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
|
|
21 | *----------------------------------------------------------------------*/ |
4 | |
22 | |
|
|
23 | #include "../config.h" |
5 | #include <cstdio> |
24 | #include <stdio.h> |
6 | #include <cstdlib> |
25 | #include <stdlib.h> |
7 | #include <cstdarg> |
26 | #include <stdarg.h> |
8 | #include <cstring> |
27 | #include <string.h> |
9 | |
28 | |
10 | #include <unistd.h> |
29 | #include <unistd.h> |
|
|
30 | #include <fcntl.h> |
11 | #include <sys/types.h> |
31 | #include <sys/types.h> |
12 | #include <sys/stat.h> |
32 | #include <sys/stat.h> |
13 | #include <sys/socket.h> |
33 | #include <sys/socket.h> |
14 | #include <sys/un.h> |
34 | #include <sys/un.h> |
15 | |
35 | |
|
|
36 | #if defined(ENABLE_FRILLS) && defined(_POSIX_MEMLOCK) && _POSIX_MEMLOCK > 0 |
|
|
37 | # define ENABLE_MLOCK 1 |
|
|
38 | #endif |
|
|
39 | |
|
|
40 | #if ENABLE_MLOCK |
|
|
41 | # include <sys/mman.h> |
|
|
42 | #endif |
|
|
43 | |
16 | #include <cerrno> |
44 | #include <errno.h> |
17 | |
45 | |
18 | extern char **environ; |
46 | #include "rxvt.h" |
|
|
47 | #include "rxvtdaemon.h" |
|
|
48 | #include "libptytty.h" |
19 | |
49 | |
20 | struct server : rxvt_connection { |
50 | struct server : rxvt_connection { |
|
|
51 | log_callback log_cb; |
|
|
52 | getfd_callback getfd_cb; |
|
|
53 | |
21 | void read_cb (io_watcher &w, short revents); io_watcher read_ev; |
54 | void read_cb (ev::io &w, int revents); ev::io read_ev; |
|
|
55 | void log_msg (const char *msg); |
|
|
56 | int getfd (int remote_fd); |
22 | |
57 | |
23 | server (int fd) |
58 | server (int fd) |
24 | : read_ev (this, &server::read_cb) |
|
|
25 | { |
59 | { |
|
|
60 | read_ev.set <server, &server::read_cb> (this); |
|
|
61 | log_cb.set <server, &server::log_msg> (this); |
|
|
62 | getfd_cb.set<server, &server::getfd> (this); |
|
|
63 | |
26 | this->fd = fd; |
64 | this->fd = fd; |
|
|
65 | fcntl (fd, F_SETFD, FD_CLOEXEC); |
|
|
66 | fcntl (fd, F_SETFL, 0); |
27 | read_ev.start (fd, EVENT_READ); |
67 | read_ev.start (fd, ev::READ); |
28 | } |
68 | } |
29 | |
69 | |
30 | void err (const char *format = 0, ...); |
70 | void err (const char *format = 0, ...); |
31 | }; |
71 | }; |
32 | |
72 | |
33 | struct unix_listener { |
73 | struct unix_listener { |
34 | int fd; |
74 | int fd; |
35 | |
75 | |
36 | void accept_cb (io_watcher &w, short revents); io_watcher accept_ev; |
76 | void accept_cb (ev::io &w, int revents); ev::io accept_ev; |
37 | |
77 | |
|
|
78 | unix_listener (int fd); |
38 | unix_listener (const char *sockname); |
79 | static int open (const char *sockname); |
39 | }; |
80 | }; |
40 | |
81 | |
|
|
82 | unix_listener::unix_listener (int fd) : fd (fd) |
|
|
83 | { |
|
|
84 | accept_ev.set<unix_listener, &unix_listener::accept_cb> (this); |
|
|
85 | fcntl (fd, F_SETFD, FD_CLOEXEC); |
|
|
86 | fcntl (fd, F_SETFL, O_NONBLOCK); |
|
|
87 | accept_ev.start (fd, ev::READ); |
|
|
88 | } |
|
|
89 | |
41 | unix_listener::unix_listener (const char *sockname) |
90 | int unix_listener::open (const char *sockname) |
42 | : accept_ev (this, &unix_listener::accept_cb) |
|
|
43 | { |
91 | { |
|
|
92 | sockaddr_un sa; |
|
|
93 | |
|
|
94 | if (strlen (sockname) >= sizeof(sa.sun_path)) |
|
|
95 | { |
|
|
96 | fputs ("socket name too long, aborting.\n", stderr); |
|
|
97 | exit (EXIT_FAILURE); |
|
|
98 | } |
|
|
99 | |
|
|
100 | int fd; |
44 | if ((fd = socket (PF_LOCAL, SOCK_STREAM, 0)) < 0) |
101 | if ((fd = socket (AF_UNIX, SOCK_STREAM, 0)) < 0) |
45 | { |
102 | { |
46 | perror ("unable to create listening socket"); |
103 | perror ("unable to create listening socket"); |
47 | exit (EXIT_FAILURE); |
104 | exit (EXIT_FAILURE); |
48 | } |
105 | } |
49 | |
|
|
50 | sockaddr_un sa; |
|
|
51 | |
106 | |
52 | sa.sun_family = AF_UNIX; |
107 | sa.sun_family = AF_UNIX; |
53 | strcpy (sa.sun_path, sockname); |
108 | strcpy (sa.sun_path, sockname); |
54 | |
109 | |
55 | unlink (rxvt_connection::unix_sockname ()); |
110 | unlink (sockname); |
56 | |
111 | |
57 | mode_t omask = umask (0077); |
112 | mode_t omask = umask (0077); |
58 | |
113 | |
59 | if (bind (fd, (sockaddr *)&sa, sizeof (sa))) |
114 | if (bind (fd, (sockaddr *)&sa, sizeof (sa))) |
60 | { |
115 | { |
… | |
… | |
68 | { |
123 | { |
69 | perror ("unable to listen on socket"); |
124 | perror ("unable to listen on socket"); |
70 | exit (EXIT_FAILURE); |
125 | exit (EXIT_FAILURE); |
71 | } |
126 | } |
72 | |
127 | |
73 | accept_ev.start (fd, EVENT_READ); |
128 | return fd; |
74 | } |
129 | } |
75 | |
130 | |
76 | void unix_listener::accept_cb (io_watcher &w, short revents) |
131 | void unix_listener::accept_cb (ev::io &w, int revents) |
77 | { |
132 | { |
78 | int fd2 = accept (fd, 0, 0); |
133 | int fd2 = accept (fd, 0, 0); |
79 | |
134 | |
80 | if (fd2 >= 0) |
135 | if (fd2 >= 0) |
81 | new server (fd2); |
136 | new server (fd2); |
|
|
137 | } |
|
|
138 | |
|
|
139 | int server::getfd (int remote_fd) |
|
|
140 | { |
|
|
141 | send ("GETFD"); |
|
|
142 | send (remote_fd); |
|
|
143 | return ptytty::recv_fd (fd); |
|
|
144 | } |
|
|
145 | |
|
|
146 | void server::log_msg (const char *msg) |
|
|
147 | { |
|
|
148 | send ("MSG"), send (msg); |
82 | } |
149 | } |
83 | |
150 | |
84 | void server::err (const char *format, ...) |
151 | void server::err (const char *format, ...) |
85 | { |
152 | { |
86 | if (format) |
153 | if (format) |
… | |
… | |
90 | va_list ap; |
157 | va_list ap; |
91 | va_start (ap, format); |
158 | va_start (ap, format); |
92 | vsnprintf (err, 1024, format, ap); |
159 | vsnprintf (err, 1024, format, ap); |
93 | va_end (ap); |
160 | va_end (ap); |
94 | |
161 | |
|
|
162 | log_msg (err); |
|
|
163 | } |
|
|
164 | |
95 | send ("ERR"), send (err); |
165 | send ("END"), send (0); |
96 | } |
|
|
97 | |
|
|
98 | close (fd); |
166 | close (fd); |
99 | delete this; |
167 | delete this; |
100 | } |
168 | } |
101 | |
169 | |
102 | void server::read_cb (io_watcher &w, short revents) |
170 | void server::read_cb (ev::io &w, int revents) |
103 | { |
171 | { |
104 | auto_str tok; |
172 | auto_str tok; |
105 | |
173 | |
106 | if (recv (tok)) |
174 | if (recv (tok)) |
107 | { |
175 | { |
108 | if (!strcmp (tok, "NEW")) |
176 | if (!strcmp (tok, "NEW")) |
109 | { |
177 | { |
110 | stringvec argv; |
178 | stringvec *argv = new stringvec; |
111 | stringvec envv; |
179 | stringvec *envv = new stringvec; |
112 | |
180 | |
113 | for (;;) |
181 | for (;;) |
114 | { |
182 | { |
115 | if (!recv (tok)) |
183 | if (!recv (tok)) |
116 | return err (); |
184 | return err (); |
117 | |
185 | |
118 | if (!strcmp (tok, "END")) |
186 | if (!strcmp (tok, "END")) |
119 | break; |
187 | break; |
120 | else if (!strcmp (tok, "ENV") && recv (tok)) |
188 | else if (!strcmp (tok, "ENV") && recv (tok)) |
121 | envv.push_back (tok.get ()); |
189 | envv->push_back (strdup (tok)); |
122 | else if (!strcmp (tok, "CWD") && recv (tok)) |
|
|
123 | { |
|
|
124 | if (chdir (tok)) |
|
|
125 | err ("unable to change to working directory to '%s': %s", |
|
|
126 | (char *)tok, strerror (errno)); |
|
|
127 | } |
|
|
128 | else if (!strcmp (tok, "ARG") && recv (tok)) |
190 | else if (!strcmp (tok, "ARG") && recv (tok)) |
129 | argv.push_back (tok.get ()); |
191 | argv->push_back (strdup (tok)); |
130 | else |
192 | else |
131 | return err ("protocol error: unexpected NEW token"); |
193 | return err ("protocol error: unexpected NEW token.\n"); |
132 | } |
194 | } |
133 | |
195 | |
134 | envv.push_back (0); |
|
|
135 | |
|
|
136 | { |
196 | { |
137 | char **old_environ = environ; |
197 | rxvt_term *term = new rxvt_term; |
138 | environ = envv.begin (); |
|
|
139 | |
198 | |
140 | rxvt_init (argv.size (), argv.begin ()); |
199 | term->log_hook = &log_cb; |
|
|
200 | term->getfd_hook = &getfd_cb; |
141 | |
201 | |
142 | environ = old_environ; |
202 | bool success = true; |
143 | envv.clear (); // can't yet save the env 'cause rxvt modifies it :( |
203 | |
|
|
204 | try |
|
|
205 | { |
|
|
206 | term->init (argv, envv); |
|
|
207 | } |
|
|
208 | catch (const class rxvt_failure_exception &e) |
|
|
209 | { |
|
|
210 | success = false; |
|
|
211 | } |
|
|
212 | |
|
|
213 | term->log_hook = 0; |
|
|
214 | |
|
|
215 | chdir ("/"); // init might change to different working directory |
|
|
216 | |
|
|
217 | if (!success) |
|
|
218 | term->destroy (); |
|
|
219 | |
|
|
220 | send ("END"); send (success ? 1 : 0); |
144 | } |
221 | } |
145 | } |
222 | } |
|
|
223 | else if (!strcmp (tok, "QUIT")) |
|
|
224 | _exit (0); |
146 | else |
225 | else |
147 | return err ("protocol error: request '%s' unsupported.", (char *)tok); |
226 | return err ("protocol error: request '%s' unsupported.\n", (char *)tok); |
148 | } |
227 | } |
149 | else |
228 | else |
150 | return err (); |
229 | return err (); |
151 | } |
230 | } |
152 | |
231 | |
|
|
232 | #ifdef ENABLE_FRILLS |
|
|
233 | enum { |
|
|
234 | SD_LISTEN_FDS_START = 3, |
|
|
235 | }; |
|
|
236 | |
|
|
237 | // https://www.freedesktop.org/software/systemd/man/sd_listen_fds.html |
|
|
238 | // https://github.com/systemd/systemd/blob/main/src/libsystemd/sd-daemon/sd-daemon.c |
|
|
239 | static int get_listen_fds () |
|
|
240 | { |
|
|
241 | const char *listen_pid = getenv ("LISTEN_PID"); |
|
|
242 | if (!listen_pid) |
|
|
243 | return 0; |
|
|
244 | |
|
|
245 | char *end; |
|
|
246 | errno = 0; |
|
|
247 | long pid = strtol (listen_pid, &end, 10); |
|
|
248 | if (errno || end == listen_pid || *end) |
|
|
249 | return -1; |
|
|
250 | |
|
|
251 | if (getpid () != pid) |
|
|
252 | return 0; |
|
|
253 | |
|
|
254 | const char *listen_fds = getenv ("LISTEN_FDS"); |
|
|
255 | if (!listen_fds) |
|
|
256 | return 0; |
|
|
257 | |
|
|
258 | errno = 0; |
|
|
259 | long n = strtol (listen_fds, &end, 10); |
|
|
260 | if (errno || end == listen_fds || *end) |
|
|
261 | return -1; |
|
|
262 | |
|
|
263 | if (n <= 0 || n > INT_MAX - SD_LISTEN_FDS_START) |
|
|
264 | return -1; |
|
|
265 | |
|
|
266 | unsetenv ("LISTEN_PID"); |
|
|
267 | unsetenv ("LISTEN_FDS"); |
|
|
268 | unsetenv ("LISTEN_FDNAMES"); |
|
|
269 | |
|
|
270 | return n; |
|
|
271 | } |
|
|
272 | #endif |
|
|
273 | |
153 | int |
274 | int |
154 | main(int argc, const char *const *argv) |
275 | main (int argc, char *argv[]) |
155 | { |
276 | { |
|
|
277 | ptytty::init (); |
|
|
278 | |
|
|
279 | static char opt_fork, opt_opendisplay, opt_quiet; |
|
|
280 | #if ENABLE_PERL |
|
|
281 | static char *opt_eval; |
|
|
282 | #endif |
|
|
283 | #if ENABLE_MLOCK |
|
|
284 | static char opt_lock; |
|
|
285 | #endif |
|
|
286 | |
|
|
287 | for (int i = 1; i < argc; i++) |
156 | { |
288 | { |
157 | sigset_t ss; |
289 | if (!strcmp (argv [i], "-f") || !strcmp (argv [i], "--fork")) |
158 | |
290 | opt_fork = 1; |
159 | sigaddset (&ss, SIGHUP); |
291 | else if (!strcmp (argv [i], "-o") || !strcmp (argv [i], "--opendisplay")) |
160 | sigaddset (&ss, SIGPIPE); |
292 | opt_opendisplay = 1; |
161 | sigprocmask (SIG_BLOCK, &ss, 0); |
293 | else if (!strcmp (argv [i], "-q") || !strcmp (argv [i], "--quiet")) |
|
|
294 | opt_quiet = 1; |
|
|
295 | #if ENABLE_MLOCK |
|
|
296 | else if (!strcmp (argv [i], "-m") || !strcmp (argv [i], "--mlock")) |
|
|
297 | opt_lock = 1; |
|
|
298 | #endif |
|
|
299 | #if ENABLE_PERL |
|
|
300 | else if (!strcmp (argv [i], "-e") || !strcmp (argv [i], "--eval")) |
|
|
301 | opt_eval = argv [++i]; |
|
|
302 | #endif |
|
|
303 | else |
|
|
304 | { |
|
|
305 | rxvt_log ("%s: unknown option '%s', aborting.\n", argv [0], argv [i]); |
|
|
306 | return EXIT_FAILURE; |
|
|
307 | } |
162 | } |
308 | } |
163 | |
309 | |
164 | rxvt_init_signals (); |
310 | rxvt_init (); |
165 | |
311 | |
|
|
312 | #if ENABLE_PERL |
|
|
313 | if (opt_eval) |
|
|
314 | { |
|
|
315 | rxvt_perl.init (); |
|
|
316 | rxvt_perl.eval (opt_eval); |
|
|
317 | } |
|
|
318 | #endif |
|
|
319 | |
|
|
320 | // optionally open display and never release it. |
|
|
321 | if (opt_opendisplay) |
|
|
322 | if (const char *dpy = getenv ("DISPLAY")) |
|
|
323 | displays.get (dpy ? dpy : ":0"); // move string logic into rxvt_display maybe? |
|
|
324 | |
|
|
325 | int fd; |
|
|
326 | #ifdef ENABLE_FRILLS |
|
|
327 | int n = get_listen_fds (); |
|
|
328 | if (n > 1) |
|
|
329 | { |
|
|
330 | fputs ("received multiple file descriptors, aborting.\n", stderr); |
|
|
331 | exit (EXIT_FAILURE); |
|
|
332 | } |
|
|
333 | else if (n == 1) |
|
|
334 | { |
|
|
335 | fd = SD_LISTEN_FDS_START; |
|
|
336 | if (!opt_quiet) |
|
|
337 | { |
|
|
338 | printf ("rxvt-unicode daemon listening on fd.\n"); |
|
|
339 | fflush (stdout); |
|
|
340 | } |
|
|
341 | } |
|
|
342 | else |
|
|
343 | #endif |
|
|
344 | { |
166 | char *sockname = rxvt_connection::unix_sockname (); |
345 | char *sockname = rxvt_connection::unix_sockname (); |
167 | unix_listener l (sockname); |
346 | fd = unix_listener::open (sockname); |
|
|
347 | if (!opt_quiet) |
|
|
348 | { |
168 | printf ("rxvtd listening on %s.\n", sockname); |
349 | printf ("rxvt-unicode daemon listening on %s.\n", sockname); |
|
|
350 | fflush (stdout); |
|
|
351 | } |
169 | free (sockname); |
352 | free (sockname); |
|
|
353 | } |
170 | |
354 | |
171 | iom.loop (); |
355 | unix_listener l (fd); |
172 | |
356 | |
173 | #if 0 |
357 | chdir ("/"); |
174 | if (rxvt_init(argc, argv) == NULL) |
358 | |
|
|
359 | pid_t pid = 0; |
|
|
360 | if (opt_fork) |
|
|
361 | { |
|
|
362 | pid = fork (); |
|
|
363 | } |
|
|
364 | |
|
|
365 | #if ENABLE_MLOCK |
|
|
366 | // Optionally perform an mlockall so this process does not get swapped out. |
|
|
367 | if (opt_lock && !pid) |
|
|
368 | if (mlockall (MCL_CURRENT | MCL_FUTURE) < 0) |
|
|
369 | perror ("unable to lock into ram"); |
|
|
370 | #endif |
|
|
371 | |
|
|
372 | if (opt_fork) |
|
|
373 | { |
|
|
374 | if (pid < 0) |
|
|
375 | { |
|
|
376 | rxvt_log ("unable to fork daemon, aborting.\n"); |
175 | return EXIT_FAILURE; |
377 | return EXIT_FAILURE; |
|
|
378 | } |
|
|
379 | else if (pid > 0) |
|
|
380 | _exit (EXIT_SUCCESS); |
176 | |
381 | |
177 | dR; |
382 | ev_loop_fork (EV_DEFAULT_UC); |
178 | rxvt_main_loop(aR); /* main processing loop */ |
383 | } |
179 | #endif |
384 | |
|
|
385 | ev_run (); |
|
|
386 | |
180 | return EXIT_SUCCESS; |
387 | return EXIT_SUCCESS; |
181 | } |
388 | } |
|
|
389 | |