proxmox-mirrors/qemu-server
1
0
Fork 0
mirror of https://git.proxmox.com/git/qemu-server synced 2025-05-02 21:14:59 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

further code cleanups

Browse Source
This commit is contained in:
Dietmar Maurer 2011-10-11 13:28:50 +02:00
parent e8b9c17cac
commit 1dc4f49676
1 changed files with 21 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

41
PVE/QemuServer.pm
View File

@ -1302,7 +1302,7 @@ sub create_disks {
die "image '$path' does not exists\n";
}
}
PVE::QemuServer::vm_deviceadd ($storecfg,$vmid,$ds, $disk);
PVE::QemuServer::vm_deviceadd($storecfg, $vmid, $ds, $disk);
});
};
@ -2248,31 +2248,32 @@ sub next_migrate_port {
sub vm_devices_list {
my ($vmid) = @_;
my $res = vm_monitor_command ($vmid, "info pci", 1);
my $res = vm_monitor_command ($vmid, "info pci", 1);
my @lines = split ("\n", $res);
my $devices;
my $bus;
my $addr;
my $id;
foreach my $line (@lines) {
$line =~ s/^\s+//;
if ($line =~ m/^Bus (\d+), device (\d+), function (\d+):$/) {
$bus=$1;
$addr=$2;
}
if ($line =~ m/^id "([a-z][a-z_\-]*\d*)"$/) {
my @lines = split ("\n", $res);
my $devices;
my $bus;
my $addr;
my $id;
foreach my $line (@lines) {
$line =~ s/^\s+//;
if ($line =~ m/^Bus (\d+), device (\d+), function (\d+):$/) {
$bus=$1;
$addr=$2;
}
if ($line =~ m/^id "([a-z][a-z_\-]*\d*)"$/) {
$id=$1;
$devices->{$id}->{bus}=$bus;
$devices->{$id}->{addr}=$addr;
}
}
}
}
return $devices;
return $devices;
}
sub vm_deviceadd {
my ($storecfg,$vmid, $deviceid,$device) = @_;
my ($storecfg, $vmid, $deviceid, $device) = @_;
my $cfspath = cfs_config_path($vmid);
my $conf = PVE::Cluster::cfs_read_file($cfspath) || {};
@ -2281,9 +2282,9 @@ sub vm_deviceadd {
if($deviceid =~ m/^(virtio)(\d+)$/) {
my $drive = print_drive_full($storecfg,$vmid, $device);
my $drive = print_drive_full($storecfg, $vmid, $device);
vm_monitor_command($vmid, "drive_add auto $drive", 1);
my $devicefull = print_drivedevice_full($storecfg,$vmid, $device);
my $devicefull = print_drivedevice_full($storecfg, $vmid, $device);
vm_monitor_command($vmid, "device_add $devicefull", 1);
}