]>
Commit | Line | Data |
---|---|---|
deaf7667 AD |
1 | #!/usr/bin/perl |
2 | ||
3 | use strict; | |
4 | use warnings; | |
5 | use POSIX; | |
6 | use File::Path; | |
7 | ||
8 | use PVE::SafeSyslog; | |
9 | use PVE::Tools; | |
10 | use PVE::Cluster; | |
11 | use PVE::INotify; | |
12 | use PVE::RPCEnvironment; | |
13 | use PVE::JSONSchema qw(get_standard_option); | |
14 | use PVE::CLIHandler; | |
15 | use PVE::Storage; | |
16 | use PVE::LXC; | |
17 | use PVE::LXCSetup; | |
18 | use Data::Dumper; | |
19 | ||
20 | use base qw(PVE::CLIHandler); | |
21 | ||
22 | $ENV{'PATH'} = '/sbin:/bin:/usr/sbin:/usr/bin'; | |
23 | ||
24 | initlog ('lxc-pve-prestart-hook'); | |
25 | ||
26 | die "please run as root\n" if $> != 0; | |
27 | ||
28 | PVE::INotify::inotify_init(); | |
29 | ||
30 | my $rpcenv = PVE::RPCEnvironment->init('cli'); | |
31 | $rpcenv->set_language($ENV{LANG}); | |
32 | $rpcenv->set_user('root@pam'); | |
33 | ||
34 | # we cannot use cfs_read here (permission problem) | |
35 | #$rpcenv->init_request(); | |
36 | ||
37 | my $nodename = PVE::INotify::nodename(); | |
38 | ||
39 | __PACKAGE__->register_method ({ | |
40 | name => 'lxc-pve-prestart-hook', | |
41 | path => 'lxc-pve-prestart-hook', | |
42 | method => 'GET', | |
43 | description => "Create a new container root directory.", | |
44 | parameters => { | |
45 | additionalProperties => 0, | |
46 | properties => { | |
47 | name => { | |
48 | description => "The container name. This hook is only active for containers using numeric IDs, where configuration is stored on /etc/pve/lxc/<name>/config (else it is just a NOP).", | |
49 | type => 'string', | |
50 | pattern => '\S+', | |
51 | maxLength => 64, | |
52 | }, | |
53 | path => { | |
54 | description => "The path to the container configuration directory (LXC internal argument - do not pass manually!).", | |
55 | type => 'string', | |
56 | }, | |
57 | rootfs => { | |
58 | description => "The path to the container's rootfs (LXC internal argument - do not pass manually!)", | |
59 | type => 'string', | |
60 | }, | |
61 | }, | |
62 | }, | |
63 | returns => { type => 'null' }, | |
64 | ||
65 | code => sub { | |
66 | my ($param) = @_; | |
67 | ||
68 | return undef if $param->{name} !~ m/^\d+$/; | |
69 | ||
70 | my $rootdir = $ENV{LXC_ROOTFS_MOUNT}; | |
71 | ||
72 | # Note: PVE::INotify::nodename() returns wrong value when run | |
73 | # inside container mount hook, so we cannot simply | |
74 | # use PVE::LXC::load_conf(). | |
75 | ||
76 | my $config_filename = "/etc/pve/lxc/$param->{name}.conf"; | |
77 | ||
78 | return undef if ! -f $config_filename; | |
79 | ||
80 | my $raw = PVE::Tools::file_get_contents($config_filename); | |
81 | my $conf = PVE::LXC::parse_pct_config($config_filename, $raw); | |
82 | ||
83 | my $fn = "/etc/pve/storage.cfg"; | |
84 | ||
85 | return if ! -f $fn; | |
86 | ||
87 | my $raw_storagecfg = PVE::Tools::file_get_contents($fn); | |
88 | my $storage_cfg = PVE::Storage::Plugin->parse_config($fn, $raw_storagecfg); | |
89 | ||
90 | PVE::LXC::foreach_mountpoint($conf, sub { | |
91 | my ($ms, $mountpoint) = @_; | |
92 | ||
93 | my $volid = $mountpoint->{volume}; | |
94 | PVE::Storage::activate_volumes($storage_cfg, [$volid]); | |
95 | ||
96 | my ($storage, $volname) = PVE::Storage::parse_volume_id($volid); | |
97 | my $scfg = PVE::Storage::storage_config($storage_cfg, $storage); | |
98 | my ($vtype, undef, undef, undef, undef, $isBase, $format) = | |
99 | PVE::Storage::parse_volname($storage_cfg, $volid); | |
100 | ||
101 | if($ms ne 'rootfs' && $format ne 'subvol' && ($scfg->{type} eq 'dir' || $scfg->{type} eq 'nfs')) { | |
102 | my $path = PVE::Storage::path($storage_cfg, $volid); | |
103 | PVE::Tools::run_command(['losetup', '--find', '--show', $path]); | |
104 | } | |
105 | }); | |
106 | ||
107 | return undef; | |
108 | }}); | |
109 | ||
110 | ||
111 | push @ARGV, 'help' if !scalar(@ARGV); | |
112 | ||
113 | my $param = {}; | |
114 | ||
115 | if ((scalar(@ARGV) == 1) && ($ARGV[0] eq 'printmanpod') || | |
116 | ($ARGV[0] eq 'verifyapi')) { | |
117 | # OK | |
118 | } elsif ((scalar(@ARGV) == 3) && ($ARGV[1] eq 'lxc') && ($ARGV[2] eq 'pre-start')) { | |
119 | $param->{name} = $ENV{'LXC_NAME'}; | |
120 | die "got wrong name" if $param->{name} ne $ARGV[0]; | |
121 | ||
122 | $param->{path} = $ENV{'LXC_CONFIG_FILE'}; | |
123 | $param->{rootfs} = $ENV{'LXC_ROOTFS_PATH'}; | |
124 | @ARGV = (); | |
125 | } else { | |
126 | @ARGV = ('help'); | |
127 | } | |
128 | ||
129 | my $cmddef = [ __PACKAGE__, 'lxc-pve-prestart-hook', [], $param]; | |
130 | ||
131 | PVE::CLIHandler::handle_simple_cmd($cmddef, \@ARGV, undef, $0); | |
132 | ||
133 | exit 0; | |
134 | ||
135 | __END__ | |
136 | ||
137 | =head1 NAME | |
138 | ||
139 | lxc-pve - LXC pre-start hook for Proxmox VE | |
140 | ||
141 | =head1 SYNOPSIS | |
142 | ||
143 | =include synopsis | |
144 | ||
145 | =head1 DESCRIPTION | |
146 | ||
147 | This mount hook activate storage and volumes for pve container. | |
148 | ||
149 | =head1 SEE ALSO | |
150 | ||
151 | lct(1) | |
152 | ||
153 | =include pve_copyright |