From f42a480cbe487fc5fb9b3772990e80926201f6e4 Mon Sep 17 00:00:00 2001 From: Alejandro Sior Date: Tue, 21 Jun 2022 15:38:48 +0200 Subject: gptman: reorganize commands in a cmd module --- cmd/mkbackup/mkbackup.ha | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 cmd/mkbackup/mkbackup.ha (limited to 'cmd/mkbackup') diff --git a/cmd/mkbackup/mkbackup.ha b/cmd/mkbackup/mkbackup.ha new file mode 100644 index 0000000..12093b5 --- /dev/null +++ b/cmd/mkbackup/mkbackup.ha @@ -0,0 +1,23 @@ +use fmt; +use io; + +use cmd; +use gpt; + +export fn mkbackup(vol: str, args: []str) void = { + const vol = cmd::openvol(vol); + const vol = match(gpt::from(vol)) { + case let g: *gpt::gpt => + yield g; + case gpt::nogpt => + fmt::fatalf("{}: disk does not have valid gpt", args[0]); + case => + fmt::fatalf("{}: could not access volume", args[0]); + }; + defer { + gpt::commit(vol)!; + gpt::finish(vol); + }; + + gpt::mkbackup(vol); +}; -- cgit v1.2.3