]>
Commit | Line | Data |
---|---|---|
1 | #!/usr/bin/perl | |
2 | ||
3 | use lib '.'; | |
4 | use strict; | |
5 | use warnings; | |
6 | use PVE::RESTHandler; | |
7 | use PVE::LXC::Config; | |
8 | use PVE::JSONSchema; | |
9 | ||
10 | my $prop = PVE::LXC::Config->json_config_properties(); | |
11 | ||
12 | my $rootfs_prop = $prop->{rootfs}; | |
13 | ||
14 | my $mp_prop = $prop->{mp0}; | |
15 | ||
16 | my $typetext = PVE::JSONSchema::schema_get_type_text($rootfs_prop); | |
17 | ||
18 | print "`rootfs`: `$typetext`\n\n"; | |
19 | ||
20 | $typetext = PVE::JSONSchema::schema_get_type_text($mp_prop); | |
21 | ||
22 | print "`mp[n]`: `$typetext`\n\n"; | |
23 | ||
24 | print PVE::RESTHandler::dump_properties($mp_prop->{format}); |