cookbooks/hardware/templates/default/ohai.rb.erb

   1 require "pathname"
   2
   3 Ohai.plugin(:Hardware) do
   4   provides "hardware"
   5
   6   def read_sysctl_link(file)
   7     File.basename(File.readlink(file))
   8   rescue Errno::ENOENT
   9   end
  10
  11   def read_sysctl_file(file)
  12     IO.read(file).strip
  13   rescue Errno::ENOENT, Errno::EINVAL
  14   end
  15
  16   def parse_memory_size(size)
  17     if size =~ /^(\d+(?:\.\d+)?)\s*TB/i
  18       Regexp.last_match(1).to_f * 2**30
  19     elsif size =~ /^(\d+(?:\.\d+)?)\s*GB/i
  20       Regexp.last_match(1).to_f * 2**20
  21     elsif size =~ /^(\d+(?:\.\d+)?)\s*MB/i
  22       Regexp.last_match(1).to_f * 2**10
  23     end
  24   end
  25
  26   def format_disk_size(kb)
  27     if kb == 0
  28       ""
  29     else
  30       kblog10 = Math.log10(kb).floor
  31
  32       kb = kb.to_f * 2 / 10**kblog10
  33       kb = kb.round.to_f / 2
  34
  35       if kblog10 >= 9
  36         format "%gTB", kb * 10**(kblog10 - 9)
  37       elsif kblog10 >= 6
  38         format "%dGB", kb * 10**(kblog10 - 6)
  39       else
  40         format "%dMB", kb * 10**(kblog10 - 3)
  41       end
  42     end
  43   end
  44
  45   def memory_to_disk_size(size)
  46     format_disk_size(parse_memory_size(size))
  47   end
  48
  49   def find_sas_device(address)
  50     file = Dir.glob("/sys/class/scsi_generic/sg*/device/sas_address").find do |file|
  51       read_sysctl_file(file) == "0x#{address}"
  52     end
  53
  54     if file
  55       dir = File.dirname(file)
  56       device = Dir.glob("#{dir}/block/*").first ||
  57                Dir.glob("#{dir}/scsi_generic/*").first
  58
  59       "/dev/#{File.basename(device)}"
  60     end
  61   end
  62
  63   def pci_devices
  64     devices = {}
  65     device = nil
  66
  67     IO.popen(["lspci", "-Dkvmm"]).each do |line|
  68       if line =~ /^Slot:\s+((\h{4}):(\h{2}):(\h{2}).(\h))\s*$/
  69         device = {
  70           :slot => Regexp.last_match(1),
  71           :domain => Regexp.last_match(2),
  72           :bus => Regexp.last_match(3),
  73           :device => Regexp.last_match(4),
  74           :function => Regexp.last_match(5)
  75         }
  76       elsif device && line =~ /^([A-Z]+):\s+(.*)\s*$/i
  77         case Regexp.last_match(1)
  78         when "Class" then device[:class_name] = Regexp.last_match(2)
  79         when "Vendor" then device[:vendor_name] = Regexp.last_match(2)
  80         when "Device" then device[:device_name] = Regexp.last_match(2)
  81         when "SVendor" then device[:subsystem_vendor_name] = Regexp.last_match(2)
  82         when "SDevice" then device[:subsystem_device_name] = Regexp.last_match(2)
  83         when "PhySlot" then device[:physical_slot] = Regexp.last_match(2)
  84         when "Rev" then device[:revision] = Regexp.last_match(2)
  85         when "ProgIf" then device[:programming_interface] = Regexp.last_match(2)
  86         when "Driver" then device[:driver] = Regexp.last_match(2)
  87         when "Module" then device[:modules] = Array(device[:modules]) << Regexp.last_match(2)
  88         end
  89       elsif device && line =~ /^\s*$/
  90         devices[device[:slot]] = device
  91         device = nil
  92       end
  93     end
  94
  95     IO.popen(["lspci", "-Dkvmmn"]).each do |line|
  96       if line =~ /^Slot:\s+((\h{4}):(\h{2}):(\h{2}).(\h))\s*$/
  97         device = devices[Regexp.last_match(1)]
  98       elsif device && line =~ /^([A-Z]+):\s+(.*)\s*$/i
  99         case Regexp.last_match(1)
 100         when "Class" then device[:class_id] = Regexp.last_match(2)
 101         when "Vendor" then device[:vendor_id] = Regexp.last_match(2)
 102         when "Device" then device[:device_id] = Regexp.last_match(2)
 103         when "SVendor" then device[:subsystem_vendor_id] = Regexp.last_match(2)
 104         when "SDevice" then device[:subsystem_device_id] = Regexp.last_match(2)
 105         end
 106       elsif device && line =~ /^\s*$/
 107         device = nil
 108       end
 109     end
 110
 111     devices
 112   end
 113
 114   def network_devices
 115     Dir.glob("/sys/class/net/*").each_with_object(Mash.new) do |device, devices|
 116       name = File.basename(device)
 117
 118       devices[name] = {
 119         :device => read_sysctl_link("#{device}/device"),
 120         :duplex => read_sysctl_file("#{device}/duplex"),
 121         :speed => read_sysctl_file("#{device}/speed")
 122       }.delete_if { |_, v| v.nil? }
 123     end
 124   end
 125
 126   def memory_devices
 127     device = nil
 128
 129     IO.popen(["dmidecode", "-t", "memory"]).each_with_object([]) do |line, devices|
 130       if line =~ /^Memory Device\s*$/
 131         device = {}
 132       elsif device && line =~ /^\s+([A-Z ]+):\s+(.*)\s*$/i
 133         device[Regexp.last_match(1).tr(" ", "_").downcase.to_sym] = Regexp.last_match(2).strip
 134       elsif device && line =~ /^\s*$/
 135         devices << device
 136         device = nil
 137       end
 138     end
 139   end
 140
 141   def disk_devices
 142     disk = Mash.new
 143
 144     disk[:controllers] = []
 145     disk[:arrays] = []
 146     disk[:disks] = []
 147
 148     find_direct_disks(disk)
 149     find_nvme_disks(disk)
 150
 151     find_hp_disks(disk) if File.exist?("/usr/sbin/hpssacli")
 152     find_megaraid_disks(disk) if File.exist?("/usr/sbin/megacli")
 153     find_mpt_disks(disk) if File.exist?("/usr/sbin/sas2ircu")
 154     find_adaptec_disks(disk) if File.exist?("/usr/sbin/arcconf")
 155     find_areca_disks(disk) if File.exist?("/opt/areca/x86_64/cli64")
 156
 157     find_md_arrays(disk)
 158
 159     disk[:disks].each do |disk|
 160       if disk[:vendor] =~ /^CVPR/ && disk[:model] == "INTEL"
 161         disk[:model] = disk[:serial_number]
 162         disk[:serial_number] = disk[:vendor]
 163         disk[:vendor] = "INTEL"
 164       end
 165
 166       if disk[:vendor].nil? && disk[:model] =~ /^ATA\s+(.*)$/
 167         disk[:vendor] = "ATA"
 168         disk[:model] = Regexp.last_match(1)
 169       end
 170
 171       if disk[:vendor].nil? || disk[:vendor] == "ATA"
 172         if disk[:model] =~ /^(\S+)\s+(.*)$/
 173           disk[:vendor] = Regexp.last_match(1)
 174           disk[:model] = Regexp.last_match(2)
 175         elsif disk[:model] =~ /^ST/
 176           disk[:vendor] = "SEAGATE"
 177         elsif disk[:model] =~ /^C300-(.*)$/
 178           disk[:vendor] = "CRUCIAL"
 179           disk[:model] = Regexp.last_match(1)
 180         end
 181       end
 182
 183       disk[:model].sub!(/-.*$/, "")
 184     end
 185
 186     disk
 187   end
 188
 189   def find_direct_disks(devices)
 190     Dir.glob("/sys/class/scsi_host/host*") do |host|
 191       driver = read_sysctl_file("#{host}/proc_name")
 192
 193       if driver == "ahci" || driver == "mptsas"
 194         bus = host.sub("/sys/class/scsi_host/host", "")
 195
 196         Dir.glob("/sys/bus/scsi/devices/#{bus}:0:*").each do |device|
 197           next unless File.exist?("#{device}/scsi_disk")
 198
 199           block = Dir.glob("#{device}/block/*").first
 200           size = read_sysctl_file("#{block}/size").to_f / 2
 201
 202           devices[:disks] << {
 203             :id => devices[:disks].count,
 204             :device => "/dev/#{File.basename(block)}",
 205             :vendor => read_sysctl_file("#{device}/vendor"),
 206             :model => read_sysctl_file("#{device}/model"),
 207             :firmware_version => read_sysctl_file("#{device}/rev"),
 208             :size => format_disk_size(size),
 209             :arrays => []
 210           }
 211         end
 212       end
 213     end
 214   end
 215
 216   def find_nvme_disks(devices)
 217     Dir.glob("/sys/class/misc/nvme*") do |device|
 218       controller = {
 219         :id => devices[:controllers].count,
 220         :pci_slot => File.basename(Pathname.new("#{device}/device").realpath),
 221         :arrays => [],
 222         :disks => []
 223       }
 224
 225       devices[:controllers] << controller
 226
 227       IO.popen(["lspci", "-Dkvmm", "-s", controller[:pci_slot]]).each do |line|
 228         if line =~ /^SVendor:\s+(\S.*\S)\s*$/
 229           controller[:vendor] = Regexp.last_match(1)
 230         elsif line =~ /^SDevice:\s+(\S.*\S)\s*$/
 231           controller[:model] = Regexp.last_match(1)
 232         end
 233       end
 234
 235       Dir.glob("#{device}/device/block/*").each do |block|
 236         size = read_sysctl_file("#{block}/size").to_f / 2
 237
 238         disk = {
 239           :id => devices[:disks].count,
 240           :controller => controller[:id],
 241           :device => "/dev/#{File.basename(block)}",
 242           :vendor => controller[:vendor],
 243           :model => controller[:model],
 244           :size => format_disk_size(size),
 245           :arrays => []
 246         }
 247
 248         devices[:disks] << disk
 249         controller[:disks] << disk[:id]
 250       end
 251     end
 252   end
 253
 254   def find_md_arrays(devices)
 255     array = nil
 256
 257     File.new("/proc/mdstat", "r").each do |line|
 258       if line =~ /^(md\d+) : active raid(\d+)((?: (?:sd[a-z]|nvme\d+n\d+)\d*\[\d+\](?:\([A-Z]\))*)+)$/
 259         array = {
 260           :id => devices[:arrays].count,
 261           :device => "/dev/#{Regexp.last_match(1)}",
 262           :raid_level => Regexp.last_match(2),
 263           :disks => []
 264         }
 265
 266         Regexp.last_match(3).scan(/ (sd[a-z]+|nvme\d+n\d+)\d*\[\d+\](?:\([A-Z]\))*/).flatten.each do |device|
 267           if disk = devices[:disks].find { |d| d[:device] == "/dev/#{device}" }
 268             disk[:arrays] << array[:id]
 269             array[:disks] << disk[:id]
 270           end
 271         end
 272
 273         devices[:arrays] << array
 274       elsif array && line =~ /^\s+(\d+) blocks/
 275         array[:size] = format_disk_size(Regexp.last_match(1).to_i)
 276       end
 277     end
 278   end
 279
 280   def find_hp_disks(devices)
 281     controllers = []
 282     disks = []
 283
 284     controller = nil
 285     array = nil
 286     disk = nil
 287
 288     IO.popen(%w(hpssacli controller all show config detail)).each do |line|
 289       if line =~ /^Smart Array (\S+) /
 290         controller = {
 291           :id => devices[:controllers].count,
 292           :model => Regexp.last_match(1),
 293           :arrays => [],
 294           :disks => []
 295         }
 296
 297         devices[:controllers] << controller
 298
 299         controllers << controller
 300
 301         array = nil
 302         disk = nil
 303       elsif controller && line =~ /^   (\S.*):\s+(.*)$/
 304         case Regexp.last_match(1)
 305         when "Serial Number" then controller[:serial_number] = Regexp.last_match(2)
 306         when "Hardware Revision" then controller[:hardware_version] = Regexp.last_match(2)
 307         when "Firmware Version" then controller[:firmware_version] = Regexp.last_match(2)
 308         when "PCI Address (Domain:Bus:Device.Function)" then controller[:pci_slot] = Regexp.last_match(2)
 309         end
 310       elsif controller && line =~ /^      Logical Drive: (\d+)$/
 311         array = {
 312           :id => devices[:arrays].count,
 313           :controller => controller[:id],
 314           :number => Regexp.last_match(1),
 315           :disks => []
 316         }
 317
 318         devices[:arrays] << array
 319         controller[:arrays] << array[:id]
 320
 321         disk = nil
 322       elsif controller && line =~ /^      physicaldrive (\S+) /
 323         disks << Regexp.last_match(1)
 324       elsif array && line =~ /^      physicaldrive (\S+)$/
 325         disk = {
 326           :id => devices[:disks].count,
 327           :controller => controller[:id],
 328           :arrays => [array[:id]],
 329           :location => Regexp.last_match(1),
 330           :smart_device => "cciss,#{disks.find_index(Regexp.last_match(1))}"
 331         }
 332
 333         devices[:disks] << disk
 334         controller[:disks] << disk[:id]
 335         array[:disks] << disk[:id]
 336       elsif disk && line =~ /^         (\S[^:]+):\s+(.*\S)\s*$/
 337         case Regexp.last_match(1)
 338         when "Interface Type" then disk[:interface] = Regexp.last_match(2)
 339         when "Size" then disk[:size] = Regexp.last_match(2)
 340         when "Rotational Speed" then disk[:rpm] = Regexp.last_match(2)
 341         when "Firmware Revision" then disk[:firmware_version] = Regexp.last_match(2)
 342         when "Serial Number" then disk[:serial_number] = Regexp.last_match(2)
 343         when "Model" then disk[:model] = Regexp.last_match(2)
 344         end
 345       elsif array && line =~ /^         (\S[^:]+):\s+(.*\S)\s*$/
 346         case Regexp.last_match(1)
 347         when "Size" then array[:size] = Regexp.last_match(2)
 348         when "Fault Tolerance" then array[:raid_level] = Regexp.last_match(2)
 349         when "Disk Name" then array[:device] = Regexp.last_match(2).strip
 350         when "Mount Points" then array[:mount_point] = Regexp.last_match(2).split.first
 351         when "Unique Identifier" then array[:wwn] = Regexp.last_match(2)
 352         end
 353       end
 354     end
 355
 356     controllers.each do |controller|
 357       if device = Dir.glob("/sys/bus/pci/devices/#{controller[:pci_slot]}/cciss*").first
 358         controller[:device] = File.basename(device).sub(/^cciss(\d+)$/, "/dev/cciss/c\\1d0")
 359       elsif device = Dir.glob("/sys/bus/pci/devices/#{controller[:pci_slot]}/host*/target*:3:0/*:3:0:0/scsi_generic/sg*").first
 360         controller[:device] = "/dev/#{File.basename(device)}"
 361       end
 362     end
 363   end
 364
 365   def find_megaraid_disks(devices)
 366     controllers = []
 367     arrays = []
 368
 369     controller = nil
 370     array = nil
 371     disk = nil
 372
 373     IO.popen(%w(megacli -AdpGetPciInfo -aAll -NoLog)).each do |line|
 374       if line =~ /^PCI information for Controller (\d+)$/
 375         controller = {
 376           :id => devices[:controllers].count,
 377           :arrays => [],
 378           :disks => []
 379         }
 380
 381         devices[:controllers] << controller
 382
 383         controllers << controller
 384       elsif line =~ /^Bus Number\s+:\s+(\d+)$/
 385         controller[:pci_slot] = format "0000:%02x", Integer("0x#{Regexp.last_match(1)}")
 386       elsif line =~ /^Device Number\s+:\s+(\d+)$/
 387         controller[:pci_slot] = format "%s:%02x", controller[:pci_slot], Integer("0x#{Regexp.last_match(1)}")
 388       elsif line =~ /^Function Number\s+:\s+(\d+)$/
 389         controller[:pci_slot] = format "%s.%01x", controller[:pci_slot], Integer("0x#{Regexp.last_match(1)}")
 390       end
 391     end
 392
 393     IO.popen(%w(megacli -AdpAllInfo -aAll -NoLog)).each do |line|
 394       if line =~ /^Adapter #(\d+)$/
 395         controller = controllers[Regexp.last_match(1).to_i]
 396       elsif line =~ /^(\S.*\S)\s*:\s+(\S.*)$/
 397         case Regexp.last_match(1)
 398         when "Product Name" then controller[:model] = Regexp.last_match(2)
 399         when "Serial No" then controller[:serial_number] = Regexp.last_match(2)
 400         when "FW Package Build" then controller[:firmware_version] = Regexp.last_match(2)
 401         end
 402       end
 403     end
 404
 405     IO.popen(%w(megacli -LdPdInfo -aAll -NoLog)).each do |line|
 406       if line =~ /^Adapter #(\d+)$/
 407         controller = controllers[Regexp.last_match(1).to_i]
 408       elsif controller && line =~ /^Virtual Drive: (\d+) \(Target Id: (\d+)\)$/
 409         pci_slot = controller[:pci_slot]
 410         target = Regexp.last_match(2)
 411         device = Dir.glob("/sys/bus/pci/devices/#{pci_slot}/host*/target*:2:#{target}/*:2:#{target}:0/block/*").first
 412
 413         array = {
 414           :id => devices[:arrays].count,
 415           :controller => controller[:id],
 416           :number => Regexp.last_match(1),
 417           :device => "/dev/#{File.basename(device)}",
 418           :disks => []
 419         }
 420
 421         devices[:arrays] << array
 422         controller[:arrays] << array[:id]
 423
 424         arrays << array
 425
 426         disk = nil
 427       elsif array && line =~ /^PD: (\d+) Information$/
 428         disk = {
 429           :id => devices[:disks].count,
 430           :controller => controller[:id],
 431           :arrays => [array[:id]]
 432         }
 433
 434         devices[:disks] << disk
 435         controller[:disks] << disk[:id]
 436         array[:disks] << disk[:id]
 437       elsif disk && line =~ /^(\S.*\S)\s*:\s+(\S.*)$/
 438         case Regexp.last_match(1)
 439         when "Device Id" then disk[:smart_device] = "megaraid,#{Regexp.last_match(2)}"
 440         when "WWN" then disk[:wwn] = Regexp.last_match(2)
 441         when "PD Type" then disk[:interface] = Regexp.last_match(2)
 442         when "Raw Size" then disk[:size] = memory_to_disk_size(Regexp.last_match(2).sub(/\s*\[.*\]$/, ""))
 443         when "Inquiry Data" then disk[:vendor], disk[:model], disk[:serial_number] = Regexp.last_match(2).split
 444         end
 445       elsif array && line =~ /^(\S.*\S)\s*:\s+(\S.*)$/
 446         case Regexp.last_match(1)
 447         when "RAID Level" then array[:raid_level] = Regexp.last_match(2).scan(/Primary-(\d+)/).first.first
 448         when "Size" then array[:size] = Regexp.last_match(2)
 449         end
 450       end
 451     end
 452
 453     IO.popen(%w(megacli -PDList -aAll -NoLog)).each do |line|
 454       if line =~ /^Adapter #(\d+)$/
 455         controller = controllers[Regexp.last_match(1).to_i]
 456       elsif controller && line =~ /^Enclosure Device ID: \d+$/
 457         disk = {
 458           :controller => controller[:id]
 459         }
 460       elsif disk && line =~ /^WWN:\s+(\S+)$/
 461         unless devices[:disks].find { |d| d[:wwn] == Regexp.last_match(1) }
 462           disk[:id] = devices[:disks].count
 463           disk[:wwn] = Regexp.last_match(1)
 464
 465           devices[:disks] << disk
 466         end
 467       elsif disk && line =~ /^(\S.*\S)\s*:\s+(\S.*)$/
 468         case Regexp.last_match(1)
 469         when "Device Id" then disk[:smart_device] = "megaraid,#{Regexp.last_match(2)}"
 470         when "WWN" then disk[:wwn] = Regexp.last_match(2)
 471         when "PD Type" then disk[:interface] = Regexp.last_match(2)
 472         when "Raw Size" then disk[:size] = memory_to_disk_size(Regexp.last_match(2).sub(/\s*\[.*\]$/, ""))
 473         when "Inquiry Data" then disk[:vendor], disk[:model], disk[:serial_number] = Regexp.last_match(2).split
 474         end
 475       end
 476     end
 477
 478     controllers.each do |controller|
 479       if device = Dir.glob("/sys/bus/pci/devices/#{controller[:pci_slot]}/host*/target*:2:0/*/scsi_generic/sg*").first
 480         controller[:device] = "/dev/#{File.basename(device)}"
 481       end
 482     end
 483   end
 484
 485   def find_mpt_disks(devices)
 486     controllers = []
 487
 488     IO.popen(%w(sas2ircu list)).each do |line|
 489       next unless line =~ /^\s+(\d+)\s+(\S+)\s+\h+h\s+\h+h\s+(\S+)\s+\h+h\s+\h+h\s*$/
 490       controllers[Regexp.last_match(1).to_i] = {
 491         :id => devices[:controllers].count,
 492         :model => Regexp.last_match(2),
 493         :pci_slot => Regexp.last_match(3).sub(/^(\h{2})h:(\h{2})h:(\h{2})h:0(\h)h$/, "00\\1:\\2:\\3.\\4"),
 494         :arrays => [],
 495         :disks => []
 496       }
 497
 498       devices[:controllers] << controllers[Regexp.last_match(1).to_i]
 499     end
 500
 501     controllers.each_with_index do |controller, index|
 502       arrays = []
 503       disks = []
 504
 505       array = nil
 506       disk = nil
 507
 508       IO.popen(["sas2ircu", index.to_s, "display"]).each do |line|
 509         if line =~ /^IR volume (\d+)$/
 510           array = {
 511             :id => devices[:arrays].count,
 512             :controller => controller[:id],
 513             :number => Regexp.last_match(1),
 514             :disks => []
 515           }
 516
 517           devices[:arrays] << array
 518           controller[:arrays] << array[:id]
 519
 520           arrays << array
 521         elsif line =~ /^Device is a Hard disk$/
 522           disk = {
 523             :id => devices[:disks].count,
 524             :controller => controller[:id],
 525             :arrays => []
 526           }
 527
 528           devices[:disks] << disk
 529           controller[:disks] << disk[:id]
 530
 531           disks << disk
 532         elsif disk && line =~ /^  (\S.*\S)\s+:\s+(.*\S)\s*$/
 533           case Regexp.last_match(1)
 534           when "Enclosure #" then disk[:location] = Regexp.last_match(2)
 535           when "Slot #" then disk[:location] = "#{disk[:location]}:#{Regexp.last_match(2)}"
 536           when "SAS Address" then disk[:device] = find_sas_device(Regexp.last_match(2).tr("-", ""))
 537           when "Size (in MB)/(in sectors)" then disk[:size] = memory_to_disk_size("#{Regexp.last_match(2).split('/').first} MB")
 538           when "Manufacturer" then disk[:vendor] = Regexp.last_match(2)
 539           when "Model Number" then disk[:model] = Regexp.last_match(2)
 540           when "Firmware Revision" then disk[:firmware_version] = Regexp.last_match(2)
 541           when "Serial Number" then disk[:serial_number] = Regexp.last_match(2)
 542           when "Protocol" then disk[:interface] = Regexp.last_match(2)
 543           end
 544         elsif array && line =~ /^  PHY\[\d+\] Enclosure#\/Slot#\s+:\s+(\d+:\d+)\s*$/
 545           array[:disks] << Regexp.last_match(1)
 546         elsif array && line =~ /^  (\S.*\S)\s+:\s+(.*\S)\s*$/
 547           case Regexp.last_match(1)
 548           when "Volume wwid" then array[:device] = find_sas_device(Regexp.last_match(2))
 549           when "RAID level" then array[:raid_level] = Regexp.last_match(2).sub(/^RAID/, "")
 550           when "Size (in MB)" then array[:size] = "#{Regexp.last_match(2)} MB"
 551           end
 552         elsif line =~ /^  (\S.*\S)\s+:\s+(.*\S)\s*$/
 553           case Regexp.last_match(1)
 554           when "BIOS version" then controller[:bios_version] = Regexp.last_match(2)
 555           when "Firmware version" then controller[:firmware_version] = Regexp.last_match(2)
 556           end
 557         end
 558       end
 559
 560       arrays.each do |array|
 561         array[:disks].map! do |location|
 562           disk = disks.find { |disk| disk[:location] == location }
 563
 564           disk[:arrays] << array[:id]
 565           disk[:id]
 566         end
 567       end
 568     end
 569   end
 570
 571   def find_adaptec_disks(devices)
 572     controller_count = IO.popen(%w(arcconf getconfig 0)).first.scan(/^Controllers found: (\d+)$/).first.first.to_i
 573
 574     1.upto(controller_count).each do |controller_number|
 575       controller = {
 576         :id => devices[:controllers].count,
 577         :number => controller_number,
 578         :arrays => [],
 579         :disks => []
 580       }
 581
 582       devices[:controllers] << controller
 583
 584       arrays = []
 585       disks = []
 586
 587       array = nil
 588       disk = nil
 589
 590       IO.popen(["arcconf", "getconfig", controller_number.to_s]).each do |line|
 591         if line =~ /^Logical device number (\d+)$/
 592           array = {
 593             :id => devices[:arrays].count,
 594             :controller => controller[:id],
 595             :number => Regexp.last_match(1).to_i,
 596             :disks => []
 597           }
 598
 599           devices[:arrays] << array
 600           controller[:arrays] << array[:id]
 601
 602           arrays << array
 603         elsif line =~ /^      Device #(\d+)$/
 604           disk = nil
 605         elsif line =~ /^         Device is a Hard drive$/
 606           disk = {
 607             :id => devices[:disks].count,
 608             :controller => controller[:id],
 609             :arrays => []
 610           }
 611
 612           devices[:disks] << disk
 613           controller[:disks] << disk[:id]
 614
 615           disks << disk
 616         elsif disk && line =~ /^         Reported Channel,Device\(T:L\)\s*:\s+(\d+),(\d+)\(\d+:0\)\s*$/
 617           disk[:channel_number] = Regexp.last_match(1)
 618           disk[:device_number] = Regexp.last_match(1)
 619         elsif disk && line =~ /^         (\S.*\S)\s*:\s+(\S.*\S)\s*$/
 620           case Regexp.last_match(1)
 621           when "Reported Location" then disk[:location] = Regexp.last_match(2)
 622           when "Vendor" then disk[:vendor] = Regexp.last_match(2)
 623           when "Model" then disk[:model] = Regexp.last_match(2)
 624           when "Firmware" then disk[:firmware_version] = Regexp.last_match(2)
 625           when "Serial" then disk[:serial_number] = Regexp.last_match(2)
 626           when "World-wide name" then disk[:wwn] = Regexp.last_match(2)
 627           when "Total Size" then disk[:size] = memory_to_disk_size(Regexp.last_match(2))
 628           when "Size" then disk[:size] = memory_to_disk_size(Regexp.last_match(2))
 629           end
 630         elsif array && line =~ / Present \(Controller:\d+,((?:Connector|Enclosure):\d+,(?:Device|Slot):\d+)\) /
 631           array[:disks] << Regexp.last_match(1).tr(":", " ").gsub(",", ", ")
 632         elsif array && line =~ /^   (\S.*\S)\s*:\s+(\S.*\S)\s*$/
 633           case Regexp.last_match(1)
 634           when "RAID level" then array[:raid_level] = Regexp.last_match(2)
 635           when "Size" then array[:size] = memory_to_disk_size(Regexp.last_match(2))
 636           end
 637         elsif line =~ /^   (\S.*\S)\s*:\s+(\S.*\S)\s*$/
 638           case Regexp.last_match(1)
 639           when "Controller Model" then controller[:model] = Regexp.last_match(2)
 640           when "Controller Serial Number" then controller[:serial_number] = Regexp.last_match(2)
 641           when "Controller World Wide Name" then controller[:wwn] = Regexp.last_match(2)
 642           when "BIOS" then controller[:bios_version] = Regexp.last_match(2)
 643           when "Firmware" then controller[:firmware_version] = Regexp.last_match(2)
 644           end
 645         end
 646       end
 647
 648       host = Dir.glob("/sys/class/scsi_host/host*").find do |host|
 649         read_sysctl_file("#{host}/serial_number") == controller[:serial_number]
 650       end
 651
 652       arrays.each do |array|
 653         array_number = array[:number]
 654         device = Dir.glob("#{host}/device/target*:0:#{array_number}/*:0:#{array_number}:0/block/*").first
 655
 656         array[:device] = "/dev/#{File.basename(device)}"
 657
 658         array[:disks].map! do |location|
 659           disk = disks.find { |disk| disk[:location] == location }
 660
 661           device_number = disk[:device_number]
 662           device = Dir.glob("#{host}/device/target*:1:#{device_number}/*:1:#{device_number}:0/scsi_generic/*").first
 663
 664           disk[:device] = "/dev/#{File.basename(device)}"
 665
 666           disk[:arrays] << array[:id]
 667           disk[:id]
 668         end
 669       end
 670     end
 671   end
 672
 673   def find_areca_disks(devices)
 674     controller = {
 675       :id => devices[:controllers].count,
 676       :arrays => [],
 677       :disks => []
 678     }
 679
 680     devices[:controllers] << controller
 681
 682     IO.popen(%w(/opt/areca/x86_64/cli64 sys info)).each do |line|
 683       next unless line =~ /^(\S.*\S)\s+:\s+(.*\S)\s*$/
 684
 685       case Regexp.last_match(1)
 686       when "Firmware Version" then controller[:firmware_version] = Regexp.last_match(2)
 687       when "BOOT ROM Version" then controller[:bios_version] = Regexp.last_match(2)
 688       when "Serial Number" then controller[:serial_number] = Regexp.last_match(2)
 689       when "Controller Name" then controller[:model] = Regexp.last_match(2)
 690       end
 691     end
 692
 693     path = Dir.glob("/sys/bus/pci/devices/*/host*/scsi_host/host*/host_fw_model").find do |file|
 694       read_sysctl_file(file) == controller[:model]
 695     end
 696
 697     controller[:pci_slot] = File.basename(File.expand_path("#{path}/../../../.."))
 698     controller[:device] = File.basename(Dir.glob(File.expand_path("#{path}/../../../target0:0:16/0:0:16:0/scsi_generic/*")).first)
 699
 700     arrays = []
 701
 702     IO.popen(%w(/opt/areca/x86_64/cli64 vsf info)).each do |line|
 703       next unless line =~ /^\s+(\d+)\s+/
 704       array = {
 705         :id => devices[:arrays].count,
 706         :number => Regexp.last_match(1),
 707         :controller => controller[:id],
 708         :disks => []
 709       }
 710
 711       devices[:arrays] << array
 712       controller[:arrays] << array[:id]
 713
 714       arrays << array
 715     end
 716
 717     arrays.each do |array|
 718       IO.popen(["/opt/areca/x86_64/cli64", "vsf", "info", "vol=#{array[:number]}"]).each do |line|
 719         if line =~ /^SCSI Ch\/Id\/Lun\s+:\s+(\d+)\/(\d+)\/(\d+)\s*$/
 720           pci_slot = controller[:pci_slot]
 721           channel = Regexp.last_match(1).to_i
 722           id = Regexp.last_match(2).to_i
 723           lun = Regexp.last_match(3).to_i
 724
 725           device = Dir.glob("/sys/bus/pci/devices/#{pci_slot}/host*/target*:0:0/0:#{channel}:#{id}:#{lun}/block/*").first
 726
 727           array[:device] = "/dev/#{File.basename(device)}"
 728         elsif line =~ /^(\S.*\S)\s+:\s+(.*\S)\s*$/
 729           case Regexp.last_match(1)
 730           when "Volume Set Name" then array[:volume_set] = Regexp.last_match(2)
 731           when "Raid Set Name" then array[:raid_set] = Regexp.last_match(2)
 732           when "Volume Capacity" then array[:size] = format_disk_size(Regexp.last_match(2).to_f * 1000 * 1000)
 733           when "Raid Level" then array[:raid_level] = Regexp.last_match(2).sub(/^Raid/, "")
 734           end
 735         end
 736       end
 737     end
 738
 739     disks = []
 740
 741     IO.popen(%w(/opt/areca/x86_64/cli64 disk info)).each do |line|
 742       next unless line =~ /^\s+(\d+)\s+.*\s+\d+\.\d+GB\s+(\S.*\S)\s*$/
 743       next if Regexp.last_match(2) == "N.A."
 744
 745       disk = {
 746         :id => devices[:disks].count,
 747         :number => Regexp.last_match(1),
 748         :controller => controller[:id],
 749         :arrays => []
 750       }
 751
 752       devices[:disks] << disk
 753       controller[:disks] << disk[:id]
 754
 755       if array = arrays.find { |array| array[:raid_set] == Regexp.last_match(2) }
 756         disk[:arrays] << array[:id]
 757         array[:disks] << disk[:id]
 758       end
 759
 760       disks << disk
 761     end
 762
 763     disks.each do |disk|
 764       IO.popen(["/opt/areca/x86_64/cli64", "disk", "info", "drv=#{disk[:number]}"]).each do |line|
 765         if line =~ /^IDE Channel\s+:\s+(\d+)\s*$/i
 766           disk[:smart_device] = "areca,#{Regexp.last_match(1)}"
 767         elsif line =~ /^Device Location\s+:\s+Enclosure#(\d+) Slot#?\s*0*(\d+)\s*$/i
 768           disk[:smart_device] = "areca,#{Regexp.last_match(2)}/#{Regexp.last_match(1)}"
 769         elsif line =~ /^(\S.*\S)\s+:\s+(.*\S)\s*$/
 770           case Regexp.last_match(1)
 771           when "Model Name" then disk[:vendor], disk[:model] = Regexp.last_match(2).split
 772           when "Serial Number" then disk[:serial_number] = Regexp.last_match(2)
 773           when "Disk Capacity" then disk[:size] = format_disk_size(Regexp.last_match(2).to_f * 1000 * 1000)
 774           end
 775         end
 776       end
 777     end
 778   end
 779
 780   def lvm_devices
 781     {
 782       :pvs => find_lvm_pvs,
 783       :vgs => find_lvm_vgs,
 784       :lvs => find_lvm_lvs
 785     }
 786   end
 787
 788   def find_lvm_pvs
 789     IO.popen(["pvdisplay", "-c"]).each_with_object({}) do |line, pvs|
 790       fields = line.strip.split(":")
 791
 792       pvs[fields[0]] = {
 793         :vg => fields[1],
 794         :pv_size => fields[2],
 795         :pv_status => fields[4],
 796         :pe_size => fields[7],
 797         :pe_total => fields[8],
 798         :pe_free => fields[9],
 799         :pe_allocated => fields[10],
 800         :pv_uuid => fields[11]
 801       }
 802     end
 803   end
 804
 805   def find_lvm_vgs
 806     IO.popen(["vgdisplay", "-c"]).each_with_object({}) do |line, vgs|
 807       fields = line.strip.split(":")
 808
 809       vgs[fields[0]] = {
 810         :vg_access => fields[1],
 811         :vg_status => fields[2],
 812         :lv_maximum => fields[4],
 813         :lv_count => fields[5],
 814         :lv_open => fields[6],
 815         :pv_maximum => fields[8],
 816         :pv_current => fields[9],
 817         :pv_actual => fields[10],
 818         :vg_size => fields[11],
 819         :pe_size => fields[12],
 820         :pe_total => fields[13],
 821         :pe_allocated => fields[14],
 822         :pe_free => fields[15],
 823         :vg_uuid => fields[16]
 824       }
 825     end
 826   end
 827
 828   def find_lvm_lvs
 829     IO.popen(["lvdisplay", "-c"]).each_with_object({}) do |line, lvs|
 830       fields = line.strip.split(":")
 831
 832       lvs[fields[0]] = {
 833         :vg => fields[1],
 834         :lv_access => fields[2],
 835         :lv_status => fields[3],
 836         :lv_open => fields[5],
 837         :lv_size => fields[6],
 838         :le_count => fields[7],
 839         :lv_minor => fields[11],
 840         :lv_major => fields[12]
 841       }
 842     end
 843   end
 844
 845   def psu_devices
 846     device = nil
 847
 848     IO.popen(["dmidecode", "-t", "39"]).each_with_object([]) do |line, devices|
 849       if line =~ /^System Power Supply\s*$/
 850         device = {}
 851       elsif device && line =~ /^\s+([A-Z ]+):\s+(.*)\s*$/i
 852         device[Regexp.last_match(1).tr(" ", "_").downcase.to_sym] = Regexp.last_match(2).strip
 853       elsif device && line =~ /^\s*$/
 854         devices << device
 855         device = nil
 856       end
 857     end
 858   end
 859
 860   def mc_device
 861     device = {}
 862
 863     IO.popen(["ipmitool", "mc", "info"]).each_with_object([]) do |line, devices|
 864       if line =~ /(Manufacturer [A-Z ]+[A-Z])\s*:\s+(.*\S)\s+\(.*\)\s*$/i
 865         device[Regexp.last_match(1).tr(" ", "_").downcase.to_sym] = Regexp.last_match(2)
 866       elsif line =~ /(Product [A-Z ]+[A-Z])\s*:\s+(.*\S)\s+\(.*\)\s*$/i
 867         device[Regexp.last_match(1).tr(" ", "_").downcase.to_sym] = Regexp.last_match(2)
 868       elsif line =~ /([A-Z ]+[A-Z])\s*:\s+(.*\S)\s*$/i
 869         device[Regexp.last_match(1).tr(" ", "_").downcase.to_sym] = Regexp.last_match(2)
 870       end
 871     end
 872
 873     IO.popen(["ipmitool", "mc", "guid"]).each_with_object([]) do |line, devices|
 874       if line =~ /^System GUID\s*:\s+(\S+)\s*$/
 875         device[:system_guid] = Regexp.last_match(1)
 876       end
 877     end
 878
 879     device
 880   end
 881
 882   collect_data(:default) do
 883     hardware Mash.new
 884
 885     hardware[:pci] = pci_devices
 886     hardware[:network] = network_devices
 887     hardware[:memory] = memory_devices
 888     hardware[:disk] = disk_devices
 889     hardware[:lvm] = lvm_devices
 890     hardware[:psu] = psu_devices
 891     hardware[:mc] = mc_device
 892   end
 893 end