2 This file is part of systemd.
4 Copyright 2010 Lennart Poettering
6 systemd is free software; you can redistribute it and/or modify it
7 under the terms of the GNU Lesser General Public License as published by
8 the Free Software Foundation; either version 2.1 of the License, or
9 (at your option) any later version.
11 systemd is distributed in the hope that it will be useful, but
12 WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public License
17 along with systemd; If not, see <http://www.gnu.org/licenses/>.
23 #include <netinet/in.h>
29 #include <sys/socket.h>
34 #include "sd-daemon.h"
36 #include "alloc-util.h"
39 #include "parse-util.h"
40 #include "path-util.h"
41 #include "socket-util.h"
45 #define SNDBUF_SIZE (8*1024*1024)
47 static void unsetenv_all(bool unset_environment
) {
49 if (!unset_environment
)
52 unsetenv("LISTEN_PID");
53 unsetenv("LISTEN_FDS");
54 unsetenv("LISTEN_FDNAMES");
57 _public_
int sd_listen_fds(int unset_environment
) {
62 e
= getenv("LISTEN_PID");
68 r
= parse_pid(e
, &pid
);
73 if (getpid() != pid
) {
78 e
= getenv("LISTEN_FDS");
88 assert_cc(SD_LISTEN_FDS_START
< INT_MAX
);
89 if (n
<= 0 || n
> INT_MAX
- SD_LISTEN_FDS_START
) {
94 for (fd
= SD_LISTEN_FDS_START
; fd
< SD_LISTEN_FDS_START
+ n
; fd
++) {
95 r
= fd_cloexec(fd
, true);
103 unsetenv_all(unset_environment
);
107 _public_
int sd_listen_fds_with_names(int unset_environment
, char ***names
) {
108 _cleanup_strv_free_
char **l
= NULL
;
110 int n_names
= 0, n_fds
;
115 return sd_listen_fds(unset_environment
);
117 e
= getenv("LISTEN_FDNAMES");
119 n_names
= strv_split_extract(&l
, e
, ":", EXTRACT_DONT_COALESCE_SEPARATORS
);
121 unsetenv_all(unset_environment
);
129 n_fds
= sd_listen_fds(unset_environment
);
134 if (n_names
!= n_fds
)
137 r
= strv_extend_n(&l
, "unknown", n_fds
);
148 _public_
int sd_is_fifo(int fd
, const char *path
) {
151 assert_return(fd
>= 0, -EBADF
);
153 if (fstat(fd
, &st_fd
) < 0)
156 if (!S_ISFIFO(st_fd
.st_mode
))
162 if (stat(path
, &st_path
) < 0) {
164 if (errno
== ENOENT
|| errno
== ENOTDIR
)
171 st_path
.st_dev
== st_fd
.st_dev
&&
172 st_path
.st_ino
== st_fd
.st_ino
;
178 _public_
int sd_is_special(int fd
, const char *path
) {
181 assert_return(fd
>= 0, -EBADF
);
183 if (fstat(fd
, &st_fd
) < 0)
186 if (!S_ISREG(st_fd
.st_mode
) && !S_ISCHR(st_fd
.st_mode
))
192 if (stat(path
, &st_path
) < 0) {
194 if (errno
== ENOENT
|| errno
== ENOTDIR
)
200 if (S_ISREG(st_fd
.st_mode
) && S_ISREG(st_path
.st_mode
))
202 st_path
.st_dev
== st_fd
.st_dev
&&
203 st_path
.st_ino
== st_fd
.st_ino
;
204 else if (S_ISCHR(st_fd
.st_mode
) && S_ISCHR(st_path
.st_mode
))
205 return st_path
.st_rdev
== st_fd
.st_rdev
;
213 static int sd_is_socket_internal(int fd
, int type
, int listening
) {
216 assert_return(fd
>= 0, -EBADF
);
217 assert_return(type
>= 0, -EINVAL
);
219 if (fstat(fd
, &st_fd
) < 0)
222 if (!S_ISSOCK(st_fd
.st_mode
))
227 socklen_t l
= sizeof(other_type
);
229 if (getsockopt(fd
, SOL_SOCKET
, SO_TYPE
, &other_type
, &l
) < 0)
232 if (l
!= sizeof(other_type
))
235 if (other_type
!= type
)
239 if (listening
>= 0) {
241 socklen_t l
= sizeof(accepting
);
243 if (getsockopt(fd
, SOL_SOCKET
, SO_ACCEPTCONN
, &accepting
, &l
) < 0)
246 if (l
!= sizeof(accepting
))
249 if (!accepting
!= !listening
)
256 _public_
int sd_is_socket(int fd
, int family
, int type
, int listening
) {
259 assert_return(fd
>= 0, -EBADF
);
260 assert_return(family
>= 0, -EINVAL
);
262 r
= sd_is_socket_internal(fd
, type
, listening
);
267 union sockaddr_union sockaddr
= {};
268 socklen_t l
= sizeof(sockaddr
);
270 if (getsockname(fd
, &sockaddr
.sa
, &l
) < 0)
273 if (l
< sizeof(sa_family_t
))
276 return sockaddr
.sa
.sa_family
== family
;
282 _public_
int sd_is_socket_inet(int fd
, int family
, int type
, int listening
, uint16_t port
) {
283 union sockaddr_union sockaddr
= {};
284 socklen_t l
= sizeof(sockaddr
);
287 assert_return(fd
>= 0, -EBADF
);
288 assert_return(IN_SET(family
, 0, AF_INET
, AF_INET6
), -EINVAL
);
290 r
= sd_is_socket_internal(fd
, type
, listening
);
294 if (getsockname(fd
, &sockaddr
.sa
, &l
) < 0)
297 if (l
< sizeof(sa_family_t
))
300 if (sockaddr
.sa
.sa_family
!= AF_INET
&&
301 sockaddr
.sa
.sa_family
!= AF_INET6
)
305 if (sockaddr
.sa
.sa_family
!= family
)
309 if (sockaddr
.sa
.sa_family
== AF_INET
) {
310 if (l
< sizeof(struct sockaddr_in
))
313 return htons(port
) == sockaddr
.in
.sin_port
;
315 if (l
< sizeof(struct sockaddr_in6
))
318 return htons(port
) == sockaddr
.in6
.sin6_port
;
325 _public_
int sd_is_socket_unix(int fd
, int type
, int listening
, const char *path
, size_t length
) {
326 union sockaddr_union sockaddr
= {};
327 socklen_t l
= sizeof(sockaddr
);
330 assert_return(fd
>= 0, -EBADF
);
332 r
= sd_is_socket_internal(fd
, type
, listening
);
336 if (getsockname(fd
, &sockaddr
.sa
, &l
) < 0)
339 if (l
< sizeof(sa_family_t
))
342 if (sockaddr
.sa
.sa_family
!= AF_UNIX
)
347 length
= strlen(path
);
351 return l
== offsetof(struct sockaddr_un
, sun_path
);
354 /* Normal path socket */
356 (l
>= offsetof(struct sockaddr_un
, sun_path
) + length
+ 1) &&
357 memcmp(path
, sockaddr
.un
.sun_path
, length
+1) == 0;
359 /* Abstract namespace socket */
361 (l
== offsetof(struct sockaddr_un
, sun_path
) + length
) &&
362 memcmp(path
, sockaddr
.un
.sun_path
, length
) == 0;
368 _public_
int sd_is_mq(int fd
, const char *path
) {
371 /* Check that the fd is valid */
372 assert_return(fcntl(fd
, F_GETFD
) >= 0, -errno
);
374 if (mq_getattr(fd
, &attr
) < 0) {
376 /* A non-mq fd (or an invalid one, but we ruled that out above) */
382 char fpath
[PATH_MAX
];
385 assert_return(path_is_absolute(path
), -EINVAL
);
387 if (fstat(fd
, &a
) < 0)
390 strncpy(stpcpy(fpath
, "/dev/mqueue"), path
, sizeof(fpath
) - 12);
391 fpath
[sizeof(fpath
)-1] = 0;
393 if (stat(fpath
, &b
) < 0)
396 if (a
.st_dev
!= b
.st_dev
||
397 a
.st_ino
!= b
.st_ino
)
404 _public_
int sd_pid_notify_with_fds(pid_t pid
, int unset_environment
, const char *state
, const int *fds
, unsigned n_fds
) {
405 union sockaddr_union sockaddr
= {
406 .sa
.sa_family
= AF_UNIX
,
408 struct iovec iovec
= {
409 .iov_base
= (char*) state
,
411 struct msghdr msghdr
= {
414 .msg_name
= &sockaddr
,
416 _cleanup_close_
int fd
= -1;
417 struct cmsghdr
*cmsg
= NULL
;
427 if (n_fds
> 0 && !fds
) {
432 e
= getenv("NOTIFY_SOCKET");
436 /* Must be an abstract socket, or an absolute path */
437 if ((e
[0] != '@' && e
[0] != '/') || e
[1] == 0) {
442 if (strlen(e
) > sizeof(sockaddr
.un
.sun_path
)) {
447 fd
= socket(AF_UNIX
, SOCK_DGRAM
|SOCK_CLOEXEC
, 0);
453 fd_inc_sndbuf(fd
, SNDBUF_SIZE
);
455 iovec
.iov_len
= strlen(state
);
457 strncpy(sockaddr
.un
.sun_path
, e
, sizeof(sockaddr
.un
.sun_path
));
458 if (sockaddr
.un
.sun_path
[0] == '@')
459 sockaddr
.un
.sun_path
[0] = 0;
461 msghdr
.msg_namelen
= offsetof(struct sockaddr_un
, sun_path
) + strlen(e
);
462 if (msghdr
.msg_namelen
> sizeof(struct sockaddr_un
))
463 msghdr
.msg_namelen
= sizeof(struct sockaddr_un
);
465 have_pid
= pid
!= 0 && pid
!= getpid();
467 if (n_fds
> 0 || have_pid
) {
468 /* CMSG_SPACE(0) may return value different than zero, which results in miscalculated controllen. */
469 msghdr
.msg_controllen
=
470 (n_fds
> 0 ? CMSG_SPACE(sizeof(int) * n_fds
) : 0) +
471 (have_pid
? CMSG_SPACE(sizeof(struct ucred
)) : 0);
473 msghdr
.msg_control
= alloca0(msghdr
.msg_controllen
);
475 cmsg
= CMSG_FIRSTHDR(&msghdr
);
477 cmsg
->cmsg_level
= SOL_SOCKET
;
478 cmsg
->cmsg_type
= SCM_RIGHTS
;
479 cmsg
->cmsg_len
= CMSG_LEN(sizeof(int) * n_fds
);
481 memcpy(CMSG_DATA(cmsg
), fds
, sizeof(int) * n_fds
);
484 assert_se(cmsg
= CMSG_NXTHDR(&msghdr
, cmsg
));
490 cmsg
->cmsg_level
= SOL_SOCKET
;
491 cmsg
->cmsg_type
= SCM_CREDENTIALS
;
492 cmsg
->cmsg_len
= CMSG_LEN(sizeof(struct ucred
));
494 ucred
= (struct ucred
*) CMSG_DATA(cmsg
);
496 ucred
->uid
= getuid();
497 ucred
->gid
= getgid();
501 /* First try with fake ucred data, as requested */
502 if (sendmsg(fd
, &msghdr
, MSG_NOSIGNAL
) >= 0) {
507 /* If that failed, try with our own ucred instead */
509 msghdr
.msg_controllen
-= CMSG_SPACE(sizeof(struct ucred
));
510 if (msghdr
.msg_controllen
== 0)
511 msghdr
.msg_control
= NULL
;
513 if (sendmsg(fd
, &msghdr
, MSG_NOSIGNAL
) >= 0) {
522 if (unset_environment
)
523 unsetenv("NOTIFY_SOCKET");
528 _public_
int sd_pid_notify(pid_t pid
, int unset_environment
, const char *state
) {
529 return sd_pid_notify_with_fds(pid
, unset_environment
, state
, NULL
, 0);
532 _public_
int sd_notify(int unset_environment
, const char *state
) {
533 return sd_pid_notify_with_fds(0, unset_environment
, state
, NULL
, 0);
536 _public_
int sd_pid_notifyf(pid_t pid
, int unset_environment
, const char *format
, ...) {
537 _cleanup_free_
char *p
= NULL
;
543 va_start(ap
, format
);
544 r
= vasprintf(&p
, format
, ap
);
551 return sd_pid_notify(pid
, unset_environment
, p
);
554 _public_
int sd_notifyf(int unset_environment
, const char *format
, ...) {
555 _cleanup_free_
char *p
= NULL
;
561 va_start(ap
, format
);
562 r
= vasprintf(&p
, format
, ap
);
569 return sd_pid_notify(0, unset_environment
, p
);
572 _public_
int sd_booted(void) {
573 /* We test whether the runtime unit file directory has been
574 * created. This takes place in mount-setup.c, so is
575 * guaranteed to happen very early during boot. */
577 return laccess("/run/systemd/system/", F_OK
) >= 0;
580 _public_
int sd_watchdog_enabled(int unset_environment
, uint64_t *usec
) {
581 const char *s
, *p
= ""; /* p is set to dummy value to do unsetting */
585 s
= getenv("WATCHDOG_USEC");
589 r
= safe_atou64(s
, &u
);
592 if (u
<= 0 || u
>= USEC_INFINITY
) {
597 p
= getenv("WATCHDOG_PID");
601 r
= parse_pid(p
, &pid
);
605 /* Is this for us? */
606 if (getpid() != pid
) {
618 if (unset_environment
&& s
)
619 unsetenv("WATCHDOG_USEC");
620 if (unset_environment
&& p
)
621 unsetenv("WATCHDOG_PID");