UPDATE 31.10.: Amazon Alexa - ioBroker Skill läuft aus ?

[David G.]

Hallo,

ich habe eben eine Debian VM runtergefahren um den Arbeitsspeicher anzupassen.
Irgendwie will. Sie jetzt nicht mehr starten.

In der Weboberfläche passiert garnichts. In der Console kommt auch nichts.

Wenn ich es im Terminal versuche kommt:

root@pve:~# qm start 101
Requesting HA start for VM 101
Use of uninitialized value in string eq at /usr/share/perl5/PVE/API2/HA/Resources.pm line 40.
root@pve:~#

Was kann das sein?

Hier der Inhalt der Datei:

package PVE::API2::HA::Resources;

use strict;
use warnings;

use PVE::SafeSyslog;
use PVE::Tools qw(extract_param);
use PVE::Cluster;
use PVE::HA::Config;
use PVE::HA::Resources;
use HTTP::Status qw(:constants);
use Storable qw(dclone);
use PVE::JSONSchema qw(get_standard_option);
use PVE::RPCEnvironment;

use PVE::RESTHandler;

use base qw(PVE::RESTHandler);

# fixme: use cfs_read_file

my $resource_type_enum = PVE::HA::Resources->lookup_types();

my $api_copy_config = sub {
    my ($cfg, $sid) = @_;

    die "no such resource '$sid'\n" if !$cfg->{ids}->{$sid};

    my $scfg = dclone($cfg->{ids}->{$sid});
    $scfg->{sid} = $sid;
    $scfg->{digest} = $cfg->{digest};

    return $scfg;
};

sub check_service_state {
    my ($sid, $req_state) = @_;

    my $service_status = PVE::HA::Config::get_service_status($sid);
    if ($service_status->{managed} && $service_status->{state} eq 'error') {
    # service in error state, must get disabled before new state request
    # can be executed
    return if defined($req_state) && $req_state eq 'disabled';
    die "service '$sid' in error state, must be disabled and fixed first\n";
    }
}

__PACKAGE__->register_method ({
    name => 'index',
    path => '',
    method => 'GET',
    description => "List HA resources.",
    permissions => {
    check => ['perm', '/', [ 'Sys.Audit' ]],
    },
    parameters => {
    additionalProperties => 0,
    properties => {
        type => {
        description => "Only list resources of specific type",
        type => 'string',
        enum => $resource_type_enum,
        optional => 1,
        },
    },
    },
    returns => {
    type => 'array',
    items => {
        type => "object",
        properties => { sid => { type => 'string'} },
    },
    links => [ { rel => 'child', href => "{sid}" } ],
    },
    code => sub {
    my ($param) = @_;

    my $cfg = PVE::HA::Config::read_resources_config();
    my $groups = PVE::HA::Config::read_group_config();

    my $res = [];
    foreach my $sid (keys %{$cfg->{ids}}) {
        my $scfg = &$api_copy_config($cfg, $sid);
        next if $param->{type} && $param->{type} ne $scfg->{type};
        if ($scfg->{group} && !$groups->{ids}->{$scfg->{group}}) {
        $scfg->{errors}->{group} = "group '$scfg->{group}' does not exist";
        }
        push @$res, $scfg;
    }

    return $res;
    }});

