2 * zramctl - control compressed block devices in RAM
4 * Copyright (c) 2014 Timofey Titovets <Nefelim4ag@gmail.com>
5 * Copyright (C) 2014 Karel Zak <kzak@redhat.com>
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License as
9 * published by the Free Software Foundation.
11 * This program is distributed in the hope that it would be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License along
17 * with this program; if not, write to the Free Software Foundation, Inc.,
18 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
26 #include <sys/types.h>
29 #include <libsmartcols.h>
33 #include "closestream.h"
38 #include "ismounted.h"
41 #include "pathnames.h"
43 /*#define CONFIG_ZRAM_DEBUG*/
45 #ifdef CONFIG_ZRAM_DEBUG
46 # define DBG(x) do { fputs("zram: ", stderr); x; fputc('\n', stderr); } while(0)
51 /* status output columns */
74 static const struct colinfo infos
[] = {
75 [COL_NAME
] = { "NAME", 0.25, 0, N_("zram device name") },
76 [COL_DISKSIZE
] = { "DISKSIZE", 5, SCOLS_FL_RIGHT
, N_("limit on the uncompressed amount of data") },
77 [COL_ORIG_SIZE
] = { "DATA", 5, SCOLS_FL_RIGHT
, N_("uncompressed size of stored data") },
78 [COL_COMP_SIZE
] = { "COMPR", 5, SCOLS_FL_RIGHT
, N_("compressed size of stored data") },
79 [COL_ALGORITHM
] = { "ALGORITHM", 3, 0, N_("the selected compression algorithm") },
80 [COL_STREAMS
] = { "STREAMS", 3, SCOLS_FL_RIGHT
, N_("number of concurrent compress operations") },
81 [COL_ZEROPAGES
] = { "ZERO-PAGES", 3, SCOLS_FL_RIGHT
, N_("empty pages with no allocated memory") },
82 [COL_MEMTOTAL
] = { "TOTAL", 5, SCOLS_FL_RIGHT
, N_("all memory including allocator fragmentation and metadata overhead") },
83 [COL_MEMLIMIT
] = { "MEM-LIMIT", 5, SCOLS_FL_RIGHT
, N_("memory limit used to store compressed data") },
84 [COL_MEMUSED
] = { "MEM-USED", 5, SCOLS_FL_RIGHT
, N_("memory zram have been consumed to store compressed data") },
85 [COL_MIGRATED
] = { "MIGRATED", 5, SCOLS_FL_RIGHT
, N_("number of objects migrated by compaction") },
86 [COL_MOUNTPOINT
]= { "MOUNTPOINT",0.10, SCOLS_FL_TRUNC
, N_("where the device is mounted") },
89 static int columns
[ARRAY_SIZE(infos
) * 2] = {-1};
93 MM_ORIG_DATA_SIZE
= 0,
102 static const char *mm_stat_names
[] = {
103 [MM_ORIG_DATA_SIZE
] = "orig_data_size",
104 [MM_COMPR_DATA_SIZE
] = "compr_data_size",
105 [MM_MEM_USED_TOTAL
] = "mem_used_total",
106 [MM_MEM_LIMIT
] = "mem_limit",
107 [MM_MEM_USED_MAX
] = "mem_used_max",
108 [MM_ZERO_PAGES
] = "zero_pages",
109 [MM_NUM_MIGRATED
] = "num_migrated"
114 struct path_cxt
*sysfs
; /* device specific sysfs directory */
117 unsigned int mm_stat_probed
: 1,
119 has_control
: 1; /* has /sys/class/zram-control/ */
122 static unsigned int raw
, no_headings
, inbytes
;
123 static struct path_cxt
*__control
;
125 static int get_column_id(int num
)
127 assert(num
< ncolumns
);
128 assert(columns
[num
] < (int) ARRAY_SIZE(infos
));
132 static const struct colinfo
*get_column_info(int num
)
134 return &infos
[ get_column_id(num
) ];
137 static int column_name_to_id(const char *name
, size_t namesz
)
141 for (i
= 0; i
< ARRAY_SIZE(infos
); i
++) {
142 const char *cn
= infos
[i
].name
;
144 if (!strncasecmp(name
, cn
, namesz
) && !*(cn
+ namesz
))
147 warnx(_("unknown column: %s"), name
);
151 static void zram_reset_stat(struct zram
*z
)
154 strv_free(z
->mm_stat
);
156 z
->mm_stat_probed
= 0;
160 static void zram_set_devname(struct zram
*z
, const char *devname
, size_t n
)
165 snprintf(z
->devname
, sizeof(z
->devname
), "/dev/zram%zu", n
);
167 strncpy(z
->devname
, devname
, sizeof(z
->devname
));
168 z
->devname
[sizeof(z
->devname
) - 1] = '\0';
171 DBG(fprintf(stderr
, "set devname: %s", z
->devname
));
172 ul_unref_path(z
->sysfs
);
177 static int zram_get_devnum(struct zram
*z
)
183 if (sscanf(z
->devname
, "/dev/zram%d", &n
) == 1)
188 static struct zram
*new_zram(const char *devname
)
190 struct zram
*z
= xcalloc(1, sizeof(struct zram
));
192 DBG(fprintf(stderr
, "new: %p", z
));
194 zram_set_devname(z
, devname
, 0);
198 static void free_zram(struct zram
*z
)
202 DBG(fprintf(stderr
, "free: %p", z
));
203 ul_unref_path(z
->sysfs
);
208 static struct path_cxt
*zram_get_sysfs(struct zram
*z
)
213 dev_t devno
= sysfs_devname_to_devno(z
->devname
);
216 z
->sysfs
= ul_new_sysfs_path(devno
, NULL
, NULL
);
219 if (*z
->devname
!= '/')
220 /* canonicalize the device name according to /sys */
221 sysfs_blkdev_get_path(z
->sysfs
, z
->devname
, sizeof(z
->devname
));
227 static inline int zram_exist(struct zram
*z
)
232 if (zram_get_sysfs(z
) == NULL
) {
237 DBG(fprintf(stderr
, "%s exists", z
->devname
));
241 static int zram_set_u64parm(struct zram
*z
, const char *attr
, uint64_t num
)
243 struct path_cxt
*sysfs
= zram_get_sysfs(z
);
246 DBG(fprintf(stderr
, "%s writing %ju to %s", z
->devname
, num
, attr
));
247 return ul_path_write_u64(sysfs
, num
, attr
);
250 static int zram_set_strparm(struct zram
*z
, const char *attr
, const char *str
)
252 struct path_cxt
*sysfs
= zram_get_sysfs(z
);
255 DBG(fprintf(stderr
, "%s writing %s to %s", z
->devname
, str
, attr
));
256 return ul_path_write_string(sysfs
, str
, attr
);
260 static int zram_used(struct zram
*z
)
263 struct path_cxt
*sysfs
= zram_get_sysfs(z
);
266 ul_path_read_u64(sysfs
, &size
, "disksize") == 0 &&
269 DBG(fprintf(stderr
, "%s used", z
->devname
));
272 DBG(fprintf(stderr
, "%s unused", z
->devname
));
276 static int zram_has_control(struct zram
*z
)
278 if (!z
->control_probed
) {
279 z
->has_control
= access(_PATH_SYS_CLASS
"/zram-control/", F_OK
) == 0 ? 1 : 0;
280 z
->control_probed
= 1;
281 DBG(fprintf(stderr
, "zram-control: %s", z
->has_control
? "yes" : "no"));
284 return z
->has_control
;
287 static struct path_cxt
*zram_get_control(void)
290 __control
= ul_new_path(_PATH_SYS_CLASS
"/zram-control");
294 static int zram_control_add(struct zram
*z
)
297 struct path_cxt
*ctl
;
299 if (!zram_has_control(z
) || !(ctl
= zram_get_control()))
302 if (ul_path_read_s32(ctl
, &n
, "hot_add") != 0 || n
< 0)
305 DBG(fprintf(stderr
, "hot-add: %d", n
));
306 zram_set_devname(z
, NULL
, n
);
310 static int zram_control_remove(struct zram
*z
)
312 struct path_cxt
*ctl
;
315 if (!zram_has_control(z
) || !(ctl
= zram_get_control()))
318 n
= zram_get_devnum(z
);
322 DBG(fprintf(stderr
, "hot-remove: %d", n
));
323 return ul_path_write_u64(ctl
, n
, "hot_remove");
326 static struct zram
*find_free_zram(void)
328 struct zram
*z
= new_zram(NULL
);
332 for (i
= 0; isfree
== 0; i
++) {
333 DBG(fprintf(stderr
, "find free: checking zram%zu", i
));
334 zram_set_devname(z
, NULL
, i
);
335 if (!zram_exist(z
) && zram_control_add(z
) != 0)
337 isfree
= !zram_used(z
);
346 static char *get_mm_stat(struct zram
*z
, size_t idx
, int bytes
)
348 struct path_cxt
*sysfs
;
353 assert(idx
< ARRAY_SIZE(mm_stat_names
));
356 sysfs
= zram_get_sysfs(z
);
360 /* Linux >= 4.1 uses /sys/block/zram<id>/mm_stat */
361 if (!z
->mm_stat
&& !z
->mm_stat_probed
) {
362 if (ul_path_read_string(sysfs
, &str
, "mm_stat") > 0 && str
) {
363 z
->mm_stat
= strv_split(str
, " ");
365 /* make sure kernel provides mm_stat as expected */
366 if (strv_length(z
->mm_stat
) < ARRAY_SIZE(mm_stat_names
)) {
367 strv_free(z
->mm_stat
);
371 z
->mm_stat_probed
= 1;
378 return xstrdup(z
->mm_stat
[idx
]);
380 num
= strtou64_or_err(z
->mm_stat
[idx
], _("Failed to parse mm_stat"));
381 return size_to_human_string(SIZE_SUFFIX_1LETTER
, num
);
384 /* Linux < 4.1 uses /sys/block/zram<id>/<attrname> */
385 name
= mm_stat_names
[idx
];
387 ul_path_read_string(sysfs
, &str
, name
);
390 } else if (ul_path_read_u64(sysfs
, &num
, name
) == 0)
391 return size_to_human_string(SIZE_SUFFIX_1LETTER
, num
);
396 static void fill_table_row(struct libscols_table
*tb
, struct zram
*z
)
398 static struct libscols_line
*ln
;
399 struct path_cxt
*sysfs
;
406 DBG(fprintf(stderr
, "%s: filling status table", z
->devname
));
408 sysfs
= zram_get_sysfs(z
);
412 ln
= scols_table_new_line(tb
, NULL
);
414 err(EXIT_FAILURE
, _("failed to allocate output line"));
416 for (i
= 0; i
< (size_t) ncolumns
; i
++) {
419 switch (get_column_id(i
)) {
421 str
= xstrdup(z
->devname
);
425 ul_path_read_string(sysfs
, &str
, "disksize");
427 else if (ul_path_read_u64(sysfs
, &num
, "disksize") == 0)
428 str
= size_to_human_string(SIZE_SUFFIX_1LETTER
, num
);
434 ul_path_read_string(sysfs
, &alg
, "comp_algorithm");
436 char* lbr
= strrchr(alg
, '[');
437 char* rbr
= strrchr(alg
, ']');
439 if (lbr
!= NULL
&& rbr
!= NULL
&& rbr
- lbr
> 1)
440 str
= xstrndup(lbr
+ 1, rbr
- lbr
- 1);
447 char path
[PATH_MAX
] = { '\0' };
450 check_mount_point(z
->devname
, &fl
, path
, sizeof(path
));
456 ul_path_read_string(sysfs
, &str
, "max_comp_streams");
459 str
= get_mm_stat(z
, MM_ZERO_PAGES
, 1);
462 str
= get_mm_stat(z
, MM_ORIG_DATA_SIZE
, inbytes
);
465 str
= get_mm_stat(z
, MM_COMPR_DATA_SIZE
, inbytes
);
468 str
= get_mm_stat(z
, MM_MEM_USED_TOTAL
, inbytes
);
471 str
= get_mm_stat(z
, MM_MEM_LIMIT
, inbytes
);
474 str
= get_mm_stat(z
, MM_MEM_USED_MAX
, inbytes
);
477 str
= get_mm_stat(z
, MM_NUM_MIGRATED
, inbytes
);
480 if (str
&& scols_line_refer_data(ln
, i
, str
))
481 err(EXIT_FAILURE
, _("failed to add output data"));
485 static void status(struct zram
*z
)
487 struct libscols_table
*tb
;
494 tb
= scols_new_table();
496 err(EXIT_FAILURE
, _("failed to allocate output table"));
498 scols_table_enable_raw(tb
, raw
);
499 scols_table_enable_noheadings(tb
, no_headings
);
501 for (i
= 0; i
< (size_t) ncolumns
; i
++) {
502 const struct colinfo
*col
= get_column_info(i
);
504 if (!scols_table_new_column(tb
, col
->name
, col
->whint
, col
->flags
))
505 err(EXIT_FAILURE
, _("failed to initialize output column"));
509 /* just one device specified */
510 fill_table_row(tb
, z
);
514 /* list all used devices */
516 if (!(dir
= opendir(_PATH_DEV
)))
517 err(EXIT_FAILURE
, _("cannot open %s"), _PATH_DEV
);
519 while ((d
= readdir(dir
))) {
521 if (sscanf(d
->d_name
, "zram%d", &n
) != 1)
523 zram_set_devname(z
, NULL
, n
);
524 if (zram_exist(z
) && zram_used(z
))
525 fill_table_row(tb
, z
);
531 scols_print_table(tb
);
532 scols_unref_table(tb
);
535 static void __attribute__((__noreturn__
)) usage(void)
540 fputs(USAGE_HEADER
, out
);
541 fprintf(out
, _( " %1$s [options] <device>\n"
542 " %1$s -r <device> [...]\n"
543 " %1$s [options] -f | <device> -s <size>\n"),
544 program_invocation_short_name
);
546 fputs(USAGE_SEPARATOR
, out
);
547 fputs(_("Set up and control zram devices.\n"), out
);
549 fputs(USAGE_OPTIONS
, out
);
550 fputs(_(" -a, --algorithm lzo|lz4|lz4hc|deflate|842 compression algorithm to use\n"), out
);
551 fputs(_(" -b, --bytes print sizes in bytes rather than in human readable format\n"), out
);
552 fputs(_(" -f, --find find a free device\n"), out
);
553 fputs(_(" -n, --noheadings don't print headings\n"), out
);
554 fputs(_(" -o, --output <list> columns to use for status output\n"), out
);
555 fputs(_(" --output-all output all columns\n"), out
);
556 fputs(_(" --raw use raw status output format\n"), out
);
557 fputs(_(" -r, --reset reset all specified devices\n"), out
);
558 fputs(_(" -s, --size <size> device size\n"), out
);
559 fputs(_(" -t, --streams <number> number of compression streams\n"), out
);
561 fputs(USAGE_SEPARATOR
, out
);
562 printf(USAGE_HELP_OPTIONS(27));
564 fputs(USAGE_COLUMNS
, out
);
565 for (i
= 0; i
< ARRAY_SIZE(infos
); i
++)
566 fprintf(out
, " %11s %s\n", infos
[i
].name
, _(infos
[i
].help
));
568 printf(USAGE_MAN_TAIL("zramctl(8)"));
581 int main(int argc
, char **argv
)
583 uintmax_t size
= 0, nstreams
= 0;
584 char *algorithm
= NULL
;
585 int rc
= 0, c
, find
= 0, act
= A_NONE
;
586 struct zram
*zram
= NULL
;
589 OPT_RAW
= CHAR_MAX
+ 1,
593 static const struct option longopts
[] = {
594 { "algorithm", required_argument
, NULL
, 'a' },
595 { "bytes", no_argument
, NULL
, 'b' },
596 { "find", no_argument
, NULL
, 'f' },
597 { "help", no_argument
, NULL
, 'h' },
598 { "output", required_argument
, NULL
, 'o' },
599 { "output-all",no_argument
, NULL
, OPT_LIST_TYPES
},
600 { "noheadings",no_argument
, NULL
, 'n' },
601 { "reset", no_argument
, NULL
, 'r' },
602 { "raw", no_argument
, NULL
, OPT_RAW
},
603 { "size", required_argument
, NULL
, 's' },
604 { "streams", required_argument
, NULL
, 't' },
605 { "version", no_argument
, NULL
, 'V' },
609 static const ul_excl_t excl
[] = {
614 int excl_st
[ARRAY_SIZE(excl
)] = UL_EXCL_STATUS_INIT
;
616 setlocale(LC_ALL
, "");
617 bindtextdomain(PACKAGE
, LOCALEDIR
);
619 atexit(close_stdout
);
621 while ((c
= getopt_long(argc
, argv
, "a:bfho:nrs:t:V", longopts
, NULL
)) != -1) {
623 err_exclusive_options(c
, longopts
, excl
, excl_st
);
636 ncolumns
= string_to_idarray(optarg
,
637 columns
, ARRAY_SIZE(columns
),
643 for (ncolumns
= 0; (size_t)ncolumns
< ARRAY_SIZE(infos
); ncolumns
++)
644 columns
[ncolumns
] = ncolumns
;
647 size
= strtosize_or_err(optarg
, _("failed to parse size"));
651 nstreams
= strtou64_or_err(optarg
, _("failed to parse streams"));
663 printf(UTIL_LINUX_VERSION
);
668 errtryhelp(EXIT_FAILURE
);
672 if (find
&& optind
< argc
)
673 errx(EXIT_FAILURE
, _("option --find is mutually exclusive "
676 act
= find
? A_FINDONLY
: A_STATUS
;
678 if (act
!= A_RESET
&& optind
+ 1 < argc
)
679 errx(EXIT_FAILURE
, _("only one <device> at a time is allowed"));
681 if ((act
== A_STATUS
|| act
== A_FINDONLY
) && (algorithm
|| nstreams
))
682 errx(EXIT_FAILURE
, _("options --algorithm and --streams "
683 "must be combined with --size"));
685 ul_path_init_debug();
686 ul_sysfs_init_debug();
690 if (!ncolumns
) { /* default columns */
691 columns
[ncolumns
++] = COL_NAME
;
692 columns
[ncolumns
++] = COL_ALGORITHM
;
693 columns
[ncolumns
++] = COL_DISKSIZE
;
694 columns
[ncolumns
++] = COL_ORIG_SIZE
;
695 columns
[ncolumns
++] = COL_COMP_SIZE
;
696 columns
[ncolumns
++] = COL_MEMTOTAL
;
697 columns
[ncolumns
++] = COL_STREAMS
;
698 columns
[ncolumns
++] = COL_MOUNTPOINT
;
701 zram
= new_zram(argv
[optind
++]);
702 if (!zram_exist(zram
))
703 err(EXIT_FAILURE
, "%s", zram
->devname
);
710 errx(EXIT_FAILURE
, _("no device specified"));
711 while (optind
< argc
) {
712 zram
= new_zram(argv
[optind
]);
713 if (!zram_exist(zram
)
714 || zram_set_u64parm(zram
, "reset", 1)) {
715 warn(_("%s: failed to reset"), zram
->devname
);
718 zram_control_remove(zram
);
724 zram
= find_free_zram();
726 errx(EXIT_FAILURE
, _("no free zram device found"));
727 printf("%s\n", zram
->devname
);
732 zram
= find_free_zram();
734 errx(EXIT_FAILURE
, _("no free zram device found"));
735 } else if (optind
== argc
)
736 errx(EXIT_FAILURE
, _("no device specified"));
738 zram
= new_zram(argv
[optind
]);
739 if (!zram_exist(zram
))
740 err(EXIT_FAILURE
, "%s", zram
->devname
);
743 if (zram_set_u64parm(zram
, "reset", 1))
744 err(EXIT_FAILURE
, _("%s: failed to reset"), zram
->devname
);
747 zram_set_u64parm(zram
, "max_comp_streams", nstreams
))
748 err(EXIT_FAILURE
, _("%s: failed to set number of streams"), zram
->devname
);
751 zram_set_strparm(zram
, "comp_algorithm", algorithm
))
752 err(EXIT_FAILURE
, _("%s: failed to set algorithm"), zram
->devname
);
754 if (zram_set_u64parm(zram
, "disksize", size
))
755 err(EXIT_FAILURE
, _("%s: failed to set disksize (%ju bytes)"),
756 zram
->devname
, size
);
758 printf("%s\n", zram
->devname
);
763 ul_unref_path(__control
);
764 return rc
? EXIT_FAILURE
: EXIT_SUCCESS
;