]> git.ipfire.org Git - thirdparty/systemd.git/blame - src/util.c
manager: fix job mode for SIGRTMIN+1, +2
[thirdparty/systemd.git] / src / util.c
CommitLineData
d6c9574f 1/*-*- Mode: C; c-basic-offset: 8; indent-tabs-mode: nil -*-*/
60918275 2
a7334b09
LP
3/***
4 This file is part of systemd.
5
6 Copyright 2010 Lennart Poettering
7
8 systemd is free software; you can redistribute it and/or modify it
9 under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
12
13 systemd is distributed in the hope that it will be useful, but
14 WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 General Public License for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with systemd; If not, see <http://www.gnu.org/licenses/>.
20***/
21
60918275
LP
22#include <assert.h>
23#include <string.h>
24#include <unistd.h>
25#include <errno.h>
85261803 26#include <stdlib.h>
034c6ed7
LP
27#include <signal.h>
28#include <stdio.h>
1dccbe19
LP
29#include <syslog.h>
30#include <sched.h>
31#include <sys/resource.h>
ef886c6a 32#include <linux/sched.h>
a9f5d454
LP
33#include <sys/types.h>
34#include <sys/stat.h>
3a0ecb08 35#include <fcntl.h>
a0d40ac5 36#include <dirent.h>
601f6a1e
LP
37#include <sys/ioctl.h>
38#include <linux/vt.h>
39#include <linux/tiocl.h>
80876c20
LP
40#include <termios.h>
41#include <stdarg.h>
42#include <sys/inotify.h>
43#include <sys/poll.h>
8d567588 44#include <libgen.h>
3177a7fa 45#include <ctype.h>
5b6319dc 46#include <sys/prctl.h>
ef2f1067
LP
47#include <sys/utsname.h>
48#include <pwd.h>
4fd5948e 49#include <netinet/ip.h>
3fe5e5d4 50#include <linux/kd.h>
afea26ad 51#include <dlfcn.h>
2e78aa99 52#include <sys/wait.h>
ac123445 53#include <sys/capability.h>
7948c4df
KS
54#include <sys/time.h>
55#include <linux/rtc.h>
8092a428 56#include <glob.h>
4b67834e 57#include <grp.h>
60918275
LP
58
59#include "macro.h"
60#include "util.h"
1dccbe19
LP
61#include "ioprio.h"
62#include "missing.h"
a9f5d454 63#include "log.h"
65d2ebdc 64#include "strv.h"
e51bc1a2 65#include "label.h"
d06dacd0 66#include "exit-status.h"
83cc030f 67#include "hashmap.h"
56cf987f 68
9a0e6896
LP
69int saved_argc = 0;
70char **saved_argv = NULL;
71
37f85e66 72size_t page_size(void) {
73 static __thread size_t pgsz = 0;
74 long r;
75
3bfc7184 76 if (_likely_(pgsz))
37f85e66 77 return pgsz;
78
79 assert_se((r = sysconf(_SC_PAGESIZE)) > 0);
80
81 pgsz = (size_t) r;
82
83 return pgsz;
84}
85
e05797fb
LP
86bool streq_ptr(const char *a, const char *b) {
87
88 /* Like streq(), but tries to make sense of NULL pointers */
89
90 if (a && b)
91 return streq(a, b);
92
93 if (!a && !b)
94 return true;
95
96 return false;
97}
98
47be870b 99usec_t now(clockid_t clock_id) {
60918275
LP
100 struct timespec ts;
101
47be870b 102 assert_se(clock_gettime(clock_id, &ts) == 0);
60918275
LP
103
104 return timespec_load(&ts);
105}
106
63983207 107dual_timestamp* dual_timestamp_get(dual_timestamp *ts) {
871d7de4
LP
108 assert(ts);
109
110 ts->realtime = now(CLOCK_REALTIME);
111 ts->monotonic = now(CLOCK_MONOTONIC);
112
113 return ts;
114}
115
a185c5aa
LP
116dual_timestamp* dual_timestamp_from_realtime(dual_timestamp *ts, usec_t u) {
117 int64_t delta;
118 assert(ts);
119
120 ts->realtime = u;
121
122 if (u == 0)
123 ts->monotonic = 0;
124 else {
125 delta = (int64_t) now(CLOCK_REALTIME) - (int64_t) u;
126
127 ts->monotonic = now(CLOCK_MONOTONIC);
128
129 if ((int64_t) ts->monotonic > delta)
130 ts->monotonic -= delta;
131 else
132 ts->monotonic = 0;
133 }
134
135 return ts;
136}
137
60918275
LP
138usec_t timespec_load(const struct timespec *ts) {
139 assert(ts);
140
141 return
142 (usec_t) ts->tv_sec * USEC_PER_SEC +
143 (usec_t) ts->tv_nsec / NSEC_PER_USEC;
144}
145
146struct timespec *timespec_store(struct timespec *ts, usec_t u) {
147 assert(ts);
148
149 ts->tv_sec = (time_t) (u / USEC_PER_SEC);
150 ts->tv_nsec = (long int) ((u % USEC_PER_SEC) * NSEC_PER_USEC);
151
152 return ts;
153}
154
155usec_t timeval_load(const struct timeval *tv) {
156 assert(tv);
157
158 return
159 (usec_t) tv->tv_sec * USEC_PER_SEC +
160 (usec_t) tv->tv_usec;
161}
162
163struct timeval *timeval_store(struct timeval *tv, usec_t u) {
164 assert(tv);
165
166 tv->tv_sec = (time_t) (u / USEC_PER_SEC);
167 tv->tv_usec = (suseconds_t) (u % USEC_PER_SEC);
168
169 return tv;
170}
171
172bool endswith(const char *s, const char *postfix) {
173 size_t sl, pl;
174
175 assert(s);
176 assert(postfix);
177
178 sl = strlen(s);
179 pl = strlen(postfix);
180
d4d0d4db
LP
181 if (pl == 0)
182 return true;
183
60918275
LP
184 if (sl < pl)
185 return false;
186
187 return memcmp(s + sl - pl, postfix, pl) == 0;
188}
189
190bool startswith(const char *s, const char *prefix) {
191 size_t sl, pl;
192
193 assert(s);
194 assert(prefix);
195
196 sl = strlen(s);
197 pl = strlen(prefix);
198
d4d0d4db
LP
199 if (pl == 0)
200 return true;
201
60918275
LP
202 if (sl < pl)
203 return false;
204
205 return memcmp(s, prefix, pl) == 0;
206}
207
3177a7fa
MAP
208bool startswith_no_case(const char *s, const char *prefix) {
209 size_t sl, pl;
210 unsigned i;
211
212 assert(s);
213 assert(prefix);
214
215 sl = strlen(s);
216 pl = strlen(prefix);
217
218 if (pl == 0)
219 return true;
220
221 if (sl < pl)
222 return false;
223
224 for(i = 0; i < pl; ++i) {
225 if (tolower(s[i]) != tolower(prefix[i]))
226 return false;
227 }
228
229 return true;
230}
231
79d6d816
LP
232bool first_word(const char *s, const char *word) {
233 size_t sl, wl;
234
235 assert(s);
236 assert(word);
237
238 sl = strlen(s);
239 wl = strlen(word);
240
241 if (sl < wl)
242 return false;
243
d4d0d4db
LP
244 if (wl == 0)
245 return true;
246
79d6d816
LP
247 if (memcmp(s, word, wl) != 0)
248 return false;
249
d4d0d4db
LP
250 return s[wl] == 0 ||
251 strchr(WHITESPACE, s[wl]);
79d6d816
LP
252}
253
42f4e3c4 254int close_nointr(int fd) {
60918275
LP
255 assert(fd >= 0);
256
257 for (;;) {
258 int r;
259
48f82119
LP
260 r = close(fd);
261 if (r >= 0)
60918275
LP
262 return r;
263
264 if (errno != EINTR)
48f82119 265 return -errno;
60918275
LP
266 }
267}
85261803 268
85f136b5 269void close_nointr_nofail(int fd) {
80876c20 270 int saved_errno = errno;
85f136b5
LP
271
272 /* like close_nointr() but cannot fail, and guarantees errno
273 * is unchanged */
274
275 assert_se(close_nointr(fd) == 0);
80876c20
LP
276
277 errno = saved_errno;
85f136b5
LP
278}
279
5b6319dc
LP
280void close_many(const int fds[], unsigned n_fd) {
281 unsigned i;
282
283 for (i = 0; i < n_fd; i++)
284 close_nointr_nofail(fds[i]);
285}
286
85261803
LP
287int parse_boolean(const char *v) {
288 assert(v);
289
44d8db9e 290 if (streq(v, "1") || v[0] == 'y' || v[0] == 'Y' || v[0] == 't' || v[0] == 'T' || !strcasecmp(v, "on"))
85261803 291 return 1;
44d8db9e 292 else if (streq(v, "0") || v[0] == 'n' || v[0] == 'N' || v[0] == 'f' || v[0] == 'F' || !strcasecmp(v, "off"))
85261803
LP
293 return 0;
294
295 return -EINVAL;
296}
297
3ba686c1 298int parse_pid(const char *s, pid_t* ret_pid) {
0b172489 299 unsigned long ul = 0;
3ba686c1
LP
300 pid_t pid;
301 int r;
302
303 assert(s);
304 assert(ret_pid);
305
306 if ((r = safe_atolu(s, &ul)) < 0)
307 return r;
308
309 pid = (pid_t) ul;
310
311 if ((unsigned long) pid != ul)
312 return -ERANGE;
313
314 if (pid <= 0)
315 return -ERANGE;
316
317 *ret_pid = pid;
318 return 0;
319}
320
034a2a52
LP
321int parse_uid(const char *s, uid_t* ret_uid) {
322 unsigned long ul = 0;
323 uid_t uid;
324 int r;
325
326 assert(s);
327 assert(ret_uid);
328
329 if ((r = safe_atolu(s, &ul)) < 0)
330 return r;
331
332 uid = (uid_t) ul;
333
334 if ((unsigned long) uid != ul)
335 return -ERANGE;
336
337 *ret_uid = uid;
338 return 0;
339}
340
85261803
LP
341int safe_atou(const char *s, unsigned *ret_u) {
342 char *x = NULL;
034c6ed7 343 unsigned long l;
85261803
LP
344
345 assert(s);
346 assert(ret_u);
347
348 errno = 0;
349 l = strtoul(s, &x, 0);
350
351 if (!x || *x || errno)
352 return errno ? -errno : -EINVAL;
353
034c6ed7 354 if ((unsigned long) (unsigned) l != l)
85261803
LP
355 return -ERANGE;
356
357 *ret_u = (unsigned) l;
358 return 0;
359}
360
361int safe_atoi(const char *s, int *ret_i) {
362 char *x = NULL;
034c6ed7 363 long l;
85261803
LP
364
365 assert(s);
366 assert(ret_i);
367
368 errno = 0;
369 l = strtol(s, &x, 0);
370
371 if (!x || *x || errno)
372 return errno ? -errno : -EINVAL;
373
034c6ed7 374 if ((long) (int) l != l)
85261803
LP
375 return -ERANGE;
376
034c6ed7
LP
377 *ret_i = (int) l;
378 return 0;
379}
380
034c6ed7
LP
381int safe_atollu(const char *s, long long unsigned *ret_llu) {
382 char *x = NULL;
383 unsigned long long l;
384
385 assert(s);
386 assert(ret_llu);
387
388 errno = 0;
389 l = strtoull(s, &x, 0);
390
391 if (!x || *x || errno)
392 return errno ? -errno : -EINVAL;
393
394 *ret_llu = l;
395 return 0;
396}
397
398int safe_atolli(const char *s, long long int *ret_lli) {
399 char *x = NULL;
400 long long l;
401
402 assert(s);
403 assert(ret_lli);
404
405 errno = 0;
406 l = strtoll(s, &x, 0);
407
408 if (!x || *x || errno)
409 return errno ? -errno : -EINVAL;
410
411 *ret_lli = l;
85261803
LP
412 return 0;
413}
a41e8209 414
a41e8209 415/* Split a string into words. */
65d2ebdc 416char *split(const char *c, size_t *l, const char *separator, char **state) {
a41e8209
LP
417 char *current;
418
419 current = *state ? *state : (char*) c;
420
421 if (!*current || *c == 0)
422 return NULL;
423
65d2ebdc
LP
424 current += strspn(current, separator);
425 *l = strcspn(current, separator);
82919e3d
LP
426 *state = current+*l;
427
428 return (char*) current;
429}
430
034c6ed7
LP
431/* Split a string into words, but consider strings enclosed in '' and
432 * "" as words even if they include spaces. */
433char *split_quoted(const char *c, size_t *l, char **state) {
0bab36f2
LP
434 char *current, *e;
435 bool escaped = false;
034c6ed7
LP
436
437 current = *state ? *state : (char*) c;
438
439 if (!*current || *c == 0)
440 return NULL;
441
442 current += strspn(current, WHITESPACE);
443
444 if (*current == '\'') {
445 current ++;
034c6ed7 446
0bab36f2
LP
447 for (e = current; *e; e++) {
448 if (escaped)
449 escaped = false;
450 else if (*e == '\\')
451 escaped = true;
452 else if (*e == '\'')
453 break;
454 }
455
456 *l = e-current;
457 *state = *e == 0 ? e : e+1;
034c6ed7
LP
458 } else if (*current == '\"') {
459 current ++;
034c6ed7 460
0bab36f2
LP
461 for (e = current; *e; e++) {
462 if (escaped)
463 escaped = false;
464 else if (*e == '\\')
465 escaped = true;
466 else if (*e == '\"')
467 break;
468 }
469
470 *l = e-current;
471 *state = *e == 0 ? e : e+1;
034c6ed7 472 } else {
0bab36f2
LP
473 for (e = current; *e; e++) {
474 if (escaped)
475 escaped = false;
476 else if (*e == '\\')
477 escaped = true;
478 else if (strchr(WHITESPACE, *e))
479 break;
480 }
481 *l = e-current;
482 *state = e;
034c6ed7
LP
483 }
484
485 return (char*) current;
486}
487
65d2ebdc
LP
488char **split_path_and_make_absolute(const char *p) {
489 char **l;
490 assert(p);
491
492 if (!(l = strv_split(p, ":")))
493 return NULL;
494
495 if (!strv_path_make_absolute_cwd(l)) {
496 strv_free(l);
497 return NULL;
498 }
499
500 return l;
501}
502
034c6ed7
LP
503int get_parent_of_pid(pid_t pid, pid_t *_ppid) {
504 int r;
505 FILE *f;
20c03b7b 506 char fn[PATH_MAX], line[LINE_MAX], *p;
bb00e604 507 long unsigned ppid;
034c6ed7 508
8480e784 509 assert(pid > 0);
034c6ed7
LP
510 assert(_ppid);
511
bb00e604 512 assert_se(snprintf(fn, sizeof(fn)-1, "/proc/%lu/stat", (unsigned long) pid) < (int) (sizeof(fn)-1));
8480e784 513 char_array_0(fn);
034c6ed7 514
ccaa6149 515 if (!(f = fopen(fn, "re")))
034c6ed7
LP
516 return -errno;
517
518 if (!(fgets(line, sizeof(line), f))) {
519 r = -errno;
520 fclose(f);
521 return r;
522 }
523
524 fclose(f);
525
526 /* Let's skip the pid and comm fields. The latter is enclosed
527 * in () but does not escape any () in its value, so let's
528 * skip over it manually */
529
530 if (!(p = strrchr(line, ')')))
531 return -EIO;
532
533 p++;
534
535 if (sscanf(p, " "
536 "%*c " /* state */
bb00e604 537 "%lu ", /* ppid */
034c6ed7
LP
538 &ppid) != 1)
539 return -EIO;
540
bb00e604 541 if ((long unsigned) (pid_t) ppid != ppid)
034c6ed7
LP
542 return -ERANGE;
543
544 *_ppid = (pid_t) ppid;
545
546 return 0;
547}
548
7640a5de
LP
549int get_starttime_of_pid(pid_t pid, unsigned long long *st) {
550 int r;
551 FILE *f;
552 char fn[PATH_MAX], line[LINE_MAX], *p;
553
554 assert(pid > 0);
555 assert(st);
556
557 assert_se(snprintf(fn, sizeof(fn)-1, "/proc/%lu/stat", (unsigned long) pid) < (int) (sizeof(fn)-1));
558 char_array_0(fn);
559
ccaa6149 560 if (!(f = fopen(fn, "re")))
7640a5de
LP
561 return -errno;
562
563 if (!(fgets(line, sizeof(line), f))) {
564 r = -errno;
565 fclose(f);
566 return r;
567 }
568
569 fclose(f);
570
571 /* Let's skip the pid and comm fields. The latter is enclosed
572 * in () but does not escape any () in its value, so let's
573 * skip over it manually */
574
575 if (!(p = strrchr(line, ')')))
576 return -EIO;
577
578 p++;
579
580 if (sscanf(p, " "
581 "%*c " /* state */
582 "%*d " /* ppid */
583 "%*d " /* pgrp */
584 "%*d " /* session */
585 "%*d " /* tty_nr */
586 "%*d " /* tpgid */
587 "%*u " /* flags */
588 "%*u " /* minflt */
589 "%*u " /* cminflt */
590 "%*u " /* majflt */
591 "%*u " /* cmajflt */
592 "%*u " /* utime */
593 "%*u " /* stime */
594 "%*d " /* cutime */
595 "%*d " /* cstime */
596 "%*d " /* priority */
597 "%*d " /* nice */
598 "%*d " /* num_threads */
599 "%*d " /* itrealvalue */
600 "%llu " /* starttime */,
601 st) != 1)
602 return -EIO;
603
604 return 0;
605}
606
034c6ed7
LP
607int write_one_line_file(const char *fn, const char *line) {
608 FILE *f;
609 int r;
610
611 assert(fn);
612 assert(line);
613
614 if (!(f = fopen(fn, "we")))
615 return -errno;
616
34ca941c 617 errno = 0;
034c6ed7
LP
618 if (fputs(line, f) < 0) {
619 r = -errno;
620 goto finish;
621 }
622
8e1bd70d
LP
623 if (!endswith(line, "\n"))
624 fputc('\n', f);
625
151b190e
LP
626 fflush(f);
627
628 if (ferror(f)) {
629 if (errno != 0)
630 r = -errno;
631 else
632 r = -EIO;
633 } else
634 r = 0;
635
034c6ed7
LP
636finish:
637 fclose(f);
638 return r;
639}
640
34ca941c
LP
641int fchmod_umask(int fd, mode_t m) {
642 mode_t u;
643 int r;
644
645 u = umask(0777);
646 r = fchmod(fd, m & (~u)) < 0 ? -errno : 0;
647 umask(u);
648
649 return r;
650}
651
652int write_one_line_file_atomic(const char *fn, const char *line) {
653 FILE *f;
654 int r;
655 char *p;
656
657 assert(fn);
658 assert(line);
659
660 r = fopen_temporary(fn, &f, &p);
661 if (r < 0)
662 return r;
663
664 fchmod_umask(fileno(f), 0644);
665
666 errno = 0;
667 if (fputs(line, f) < 0) {
668 r = -errno;
669 goto finish;
670 }
671
672 if (!endswith(line, "\n"))
673 fputc('\n', f);
674
675 fflush(f);
676
677 if (ferror(f)) {
678 if (errno != 0)
679 r = -errno;
680 else
681 r = -EIO;
682 } else {
683 if (rename(p, fn) < 0)
684 r = -errno;
685 else
686 r = 0;
687 }
688
689finish:
690 if (r < 0)
691 unlink(p);
692
693 fclose(f);
694 free(p);
695
696 return r;
697}
698
034c6ed7
LP
699int read_one_line_file(const char *fn, char **line) {
700 FILE *f;
701 int r;
97c4a07d 702 char t[LINE_MAX], *c;
034c6ed7
LP
703
704 assert(fn);
705 assert(line);
706
707 if (!(f = fopen(fn, "re")))
708 return -errno;
709
710 if (!(fgets(t, sizeof(t), f))) {
711 r = -errno;
712 goto finish;
713 }
714
715 if (!(c = strdup(t))) {
716 r = -ENOMEM;
717 goto finish;
718 }
719
6f9a471a
LP
720 truncate_nl(c);
721
034c6ed7
LP
722 *line = c;
723 r = 0;
724
725finish:
726 fclose(f);
727 return r;
728}
44d8db9e 729
34ca941c 730int read_full_file(const char *fn, char **contents, size_t *size) {
97c4a07d
LP
731 FILE *f;
732 int r;
733 size_t n, l;
734 char *buf = NULL;
735 struct stat st;
736
737 if (!(f = fopen(fn, "re")))
738 return -errno;
739
740 if (fstat(fileno(f), &st) < 0) {
741 r = -errno;
742 goto finish;
743 }
744
34ca941c
LP
745 /* Safety check */
746 if (st.st_size > 4*1024*1024) {
747 r = -E2BIG;
748 goto finish;
749 }
750
97c4a07d
LP
751 n = st.st_size > 0 ? st.st_size : LINE_MAX;
752 l = 0;
753
754 for (;;) {
755 char *t;
756 size_t k;
757
758 if (!(t = realloc(buf, n+1))) {
759 r = -ENOMEM;
760 goto finish;
761 }
762
763 buf = t;
764 k = fread(buf + l, 1, n - l, f);
765
766 if (k <= 0) {
767 if (ferror(f)) {
768 r = -errno;
769 goto finish;
770 }
771
772 break;
773 }
774
775 l += k;
776 n *= 2;
777
778 /* Safety check */
779 if (n > 4*1024*1024) {
780 r = -E2BIG;
781 goto finish;
782 }
783 }
784
f8440af5 785 buf[l] = 0;
97c4a07d
LP
786 *contents = buf;
787 buf = NULL;
788
34ca941c
LP
789 if (size)
790 *size = l;
791
97c4a07d
LP
792 r = 0;
793
794finish:
795 fclose(f);
796 free(buf);
797
798 return r;
799}
800
801int parse_env_file(
802 const char *fname,
c899f8c6 803 const char *separator, ...) {
97c4a07d 804
ce8a6aa1 805 int r = 0;
44d91056 806 char *contents = NULL, *p;
97c4a07d
LP
807
808 assert(fname);
c899f8c6 809 assert(separator);
97c4a07d 810
34ca941c 811 if ((r = read_full_file(fname, &contents, NULL)) < 0)
97c4a07d
LP
812 return r;
813
814 p = contents;
815 for (;;) {
816 const char *key = NULL;
817
c899f8c6 818 p += strspn(p, separator);
97c4a07d
LP
819 p += strspn(p, WHITESPACE);
820
821 if (!*p)
822 break;
823
824 if (!strchr(COMMENTS, *p)) {
825 va_list ap;
826 char **value;
827
c899f8c6 828 va_start(ap, separator);
97c4a07d
LP
829 while ((key = va_arg(ap, char *))) {
830 size_t n;
831 char *v;
832
833 value = va_arg(ap, char **);
834
835 n = strlen(key);
836 if (strncmp(p, key, n) != 0 ||
837 p[n] != '=')
838 continue;
839
840 p += n + 1;
c899f8c6 841 n = strcspn(p, separator);
97c4a07d
LP
842
843 if (n >= 2 &&
e7db37dd
LP
844 strchr(QUOTES, p[0]) &&
845 p[n-1] == p[0])
97c4a07d
LP
846 v = strndup(p+1, n-2);
847 else
848 v = strndup(p, n);
849
850 if (!v) {
851 r = -ENOMEM;
852 va_end(ap);
853 goto fail;
854 }
855
dd36de4d
KS
856 if (v[0] == '\0') {
857 /* return empty value strings as NULL */
858 free(v);
859 v = NULL;
860 }
861
97c4a07d
LP
862 free(*value);
863 *value = v;
864
865 p += n;
ce8a6aa1
LP
866
867 r ++;
97c4a07d
LP
868 break;
869 }
870 va_end(ap);
871 }
872
873 if (!key)
c899f8c6 874 p += strcspn(p, separator);
97c4a07d
LP
875 }
876
97c4a07d
LP
877fail:
878 free(contents);
879 return r;
880}
881
8c7be95e
LP
882int load_env_file(
883 const char *fname,
884 char ***rl) {
885
886 FILE *f;
887 char **m = 0;
888 int r;
889
890 assert(fname);
891 assert(rl);
892
893 if (!(f = fopen(fname, "re")))
894 return -errno;
895
896 while (!feof(f)) {
897 char l[LINE_MAX], *p, *u;
898 char **t;
899
900 if (!fgets(l, sizeof(l), f)) {
901 if (feof(f))
902 break;
903
904 r = -errno;
905 goto finish;
906 }
907
908 p = strstrip(l);
909
910 if (!*p)
911 continue;
912
913 if (strchr(COMMENTS, *p))
914 continue;
915
916 if (!(u = normalize_env_assignment(p))) {
917 log_error("Out of memory");
918 r = -ENOMEM;
919 goto finish;
920 }
921
922 t = strv_append(m, u);
923 free(u);
924
925 if (!t) {
926 log_error("Out of memory");
927 r = -ENOMEM;
928 goto finish;
929 }
930
931 strv_free(m);
932 m = t;
933 }
934
935 r = 0;
936
937 *rl = m;
938 m = NULL;
939
940finish:
941 if (f)
942 fclose(f);
943
944 strv_free(m);
945
946 return r;
947}
948
7640a5de 949int write_env_file(const char *fname, char **l) {
34ca941c 950 char **i, *p;
7640a5de
LP
951 FILE *f;
952 int r;
953
34ca941c
LP
954 r = fopen_temporary(fname, &f, &p);
955 if (r < 0)
956 return r;
7640a5de 957
34ca941c
LP
958 fchmod_umask(fileno(f), 0644);
959
960 errno = 0;
7640a5de
LP
961 STRV_FOREACH(i, l) {
962 fputs(*i, f);
963 fputc('\n', f);
964 }
965
966 fflush(f);
967
34ca941c
LP
968 if (ferror(f)) {
969 if (errno != 0)
970 r = -errno;
971 else
972 r = -EIO;
973 } else {
974 if (rename(p, fname) < 0)
975 r = -errno;
976 else
977 r = 0;
978 }
979
980 if (r < 0)
981 unlink(p);
982
7640a5de 983 fclose(f);
34ca941c 984 free(p);
7640a5de
LP
985
986 return r;
987}
988
7072ced8
LP
989char *truncate_nl(char *s) {
990 assert(s);
991
992 s[strcspn(s, NEWLINE)] = 0;
993 return s;
994}
995
996int get_process_name(pid_t pid, char **name) {
997 char *p;
998 int r;
999
1000 assert(pid >= 1);
1001 assert(name);
1002
bb00e604 1003 if (asprintf(&p, "/proc/%lu/comm", (unsigned long) pid) < 0)
7072ced8
LP
1004 return -ENOMEM;
1005
1006 r = read_one_line_file(p, name);
1007 free(p);
1008
1009 if (r < 0)
1010 return r;
1011
7072ced8
LP
1012 return 0;
1013}
1014
c59760ee
LP
1015int get_process_cmdline(pid_t pid, size_t max_length, char **line) {
1016 char *p, *r, *k;
1017 int c;
1018 bool space = false;
1019 size_t left;
1020 FILE *f;
1021
1022 assert(pid >= 1);
1023 assert(max_length > 0);
1024 assert(line);
1025
1026 if (asprintf(&p, "/proc/%lu/cmdline", (unsigned long) pid) < 0)
1027 return -ENOMEM;
1028
ccaa6149 1029 f = fopen(p, "re");
c59760ee
LP
1030 free(p);
1031
1032 if (!f)
1033 return -errno;
1034
1035 if (!(r = new(char, max_length))) {
1036 fclose(f);
1037 return -ENOMEM;
1038 }
1039
1040 k = r;
1041 left = max_length;
1042 while ((c = getc(f)) != EOF) {
1043
1044 if (isprint(c)) {
1045 if (space) {
1046 if (left <= 4)
1047 break;
1048
1049 *(k++) = ' ';
057fbb58 1050 left--;
c59760ee
LP
1051 space = false;
1052 }
1053
1054 if (left <= 4)
1055 break;
1056
1057 *(k++) = (char) c;
057fbb58 1058 left--;
c59760ee
LP
1059 } else
1060 space = true;
1061 }
1062
1063 if (left <= 4) {
1064 size_t n = MIN(left-1, 3U);
1065 memcpy(k, "...", n);
1066 k[n] = 0;
1067 } else
1068 *k = 0;
1069
1070 fclose(f);
1071
35d2e7ec
LP
1072 /* Kernel threads have no argv[] */
1073 if (r[0] == 0) {
1074 char *t;
1075 int h;
1076
1077 free(r);
1078
1079 if ((h = get_process_name(pid, &t)) < 0)
1080 return h;
1081
1082 h = asprintf(&r, "[%s]", t);
1083 free(t);
1084
1085 if (h < 0)
1086 return -ENOMEM;
1087 }
fa776d8e 1088
c59760ee
LP
1089 *line = r;
1090 return 0;
1091}
1092
fab56fc5
LP
1093char *strnappend(const char *s, const char *suffix, size_t b) {
1094 size_t a;
44d8db9e
LP
1095 char *r;
1096
fab56fc5
LP
1097 if (!s && !suffix)
1098 return strdup("");
1099
1100 if (!s)
1101 return strndup(suffix, b);
1102
1103 if (!suffix)
1104 return strdup(s);
1105
44d8db9e
LP
1106 assert(s);
1107 assert(suffix);
1108
1109 a = strlen(s);
44d8db9e
LP
1110
1111 if (!(r = new(char, a+b+1)))
1112 return NULL;
1113
1114 memcpy(r, s, a);
1115 memcpy(r+a, suffix, b);
1116 r[a+b] = 0;
1117
1118 return r;
1119}
87f0e418 1120
fab56fc5
LP
1121char *strappend(const char *s, const char *suffix) {
1122 return strnappend(s, suffix, suffix ? strlen(suffix) : 0);
1123}
1124
87f0e418
LP
1125int readlink_malloc(const char *p, char **r) {
1126 size_t l = 100;
1127
1128 assert(p);
1129 assert(r);
1130
1131 for (;;) {
1132 char *c;
1133 ssize_t n;
1134
1135 if (!(c = new(char, l)))
1136 return -ENOMEM;
1137
1138 if ((n = readlink(p, c, l-1)) < 0) {
1139 int ret = -errno;
1140 free(c);
1141 return ret;
1142 }
1143
1144 if ((size_t) n < l-1) {
1145 c[n] = 0;
1146 *r = c;
1147 return 0;
1148 }
1149
1150 free(c);
1151 l *= 2;
1152 }
1153}
1154
2c7108c4
LP
1155int readlink_and_make_absolute(const char *p, char **r) {
1156 char *target, *k;
1157 int j;
1158
1159 assert(p);
1160 assert(r);
1161
1162 if ((j = readlink_malloc(p, &target)) < 0)
1163 return j;
1164
1165 k = file_in_same_dir(p, target);
1166 free(target);
1167
1168 if (!k)
1169 return -ENOMEM;
1170
1171 *r = k;
1172 return 0;
1173}
1174
83096483
LP
1175int readlink_and_canonicalize(const char *p, char **r) {
1176 char *t, *s;
1177 int j;
1178
1179 assert(p);
1180 assert(r);
1181
1182 j = readlink_and_make_absolute(p, &t);
1183 if (j < 0)
1184 return j;
1185
1186 s = canonicalize_file_name(t);
1187 if (s) {
1188 free(t);
1189 *r = s;
1190 } else
1191 *r = t;
1192
1193 path_kill_slashes(*r);
1194
1195 return 0;
1196}
1197
35d2e7ec
LP
1198int parent_of_path(const char *path, char **_r) {
1199 const char *e, *a = NULL, *b = NULL, *p;
1200 char *r;
1201 bool slash = false;
1202
1203 assert(path);
1204 assert(_r);
1205
1206 if (!*path)
1207 return -EINVAL;
1208
1209 for (e = path; *e; e++) {
1210
1211 if (!slash && *e == '/') {
1212 a = b;
1213 b = e;
1214 slash = true;
1215 } else if (slash && *e != '/')
1216 slash = false;
1217 }
1218
1219 if (*(e-1) == '/')
1220 p = a;
1221 else
1222 p = b;
1223
1224 if (!p)
1225 return -EINVAL;
1226
1227 if (p == path)
1228 r = strdup("/");
1229 else
1230 r = strndup(path, p-path);
1231
1232 if (!r)
1233 return -ENOMEM;
1234
1235 *_r = r;
1236 return 0;
1237}
1238
1239
87f0e418
LP
1240char *file_name_from_path(const char *p) {
1241 char *r;
1242
1243 assert(p);
1244
1245 if ((r = strrchr(p, '/')))
1246 return r + 1;
1247
1248 return (char*) p;
1249}
0301abf4
LP
1250
1251bool path_is_absolute(const char *p) {
1252 assert(p);
1253
1254 return p[0] == '/';
1255}
1256
1257bool is_path(const char *p) {
1258
1259 return !!strchr(p, '/');
1260}
1261
1262char *path_make_absolute(const char *p, const char *prefix) {
0301abf4
LP
1263 assert(p);
1264
65d2ebdc
LP
1265 /* Makes every item in the list an absolute path by prepending
1266 * the prefix, if specified and necessary */
1267
0301abf4
LP
1268 if (path_is_absolute(p) || !prefix)
1269 return strdup(p);
1270
44d91056 1271 return join(prefix, "/", p, NULL);
0301abf4 1272}
2a987ee8 1273
65d2ebdc
LP
1274char *path_make_absolute_cwd(const char *p) {
1275 char *cwd, *r;
1276
1277 assert(p);
1278
1279 /* Similar to path_make_absolute(), but prefixes with the
1280 * current working directory. */
1281
1282 if (path_is_absolute(p))
1283 return strdup(p);
1284
1285 if (!(cwd = get_current_dir_name()))
1286 return NULL;
1287
1288 r = path_make_absolute(p, cwd);
1289 free(cwd);
1290
1291 return r;
1292}
1293
1294char **strv_path_make_absolute_cwd(char **l) {
1295 char **s;
1296
1297 /* Goes through every item in the string list and makes it
1298 * absolute. This works in place and won't rollback any
1299 * changes on failure. */
1300
1301 STRV_FOREACH(s, l) {
1302 char *t;
1303
1304 if (!(t = path_make_absolute_cwd(*s)))
1305 return NULL;
1306
1307 free(*s);
1308 *s = t;
1309 }
1310
1311 return l;
1312}
1313
c3f6d675
LP
1314char **strv_path_canonicalize(char **l) {
1315 char **s;
1316 unsigned k = 0;
1317 bool enomem = false;
1318
1319 if (strv_isempty(l))
1320 return l;
1321
1322 /* Goes through every item in the string list and canonicalize
1323 * the path. This works in place and won't rollback any
1324 * changes on failure. */
1325
1326 STRV_FOREACH(s, l) {
1327 char *t, *u;
1328
1329 t = path_make_absolute_cwd(*s);
1330 free(*s);
1331
1332 if (!t) {
1333 enomem = true;
1334 continue;
1335 }
1336
1337 errno = 0;
1338 u = canonicalize_file_name(t);
1339 free(t);
1340
1341 if (!u) {
1342 if (errno == ENOMEM || !errno)
1343 enomem = true;
1344
1345 continue;
1346 }
1347
1348 l[k++] = u;
1349 }
1350
1351 l[k] = NULL;
1352
1353 if (enomem)
1354 return NULL;
1355
1356 return l;
a9dd2082
LP
1357}
1358
1359char **strv_path_remove_empty(char **l) {
1360 char **f, **t;
1361
1362 if (!l)
1363 return NULL;
1364
1365 for (f = t = l; *f; f++) {
1366
1367 if (dir_is_empty(*f) > 0) {
1368 free(*f);
1369 continue;
1370 }
1371
1372 *(t++) = *f;
1373 }
1374
1375 *t = NULL;
1376 return l;
c3f6d675
LP
1377}
1378
2a987ee8
LP
1379int reset_all_signal_handlers(void) {
1380 int sig;
1381
1382 for (sig = 1; sig < _NSIG; sig++) {
1383 struct sigaction sa;
1384
1385 if (sig == SIGKILL || sig == SIGSTOP)
1386 continue;
1387
1388 zero(sa);
1389 sa.sa_handler = SIG_DFL;
431c32bf 1390 sa.sa_flags = SA_RESTART;
2a987ee8
LP
1391
1392 /* On Linux the first two RT signals are reserved by
1393 * glibc, and sigaction() will return EINVAL for them. */
1394 if ((sigaction(sig, &sa, NULL) < 0))
1395 if (errno != EINVAL)
1396 return -errno;
1397 }
1398
8e274523 1399 return 0;
2a987ee8 1400}
4a72ff34
LP
1401
1402char *strstrip(char *s) {
57a8eca8 1403 char *e;
4a72ff34
LP
1404
1405 /* Drops trailing whitespace. Modifies the string in
1406 * place. Returns pointer to first non-space character */
1407
1408 s += strspn(s, WHITESPACE);
1409
57a8eca8
LP
1410 for (e = strchr(s, 0); e > s; e --)
1411 if (!strchr(WHITESPACE, e[-1]))
1412 break;
4a72ff34 1413
57a8eca8 1414 *e = 0;
4a72ff34
LP
1415
1416 return s;
4a72ff34
LP
1417}
1418
ee9b5e01
LP
1419char *delete_chars(char *s, const char *bad) {
1420 char *f, *t;
1421
1422 /* Drops all whitespace, regardless where in the string */
1423
1424 for (f = s, t = s; *f; f++) {
1425 if (strchr(bad, *f))
1426 continue;
1427
1428 *(t++) = *f;
1429 }
1430
1431 *t = 0;
1432
1433 return s;
1434}
1435
ab1f0633
LP
1436bool in_charset(const char *s, const char* charset) {
1437 const char *i;
1438
1439 assert(s);
1440 assert(charset);
1441
1442 for (i = s; *i; i++)
1443 if (!strchr(charset, *i))
1444 return false;
1445
1446 return true;
1447}
1448
4a72ff34
LP
1449char *file_in_same_dir(const char *path, const char *filename) {
1450 char *e, *r;
1451 size_t k;
1452
1453 assert(path);
1454 assert(filename);
1455
1456 /* This removes the last component of path and appends
1457 * filename, unless the latter is absolute anyway or the
1458 * former isn't */
1459
1460 if (path_is_absolute(filename))
1461 return strdup(filename);
1462
1463 if (!(e = strrchr(path, '/')))
1464 return strdup(filename);
1465
1466 k = strlen(filename);
1467 if (!(r = new(char, e-path+1+k+1)))
1468 return NULL;
1469
1470 memcpy(r, path, e-path+1);
1471 memcpy(r+(e-path)+1, filename, k+1);
1472
1473 return r;
1474}
fb624d04 1475
8c6db833
LP
1476int safe_mkdir(const char *path, mode_t mode, uid_t uid, gid_t gid) {
1477 struct stat st;
1478
56cf987f 1479 if (label_mkdir(path, mode) >= 0)
8c6db833
LP
1480 if (chmod_and_chown(path, mode, uid, gid) < 0)
1481 return -errno;
1482
1483 if (lstat(path, &st) < 0)
1484 return -errno;
1485
1486 if ((st.st_mode & 0777) != mode ||
1487 st.st_uid != uid ||
1488 st.st_gid != gid ||
1489 !S_ISDIR(st.st_mode)) {
1490 errno = EEXIST;
1491 return -errno;
1492 }
1493
1494 return 0;
1495}
1496
1497
a9f5d454
LP
1498int mkdir_parents(const char *path, mode_t mode) {
1499 const char *p, *e;
1500
1501 assert(path);
1502
1503 /* Creates every parent directory in the path except the last
1504 * component. */
1505
1506 p = path + strspn(path, "/");
1507 for (;;) {
1508 int r;
1509 char *t;
1510
1511 e = p + strcspn(p, "/");
1512 p = e + strspn(e, "/");
1513
1514 /* Is this the last component? If so, then we're
1515 * done */
1516 if (*p == 0)
1517 return 0;
1518
1519 if (!(t = strndup(path, e - path)))
1520 return -ENOMEM;
1521
56cf987f 1522 r = label_mkdir(t, mode);
a9f5d454
LP
1523 free(t);
1524
1525 if (r < 0 && errno != EEXIST)
1526 return -errno;
1527 }
1528}
1529
bbd67135
LP
1530int mkdir_p(const char *path, mode_t mode) {
1531 int r;
1532
1533 /* Like mkdir -p */
1534
1535 if ((r = mkdir_parents(path, mode)) < 0)
1536 return r;
1537
56cf987f 1538 if (label_mkdir(path, mode) < 0 && errno != EEXIST)
bbd67135
LP
1539 return -errno;
1540
1541 return 0;
1542}
1543
c32dd69b
LP
1544int rmdir_parents(const char *path, const char *stop) {
1545 size_t l;
1546 int r = 0;
1547
1548 assert(path);
1549 assert(stop);
1550
1551 l = strlen(path);
1552
1553 /* Skip trailing slashes */
1554 while (l > 0 && path[l-1] == '/')
1555 l--;
1556
1557 while (l > 0) {
1558 char *t;
1559
1560 /* Skip last component */
1561 while (l > 0 && path[l-1] != '/')
1562 l--;
1563
1564 /* Skip trailing slashes */
1565 while (l > 0 && path[l-1] == '/')
1566 l--;
1567
1568 if (l <= 0)
1569 break;
1570
1571 if (!(t = strndup(path, l)))
1572 return -ENOMEM;
1573
1574 if (path_startswith(stop, t)) {
1575 free(t);
1576 return 0;
1577 }
1578
1579 r = rmdir(t);
1580 free(t);
1581
1582 if (r < 0)
1583 if (errno != ENOENT)
1584 return -errno;
1585 }
1586
1587 return 0;
1588}
1589
1590
fb624d04
LP
1591char hexchar(int x) {
1592 static const char table[16] = "0123456789abcdef";
1593
1594 return table[x & 15];
1595}
4fe88d28
LP
1596
1597int unhexchar(char c) {
1598
1599 if (c >= '0' && c <= '9')
1600 return c - '0';
1601
1602 if (c >= 'a' && c <= 'f')
ea430986 1603 return c - 'a' + 10;
4fe88d28
LP
1604
1605 if (c >= 'A' && c <= 'F')
ea430986 1606 return c - 'A' + 10;
4fe88d28
LP
1607
1608 return -1;
1609}
1610
1611char octchar(int x) {
1612 return '0' + (x & 7);
1613}
1614
1615int unoctchar(char c) {
1616
1617 if (c >= '0' && c <= '7')
1618 return c - '0';
1619
1620 return -1;
1621}
1622
5af98f82
LP
1623char decchar(int x) {
1624 return '0' + (x % 10);
1625}
1626
1627int undecchar(char c) {
1628
1629 if (c >= '0' && c <= '9')
1630 return c - '0';
1631
1632 return -1;
1633}
1634
4fe88d28
LP
1635char *cescape(const char *s) {
1636 char *r, *t;
1637 const char *f;
1638
1639 assert(s);
1640
1641 /* Does C style string escaping. */
1642
1643 if (!(r = new(char, strlen(s)*4 + 1)))
1644 return NULL;
1645
1646 for (f = s, t = r; *f; f++)
1647
1648 switch (*f) {
1649
1650 case '\a':
1651 *(t++) = '\\';
1652 *(t++) = 'a';
1653 break;
1654 case '\b':
1655 *(t++) = '\\';
1656 *(t++) = 'b';
1657 break;
1658 case '\f':
1659 *(t++) = '\\';
1660 *(t++) = 'f';
1661 break;
1662 case '\n':
1663 *(t++) = '\\';
1664 *(t++) = 'n';
1665 break;
1666 case '\r':
1667 *(t++) = '\\';
1668 *(t++) = 'r';
1669 break;
1670 case '\t':
1671 *(t++) = '\\';
1672 *(t++) = 't';
1673 break;
1674 case '\v':
1675 *(t++) = '\\';
1676 *(t++) = 'v';
1677 break;
1678 case '\\':
1679 *(t++) = '\\';
1680 *(t++) = '\\';
1681 break;
1682 case '"':
1683 *(t++) = '\\';
1684 *(t++) = '"';
1685 break;
1686 case '\'':
1687 *(t++) = '\\';
1688 *(t++) = '\'';
1689 break;
1690
1691 default:
1692 /* For special chars we prefer octal over
1693 * hexadecimal encoding, simply because glib's
1694 * g_strescape() does the same */
1695 if ((*f < ' ') || (*f >= 127)) {
1696 *(t++) = '\\';
1697 *(t++) = octchar((unsigned char) *f >> 6);
1698 *(t++) = octchar((unsigned char) *f >> 3);
1699 *(t++) = octchar((unsigned char) *f);
1700 } else
1701 *(t++) = *f;
1702 break;
1703 }
1704
1705 *t = 0;
1706
1707 return r;
1708}
1709
6febfd0d 1710char *cunescape_length(const char *s, size_t length) {
4fe88d28
LP
1711 char *r, *t;
1712 const char *f;
1713
1714 assert(s);
1715
1716 /* Undoes C style string escaping */
1717
6febfd0d 1718 if (!(r = new(char, length+1)))
4fe88d28
LP
1719 return r;
1720
6febfd0d 1721 for (f = s, t = r; f < s + length; f++) {
4fe88d28
LP
1722
1723 if (*f != '\\') {
1724 *(t++) = *f;
1725 continue;
1726 }
1727
1728 f++;
1729
1730 switch (*f) {
1731
1732 case 'a':
1733 *(t++) = '\a';
1734 break;
1735 case 'b':
1736 *(t++) = '\b';
1737 break;
1738 case 'f':
1739 *(t++) = '\f';
1740 break;
1741 case 'n':
1742 *(t++) = '\n';
1743 break;
1744 case 'r':
1745 *(t++) = '\r';
1746 break;
1747 case 't':
1748 *(t++) = '\t';
1749 break;
1750 case 'v':
1751 *(t++) = '\v';
1752 break;
1753 case '\\':
1754 *(t++) = '\\';
1755 break;
1756 case '"':
1757 *(t++) = '"';
1758 break;
1759 case '\'':
1760 *(t++) = '\'';
1761 break;
1762
e167fb86
LP
1763 case 's':
1764 /* This is an extension of the XDG syntax files */
1765 *(t++) = ' ';
1766 break;
1767
4fe88d28
LP
1768 case 'x': {
1769 /* hexadecimal encoding */
1770 int a, b;
1771
1772 if ((a = unhexchar(f[1])) < 0 ||
1773 (b = unhexchar(f[2])) < 0) {
1774 /* Invalid escape code, let's take it literal then */
1775 *(t++) = '\\';
1776 *(t++) = 'x';
1777 } else {
1778 *(t++) = (char) ((a << 4) | b);
1779 f += 2;
1780 }
1781
1782 break;
1783 }
1784
1785 case '0':
1786 case '1':
1787 case '2':
1788 case '3':
1789 case '4':
1790 case '5':
1791 case '6':
1792 case '7': {
1793 /* octal encoding */
1794 int a, b, c;
1795
1796 if ((a = unoctchar(f[0])) < 0 ||
1797 (b = unoctchar(f[1])) < 0 ||
1798 (c = unoctchar(f[2])) < 0) {
1799 /* Invalid escape code, let's take it literal then */
1800 *(t++) = '\\';
1801 *(t++) = f[0];
1802 } else {
1803 *(t++) = (char) ((a << 6) | (b << 3) | c);
1804 f += 2;
1805 }
1806
1807 break;
1808 }
1809
1810 case 0:
1811 /* premature end of string.*/
1812 *(t++) = '\\';
1813 goto finish;
1814
1815 default:
1816 /* Invalid escape code, let's take it literal then */
1817 *(t++) = '\\';
f3d4cc01 1818 *(t++) = *f;
4fe88d28
LP
1819 break;
1820 }
1821 }
1822
1823finish:
1824 *t = 0;
1825 return r;
1826}
1827
6febfd0d
LP
1828char *cunescape(const char *s) {
1829 return cunescape_length(s, strlen(s));
1830}
4fe88d28
LP
1831
1832char *xescape(const char *s, const char *bad) {
1833 char *r, *t;
1834 const char *f;
1835
1836 /* Escapes all chars in bad, in addition to \ and all special
1837 * chars, in \xFF style escaping. May be reversed with
1838 * cunescape. */
1839
1840 if (!(r = new(char, strlen(s)*4+1)))
1841 return NULL;
1842
1843 for (f = s, t = r; *f; f++) {
1844
b866264a
LP
1845 if ((*f < ' ') || (*f >= 127) ||
1846 (*f == '\\') || strchr(bad, *f)) {
4fe88d28
LP
1847 *(t++) = '\\';
1848 *(t++) = 'x';
1849 *(t++) = hexchar(*f >> 4);
1850 *(t++) = hexchar(*f);
1851 } else
1852 *(t++) = *f;
1853 }
1854
1855 *t = 0;
1856
1857 return r;
1858}
1859
ea430986 1860char *bus_path_escape(const char *s) {
ea430986
LP
1861 char *r, *t;
1862 const char *f;
1863
47be870b
LP
1864 assert(s);
1865
ea430986
LP
1866 /* Escapes all chars that D-Bus' object path cannot deal
1867 * with. Can be reverse with bus_path_unescape() */
1868
1869 if (!(r = new(char, strlen(s)*3+1)))
1870 return NULL;
1871
1872 for (f = s, t = r; *f; f++) {
1873
1874 if (!(*f >= 'A' && *f <= 'Z') &&
1875 !(*f >= 'a' && *f <= 'z') &&
1876 !(*f >= '0' && *f <= '9')) {
1877 *(t++) = '_';
1878 *(t++) = hexchar(*f >> 4);
1879 *(t++) = hexchar(*f);
1880 } else
1881 *(t++) = *f;
1882 }
1883
1884 *t = 0;
1885
1886 return r;
1887}
1888
9e2f7c11 1889char *bus_path_unescape(const char *f) {
ea430986 1890 char *r, *t;
ea430986 1891
9e2f7c11 1892 assert(f);
47be870b 1893
9e2f7c11 1894 if (!(r = strdup(f)))
ea430986
LP
1895 return NULL;
1896
9e2f7c11 1897 for (t = r; *f; f++) {
ea430986
LP
1898
1899 if (*f == '_') {
1900 int a, b;
1901
1902 if ((a = unhexchar(f[1])) < 0 ||
1903 (b = unhexchar(f[2])) < 0) {
1904 /* Invalid escape code, let's take it literal then */
1905 *(t++) = '_';
1906 } else {
1907 *(t++) = (char) ((a << 4) | b);
1908 f += 2;
1909 }
1910 } else
1911 *(t++) = *f;
1912 }
1913
1914 *t = 0;
1915
1916 return r;
1917}
1918
4fe88d28
LP
1919char *path_kill_slashes(char *path) {
1920 char *f, *t;
1921 bool slash = false;
1922
1923 /* Removes redundant inner and trailing slashes. Modifies the
1924 * passed string in-place.
1925 *
1926 * ///foo///bar/ becomes /foo/bar
1927 */
1928
1929 for (f = path, t = path; *f; f++) {
1930
1931 if (*f == '/') {
1932 slash = true;
1933 continue;
1934 }
1935
1936 if (slash) {
1937 slash = false;
1938 *(t++) = '/';
1939 }
1940
1941 *(t++) = *f;
1942 }
1943
1944 /* Special rule, if we are talking of the root directory, a
1945 trailing slash is good */
1946
1947 if (t == path && slash)
1948 *(t++) = '/';
1949
1950 *t = 0;
1951 return path;
1952}
1953
1954bool path_startswith(const char *path, const char *prefix) {
1955 assert(path);
1956 assert(prefix);
1957
1958 if ((path[0] == '/') != (prefix[0] == '/'))
1959 return false;
1960
1961 for (;;) {
1962 size_t a, b;
1963
1964 path += strspn(path, "/");
1965 prefix += strspn(prefix, "/");
1966
1967 if (*prefix == 0)
1968 return true;
1969
1970 if (*path == 0)
1971 return false;
1972
1973 a = strcspn(path, "/");
1974 b = strcspn(prefix, "/");
1975
1976 if (a != b)
1977 return false;
1978
1979 if (memcmp(path, prefix, a) != 0)
1980 return false;
1981
1982 path += a;
1983 prefix += b;
1984 }
1985}
1986
15ae422b
LP
1987bool path_equal(const char *a, const char *b) {
1988 assert(a);
1989 assert(b);
1990
1991 if ((a[0] == '/') != (b[0] == '/'))
1992 return false;
1993
1994 for (;;) {
1995 size_t j, k;
1996
1997 a += strspn(a, "/");
1998 b += strspn(b, "/");
1999
2000 if (*a == 0 && *b == 0)
2001 return true;
2002
2003 if (*a == 0 || *b == 0)
2004 return false;
2005
2006 j = strcspn(a, "/");
2007 k = strcspn(b, "/");
2008
2009 if (j != k)
2010 return false;
2011
2012 if (memcmp(a, b, j) != 0)
2013 return false;
2014
2015 a += j;
2016 b += k;
2017 }
2018}
2019
67d51650 2020char *ascii_strlower(char *t) {
4fe88d28
LP
2021 char *p;
2022
67d51650 2023 assert(t);
4fe88d28 2024
67d51650 2025 for (p = t; *p; p++)
4fe88d28
LP
2026 if (*p >= 'A' && *p <= 'Z')
2027 *p = *p - 'A' + 'a';
2028
67d51650 2029 return t;
4fe88d28 2030}
1dccbe19 2031
c85dc17b
LP
2032bool ignore_file(const char *filename) {
2033 assert(filename);
2034
2035 return
2036 filename[0] == '.' ||
6c78be3c 2037 streq(filename, "lost+found") ||
e472d476
LP
2038 streq(filename, "aquota.user") ||
2039 streq(filename, "aquota.group") ||
c85dc17b
LP
2040 endswith(filename, "~") ||
2041 endswith(filename, ".rpmnew") ||
2042 endswith(filename, ".rpmsave") ||
2043 endswith(filename, ".rpmorig") ||
2044 endswith(filename, ".dpkg-old") ||
2045 endswith(filename, ".dpkg-new") ||
2046 endswith(filename, ".swp");
2047}
2048
3a0ecb08
LP
2049int fd_nonblock(int fd, bool nonblock) {
2050 int flags;
2051
2052 assert(fd >= 0);
2053
2054 if ((flags = fcntl(fd, F_GETFL, 0)) < 0)
2055 return -errno;
2056
2057 if (nonblock)
2058 flags |= O_NONBLOCK;
2059 else
2060 flags &= ~O_NONBLOCK;
2061
2062 if (fcntl(fd, F_SETFL, flags) < 0)
2063 return -errno;
2064
2065 return 0;
2066}
2067
2068int fd_cloexec(int fd, bool cloexec) {
2069 int flags;
2070
2071 assert(fd >= 0);
2072
2073 if ((flags = fcntl(fd, F_GETFD, 0)) < 0)
2074 return -errno;
2075
2076 if (cloexec)
2077 flags |= FD_CLOEXEC;
2078 else
2079 flags &= ~FD_CLOEXEC;
2080
2081 if (fcntl(fd, F_SETFD, flags) < 0)
2082 return -errno;
2083
2084 return 0;
2085}
2086
a0d40ac5
LP
2087int close_all_fds(const int except[], unsigned n_except) {
2088 DIR *d;
2089 struct dirent *de;
2090 int r = 0;
2091
2092 if (!(d = opendir("/proc/self/fd")))
2093 return -errno;
2094
2095 while ((de = readdir(d))) {
a7610064 2096 int fd = -1;
a0d40ac5 2097
a16e1123 2098 if (ignore_file(de->d_name))
a0d40ac5
LP
2099 continue;
2100
720ce21d
LP
2101 if (safe_atoi(de->d_name, &fd) < 0)
2102 /* Let's better ignore this, just in case */
2103 continue;
a0d40ac5
LP
2104
2105 if (fd < 3)
2106 continue;
2107
2108 if (fd == dirfd(d))
2109 continue;
2110
2111 if (except) {
2112 bool found;
2113 unsigned i;
2114
2115 found = false;
2116 for (i = 0; i < n_except; i++)
2117 if (except[i] == fd) {
2118 found = true;
2119 break;
2120 }
2121
2122 if (found)
2123 continue;
2124 }
2125
720ce21d 2126 if (close_nointr(fd) < 0) {
2f357920 2127 /* Valgrind has its own FD and doesn't want to have it closed */
720ce21d
LP
2128 if (errno != EBADF && r == 0)
2129 r = -errno;
2f357920 2130 }
a0d40ac5
LP
2131 }
2132
a0d40ac5
LP
2133 closedir(d);
2134 return r;
2135}
2136
db12775d
LP
2137bool chars_intersect(const char *a, const char *b) {
2138 const char *p;
2139
2140 /* Returns true if any of the chars in a are in b. */
2141 for (p = a; *p; p++)
2142 if (strchr(b, *p))
2143 return true;
2144
2145 return false;
2146}
2147
8b6c7120
LP
2148char *format_timestamp(char *buf, size_t l, usec_t t) {
2149 struct tm tm;
2150 time_t sec;
2151
2152 assert(buf);
2153 assert(l > 0);
2154
2155 if (t <= 0)
2156 return NULL;
2157
f872ec33 2158 sec = (time_t) (t / USEC_PER_SEC);
8b6c7120
LP
2159
2160 if (strftime(buf, l, "%a, %d %b %Y %H:%M:%S %z", localtime_r(&sec, &tm)) <= 0)
2161 return NULL;
2162
2163 return buf;
2164}
2165
584be568
LP
2166char *format_timestamp_pretty(char *buf, size_t l, usec_t t) {
2167 usec_t n, d;
2168
2169 n = now(CLOCK_REALTIME);
2170
2171 if (t <= 0 || t > n || t + USEC_PER_DAY*7 <= t)
2172 return NULL;
2173
2174 d = n - t;
2175
2176 if (d >= USEC_PER_YEAR)
2177 snprintf(buf, l, "%llu years and %llu months ago",
2178 (unsigned long long) (d / USEC_PER_YEAR),
2179 (unsigned long long) ((d % USEC_PER_YEAR) / USEC_PER_MONTH));
2180 else if (d >= USEC_PER_MONTH)
2181 snprintf(buf, l, "%llu months and %llu days ago",
2182 (unsigned long long) (d / USEC_PER_MONTH),
2183 (unsigned long long) ((d % USEC_PER_MONTH) / USEC_PER_DAY));
2184 else if (d >= USEC_PER_WEEK)
2185 snprintf(buf, l, "%llu weeks and %llu days ago",
2186 (unsigned long long) (d / USEC_PER_WEEK),
2187 (unsigned long long) ((d % USEC_PER_WEEK) / USEC_PER_DAY));
2188 else if (d >= 2*USEC_PER_DAY)
2189 snprintf(buf, l, "%llu days ago", (unsigned long long) (d / USEC_PER_DAY));
2190 else if (d >= 25*USEC_PER_HOUR)
2191 snprintf(buf, l, "1 day and %lluh ago",
2192 (unsigned long long) ((d - USEC_PER_DAY) / USEC_PER_HOUR));
2193 else if (d >= 6*USEC_PER_HOUR)
2194 snprintf(buf, l, "%lluh ago",
2195 (unsigned long long) (d / USEC_PER_HOUR));
2196 else if (d >= USEC_PER_HOUR)
2197 snprintf(buf, l, "%lluh %llumin ago",
2198 (unsigned long long) (d / USEC_PER_HOUR),
2199 (unsigned long long) ((d % USEC_PER_HOUR) / USEC_PER_MINUTE));
2200 else if (d >= 5*USEC_PER_MINUTE)
2201 snprintf(buf, l, "%llumin ago",
2202 (unsigned long long) (d / USEC_PER_MINUTE));
2203 else if (d >= USEC_PER_MINUTE)
2204 snprintf(buf, l, "%llumin %llus ago",
2205 (unsigned long long) (d / USEC_PER_MINUTE),
2206 (unsigned long long) ((d % USEC_PER_MINUTE) / USEC_PER_SEC));
2207 else if (d >= USEC_PER_SEC)
2208 snprintf(buf, l, "%llus ago",
2209 (unsigned long long) (d / USEC_PER_SEC));
2210 else if (d >= USEC_PER_MSEC)
2211 snprintf(buf, l, "%llums ago",
2212 (unsigned long long) (d / USEC_PER_MSEC));
2213 else if (d > 0)
2214 snprintf(buf, l, "%lluus ago",
2215 (unsigned long long) d);
2216 else
2217 snprintf(buf, l, "now");
2218
2219 buf[l-1] = 0;
2220 return buf;
2221}
2222
871d7de4
LP
2223char *format_timespan(char *buf, size_t l, usec_t t) {
2224 static const struct {
2225 const char *suffix;
2226 usec_t usec;
2227 } table[] = {
2228 { "w", USEC_PER_WEEK },
2229 { "d", USEC_PER_DAY },
2230 { "h", USEC_PER_HOUR },
2231 { "min", USEC_PER_MINUTE },
2232 { "s", USEC_PER_SEC },
2233 { "ms", USEC_PER_MSEC },
2234 { "us", 1 },
2235 };
2236
2237 unsigned i;
2238 char *p = buf;
2239
2240 assert(buf);
2241 assert(l > 0);
2242
2243 if (t == (usec_t) -1)
2244 return NULL;
2245
4502d22c
LP
2246 if (t == 0) {
2247 snprintf(p, l, "0");
2248 p[l-1] = 0;
2249 return p;
2250 }
2251
871d7de4
LP
2252 /* The result of this function can be parsed with parse_usec */
2253
2254 for (i = 0; i < ELEMENTSOF(table); i++) {
2255 int k;
2256 size_t n;
2257
2258 if (t < table[i].usec)
2259 continue;
2260
2261 if (l <= 1)
2262 break;
2263
2264 k = snprintf(p, l, "%s%llu%s", p > buf ? " " : "", (unsigned long long) (t / table[i].usec), table[i].suffix);
2265 n = MIN((size_t) k, l);
2266
2267 l -= n;
2268 p += n;
2269
2270 t %= table[i].usec;
2271 }
2272
2273 *p = 0;
2274
2275 return buf;
2276}
2277
42856c10
LP
2278bool fstype_is_network(const char *fstype) {
2279 static const char * const table[] = {
2280 "cifs",
2281 "smbfs",
2282 "ncpfs",
2283 "nfs",
ca139f94
LP
2284 "nfs4",
2285 "gfs",
2286 "gfs2"
42856c10
LP
2287 };
2288
2289 unsigned i;
2290
2291 for (i = 0; i < ELEMENTSOF(table); i++)
2292 if (streq(table[i], fstype))
2293 return true;
2294
2295 return false;
2296}
2297
601f6a1e
LP
2298int chvt(int vt) {
2299 int fd, r = 0;
2300
74bc3bdc 2301 if ((fd = open_terminal("/dev/tty0", O_RDWR|O_NOCTTY|O_CLOEXEC)) < 0)
601f6a1e
LP
2302 return -errno;
2303
2304 if (vt < 0) {
2305 int tiocl[2] = {
2306 TIOCL_GETKMSGREDIRECT,
2307 0
2308 };
2309
2310 if (ioctl(fd, TIOCLINUX, tiocl) < 0)
2311 return -errno;
2312
2313 vt = tiocl[0] <= 0 ? 1 : tiocl[0];
2314 }
2315
2316 if (ioctl(fd, VT_ACTIVATE, vt) < 0)
2317 r = -errno;
2318
a16e1123 2319 close_nointr_nofail(r);
601f6a1e
LP
2320 return r;
2321}
2322
80876c20
LP
2323int read_one_char(FILE *f, char *ret, bool *need_nl) {
2324 struct termios old_termios, new_termios;
2325 char c;
20c03b7b 2326 char line[LINE_MAX];
80876c20
LP
2327
2328 assert(f);
2329 assert(ret);
2330
2331 if (tcgetattr(fileno(f), &old_termios) >= 0) {
2332 new_termios = old_termios;
2333
2334 new_termios.c_lflag &= ~ICANON;
2335 new_termios.c_cc[VMIN] = 1;
2336 new_termios.c_cc[VTIME] = 0;
2337
2338 if (tcsetattr(fileno(f), TCSADRAIN, &new_termios) >= 0) {
2339 size_t k;
2340
2341 k = fread(&c, 1, 1, f);
2342
2343 tcsetattr(fileno(f), TCSADRAIN, &old_termios);
2344
2345 if (k <= 0)
2346 return -EIO;
2347
2348 if (need_nl)
2349 *need_nl = c != '\n';
2350
2351 *ret = c;
2352 return 0;
2353 }
2354 }
2355
2356 if (!(fgets(line, sizeof(line), f)))
2357 return -EIO;
2358
2359 truncate_nl(line);
2360
2361 if (strlen(line) != 1)
2362 return -EBADMSG;
2363
2364 if (need_nl)
2365 *need_nl = false;
2366
2367 *ret = line[0];
2368 return 0;
2369}
2370
2371int ask(char *ret, const char *replies, const char *text, ...) {
1b39d4b9
LP
2372 bool on_tty;
2373
80876c20
LP
2374 assert(ret);
2375 assert(replies);
2376 assert(text);
2377
1b39d4b9
LP
2378 on_tty = isatty(STDOUT_FILENO);
2379
80876c20
LP
2380 for (;;) {
2381 va_list ap;
2382 char c;
2383 int r;
2384 bool need_nl = true;
2385
1b39d4b9
LP
2386 if (on_tty)
2387 fputs("\x1B[1m", stdout);
b1b2dc0c 2388
80876c20
LP
2389 va_start(ap, text);
2390 vprintf(text, ap);
2391 va_end(ap);
2392
1b39d4b9
LP
2393 if (on_tty)
2394 fputs("\x1B[0m", stdout);
b1b2dc0c 2395
80876c20
LP
2396 fflush(stdout);
2397
2398 if ((r = read_one_char(stdin, &c, &need_nl)) < 0) {
2399
2400 if (r == -EBADMSG) {
2401 puts("Bad input, please try again.");
2402 continue;
2403 }
2404
2405 putchar('\n');
2406 return r;
2407 }
2408
2409 if (need_nl)
2410 putchar('\n');
2411
2412 if (strchr(replies, c)) {
2413 *ret = c;
2414 return 0;
2415 }
2416
2417 puts("Read unexpected character, please try again.");
2418 }
2419}
2420
6ea832a2 2421int reset_terminal_fd(int fd) {
80876c20
LP
2422 struct termios termios;
2423 int r = 0;
3fe5e5d4
LP
2424 long arg;
2425
2426 /* Set terminal to some sane defaults */
80876c20
LP
2427
2428 assert(fd >= 0);
2429
eed1d0e3
LP
2430 /* We leave locked terminal attributes untouched, so that
2431 * Plymouth may set whatever it wants to set, and we don't
2432 * interfere with that. */
3fe5e5d4
LP
2433
2434 /* Disable exclusive mode, just in case */
2435 ioctl(fd, TIOCNXCL);
2436
2437 /* Enable console unicode mode */
2438 arg = K_UNICODE;
2439 ioctl(fd, KDSKBMODE, &arg);
80876c20
LP
2440
2441 if (tcgetattr(fd, &termios) < 0) {
2442 r = -errno;
2443 goto finish;
2444 }
2445
aaf694ca
LP
2446 /* We only reset the stuff that matters to the software. How
2447 * hardware is set up we don't touch assuming that somebody
2448 * else will do that for us */
2449
2450 termios.c_iflag &= ~(IGNBRK | BRKINT | ISTRIP | INLCR | IGNCR | IUCLC);
80876c20
LP
2451 termios.c_iflag |= ICRNL | IMAXBEL | IUTF8;
2452 termios.c_oflag |= ONLCR;
2453 termios.c_cflag |= CREAD;
2454 termios.c_lflag = ISIG | ICANON | IEXTEN | ECHO | ECHOE | ECHOK | ECHOCTL | ECHOPRT | ECHOKE;
2455
2456 termios.c_cc[VINTR] = 03; /* ^C */
2457 termios.c_cc[VQUIT] = 034; /* ^\ */
2458 termios.c_cc[VERASE] = 0177;
2459 termios.c_cc[VKILL] = 025; /* ^X */
2460 termios.c_cc[VEOF] = 04; /* ^D */
2461 termios.c_cc[VSTART] = 021; /* ^Q */
2462 termios.c_cc[VSTOP] = 023; /* ^S */
2463 termios.c_cc[VSUSP] = 032; /* ^Z */
2464 termios.c_cc[VLNEXT] = 026; /* ^V */
2465 termios.c_cc[VWERASE] = 027; /* ^W */
2466 termios.c_cc[VREPRINT] = 022; /* ^R */
aaf694ca
LP
2467 termios.c_cc[VEOL] = 0;
2468 termios.c_cc[VEOL2] = 0;
80876c20
LP
2469
2470 termios.c_cc[VTIME] = 0;
2471 termios.c_cc[VMIN] = 1;
2472
2473 if (tcsetattr(fd, TCSANOW, &termios) < 0)
2474 r = -errno;
2475
2476finish:
2477 /* Just in case, flush all crap out */
2478 tcflush(fd, TCIOFLUSH);
2479
2480 return r;
2481}
2482
6ea832a2
LP
2483int reset_terminal(const char *name) {
2484 int fd, r;
2485
2486 fd = open_terminal(name, O_RDWR|O_NOCTTY|O_CLOEXEC);
2487 if (fd < 0)
2488 return fd;
2489
2490 r = reset_terminal_fd(fd);
2491 close_nointr_nofail(fd);
2492
2493 return r;
2494}
2495
80876c20
LP
2496int open_terminal(const char *name, int mode) {
2497 int fd, r;
f73f76ac 2498 unsigned c = 0;
80876c20 2499
f73f76ac
LP
2500 /*
2501 * If a TTY is in the process of being closed opening it might
2502 * cause EIO. This is horribly awful, but unlikely to be
2503 * changed in the kernel. Hence we work around this problem by
2504 * retrying a couple of times.
2505 *
2506 * https://bugs.launchpad.net/ubuntu/+source/linux/+bug/554172/comments/245
2507 */
2508
2509 for (;;) {
2510 if ((fd = open(name, mode)) >= 0)
2511 break;
2512
2513 if (errno != EIO)
2514 return -errno;
2515
2516 if (c >= 20)
2517 return -errno;
2518
2519 usleep(50 * USEC_PER_MSEC);
2520 c++;
2521 }
2522
2523 if (fd < 0)
80876c20
LP
2524 return -errno;
2525
2526 if ((r = isatty(fd)) < 0) {
2527 close_nointr_nofail(fd);
2528 return -errno;
2529 }
2530
2531 if (!r) {
2532 close_nointr_nofail(fd);
2533 return -ENOTTY;
2534 }
2535
2536 return fd;
2537}
2538
2539int flush_fd(int fd) {
2540 struct pollfd pollfd;
2541
2542 zero(pollfd);
2543 pollfd.fd = fd;
2544 pollfd.events = POLLIN;
2545
2546 for (;;) {
20c03b7b 2547 char buf[LINE_MAX];
80876c20
LP
2548 ssize_t l;
2549 int r;
2550
2551 if ((r = poll(&pollfd, 1, 0)) < 0) {
2552
2553 if (errno == EINTR)
2554 continue;
2555
2556 return -errno;
2557 }
2558
2559 if (r == 0)
2560 return 0;
2561
2562 if ((l = read(fd, buf, sizeof(buf))) < 0) {
2563
2564 if (errno == EINTR)
2565 continue;
2566
2567 if (errno == EAGAIN)
2568 return 0;
2569
2570 return -errno;
2571 }
2572
2573 if (l <= 0)
2574 return 0;
2575 }
2576}
2577
21de3988 2578int acquire_terminal(const char *name, bool fail, bool force, bool ignore_tiocstty_eperm) {
bab45044 2579 int fd = -1, notify = -1, r, wd = -1;
80876c20
LP
2580
2581 assert(name);
2582
2583 /* We use inotify to be notified when the tty is closed. We
2584 * create the watch before checking if we can actually acquire
2585 * it, so that we don't lose any event.
2586 *
2587 * Note: strictly speaking this actually watches for the
2588 * device being closed, it does *not* really watch whether a
2589 * tty loses its controlling process. However, unless some
2590 * rogue process uses TIOCNOTTY on /dev/tty *after* closing
2591 * its tty otherwise this will not become a problem. As long
2592 * as the administrator makes sure not configure any service
2593 * on the same tty as an untrusted user this should not be a
2594 * problem. (Which he probably should not do anyway.) */
2595
2596 if (!fail && !force) {
2597 if ((notify = inotify_init1(IN_CLOEXEC)) < 0) {
2598 r = -errno;
2599 goto fail;
2600 }
2601
2602 if ((wd = inotify_add_watch(notify, name, IN_CLOSE)) < 0) {
2603 r = -errno;
2604 goto fail;
2605 }
2606 }
2607
2608 for (;;) {
e3d1855b
LP
2609 if (notify >= 0)
2610 if ((r = flush_fd(notify)) < 0)
2611 goto fail;
80876c20
LP
2612
2613 /* We pass here O_NOCTTY only so that we can check the return
2614 * value TIOCSCTTY and have a reliable way to figure out if we
2615 * successfully became the controlling process of the tty */
6ea832a2
LP
2616 if ((fd = open_terminal(name, O_RDWR|O_NOCTTY|O_CLOEXEC)) < 0)
2617 return fd;
80876c20
LP
2618
2619 /* First, try to get the tty */
21de3988
LP
2620 r = ioctl(fd, TIOCSCTTY, force);
2621
2622 /* Sometimes it makes sense to ignore TIOCSCTTY
2623 * returning EPERM, i.e. when very likely we already
2624 * are have this controlling terminal. */
2625 if (r < 0 && errno == EPERM && ignore_tiocstty_eperm)
2626 r = 0;
2627
2628 if (r < 0 && (force || fail || errno != EPERM)) {
80876c20
LP
2629 r = -errno;
2630 goto fail;
2631 }
2632
2633 if (r >= 0)
2634 break;
2635
2636 assert(!fail);
2637 assert(!force);
2638 assert(notify >= 0);
2639
2640 for (;;) {
f601daa7 2641 uint8_t inotify_buffer[sizeof(struct inotify_event) + FILENAME_MAX];
80876c20 2642 ssize_t l;
f601daa7 2643 struct inotify_event *e;
80876c20 2644
f601daa7 2645 if ((l = read(notify, &inotify_buffer, sizeof(inotify_buffer))) < 0) {
80876c20 2646
f601daa7
LP
2647 if (errno == EINTR)
2648 continue;
2649
2650 r = -errno;
2651 goto fail;
2652 }
2653
2654 e = (struct inotify_event*) inotify_buffer;
80876c20 2655
f601daa7
LP
2656 while (l > 0) {
2657 size_t step;
80876c20 2658
f601daa7 2659 if (e->wd != wd || !(e->mask & IN_CLOSE)) {
80876c20 2660 r = -EIO;
f601daa7
LP
2661 goto fail;
2662 }
80876c20 2663
f601daa7
LP
2664 step = sizeof(struct inotify_event) + e->len;
2665 assert(step <= (size_t) l);
80876c20 2666
f601daa7
LP
2667 e = (struct inotify_event*) ((uint8_t*) e + step);
2668 l -= step;
80876c20
LP
2669 }
2670
2671 break;
2672 }
2673
2674 /* We close the tty fd here since if the old session
2675 * ended our handle will be dead. It's important that
2676 * we do this after sleeping, so that we don't enter
2677 * an endless loop. */
2678 close_nointr_nofail(fd);
2679 }
2680
2681 if (notify >= 0)
a16e1123 2682 close_nointr_nofail(notify);
80876c20 2683
6ea832a2 2684 if ((r = reset_terminal_fd(fd)) < 0)
80876c20
LP
2685 log_warning("Failed to reset terminal: %s", strerror(-r));
2686
2687 return fd;
2688
2689fail:
2690 if (fd >= 0)
a16e1123 2691 close_nointr_nofail(fd);
80876c20
LP
2692
2693 if (notify >= 0)
a16e1123 2694 close_nointr_nofail(notify);
80876c20
LP
2695
2696 return r;
2697}
2698
2699int release_terminal(void) {
2700 int r = 0, fd;
57cd2192 2701 struct sigaction sa_old, sa_new;
80876c20 2702
ccaa6149 2703 if ((fd = open("/dev/tty", O_RDWR|O_NOCTTY|O_NDELAY|O_CLOEXEC)) < 0)
80876c20
LP
2704 return -errno;
2705
57cd2192
LP
2706 /* Temporarily ignore SIGHUP, so that we don't get SIGHUP'ed
2707 * by our own TIOCNOTTY */
2708
2709 zero(sa_new);
2710 sa_new.sa_handler = SIG_IGN;
2711 sa_new.sa_flags = SA_RESTART;
2712 assert_se(sigaction(SIGHUP, &sa_new, &sa_old) == 0);
2713
80876c20
LP
2714 if (ioctl(fd, TIOCNOTTY) < 0)
2715 r = -errno;
2716
57cd2192
LP
2717 assert_se(sigaction(SIGHUP, &sa_old, NULL) == 0);
2718
80876c20
LP
2719 close_nointr_nofail(fd);
2720 return r;
2721}
2722
9a34ec5f
LP
2723int sigaction_many(const struct sigaction *sa, ...) {
2724 va_list ap;
2725 int r = 0, sig;
2726
2727 va_start(ap, sa);
2728 while ((sig = va_arg(ap, int)) > 0)
2729 if (sigaction(sig, sa, NULL) < 0)
2730 r = -errno;
2731 va_end(ap);
2732
2733 return r;
2734}
2735
2736int ignore_signals(int sig, ...) {
a337c6fc 2737 struct sigaction sa;
9a34ec5f
LP
2738 va_list ap;
2739 int r = 0;
a337c6fc
LP
2740
2741 zero(sa);
2742 sa.sa_handler = SIG_IGN;
2743 sa.sa_flags = SA_RESTART;
2744
9a34ec5f
LP
2745 if (sigaction(sig, &sa, NULL) < 0)
2746 r = -errno;
2747
2748 va_start(ap, sig);
2749 while ((sig = va_arg(ap, int)) > 0)
2750 if (sigaction(sig, &sa, NULL) < 0)
2751 r = -errno;
2752 va_end(ap);
2753
2754 return r;
2755}
2756
2757int default_signals(int sig, ...) {
2758 struct sigaction sa;
2759 va_list ap;
2760 int r = 0;
2761
2762 zero(sa);
2763 sa.sa_handler = SIG_DFL;
2764 sa.sa_flags = SA_RESTART;
2765
2766 if (sigaction(sig, &sa, NULL) < 0)
2767 r = -errno;
2768
2769 va_start(ap, sig);
2770 while ((sig = va_arg(ap, int)) > 0)
2771 if (sigaction(sig, &sa, NULL) < 0)
2772 r = -errno;
2773 va_end(ap);
2774
2775 return r;
a337c6fc
LP
2776}
2777
8d567588
LP
2778int close_pipe(int p[]) {
2779 int a = 0, b = 0;
2780
2781 assert(p);
2782
2783 if (p[0] >= 0) {
2784 a = close_nointr(p[0]);
2785 p[0] = -1;
2786 }
2787
2788 if (p[1] >= 0) {
2789 b = close_nointr(p[1]);
2790 p[1] = -1;
2791 }
2792
2793 return a < 0 ? a : b;
2794}
2795
eb22ac37 2796ssize_t loop_read(int fd, void *buf, size_t nbytes, bool do_poll) {
8d567588
LP
2797 uint8_t *p;
2798 ssize_t n = 0;
2799
2800 assert(fd >= 0);
2801 assert(buf);
2802
2803 p = buf;
2804
2805 while (nbytes > 0) {
2806 ssize_t k;
2807
2808 if ((k = read(fd, p, nbytes)) <= 0) {
2809
eb22ac37 2810 if (k < 0 && errno == EINTR)
8d567588
LP
2811 continue;
2812
eb22ac37 2813 if (k < 0 && errno == EAGAIN && do_poll) {
8d567588
LP
2814 struct pollfd pollfd;
2815
2816 zero(pollfd);
2817 pollfd.fd = fd;
2818 pollfd.events = POLLIN;
2819
2820 if (poll(&pollfd, 1, -1) < 0) {
2821 if (errno == EINTR)
2822 continue;
2823
2824 return n > 0 ? n : -errno;
2825 }
2826
2827 if (pollfd.revents != POLLIN)
2828 return n > 0 ? n : -EIO;
2829
2830 continue;
2831 }
2832
2833 return n > 0 ? n : (k < 0 ? -errno : 0);
2834 }
2835
2836 p += k;
2837 nbytes -= k;
2838 n += k;
2839 }
2840
2841 return n;
2842}
2843
eb22ac37
LP
2844ssize_t loop_write(int fd, const void *buf, size_t nbytes, bool do_poll) {
2845 const uint8_t *p;
2846 ssize_t n = 0;
2847
2848 assert(fd >= 0);
2849 assert(buf);
2850
2851 p = buf;
2852
2853 while (nbytes > 0) {
2854 ssize_t k;
2855
2856 if ((k = write(fd, p, nbytes)) <= 0) {
2857
2858 if (k < 0 && errno == EINTR)
2859 continue;
2860
2861 if (k < 0 && errno == EAGAIN && do_poll) {
2862 struct pollfd pollfd;
2863
2864 zero(pollfd);
2865 pollfd.fd = fd;
2866 pollfd.events = POLLOUT;
2867
2868 if (poll(&pollfd, 1, -1) < 0) {
2869 if (errno == EINTR)
2870 continue;
2871
2872 return n > 0 ? n : -errno;
2873 }
2874
2875 if (pollfd.revents != POLLOUT)
2876 return n > 0 ? n : -EIO;
2877
2878 continue;
2879 }
2880
2881 return n > 0 ? n : (k < 0 ? -errno : 0);
2882 }
2883
2884 p += k;
2885 nbytes -= k;
2886 n += k;
2887 }
2888
2889 return n;
2890}
2891
0c85a4f3 2892int path_is_mount_point(const char *t, bool allow_symlink) {
8d567588 2893 struct stat a, b;
35d2e7ec
LP
2894 char *parent;
2895 int r;
8d567588 2896
0c85a4f3
LP
2897 if (allow_symlink)
2898 r = stat(t, &a);
2899 else
2900 r = lstat(t, &a);
2901
2902 if (r < 0) {
8d567588
LP
2903 if (errno == ENOENT)
2904 return 0;
2905
2906 return -errno;
2907 }
2908
0c85a4f3
LP
2909 r = parent_of_path(t, &parent);
2910 if (r < 0)
35d2e7ec 2911 return r;
8d567588 2912
35d2e7ec
LP
2913 r = lstat(parent, &b);
2914 free(parent);
8d567588 2915
35d2e7ec
LP
2916 if (r < 0)
2917 return -errno;
8d567588
LP
2918
2919 return a.st_dev != b.st_dev;
2920}
2921
24a6e4a4
LP
2922int parse_usec(const char *t, usec_t *usec) {
2923 static const struct {
2924 const char *suffix;
2925 usec_t usec;
2926 } table[] = {
2927 { "sec", USEC_PER_SEC },
2928 { "s", USEC_PER_SEC },
2929 { "min", USEC_PER_MINUTE },
2930 { "hr", USEC_PER_HOUR },
2931 { "h", USEC_PER_HOUR },
2932 { "d", USEC_PER_DAY },
2933 { "w", USEC_PER_WEEK },
2934 { "msec", USEC_PER_MSEC },
2935 { "ms", USEC_PER_MSEC },
2936 { "m", USEC_PER_MINUTE },
2937 { "usec", 1ULL },
2938 { "us", 1ULL },
2939 { "", USEC_PER_SEC },
2940 };
2941
2942 const char *p;
2943 usec_t r = 0;
2944
2945 assert(t);
2946 assert(usec);
2947
2948 p = t;
2949 do {
2950 long long l;
2951 char *e;
2952 unsigned i;
2953
2954 errno = 0;
2955 l = strtoll(p, &e, 10);
2956
2957 if (errno != 0)
2958 return -errno;
2959
2960 if (l < 0)
2961 return -ERANGE;
2962
2963 if (e == p)
2964 return -EINVAL;
2965
2966 e += strspn(e, WHITESPACE);
2967
2968 for (i = 0; i < ELEMENTSOF(table); i++)
2969 if (startswith(e, table[i].suffix)) {
2970 r += (usec_t) l * table[i].usec;
2971 p = e + strlen(table[i].suffix);
2972 break;
2973 }
2974
2975 if (i >= ELEMENTSOF(table))
2976 return -EINVAL;
2977
2978 } while (*p != 0);
2979
2980 *usec = r;
2981
2982 return 0;
2983}
2984
ab1f0633
LP
2985int parse_bytes(const char *t, off_t *bytes) {
2986 static const struct {
2987 const char *suffix;
2988 off_t factor;
2989 } table[] = {
2990 { "B", 1 },
2991 { "K", 1024ULL },
2992 { "M", 1024ULL*1024ULL },
2993 { "G", 1024ULL*1024ULL*1024ULL },
2994 { "T", 1024ULL*1024ULL*1024ULL*1024ULL },
2995 { "", 1 },
2996 };
2997
2998 const char *p;
2999 off_t r = 0;
3000
3001 assert(t);
3002 assert(bytes);
3003
3004 p = t;
3005 do {
3006 long long l;
3007 char *e;
3008 unsigned i;
3009
3010 errno = 0;
3011 l = strtoll(p, &e, 10);
3012
3013 if (errno != 0)
3014 return -errno;
3015
3016 if (l < 0)
3017 return -ERANGE;
3018
3019 if (e == p)
3020 return -EINVAL;
3021
3022 e += strspn(e, WHITESPACE);
3023
3024 for (i = 0; i < ELEMENTSOF(table); i++)
3025 if (startswith(e, table[i].suffix)) {
3026 r += (off_t) l * table[i].factor;
3027 p = e + strlen(table[i].suffix);
3028 break;
3029 }
3030
3031 if (i >= ELEMENTSOF(table))
3032 return -EINVAL;
3033
3034 } while (*p != 0);
3035
3036 *bytes = r;
3037
3038 return 0;
3039}
3040
843d2643
LP
3041int make_stdio(int fd) {
3042 int r, s, t;
3043
3044 assert(fd >= 0);
3045
3046 r = dup2(fd, STDIN_FILENO);
3047 s = dup2(fd, STDOUT_FILENO);
3048 t = dup2(fd, STDERR_FILENO);
3049
3050 if (fd >= 3)
3051 close_nointr_nofail(fd);
3052
3053 if (r < 0 || s < 0 || t < 0)
3054 return -errno;
3055
7862f62d
LP
3056 fd_cloexec(STDIN_FILENO, false);
3057 fd_cloexec(STDOUT_FILENO, false);
3058 fd_cloexec(STDERR_FILENO, false);
3059
843d2643
LP
3060 return 0;
3061}
3062
ade509ce
LP
3063int make_null_stdio(void) {
3064 int null_fd;
3065
3066 if ((null_fd = open("/dev/null", O_RDWR|O_NOCTTY)) < 0)
3067 return -errno;
3068
3069 return make_stdio(null_fd);
3070}
3071
8407a5d0
LP
3072bool is_device_path(const char *path) {
3073
3074 /* Returns true on paths that refer to a device, either in
3075 * sysfs or in /dev */
3076
3077 return
3078 path_startswith(path, "/dev/") ||
3079 path_startswith(path, "/sys/");
3080}
3081
01f78473
LP
3082int dir_is_empty(const char *path) {
3083 DIR *d;
3084 int r;
3085 struct dirent buf, *de;
3086
3087 if (!(d = opendir(path)))
3088 return -errno;
3089
3090 for (;;) {
3091 if ((r = readdir_r(d, &buf, &de)) > 0) {
3092 r = -r;
3093 break;
3094 }
3095
3096 if (!de) {
3097 r = 1;
3098 break;
3099 }
3100
3101 if (!ignore_file(de->d_name)) {
3102 r = 0;
3103 break;
3104 }
3105 }
3106
3107 closedir(d);
3108 return r;
3109}
3110
d3782d60
LP
3111unsigned long long random_ull(void) {
3112 int fd;
3113 uint64_t ull;
3114 ssize_t r;
3115
3116 if ((fd = open("/dev/urandom", O_RDONLY|O_CLOEXEC|O_NOCTTY)) < 0)
3117 goto fallback;
3118
eb22ac37 3119 r = loop_read(fd, &ull, sizeof(ull), true);
d3782d60
LP
3120 close_nointr_nofail(fd);
3121
3122 if (r != sizeof(ull))
3123 goto fallback;
3124
3125 return ull;
3126
3127fallback:
3128 return random() * RAND_MAX + random();
3129}
3130
5b6319dc
LP
3131void rename_process(const char name[8]) {
3132 assert(name);
3133
3134 prctl(PR_SET_NAME, name);
3135
3136 /* This is a like a poor man's setproctitle(). The string
3137 * passed should fit in 7 chars (i.e. the length of
3138 * "systemd") */
3139
3140 if (program_invocation_name)
3141 strncpy(program_invocation_name, name, strlen(program_invocation_name));
9a0e6896
LP
3142
3143 if (saved_argc > 0) {
3144 int i;
3145
3146 if (saved_argv[0])
3147 strncpy(saved_argv[0], name, strlen(saved_argv[0]));
3148
3149 for (i = 1; i < saved_argc; i++) {
3150 if (!saved_argv[i])
3151 break;
3152
3153 memset(saved_argv[i], 0, strlen(saved_argv[i]));
3154 }
3155 }
5b6319dc
LP
3156}
3157
7d793605
LP
3158void sigset_add_many(sigset_t *ss, ...) {
3159 va_list ap;
3160 int sig;
3161
3162 assert(ss);
3163
3164 va_start(ap, ss);
3165 while ((sig = va_arg(ap, int)) > 0)
3166 assert_se(sigaddset(ss, sig) == 0);
3167 va_end(ap);
3168}
3169
ef2f1067
LP
3170char* gethostname_malloc(void) {
3171 struct utsname u;
3172
3173 assert_se(uname(&u) >= 0);
3174
3175 if (u.nodename[0])
3176 return strdup(u.nodename);
3177
3178 return strdup(u.sysname);
3179}
3180
3181char* getlogname_malloc(void) {
3182 uid_t uid;
3183 long bufsize;
3184 char *buf, *name;
3185 struct passwd pwbuf, *pw = NULL;
3186 struct stat st;
3187
3188 if (isatty(STDIN_FILENO) && fstat(STDIN_FILENO, &st) >= 0)
3189 uid = st.st_uid;
3190 else
3191 uid = getuid();
3192
3193 /* Shortcut things to avoid NSS lookups */
3194 if (uid == 0)
3195 return strdup("root");
3196
3197 if ((bufsize = sysconf(_SC_GETPW_R_SIZE_MAX)) <= 0)
3198 bufsize = 4096;
3199
3200 if (!(buf = malloc(bufsize)))
3201 return NULL;
3202
3203 if (getpwuid_r(uid, &pwbuf, buf, bufsize, &pw) == 0 && pw) {
3204 name = strdup(pw->pw_name);
3205 free(buf);
3206 return name;
3207 }
3208
3209 free(buf);
3210
3211 if (asprintf(&name, "%lu", (unsigned long) uid) < 0)
3212 return NULL;
3213
3214 return name;
3215}
3216
fc116c6a
LP
3217int getttyname_malloc(int fd, char **r) {
3218 char path[PATH_MAX], *c;
618e02c7 3219 int k;
8c6db833
LP
3220
3221 assert(r);
ef2f1067 3222
fc116c6a 3223 if ((k = ttyname_r(fd, path, sizeof(path))) != 0)
618e02c7 3224 return -k;
ef2f1067
LP
3225
3226 char_array_0(path);
3227
fc116c6a 3228 if (!(c = strdup(startswith(path, "/dev/") ? path + 5 : path)))
8c6db833
LP
3229 return -ENOMEM;
3230
3231 *r = c;
3232 return 0;
3233}
3234
fc116c6a
LP
3235int getttyname_harder(int fd, char **r) {
3236 int k;
3237 char *s;
3238
3239 if ((k = getttyname_malloc(fd, &s)) < 0)
3240 return k;
3241
3242 if (streq(s, "tty")) {
3243 free(s);
4d6d6518 3244 return get_ctty(0, NULL, r);
fc116c6a
LP
3245 }
3246
3247 *r = s;
3248 return 0;
3249}
3250
4d6d6518 3251int get_ctty_devnr(pid_t pid, dev_t *d) {
fc116c6a 3252 int k;
4d6d6518 3253 char line[LINE_MAX], *p, *fn;
fc116c6a
LP
3254 unsigned long ttynr;
3255 FILE *f;
3256
4d6d6518
LP
3257 if (asprintf(&fn, "/proc/%lu/stat", (unsigned long) (pid <= 0 ? getpid() : pid)) < 0)
3258 return -ENOMEM;
3259
3260 f = fopen(fn, "re");
3261 free(fn);
3262 if (!f)
fc116c6a
LP
3263 return -errno;
3264
4d6d6518 3265 if (!fgets(line, sizeof(line), f)) {
fc116c6a
LP
3266 k = -errno;
3267 fclose(f);
3268 return k;
3269 }
3270
3271 fclose(f);
3272
4d6d6518
LP
3273 p = strrchr(line, ')');
3274 if (!p)
fc116c6a
LP
3275 return -EIO;
3276
3277 p++;
3278
3279 if (sscanf(p, " "
3280 "%*c " /* state */
3281 "%*d " /* ppid */
3282 "%*d " /* pgrp */
3283 "%*d " /* session */
3284 "%lu ", /* ttynr */
3285 &ttynr) != 1)
3286 return -EIO;
3287
3288 *d = (dev_t) ttynr;
3289 return 0;
3290}
3291
4d6d6518 3292int get_ctty(pid_t pid, dev_t *_devnr, char **r) {
fc116c6a 3293 int k;
20c03b7b 3294 char fn[PATH_MAX], *s, *b, *p;
fc116c6a
LP
3295 dev_t devnr;
3296
3297 assert(r);
3298
4d6d6518
LP
3299 k = get_ctty_devnr(pid, &devnr);
3300 if (k < 0)
fc116c6a
LP
3301 return k;
3302
3303 snprintf(fn, sizeof(fn), "/dev/char/%u:%u", major(devnr), minor(devnr));
3304 char_array_0(fn);
3305
3306 if ((k = readlink_malloc(fn, &s)) < 0) {
3307
3308 if (k != -ENOENT)
3309 return k;
3310
46824d0e
LP
3311 /* This is an ugly hack */
3312 if (major(devnr) == 136) {
3313 if (asprintf(&b, "pts/%lu", (unsigned long) minor(devnr)) < 0)
3314 return -ENOMEM;
3315
3316 *r = b;
3317 if (_devnr)
3318 *_devnr = devnr;
3319
3320 return 0;
3321 }
3322
fc116c6a
LP
3323 /* Probably something like the ptys which have no
3324 * symlink in /dev/char. Let's return something
3325 * vaguely useful. */
3326
3327 if (!(b = strdup(fn + 5)))
3328 return -ENOMEM;
3329
3330 *r = b;
46824d0e
LP
3331 if (_devnr)
3332 *_devnr = devnr;
3333
fc116c6a
LP
3334 return 0;
3335 }
3336
3337 if (startswith(s, "/dev/"))
3338 p = s + 5;
3339 else if (startswith(s, "../"))
3340 p = s + 3;
3341 else
3342 p = s;
3343
3344 b = strdup(p);
3345 free(s);
3346
3347 if (!b)
3348 return -ENOMEM;
3349
3350 *r = b;
46824d0e
LP
3351 if (_devnr)
3352 *_devnr = devnr;
3353
fc116c6a
LP
3354 return 0;
3355}
3356
ad293f5a 3357static int rm_rf_children(int fd, bool only_dirs, bool honour_sticky) {
8c6db833
LP
3358 DIR *d;
3359 int ret = 0;
3360
3361 assert(fd >= 0);
3362
3363 /* This returns the first error we run into, but nevertheless
3364 * tries to go on */
3365
3366 if (!(d = fdopendir(fd))) {
3367 close_nointr_nofail(fd);
4c633005
LP
3368
3369 return errno == ENOENT ? 0 : -errno;
8c6db833
LP
3370 }
3371
3372 for (;;) {
3373 struct dirent buf, *de;
ad293f5a 3374 bool is_dir, keep_around = false;
8c6db833
LP
3375 int r;
3376
3377 if ((r = readdir_r(d, &buf, &de)) != 0) {
3378 if (ret == 0)
3379 ret = -r;
3380 break;
3381 }
3382
3383 if (!de)
3384 break;
3385
3386 if (streq(de->d_name, ".") || streq(de->d_name, ".."))
3387 continue;
3388
3389 if (de->d_type == DT_UNKNOWN) {
3390 struct stat st;
3391
3392 if (fstatat(fd, de->d_name, &st, AT_SYMLINK_NOFOLLOW) < 0) {
4c633005 3393 if (ret == 0 && errno != ENOENT)
8c6db833
LP
3394 ret = -errno;
3395 continue;
3396 }
3397
ad293f5a
LP
3398 if (honour_sticky)
3399 keep_around = st.st_uid == 0 && (st.st_mode & S_ISVTX);
3400
8c6db833 3401 is_dir = S_ISDIR(st.st_mode);
ad293f5a
LP
3402
3403 } else {
3404 if (honour_sticky) {
3405 struct stat st;
3406
3407 if (fstatat(fd, de->d_name, &st, AT_SYMLINK_NOFOLLOW) < 0) {
3408 if (ret == 0 && errno != ENOENT)
3409 ret = -errno;
3410 continue;
3411 }
3412
3413 keep_around = st.st_uid == 0 && (st.st_mode & S_ISVTX);
3414 }
3415
8c6db833 3416 is_dir = de->d_type == DT_DIR;
ad293f5a 3417 }
8c6db833
LP
3418
3419 if (is_dir) {
3420 int subdir_fd;
3421
3422 if ((subdir_fd = openat(fd, de->d_name, O_RDONLY|O_NONBLOCK|O_DIRECTORY|O_CLOEXEC)) < 0) {
4c633005 3423 if (ret == 0 && errno != ENOENT)
8c6db833
LP
3424 ret = -errno;
3425 continue;
3426 }
3427
ad293f5a 3428 if ((r = rm_rf_children(subdir_fd, only_dirs, honour_sticky)) < 0) {
8c6db833
LP
3429 if (ret == 0)
3430 ret = r;
3431 }
3432
ad293f5a
LP
3433 if (!keep_around)
3434 if (unlinkat(fd, de->d_name, AT_REMOVEDIR) < 0) {
3435 if (ret == 0 && errno != ENOENT)
3436 ret = -errno;
3437 }
3438
3439 } else if (!only_dirs && !keep_around) {
8c6db833
LP
3440
3441 if (unlinkat(fd, de->d_name, 0) < 0) {
4c633005 3442 if (ret == 0 && errno != ENOENT)
8c6db833
LP
3443 ret = -errno;
3444 }
3445 }
3446 }
3447
3448 closedir(d);
3449
3450 return ret;
3451}
3452
ad293f5a 3453int rm_rf(const char *path, bool only_dirs, bool delete_root, bool honour_sticky) {
8c6db833
LP
3454 int fd;
3455 int r;
3456
3457 assert(path);
3458
3459 if ((fd = open(path, O_RDONLY|O_NONBLOCK|O_DIRECTORY|O_CLOEXEC)) < 0) {
3460
3461 if (errno != ENOTDIR)
3462 return -errno;
3463
3464 if (delete_root && !only_dirs)
3465 if (unlink(path) < 0)
3466 return -errno;
3467
3468 return 0;
3469 }
3470
ad293f5a
LP
3471 r = rm_rf_children(fd, only_dirs, honour_sticky);
3472
3473 if (delete_root) {
3474
3475 if (honour_sticky && file_is_sticky(path) > 0)
3476 return r;
8c6db833 3477
e27796a0 3478 if (rmdir(path) < 0 && errno != ENOENT) {
8c6db833
LP
3479 if (r == 0)
3480 r = -errno;
3481 }
ad293f5a 3482 }
8c6db833
LP
3483
3484 return r;
3485}
3486
3487int chmod_and_chown(const char *path, mode_t mode, uid_t uid, gid_t gid) {
3488 assert(path);
3489
3490 /* Under the assumption that we are running privileged we
3491 * first change the access mode and only then hand out
3492 * ownership to avoid a window where access is too open. */
3493
3494 if (chmod(path, mode) < 0)
3495 return -errno;
3496
3497 if (chown(path, uid, gid) < 0)
3498 return -errno;
3499
3500 return 0;
ef2f1067
LP
3501}
3502
82c121a4
LP
3503cpu_set_t* cpu_set_malloc(unsigned *ncpus) {
3504 cpu_set_t *r;
3505 unsigned n = 1024;
3506
3507 /* Allocates the cpuset in the right size */
3508
3509 for (;;) {
3510 if (!(r = CPU_ALLOC(n)))
3511 return NULL;
3512
3513 if (sched_getaffinity(0, CPU_ALLOC_SIZE(n), r) >= 0) {
3514 CPU_ZERO_S(CPU_ALLOC_SIZE(n), r);
3515
3516 if (ncpus)
3517 *ncpus = n;
3518
3519 return r;
3520 }
3521
3522 CPU_FREE(r);
3523
3524 if (errno != EINVAL)
3525 return NULL;
3526
3527 n *= 2;
3528 }
3529}
3530
9e58ff9c
LP
3531void status_vprintf(const char *format, va_list ap) {
3532 char *s = NULL;
3533 int fd = -1;
3534
3535 assert(format);
3536
3537 /* This independent of logging, as status messages are
3538 * optional and go exclusively to the console. */
3539
3540 if (vasprintf(&s, format, ap) < 0)
3541 goto finish;
3542
3543 if ((fd = open_terminal("/dev/console", O_WRONLY|O_NOCTTY|O_CLOEXEC)) < 0)
3544 goto finish;
3545
3546 write(fd, s, strlen(s));
3547
3548finish:
3549 free(s);
3550
3551 if (fd >= 0)
3552 close_nointr_nofail(fd);
3553}
3554
c846ff47
LP
3555void status_printf(const char *format, ...) {
3556 va_list ap;
3557
3558 assert(format);
3559
3560 va_start(ap, format);
3561 status_vprintf(format, ap);
3562 va_end(ap);
3563}
3564
3565void status_welcome(void) {
10aa7034
LP
3566 char *pretty_name = NULL, *ansi_color = NULL;
3567 const char *const_pretty = NULL, *const_color = NULL;
3568 int r;
c846ff47 3569
10aa7034
LP
3570 if ((r = parse_env_file("/etc/os-release", NEWLINE,
3571 "PRETTY_NAME", &pretty_name,
3572 "ANSI_COLOR", &ansi_color,
3573 NULL)) < 0) {
c846ff47 3574
10aa7034
LP
3575 if (r != -ENOENT)
3576 log_warning("Failed to read /etc/os-release: %s", strerror(-r));
3577 }
c846ff47 3578
10aa7034
LP
3579#if defined(TARGET_FEDORA)
3580 if (!pretty_name) {
3581 if ((r = read_one_line_file("/etc/system-release", &pretty_name)) < 0) {
c846ff47 3582
10aa7034
LP
3583 if (r != -ENOENT)
3584 log_warning("Failed to read /etc/system-release: %s", strerror(-r));
6f9a471a 3585 }
10aa7034 3586 }
c846ff47 3587
10aa7034 3588 if (!ansi_color && pretty_name) {
c846ff47 3589
10aa7034
LP
3590 /* This tries to mimic the color magic the old Red Hat sysinit
3591 * script did. */
3592
3593 if (startswith(pretty_name, "Red Hat"))
3594 const_color = "0;31"; /* Red for RHEL */
3595 else if (startswith(pretty_name, "Fedora"))
3596 const_color = "0;34"; /* Blue for Fedora */
3597 }
c846ff47
LP
3598
3599#elif defined(TARGET_SUSE)
c846ff47 3600
10aa7034
LP
3601 if (!pretty_name) {
3602 if ((r = read_one_line_file("/etc/SuSE-release", &pretty_name)) < 0) {
c846ff47 3603
10aa7034
LP
3604 if (r != -ENOENT)
3605 log_warning("Failed to read /etc/SuSE-release: %s", strerror(-r));
6f9a471a 3606 }
10aa7034 3607 }
c846ff47 3608
10aa7034
LP
3609 if (!ansi_color)
3610 const_color = "0;32"; /* Green for openSUSE */
5a6225fd 3611
0d37b36b 3612#elif defined(TARGET_GENTOO)
0d37b36b 3613
10aa7034
LP
3614 if (!pretty_name) {
3615 if ((r = read_one_line_file("/etc/gentoo-release", &pretty_name)) < 0) {
0d37b36b 3616
10aa7034
LP
3617 if (r != -ENOENT)
3618 log_warning("Failed to read /etc/gentoo-release: %s", strerror(-r));
6f9a471a 3619 }
10aa7034 3620 }
0d37b36b 3621
10aa7034
LP
3622 if (!ansi_color)
3623 const_color = "1;34"; /* Light Blue for Gentoo */
5a6225fd 3624
a338bab5
AS
3625#elif defined(TARGET_ALTLINUX)
3626
3627 if (!pretty_name) {
3628 if ((r = read_one_line_file("/etc/altlinux-release", &pretty_name)) < 0) {
3629
3630 if (r != -ENOENT)
3631 log_warning("Failed to read /etc/altlinux-release: %s", strerror(-r));
6f9a471a 3632 }
a338bab5
AS
3633 }
3634
3635 if (!ansi_color)
3636 const_color = "0;36"; /* Cyan for ALTLinux */
3637
3638
5a6225fd 3639#elif defined(TARGET_DEBIAN)
5a6225fd 3640
10aa7034 3641 if (!pretty_name) {
22927a36 3642 char *version;
c8bffa43 3643
22927a36 3644 if ((r = read_one_line_file("/etc/debian_version", &version)) < 0) {
5a6225fd 3645
10aa7034
LP
3646 if (r != -ENOENT)
3647 log_warning("Failed to read /etc/debian_version: %s", strerror(-r));
22927a36 3648 } else {
22927a36
MB
3649 pretty_name = strappend("Debian ", version);
3650 free(version);
c8bffa43
LP
3651
3652 if (!pretty_name)
3653 log_warning("Failed to allocate Debian version string.");
22927a36 3654 }
10aa7034 3655 }
5a6225fd 3656
10aa7034
LP
3657 if (!ansi_color)
3658 const_color = "1;31"; /* Light Red for Debian */
5a6225fd 3659
274914f9 3660#elif defined(TARGET_UBUNTU)
10aa7034
LP
3661
3662 if ((r = parse_env_file("/etc/lsb-release", NEWLINE,
3663 "DISTRIB_DESCRIPTION", &pretty_name,
3664 NULL)) < 0) {
3665
3666 if (r != -ENOENT)
3667 log_warning("Failed to read /etc/lsb-release: %s", strerror(-r));
3668 }
3669
3670 if (!ansi_color)
3671 const_color = "0;33"; /* Orange/Brown for Ubuntu */
3672
1de4d79b
AB
3673#elif defined(TARGET_MANDRIVA)
3674
3675 if (!pretty_name) {
3676 char *s, *p;
3677
3678 if ((r = read_one_line_file("/etc/mandriva-release", &s) < 0)) {
3679 if (r != -ENOENT)
3680 log_warning("Failed to read /etc/mandriva-release: %s", strerror(-r));
3681 } else {
3682 p = strstr(s, " release ");
3683 if (p) {
3684 *p = '\0';
3685 p += 9;
3686 p[strcspn(p, " ")] = '\0';
3687
3688 /* This corresponds to standard rc.sysinit */
3689 if (asprintf(&pretty_name, "%s\x1B[0;39m %s", s, p) > 0)
3690 const_color = "1;36";
3691 else
3692 log_warning("Failed to allocate Mandriva version string.");
3693 } else
3694 log_warning("Failed to parse /etc/mandriva-release");
3695 free(s);
3696 }
3697 }
54e4fdef 3698#elif defined(TARGET_MEEGO)
1de4d79b 3699
54e4fdef
CF
3700 if (!pretty_name) {
3701 if ((r = read_one_line_file("/etc/meego-release", &pretty_name)) < 0) {
3702
3703 if (r != -ENOENT)
3704 log_warning("Failed to read /etc/meego-release: %s", strerror(-r));
3705 }
3706 }
3707
3708 if (!ansi_color)
3709 const_color = "1;35"; /* Bright Magenta for MeeGo */
c846ff47 3710#endif
10aa7034
LP
3711
3712 if (!pretty_name && !const_pretty)
3713 const_pretty = "Linux";
3714
3715 if (!ansi_color && !const_color)
3716 const_color = "1";
3717
da71f23c 3718 status_printf("\nWelcome to \x1B[%sm%s\x1B[0m!\n\n",
10aa7034
LP
3719 const_color ? const_color : ansi_color,
3720 const_pretty ? const_pretty : pretty_name);
86a3475b
LP
3721
3722 free(ansi_color);
3723 free(pretty_name);
c846ff47
LP
3724}
3725
fab56fc5
LP
3726char *replace_env(const char *format, char **env) {
3727 enum {
3728 WORD,
c24eb49e 3729 CURLY,
fab56fc5
LP
3730 VARIABLE
3731 } state = WORD;
3732
3733 const char *e, *word = format;
3734 char *r = NULL, *k;
3735
3736 assert(format);
3737
3738 for (e = format; *e; e ++) {
3739
3740 switch (state) {
3741
3742 case WORD:
3743 if (*e == '$')
c24eb49e 3744 state = CURLY;
fab56fc5
LP
3745 break;
3746
c24eb49e
LP
3747 case CURLY:
3748 if (*e == '{') {
fab56fc5
LP
3749 if (!(k = strnappend(r, word, e-word-1)))
3750 goto fail;
3751
3752 free(r);
3753 r = k;
3754
3755 word = e-1;
3756 state = VARIABLE;
3757
3758 } else if (*e == '$') {
3759 if (!(k = strnappend(r, word, e-word)))
3760 goto fail;
3761
3762 free(r);
3763 r = k;
3764
3765 word = e+1;
3766 state = WORD;
3767 } else
3768 state = WORD;
3769 break;
3770
3771 case VARIABLE:
c24eb49e 3772 if (*e == '}') {
b95cf362 3773 const char *t;
fab56fc5 3774
b95cf362
LP
3775 if (!(t = strv_env_get_with_length(env, word+2, e-word-2)))
3776 t = "";
fab56fc5 3777
b95cf362
LP
3778 if (!(k = strappend(r, t)))
3779 goto fail;
fab56fc5 3780
b95cf362
LP
3781 free(r);
3782 r = k;
fab56fc5 3783
b95cf362 3784 word = e+1;
fab56fc5
LP
3785 state = WORD;
3786 }
3787 break;
3788 }
3789 }
3790
3791 if (!(k = strnappend(r, word, e-word)))
3792 goto fail;
3793
3794 free(r);
3795 return k;
3796
3797fail:
3798 free(r);
3799 return NULL;
3800}
3801
3802char **replace_env_argv(char **argv, char **env) {
3803 char **r, **i;
c24eb49e
LP
3804 unsigned k = 0, l = 0;
3805
3806 l = strv_length(argv);
fab56fc5 3807
c24eb49e 3808 if (!(r = new(char*, l+1)))
fab56fc5
LP
3809 return NULL;
3810
3811 STRV_FOREACH(i, argv) {
c24eb49e
LP
3812
3813 /* If $FOO appears as single word, replace it by the split up variable */
b95cf362
LP
3814 if ((*i)[0] == '$' && (*i)[1] != '{') {
3815 char *e;
3816 char **w, **m;
3817 unsigned q;
c24eb49e 3818
b95cf362 3819 if ((e = strv_env_get(env, *i+1))) {
c24eb49e
LP
3820
3821 if (!(m = strv_split_quoted(e))) {
3822 r[k] = NULL;
3823 strv_free(r);
3824 return NULL;
3825 }
b95cf362
LP
3826 } else
3827 m = NULL;
c24eb49e 3828
b95cf362
LP
3829 q = strv_length(m);
3830 l = l + q - 1;
c24eb49e 3831
b95cf362
LP
3832 if (!(w = realloc(r, sizeof(char*) * (l+1)))) {
3833 r[k] = NULL;
3834 strv_free(r);
3835 strv_free(m);
3836 return NULL;
3837 }
c24eb49e 3838
b95cf362
LP
3839 r = w;
3840 if (m) {
c24eb49e
LP
3841 memcpy(r + k, m, q * sizeof(char*));
3842 free(m);
c24eb49e 3843 }
b95cf362
LP
3844
3845 k += q;
3846 continue;
c24eb49e
LP
3847 }
3848
3849 /* If ${FOO} appears as part of a word, replace it by the variable as-is */
fab56fc5
LP
3850 if (!(r[k++] = replace_env(*i, env))) {
3851 strv_free(r);
3852 return NULL;
3853 }
3854 }
3855
3856 r[k] = NULL;
3857 return r;
3858}
3859
fa776d8e
LP
3860int columns(void) {
3861 static __thread int parsed_columns = 0;
3862 const char *e;
3863
3bfc7184 3864 if (_likely_(parsed_columns > 0))
fa776d8e
LP
3865 return parsed_columns;
3866
3867 if ((e = getenv("COLUMNS")))
3868 parsed_columns = atoi(e);
3869
3870 if (parsed_columns <= 0) {
3871 struct winsize ws;
3872 zero(ws);
3873
9ed95f43 3874 if (ioctl(STDOUT_FILENO, TIOCGWINSZ, &ws) >= 0)
fa776d8e
LP
3875 parsed_columns = ws.ws_col;
3876 }
3877
3878 if (parsed_columns <= 0)
3879 parsed_columns = 80;
3880
3881 return parsed_columns;
3882}
3883
b4f10a5e
LP
3884int running_in_chroot(void) {
3885 struct stat a, b;
3886
3887 zero(a);
3888 zero(b);
3889
3890 /* Only works as root */
3891
3892 if (stat("/proc/1/root", &a) < 0)
3893 return -errno;
3894
3895 if (stat("/", &b) < 0)
3896 return -errno;
3897
3898 return
3899 a.st_dev != b.st_dev ||
3900 a.st_ino != b.st_ino;
3901}
3902
8fe914ec
LP
3903char *ellipsize(const char *s, unsigned length, unsigned percent) {
3904 size_t l, x;
3905 char *r;
3906
3907 assert(s);
3908 assert(percent <= 100);
3909 assert(length >= 3);
3910
3911 l = strlen(s);
3912
3913 if (l <= 3 || l <= length)
3914 return strdup(s);
3915
3916 if (!(r = new0(char, length+1)))
3917 return r;
3918
3919 x = (length * percent) / 100;
3920
3921 if (x > length - 3)
3922 x = length - 3;
3923
3924 memcpy(r, s, x);
3925 r[x] = '.';
3926 r[x+1] = '.';
3927 r[x+2] = '.';
3928 memcpy(r + x + 3,
3929 s + l - (length - x - 3),
3930 length - x - 3);
3931
3932 return r;
3933}
3934
f6144808
LP
3935int touch(const char *path) {
3936 int fd;
3937
3938 assert(path);
3939
14f3c825 3940 if ((fd = open(path, O_WRONLY|O_CREAT|O_CLOEXEC|O_NOCTTY, 0644)) < 0)
f6144808
LP
3941 return -errno;
3942
3943 close_nointr_nofail(fd);
3944 return 0;
3945}
afea26ad 3946
97c4a07d 3947char *unquote(const char *s, const char* quotes) {
11ce3427
LP
3948 size_t l;
3949 assert(s);
3950
3951 if ((l = strlen(s)) < 2)
3952 return strdup(s);
3953
97c4a07d 3954 if (strchr(quotes, s[0]) && s[l-1] == s[0])
11ce3427
LP
3955 return strndup(s+1, l-2);
3956
3957 return strdup(s);
3958}
3959
5f7c426e
LP
3960char *normalize_env_assignment(const char *s) {
3961 char *name, *value, *p, *r;
3962
3963 p = strchr(s, '=');
3964
3965 if (!p) {
3966 if (!(r = strdup(s)))
3967 return NULL;
3968
3969 return strstrip(r);
3970 }
3971
3972 if (!(name = strndup(s, p - s)))
3973 return NULL;
3974
3975 if (!(p = strdup(p+1))) {
3976 free(name);
3977 return NULL;
3978 }
3979
3980 value = unquote(strstrip(p), QUOTES);
3981 free(p);
3982
3983 if (!value) {
5f7c426e
LP
3984 free(name);
3985 return NULL;
3986 }
3987
3988 if (asprintf(&r, "%s=%s", name, value) < 0)
3989 r = NULL;
3990
3991 free(value);
3992 free(name);
3993
3994 return r;
3995}
3996
8e12a6ae 3997int wait_for_terminate(pid_t pid, siginfo_t *status) {
1968a360
LP
3998 siginfo_t dummy;
3999
2e78aa99 4000 assert(pid >= 1);
1968a360
LP
4001
4002 if (!status)
4003 status = &dummy;
2e78aa99
LP
4004
4005 for (;;) {
8e12a6ae
LP
4006 zero(*status);
4007
4008 if (waitid(P_PID, pid, status, WEXITED) < 0) {
2e78aa99
LP
4009
4010 if (errno == EINTR)
4011 continue;
4012
4013 return -errno;
4014 }
4015
4016 return 0;
4017 }
4018}
4019
97c4a07d
LP
4020int wait_for_terminate_and_warn(const char *name, pid_t pid) {
4021 int r;
4022 siginfo_t status;
4023
4024 assert(name);
4025 assert(pid > 1);
4026
4027 if ((r = wait_for_terminate(pid, &status)) < 0) {
4028 log_warning("Failed to wait for %s: %s", name, strerror(-r));
4029 return r;
4030 }
4031
4032 if (status.si_code == CLD_EXITED) {
4033 if (status.si_status != 0) {
4034 log_warning("%s failed with error code %i.", name, status.si_status);
0a27cf3f 4035 return status.si_status;
97c4a07d
LP
4036 }
4037
4038 log_debug("%s succeeded.", name);
4039 return 0;
4040
4041 } else if (status.si_code == CLD_KILLED ||
4042 status.si_code == CLD_DUMPED) {
4043
4044 log_warning("%s terminated by signal %s.", name, signal_to_string(status.si_status));
4045 return -EPROTO;
4046 }
4047
4048 log_warning("%s failed due to unknown reason.", name);
4049 return -EPROTO;
4050
4051}
4052
3c14d26c 4053void freeze(void) {
720ce21d
LP
4054
4055 /* Make sure nobody waits for us on a socket anymore */
4056 close_all_fds(NULL, 0);
4057
c29597a1
LP
4058 sync();
4059
3c14d26c
LP
4060 for (;;)
4061 pause();
4062}
4063
00dc5d76
LP
4064bool null_or_empty(struct stat *st) {
4065 assert(st);
4066
4067 if (S_ISREG(st->st_mode) && st->st_size <= 0)
4068 return true;
4069
c8f26f42 4070 if (S_ISCHR(st->st_mode) || S_ISBLK(st->st_mode))
00dc5d76
LP
4071 return true;
4072
4073 return false;
4074}
4075
83096483
LP
4076int null_or_empty_path(const char *fn) {
4077 struct stat st;
4078
4079 assert(fn);
4080
4081 if (stat(fn, &st) < 0)
4082 return -errno;
4083
4084 return null_or_empty(&st);
4085}
4086
a247755d 4087DIR *xopendirat(int fd, const char *name, int flags) {
c4731d11
LP
4088 int nfd;
4089 DIR *d;
4090
4091 if ((nfd = openat(fd, name, O_RDONLY|O_NONBLOCK|O_DIRECTORY|O_CLOEXEC|flags)) < 0)
4092 return NULL;
4093
4094 if (!(d = fdopendir(nfd))) {
4095 close_nointr_nofail(nfd);
4096 return NULL;
4097 }
4098
4099 return d;
3b63d2d3
LP
4100}
4101
8a0867d6
LP
4102int signal_from_string_try_harder(const char *s) {
4103 int signo;
4104 assert(s);
4105
4106 if ((signo = signal_from_string(s)) <= 0)
4107 if (startswith(s, "SIG"))
4108 return signal_from_string(s+3);
4109
4110 return signo;
4111}
4112
10717a1a
LP
4113void dual_timestamp_serialize(FILE *f, const char *name, dual_timestamp *t) {
4114
4115 assert(f);
4116 assert(name);
4117 assert(t);
4118
4119 if (!dual_timestamp_is_set(t))
4120 return;
4121
4122 fprintf(f, "%s=%llu %llu\n",
4123 name,
4124 (unsigned long long) t->realtime,
4125 (unsigned long long) t->monotonic);
4126}
4127
799fd0fd 4128void dual_timestamp_deserialize(const char *value, dual_timestamp *t) {
10717a1a
LP
4129 unsigned long long a, b;
4130
10717a1a
LP
4131 assert(value);
4132 assert(t);
4133
4134 if (sscanf(value, "%lli %llu", &a, &b) != 2)
4135 log_debug("Failed to parse finish timestamp value %s", value);
4136 else {
4137 t->realtime = a;
4138 t->monotonic = b;
4139 }
4140}
4141
e23a0ce8
LP
4142char *fstab_node_to_udev_node(const char *p) {
4143 char *dn, *t, *u;
4144 int r;
4145
4146 /* FIXME: to follow udev's logic 100% we need to leave valid
4147 * UTF8 chars unescaped */
4148
4149 if (startswith(p, "LABEL=")) {
4150
4151 if (!(u = unquote(p+6, "\"\'")))
4152 return NULL;
4153
4154 t = xescape(u, "/ ");
4155 free(u);
4156
4157 if (!t)
4158 return NULL;
4159
4160 r = asprintf(&dn, "/dev/disk/by-label/%s", t);
4161 free(t);
4162
4163 if (r < 0)
4164 return NULL;
4165
4166 return dn;
4167 }
4168
4169 if (startswith(p, "UUID=")) {
4170
4171 if (!(u = unquote(p+5, "\"\'")))
4172 return NULL;
4173
4174 t = xescape(u, "/ ");
4175 free(u);
4176
4177 if (!t)
4178 return NULL;
4179
0058d7b9 4180 r = asprintf(&dn, "/dev/disk/by-uuid/%s", t);
e23a0ce8
LP
4181 free(t);
4182
4183 if (r < 0)
4184 return NULL;
4185
4186 return dn;
4187 }
4188
4189 return strdup(p);
4190}
4191
e9ddabc2
LP
4192void filter_environ(const char *prefix) {
4193 int i, j;
4194 assert(prefix);
4195
4196 if (!environ)
4197 return;
4198
4199 for (i = 0, j = 0; environ[i]; i++) {
4200
4201 if (startswith(environ[i], prefix))
4202 continue;
4203
4204 environ[j++] = environ[i];
4205 }
4206
4207 environ[j] = NULL;
4208}
4209
f212ac12
LP
4210bool tty_is_vc(const char *tty) {
4211 assert(tty);
4212
4213 if (startswith(tty, "/dev/"))
4214 tty += 5;
4215
98a28fef
LP
4216 return vtnr_from_tty(tty) >= 0;
4217}
4218
4219int vtnr_from_tty(const char *tty) {
4220 int i, r;
4221
4222 assert(tty);
4223
4224 if (startswith(tty, "/dev/"))
4225 tty += 5;
4226
4227 if (!startswith(tty, "tty") )
4228 return -EINVAL;
4229
4230 if (tty[3] < '0' || tty[3] > '9')
4231 return -EINVAL;
4232
4233 r = safe_atoi(tty+3, &i);
4234 if (r < 0)
4235 return r;
4236
4237 if (i < 0 || i > 63)
4238 return -EINVAL;
4239
4240 return i;
f212ac12
LP
4241}
4242
e3aa71c3 4243const char *default_term_for_tty(const char *tty) {
3030ccd7
LP
4244 char *active = NULL;
4245 const char *term;
4246
e3aa71c3
LP
4247 assert(tty);
4248
4249 if (startswith(tty, "/dev/"))
4250 tty += 5;
4251
3030ccd7
LP
4252 /* Resolve where /dev/console is pointing when determining
4253 * TERM */
4254 if (streq(tty, "console"))
4255 if (read_one_line_file("/sys/class/tty/console/active", &active) >= 0) {
079a09fb
LP
4256 /* If multiple log outputs are configured the
4257 * last one is what /dev/console points to */
4258 if ((tty = strrchr(active, ' ')))
4259 tty++;
4260 else
4261 tty = active;
3030ccd7
LP
4262 }
4263
f212ac12 4264 term = tty_is_vc(tty) ? "TERM=linux" : "TERM=vt100";
3030ccd7 4265 free(active);
e3aa71c3 4266
3030ccd7 4267 return term;
e3aa71c3
LP
4268}
4269
07faed4f
LP
4270/* Returns a short identifier for the various VM implementations */
4271int detect_vm(const char **id) {
46a08e38
LP
4272
4273#if defined(__i386__) || defined(__x86_64__)
4274
4275 /* Both CPUID and DMI are x86 specific interfaces... */
4276
721bca57 4277 static const char *const dmi_vendors[] = {
46a08e38
LP
4278 "/sys/class/dmi/id/sys_vendor",
4279 "/sys/class/dmi/id/board_vendor",
4280 "/sys/class/dmi/id/bios_vendor"
4281 };
4282
4e08da90 4283 static const char dmi_vendor_table[] =
07faed4f
LP
4284 "QEMU\0" "qemu\0"
4285 /* http://kb.vmware.com/selfservice/microsites/search.do?language=en_US&cmd=displayKC&externalId=1009458 */
4286 "VMware\0" "vmware\0"
4287 "VMW\0" "vmware\0"
4288 "Microsoft Corporation\0" "microsoft\0"
4289 "innotek GmbH\0" "oracle\0"
4290 "Xen\0" "xen\0"
34df5a34 4291 "Bochs\0" "bochs\0";
07faed4f 4292
4e08da90 4293 static const char cpuid_vendor_table[] =
07faed4f
LP
4294 "XenVMMXenVMM\0" "xen\0"
4295 "KVMKVMKVM\0" "kvm\0"
4296 /* http://kb.vmware.com/selfservice/microsites/search.do?language=en_US&cmd=displayKC&externalId=1009458 */
4297 "VMwareVMware\0" "vmware\0"
4298 /* http://msdn.microsoft.com/en-us/library/ff542428.aspx */
34df5a34 4299 "Microsoft Hv\0" "microsoft\0";
07faed4f
LP
4300
4301 uint32_t eax, ecx;
46a08e38
LP
4302 union {
4303 uint32_t sig32[3];
4304 char text[13];
4305 } sig;
46a08e38 4306 unsigned i;
07faed4f 4307 const char *j, *k;
721bca57 4308 bool hypervisor;
46a08e38
LP
4309
4310 /* http://lwn.net/Articles/301888/ */
4311 zero(sig);
4312
46a08e38
LP
4313#if defined (__i386__)
4314#define REG_a "eax"
4315#define REG_b "ebx"
4316#elif defined (__amd64__)
4317#define REG_a "rax"
4318#define REG_b "rbx"
4319#endif
4320
07faed4f
LP
4321 /* First detect whether there is a hypervisor */
4322 eax = 1;
46a08e38
LP
4323 __asm__ __volatile__ (
4324 /* ebx/rbx is being used for PIC! */
4325 " push %%"REG_b" \n\t"
4326 " cpuid \n\t"
46a08e38
LP
4327 " pop %%"REG_b" \n\t"
4328
07faed4f 4329 : "=a" (eax), "=c" (ecx)
46a08e38
LP
4330 : "0" (eax)
4331 );
4332
ec195f55 4333 hypervisor = !!(ecx & 0x80000000U);
721bca57
LP
4334
4335 if (hypervisor) {
07faed4f
LP
4336
4337 /* There is a hypervisor, see what it is */
4338 eax = 0x40000000U;
4339 __asm__ __volatile__ (
4340 /* ebx/rbx is being used for PIC! */
4341 " push %%"REG_b" \n\t"
4342 " cpuid \n\t"
4343 " mov %%ebx, %1 \n\t"
4344 " pop %%"REG_b" \n\t"
4345
4346 : "=a" (eax), "=r" (sig.sig32[0]), "=c" (sig.sig32[1]), "=d" (sig.sig32[2])
4347 : "0" (eax)
4348 );
4349
4350 NULSTR_FOREACH_PAIR(j, k, cpuid_vendor_table)
4351 if (streq(sig.text, j)) {
4352
4353 if (id)
4354 *id = k;
4355
4356 return 1;
4357 }
721bca57 4358 }
07faed4f 4359
721bca57
LP
4360 for (i = 0; i < ELEMENTSOF(dmi_vendors); i++) {
4361 char *s;
4362 int r;
4363 const char *found = NULL;
4364
4365 if ((r = read_one_line_file(dmi_vendors[i], &s)) < 0) {
4366 if (r != -ENOENT)
4367 return r;
4368
4369 continue;
4370 }
4371
4372 NULSTR_FOREACH_PAIR(j, k, dmi_vendor_table)
4373 if (startswith(s, j))
4374 found = k;
4375 free(s);
4376
4377 if (found) {
4378 if (id)
4379 *id = found;
4380
4381 return 1;
4382 }
4383 }
4384
4385 if (hypervisor) {
07faed4f
LP
4386 if (id)
4387 *id = "other";
4388
4389 return 1;
4390 }
46a08e38 4391
721bca57 4392#endif
07faed4f
LP
4393 return 0;
4394}
4395
ef2df9f4 4396int detect_container(const char **id) {
f9b9232b
LP
4397 FILE *f;
4398
ef2df9f4
LP
4399 /* Unfortunately many of these operations require root access
4400 * in one way or another */
f9b9232b 4401
ef2df9f4
LP
4402 if (geteuid() != 0)
4403 return -EPERM;
4404
4405 if (running_in_chroot() > 0) {
f9b9232b
LP
4406
4407 if (id)
ef2df9f4 4408 *id = "chroot";
f9b9232b
LP
4409
4410 return 1;
4411 }
07faed4f 4412
ef2df9f4
LP
4413 /* /proc/vz exists in container and outside of the container,
4414 * /proc/bc only outside of the container. */
4415 if (access("/proc/vz", F_OK) >= 0 &&
4416 access("/proc/bc", F_OK) < 0) {
07faed4f 4417
ef2df9f4
LP
4418 if (id)
4419 *id = "openvz";
4420
4421 return 1;
f9b9232b 4422 }
07faed4f 4423
ccaa6149 4424 if ((f = fopen("/proc/self/cgroup", "re"))) {
f9b9232b
LP
4425
4426 for (;;) {
4427 char line[LINE_MAX], *p;
4428
4429 if (!fgets(line, sizeof(line), f))
4430 break;
4431
4432 if (!(p = strchr(strstrip(line), ':')))
4433 continue;
4434
4435 if (strncmp(p, ":ns:", 4))
4436 continue;
4437
4438 if (!streq(p, ":ns:/")) {
4439 fclose(f);
4440
ef2df9f4 4441 if (id)
28cf382a 4442 *id = "pidns";
ef2df9f4
LP
4443
4444 return 1;
f9b9232b
LP
4445 }
4446 }
4447
4448 fclose(f);
07faed4f
LP
4449 }
4450
ef2df9f4
LP
4451 return 0;
4452}
4453
4454/* Returns a short identifier for the various VM/container implementations */
4455int detect_virtualization(const char **id) {
4456 static __thread const char *cached_id = NULL;
4457 const char *_id;
4458 int r;
4459
3bfc7184 4460 if (_likely_(cached_id)) {
ef2df9f4
LP
4461
4462 if (cached_id == (const char*) -1)
4463 return 0;
4464
4465 if (id)
4466 *id = cached_id;
4467
4468 return 1;
f9b9232b 4469 }
07faed4f 4470
ef2df9f4
LP
4471 if ((r = detect_container(&_id)) != 0)
4472 goto finish;
4473
f9b9232b 4474 r = detect_vm(&_id);
07faed4f 4475
f9b9232b 4476finish:
ef2df9f4 4477 if (r > 0) {
f9b9232b 4478 cached_id = _id;
07faed4f 4479
ef2df9f4
LP
4480 if (id)
4481 *id = _id;
4482 } else if (r == 0)
4483 cached_id = (const char*) -1;
f9b9232b
LP
4484
4485 return r;
46a08e38
LP
4486}
4487
fb19a739
LP
4488bool dirent_is_file(struct dirent *de) {
4489 assert(de);
4490
4491 if (ignore_file(de->d_name))
4492 return false;
4493
4494 if (de->d_type != DT_REG &&
4495 de->d_type != DT_LNK &&
4496 de->d_type != DT_UNKNOWN)
4497 return false;
4498
4499 return true;
4500}
4501
83cc030f
LP
4502void execute_directory(const char *directory, DIR *d, char *argv[]) {
4503 DIR *_d = NULL;
4504 struct dirent *de;
4505 Hashmap *pids = NULL;
4506
4507 assert(directory);
4508
4509 /* Executes all binaries in a directory in parallel and waits
4510 * until all they all finished. */
4511
4512 if (!d) {
4513 if (!(_d = opendir(directory))) {
4514
4515 if (errno == ENOENT)
4516 return;
4517
4518 log_error("Failed to enumerate directory %s: %m", directory);
4519 return;
4520 }
4521
4522 d = _d;
4523 }
4524
4525 if (!(pids = hashmap_new(trivial_hash_func, trivial_compare_func))) {
4526 log_error("Failed to allocate set.");
4527 goto finish;
4528 }
4529
4530 while ((de = readdir(d))) {
4531 char *path;
4532 pid_t pid;
4533 int k;
4534
fb19a739 4535 if (!dirent_is_file(de))
83cc030f
LP
4536 continue;
4537
4538 if (asprintf(&path, "%s/%s", directory, de->d_name) < 0) {
4539 log_error("Out of memory");
4540 continue;
4541 }
4542
4543 if ((pid = fork()) < 0) {
4544 log_error("Failed to fork: %m");
4545 free(path);
4546 continue;
4547 }
4548
4549 if (pid == 0) {
4550 char *_argv[2];
4551 /* Child */
4552
4553 if (!argv) {
4554 _argv[0] = path;
4555 _argv[1] = NULL;
4556 argv = _argv;
4557 } else
4558 if (!argv[0])
4559 argv[0] = path;
4560
4561 execv(path, argv);
4562
4563 log_error("Failed to execute %s: %m", path);
4564 _exit(EXIT_FAILURE);
4565 }
4566
4567 log_debug("Spawned %s as %lu", path, (unsigned long) pid);
4568
4569 if ((k = hashmap_put(pids, UINT_TO_PTR(pid), path)) < 0) {
4570 log_error("Failed to add PID to set: %s", strerror(-k));
4571 free(path);
4572 }
4573 }
4574
4575 while (!hashmap_isempty(pids)) {
4576 siginfo_t si;
4577 char *path;
4578
4579 zero(si);
4580 if (waitid(P_ALL, 0, &si, WEXITED) < 0) {
4581
4582 if (errno == EINTR)
4583 continue;
4584
4585 log_error("waitid() failed: %m");
4586 goto finish;
4587 }
4588
4589 if ((path = hashmap_remove(pids, UINT_TO_PTR(si.si_pid)))) {
4590 if (!is_clean_exit(si.si_code, si.si_status)) {
4591 if (si.si_code == CLD_EXITED)
4592 log_error("%s exited with exit status %i.", path, si.si_status);
4593 else
4594 log_error("%s terminated by signal %s.", path, signal_to_string(si.si_status));
4595 } else
4596 log_debug("%s exited successfully.", path);
4597
4598 free(path);
4599 }
4600 }
4601
4602finish:
4603 if (_d)
4604 closedir(_d);
4605
4606 if (pids)
4607 hashmap_free_free(pids);
4608}
4609
430c18ed
LP
4610int kill_and_sigcont(pid_t pid, int sig) {
4611 int r;
4612
4613 r = kill(pid, sig) < 0 ? -errno : 0;
4614
4615 if (r >= 0)
4616 kill(pid, SIGCONT);
4617
4618 return r;
4619}
4620
05feefe0
LP
4621bool nulstr_contains(const char*nulstr, const char *needle) {
4622 const char *i;
4623
4624 if (!nulstr)
4625 return false;
4626
4627 NULSTR_FOREACH(i, nulstr)
4628 if (streq(i, needle))
4629 return true;
4630
4631 return false;
4632}
4633
6faa1114 4634bool plymouth_running(void) {
9408a2d2 4635 return access("/run/plymouth/pid", F_OK) >= 0;
6faa1114
LP
4636}
4637
7c3b203c
LP
4638void parse_syslog_priority(char **p, int *priority) {
4639 int a = 0, b = 0, c = 0;
4640 int k;
4641
4642 assert(p);
4643 assert(*p);
4644 assert(priority);
4645
4646 if ((*p)[0] != '<')
4647 return;
4648
4649 if (!strchr(*p, '>'))
4650 return;
4651
4652 if ((*p)[2] == '>') {
4653 c = undecchar((*p)[1]);
4654 k = 3;
4655 } else if ((*p)[3] == '>') {
4656 b = undecchar((*p)[1]);
4657 c = undecchar((*p)[2]);
4658 k = 4;
4659 } else if ((*p)[4] == '>') {
4660 a = undecchar((*p)[1]);
4661 b = undecchar((*p)[2]);
4662 c = undecchar((*p)[3]);
4663 k = 5;
4664 } else
4665 return;
4666
4667 if (a < 0 || b < 0 || c < 0)
4668 return;
4669
4670 *priority = a*100+b*10+c;
4671 *p += k;
4672}
4673
ac123445
LP
4674int have_effective_cap(int value) {
4675 cap_t cap;
4676 cap_flag_value_t fv;
4677 int r;
4678
4679 if (!(cap = cap_get_proc()))
4680 return -errno;
4681
4682 if (cap_get_flag(cap, value, CAP_EFFECTIVE, &fv) < 0)
4683 r = -errno;
4684 else
4685 r = fv == CAP_SET;
4686
4687 cap_free(cap);
4688 return r;
4689}
4690
9beb3f4d
LP
4691char* strshorten(char *s, size_t l) {
4692 assert(s);
4693
4694 if (l < strlen(s))
4695 s[l] = 0;
4696
4697 return s;
4698}
4699
4700static bool hostname_valid_char(char c) {
4701 return
4702 (c >= 'a' && c <= 'z') ||
4703 (c >= 'A' && c <= 'Z') ||
4704 (c >= '0' && c <= '9') ||
4705 c == '-' ||
4706 c == '_' ||
4707 c == '.';
4708}
4709
4710bool hostname_is_valid(const char *s) {
4711 const char *p;
4712
4713 if (isempty(s))
4714 return false;
4715
4716 for (p = s; *p; p++)
4717 if (!hostname_valid_char(*p))
4718 return false;
4719
4720 if (p-s > HOST_NAME_MAX)
4721 return false;
4722
4723 return true;
4724}
4725
4726char* hostname_cleanup(char *s) {
4727 char *p, *d;
4728
4729 for (p = s, d = s; *p; p++)
4730 if ((*p >= 'a' && *p <= 'z') ||
4731 (*p >= 'A' && *p <= 'Z') ||
4732 (*p >= '0' && *p <= '9') ||
4733 *p == '-' ||
4734 *p == '_' ||
4735 *p == '.')
4736 *(d++) = *p;
4737
4738 *d = 0;
4739
4740 strshorten(s, HOST_NAME_MAX);
4741 return s;
4742}
4743
1325aa42
LP
4744int pipe_eof(int fd) {
4745 struct pollfd pollfd;
4746 int r;
4747
4748 zero(pollfd);
4749 pollfd.fd = fd;
4750 pollfd.events = POLLIN|POLLHUP;
4751
4752 r = poll(&pollfd, 1, 0);
4753 if (r < 0)
4754 return -errno;
4755
4756 if (r == 0)
4757 return 0;
4758
4759 return pollfd.revents & POLLHUP;
4760}
4761
5a3ab509
LP
4762int fopen_temporary(const char *path, FILE **_f, char **_temp_path) {
4763 FILE *f;
4764 char *t;
4765 const char *fn;
4766 size_t k;
4767 int fd;
4768
4769 assert(path);
4770 assert(_f);
4771 assert(_temp_path);
4772
4773 t = new(char, strlen(path) + 1 + 6 + 1);
4774 if (!t)
4775 return -ENOMEM;
4776
4777 fn = file_name_from_path(path);
4778 k = fn-path;
4779 memcpy(t, path, k);
4780 t[k] = '.';
4781 stpcpy(stpcpy(t+k+1, fn), "XXXXXX");
4782
4783 fd = mkostemp(t, O_WRONLY|O_CLOEXEC);
4784 if (fd < 0) {
4785 free(t);
4786 return -errno;
4787 }
4788
4789 f = fdopen(fd, "we");
4790 if (!f) {
4791 unlink(t);
4792 free(t);
4793 return -errno;
4794 }
4795
4796 *_f = f;
4797 *_temp_path = t;
4798
4799 return 0;
4800}
4801
6ea832a2 4802int terminal_vhangup_fd(int fd) {
5a3ab509
LP
4803 assert(fd >= 0);
4804
6ea832a2
LP
4805 if (ioctl(fd, TIOCVHANGUP) < 0)
4806 return -errno;
4807
4808 return 0;
4809}
4810
4811int terminal_vhangup(const char *name) {
4812 int fd, r;
4813
4814 fd = open_terminal(name, O_RDWR|O_NOCTTY|O_CLOEXEC);
4815 if (fd < 0)
4816 return fd;
4817
4818 r = terminal_vhangup_fd(fd);
4819 close_nointr_nofail(fd);
4820
4821 return r;
4822}
4823
4824int vt_disallocate(const char *name) {
4825 int fd, r;
4826 unsigned u;
6ea832a2
LP
4827
4828 /* Deallocate the VT if possible. If not possible
4829 * (i.e. because it is the active one), at least clear it
4830 * entirely (including the scrollback buffer) */
4831
b83bc4e9
LP
4832 if (!startswith(name, "/dev/"))
4833 return -EINVAL;
4834
4835 if (!tty_is_vc(name)) {
4836 /* So this is not a VT. I guess we cannot deallocate
4837 * it then. But let's at least clear the screen */
4838
4839 fd = open_terminal(name, O_RDWR|O_NOCTTY|O_CLOEXEC);
4840 if (fd < 0)
4841 return fd;
4842
8585357a
LP
4843 loop_write(fd,
4844 "\033[r" /* clear scrolling region */
4845 "\033[H" /* move home */
4846 "\033[2J", /* clear screen */
4847 10, false);
b83bc4e9
LP
4848 close_nointr_nofail(fd);
4849
4850 return 0;
4851 }
6ea832a2
LP
4852
4853 if (!startswith(name, "/dev/tty"))
4854 return -EINVAL;
4855
4856 r = safe_atou(name+8, &u);
4857 if (r < 0)
4858 return r;
4859
4860 if (u <= 0)
b83bc4e9 4861 return -EINVAL;
6ea832a2 4862
b83bc4e9 4863 /* Try to deallocate */
6ea832a2
LP
4864 fd = open_terminal("/dev/tty0", O_RDWR|O_NOCTTY|O_CLOEXEC);
4865 if (fd < 0)
4866 return fd;
4867
4868 r = ioctl(fd, VT_DISALLOCATE, u);
b83bc4e9 4869 close_nointr_nofail(fd);
6ea832a2 4870
b83bc4e9
LP
4871 if (r >= 0)
4872 return 0;
6ea832a2 4873
b83bc4e9 4874 if (errno != EBUSY)
6ea832a2 4875 return -errno;
6ea832a2 4876
b83bc4e9
LP
4877 /* Couldn't deallocate, so let's clear it fully with
4878 * scrollback */
4879 fd = open_terminal(name, O_RDWR|O_NOCTTY|O_CLOEXEC);
6ea832a2 4880 if (fd < 0)
b83bc4e9 4881 return fd;
6ea832a2 4882
8585357a
LP
4883 loop_write(fd,
4884 "\033[r" /* clear scrolling region */
4885 "\033[H" /* move home */
4886 "\033[3J", /* clear screen including scrollback, requires Linux 2.6.40 */
4887 10, false);
b83bc4e9 4888 close_nointr_nofail(fd);
6ea832a2 4889
b83bc4e9 4890 return 0;
6ea832a2
LP
4891}
4892
db1413d7
KS
4893
4894static int file_is_conf(const struct dirent *d, const char *suffix) {
4895 assert(d);
4896
4897 if (ignore_file(d->d_name))
4898 return 0;
4899
4900 if (d->d_type != DT_REG &&
4901 d->d_type != DT_LNK &&
4902 d->d_type != DT_UNKNOWN)
4903 return 0;
4904
4905 return endswith(d->d_name, suffix);
4906}
4907
4908static int files_add(Hashmap *h, const char *path, const char *suffix) {
4909 DIR *dir;
f782b8d0 4910 struct dirent buffer, *de;
db1413d7
KS
4911 int r = 0;
4912
4913 dir = opendir(path);
4914 if (!dir) {
4915 if (errno == ENOENT)
4916 return 0;
4917 return -errno;
4918 }
4919
f782b8d0
LP
4920 for (;;) {
4921 int k;
223a3558 4922 char *p, *f;
f782b8d0
LP
4923
4924 k = readdir_r(dir, &buffer, &de);
4925 if (k != 0) {
4926 r = -k;
4927 goto finish;
4928 }
4929
4930 if (!de)
4931 break;
db1413d7
KS
4932
4933 if (!file_is_conf(de, suffix))
4934 continue;
4935
223a3558 4936 if (asprintf(&p, "%s/%s", path, de->d_name) < 0) {
db1413d7
KS
4937 r = -ENOMEM;
4938 goto finish;
4939 }
4940
223a3558
KS
4941 f = canonicalize_file_name(p);
4942 if (!f) {
4943 log_error("Failed to canonicalize file name '%s': %m", p);
4944 free(p);
4945 continue;
4946 }
4947 free(p);
4948
db1413d7 4949 log_debug("found: %s\n", f);
f782b8d0 4950 if (hashmap_put(h, file_name_from_path(f), f) <= 0)
db1413d7
KS
4951 free(f);
4952 }
4953
4954finish:
4955 closedir(dir);
4956 return r;
4957}
4958
4959static int base_cmp(const void *a, const void *b) {
4960 const char *s1, *s2;
4961
4962 s1 = *(char * const *)a;
4963 s2 = *(char * const *)b;
4964 return strcmp(file_name_from_path(s1), file_name_from_path(s2));
4965}
4966
44143309 4967int conf_files_list(char ***strv, const char *suffix, const char *dir, ...) {
223a3558
KS
4968 Hashmap *fh = NULL;
4969 char **dirs = NULL;
db1413d7 4970 char **files = NULL;
223a3558 4971 char **p;
db1413d7 4972 va_list ap;
44143309 4973 int r = 0;
db1413d7 4974
223a3558
KS
4975 va_start(ap, dir);
4976 dirs = strv_new_ap(dir, ap);
4977 va_end(ap);
4978 if (!dirs) {
4979 r = -ENOMEM;
4980 goto finish;
4981 }
4982 if (!strv_path_canonicalize(dirs)) {
4983 r = -ENOMEM;
4984 goto finish;
4985 }
4986 if (!strv_uniq(dirs)) {
4987 r = -ENOMEM;
4988 goto finish;
4989 }
4990
db1413d7
KS
4991 fh = hashmap_new(string_hash_func, string_compare_func);
4992 if (!fh) {
44143309 4993 r = -ENOMEM;
db1413d7
KS
4994 goto finish;
4995 }
4996
223a3558
KS
4997 STRV_FOREACH(p, dirs) {
4998 if (files_add(fh, *p, suffix) < 0) {
db1413d7 4999 log_error("Failed to search for files.");
44143309 5000 r = -EINVAL;
db1413d7
KS
5001 goto finish;
5002 }
db1413d7 5003 }
db1413d7
KS
5004
5005 files = hashmap_get_strv(fh);
5006 if (files == NULL) {
5007 log_error("Failed to compose list of files.");
44143309 5008 r = -ENOMEM;
db1413d7
KS
5009 goto finish;
5010 }
5011
5012 qsort(files, hashmap_size(fh), sizeof(char *), base_cmp);
8d0e38a2 5013
db1413d7 5014finish:
223a3558 5015 strv_free(dirs);
db1413d7 5016 hashmap_free(fh);
44143309
KS
5017 *strv = files;
5018 return r;
db1413d7 5019}
7948c4df 5020
2076cf88 5021int hwclock_is_localtime(void) {
7948c4df 5022 FILE *f;
7948c4df
KS
5023 bool local = false;
5024
5025 /*
5026 * The third line of adjtime is "UTC" or "LOCAL" or nothing.
5027 * # /etc/adjtime
2076cf88 5028 * 0.0 0 0
7948c4df
KS
5029 * 0
5030 * UTC
5031 */
5032 f = fopen("/etc/adjtime", "re");
5033 if (f) {
2076cf88
LP
5034 char line[LINE_MAX];
5035 bool b;
5036
5037 b = fgets(line, sizeof(line), f) &&
5038 fgets(line, sizeof(line), f) &&
5039 fgets(line, sizeof(line), f);
5040
7948c4df 5041 fclose(f);
2076cf88
LP
5042
5043 if (!b)
5044 return -EIO;
5045
5046
5047 truncate_nl(line);
5048 local = streq(line, "LOCAL");
5049
5050 } else if (errno != -ENOENT)
5051 return -errno;
5052
7948c4df
KS
5053 return local;
5054}
5055
ff4daf5a 5056int hwclock_apply_localtime_delta(int *min) {
7948c4df 5057 const struct timeval *tv_null = NULL;
2076cf88 5058 struct timespec ts;
7948c4df
KS
5059 struct tm *tm;
5060 int minuteswest;
5061 struct timezone tz;
5062
2076cf88
LP
5063 assert_se(clock_gettime(CLOCK_REALTIME, &ts) == 0);
5064 assert_se(tm = localtime(&ts.tv_sec));
7948c4df
KS
5065 minuteswest = tm->tm_gmtoff / 60;
5066
5067 tz.tz_minuteswest = -minuteswest;
5068 tz.tz_dsttime = 0; /* DST_NONE*/
5069
5070 /*
5071 * If the hardware clock does not run in UTC, but in local time:
5072 * The very first time we set the kernel's timezone, it will warp
5073 * the clock so that it runs in UTC instead of local time.
5074 */
5075 if (settimeofday(tv_null, &tz) < 0)
5076 return -errno;
ff4daf5a
KS
5077 if (min)
5078 *min = minuteswest;
5079 return 0;
2076cf88
LP
5080}
5081
5082int hwclock_reset_localtime_delta(void) {
5083 const struct timeval *tv_null = NULL;
5084 struct timezone tz;
5085
5086 tz.tz_minuteswest = 0;
5087 tz.tz_dsttime = 0; /* DST_NONE*/
5088
5089 if (settimeofday(tv_null, &tz) < 0)
5090 return -errno;
5091
5092 return 0;
7948c4df
KS
5093}
5094
5095int hwclock_get_time(struct tm *tm) {
5096 int fd;
5097 int err = 0;
5098
2076cf88
LP
5099 assert(tm);
5100
7948c4df
KS
5101 fd = open("/dev/rtc0", O_RDONLY|O_CLOEXEC);
5102 if (fd < 0)
5103 return -errno;
2076cf88
LP
5104
5105 /* This leaves the timezone fields of struct tm
5106 * uninitialized! */
7948c4df
KS
5107 if (ioctl(fd, RTC_RD_TIME, tm) < 0)
5108 err = -errno;
2076cf88
LP
5109
5110 /* We don't now daylight saving, so we reset this in order not
5111 * to confused mktime(). */
5112 tm->tm_isdst = -1;
5113
5114 close_nointr_nofail(fd);
7948c4df
KS
5115
5116 return err;
5117}
5118
5119int hwclock_set_time(const struct tm *tm) {
5120 int fd;
5121 int err = 0;
5122
2076cf88
LP
5123 assert(tm);
5124
7948c4df
KS
5125 fd = open("/dev/rtc0", O_RDONLY|O_CLOEXEC);
5126 if (fd < 0)
5127 return -errno;
2076cf88 5128
7948c4df
KS
5129 if (ioctl(fd, RTC_SET_TIME, tm) < 0)
5130 err = -errno;
2076cf88
LP
5131
5132 close_nointr_nofail(fd);
7948c4df
KS
5133
5134 return err;
5135}
f41607a6 5136
34ca941c
LP
5137int copy_file(const char *from, const char *to) {
5138 int r, fdf, fdt;
5139
5140 assert(from);
5141 assert(to);
5142
5143 fdf = open(from, O_RDONLY|O_CLOEXEC|O_NOCTTY);
5144 if (fdf < 0)
5145 return -errno;
5146
5147 fdt = open(to, O_WRONLY|O_CREAT|O_EXCL|O_CLOEXEC|O_NOCTTY, 0644);
5148 if (fdt < 0) {
5149 close_nointr_nofail(fdf);
5150 return -errno;
5151 }
5152
5153 for (;;) {
5154 char buf[PIPE_BUF];
5155 ssize_t n, k;
5156
5157 n = read(fdf, buf, sizeof(buf));
5158 if (n < 0) {
5159 r = -errno;
5160
5161 close_nointr_nofail(fdf);
5162 close_nointr(fdt);
5163 unlink(to);
5164
5165 return r;
5166 }
5167
5168 if (n == 0)
5169 break;
5170
5171 errno = 0;
5172 k = loop_write(fdt, buf, n, false);
5173 if (n != k) {
5174 r = k < 0 ? k : (errno ? -errno : -EIO);
5175
5176 close_nointr_nofail(fdf);
5177 close_nointr(fdt);
5178
5179 unlink(to);
5180 return r;
5181 }
5182 }
5183
5184 close_nointr_nofail(fdf);
5185 r = close_nointr(fdt);
5186
5187 if (r < 0) {
5188 unlink(to);
5189 return r;
5190 }
5191
5192 return 0;
5193}
5194
5195int symlink_or_copy(const char *from, const char *to) {
5196 char *pf = NULL, *pt = NULL;
5197 struct stat a, b;
5198 int r;
5199
5200 assert(from);
5201 assert(to);
5202
5203 if (parent_of_path(from, &pf) < 0 ||
5204 parent_of_path(to, &pt) < 0) {
5205 r = -ENOMEM;
5206 goto finish;
5207 }
5208
5209 if (stat(pf, &a) < 0 ||
5210 stat(pt, &b) < 0) {
5211 r = -errno;
5212 goto finish;
5213 }
5214
5215 if (a.st_dev != b.st_dev) {
5216 free(pf);
5217 free(pt);
5218
5219 return copy_file(from, to);
5220 }
5221
5222 if (symlink(from, to) < 0) {
5223 r = -errno;
5224 goto finish;
5225 }
5226
5227 r = 0;
5228
5229finish:
5230 free(pf);
5231 free(pt);
5232
5233 return r;
5234}
5235
5236int symlink_or_copy_atomic(const char *from, const char *to) {
5237 char *t, *x;
5238 const char *fn;
5239 size_t k;
5240 unsigned long long ull;
5241 unsigned i;
5242 int r;
5243
5244 assert(from);
5245 assert(to);
5246
5247 t = new(char, strlen(to) + 1 + 16 + 1);
5248 if (!t)
5249 return -ENOMEM;
5250
5251 fn = file_name_from_path(to);
5252 k = fn-to;
5253 memcpy(t, to, k);
5254 t[k] = '.';
5255 x = stpcpy(t+k+1, fn);
5256
5257 ull = random_ull();
5258 for (i = 0; i < 16; i++) {
5259 *(x++) = hexchar(ull & 0xF);
5260 ull >>= 4;
5261 }
5262
5263 *x = 0;
5264
5265 r = symlink_or_copy(from, t);
5266 if (r < 0) {
5267 unlink(t);
5268 free(t);
5269 return r;
5270 }
5271
5272 if (rename(t, to) < 0) {
5273 r = -errno;
5274 unlink(t);
5275 free(t);
5276 return r;
5277 }
5278
5279 free(t);
5280 return r;
5281}
5282
98a28fef
LP
5283int audit_session_from_pid(pid_t pid, uint32_t *id) {
5284 char *p, *s;
5285 uint32_t u;
5286 int r;
5287
5288 assert(pid >= 1);
5289 assert(id);
5290
5291 if (have_effective_cap(CAP_AUDIT_CONTROL) <= 0)
5292 return -ENOENT;
5293
5294 if (asprintf(&p, "/proc/%lu/sessionid", (unsigned long) pid) < 0)
5295 return -ENOMEM;
5296
5297 r = read_one_line_file(p, &s);
5298 free(p);
5299 if (r < 0)
5300 return r;
5301
5302 r = safe_atou32(s, &u);
5303 free(s);
5304
5305 if (r < 0)
5306 return r;
5307
5308 if (u == (uint32_t) -1 || u <= 0)
5309 return -ENOENT;
5310
5311 *id = u;
5312 return 0;
5313}
5314
4d6d6518
LP
5315bool display_is_local(const char *display) {
5316 assert(display);
5317
5318 return
5319 display[0] == ':' &&
5320 display[1] >= '0' &&
5321 display[1] <= '9';
5322}
5323
5324int socket_from_display(const char *display, char **path) {
5325 size_t k;
5326 char *f, *c;
5327
5328 assert(display);
5329 assert(path);
5330
5331 if (!display_is_local(display))
5332 return -EINVAL;
5333
5334 k = strspn(display+1, "0123456789");
5335
5336 f = new(char, sizeof("/tmp/.X11-unix/X") + k);
5337 if (!f)
5338 return -ENOMEM;
5339
5340 c = stpcpy(f, "/tmp/.X11-unix/X");
5341 memcpy(c, display+1, k);
5342 c[k] = 0;
5343
5344 *path = f;
5345
5346 return 0;
5347}
5348
1cccf435
MV
5349int get_user_creds(const char **username, uid_t *uid, gid_t *gid, const char **home) {
5350 struct passwd *p;
ddd88763 5351 uid_t u;
1cccf435
MV
5352
5353 assert(username);
5354 assert(*username);
1cccf435
MV
5355
5356 /* We enforce some special rules for uid=0: in order to avoid
5357 * NSS lookups for root we hardcode its data. */
5358
5359 if (streq(*username, "root") || streq(*username, "0")) {
5360 *username = "root";
4b67834e
LP
5361
5362 if (uid)
5363 *uid = 0;
5364
5365 if (gid)
5366 *gid = 0;
5367
5368 if (home)
5369 *home = "/root";
1cccf435
MV
5370 return 0;
5371 }
5372
ddd88763 5373 if (parse_uid(*username, &u) >= 0) {
1cccf435 5374 errno = 0;
ddd88763 5375 p = getpwuid(u);
1cccf435
MV
5376
5377 /* If there are multiple users with the same id, make
5378 * sure to leave $USER to the configured value instead
5379 * of the first occurrence in the database. However if
5380 * the uid was configured by a numeric uid, then let's
5381 * pick the real username from /etc/passwd. */
5382 if (p)
5383 *username = p->pw_name;
5384 } else {
5385 errno = 0;
5386 p = getpwnam(*username);
5387 }
5388
5389 if (!p)
5390 return errno != 0 ? -errno : -ESRCH;
5391
4b67834e
LP
5392 if (uid)
5393 *uid = p->pw_uid;
5394
5395 if (gid)
5396 *gid = p->pw_gid;
5397
5398 if (home)
5399 *home = p->pw_dir;
5400
5401 return 0;
5402}
5403
5404int get_group_creds(const char **groupname, gid_t *gid) {
5405 struct group *g;
5406 gid_t id;
5407
5408 assert(groupname);
5409
5410 /* We enforce some special rules for gid=0: in order to avoid
5411 * NSS lookups for root we hardcode its data. */
5412
5413 if (streq(*groupname, "root") || streq(*groupname, "0")) {
5414 *groupname = "root";
5415
5416 if (gid)
5417 *gid = 0;
5418
5419 return 0;
5420 }
5421
5422 if (parse_gid(*groupname, &id) >= 0) {
5423 errno = 0;
5424 g = getgrgid(id);
5425
5426 if (g)
5427 *groupname = g->gr_name;
5428 } else {
5429 errno = 0;
5430 g = getgrnam(*groupname);
5431 }
5432
5433 if (!g)
5434 return errno != 0 ? -errno : -ESRCH;
5435
5436 if (gid)
5437 *gid = g->gr_gid;
5438
1cccf435
MV
5439 return 0;
5440}
5441
8092a428
LP
5442int glob_exists(const char *path) {
5443 glob_t g;
5444 int r, k;
5445
5446 assert(path);
5447
5448 zero(g);
5449 errno = 0;
5450 k = glob(path, GLOB_NOSORT|GLOB_BRACE, NULL, &g);
5451
5452 if (k == GLOB_NOMATCH)
5453 r = 0;
5454 else if (k == GLOB_NOSPACE)
5455 r = -ENOMEM;
5456 else if (k == 0)
5457 r = !strv_isempty(g.gl_pathv);
5458 else
5459 r = errno ? -errno : -EIO;
5460
5461 globfree(&g);
5462
5463 return r;
5464}
5465
83096483
LP
5466int dirent_ensure_type(DIR *d, struct dirent *de) {
5467 struct stat st;
5468
5469 assert(d);
5470 assert(de);
5471
5472 if (de->d_type != DT_UNKNOWN)
5473 return 0;
5474
5475 if (fstatat(dirfd(d), de->d_name, &st, AT_SYMLINK_NOFOLLOW) < 0)
5476 return -errno;
5477
5478 de->d_type =
5479 S_ISREG(st.st_mode) ? DT_REG :
5480 S_ISDIR(st.st_mode) ? DT_DIR :
5481 S_ISLNK(st.st_mode) ? DT_LNK :
5482 S_ISFIFO(st.st_mode) ? DT_FIFO :
5483 S_ISSOCK(st.st_mode) ? DT_SOCK :
5484 S_ISCHR(st.st_mode) ? DT_CHR :
5485 S_ISBLK(st.st_mode) ? DT_BLK :
5486 DT_UNKNOWN;
5487
5488 return 0;
5489}
5490
5491int in_search_path(const char *path, char **search) {
5492 char **i, *parent;
5493 int r;
5494
5495 r = parent_of_path(path, &parent);
5496 if (r < 0)
5497 return r;
5498
5499 r = 0;
5500
5501 STRV_FOREACH(i, search) {
5502 if (path_equal(parent, *i)) {
5503 r = 1;
5504 break;
5505 }
5506 }
5507
5508 free(parent);
5509
5510 return r;
5511}
5512
034a2a52
LP
5513int get_files_in_directory(const char *path, char ***list) {
5514 DIR *d;
5515 int r = 0;
5516 unsigned n = 0;
5517 char **l = NULL;
5518
5519 assert(path);
d60ef526
LP
5520
5521 /* Returns all files in a directory in *list, and the number
5522 * of files as return value. If list is NULL returns only the
5523 * number */
034a2a52
LP
5524
5525 d = opendir(path);
8ea913b2
LP
5526 if (!d)
5527 return -errno;
5528
034a2a52
LP
5529 for (;;) {
5530 struct dirent buffer, *de;
5531 int k;
5532
5533 k = readdir_r(d, &buffer, &de);
5534 if (k != 0) {
5535 r = -k;
5536 goto finish;
5537 }
5538
5539 if (!de)
5540 break;
5541
5542 dirent_ensure_type(d, de);
5543
5544 if (!dirent_is_file(de))
5545 continue;
5546
d60ef526
LP
5547 if (list) {
5548 if ((unsigned) r >= n) {
5549 char **t;
034a2a52 5550
d60ef526
LP
5551 n = MAX(16, 2*r);
5552 t = realloc(l, sizeof(char*) * n);
5553 if (!t) {
5554 r = -ENOMEM;
5555 goto finish;
5556 }
034a2a52 5557
d60ef526
LP
5558 l = t;
5559 }
034a2a52 5560
d60ef526 5561 assert((unsigned) r < n);
034a2a52 5562
d60ef526
LP
5563 l[r] = strdup(de->d_name);
5564 if (!l[r]) {
5565 r = -ENOMEM;
5566 goto finish;
5567 }
034a2a52 5568
d60ef526
LP
5569 l[++r] = NULL;
5570 } else
5571 r++;
034a2a52
LP
5572 }
5573
5574finish:
5575 if (d)
5576 closedir(d);
5577
d60ef526
LP
5578 if (r >= 0) {
5579 if (list)
5580 *list = l;
5581 } else
034a2a52
LP
5582 strv_free(l);
5583
5584 return r;
5585}
5586
911a4828
LP
5587char *join(const char *x, ...) {
5588 va_list ap;
5589 size_t l;
5590 char *r, *p;
5591
5592 va_start(ap, x);
5593
5594 if (x) {
5595 l = strlen(x);
5596
5597 for (;;) {
5598 const char *t;
5599
5600 t = va_arg(ap, const char *);
5601 if (!t)
5602 break;
5603
5604 l += strlen(t);
5605 }
5606 } else
5607 l = 0;
5608
5609 va_end(ap);
5610
5611 r = new(char, l+1);
5612 if (!r)
5613 return NULL;
5614
5615 if (x) {
5616 p = stpcpy(r, x);
5617
5618 va_start(ap, x);
5619
5620 for (;;) {
5621 const char *t;
5622
5623 t = va_arg(ap, const char *);
5624 if (!t)
5625 break;
5626
5627 p = stpcpy(p, t);
5628 }
8ea913b2
LP
5629
5630 va_end(ap);
911a4828
LP
5631 } else
5632 r[0] = 0;
5633
5634 return r;
5635}
5636
b636465b
LP
5637bool is_main_thread(void) {
5638 static __thread int cached = 0;
5639
5640 if (_unlikely_(cached == 0))
5641 cached = getpid() == gettid() ? 1 : -1;
5642
5643 return cached > 0;
5644}
5645
94959f0f
LP
5646int block_get_whole_disk(dev_t d, dev_t *ret) {
5647 char *p, *s;
5648 int r;
5649 unsigned n, m;
5650
5651 assert(ret);
5652
5653 /* If it has a queue this is good enough for us */
5654 if (asprintf(&p, "/sys/dev/block/%u:%u/queue", major(d), minor(d)) < 0)
5655 return -ENOMEM;
5656
5657 r = access(p, F_OK);
5658 free(p);
5659
5660 if (r >= 0) {
5661 *ret = d;
5662 return 0;
5663 }
5664
5665 /* If it is a partition find the originating device */
5666 if (asprintf(&p, "/sys/dev/block/%u:%u/partition", major(d), minor(d)) < 0)
5667 return -ENOMEM;
5668
5669 r = access(p, F_OK);
5670 free(p);
5671
5672 if (r < 0)
5673 return -ENOENT;
5674
5675 /* Get parent dev_t */
5676 if (asprintf(&p, "/sys/dev/block/%u:%u/../dev", major(d), minor(d)) < 0)
5677 return -ENOMEM;
5678
5679 r = read_one_line_file(p, &s);
5680 free(p);
5681
5682 if (r < 0)
5683 return r;
5684
5685 r = sscanf(s, "%u:%u", &m, &n);
5686 free(s);
5687
5688 if (r != 2)
5689 return -EINVAL;
5690
5691 /* Only return this if it is really good enough for us. */
5692 if (asprintf(&p, "/sys/dev/block/%u:%u/queue", m, n) < 0)
5693 return -ENOMEM;
5694
5695 r = access(p, F_OK);
5696 free(p);
5697
5698 if (r >= 0) {
5699 *ret = makedev(m, n);
5700 return 0;
5701 }
5702
5703 return -ENOENT;
5704}
5705
ad293f5a
LP
5706int file_is_sticky(const char *p) {
5707 struct stat st;
5708
5709 assert(p);
5710
5711 if (lstat(p, &st) < 0)
5712 return -errno;
5713
5714 return
5715 st.st_uid == 0 &&
5716 (st.st_mode & S_ISVTX);
5717}
94959f0f 5718
f41607a6
LP
5719static const char *const ioprio_class_table[] = {
5720 [IOPRIO_CLASS_NONE] = "none",
5721 [IOPRIO_CLASS_RT] = "realtime",
5722 [IOPRIO_CLASS_BE] = "best-effort",
5723 [IOPRIO_CLASS_IDLE] = "idle"
5724};
5725
5726DEFINE_STRING_TABLE_LOOKUP(ioprio_class, int);
5727
5728static const char *const sigchld_code_table[] = {
5729 [CLD_EXITED] = "exited",
5730 [CLD_KILLED] = "killed",
5731 [CLD_DUMPED] = "dumped",
5732 [CLD_TRAPPED] = "trapped",
5733 [CLD_STOPPED] = "stopped",
5734 [CLD_CONTINUED] = "continued",
5735};
5736
5737DEFINE_STRING_TABLE_LOOKUP(sigchld_code, int);
5738
5739static const char *const log_facility_unshifted_table[LOG_NFACILITIES] = {
5740 [LOG_FAC(LOG_KERN)] = "kern",
5741 [LOG_FAC(LOG_USER)] = "user",
5742 [LOG_FAC(LOG_MAIL)] = "mail",
5743 [LOG_FAC(LOG_DAEMON)] = "daemon",
5744 [LOG_FAC(LOG_AUTH)] = "auth",
5745 [LOG_FAC(LOG_SYSLOG)] = "syslog",
5746 [LOG_FAC(LOG_LPR)] = "lpr",
5747 [LOG_FAC(LOG_NEWS)] = "news",
5748 [LOG_FAC(LOG_UUCP)] = "uucp",
5749 [LOG_FAC(LOG_CRON)] = "cron",
5750 [LOG_FAC(LOG_AUTHPRIV)] = "authpriv",
5751 [LOG_FAC(LOG_FTP)] = "ftp",
5752 [LOG_FAC(LOG_LOCAL0)] = "local0",
5753 [LOG_FAC(LOG_LOCAL1)] = "local1",
5754 [LOG_FAC(LOG_LOCAL2)] = "local2",
5755 [LOG_FAC(LOG_LOCAL3)] = "local3",
5756 [LOG_FAC(LOG_LOCAL4)] = "local4",
5757 [LOG_FAC(LOG_LOCAL5)] = "local5",
5758 [LOG_FAC(LOG_LOCAL6)] = "local6",
5759 [LOG_FAC(LOG_LOCAL7)] = "local7"
5760};
5761
5762DEFINE_STRING_TABLE_LOOKUP(log_facility_unshifted, int);
5763
5764static const char *const log_level_table[] = {
5765 [LOG_EMERG] = "emerg",
5766 [LOG_ALERT] = "alert",
5767 [LOG_CRIT] = "crit",
5768 [LOG_ERR] = "err",
5769 [LOG_WARNING] = "warning",
5770 [LOG_NOTICE] = "notice",
5771 [LOG_INFO] = "info",
5772 [LOG_DEBUG] = "debug"
5773};
5774
5775DEFINE_STRING_TABLE_LOOKUP(log_level, int);
5776
5777static const char* const sched_policy_table[] = {
5778 [SCHED_OTHER] = "other",
5779 [SCHED_BATCH] = "batch",
5780 [SCHED_IDLE] = "idle",
5781 [SCHED_FIFO] = "fifo",
5782 [SCHED_RR] = "rr"
5783};
5784
5785DEFINE_STRING_TABLE_LOOKUP(sched_policy, int);
5786
5787static const char* const rlimit_table[] = {
5788 [RLIMIT_CPU] = "LimitCPU",
5789 [RLIMIT_FSIZE] = "LimitFSIZE",
5790 [RLIMIT_DATA] = "LimitDATA",
5791 [RLIMIT_STACK] = "LimitSTACK",
5792 [RLIMIT_CORE] = "LimitCORE",
5793 [RLIMIT_RSS] = "LimitRSS",
5794 [RLIMIT_NOFILE] = "LimitNOFILE",
5795 [RLIMIT_AS] = "LimitAS",
5796 [RLIMIT_NPROC] = "LimitNPROC",
5797 [RLIMIT_MEMLOCK] = "LimitMEMLOCK",
5798 [RLIMIT_LOCKS] = "LimitLOCKS",
5799 [RLIMIT_SIGPENDING] = "LimitSIGPENDING",
5800 [RLIMIT_MSGQUEUE] = "LimitMSGQUEUE",
5801 [RLIMIT_NICE] = "LimitNICE",
5802 [RLIMIT_RTPRIO] = "LimitRTPRIO",
5803 [RLIMIT_RTTIME] = "LimitRTTIME"
5804};
5805
5806DEFINE_STRING_TABLE_LOOKUP(rlimit, int);
5807
5808static const char* const ip_tos_table[] = {
5809 [IPTOS_LOWDELAY] = "low-delay",
5810 [IPTOS_THROUGHPUT] = "throughput",
5811 [IPTOS_RELIABILITY] = "reliability",
5812 [IPTOS_LOWCOST] = "low-cost",
5813};
5814
5815DEFINE_STRING_TABLE_LOOKUP(ip_tos, int);
5816
5817static const char *const signal_table[] = {
5818 [SIGHUP] = "HUP",
5819 [SIGINT] = "INT",
5820 [SIGQUIT] = "QUIT",
5821 [SIGILL] = "ILL",
5822 [SIGTRAP] = "TRAP",
5823 [SIGABRT] = "ABRT",
5824 [SIGBUS] = "BUS",
5825 [SIGFPE] = "FPE",
5826 [SIGKILL] = "KILL",
5827 [SIGUSR1] = "USR1",
5828 [SIGSEGV] = "SEGV",
5829 [SIGUSR2] = "USR2",
5830 [SIGPIPE] = "PIPE",
5831 [SIGALRM] = "ALRM",
5832 [SIGTERM] = "TERM",
5833#ifdef SIGSTKFLT
5834 [SIGSTKFLT] = "STKFLT", /* Linux on SPARC doesn't know SIGSTKFLT */
5835#endif
5836 [SIGCHLD] = "CHLD",
5837 [SIGCONT] = "CONT",
5838 [SIGSTOP] = "STOP",
5839 [SIGTSTP] = "TSTP",
5840 [SIGTTIN] = "TTIN",
5841 [SIGTTOU] = "TTOU",
5842 [SIGURG] = "URG",
5843 [SIGXCPU] = "XCPU",
5844 [SIGXFSZ] = "XFSZ",
5845 [SIGVTALRM] = "VTALRM",
5846 [SIGPROF] = "PROF",
5847 [SIGWINCH] = "WINCH",
5848 [SIGIO] = "IO",
5849 [SIGPWR] = "PWR",
5850 [SIGSYS] = "SYS"
5851};
5852
5853DEFINE_STRING_TABLE_LOOKUP(signal, int);
65457142
FC
5854
5855bool kexec_loaded(void) {
5856 bool loaded = false;
5857 char *s;
5858
5859 if (read_one_line_file("/sys/kernel/kexec_loaded", &s) >= 0) {
5860 if (s[0] == '1')
5861 loaded = true;
5862 free(s);
5863 }
5864 return loaded;
5865}