1 /* SPDX-License-Identifier: LGPL-2.1+ */
3 Copyright © 2018 Dell Inc.
13 #include <sys/ioctl.h>
15 #include <sys/types.h>
19 #include "alloc-util.h"
20 #include "conf-parser.h"
23 #include "errno-util.h"
28 #include "parse-util.h"
29 #include "path-util.h"
30 #include "sleep-config.h"
31 #include "string-util.h"
34 int parse_sleep_config(const char *verb
, bool *ret_allow
, char ***ret_modes
, char ***ret_states
, usec_t
*ret_delay
) {
35 int allow_suspend
= -1, allow_hibernate
= -1,
36 allow_s2h
= -1, allow_hybrid_sleep
= -1;
38 _cleanup_strv_free_
char
39 **suspend_mode
= NULL
, **suspend_state
= NULL
,
40 **hibernate_mode
= NULL
, **hibernate_state
= NULL
,
41 **hybrid_mode
= NULL
, **hybrid_state
= NULL
;
42 _cleanup_strv_free_
char **modes
, **states
; /* always initialized below */
43 usec_t delay
= 180 * USEC_PER_MINUTE
;
45 const ConfigTableItem items
[] = {
46 { "Sleep", "AllowSuspend", config_parse_tristate
, 0, &allow_suspend
},
47 { "Sleep", "AllowHibernation", config_parse_tristate
, 0, &allow_hibernate
},
48 { "Sleep", "AllowSuspendThenHibernate", config_parse_tristate
, 0, &allow_s2h
},
49 { "Sleep", "AllowHybridSleep", config_parse_tristate
, 0, &allow_hybrid_sleep
},
51 { "Sleep", "SuspendMode", config_parse_strv
, 0, &suspend_mode
},
52 { "Sleep", "SuspendState", config_parse_strv
, 0, &suspend_state
},
53 { "Sleep", "HibernateMode", config_parse_strv
, 0, &hibernate_mode
},
54 { "Sleep", "HibernateState", config_parse_strv
, 0, &hibernate_state
},
55 { "Sleep", "HybridSleepMode", config_parse_strv
, 0, &hybrid_mode
},
56 { "Sleep", "HybridSleepState", config_parse_strv
, 0, &hybrid_state
},
58 { "Sleep", "HibernateDelaySec", config_parse_sec
, 0, &delay
},
62 (void) config_parse_many_nulstr(PKGSYSCONFDIR
"/sleep.conf",
63 CONF_PATHS_NULSTR("systemd/sleep.conf.d"),
64 "Sleep\0", config_item_table_lookup
, items
,
65 CONFIG_PARSE_WARN
, NULL
);
67 if (streq(verb
, "suspend")) {
68 allow
= allow_suspend
!= 0;
70 /* empty by default */
71 modes
= TAKE_PTR(suspend_mode
);
74 states
= TAKE_PTR(suspend_state
);
76 states
= strv_new("mem", "standby", "freeze");
78 } else if (streq(verb
, "hibernate")) {
79 allow
= allow_hibernate
!= 0;
82 modes
= TAKE_PTR(hibernate_mode
);
84 modes
= strv_new("platform", "shutdown");
87 states
= TAKE_PTR(hibernate_state
);
89 states
= strv_new("disk");
91 } else if (streq(verb
, "hybrid-sleep")) {
92 allow
= allow_hybrid_sleep
> 0 ||
93 (allow_suspend
!= 0 && allow_hibernate
!= 0);
96 modes
= TAKE_PTR(hybrid_mode
);
98 modes
= strv_new("suspend", "platform", "shutdown");
101 states
= TAKE_PTR(hybrid_state
);
103 states
= strv_new("disk");
105 } else if (streq(verb
, "suspend-then-hibernate")) {
106 allow
= allow_s2h
> 0 ||
107 (allow_suspend
!= 0 && allow_hibernate
!= 0);
109 modes
= states
= NULL
;
111 assert_not_reached("what verb");
113 if ((!modes
&& STR_IN_SET(verb
, "hibernate", "hybrid-sleep")) ||
114 (!states
&& !streq(verb
, "suspend-then-hibernate")))
120 *ret_modes
= TAKE_PTR(modes
);
122 *ret_states
= TAKE_PTR(states
);
129 int can_sleep_state(char **types
) {
132 _cleanup_free_
char *p
= NULL
;
134 if (strv_isempty(types
))
137 /* If /sys is read-only we cannot sleep */
138 if (access("/sys/power/state", W_OK
) < 0)
141 r
= read_one_line_file("/sys/power/state", &p
);
145 STRV_FOREACH(type
, types
) {
146 const char *word
, *state
;
150 FOREACH_WORD_SEPARATOR(word
, l
, p
, WHITESPACE
, state
)
151 if (l
== k
&& memcmp(word
, *type
, l
) == 0)
158 int can_sleep_disk(char **types
) {
161 _cleanup_free_
char *p
= NULL
;
163 if (strv_isempty(types
))
166 /* If /sys is read-only we cannot sleep */
167 if (access("/sys/power/disk", W_OK
) < 0) {
168 log_debug_errno(errno
, "/sys/power/disk is not writable: %m");
172 r
= read_one_line_file("/sys/power/disk", &p
);
174 log_debug_errno(r
, "Couldn't read /sys/power/disk: %m");
178 STRV_FOREACH(type
, types
) {
179 const char *word
, *state
;
183 FOREACH_WORD_SEPARATOR(word
, l
, p
, WHITESPACE
, state
) {
184 if (l
== k
&& memcmp(word
, *type
, l
) == 0)
189 memcmp(word
+ 1, *type
, l
- 2) == 0 &&
198 #define HIBERNATION_SWAP_THRESHOLD 0.98
200 int find_hibernate_location(char **device
, char **type
, size_t *size
, size_t *used
) {
201 _cleanup_fclose_
FILE *f
;
204 f
= fopen("/proc/swaps", "re");
206 log_full(errno
== ENOENT
? LOG_DEBUG
: LOG_WARNING
,
207 "Failed to retrieve open /proc/swaps: %m");
208 return negative_errno();
211 (void) fscanf(f
, "%*s %*s %*s %*s %*s\n");
214 _cleanup_free_
char *dev_field
= NULL
, *type_field
= NULL
;
215 size_t size_field
, used_field
;
219 "%ms " /* device/file */
220 "%ms " /* type of swap */
221 "%zu " /* swap size */
223 "%*i\n", /* priority */
224 &dev_field
, &type_field
, &size_field
, &used_field
);
228 log_warning("Failed to parse /proc/swaps:%u", i
);
232 if (streq(type_field
, "file")) {
234 if (endswith(dev_field
, "\\040(deleted)")) {
235 log_warning("Ignoring deleted swap file '%s'.", dev_field
);
239 } else if (streq(type_field
, "partition")) {
242 fn
= path_startswith(dev_field
, "/dev/");
243 if (fn
&& startswith(fn
, "zram")) {
244 log_debug("Ignoring compressed RAM swap device '%s'.", dev_field
);
250 *device
= TAKE_PTR(dev_field
);
252 *type
= TAKE_PTR(type_field
);
260 return log_debug_errno(SYNTHETIC_ERRNO(ENOSYS
),
261 "No swap partitions were found.");
264 static bool enough_swap_for_hibernation(void) {
265 _cleanup_free_
char *active
= NULL
;
266 unsigned long long act
= 0;
267 size_t size
= 0, used
= 0;
270 if (getenv_bool("SYSTEMD_BYPASS_HIBERNATION_MEMORY_CHECK") > 0)
273 r
= find_hibernate_location(NULL
, NULL
, &size
, &used
);
277 r
= get_proc_field("/proc/meminfo", "Active(anon)", WHITESPACE
, &active
);
279 log_debug_errno(r
, "Failed to retrieve Active(anon) from /proc/meminfo: %m");
283 r
= safe_atollu(active
, &act
);
285 log_debug_errno(r
, "Failed to parse Active(anon) from /proc/meminfo: %s: %m", active
);
289 r
= act
<= (size
- used
) * HIBERNATION_SWAP_THRESHOLD
;
290 log_debug("%s swap for hibernation, Active(anon)=%llu kB, size=%zu kB, used=%zu kB, threshold=%.2g%%",
291 r
? "Enough" : "Not enough", act
, size
, used
, 100*HIBERNATION_SWAP_THRESHOLD
);
296 int read_fiemap(int fd
, struct fiemap
**ret
) {
297 _cleanup_free_
struct fiemap
*fiemap
= NULL
, *result_fiemap
= NULL
;
298 struct stat statinfo
;
299 uint32_t result_extents
= 0;
300 uint64_t fiemap_start
= 0, fiemap_length
;
301 const size_t n_extra
= DIV_ROUND_UP(sizeof(struct fiemap
), sizeof(struct fiemap_extent
));
302 size_t fiemap_allocated
= n_extra
, result_fiemap_allocated
= n_extra
;
304 if (fstat(fd
, &statinfo
) < 0)
305 return log_debug_errno(errno
, "Cannot determine file size: %m");
306 if (!S_ISREG(statinfo
.st_mode
))
308 fiemap_length
= statinfo
.st_size
;
310 /* Zero this out in case we run on a file with no extents */
311 fiemap
= calloc(n_extra
, sizeof(struct fiemap_extent
));
315 result_fiemap
= malloc_multiply(n_extra
, sizeof(struct fiemap_extent
));
319 /* XFS filesystem has incorrect implementation of fiemap ioctl and
320 * returns extents for only one block-group at a time, so we need
321 * to handle it manually, starting the next fiemap call from the end
324 while (fiemap_start
< fiemap_length
) {
325 *fiemap
= (struct fiemap
) {
326 .fm_start
= fiemap_start
,
327 .fm_length
= fiemap_length
,
328 .fm_flags
= FIEMAP_FLAG_SYNC
,
331 /* Find out how many extents there are */
332 if (ioctl(fd
, FS_IOC_FIEMAP
, fiemap
) < 0)
333 return log_debug_errno(errno
, "Failed to read extents: %m");
335 /* Nothing to process */
336 if (fiemap
->fm_mapped_extents
== 0)
339 /* Resize fiemap to allow us to read in the extents, result fiemap has to hold all
340 * the extents for the whole file. Add space for the initial struct fiemap. */
341 if (!greedy_realloc0((void**) &fiemap
, &fiemap_allocated
,
342 n_extra
+ fiemap
->fm_mapped_extents
, sizeof(struct fiemap_extent
)))
345 fiemap
->fm_extent_count
= fiemap
->fm_mapped_extents
;
346 fiemap
->fm_mapped_extents
= 0;
348 if (ioctl(fd
, FS_IOC_FIEMAP
, fiemap
) < 0)
349 return log_debug_errno(errno
, "Failed to read extents: %m");
351 /* Resize result_fiemap to allow us to copy in the extents */
352 if (!greedy_realloc((void**) &result_fiemap
, &result_fiemap_allocated
,
353 n_extra
+ result_extents
+ fiemap
->fm_mapped_extents
, sizeof(struct fiemap_extent
)))
356 memcpy(result_fiemap
->fm_extents
+ result_extents
,
358 sizeof(struct fiemap_extent
) * fiemap
->fm_mapped_extents
);
360 result_extents
+= fiemap
->fm_mapped_extents
;
362 /* Highly unlikely that it is zero */
363 if (_likely_(fiemap
->fm_mapped_extents
> 0)) {
364 uint32_t i
= fiemap
->fm_mapped_extents
- 1;
366 fiemap_start
= fiemap
->fm_extents
[i
].fe_logical
+
367 fiemap
->fm_extents
[i
].fe_length
;
369 if (fiemap
->fm_extents
[i
].fe_flags
& FIEMAP_EXTENT_LAST
)
374 memcpy(result_fiemap
, fiemap
, sizeof(struct fiemap
));
375 result_fiemap
->fm_mapped_extents
= result_extents
;
376 *ret
= TAKE_PTR(result_fiemap
);
380 static int can_sleep_internal(const char *verb
, bool check_allowed
);
382 static bool can_s2h(void) {
386 r
= access("/sys/class/rtc/rtc0/wakealarm", W_OK
);
388 log_full(errno
== ENOENT
? LOG_DEBUG
: LOG_WARNING
,
389 "/sys/class/rct/rct0/wakealarm is not writable %m");
393 FOREACH_STRING(p
, "suspend", "hibernate") {
394 r
= can_sleep_internal(p
, false);
395 if (IN_SET(r
, 0, -ENOSPC
, -EADV
)) {
396 log_debug("Unable to %s system.", p
);
400 return log_debug_errno(r
, "Failed to check if %s is possible: %m", p
);
406 static int can_sleep_internal(const char *verb
, bool check_allowed
) {
408 _cleanup_strv_free_
char **modes
= NULL
, **states
= NULL
;
411 assert(STR_IN_SET(verb
, "suspend", "hibernate", "hybrid-sleep", "suspend-then-hibernate"));
413 r
= parse_sleep_config(verb
, &allow
, &modes
, &states
, NULL
);
417 if (check_allowed
&& !allow
) {
418 log_debug("Sleep mode \"%s\" is disabled by configuration.", verb
);
422 if (streq(verb
, "suspend-then-hibernate"))
425 if (!can_sleep_state(states
) || !can_sleep_disk(modes
))
428 if (streq(verb
, "suspend"))
431 if (!enough_swap_for_hibernation())
437 int can_sleep(const char *verb
) {
438 return can_sleep_internal(verb
, true);