proxmox-mirrors/qemu-server
1
0
Fork 0
mirror of https://git.proxmox.com/git/qemu-server synced 2025-05-29 16:38:49 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

pci: make variable name slightly easier to read

Browse Source 
Signed-off-by: Thomas Lamprecht <t.lamprecht@proxmox.com>
This commit is contained in:
Thomas Lamprecht 2024-10-24 18:44:53 +02:00
parent 48ada6982f
commit a28e6fe6f9
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
PVE/QemuServer/PCI.pm
View File

@ -743,18 +743,18 @@ my $PCIID_RESERVATION_LOCK = "${PCIID_RESERVATION_FILE}.lock";
# for succesfully started VM processes, or a expiration time for the initial time window between # for succesfully started VM processes, or a expiration time for the initial time window between
# reservation and actual VM process start-up. # reservation and actual VM process start-up.
my $parse_pci_reservation_unlocked = sub { my $parse_pci_reservation_unlocked = sub {
my $pciids = {}; my $pci_ids = {};
if (my $fh = IO::File->new($PCIID_RESERVATION_FILE, "r")) { if (my $fh = IO::File->new($PCIID_RESERVATION_FILE, "r")) {
while (my $line = <$fh>) { while (my $line = <$fh>) {
if ($line =~ m/^($PCIRE)\s(\d+)\s(time|pid)\:(\d+)$/) { if ($line =~ m/^($PCIRE)\s(\d+)\s(time|pid)\:(\d+)$/) {
$pciids->{$1} = { $pci_ids->{$1} = {
vmid => $2, vmid => $2,
"$3" => $4, "$3" => $4,
}; };
} }
} }
} }
return $pciids; return $pci_ids;
}; };
my $write_pci_reservation_unlocked = sub { my $write_pci_reservation_unlocked = sub {
@ -774,12 +774,12 @@ my $write_pci_reservation_unlocked = sub {
# removes all PCI device reservations held by the `vmid` # removes all PCI device reservations held by the `vmid`
sub remove_pci_reservation { sub remove_pci_reservation {
my ($vmid, $pciids) = @_; my ($vmid, $pci_ids) = @_;
PVE::Tools::lock_file($PCIID_RESERVATION_LOCK, 2, sub { PVE::Tools::lock_file($PCIID_RESERVATION_LOCK, 2, sub {
my $reservation_list = $parse_pci_reservation_unlocked->(); my $reservation_list = $parse_pci_reservation_unlocked->();
for my $id (keys %$reservation_list) { for my $id (keys %$reservation_list) {
next if defined($pciids) && !grep { $_ eq $id } $pciids->@*; next if defined($pci_ids) && !grep { $_ eq $id } $pci_ids->@*;
my $reservation = $reservation_list->{$id}; my $reservation = $reservation_list->{$id};
next if $reservation->{vmid} != $vmid; next if $reservation->{vmid} != $vmid;
delete $reservation_list->{$id}; delete $reservation_list->{$id};