1 /* SPDX-License-Identifier: LGPL-2.1+ */
13 #include <sys/types.h>
16 #include "alloc-util.h"
24 #include "hexdecoct.h"
28 #include "parse-util.h"
29 #include "path-util.h"
30 #include "process-util.h"
31 #include "random-util.h"
32 #include "stdio-util.h"
33 #include "string-util.h"
35 #include "time-util.h"
36 #include "umask-util.h"
39 #define READ_FULL_BYTES_MAX (4U*1024U*1024U)
41 int write_string_stream_ts(
44 WriteStringFileFlags flags
,
45 struct timespec
*ts
) {
56 needs_nl
= !(flags
& WRITE_STRING_FILE_AVOID_NEWLINE
) && !endswith(line
, "\n");
58 if (needs_nl
&& (flags
& WRITE_STRING_FILE_DISABLE_BUFFER
)) {
59 /* If STDIO buffering was disabled, then let's append the newline character to the string itself, so
60 * that the write goes out in one go, instead of two */
62 line
= strjoina(line
, "\n");
66 if (fputs(line
, f
) == EOF
)
70 if (fputc('\n', f
) == EOF
)
73 if (flags
& WRITE_STRING_FILE_SYNC
)
74 r
= fflush_sync_and_check(f
);
76 r
= fflush_and_check(f
);
81 struct timespec twice
[2] = {*ts
, *ts
};
83 if (futimens(fileno(f
), twice
) < 0)
90 static int write_string_file_atomic(
93 WriteStringFileFlags flags
,
94 struct timespec
*ts
) {
96 _cleanup_fclose_
FILE *f
= NULL
;
97 _cleanup_free_
char *p
= NULL
;
103 r
= fopen_temporary(fn
, &f
, &p
);
107 (void) __fsetlocking(f
, FSETLOCKING_BYCALLER
);
108 (void) fchmod_umask(fileno(f
), 0644);
110 r
= write_string_stream_ts(f
, line
, flags
, ts
);
114 if (rename(p
, fn
) < 0) {
126 int write_string_file_ts(
129 WriteStringFileFlags flags
,
130 struct timespec
*ts
) {
132 _cleanup_fclose_
FILE *f
= NULL
;
138 /* We don't know how to verify whether the file contents was already on-disk. */
139 assert(!((flags
& WRITE_STRING_FILE_VERIFY_ON_FAILURE
) && (flags
& WRITE_STRING_FILE_SYNC
)));
141 if (flags
& WRITE_STRING_FILE_ATOMIC
) {
142 assert(flags
& WRITE_STRING_FILE_CREATE
);
144 r
= write_string_file_atomic(fn
, line
, flags
, ts
);
152 if (flags
& WRITE_STRING_FILE_CREATE
) {
161 /* We manually build our own version of fopen(..., "we") that
162 * works without O_CREAT */
163 fd
= open(fn
, O_WRONLY
|O_CLOEXEC
|O_NOCTTY
);
169 f
= fdopen(fd
, "we");
177 (void) __fsetlocking(f
, FSETLOCKING_BYCALLER
);
179 if (flags
& WRITE_STRING_FILE_DISABLE_BUFFER
)
180 setvbuf(f
, NULL
, _IONBF
, 0);
182 r
= write_string_stream_ts(f
, line
, flags
, ts
);
189 if (!(flags
& WRITE_STRING_FILE_VERIFY_ON_FAILURE
))
194 /* OK, the operation failed, but let's see if the right
195 * contents in place already. If so, eat up the error. */
197 q
= verify_file(fn
, line
, !(flags
& WRITE_STRING_FILE_AVOID_NEWLINE
));
204 int write_string_filef(
206 WriteStringFileFlags flags
,
207 const char *format
, ...) {
209 _cleanup_free_
char *p
= NULL
;
213 va_start(ap
, format
);
214 r
= vasprintf(&p
, format
, ap
);
220 return write_string_file(fn
, p
, flags
);
223 int read_one_line_file(const char *fn
, char **line
) {
224 _cleanup_fclose_
FILE *f
= NULL
;
234 (void) __fsetlocking(f
, FSETLOCKING_BYCALLER
);
236 r
= read_line(f
, LONG_LINE_MAX
, line
);
237 return r
< 0 ? r
: 0;
240 int verify_file(const char *fn
, const char *blob
, bool accept_extra_nl
) {
241 _cleanup_fclose_
FILE *f
= NULL
;
242 _cleanup_free_
char *buf
= NULL
;
250 if (accept_extra_nl
&& endswith(blob
, "\n"))
251 accept_extra_nl
= false;
253 buf
= malloc(l
+ accept_extra_nl
+ 1);
261 (void) __fsetlocking(f
, FSETLOCKING_BYCALLER
);
263 /* We try to read one byte more than we need, so that we know whether we hit eof */
265 k
= fread(buf
, 1, l
+ accept_extra_nl
+ 1, f
);
267 return errno
> 0 ? -errno
: -EIO
;
269 if (k
!= l
&& k
!= l
+ accept_extra_nl
)
271 if (memcmp(buf
, blob
, l
) != 0)
273 if (k
> l
&& buf
[l
] != '\n')
279 int read_full_stream(FILE *f
, char **contents
, size_t *size
) {
280 _cleanup_free_
char *buf
= NULL
;
291 if (fd
>= 0) { /* If the FILE* object is backed by an fd (as opposed to memory or such, see fmemopen(), let's
292 * optimize our buffering) */
294 if (fstat(fileno(f
), &st
) < 0)
297 if (S_ISREG(st
.st_mode
)) {
300 if (st
.st_size
> READ_FULL_BYTES_MAX
)
303 /* Start with the right file size, but be prepared for files from /proc which generally report a file
304 * size of 0. Note that we increase the size to read here by one, so that the first read attempt
305 * already makes us notice the EOF. */
316 t
= realloc(buf
, n
+ 1);
322 k
= fread(buf
+ l
, 1, n
- l
, f
);
327 return errno
> 0 ? -errno
: -EIO
;
332 /* We aren't expecting fread() to return a short read outside
333 * of (error && eof), assert buffer is full and enlarge buffer.
338 if (n
>= READ_FULL_BYTES_MAX
)
341 n
= MIN(n
* 2, READ_FULL_BYTES_MAX
);
345 *contents
= TAKE_PTR(buf
);
353 int read_full_file(const char *fn
, char **contents
, size_t *size
) {
354 _cleanup_fclose_
FILE *f
= NULL
;
363 (void) __fsetlocking(f
, FSETLOCKING_BYCALLER
);
365 return read_full_stream(f
, contents
, size
);
368 static int parse_env_file_internal(
372 int (*push
) (const char *filename
, unsigned line
,
373 const char *key
, char *value
, void *userdata
, int *n_pushed
),
377 size_t key_alloc
= 0, n_key
= 0, value_alloc
= 0, n_value
= 0, last_value_whitespace
= (size_t) -1, last_key_whitespace
= (size_t) -1;
378 _cleanup_free_
char *contents
= NULL
, *key
= NULL
, *value
= NULL
;
390 SINGLE_QUOTE_VALUE_ESCAPE
,
392 DOUBLE_QUOTE_VALUE_ESCAPE
,
400 r
= read_full_stream(f
, &contents
, NULL
);
402 r
= read_full_file(fname
, &contents
, NULL
);
406 for (p
= contents
; *p
; p
++) {
412 if (strchr(COMMENTS
, c
))
414 else if (!strchr(WHITESPACE
, c
)) {
416 last_key_whitespace
= (size_t) -1;
418 if (!GREEDY_REALLOC(key
, key_alloc
, n_key
+2))
426 if (strchr(newline
, c
)) {
430 } else if (c
== '=') {
432 last_value_whitespace
= (size_t) -1;
434 if (!strchr(WHITESPACE
, c
))
435 last_key_whitespace
= (size_t) -1;
436 else if (last_key_whitespace
== (size_t) -1)
437 last_key_whitespace
= n_key
;
439 if (!GREEDY_REALLOC(key
, key_alloc
, n_key
+2))
448 if (strchr(newline
, c
)) {
456 /* strip trailing whitespace from key */
457 if (last_key_whitespace
!= (size_t) -1)
458 key
[last_key_whitespace
] = 0;
460 r
= push(fname
, line
, key
, value
, userdata
, n_pushed
);
466 value_alloc
= n_value
= 0;
468 } else if (c
== '\'')
469 state
= SINGLE_QUOTE_VALUE
;
471 state
= DOUBLE_QUOTE_VALUE
;
473 state
= VALUE_ESCAPE
;
474 else if (!strchr(WHITESPACE
, c
)) {
477 if (!GREEDY_REALLOC(value
, value_alloc
, n_value
+2))
480 value
[n_value
++] = c
;
486 if (strchr(newline
, c
)) {
495 /* Chomp off trailing whitespace from value */
496 if (last_value_whitespace
!= (size_t) -1)
497 value
[last_value_whitespace
] = 0;
499 /* strip trailing whitespace from key */
500 if (last_key_whitespace
!= (size_t) -1)
501 key
[last_key_whitespace
] = 0;
503 r
= push(fname
, line
, key
, value
, userdata
, n_pushed
);
509 value_alloc
= n_value
= 0;
511 } else if (c
== '\\') {
512 state
= VALUE_ESCAPE
;
513 last_value_whitespace
= (size_t) -1;
515 if (!strchr(WHITESPACE
, c
))
516 last_value_whitespace
= (size_t) -1;
517 else if (last_value_whitespace
== (size_t) -1)
518 last_value_whitespace
= n_value
;
520 if (!GREEDY_REALLOC(value
, value_alloc
, n_value
+2))
523 value
[n_value
++] = c
;
531 if (!strchr(newline
, c
)) {
532 /* Escaped newlines we eat up entirely */
533 if (!GREEDY_REALLOC(value
, value_alloc
, n_value
+2))
536 value
[n_value
++] = c
;
540 case SINGLE_QUOTE_VALUE
:
544 state
= SINGLE_QUOTE_VALUE_ESCAPE
;
546 if (!GREEDY_REALLOC(value
, value_alloc
, n_value
+2))
549 value
[n_value
++] = c
;
554 case SINGLE_QUOTE_VALUE_ESCAPE
:
555 state
= SINGLE_QUOTE_VALUE
;
557 if (!strchr(newline
, c
)) {
558 if (!GREEDY_REALLOC(value
, value_alloc
, n_value
+2))
561 value
[n_value
++] = c
;
565 case DOUBLE_QUOTE_VALUE
:
569 state
= DOUBLE_QUOTE_VALUE_ESCAPE
;
571 if (!GREEDY_REALLOC(value
, value_alloc
, n_value
+2))
574 value
[n_value
++] = c
;
579 case DOUBLE_QUOTE_VALUE_ESCAPE
:
580 state
= DOUBLE_QUOTE_VALUE
;
582 if (!strchr(newline
, c
)) {
583 if (!GREEDY_REALLOC(value
, value_alloc
, n_value
+2))
586 value
[n_value
++] = c
;
592 state
= COMMENT_ESCAPE
;
593 else if (strchr(newline
, c
)) {
610 SINGLE_QUOTE_VALUE_ESCAPE
,
612 DOUBLE_QUOTE_VALUE_ESCAPE
)) {
620 if (last_value_whitespace
!= (size_t) -1)
621 value
[last_value_whitespace
] = 0;
623 /* strip trailing whitespace from key */
624 if (last_key_whitespace
!= (size_t) -1)
625 key
[last_key_whitespace
] = 0;
627 r
= push(fname
, line
, key
, value
, userdata
, n_pushed
);
637 static int check_utf8ness_and_warn(
638 const char *filename
, unsigned line
,
639 const char *key
, char *value
) {
641 if (!utf8_is_valid(key
)) {
642 _cleanup_free_
char *p
= NULL
;
644 p
= utf8_escape_invalid(key
);
645 log_error("%s:%u: invalid UTF-8 in key '%s', ignoring.", strna(filename
), line
, p
);
649 if (value
&& !utf8_is_valid(value
)) {
650 _cleanup_free_
char *p
= NULL
;
652 p
= utf8_escape_invalid(value
);
653 log_error("%s:%u: invalid UTF-8 value for key %s: '%s', ignoring.", strna(filename
), line
, key
, p
);
660 static int parse_env_file_push(
661 const char *filename
, unsigned line
,
662 const char *key
, char *value
,
667 va_list aq
, *ap
= userdata
;
670 r
= check_utf8ness_and_warn(filename
, line
, key
, value
);
676 while ((k
= va_arg(aq
, const char *))) {
679 v
= va_arg(aq
, char **);
712 r
= parse_env_file_internal(f
, fname
, newline
, parse_env_file_push
, &aq
, &n_pushed
);
729 va_start(ap
, newline
);
730 r
= parse_env_filev(f
, fname
, newline
, ap
);
736 static int load_env_file_push(
737 const char *filename
, unsigned line
,
738 const char *key
, char *value
,
741 char ***m
= userdata
;
745 r
= check_utf8ness_and_warn(filename
, line
, key
, value
);
749 p
= strjoin(key
, "=", value
);
753 r
= strv_env_replace(m
, p
);
766 int load_env_file(FILE *f
, const char *fname
, const char *newline
, char ***rl
) {
773 r
= parse_env_file_internal(f
, fname
, newline
, load_env_file_push
, &m
, NULL
);
783 static int load_env_file_push_pairs(
784 const char *filename
, unsigned line
,
785 const char *key
, char *value
,
788 char ***m
= userdata
;
791 r
= check_utf8ness_and_warn(filename
, line
, key
, value
);
795 r
= strv_extend(m
, key
);
800 r
= strv_extend(m
, "");
804 r
= strv_push(m
, value
);
815 int load_env_file_pairs(FILE *f
, const char *fname
, const char *newline
, char ***rl
) {
822 r
= parse_env_file_internal(f
, fname
, newline
, load_env_file_push_pairs
, &m
, NULL
);
832 static int merge_env_file_push(
833 const char *filename
, unsigned line
,
834 const char *key
, char *value
,
838 char ***env
= userdata
;
839 char *expanded_value
;
844 log_error("%s:%u: invalid syntax (around \"%s\"), ignoring.", strna(filename
), line
, key
);
848 if (!env_name_is_valid(key
)) {
849 log_error("%s:%u: invalid variable name \"%s\", ignoring.", strna(filename
), line
, key
);
854 expanded_value
= replace_env(value
, *env
,
855 REPLACE_ENV_USE_ENVIRONMENT
|
856 REPLACE_ENV_ALLOW_BRACELESS
|
857 REPLACE_ENV_ALLOW_EXTENDED
);
861 free_and_replace(value
, expanded_value
);
863 return load_env_file_push(filename
, line
, key
, value
, env
, n_pushed
);
871 /* NOTE: this function supports braceful and braceless variable expansions,
872 * plus "extended" substitutions, unlike other exported parsing functions.
875 return parse_env_file_internal(f
, fname
, NEWLINE
, merge_env_file_push
, env
, NULL
);
878 static void write_env_var(FILE *f
, const char *v
) {
884 fputs_unlocked(v
, f
);
885 fputc_unlocked('\n', f
);
890 fwrite_unlocked(v
, 1, p
-v
, f
);
892 if (string_has_cc(p
, NULL
) || chars_intersect(p
, WHITESPACE SHELL_NEED_QUOTES
)) {
893 fputc_unlocked('\"', f
);
896 if (strchr(SHELL_NEED_ESCAPE
, *p
))
897 fputc_unlocked('\\', f
);
899 fputc_unlocked(*p
, f
);
902 fputc_unlocked('\"', f
);
904 fputs_unlocked(p
, f
);
906 fputc_unlocked('\n', f
);
909 int write_env_file(const char *fname
, char **l
) {
910 _cleanup_fclose_
FILE *f
= NULL
;
911 _cleanup_free_
char *p
= NULL
;
917 r
= fopen_temporary(fname
, &f
, &p
);
921 (void) __fsetlocking(f
, FSETLOCKING_BYCALLER
);
922 (void) fchmod_umask(fileno(f
), 0644);
925 write_env_var(f
, *i
);
927 r
= fflush_and_check(f
);
929 if (rename(p
, fname
) >= 0)
939 int executable_is_script(const char *path
, char **interpreter
) {
940 _cleanup_free_
char *line
= NULL
;
947 r
= read_one_line_file(path
, &line
);
948 if (r
== -ENOBUFS
) /* First line overly long? if so, then it's not a script */
953 if (!startswith(line
, "#!"))
956 ans
= strstrip(line
+ 2);
957 len
= strcspn(ans
, " \t");
962 ans
= strndup(ans
, len
);
971 * Retrieve one field from a file like /proc/self/status. pattern
972 * should not include whitespace or the delimiter (':'). pattern matches only
973 * the beginning of a line. Whitespace before ':' is skipped. Whitespace and
974 * zeros after the ':' will be skipped. field must be freed afterwards.
975 * terminator specifies the terminating characters of the field value (not
976 * included in the value).
978 int get_proc_field(const char *filename
, const char *pattern
, const char *terminator
, char **field
) {
979 _cleanup_free_
char *status
= NULL
;
989 r
= read_full_file(filename
, &status
, NULL
);
999 t
= strstr(t
, pattern
);
1003 /* Check that pattern occurs in beginning of line. */
1004 pattern_ok
= (t
== status
|| t
[-1] == '\n');
1006 t
+= strlen(pattern
);
1008 } while (!pattern_ok
);
1010 t
+= strspn(t
, " \t");
1014 } while (*t
!= ':');
1019 t
+= strspn(t
, " \t");
1021 /* Also skip zeros, because when this is used for
1022 * capabilities, we don't want the zeros. This way the
1023 * same capability set always maps to the same string,
1024 * irrespective of the total capability set size. For
1025 * other numbers it shouldn't matter. */
1026 t
+= strspn(t
, "0");
1027 /* Back off one char if there's nothing but whitespace
1029 if (!*t
|| isspace(*t
))
1033 len
= strcspn(t
, terminator
);
1035 f
= strndup(t
, len
);
1043 DIR *xopendirat(int fd
, const char *name
, int flags
) {
1047 assert(!(flags
& O_CREAT
));
1049 nfd
= openat(fd
, name
, O_RDONLY
|O_NONBLOCK
|O_DIRECTORY
|O_CLOEXEC
|flags
, 0);
1062 static int search_and_fopen_internal(const char *path
, const char *mode
, const char *root
, char **search
, FILE **_f
) {
1069 if (!path_strv_resolve_uniq(search
, root
))
1072 STRV_FOREACH(i
, search
) {
1073 _cleanup_free_
char *p
= NULL
;
1077 p
= strjoin(root
, *i
, "/", path
);
1079 p
= strjoin(*i
, "/", path
);
1089 if (errno
!= ENOENT
)
1096 int search_and_fopen(const char *path
, const char *mode
, const char *root
, const char **search
, FILE **_f
) {
1097 _cleanup_strv_free_
char **copy
= NULL
;
1103 if (path_is_absolute(path
)) {
1106 f
= fopen(path
, mode
);
1115 copy
= strv_copy((char**) search
);
1119 return search_and_fopen_internal(path
, mode
, root
, copy
, _f
);
1122 int search_and_fopen_nulstr(const char *path
, const char *mode
, const char *root
, const char *search
, FILE **_f
) {
1123 _cleanup_strv_free_
char **s
= NULL
;
1125 if (path_is_absolute(path
)) {
1128 f
= fopen(path
, mode
);
1137 s
= strv_split_nulstr(search
);
1141 return search_and_fopen_internal(path
, mode
, root
, s
, _f
);
1144 int fopen_temporary(const char *path
, FILE **_f
, char **_temp_path
) {
1153 r
= tempfn_xxxxxx(path
, NULL
, &t
);
1157 fd
= mkostemp_safe(t
);
1163 f
= fdopen(fd
, "we");
1177 int fflush_and_check(FILE *f
) {
1184 return errno
> 0 ? -errno
: -EIO
;
1189 int fflush_sync_and_check(FILE *f
) {
1194 r
= fflush_and_check(f
);
1198 if (fsync(fileno(f
)) < 0)
1201 r
= fsync_directory_of_file(fileno(f
));
1208 /* This is much like mkostemp() but is subject to umask(). */
1209 int mkostemp_safe(char *pattern
) {
1210 _cleanup_umask_ mode_t u
= 0;
1217 fd
= mkostemp(pattern
, O_CLOEXEC
);
1224 int tempfn_xxxxxx(const char *p
, const char *extra
, char **ret
) {
1232 if (path_equal(p
, "/"))
1240 * /foo/bar/.#<extra>waldoXXXXXX
1244 if (!filename_is_valid(fn
))
1247 extra
= strempty(extra
);
1249 t
= new(char, strlen(p
) + 2 + strlen(extra
) + 6 + 1);
1253 strcpy(stpcpy(stpcpy(stpcpy(mempcpy(t
, p
, fn
- p
), ".#"), extra
), fn
), "XXXXXX");
1255 *ret
= path_simplify(t
, false);
1259 int tempfn_random(const char *p
, const char *extra
, char **ret
) {
1269 if (path_equal(p
, "/"))
1277 * /foo/bar/.#<extra>waldobaa2a261115984a9
1281 if (!filename_is_valid(fn
))
1284 extra
= strempty(extra
);
1286 t
= new(char, strlen(p
) + 2 + strlen(extra
) + 16 + 1);
1290 x
= stpcpy(stpcpy(stpcpy(mempcpy(t
, p
, fn
- p
), ".#"), extra
), fn
);
1293 for (i
= 0; i
< 16; i
++) {
1294 *(x
++) = hexchar(u
& 0xF);
1300 *ret
= path_simplify(t
, false);
1304 int tempfn_random_child(const char *p
, const char *extra
, char **ret
) {
1315 * /foo/bar/waldo/.#<extra>3c2b6219aa75d7d0
1324 extra
= strempty(extra
);
1326 t
= new(char, strlen(p
) + 3 + strlen(extra
) + 16 + 1);
1331 x
= stpcpy(stpcpy(t
, ".#"), extra
);
1333 x
= stpcpy(stpcpy(stpcpy(t
, p
), "/.#"), extra
);
1336 for (i
= 0; i
< 16; i
++) {
1337 *(x
++) = hexchar(u
& 0xF);
1343 *ret
= path_simplify(t
, false);
1347 int write_timestamp_file_atomic(const char *fn
, usec_t n
) {
1348 char ln
[DECIMAL_STR_MAX(n
)+2];
1350 /* Creates a "timestamp" file, that contains nothing but a
1351 * usec_t timestamp, formatted in ASCII. */
1353 if (n
<= 0 || n
>= USEC_INFINITY
)
1356 xsprintf(ln
, USEC_FMT
"\n", n
);
1358 return write_string_file(fn
, ln
, WRITE_STRING_FILE_CREATE
|WRITE_STRING_FILE_ATOMIC
);
1361 int read_timestamp_file(const char *fn
, usec_t
*ret
) {
1362 _cleanup_free_
char *ln
= NULL
;
1366 r
= read_one_line_file(fn
, &ln
);
1370 r
= safe_atou64(ln
, &t
);
1374 if (t
<= 0 || t
>= (uint64_t) USEC_INFINITY
)
1381 int fputs_with_space(FILE *f
, const char *s
, const char *separator
, bool *space
) {
1386 /* Outputs the specified string with fputs(), but optionally prefixes it with a separator. The *space parameter
1387 * when specified shall initially point to a boolean variable initialized to false. It is set to true after the
1388 * first invocation. This call is supposed to be use in loops, where a separator shall be inserted between each
1389 * element, but not before the first one. */
1399 r
= fputs(separator
, f
);
1410 int open_tmpfile_unlinkable(const char *directory
, int flags
) {
1415 r
= tmp_dir(&directory
);
1418 } else if (isempty(directory
))
1421 /* Returns an unlinked temporary file that cannot be linked into the file system anymore */
1423 /* Try O_TMPFILE first, if it is supported */
1424 fd
= open(directory
, flags
|O_TMPFILE
|O_EXCL
, S_IRUSR
|S_IWUSR
);
1428 /* Fall back to unguessable name + unlinking */
1429 p
= strjoina(directory
, "/systemd-tmp-XXXXXX");
1431 fd
= mkostemp_safe(p
);
1440 int open_tmpfile_linkable(const char *target
, int flags
, char **ret_path
) {
1441 _cleanup_free_
char *tmp
= NULL
;
1447 /* Don't allow O_EXCL, as that has a special meaning for O_TMPFILE */
1448 assert((flags
& O_EXCL
) == 0);
1450 /* Creates a temporary file, that shall be renamed to "target" later. If possible, this uses O_TMPFILE – in
1451 * which case "ret_path" will be returned as NULL. If not possible a the tempoary path name used is returned in
1452 * "ret_path". Use link_tmpfile() below to rename the result after writing the file in full. */
1454 fd
= open_parent(target
, O_TMPFILE
|flags
, 0640);
1460 log_debug_errno(fd
, "Failed to use O_TMPFILE for %s: %m", target
);
1462 r
= tempfn_random(target
, NULL
, &tmp
);
1466 fd
= open(tmp
, O_CREAT
|O_EXCL
|O_NOFOLLOW
|O_NOCTTY
|flags
, 0640);
1470 *ret_path
= TAKE_PTR(tmp
);
1475 int open_serialization_fd(const char *ident
) {
1478 fd
= memfd_create(ident
, MFD_CLOEXEC
);
1482 path
= getpid_cached() == 1 ? "/run/systemd" : "/tmp";
1483 fd
= open_tmpfile_unlinkable(path
, O_RDWR
|O_CLOEXEC
);
1487 log_debug("Serializing %s to %s.", ident
, path
);
1489 log_debug("Serializing %s to memfd.", ident
);
1494 int link_tmpfile(int fd
, const char *path
, const char *target
) {
1500 /* Moves a temporary file created with open_tmpfile() above into its final place. if "path" is NULL an fd
1501 * created with O_TMPFILE is assumed, and linkat() is used. Otherwise it is assumed O_TMPFILE is not supported
1502 * on the directory, and renameat2() is used instead.
1504 * Note that in both cases we will not replace existing files. This is because linkat() does not support this
1505 * operation currently (renameat2() does), and there is no nice way to emulate this. */
1508 r
= rename_noreplace(AT_FDCWD
, path
, AT_FDCWD
, target
);
1512 char proc_fd_path
[STRLEN("/proc/self/fd/") + DECIMAL_STR_MAX(fd
) + 1];
1514 xsprintf(proc_fd_path
, "/proc/self/fd/%i", fd
);
1516 if (linkat(AT_FDCWD
, proc_fd_path
, AT_FDCWD
, target
, AT_SYMLINK_FOLLOW
) < 0)
1523 int read_nul_string(FILE *f
, char **ret
) {
1524 _cleanup_free_
char *x
= NULL
;
1525 size_t allocated
= 0, n
= 0;
1530 /* Reads a NUL-terminated string from the specified file. */
1535 if (!GREEDY_REALLOC(x
, allocated
, n
+2))
1539 if (c
== 0) /* Terminate at NUL byte */
1544 break; /* Terminate at EOF */
1563 int mkdtemp_malloc(const char *template, char **ret
) {
1564 _cleanup_free_
char *p
= NULL
;
1570 p
= strdup(template);
1578 p
= strjoin(tmp
, "/XXXXXX");
1590 DEFINE_TRIVIAL_CLEANUP_FUNC(FILE*, funlockfile
);
1592 int read_line(FILE *f
, size_t limit
, char **ret
) {
1593 _cleanup_free_
char *buffer
= NULL
;
1594 size_t n
= 0, allocated
= 0, count
= 0;
1598 /* Something like a bounded version of getline().
1600 * Considers EOF, \n and \0 end of line delimiters, and does not include these delimiters in the string
1603 * Returns the number of bytes read from the files (i.e. including delimiters — this hence usually differs from
1604 * the number of characters in the returned string). When EOF is hit, 0 is returned.
1606 * The input parameter limit is the maximum numbers of characters in the returned string, i.e. excluding
1607 * delimiters. If the limit is hit we fail and return -ENOBUFS.
1609 * If a line shall be skipped ret may be initialized as NULL. */
1612 if (!GREEDY_REALLOC(buffer
, allocated
, 1))
1617 _unused_
_cleanup_(funlockfilep
) FILE *flocked
= f
;
1627 c
= fgetc_unlocked(f
);
1629 /* if we read an error, and have no data to return, then propagate the error */
1630 if (ferror_unlocked(f
) && n
== 0)
1631 return errno
> 0 ? -errno
: -EIO
;
1638 if (IN_SET(c
, '\n', 0)) /* Reached a delimiter */
1642 if (!GREEDY_REALLOC(buffer
, allocated
, n
+ 2))
1645 buffer
[n
] = (char) c
;
1655 *ret
= TAKE_PTR(buffer
);