__PACKAGE__->register_method ({
    name => 'read',
    path => '{sid}',
    method => 'GET',
    permissions => {
    check => ['perm', '/', [ 'Sys.Audit' ]],
    },
    description => "Read resource configuration.",
    parameters => {
    additionalProperties => 0,
    properties => {
        sid => get_standard_option('pve-ha-resource-or-vm-id',
                      { completion => \&PVE::HA::Tools::complete_sid }),
    },
    },
    returns => {
    type => 'object',
    properties => {
        sid => get_standard_option('pve-ha-resource-or-vm-id'),
        digest => {
        type => 'string',
        description => 'Can be used to prevent concurrent modifications.',
        },
        type => {
        type => 'string',
        description => 'The type of the resources.',
        },
        state => {
        type => 'string',
        enum => ['started', 'stopped', 'enabled', 'disabled', 'ignored'],
        optional => 1,
        description => "Requested resource state.",
        },
        group => get_standard_option('pve-ha-group-id', { optional => 1, }),
        max_restart => {
        description => "Maximal number of tries to restart the service on".
        " a node after its start failed.",
        type => 'integer',
        optional => 1,
        },
        max_relocate => {
        description => "Maximal number of service relocate tries when a".
        " service failes to start.",
        type => 'integer',
        optional => 1,
        },
        comment => {
        description => "Description.",
        type => 'string',
        optional => 1,
        },
    },
    },
    code => sub {
    my ($param) = @_;

    my $cfg = PVE::HA::Config::read_resources_config();

    my $sid = PVE::HA::Config::parse_sid($param->{sid});

    return &$api_copy_config($cfg, $sid);
    }});

__PACKAGE__->register_method ({
    name => 'create',
    protected => 1,
    path => '',
    method => 'POST',
    permissions => {
    check => ['perm', '/', [ 'Sys.Console' ]],
    },
    description => "Create a new HA resource.",
    parameters => PVE::HA::Resources->createSchema(),
    returns => { type => 'null' },
    code => sub {
    my ($param) = @_;

    # create /etc/pve/ha directory
    PVE::Cluster::check_cfs_quorum();
    mkdir("/etc/pve/ha");

    my ($sid, $type, $name) = PVE::HA::Config::parse_sid(extract_param($param, 'sid'));

    if (my $param_type = extract_param($param, 'type')) {
        # useless, but do it anyway
        die "types does not match\n" if $param_type ne $type;
    }

    my $plugin = PVE::HA::Resources->lookup($type);
    $plugin->verify_name($name);

    $plugin->exists($name);

    my $opts = $plugin->check_config($sid, $param, 1, 1);

    PVE::HA::Config::lock_ha_domain(
        sub {

        my $cfg = PVE::HA::Config::read_resources_config();

        if ($cfg->{ids}->{$sid}) {
            die "resource ID '$sid' already defined\n";
        }

        $cfg->{ids}->{$sid} = $opts;

        PVE::HA::Config::write_resources_config($cfg)

        }, "create resource failed");

    return undef;
    }});

__PACKAGE__->register_method ({
    name => 'update',
    protected => 1,
    path => '{sid}',
    method => 'PUT',
    description => "Update resource configuration.",
    permissions => {
    check => ['perm', '/', [ 'Sys.Console' ]],
    },
    parameters => PVE::HA::Resources->updateSchema(),
    returns => { type => 'null' },
    code => sub {
    my ($param) = @_;

    my $digest = extract_param($param, 'digest');
    my $delete = extract_param($param, 'delete');

    my ($sid, $type, $name) = PVE::HA::Config::parse_sid(extract_param($param, 'sid'));

    if (my $param_type = extract_param($param, 'type')) {
        # useless, but do it anyway
        die "types does not match\n" if $param_type ne $type;
    }

    if (my $group = $param->{group}) {
        my $group_cfg = PVE::HA::Config::read_group_config();

        die "HA group '$group' does not exist\n"
        if !$group_cfg->{ids}->{$group};
    }

    check_service_state($sid, $param->{state});

    PVE::HA::Config::update_resources_config($sid, $param, $delete, $digest);

    return undef;
    }});

__PACKAGE__->register_method ({
    name => 'delete',
    protected => 1,
    path => '{sid}',
    method => 'DELETE',
    description => "Delete resource configuration.",
    permissions => {
    check => ['perm', '/', [ 'Sys.Console' ]],
    },
    parameters => {
    additionalProperties => 0,
    properties => {
        sid => get_standard_option('pve-ha-resource-or-vm-id',
                      { completion => \&PVE::HA::Tools::complete_sid }),
    },
    },
    returns => { type => 'null' },
    code => sub {
    my ($param) = @_;

    my ($sid, $type, $name) = PVE::HA::Config::parse_sid(extract_param($param, 'sid'));

    if (!PVE::HA::Config::service_is_configured($sid)) {
        die "cannot delete service '$sid', not HA managed!\n";
    }

    PVE::HA::Config::delete_service_from_config($sid);

    return undef;
    }});

