PVE/QemuServer/PCI.pm

   1 package PVE::QemuServer::PCI;
   2
   3 use base 'Exporter';
   4
   5 our @EXPORT_OK = qw(
   6 print_pci_addr
   7 print_pcie_addr
   8 );
   9
  10 my $devices = {
  11     piix3 => { bus => 0, addr => 1 },
  12     ehci => { bus => 0, addr => 1 }, # instead of piix3 on arm
  13     vga => { bus => 0, addr => 2 },
  14     balloon0 => { bus => 0, addr => 3 },
  15     watchdog => { bus => 0, addr => 4 },
  16     scsihw0 => { bus => 0, addr => 5 },
  17     'pci.3' => { bus => 0, addr => 5 }, #can also be used for virtio-scsi-single bridge
  18     scsihw1 => { bus => 0, addr => 6 },
  19     ahci0 => { bus => 0, addr => 7 },
  20     qga0 => { bus => 0, addr => 8 },
  21     spice => { bus => 0, addr => 9 },
  22     virtio0 => { bus => 0, addr => 10 },
  23     virtio1 => { bus => 0, addr => 11 },
  24     virtio2 => { bus => 0, addr => 12 },
  25     virtio3 => { bus => 0, addr => 13 },
  26     virtio4 => { bus => 0, addr => 14 },
  27     virtio5 => { bus => 0, addr => 15 },
  28     hostpci0 => { bus => 0, addr => 16 },
  29     hostpci1 => { bus => 0, addr => 17 },
  30     net0 => { bus => 0, addr => 18 },
  31     net1 => { bus => 0, addr => 19 },
  32     net2 => { bus => 0, addr => 20 },
  33     net3 => { bus => 0, addr => 21 },
  34     net4 => { bus => 0, addr => 22 },
  35     net5 => { bus => 0, addr => 23 },
  36     vga1 => { bus => 0, addr => 24 },
  37     vga2 => { bus => 0, addr => 25 },
  38     vga3 => { bus => 0, addr => 26 },
  39     hostpci2 => { bus => 0, addr => 27 },
  40     hostpci3 => { bus => 0, addr => 28 },
  41     #addr29 : usb-host (pve-usb.cfg)
  42     'pci.1' => { bus => 0, addr => 30 },
  43     'pci.2' => { bus => 0, addr => 31 },
  44     'net6' => { bus => 1, addr => 1 },
  45     'net7' => { bus => 1, addr => 2 },
  46     'net8' => { bus => 1, addr => 3 },
  47     'net9' => { bus => 1, addr => 4 },
  48     'net10' => { bus => 1, addr => 5 },
  49     'net11' => { bus => 1, addr => 6 },
  50     'net12' => { bus => 1, addr => 7 },
  51     'net13' => { bus => 1, addr => 8 },
  52     'net14' => { bus => 1, addr => 9 },
  53     'net15' => { bus => 1, addr => 10 },
  54     'net16' => { bus => 1, addr => 11 },
  55     'net17' => { bus => 1, addr => 12 },
  56     'net18' => { bus => 1, addr => 13 },
  57     'net19' => { bus => 1, addr => 14 },
  58     'net20' => { bus => 1, addr => 15 },
  59     'net21' => { bus => 1, addr => 16 },
  60     'net22' => { bus => 1, addr => 17 },
  61     'net23' => { bus => 1, addr => 18 },
  62     'net24' => { bus => 1, addr => 19 },
  63     'net25' => { bus => 1, addr => 20 },
  64     'net26' => { bus => 1, addr => 21 },
  65     'net27' => { bus => 1, addr => 22 },
  66     'net28' => { bus => 1, addr => 23 },
  67     'net29' => { bus => 1, addr => 24 },
  68     'net30' => { bus => 1, addr => 25 },
  69     'net31' => { bus => 1, addr => 26 },
  70     'xhci' => { bus => 1, addr => 27 },
  71     'virtio6' => { bus => 2, addr => 1 },
  72     'virtio7' => { bus => 2, addr => 2 },
  73     'virtio8' => { bus => 2, addr => 3 },
  74     'virtio9' => { bus => 2, addr => 4 },
  75     'virtio10' => { bus => 2, addr => 5 },
  76     'virtio11' => { bus => 2, addr => 6 },
  77     'virtio12' => { bus => 2, addr => 7 },
  78     'virtio13' => { bus => 2, addr => 8 },
  79     'virtio14' => { bus => 2, addr => 9 },
  80     'virtio15' => { bus => 2, addr => 10 },
  81     'virtioscsi0' => { bus => 3, addr => 1 },
  82     'virtioscsi1' => { bus => 3, addr => 2 },
  83     'virtioscsi2' => { bus => 3, addr => 3 },
  84     'virtioscsi3' => { bus => 3, addr => 4 },
  85     'virtioscsi4' => { bus => 3, addr => 5 },
  86     'virtioscsi5' => { bus => 3, addr => 6 },
  87     'virtioscsi6' => { bus => 3, addr => 7 },
  88     'virtioscsi7' => { bus => 3, addr => 8 },
  89     'virtioscsi8' => { bus => 3, addr => 9 },
  90     'virtioscsi9' => { bus => 3, addr => 10 },
  91     'virtioscsi10' => { bus => 3, addr => 11 },
  92     'virtioscsi11' => { bus => 3, addr => 12 },
  93     'virtioscsi12' => { bus => 3, addr => 13 },
  94     'virtioscsi13' => { bus => 3, addr => 14 },
  95     'virtioscsi14' => { bus => 3, addr => 15 },
  96     'virtioscsi15' => { bus => 3, addr => 16 },
  97     'virtioscsi16' => { bus => 3, addr => 17 },
  98     'virtioscsi17' => { bus => 3, addr => 18 },
  99     'virtioscsi18' => { bus => 3, addr => 19 },
 100     'virtioscsi19' => { bus => 3, addr => 20 },
 101     'virtioscsi20' => { bus => 3, addr => 21 },
 102     'virtioscsi21' => { bus => 3, addr => 22 },
 103     'virtioscsi22' => { bus => 3, addr => 23 },
 104     'virtioscsi23' => { bus => 3, addr => 24 },
 105     'virtioscsi24' => { bus => 3, addr => 25 },
 106     'virtioscsi25' => { bus => 3, addr => 26 },
 107     'virtioscsi26' => { bus => 3, addr => 27 },
 108     'virtioscsi27' => { bus => 3, addr => 28 },
 109     'virtioscsi28' => { bus => 3, addr => 29 },
 110     'virtioscsi29' => { bus => 3, addr => 30 },
 111     'virtioscsi30' => { bus => 3, addr => 31 },
 112 };
 113
 114 sub print_pci_addr {
 115     my ($id, $bridges, $arch, $machine) = @_;
 116
 117     my $res = '';
 118
 119     # We use the same bus slots on all hardware, so we need to check special
 120     # cases here:
 121     my $busname = 'pci';
 122     if ($arch eq 'aarch64' && $machine =~ /^virt/) {
 123         die "aarch64/virt cannot use IDE devices\n"
 124             if $id =~ /^ide/;
 125         $busname = 'pcie';
 126     }
 127
 128     if (defined($devices->{$id}->{bus}) && defined($devices->{$id}->{addr})) {
 129            my $addr = sprintf("0x%x", $devices->{$id}->{addr});
 130            my $bus = $devices->{$id}->{bus};
 131            $res = ",bus=$busname.$bus,addr=$addr";
 132            $bridges->{$bus} = 1 if $bridges;
 133     }
 134     return $res;
 135
 136 }
 137
 138 sub print_pcie_addr {
 139     my ($id) = @_;
 140
 141     my $res = '';
 142     my $devices = {
 143         vga => { bus => 'pcie.0', addr => 1 },
 144         hostpci0 => { bus => "ich9-pcie-port-1", addr => 0 },
 145         hostpci1 => { bus => "ich9-pcie-port-2", addr => 0 },
 146         hostpci2 => { bus => "ich9-pcie-port-3", addr => 0 },
 147         hostpci3 => { bus => "ich9-pcie-port-4", addr => 0 },
 148     };
 149
 150     if (defined($devices->{$id}->{bus}) && defined($devices->{$id}->{addr})) {
 151            my $addr = sprintf("0x%x", $devices->{$id}->{addr});
 152            my $bus = $devices->{$id}->{bus};
 153            $res = ",bus=$bus,addr=$addr";
 154     }
 155     return $res;
 156
 157 }