]>
git.proxmox.com Git - pve-manager.git/blob - PVE/CLI/pveceph.pm
1 package PVE
::CLI
::pveceph
;
16 use PVE
::RPCEnvironment
;
18 use PVE
::Tools
qw(run_command);
19 use PVE
::JSONSchema
qw(get_standard_option);
25 use base
qw(PVE::CLIHandler);
27 my $nodename = PVE
::INotify
::nodename
();
31 my $status = PVE
::Tools
::upid_read_status
($upid);
32 exit($status eq 'OK' ?
0 : -1);
35 sub setup_environment
{
36 PVE
::RPCEnvironment-
>setup_default_cli_env();
39 __PACKAGE__-
>register_method ({
43 description
=> "Destroy ceph related data and configuration files.",
45 additionalProperties
=> 0,
49 returns
=> { type
=> 'null' },
56 my $rados = PVE
::RADOS-
>new();
57 my $monstat = $rados->mon_command({ prefix
=> 'mon_status' });
61 die "detected running ceph services- unable to purge data\n"
64 # fixme: this is dangerous - should we really support this function?
65 PVE
::CephTools
::purge_all_ceph_files
();
70 __PACKAGE__-
>register_method ({
74 description
=> "Install ceph related packages.",
76 additionalProperties
=> 0,
80 #enum => ['hammer', 'jewel'], # for jessie
81 enum
=> ['luminous',], # for stretch
86 returns
=> { type
=> 'null' },
90 my $cephver = $param->{version
} || 'luminous';
92 local $ENV{DEBIAN_FRONTEND
} = 'noninteractive';
94 if ($cephver eq 'luminous') {
95 PVE
::Tools
::file_set_contents
("/etc/apt/sources.list.d/ceph.list",
96 "deb http://download.proxmox.com/debian/ceph-luminous stretch main\n");
98 # use fixed devel repo for now, because there is no officila repo for jessie
101 my $keyurl = $devrepo ?
102 "https://git.ceph.com/?p=ceph.git;a=blob_plain;f=keys/autobuild.asc" :
103 "https://git.ceph.com/?p=ceph.git;a=blob_plain;f=keys/release.asc";
105 print "download and import ceph repository keys\n";
107 # Note: wget on Debian wheezy cannot handle new ceph.com certificates, so
108 # we use LWP::UserAgent
109 #system("wget -q -O- '$keyurl'| apt-key add - 2>&1 >/dev/null") == 0 ||
110 #die "unable to download ceph release key\n";
112 my $tmp_key_file = "/tmp/ceph-release-keys.asc";
113 my $ua = LWP
::UserAgent-
>new(protocols_allowed
=> ['http', 'https'], timeout
=> 120);
115 my $response = $ua->get($keyurl);
116 if ($response->is_success) {
117 my $data = $response->decoded_content;
118 PVE
::Tools
::file_set_contents
($tmp_key_file, $data);
120 die "unable to download ceph release key: " . $response->status_line . "\n";
123 system("apt-key add $tmp_key_file 2>&1 >/dev/null") == 0 ||
124 die "unable to download ceph release key\n";
126 unlink $tmp_key_file;
128 my $source = $devrepo ?
129 "deb http://gitbuilder.ceph.com/ceph-deb-jessie-x86_64-basic/ref/$devrepo jessie main\n" :
130 "deb http://download.ceph.com/debian-$cephver jessie main\n";
132 PVE
::Tools
::file_set_contents
("/etc/apt/sources.list.d/ceph.list", $source);
135 print "update available package list\n";
136 eval { run_command
(['apt-get', '-q', 'update'], outfunc
=> sub {}, errfunc
=> sub {}); };
138 system('apt-get', '--no-install-recommends',
139 '-o', 'Dpkg::Options::=--force-confnew',
141 'ceph', 'ceph-common', 'gdisk');
143 if (PVE
::CephTools
::systemd_managed
() && ! -e
'/etc/systemd/system/ceph.service') {
144 #to disable old SysV init scripts.
145 print "replacing ceph init script with own ceph.service\n";
147 PVE
::Tools
::run_command
('cp -v /usr/share/doc/pve-manager/examples/ceph.service /etc/systemd/system/ceph.service');
148 PVE
::Tools
::run_command
('systemctl daemon-reload');
149 PVE
::Tools
::run_command
('systemctl enable ceph.service');
151 warn "could not install ceph.service\n" if $@;
158 init
=> [ 'PVE::API2::Ceph', 'init', [], { node
=> $nodename } ],
159 lspools
=> [ 'PVE::API2::Ceph', 'lspools', [], { node
=> $nodename }, sub {
162 printf("%-20s %10s %10s %10s %10s %20s\n", "Name", "size", "min_size",
163 "pg_num", "%-used", "used");
164 foreach my $p (sort {$a->{pool_name
} cmp $b->{pool_name
}} @$res) {
165 printf("%-20s %10d %10d %10d %10.2f %20d\n", $p->{pool_name
},
166 $p->{size
}, $p->{min_size
}, $p->{pg_num
},
167 $p->{percent_used
}, $p->{bytes_used
});
170 createpool
=> [ 'PVE::API2::Ceph', 'createpool', ['name'], { node
=> $nodename }],
171 destroypool
=> [ 'PVE::API2::Ceph', 'destroypool', ['name'], { node
=> $nodename } ],
172 createosd
=> [ 'PVE::API2::CephOSD', 'createosd', ['dev'], { node
=> $nodename }, $upid_exit],
173 destroyosd
=> [ 'PVE::API2::CephOSD', 'destroyosd', ['osdid'], { node
=> $nodename }, $upid_exit],
174 createmon
=> [ 'PVE::API2::Ceph', 'createmon', [], { node
=> $nodename }, $upid_exit],
175 destroymon
=> [ 'PVE::API2::Ceph', 'destroymon', ['monid'], { node
=> $nodename }, $upid_exit],
176 createmgr
=> [ 'PVE::API2::Ceph', 'createmgr', [], { node
=> $nodename }, $upid_exit],
177 destroymgr
=> [ 'PVE::API2::Ceph', 'destroymgr', ['id'], { node
=> $nodename }, $upid_exit],
178 start
=> [ 'PVE::API2::Ceph', 'start', ['service'], { node
=> $nodename }, $upid_exit],
179 stop
=> [ 'PVE::API2::Ceph', 'stop', ['service'], { node
=> $nodename }, $upid_exit],
180 install
=> [ __PACKAGE__
, 'install', [] ],
181 purge
=> [ __PACKAGE__
, 'purge', [] ],
182 status
=> [ 'PVE::API2::Ceph', 'status', [], { node
=> $nodename }, sub {
184 my $json = JSON-
>new->allow_nonref;
185 print $json->pretty->encode($res) . "\n";