main.ha


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30

use fmt;
use getopt;
use os;
use fs;
use io;

use mbr;
use gpt;

use cmd::convert;
use cmd::create;
use cmd::info;
use cmd::mkbackup;
use cmd::part;


export fn main() void = {
	if (len(os::args) < 3) {
		fmt::fatalf("gpt: expected disk name", os::args[0]);
	};

	switch (os::args[2]) {
	case "convert" => convert::convert(os::args[2..]);
	case "create" => create::create(os::args[2..]);
	case "info" => info::info(os::args[2..]);
	case "mkbackup" => mkbackup::mkbackup(os::args[2..]);
	case "part" => part::part(os::args[2..]);
	case => fmt::fatalf("{}: no such command {}", os::args[0], os::args[2]);
	};
};