mirror of
https://git.proxmox.com/git/qemu-server
synced 2025-05-02 18:59:41 +00:00
b06a24927c
should not happen normally, but an inattentive user of that function may forget to check the validity of the parsed device, so err on the safe side here Signed-off-by: Dominik Csapak <d.csapak@proxmox.com>
133 lines
3.8 KiB
Perl
133 lines
3.8 KiB
Perl
package PVE::QemuServer::USB;
|
|
|
|
use strict;
|
|
use warnings;
|
|
use PVE::QemuServer::PCI qw(print_pci_addr);
|
|
use PVE::JSONSchema;
|
|
use base 'Exporter';
|
|
|
|
our @EXPORT_OK = qw(
|
|
parse_usb_device
|
|
get_usb_controllers
|
|
get_usb_devices
|
|
);
|
|
|
|
sub parse_usb_device {
|
|
my ($value) = @_;
|
|
|
|
return if !$value;
|
|
|
|
my $res = {};
|
|
if ($value =~ m/^(0x)?([0-9A-Fa-f]{4}):(0x)?([0-9A-Fa-f]{4})$/) {
|
|
$res->{vendorid} = $2;
|
|
$res->{productid} = $4;
|
|
} elsif ($value =~ m/^(\d+)\-(\d+(\.\d+)*)$/) {
|
|
$res->{hostbus} = $1;
|
|
$res->{hostport} = $2;
|
|
} elsif ($value =~ m/^spice$/i) {
|
|
$res->{spice} = 1;
|
|
} else {
|
|
return;
|
|
}
|
|
|
|
return $res;
|
|
}
|
|
|
|
sub get_usb_controllers {
|
|
my ($conf, $bridges, $arch, $machine, $format, $max_usb_devices) = @_;
|
|
|
|
my $devices = [];
|
|
my $pciaddr = "";
|
|
|
|
if ($arch eq 'aarch64') {
|
|
$pciaddr = print_pci_addr('ehci', $bridges, $arch, $machine);
|
|
push @$devices, '-device', "usb-ehci,id=ehci$pciaddr";
|
|
} elsif ($machine !~ /q35/) { # FIXME: combine this and machine_type_is_q35
|
|
$pciaddr = print_pci_addr("piix3", $bridges, $arch, $machine);
|
|
push @$devices, '-device', "piix3-usb-uhci,id=uhci$pciaddr.0x2";
|
|
|
|
my $use_usb2 = 0;
|
|
for (my $i = 0; $i < $max_usb_devices; $i++) {
|
|
next if !$conf->{"usb$i"};
|
|
my $d = eval { PVE::JSONSchema::parse_property_string($format,$conf->{"usb$i"}) };
|
|
next if !$d || $d->{usb3}; # do not add usb2 controller if we have only usb3 devices
|
|
$use_usb2 = 1;
|
|
}
|
|
# include usb device config
|
|
push @$devices, '-readconfig', '/usr/share/qemu-server/pve-usb.cfg' if $use_usb2;
|
|
}
|
|
|
|
# add usb3 controller if needed
|
|
|
|
my $use_usb3 = 0;
|
|
for (my $i = 0; $i < $max_usb_devices; $i++) {
|
|
next if !$conf->{"usb$i"};
|
|
my $d = eval { PVE::JSONSchema::parse_property_string($format,$conf->{"usb$i"}) };
|
|
next if !$d || !$d->{usb3};
|
|
$use_usb3 = 1;
|
|
}
|
|
|
|
$pciaddr = print_pci_addr("xhci", $bridges, $arch, $machine);
|
|
push @$devices, '-device', "nec-usb-xhci,id=xhci$pciaddr" if $use_usb3;
|
|
|
|
return @$devices;
|
|
}
|
|
|
|
sub get_usb_devices {
|
|
my ($conf, $format, $max_usb_devices, $features, $bootorder) = @_;
|
|
|
|
my $devices = [];
|
|
|
|
for (my $i = 0; $i < $max_usb_devices; $i++) {
|
|
my $devname = "usb$i";
|
|
next if !$conf->{$devname};
|
|
my $d = eval { PVE::JSONSchema::parse_property_string($format,$conf->{$devname}) };
|
|
next if !$d;
|
|
|
|
if (defined($d->{host})) {
|
|
my $hostdevice = parse_usb_device($d->{host});
|
|
$hostdevice->{usb3} = $d->{usb3};
|
|
if ($hostdevice->{spice}) {
|
|
# usb redir support for spice
|
|
my $bus = 'ehci';
|
|
$bus = 'xhci' if $hostdevice->{usb3} && $features->{spice_usb3};
|
|
|
|
push @$devices, '-chardev', "spicevmc,id=usbredirchardev$i,name=usbredir";
|
|
push @$devices, '-device', "usb-redir,chardev=usbredirchardev$i,id=usbredirdev$i,bus=$bus.0";
|
|
|
|
warn "warning: spice usb port set as bootdevice, ignoring\n" if $bootorder->{$devname};
|
|
} else {
|
|
push @$devices, '-device', print_usbdevice_full($conf, $devname, $hostdevice, $bootorder);
|
|
}
|
|
}
|
|
}
|
|
|
|
return @$devices;
|
|
}
|
|
|
|
sub print_usbdevice_full {
|
|
my ($conf, $deviceid, $device, $bootorder) = @_;
|
|
|
|
return if !$device;
|
|
my $usbdevice = "usb-host";
|
|
|
|
# if it is a usb3 device, attach it to the xhci controller, else omit the bus option
|
|
if($device->{usb3}) {
|
|
$usbdevice .= ",bus=xhci.0";
|
|
}
|
|
|
|
if (defined($device->{vendorid}) && defined($device->{productid})) {
|
|
$usbdevice .= ",vendorid=0x$device->{vendorid},productid=0x$device->{productid}";
|
|
} elsif (defined($device->{hostbus}) && defined($device->{hostport})) {
|
|
$usbdevice .= ",hostbus=$device->{hostbus},hostport=$device->{hostport}";
|
|
} else {
|
|
die "no usb id or path given\n";
|
|
}
|
|
|
|
$usbdevice .= ",id=$deviceid";
|
|
$usbdevice .= ",bootindex=$bootorder->{$deviceid}" if $bootorder->{$deviceid};
|
|
return $usbdevice;
|
|
}
|
|
|
|
1;
|