+ my $config = PVE::APIClient::Config->new();
+ my $known_remotes = $config->remotes;
+
+ if (exists($known_remotes->{$param->{name}})) {
+ die "Remote \"$param->{name}\" exists, remove it first\n";
+ }
+
+ my $last_fp = 0;
+ my $api = PVE::APIClient::LWP->new(
+ username => $param->{username},
+ password => $param->{password},
+ host => $param->{host},
+ port => $param->{port} // 8006,
+ manual_verification => 1,
+ register_fingerprint_cb => sub {
+ my $fp = shift @_;
+ $last_fp = $fp;
+ },
+ );
+ $api->login();
+
+ $config->add_remote($param->{name}, $param->{host}, $param->{port} // 8006,
+ $last_fp, $param->{username}, $param->{password});
+ $config->save;