__PACKAGE__->register_method ({
    name => 'migrate',
    protected => 1,
    path => '{sid}/migrate',
    method => 'POST',
    description => "Request resource migration (online) to another node.",
    permissions => {
    check => ['perm', '/', [ 'Sys.Console' ]],
    },
    parameters => {
    additionalProperties => 0,
    properties => {
        sid => get_standard_option('pve-ha-resource-or-vm-id',
                      { completion => \&PVE::HA::Tools::complete_sid }),
        node => get_standard_option('pve-node', {
        completion =>  \&PVE::Cluster::complete_migration_target,
        description => "Target node.",
        }),
    },
    },
    returns => { type => 'null' },
    code => sub {
    my ($param) = @_;

    my ($sid, $type, $name) = PVE::HA::Config::parse_sid(extract_param($param, 'sid'));

    PVE::HA::Config::service_is_ha_managed($sid);

    check_service_state($sid);

    PVE::HA::Config::queue_crm_commands("migrate $sid $param->{node}");

    return undef;
    }});

__PACKAGE__->register_method ({
    name => 'relocate',
    protected => 1,
    path => '{sid}/relocate',
    method => 'POST',
    description => "Request resource relocatzion to another node. This stops the service on the old node, and restarts it on the target node.",
    permissions => {
    check => ['perm', '/', [ 'Sys.Console' ]],
    },
    parameters => {
    additionalProperties => 0,
    properties => {
        sid => get_standard_option('pve-ha-resource-or-vm-id',
                      { completion => \&PVE::HA::Tools::complete_sid }),
        node => get_standard_option('pve-node', {
        completion =>  \&PVE::Cluster::complete_migration_target,
        description => "Target node.",
        }),
    },
    },
    returns => { type => 'null' },
    code => sub {
    my ($param) = @_;

    my ($sid, $type, $name) = PVE::HA::Config::parse_sid(extract_param($param, 'sid'));

    PVE::HA::Config::service_is_ha_managed($sid);

    check_service_state($sid);

    PVE::HA::Config::queue_crm_commands("relocate $sid $param->{node}");

    return undef;
    }});

1;

[Meister Mopper]

@david-g sagte in Proxmox VM startet nicht:

Use of uninitialized value in string eq at /usr/share/perl5/PVE/API2/HA/Resources.pm

Im Proxmox-Forum hab' ich das gefunden, allerdings nicht weiter gesucht.

[David G.]

@meister-mopper

Das hatte ich auch gefunden. Sonst nicht viel.
Hatte mir erst nicht weiter geholfen.

Habe es jetzt aber noch ein paar Mal gelesen bis mir das Wort "Watchdog" ins Auge gefallen ist.
Da ist mir was eingefallen.

Hatte neulich folgende Einstellung gemacht um zu sehen was das ist:

Hab die vm da jetzt entfernt und und nun startet sie.

Danke für den Schupser.

[Meister Mopper]

@david-g sagte in Proxmox VM startet nicht:

Hatte neulich folgende Einstellung gemacht um zu sehen was das ist:

Wieso hast du das getan? Du hast doch gar kein Cluster, da sind doch HA-Einstellungen sinnfrei.

[David G.]

@meister-mopper

War mal ohne Anleitung so naiv und hab einfach mal vermutet was ist ist.

Ein Herz und HA hab ich mal zu Health gedeutet -> Überwachung der vm.

Falsch wie ich grad gelesen habe......

Sollte ich mir abgewöhnen und erst lesen....

[Meister Mopper]

@david-g

Nur mal so zur Info, so sieht es aus, wenn HA läuft :wink::

[David G.]

@meister-mopper

🤪

Mal sehen ob sowas irgendwann bei mir kommt ^^.

Mal noch sind meine Maschinen auf proxmox nicht so wichtig, dass sich der Aufwand lohnt.

Geht ja schon was ins Geld.