1 /* SPDX-License-Identifier: LGPL-2.1-or-later */
2 
3 #include <endian.h>
4 #include <poll.h>
5 #include <stdlib.h>
6 #include <unistd.h>
7 
8 #include "sd-bus.h"
9 #include "sd-daemon.h"
10 
11 #include "alloc-util.h"
12 #include "bus-internal.h"
13 #include "bus-message.h"
14 #include "bus-socket.h"
15 #include "escape.h"
16 #include "fd-util.h"
17 #include "format-util.h"
18 #include "fs-util.h"
19 #include "hexdecoct.h"
20 #include "io-util.h"
21 #include "macro.h"
22 #include "memory-util.h"
23 #include "path-util.h"
24 #include "process-util.h"
25 #include "rlimit-util.h"
26 #include "signal-util.h"
27 #include "stdio-util.h"
28 #include "string-util.h"
29 #include "user-util.h"
30 #include "utf8.h"
31 
32 #define SNDBUF_SIZE (8*1024*1024)
33 
iovec_advance(struct iovec iov[],unsigned * idx,size_t size)34 static void iovec_advance(struct iovec iov[], unsigned *idx, size_t size) {
35 
36         while (size > 0) {
37                 struct iovec *i = iov + *idx;
38 
39                 if (i->iov_len > size) {
40                         i->iov_base = (uint8_t*) i->iov_base + size;
41                         i->iov_len -= size;
42                         return;
43                 }
44 
45                 size -= i->iov_len;
46 
47                 *i = IOVEC_MAKE(NULL, 0);
48 
49                 (*idx)++;
50         }
51 }
52 
append_iovec(sd_bus_message * m,const void * p,size_t sz)53 static int append_iovec(sd_bus_message *m, const void *p, size_t sz) {
54         assert(m);
55         assert(p);
56         assert(sz > 0);
57 
58         m->iovec[m->n_iovec++] = IOVEC_MAKE((void*) p, sz);
59 
60         return 0;
61 }
62 
bus_message_setup_iovec(sd_bus_message * m)63 static int bus_message_setup_iovec(sd_bus_message *m) {
64         struct bus_body_part *part;
65         unsigned n, i;
66         int r;
67 
68         assert(m);
69         assert(m->sealed);
70 
71         if (m->n_iovec > 0)
72                 return 0;
73 
74         assert(!m->iovec);
75 
76         n = 1 + m->n_body_parts;
77         if (n < ELEMENTSOF(m->iovec_fixed))
78                 m->iovec = m->iovec_fixed;
79         else {
80                 m->iovec = new(struct iovec, n);
81                 if (!m->iovec) {
82                         r = -ENOMEM;
83                         goto fail;
84                 }
85         }
86 
87         r = append_iovec(m, m->header, BUS_MESSAGE_BODY_BEGIN(m));
88         if (r < 0)
89                 goto fail;
90 
91         MESSAGE_FOREACH_PART(part, i, m)  {
92                 r = bus_body_part_map(part);
93                 if (r < 0)
94                         goto fail;
95 
96                 r = append_iovec(m, part->data, part->size);
97                 if (r < 0)
98                         goto fail;
99         }
100 
101         assert(n == m->n_iovec);
102 
103         return 0;
104 
105 fail:
106         m->poisoned = true;
107         return r;
108 }
109 
bus_socket_auth_needs_write(sd_bus * b)110 bool bus_socket_auth_needs_write(sd_bus *b) {
111 
112         unsigned i;
113 
114         if (b->auth_index >= ELEMENTSOF(b->auth_iovec))
115                 return false;
116 
117         for (i = b->auth_index; i < ELEMENTSOF(b->auth_iovec); i++) {
118                 struct iovec *j = b->auth_iovec + i;
119 
120                 if (j->iov_len > 0)
121                         return true;
122         }
123 
124         return false;
125 }
126 
bus_socket_write_auth(sd_bus * b)127 static int bus_socket_write_auth(sd_bus *b) {
128         ssize_t k;
129 
130         assert(b);
131         assert(b->state == BUS_AUTHENTICATING);
132 
133         if (!bus_socket_auth_needs_write(b))
134                 return 0;
135 
136         if (b->prefer_writev)
137                 k = writev(b->output_fd, b->auth_iovec + b->auth_index, ELEMENTSOF(b->auth_iovec) - b->auth_index);
138         else {
139                 struct msghdr mh = {
140                         .msg_iov = b->auth_iovec + b->auth_index,
141                         .msg_iovlen = ELEMENTSOF(b->auth_iovec) - b->auth_index,
142                 };
143 
144                 k = sendmsg(b->output_fd, &mh, MSG_DONTWAIT|MSG_NOSIGNAL);
145                 if (k < 0 && errno == ENOTSOCK) {
146                         b->prefer_writev = true;
147                         k = writev(b->output_fd, b->auth_iovec + b->auth_index, ELEMENTSOF(b->auth_iovec) - b->auth_index);
148                 }
149         }
150 
151         if (k < 0)
152                 return ERRNO_IS_TRANSIENT(errno) ? 0 : -errno;
153 
154         iovec_advance(b->auth_iovec, &b->auth_index, (size_t) k);
155         return 1;
156 }
157 
bus_socket_auth_verify_client(sd_bus * b)158 static int bus_socket_auth_verify_client(sd_bus *b) {
159         char *d, *e, *f, *start;
160         sd_id128_t peer;
161         int r;
162 
163         assert(b);
164 
165         /*
166          * We expect three response lines:
167          *   "DATA\r\n"
168          *   "OK <server-id>\r\n"
169          *   "AGREE_UNIX_FD\r\n"        (optional)
170          */
171 
172         d = memmem_safe(b->rbuffer, b->rbuffer_size, "\r\n", 2);
173         if (!d)
174                 return 0;
175 
176         e = memmem_safe(d + 2, b->rbuffer_size - (d - (char*) b->rbuffer) - 2, "\r\n", 2);
177         if (!e)
178                 return 0;
179 
180         if (b->accept_fd) {
181                 f = memmem_safe(e + 2, b->rbuffer_size - (e - (char*) b->rbuffer) - 2, "\r\n", 2);
182                 if (!f)
183                         return 0;
184 
185                 start = f + 2;
186         } else {
187                 f = NULL;
188                 start = e + 2;
189         }
190 
191         /* Nice! We got all the lines we need. First check the DATA line. */
192 
193         if (d - (char*) b->rbuffer == 4) {
194                 if (memcmp(b->rbuffer, "DATA", 4))
195                         return -EPERM;
196         } else if (d - (char*) b->rbuffer == 3 + 32) {
197                 /*
198                  * Old versions of the server-side implementation of `sd-bus` replied with "OK <id>" to
199                  * "AUTH" requests from a client, even if the "AUTH" line did not contain inlined
200                  * arguments. Therefore, we also accept "OK <id>" here, even though it is technically the
201                  * wrong reply. We ignore the "<id>" parameter, though, since it has no real value.
202                  */
203                 if (memcmp(b->rbuffer, "OK ", 3))
204                         return -EPERM;
205         } else
206                 return -EPERM;
207 
208         /* Now check the OK line. */
209 
210         if (e - d != 2 + 3 + 32)
211                 return -EPERM;
212 
213         if (memcmp(d + 2, "OK ", 3))
214                 return -EPERM;
215 
216         b->auth = b->anonymous_auth ? BUS_AUTH_ANONYMOUS : BUS_AUTH_EXTERNAL;
217 
218         for (unsigned i = 0; i < 32; i += 2) {
219                 int x, y;
220 
221                 x = unhexchar(d[2 + 3 + i]);
222                 y = unhexchar(d[2 + 3 + i + 1]);
223 
224                 if (x < 0 || y < 0)
225                         return -EINVAL;
226 
227                 peer.bytes[i/2] = ((uint8_t) x << 4 | (uint8_t) y);
228         }
229 
230         if (!sd_id128_is_null(b->server_id) &&
231             !sd_id128_equal(b->server_id, peer))
232                 return -EPERM;
233 
234         b->server_id = peer;
235 
236         /* And possibly check the third line, too */
237 
238         if (f)
239                 b->can_fds =
240                         (f - e == STRLEN("\r\nAGREE_UNIX_FD")) &&
241                         memcmp(e + 2, "AGREE_UNIX_FD",
242                                STRLEN("AGREE_UNIX_FD")) == 0;
243 
244         b->rbuffer_size -= (start - (char*) b->rbuffer);
245         memmove(b->rbuffer, start, b->rbuffer_size);
246 
247         r = bus_start_running(b);
248         if (r < 0)
249                 return r;
250 
251         return 1;
252 }
253 
line_equals(const char * s,size_t m,const char * line)254 static bool line_equals(const char *s, size_t m, const char *line) {
255         size_t l;
256 
257         l = strlen(line);
258         if (l != m)
259                 return false;
260 
261         return memcmp(s, line, l) == 0;
262 }
263 
line_begins(const char * s,size_t m,const char * word)264 static bool line_begins(const char *s, size_t m, const char *word) {
265         const char *p;
266 
267         p = memory_startswith(s, m, word);
268         return p && (p == (s + m) || *p == ' ');
269 }
270 
verify_anonymous_token(sd_bus * b,const char * p,size_t l)271 static int verify_anonymous_token(sd_bus *b, const char *p, size_t l) {
272         _cleanup_free_ char *token = NULL;
273         size_t len;
274         int r;
275 
276         if (!b->anonymous_auth)
277                 return 0;
278 
279         if (l <= 0)
280                 return 1;
281 
282         assert(p[0] == ' ');
283         p++; l--;
284 
285         if (l % 2 != 0)
286                 return 0;
287 
288         r = unhexmem(p, l, (void **) &token, &len);
289         if (r < 0)
290                 return 0;
291 
292         if (memchr(token, 0, len))
293                 return 0;
294 
295         return !!utf8_is_valid(token);
296 }
297 
verify_external_token(sd_bus * b,const char * p,size_t l)298 static int verify_external_token(sd_bus *b, const char *p, size_t l) {
299         _cleanup_free_ char *token = NULL;
300         size_t len;
301         uid_t u;
302         int r;
303 
304         /* We don't do any real authentication here. Instead, if
305          * the owner of this bus wanted authentication they should have
306          * checked SO_PEERCRED before even creating the bus object. */
307 
308         if (!b->anonymous_auth && !b->ucred_valid)
309                 return 0;
310 
311         if (l <= 0)
312                 return 1;
313 
314         assert(p[0] == ' ');
315         p++; l--;
316 
317         if (l % 2 != 0)
318                 return 0;
319 
320         r = unhexmem(p, l, (void**) &token, &len);
321         if (r < 0)
322                 return 0;
323 
324         if (memchr(token, 0, len))
325                 return 0;
326 
327         r = parse_uid(token, &u);
328         if (r < 0)
329                 return 0;
330 
331         /* We ignore the passed value if anonymous authentication is
332          * on anyway. */
333         if (!b->anonymous_auth && u != b->ucred.uid)
334                 return 0;
335 
336         return 1;
337 }
338 
bus_socket_auth_write(sd_bus * b,const char * t)339 static int bus_socket_auth_write(sd_bus *b, const char *t) {
340         char *p;
341         size_t l;
342 
343         assert(b);
344         assert(t);
345 
346         /* We only make use of the first iovec */
347         assert(IN_SET(b->auth_index, 0, 1));
348 
349         l = strlen(t);
350         p = malloc(b->auth_iovec[0].iov_len + l);
351         if (!p)
352                 return -ENOMEM;
353 
354         memcpy_safe(p, b->auth_iovec[0].iov_base, b->auth_iovec[0].iov_len);
355         memcpy(p + b->auth_iovec[0].iov_len, t, l);
356 
357         b->auth_iovec[0].iov_base = p;
358         b->auth_iovec[0].iov_len += l;
359 
360         free(b->auth_buffer);
361         b->auth_buffer = p;
362         b->auth_index = 0;
363         return 0;
364 }
365 
bus_socket_auth_write_ok(sd_bus * b)366 static int bus_socket_auth_write_ok(sd_bus *b) {
367         char t[3 + 32 + 2 + 1];
368 
369         assert(b);
370 
371         xsprintf(t, "OK " SD_ID128_FORMAT_STR "\r\n", SD_ID128_FORMAT_VAL(b->server_id));
372 
373         return bus_socket_auth_write(b, t);
374 }
375 
bus_socket_auth_verify_server(sd_bus * b)376 static int bus_socket_auth_verify_server(sd_bus *b) {
377         char *e;
378         const char *line;
379         size_t l;
380         bool processed = false;
381         int r;
382 
383         assert(b);
384 
385         if (b->rbuffer_size < 1)
386                 return 0;
387 
388         /* First char must be a NUL byte */
389         if (*(char*) b->rbuffer != 0)
390                 return -EIO;
391 
392         if (b->rbuffer_size < 3)
393                 return 0;
394 
395         /* Begin with the first line */
396         if (b->auth_rbegin <= 0)
397                 b->auth_rbegin = 1;
398 
399         for (;;) {
400                 /* Check if line is complete */
401                 line = (char*) b->rbuffer + b->auth_rbegin;
402                 e = memmem_safe(line, b->rbuffer_size - b->auth_rbegin, "\r\n", 2);
403                 if (!e)
404                         return processed;
405 
406                 l = e - line;
407 
408                 if (line_begins(line, l, "AUTH ANONYMOUS")) {
409 
410                         r = verify_anonymous_token(b,
411                                                    line + strlen("AUTH ANONYMOUS"),
412                                                    l - strlen("AUTH ANONYMOUS"));
413                         if (r < 0)
414                                 return r;
415                         if (r == 0)
416                                 r = bus_socket_auth_write(b, "REJECTED\r\n");
417                         else {
418                                 b->auth = BUS_AUTH_ANONYMOUS;
419                                 if (l <= strlen("AUTH ANONYMOUS"))
420                                         r = bus_socket_auth_write(b, "DATA\r\n");
421                                 else
422                                         r = bus_socket_auth_write_ok(b);
423                         }
424 
425                 } else if (line_begins(line, l, "AUTH EXTERNAL")) {
426 
427                         r = verify_external_token(b,
428                                                   line + strlen("AUTH EXTERNAL"),
429                                                   l - strlen("AUTH EXTERNAL"));
430                         if (r < 0)
431                                 return r;
432                         if (r == 0)
433                                 r = bus_socket_auth_write(b, "REJECTED\r\n");
434                         else {
435                                 b->auth = BUS_AUTH_EXTERNAL;
436                                 if (l <= strlen("AUTH EXTERNAL"))
437                                         r = bus_socket_auth_write(b, "DATA\r\n");
438                                 else
439                                         r = bus_socket_auth_write_ok(b);
440                         }
441 
442                 } else if (line_begins(line, l, "AUTH"))
443                         r = bus_socket_auth_write(b, "REJECTED EXTERNAL ANONYMOUS\r\n");
444                 else if (line_equals(line, l, "CANCEL") ||
445                          line_begins(line, l, "ERROR")) {
446 
447                         b->auth = _BUS_AUTH_INVALID;
448                         r = bus_socket_auth_write(b, "REJECTED\r\n");
449 
450                 } else if (line_equals(line, l, "BEGIN")) {
451 
452                         if (b->auth == _BUS_AUTH_INVALID)
453                                 r = bus_socket_auth_write(b, "ERROR\r\n");
454                         else {
455                                 /* We can't leave from the auth phase
456                                  * before we haven't written
457                                  * everything queued, so let's check
458                                  * that */
459 
460                                 if (bus_socket_auth_needs_write(b))
461                                         return 1;
462 
463                                 b->rbuffer_size -= (e + 2 - (char*) b->rbuffer);
464                                 memmove(b->rbuffer, e + 2, b->rbuffer_size);
465                                 return bus_start_running(b);
466                         }
467 
468                 } else if (line_begins(line, l, "DATA")) {
469 
470                         if (b->auth == _BUS_AUTH_INVALID)
471                                 r = bus_socket_auth_write(b, "ERROR\r\n");
472                         else {
473                                 if (b->auth == BUS_AUTH_ANONYMOUS)
474                                         r = verify_anonymous_token(b, line + 4, l - 4);
475                                 else
476                                         r = verify_external_token(b, line + 4, l - 4);
477 
478                                 if (r < 0)
479                                         return r;
480                                 if (r == 0) {
481                                         b->auth = _BUS_AUTH_INVALID;
482                                         r = bus_socket_auth_write(b, "REJECTED\r\n");
483                                 } else
484                                         r = bus_socket_auth_write_ok(b);
485                         }
486                 } else if (line_equals(line, l, "NEGOTIATE_UNIX_FD")) {
487                         if (b->auth == _BUS_AUTH_INVALID || !b->accept_fd)
488                                 r = bus_socket_auth_write(b, "ERROR\r\n");
489                         else {
490                                 b->can_fds = true;
491                                 r = bus_socket_auth_write(b, "AGREE_UNIX_FD\r\n");
492                         }
493                 } else
494                         r = bus_socket_auth_write(b, "ERROR\r\n");
495 
496                 if (r < 0)
497                         return r;
498 
499                 b->auth_rbegin = e + 2 - (char*) b->rbuffer;
500 
501                 processed = true;
502         }
503 }
504 
bus_socket_auth_verify(sd_bus * b)505 static int bus_socket_auth_verify(sd_bus *b) {
506         assert(b);
507 
508         if (b->is_server)
509                 return bus_socket_auth_verify_server(b);
510         else
511                 return bus_socket_auth_verify_client(b);
512 }
513 
bus_socket_read_auth(sd_bus * b)514 static int bus_socket_read_auth(sd_bus *b) {
515         struct msghdr mh;
516         struct iovec iov = {};
517         size_t n;
518         ssize_t k;
519         int r;
520         void *p;
521         CMSG_BUFFER_TYPE(CMSG_SPACE(sizeof(int) * BUS_FDS_MAX)) control;
522         bool handle_cmsg = false;
523 
524         assert(b);
525         assert(b->state == BUS_AUTHENTICATING);
526 
527         r = bus_socket_auth_verify(b);
528         if (r != 0)
529                 return r;
530 
531         n = MAX(256u, b->rbuffer_size * 2);
532 
533         if (n > BUS_AUTH_SIZE_MAX)
534                 n = BUS_AUTH_SIZE_MAX;
535 
536         if (b->rbuffer_size >= n)
537                 return -ENOBUFS;
538 
539         p = realloc(b->rbuffer, n);
540         if (!p)
541                 return -ENOMEM;
542 
543         b->rbuffer = p;
544 
545         iov = IOVEC_MAKE((uint8_t *)b->rbuffer + b->rbuffer_size, n - b->rbuffer_size);
546 
547         if (b->prefer_readv) {
548                 k = readv(b->input_fd, &iov, 1);
549                 if (k < 0)
550                         k = -errno;
551         } else {
552                 mh = (struct msghdr) {
553                         .msg_iov = &iov,
554                         .msg_iovlen = 1,
555                         .msg_control = &control,
556                         .msg_controllen = sizeof(control),
557                 };
558 
559                 k = recvmsg_safe(b->input_fd, &mh, MSG_DONTWAIT|MSG_CMSG_CLOEXEC);
560                 if (k == -ENOTSOCK) {
561                         b->prefer_readv = true;
562                         k = readv(b->input_fd, &iov, 1);
563                         if (k < 0)
564                                 k = -errno;
565                 } else
566                         handle_cmsg = true;
567         }
568         if (k < 0) {
569                 if (ERRNO_IS_TRANSIENT(k))
570                         return 0;
571                 return (int) k;
572         }
573         if (k == 0) {
574                 if (handle_cmsg)
575                         cmsg_close_all(&mh); /* paranoia, we shouldn't have gotten any fds on EOF */
576                 return -ECONNRESET;
577         }
578 
579         b->rbuffer_size += k;
580 
581         if (handle_cmsg) {
582                 struct cmsghdr *cmsg;
583 
584                 CMSG_FOREACH(cmsg, &mh)
585                         if (cmsg->cmsg_level == SOL_SOCKET &&
586                             cmsg->cmsg_type == SCM_RIGHTS) {
587                                 int j;
588 
589                                 /* Whut? We received fds during the auth
590                                  * protocol? Somebody is playing games with
591                                  * us. Close them all, and fail */
592                                 j = (cmsg->cmsg_len - CMSG_LEN(0)) / sizeof(int);
593                                 close_many((int*) CMSG_DATA(cmsg), j);
594                                 return -EIO;
595                         } else
596                                 log_debug("Got unexpected auxiliary data with level=%d and type=%d",
597                                           cmsg->cmsg_level, cmsg->cmsg_type);
598         }
599 
600         r = bus_socket_auth_verify(b);
601         if (r != 0)
602                 return r;
603 
604         return 1;
605 }
606 
bus_socket_setup(sd_bus * b)607 void bus_socket_setup(sd_bus *b) {
608         assert(b);
609 
610         /* Increase the buffers to 8 MB */
611         (void) fd_inc_rcvbuf(b->input_fd, SNDBUF_SIZE);
612         (void) fd_inc_sndbuf(b->output_fd, SNDBUF_SIZE);
613 
614         b->message_version = 1;
615         b->message_endian = 0;
616 }
617 
bus_get_peercred(sd_bus * b)618 static void bus_get_peercred(sd_bus *b) {
619         int r;
620 
621         assert(b);
622         assert(!b->ucred_valid);
623         assert(!b->label);
624         assert(b->n_groups == SIZE_MAX);
625 
626         /* Get the peer for socketpair() sockets */
627         b->ucred_valid = getpeercred(b->input_fd, &b->ucred) >= 0;
628 
629         /* Get the SELinux context of the peer */
630         r = getpeersec(b->input_fd, &b->label);
631         if (r < 0 && !IN_SET(r, -EOPNOTSUPP, -ENOPROTOOPT))
632                 log_debug_errno(r, "Failed to determine peer security context: %m");
633 
634         /* Get the list of auxiliary groups of the peer */
635         r = getpeergroups(b->input_fd, &b->groups);
636         if (r >= 0)
637                 b->n_groups = (size_t) r;
638         else if (!IN_SET(r, -EOPNOTSUPP, -ENOPROTOOPT))
639                 log_debug_errno(r, "Failed to determine peer's group list: %m");
640 }
641 
bus_socket_start_auth_client(sd_bus * b)642 static int bus_socket_start_auth_client(sd_bus *b) {
643         static const char sasl_auth_anonymous[] = {
644                 /*
645                  * We use an arbitrary trace-string for the ANONYMOUS authentication. It can be used by the
646                  * message broker to aid debugging of clients. We fully anonymize the connection and use a
647                  * static default.
648                  */
649                 "\0AUTH ANONYMOUS\r\n"
650                 /* HEX a n o n y m o u s */
651                 "DATA 616e6f6e796d6f7573\r\n"
652         };
653         static const char sasl_auth_external[] = {
654                 "\0AUTH EXTERNAL\r\n"
655                 "DATA\r\n"
656         };
657         static const char sasl_negotiate_unix_fd[] = {
658                 "NEGOTIATE_UNIX_FD\r\n"
659         };
660         static const char sasl_begin[] = {
661                 "BEGIN\r\n"
662         };
663         size_t i = 0;
664 
665         assert(b);
666 
667         if (b->anonymous_auth)
668                 b->auth_iovec[i++] = IOVEC_MAKE((char*) sasl_auth_anonymous, sizeof(sasl_auth_anonymous) - 1);
669         else
670                 b->auth_iovec[i++] = IOVEC_MAKE((char*) sasl_auth_external, sizeof(sasl_auth_external) - 1);
671 
672         if (b->accept_fd)
673                 b->auth_iovec[i++] = IOVEC_MAKE_STRING(sasl_negotiate_unix_fd);
674 
675         b->auth_iovec[i++] = IOVEC_MAKE_STRING(sasl_begin);
676 
677         return bus_socket_write_auth(b);
678 }
679 
bus_socket_start_auth(sd_bus * b)680 int bus_socket_start_auth(sd_bus *b) {
681         assert(b);
682 
683         bus_get_peercred(b);
684 
685         bus_set_state(b, BUS_AUTHENTICATING);
686         b->auth_timeout = now(CLOCK_MONOTONIC) + BUS_AUTH_TIMEOUT;
687 
688         if (sd_is_socket(b->input_fd, AF_UNIX, 0, 0) <= 0)
689                 b->accept_fd = false;
690 
691         if (b->output_fd != b->input_fd)
692                 if (sd_is_socket(b->output_fd, AF_UNIX, 0, 0) <= 0)
693                         b->accept_fd = false;
694 
695         if (b->is_server)
696                 return bus_socket_read_auth(b);
697         else
698                 return bus_socket_start_auth_client(b);
699 }
700 
bus_socket_inotify_setup(sd_bus * b)701 static int bus_socket_inotify_setup(sd_bus *b) {
702         _cleanup_free_ int *new_watches = NULL;
703         _cleanup_free_ char *absolute = NULL;
704         size_t n = 0, done = 0, i;
705         unsigned max_follow = 32;
706         const char *p;
707         int wd, r;
708 
709         assert(b);
710         assert(b->watch_bind);
711         assert(b->sockaddr.sa.sa_family == AF_UNIX);
712         assert(b->sockaddr.un.sun_path[0] != 0);
713 
714         /* Sets up an inotify fd in case watch_bind is enabled: wait until the configured AF_UNIX file system socket
715          * appears before connecting to it. The implemented is pretty simplistic: we just subscribe to relevant changes
716          * to all prefix components of the path, and every time we get an event for that we try to reconnect again,
717          * without actually caring what precisely the event we got told us. If we still can't connect we re-subscribe
718          * to all relevant changes of anything in the path, so that our watches include any possibly newly created path
719          * components. */
720 
721         if (b->inotify_fd < 0) {
722                 b->inotify_fd = inotify_init1(IN_NONBLOCK|IN_CLOEXEC);
723                 if (b->inotify_fd < 0)
724                         return -errno;
725 
726                 b->inotify_fd = fd_move_above_stdio(b->inotify_fd);
727         }
728 
729         /* Make sure the path is NUL terminated */
730         p = strndupa_safe(b->sockaddr.un.sun_path,
731                           sizeof(b->sockaddr.un.sun_path));
732 
733         /* Make sure the path is absolute */
734         r = path_make_absolute_cwd(p, &absolute);
735         if (r < 0)
736                 goto fail;
737 
738         /* Watch all parent directories, and don't mind any prefix that doesn't exist yet. For the innermost directory
739          * that exists we want to know when files are created or moved into it. For all parents of it we just care if
740          * they are removed or renamed. */
741 
742         if (!GREEDY_REALLOC(new_watches, n + 1)) {
743                 r = -ENOMEM;
744                 goto fail;
745         }
746 
747         /* Start with the top-level directory, which is a bit simpler than the rest, since it can't be a symlink, and
748          * always exists */
749         wd = inotify_add_watch(b->inotify_fd, "/", IN_CREATE|IN_MOVED_TO);
750         if (wd < 0) {
751                 r = log_debug_errno(errno, "Failed to add inotify watch on /: %m");
752                 goto fail;
753         } else
754                 new_watches[n++] = wd;
755 
756         for (;;) {
757                 _cleanup_free_ char *component = NULL, *prefix = NULL, *destination = NULL;
758                 size_t n_slashes, n_component;
759                 char *c = NULL;
760 
761                 n_slashes = strspn(absolute + done, "/");
762                 n_component = n_slashes + strcspn(absolute + done + n_slashes, "/");
763 
764                 if (n_component == 0) /* The end */
765                         break;
766 
767                 component = strndup(absolute + done, n_component);
768                 if (!component) {
769                         r = -ENOMEM;
770                         goto fail;
771                 }
772 
773                 /* A trailing slash? That's a directory, and not a socket then */
774                 if (path_equal(component, "/")) {
775                         r = -EISDIR;
776                         goto fail;
777                 }
778 
779                 /* A single dot? Let's eat this up */
780                 if (path_equal(component, "/.")) {
781                         done += n_component;
782                         continue;
783                 }
784 
785                 prefix = strndup(absolute, done + n_component);
786                 if (!prefix) {
787                         r = -ENOMEM;
788                         goto fail;
789                 }
790 
791                 if (!GREEDY_REALLOC(new_watches, n + 1)) {
792                         r = -ENOMEM;
793                         goto fail;
794                 }
795 
796                 wd = inotify_add_watch(b->inotify_fd, prefix, IN_DELETE_SELF|IN_MOVE_SELF|IN_ATTRIB|IN_CREATE|IN_MOVED_TO|IN_DONT_FOLLOW);
797                 log_debug("Added inotify watch for %s on bus %s: %i", prefix, strna(b->description), wd);
798 
799                 if (wd < 0) {
800                         if (IN_SET(errno, ENOENT, ELOOP))
801                                 break; /* This component doesn't exist yet, or the path contains a cyclic symlink right now */
802 
803                         r = log_debug_errno(errno, "Failed to add inotify watch on %s: %m", empty_to_root(prefix));
804                         goto fail;
805                 } else
806                         new_watches[n++] = wd;
807 
808                 /* Check if this is possibly a symlink. If so, let's follow it and watch it too. */
809                 r = readlink_malloc(prefix, &destination);
810                 if (r == -EINVAL) { /* not a symlink */
811                         done += n_component;
812                         continue;
813                 }
814                 if (r < 0)
815                         goto fail;
816 
817                 if (isempty(destination)) { /* Empty symlink target? Yuck! */
818                         r = -EINVAL;
819                         goto fail;
820                 }
821 
822                 if (max_follow <= 0) { /* Let's make sure we don't follow symlinks forever */
823                         r = -ELOOP;
824                         goto fail;
825                 }
826 
827                 if (path_is_absolute(destination)) {
828                         /* For absolute symlinks we build the new path and start anew */
829                         c = strjoin(destination, absolute + done + n_component);
830                         done = 0;
831                 } else {
832                         _cleanup_free_ char *t = NULL;
833 
834                         /* For relative symlinks we replace the last component, and try again */
835                         t = strndup(absolute, done);
836                         if (!t)
837                                 return -ENOMEM;
838 
839                         c = strjoin(t, "/", destination, absolute + done + n_component);
840                 }
841                 if (!c) {
842                         r = -ENOMEM;
843                         goto fail;
844                 }
845 
846                 free(absolute);
847                 absolute = c;
848 
849                 max_follow--;
850         }
851 
852         /* And now, let's remove all watches from the previous iteration we don't need anymore */
853         for (i = 0; i < b->n_inotify_watches; i++) {
854                 bool found = false;
855                 size_t j;
856 
857                 for (j = 0; j < n; j++)
858                         if (new_watches[j] == b->inotify_watches[i]) {
859                                 found = true;
860                                 break;
861                         }
862 
863                 if (found)
864                         continue;
865 
866                 (void) inotify_rm_watch(b->inotify_fd, b->inotify_watches[i]);
867         }
868 
869         free_and_replace(b->inotify_watches, new_watches);
870         b->n_inotify_watches = n;
871 
872         return 0;
873 
874 fail:
875         bus_close_inotify_fd(b);
876         return r;
877 }
878 
bus_socket_connect(sd_bus * b)879 int bus_socket_connect(sd_bus *b) {
880         bool inotify_done = false;
881         int r;
882 
883         assert(b);
884 
885         for (;;) {
886                 assert(b->input_fd < 0);
887                 assert(b->output_fd < 0);
888                 assert(b->sockaddr.sa.sa_family != AF_UNSPEC);
889 
890                 if (DEBUG_LOGGING) {
891                         _cleanup_free_ char *pretty = NULL;
892                         (void) sockaddr_pretty(&b->sockaddr.sa, b->sockaddr_size, false, true, &pretty);
893                         log_debug("sd-bus: starting bus%s%s by connecting to %s...",
894                                   b->description ? " " : "", strempty(b->description), strnull(pretty));
895                 }
896 
897                 b->input_fd = socket(b->sockaddr.sa.sa_family, SOCK_STREAM|SOCK_CLOEXEC|SOCK_NONBLOCK, 0);
898                 if (b->input_fd < 0)
899                         return -errno;
900 
901                 b->input_fd = fd_move_above_stdio(b->input_fd);
902 
903                 b->output_fd = b->input_fd;
904                 bus_socket_setup(b);
905 
906                 if (connect(b->input_fd, &b->sockaddr.sa, b->sockaddr_size) < 0) {
907                         if (errno == EINPROGRESS) {
908 
909                                 /* If we have any inotify watches open, close them now, we don't need them anymore, as
910                                  * we have successfully initiated a connection */
911                                 bus_close_inotify_fd(b);
912 
913                                 /* Note that very likely we are already in BUS_OPENING state here, as we enter it when
914                                  * we start parsing the address string. The only reason we set the state explicitly
915                                  * here, is to undo BUS_WATCH_BIND, in case we did the inotify magic. */
916                                 bus_set_state(b, BUS_OPENING);
917                                 return 1;
918                         }
919 
920                         if (IN_SET(errno, ENOENT, ECONNREFUSED) &&  /* ENOENT → unix socket doesn't exist at all; ECONNREFUSED → unix socket stale */
921                             b->watch_bind &&
922                             b->sockaddr.sa.sa_family == AF_UNIX &&
923                             b->sockaddr.un.sun_path[0] != 0) {
924 
925                                 /* This connection attempt failed, let's release the socket for now, and start with a
926                                  * fresh one when reconnecting. */
927                                 bus_close_io_fds(b);
928 
929                                 if (inotify_done) {
930                                         /* inotify set up already, don't do it again, just return now, and remember
931                                          * that we are waiting for inotify events now. */
932                                         bus_set_state(b, BUS_WATCH_BIND);
933                                         return 1;
934                                 }
935 
936                                 /* This is a file system socket, and the inotify logic is enabled. Let's create the necessary inotify fd. */
937                                 r = bus_socket_inotify_setup(b);
938                                 if (r < 0)
939                                         return r;
940 
941                                 /* Let's now try to connect a second time, because in theory there's otherwise a race
942                                  * here: the socket might have been created in the time between our first connect() and
943                                  * the time we set up the inotify logic. But let's remember that we set up inotify now,
944                                  * so that we don't do the connect() more than twice. */
945                                 inotify_done = true;
946 
947                         } else
948                                 return -errno;
949                 } else
950                         break;
951         }
952 
953         /* Yay, established, we don't need no inotify anymore! */
954         bus_close_inotify_fd(b);
955 
956         return bus_socket_start_auth(b);
957 }
958 
bus_socket_exec(sd_bus * b)959 int bus_socket_exec(sd_bus *b) {
960         int s[2], r;
961 
962         assert(b);
963         assert(b->input_fd < 0);
964         assert(b->output_fd < 0);
965         assert(b->exec_path);
966         assert(b->busexec_pid == 0);
967 
968         if (DEBUG_LOGGING) {
969                 _cleanup_free_ char *line = NULL;
970 
971                 if (b->exec_argv)
972                         line = quote_command_line(b->exec_argv, SHELL_ESCAPE_EMPTY);
973 
974                 log_debug("sd-bus: starting bus%s%s with %s%s",
975                           b->description ? " " : "", strempty(b->description),
976                           line ?: b->exec_path,
977                           b->exec_argv && !line ? "…" : "");
978         }
979 
980         r = socketpair(AF_UNIX, SOCK_STREAM|SOCK_NONBLOCK|SOCK_CLOEXEC, 0, s);
981         if (r < 0)
982                 return -errno;
983 
984         r = safe_fork_full("(sd-busexec)", s+1, 1, FORK_RESET_SIGNALS|FORK_CLOSE_ALL_FDS, &b->busexec_pid);
985         if (r < 0) {
986                 safe_close_pair(s);
987                 return r;
988         }
989         if (r == 0) {
990                 /* Child */
991 
992                 r = rearrange_stdio(s[1], s[1], STDERR_FILENO);
993                 TAKE_FD(s[1]);
994                 if (r < 0)
995                         _exit(EXIT_FAILURE);
996 
997                 (void) rlimit_nofile_safe();
998 
999                 if (b->exec_argv)
1000                         execvp(b->exec_path, b->exec_argv);
1001                 else
1002                         execvp(b->exec_path, STRV_MAKE(b->exec_path));
1003 
1004                 _exit(EXIT_FAILURE);
1005         }
1006 
1007         safe_close(s[1]);
1008         b->output_fd = b->input_fd = fd_move_above_stdio(s[0]);
1009 
1010         bus_socket_setup(b);
1011 
1012         return bus_socket_start_auth(b);
1013 }
1014 
bus_socket_take_fd(sd_bus * b)1015 int bus_socket_take_fd(sd_bus *b) {
1016         assert(b);
1017 
1018         bus_socket_setup(b);
1019 
1020         return bus_socket_start_auth(b);
1021 }
1022 
bus_socket_write_message(sd_bus * bus,sd_bus_message * m,size_t * idx)1023 int bus_socket_write_message(sd_bus *bus, sd_bus_message *m, size_t *idx) {
1024         struct iovec *iov;
1025         ssize_t k;
1026         size_t n;
1027         unsigned j;
1028         int r;
1029 
1030         assert(bus);
1031         assert(m);
1032         assert(idx);
1033         assert(IN_SET(bus->state, BUS_RUNNING, BUS_HELLO));
1034 
1035         if (*idx >= BUS_MESSAGE_SIZE(m))
1036                 return 0;
1037 
1038         r = bus_message_setup_iovec(m);
1039         if (r < 0)
1040                 return r;
1041 
1042         n = m->n_iovec * sizeof(struct iovec);
1043         iov = newa(struct iovec, n);
1044         memcpy_safe(iov, m->iovec, n);
1045 
1046         j = 0;
1047         iovec_advance(iov, &j, *idx);
1048 
1049         if (bus->prefer_writev)
1050                 k = writev(bus->output_fd, iov, m->n_iovec);
1051         else {
1052                 struct msghdr mh = {
1053                         .msg_iov = iov,
1054                         .msg_iovlen = m->n_iovec,
1055                 };
1056 
1057                 if (m->n_fds > 0 && *idx == 0) {
1058                         struct cmsghdr *control;
1059 
1060                         mh.msg_controllen = CMSG_SPACE(sizeof(int) * m->n_fds);
1061                         mh.msg_control = alloca0(mh.msg_controllen);
1062                         control = CMSG_FIRSTHDR(&mh);
1063                         control->cmsg_len = CMSG_LEN(sizeof(int) * m->n_fds);
1064                         control->cmsg_level = SOL_SOCKET;
1065                         control->cmsg_type = SCM_RIGHTS;
1066                         memcpy(CMSG_DATA(control), m->fds, sizeof(int) * m->n_fds);
1067                 }
1068 
1069                 k = sendmsg(bus->output_fd, &mh, MSG_DONTWAIT|MSG_NOSIGNAL);
1070                 if (k < 0 && errno == ENOTSOCK) {
1071                         bus->prefer_writev = true;
1072                         k = writev(bus->output_fd, iov, m->n_iovec);
1073                 }
1074         }
1075 
1076         if (k < 0)
1077                 return ERRNO_IS_TRANSIENT(errno) ? 0 : -errno;
1078 
1079         *idx += (size_t) k;
1080         return 1;
1081 }
1082 
bus_socket_read_message_need(sd_bus * bus,size_t * need)1083 static int bus_socket_read_message_need(sd_bus *bus, size_t *need) {
1084         uint32_t a, b;
1085         uint8_t e;
1086         uint64_t sum;
1087 
1088         assert(bus);
1089         assert(need);
1090         assert(IN_SET(bus->state, BUS_RUNNING, BUS_HELLO));
1091 
1092         if (bus->rbuffer_size < sizeof(struct bus_header)) {
1093                 *need = sizeof(struct bus_header) + 8;
1094 
1095                 /* Minimum message size:
1096                  *
1097                  * Header +
1098                  *
1099                  *  Method Call: +2 string headers
1100                  *       Signal: +3 string headers
1101                  * Method Error: +1 string headers
1102                  *               +1 uint32 headers
1103                  * Method Reply: +1 uint32 headers
1104                  *
1105                  * A string header is at least 9 bytes
1106                  * A uint32 header is at least 8 bytes
1107                  *
1108                  * Hence the minimum message size of a valid message
1109                  * is header + 8 bytes */
1110 
1111                 return 0;
1112         }
1113 
1114         a = ((const uint32_t*) bus->rbuffer)[1];
1115         b = ((const uint32_t*) bus->rbuffer)[3];
1116 
1117         e = ((const uint8_t*) bus->rbuffer)[0];
1118         if (e == BUS_LITTLE_ENDIAN) {
1119                 a = le32toh(a);
1120                 b = le32toh(b);
1121         } else if (e == BUS_BIG_ENDIAN) {
1122                 a = be32toh(a);
1123                 b = be32toh(b);
1124         } else
1125                 return -EBADMSG;
1126 
1127         sum = (uint64_t) sizeof(struct bus_header) + (uint64_t) ALIGN_TO(b, 8) + (uint64_t) a;
1128         if (sum >= BUS_MESSAGE_SIZE_MAX)
1129                 return -ENOBUFS;
1130 
1131         *need = (size_t) sum;
1132         return 0;
1133 }
1134 
bus_socket_make_message(sd_bus * bus,size_t size)1135 static int bus_socket_make_message(sd_bus *bus, size_t size) {
1136         sd_bus_message *t = NULL;
1137         void *b;
1138         int r;
1139 
1140         assert(bus);
1141         assert(bus->rbuffer_size >= size);
1142         assert(IN_SET(bus->state, BUS_RUNNING, BUS_HELLO));
1143 
1144         r = bus_rqueue_make_room(bus);
1145         if (r < 0)
1146                 return r;
1147 
1148         if (bus->rbuffer_size > size) {
1149                 b = memdup((const uint8_t*) bus->rbuffer + size,
1150                            bus->rbuffer_size - size);
1151                 if (!b)
1152                         return -ENOMEM;
1153         } else
1154                 b = NULL;
1155 
1156         r = bus_message_from_malloc(bus,
1157                                     bus->rbuffer, size,
1158                                     bus->fds, bus->n_fds,
1159                                     NULL,
1160                                     &t);
1161         if (r == -EBADMSG) {
1162                 log_debug_errno(r, "Received invalid message from connection %s, dropping.", strna(bus->description));
1163                 free(bus->rbuffer); /* We want to drop current rbuffer and proceed with whatever remains in b */
1164         } else if (r < 0) {
1165                 free(b);
1166                 return r;
1167         }
1168 
1169         /* rbuffer ownership was either transferred to t, or we got EBADMSG and dropped it. */
1170         bus->rbuffer = b;
1171         bus->rbuffer_size -= size;
1172 
1173         bus->fds = NULL;
1174         bus->n_fds = 0;
1175 
1176         if (t) {
1177                 t->read_counter = ++bus->read_counter;
1178                 bus->rqueue[bus->rqueue_size++] = bus_message_ref_queued(t, bus);
1179                 sd_bus_message_unref(t);
1180         }
1181 
1182         return 1;
1183 }
1184 
bus_socket_read_message(sd_bus * bus)1185 int bus_socket_read_message(sd_bus *bus) {
1186         struct msghdr mh;
1187         struct iovec iov = {};
1188         ssize_t k;
1189         size_t need;
1190         int r;
1191         void *b;
1192         CMSG_BUFFER_TYPE(CMSG_SPACE(sizeof(int) * BUS_FDS_MAX)) control;
1193         bool handle_cmsg = false;
1194 
1195         assert(bus);
1196         assert(IN_SET(bus->state, BUS_RUNNING, BUS_HELLO));
1197 
1198         r = bus_socket_read_message_need(bus, &need);
1199         if (r < 0)
1200                 return r;
1201 
1202         if (bus->rbuffer_size >= need)
1203                 return bus_socket_make_message(bus, need);
1204 
1205         b = realloc(bus->rbuffer, need);
1206         if (!b)
1207                 return -ENOMEM;
1208 
1209         bus->rbuffer = b;
1210 
1211         iov = IOVEC_MAKE((uint8_t *)bus->rbuffer + bus->rbuffer_size, need - bus->rbuffer_size);
1212 
1213         if (bus->prefer_readv) {
1214                 k = readv(bus->input_fd, &iov, 1);
1215                 if (k < 0)
1216                         k = -errno;
1217         } else {
1218                 mh = (struct msghdr) {
1219                         .msg_iov = &iov,
1220                         .msg_iovlen = 1,
1221                         .msg_control = &control,
1222                         .msg_controllen = sizeof(control),
1223                 };
1224 
1225                 k = recvmsg_safe(bus->input_fd, &mh, MSG_DONTWAIT|MSG_CMSG_CLOEXEC);
1226                 if (k == -ENOTSOCK) {
1227                         bus->prefer_readv = true;
1228                         k = readv(bus->input_fd, &iov, 1);
1229                         if (k < 0)
1230                                 k = -errno;
1231                 } else
1232                         handle_cmsg = true;
1233         }
1234         if (k < 0) {
1235                 if (ERRNO_IS_TRANSIENT(k))
1236                         return 0;
1237                 return (int) k;
1238         }
1239         if (k == 0) {
1240                 if (handle_cmsg)
1241                         cmsg_close_all(&mh); /* On EOF we shouldn't have gotten an fd, but let's make sure */
1242                 return -ECONNRESET;
1243         }
1244 
1245         bus->rbuffer_size += k;
1246 
1247         if (handle_cmsg) {
1248                 struct cmsghdr *cmsg;
1249 
1250                 CMSG_FOREACH(cmsg, &mh)
1251                         if (cmsg->cmsg_level == SOL_SOCKET &&
1252                             cmsg->cmsg_type == SCM_RIGHTS) {
1253                                 int n, *f, i;
1254 
1255                                 n = (cmsg->cmsg_len - CMSG_LEN(0)) / sizeof(int);
1256 
1257                                 if (!bus->can_fds) {
1258                                         /* Whut? We received fds but this
1259                                          * isn't actually enabled? Close them,
1260                                          * and fail */
1261 
1262                                         close_many((int*) CMSG_DATA(cmsg), n);
1263                                         return -EIO;
1264                                 }
1265 
1266                                 f = reallocarray(bus->fds, bus->n_fds + n, sizeof(int));
1267                                 if (!f) {
1268                                         close_many((int*) CMSG_DATA(cmsg), n);
1269                                         return -ENOMEM;
1270                                 }
1271 
1272                                 for (i = 0; i < n; i++)
1273                                         f[bus->n_fds++] = fd_move_above_stdio(((int*) CMSG_DATA(cmsg))[i]);
1274                                 bus->fds = f;
1275                         } else
1276                                 log_debug("Got unexpected auxiliary data with level=%d and type=%d",
1277                                           cmsg->cmsg_level, cmsg->cmsg_type);
1278         }
1279 
1280         r = bus_socket_read_message_need(bus, &need);
1281         if (r < 0)
1282                 return r;
1283 
1284         if (bus->rbuffer_size >= need)
1285                 return bus_socket_make_message(bus, need);
1286 
1287         return 1;
1288 }
1289 
bus_socket_process_opening(sd_bus * b)1290 int bus_socket_process_opening(sd_bus *b) {
1291         int error = 0, events, r;
1292         socklen_t slen = sizeof(error);
1293 
1294         assert(b->state == BUS_OPENING);
1295 
1296         events = fd_wait_for_event(b->output_fd, POLLOUT, 0);
1297         if (events < 0)
1298                 return events;
1299         if (!(events & (POLLOUT|POLLERR|POLLHUP)))
1300                 return 0;
1301 
1302         r = getsockopt(b->output_fd, SOL_SOCKET, SO_ERROR, &error, &slen);
1303         if (r < 0)
1304                 b->last_connect_error = errno;
1305         else if (error != 0)
1306                 b->last_connect_error = error;
1307         else if (events & (POLLERR|POLLHUP))
1308                 b->last_connect_error = ECONNREFUSED;
1309         else
1310                 return bus_socket_start_auth(b);
1311 
1312         return bus_next_address(b);
1313 }
1314 
bus_socket_process_authenticating(sd_bus * b)1315 int bus_socket_process_authenticating(sd_bus *b) {
1316         int r;
1317 
1318         assert(b);
1319         assert(b->state == BUS_AUTHENTICATING);
1320 
1321         if (now(CLOCK_MONOTONIC) >= b->auth_timeout)
1322                 return -ETIMEDOUT;
1323 
1324         r = bus_socket_write_auth(b);
1325         if (r != 0)
1326                 return r;
1327 
1328         return bus_socket_read_auth(b);
1329 }
1330 
bus_socket_process_watch_bind(sd_bus * b)1331 int bus_socket_process_watch_bind(sd_bus *b) {
1332         int r, q;
1333 
1334         assert(b);
1335         assert(b->state == BUS_WATCH_BIND);
1336         assert(b->inotify_fd >= 0);
1337 
1338         r = flush_fd(b->inotify_fd);
1339         if (r <= 0)
1340                 return r;
1341 
1342         log_debug("Got inotify event on bus %s.", strna(b->description));
1343 
1344         /* We flushed events out of the inotify fd. In that case, maybe the socket is valid now? Let's try to connect
1345          * to it again */
1346 
1347         r = bus_socket_connect(b);
1348         if (r < 0)
1349                 return r;
1350 
1351         q = bus_attach_io_events(b);
1352         if (q < 0)
1353                 return q;
1354 
1355         q = bus_attach_inotify_event(b);
1356         if (q < 0)
1357                 return q;
1358 
1359         return r;
1360 }
1361