]> git.openstreetmap.org Git - chef.git/blob - cookbooks/hardware/templates/default/ohai.rb.erb
Merge remote-tracking branch 'github/pull/570'
[chef.git] / 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, Errno::ENOTDIR
9   end
10
11   def read_sysctl_file(file)
12     IO.read(file).strip
13   rescue Errno::ENOENT, Errno::ENOTDIR, 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/ssacli")
152     find_megaraid_disks(disk) if File.exist?("/usr/sbin/megacli")
153     find_mpt1_disks(disk) if File.exist?("/usr/sbin/lsiutil")
154     find_mpt2_disks(disk) if File.exist?("/usr/sbin/sas2ircu")
155     find_adaptec_disks(disk) if File.exist?("/usr/sbin/arcconf")
156     find_areca_disks(disk) if File.exist?("/opt/areca/x86_64/cli64")
157
158     find_md_arrays(disk)
159
160     disk[:disks].each do |disk|
161       if disk[:vendor] =~ /^(BTWA|CVPR|PHDV)/ && disk[:model] == "INTEL"
162         disk[:model] = disk[:serial_number]
163         disk[:serial_number] = disk[:vendor]
164         disk[:vendor] = "INTEL"
165       end
166
167       if disk[:vendor].nil? && disk[:model] =~ /^ATA\s+(.*)$/
168         disk[:vendor] = "ATA"
169         disk[:model] = Regexp.last_match(1)
170       end
171
172       if disk[:vendor].nil? || disk[:vendor] == "ATA"
173         if disk[:model] =~ /^(\S+)\s+(.*)$/
174           disk[:vendor] = Regexp.last_match(1)
175           disk[:model] = Regexp.last_match(2)
176         elsif disk[:model] =~ /^ST/
177           disk[:vendor] = "SEAGATE"
178         elsif disk[:model] =~ /^C300-(.*)$/
179           disk[:vendor] = "CRUCIAL"
180           disk[:model] = Regexp.last_match(1)
181         end
182       end
183
184       disk[:model].sub!(/-.*$/, "") if disk[:model]
185     end
186
187     disk
188   end
189
190   def find_direct_disks(devices)
191     Dir.glob("/sys/class/scsi_host/host*") do |host|
192       driver = read_sysctl_file("#{host}/proc_name")
193
194       if %w(ahci mptsas sata_mv sata_nv).include?(driver)
195         bus = host.sub("/sys/class/scsi_host/host", "")
196
197         Dir.glob("/sys/bus/scsi/devices/#{bus}:0:*").each do |device|
198           next unless File.exist?("#{device}/scsi_disk")
199
200           block = Dir.glob("#{device}/block/*").first
201           size = read_sysctl_file("#{block}/size").to_f / 2
202
203           devices[:disks] << {
204             :id => devices[:disks].count,
205             :device => "/dev/#{File.basename(block)}",
206             :vendor => read_sysctl_file("#{device}/vendor"),
207             :model => read_sysctl_file("#{device}/model"),
208             :firmware_version => read_sysctl_file("#{device}/rev"),
209             :size => format_disk_size(size),
210             :arrays => []
211           }
212         end
213       end
214     end
215   end
216
217   def find_nvme_disks(devices)
218     Dir.glob("/sys/class/nvme/nvme*") do |device|
219       controller = {
220         :id => devices[:controllers].count,
221         :pci_slot => File.basename(Pathname.new("#{device}/device").realpath),
222         :arrays => [],
223         :disks => []
224       }
225
226       devices[:controllers] << controller
227
228       IO.popen(["lspci", "-Dkvmm", "-s", controller[:pci_slot]]).each do |line|
229         if line =~ /^SVendor:\s+(\S.*\S)\s*$/
230           controller[:vendor] = Regexp.last_match(1)
231         elsif line =~ /^SDevice:\s+(\S.*\S)\s*$/
232           controller[:model] = Regexp.last_match(1)
233         end
234       end
235
236       Dir.glob("#{device}/nvme*").each do |block|
237         size = read_sysctl_file("#{block}/size").to_f / 2
238
239         disk = {
240           :id => devices[:disks].count,
241           :controller => controller[:id],
242           :device => "/dev/#{File.basename(block)}",
243           :vendor => controller[:vendor],
244           :model => controller[:model],
245           :size => format_disk_size(size),
246           :arrays => []
247         }
248
249         devices[:disks] << disk
250         controller[:disks] << disk[:id]
251       end
252     end
253   end
254
255   def find_md_arrays(devices)
256     array = nil
257
258     File.new("/proc/mdstat", "r").each do |line|
259       if line =~ /^(md\d+) : active raid(\d+)((?: (?:sd[a-z]\d*|nvme\d+n\d+(?:p\d+)?)\[\d+\](?:\([A-Z]\))*)+)$/
260         array = {
261           :id => devices[:arrays].count,
262           :device => "/dev/#{Regexp.last_match(1)}",
263           :status => "optimal",
264           :raid_level => Regexp.last_match(2),
265           :disks => []
266         }
267
268         Regexp.last_match(3).split(" ").each do |member|
269           if member =~ /^(sd[a-z]+|nvme\d+n\d+).*/
270             device = Regexp.last_match(1)
271
272             if disk = devices[:disks].find { |d| d[:device] == "/dev/#{device}" }
273               if member =~ /\(F\)/
274                 disk[:status] = "failed"
275               elsif member =~ /\(S\)/
276                 disk[:status] = "hotspare"
277               else
278                 disk[:status] = "online"
279               end
280
281               disk[:arrays] << array[:id]
282               array[:disks] << disk[:id]
283             end
284           end
285         end
286
287         devices[:arrays] << array
288       elsif array && line =~ /^\s+(\d+) blocks.*(?:\[([U_]+)\])?/
289         array[:size] = format_disk_size(Regexp.last_match(1).to_i)
290         array[:status] = "degraded" if Regexp.last_match(2) =~ /_/
291       elsif array && line =~ /^\s+\[.*\]\s+(\S+)\s+=/
292         case Regexp.last_match(1)
293         when "recovery" then array[:status] = "rebuilding"
294         when "resync" then array[:status] = "rebuilding"
295         when "checking" then array[:status] = "checking"
296         end
297       end
298     end
299   end
300
301   def find_hp_disks(devices)
302     controllers = []
303     disks = []
304
305     controller = nil
306     array = nil
307     disk = nil
308
309     IO.popen(%w(ssacli controller all show config detail)).each do |line|
310       next unless line.valid_encoding?
311
312       if line =~ /^Smart (?:Array|HBA) (\S+) /
313         controller = {
314           :id => devices[:controllers].count,
315           :type => "hp",
316           :model => Regexp.last_match(1),
317           :arrays => [],
318           :disks => []
319         }
320
321         devices[:controllers] << controller
322
323         controllers << controller
324
325         array = nil
326         disk = nil
327       elsif controller && line =~ /^   (\S.*):\s+(.*)$/
328         case Regexp.last_match(1)
329         when "Slot" then controller[:slot] = Regexp.last_match(2)
330         when "Serial Number" then controller[:serial_number] = Regexp.last_match(2)
331         when "Hardware Revision" then controller[:hardware_version] = Regexp.last_match(2)
332         when "Firmware Version" then controller[:firmware_version] = Regexp.last_match(2)
333         when "PCI Address (Domain:Bus:Device.Function)" then controller[:pci_slot] = Regexp.last_match(2)
334         end
335       elsif controller && line =~ /^      Logical Drive: (\d+)$/
336         array = {
337           :id => devices[:arrays].count,
338           :controller => controller[:id],
339           :number => Regexp.last_match(1),
340           :disks => []
341         }
342
343         devices[:arrays] << array
344         controller[:arrays] << array[:id]
345
346         disk = nil
347       elsif array && line =~ /^      physicaldrive (\S+)$/
348         disk = {
349           :id => devices[:disks].count,
350           :controller => controller[:id],
351           :arrays => [array[:id]],
352           :location => Regexp.last_match(1)
353         }
354
355         devices[:disks] << disk
356         controller[:disks] << disk[:id]
357         array[:disks] << disk[:id]
358       elsif disk && line =~ /^         (\S[^:]+):\s+(.*\S)\s*$/
359         case Regexp.last_match(1)
360         when "Status" then disk[:status] = Regexp.last_match(2)
361         when "Drive Type" then disk[:drive_type] = Regexp.last_match(2)
362         when "Interface Type" then disk[:interface] = Regexp.last_match(2)
363         when "Size" then disk[:size] = Regexp.last_match(2)
364         when "Rotational Speed" then disk[:rpm] = Regexp.last_match(2)
365         when "Firmware Revision" then disk[:firmware_version] = Regexp.last_match(2)
366         when "Serial Number" then disk[:serial_number] = Regexp.last_match(2)
367         when "Model" then disk[:model] = Regexp.last_match(2)
368         end
369       elsif array && line =~ /^         Status:\s+(.*\S)\s*$/
370         case Regexp.last_match(1)
371         when "OK" then array[:status] = "optimal"
372         when "Interim Recovery Mode" then array[:status] = "degraded"
373         else array[:status] = "unknown"
374         end
375       elsif array && line =~ /^         (\S[^:]+):\s+(.*\S)\s*$/
376         case Regexp.last_match(1)
377         when "Size" then array[:size] = Regexp.last_match(2)
378         when "Fault Tolerance" then array[:raid_level] = Regexp.last_match(2)
379         when "Status" then array[:status] = Regexp.last_match(2)
380         when "Disk Name" then array[:device] = Regexp.last_match(2).strip
381         when "Mount Points" then array[:mount_point] = Regexp.last_match(2).split.first
382         when "Unique Identifier" then array[:wwn] = Regexp.last_match(2)
383         end
384       end
385     end
386
387     controllers.each do |controller|
388       slot = controller[:slot]
389
390       IO.popen(%W(ssacli controller slot=#{slot} pd all show status)).each do |line|
391         if line =~ /^   physicaldrive (\S+) /
392           disks << Regexp.last_match(1)
393         end
394       end
395
396       if device = Dir.glob("/sys/bus/pci/devices/#{controller[:pci_slot]}/cciss*").first
397         controller[:device] = File.basename(device).sub(/^cciss(\d+)$/, "/dev/cciss/c\\1d0")
398       elsif device = Dir.glob("/sys/bus/pci/devices/#{controller[:pci_slot]}/host*/target*:3:0/*:3:0:0/scsi_generic/sg*").first
399         controller[:device] = "/dev/#{File.basename(device)}"
400       elsif device = Dir.glob("/sys/bus/pci/devices/#{controller[:pci_slot]}/host*/target*:1:0/*:1:0:*/scsi_generic/sg*").first
401         controller[:device] = "/dev/#{File.basename(device)}"
402       end
403     end
404
405     devices[:disks].each do |disk|
406       controller = disk[:controller]
407
408       next unless devices[:controllers][controller][:type] == "hp"
409
410       disk[:smart_device] = "cciss,#{disks.find_index(disk[:location])}"
411
412       if disk[:status] == "Failed"
413         disk[:status] = "failed"
414       elsif disk[:status] == "Predictive Failure"
415         disk[:status] = "failed"
416       elsif disk[:status] == "OK" && disk[:drive_type] == "Data Drive"
417         disk[:status] = "online"
418       elsif disk[:status] == "OK" && disk[:drive_type] == "Spare Drive"
419         disk[:status] = "hotspare"
420       elsif disk[:drive_type] == "Unassigned Drive"
421         disk[:status] = "unconfigured"
422       else
423         disk[:status] = "unknown"
424       end
425
426       disk.delete(:drive_type)
427     end
428   end
429
430   def find_megaraid_disks(devices)
431     controllers = []
432     arrays = []
433     disks = []
434
435     controller = nil
436     array = nil
437     disk = nil
438
439     IO.popen(%w(megacli -AdpGetPciInfo -aAll -NoLog)).each do |line|
440       if line =~ /^PCI information for Controller (\d+)$/
441         controller = {
442           :id => devices[:controllers].count,
443           :type => "megaraid",
444           :arrays => [],
445           :disks => []
446         }
447
448         devices[:controllers] << controller
449
450         controllers << controller
451       elsif line =~ /^Bus Number\s+:\s+([0-9a-f]+)$/i
452         controller[:pci_slot] = format "0000:%02x", Integer("0x#{Regexp.last_match(1)}")
453       elsif line =~ /^Device Number\s+:\s+([0-9a-f]+)$/i
454         controller[:pci_slot] = format "%s:%02x", controller[:pci_slot], Integer("0x#{Regexp.last_match(1)}")
455       elsif line =~ /^Function Number\s+:\s+([0-9a-f]+)$/i
456         controller[:pci_slot] = format "%s.%01x", controller[:pci_slot], Integer("0x#{Regexp.last_match(1)}")
457       end
458     end
459
460     IO.popen(%w(megacli -AdpAllInfo -aAll -NoLog)).each do |line|
461       if line =~ /^Adapter #(\d+)$/
462         controller = controllers[Regexp.last_match(1).to_i]
463       elsif line =~ /^(\S.*\S)\s*:\s+(\S.*)$/
464         case Regexp.last_match(1)
465         when "Product Name" then controller[:model] = Regexp.last_match(2)
466         when "Serial No" then controller[:serial_number] = Regexp.last_match(2)
467         when "FW Package Build" then controller[:firmware_version] = Regexp.last_match(2)
468         end
469       end
470     end
471
472     IO.popen(%w(megacli -LdPdInfo -aAll -NoLog)).each do |line|
473       if line =~ /^Adapter #(\d+)$/
474         controller = controllers[Regexp.last_match(1).to_i]
475       elsif controller && line =~ /^Virtual Drive: (\d+) \(Target Id: (\d+)\)$/
476         pci_slot = controller[:pci_slot]
477         target = Regexp.last_match(2)
478         device = Dir.glob("/sys/bus/pci/devices/#{pci_slot}/host*/target*:2:#{target}/*:2:#{target}:0/block/*").first
479
480         array = {
481           :id => devices[:arrays].count,
482           :controller => controller[:id],
483           :number => Regexp.last_match(1),
484           :device => "/dev/#{File.basename(device)}",
485           :disks => []
486         }
487
488         devices[:arrays] << array
489         controller[:arrays] << array[:id]
490
491         arrays << array
492
493         disk = nil
494       elsif array && line =~ /^PD: (\d+) Information$/
495         disk = {
496           :id => devices[:disks].count,
497           :controller => controller[:id],
498           :arrays => [array[:id]]
499         }
500
501         devices[:disks] << disk
502         controller[:disks] << disk[:id]
503         array[:disks] << disk[:id]
504
505         disks << disk
506       elsif disk && line =~ /^Firmware state:\s+(\S.*)$/
507         status, state = Regexp.last_match(1).split(/,\s*/)
508         case status
509         when "Unconfigured(good)" then disk[:status] = "unconfigured"
510         when "Unconfigured(bad)" then disk[:status] = "unconfigured"
511         when "Hotspare" then disk[:status] = "hotspare"
512         when "Offline" then disk[:status] = "offline"
513         when "Online" then disk[:status] = "online"
514         when "Rebuild" then disk[:status] = "rebuilding"
515         when "Failed" then disk[:status] = "failed"
516         when "Copyback" then disk[:status] = "rebuilding"
517         else disk[:status] = "unknown"
518         end
519         case state
520         when "Spun Up" then disk[:state] = "spun_up"
521         when "Spun down" then disk[:state] = "spun_down"
522         else disk[:state] = "unknown"
523         end
524       elsif disk && line =~ /^(\S.*\S)\s*:\s+(\S.*)$/
525         case Regexp.last_match(1)
526         when "Device Id" then disk[:device_id] = Regexp.last_match(2)
527         when "WWN" then disk[:wwn] = Regexp.last_match(2)
528         when "PD Type" then disk[:interface] = Regexp.last_match(2)
529         when "Raw Size" then disk[:size] = memory_to_disk_size(Regexp.last_match(2).sub(/\s*\[.*\]$/, ""))
530         when "Inquiry Data" then disk[:vendor], disk[:model], disk[:serial_number] = Regexp.last_match(2).split
531         end
532       elsif array && line =~ /^State\s*:\s+(.*\S)\s*$/
533         case Regexp.last_match(1)
534         when "Partially Degraded" then array[:status] = "degraded"
535         when "Degraded" then array[:status] = "degraded"
536         when "Optimal" then array[:status] = "optimal"
537         when "Consistency Check" then array[:status] = "checking"
538         when "Background Initialization" then array[:status] = "initialising"
539         when "Initialization" then array[:status] = "initialising"
540         when "Reconstruction" then array[:status] = "rebuilding"
541         else array[:status] = "unknown"
542         end
543       elsif array && line =~ /^(\S.*\S)\s*:\s+(\S.*)$/
544         case Regexp.last_match(1)
545         when "RAID Level" then array[:raid_level] = Regexp.last_match(2).scan(/Primary-(\d+)/).first.first
546         when "Size" then array[:size] = Regexp.last_match(2)
547         end
548       end
549     end
550
551     IO.popen(%w(megacli -PDList -aAll -NoLog)).each do |line|
552       if line =~ /^Adapter #(\d+)$/
553         controller = controllers[Regexp.last_match(1).to_i]
554       elsif controller && line =~ /^Enclosure Device ID: \d+$/
555         disk = {
556           :controller => controller[:id],
557           :arrays => []
558         }
559       elsif disk && line =~ /^WWN:\s+(\S+)$/
560         unless devices[:disks].find { |d| d[:wwn] == Regexp.last_match(1) }
561           disk[:id] = devices[:disks].count
562           disk[:wwn] = Regexp.last_match(1)
563
564           devices[:disks] << disk
565
566           disks << disk
567         end
568       elsif disk && line =~ /^Firmware state:\s+(\S.*)$/
569         status, state = Regexp.last_match(1).split(/,\s*/)
570         case status
571         when "Unconfigured(good)" then disk[:status] = "unconfigured"
572         when "Unconfigured(bad)" then disk[:status] = "unconfigured"
573         when "Hotspare" then disk[:status] = "hotspare"
574         when "Offline" then disk[:status] = "offline"
575         when "Online" then disk[:status] = "online"
576         when "Rebuild" then disk[:status] = "rebuilding"
577         when "Failed" then disk[:status] = "failed"
578         when "Copyback" then disk[:status] = "rebuilding"
579         else disk[:status] = "unknown"
580         end
581         case state
582         when "Spun Up" then disk[:state] = "spun_up"
583         when "Spun down" then disk[:state] = "spun_down"
584         else disk[:state] = "unknown"
585         end
586       elsif disk && line =~ /^(\S.*\S)\s*:\s+(\S.*)$/
587         case Regexp.last_match(1)
588         when "Device Id" then disk[:device_id] = Regexp.last_match(2)
589         when "PD Type" then disk[:interface] = Regexp.last_match(2)
590         when "Raw Size" then disk[:size] = memory_to_disk_size(Regexp.last_match(2).sub(/\s*\[.*\]$/, ""))
591         when "Inquiry Data" then disk[:vendor], disk[:model], disk[:serial_number] = Regexp.last_match(2).split
592         end
593       end
594     end
595
596     controllers.each do |controller|
597       if device = Dir.glob("/sys/bus/pci/devices/#{controller[:pci_slot]}/host*/target*:2:0/*/scsi_generic/sg*").first
598         controller[:device] = "/dev/#{File.basename(device)}"
599       end
600     end
601
602     disks.each do |disk|
603       controller = devices[:controllers][disk[:controller]]
604
605       if id = disk.delete(:device_id)
606         if device = Dir.glob("/sys/bus/pci/devices/#{controller[:pci_slot]}/host*/target0:0:#{id}/0:0:#{id}:0/block/sd*").first
607           disk[:device] = "/dev/#{File.basename(device)}"
608         else
609           disk[:smart_device] = "megaraid,#{id}"
610         end
611       end
612     end
613   end
614
615   def find_mpt1_disks(devices)
616     controllers = []
617     disks = []
618
619     controller = nil
620
621     IO.popen(%w(lsiutil -s)).each do |line|
622       if line =~ /^\/proc\/mpt\/ioc(\d+)\s+LSI Logic\s+(\S+)\s+/
623         controller = {
624           :id => devices[:controllers].count,
625           :type => "mpt1",
626           :model => Regexp.last_match(1),
627           :arrays => [],
628           :disks => []
629         }
630
631         controllers << controller
632         devices[:controllers] << controller
633       elsif line =~ /^\s+(\d+)\s+(\d+)\s+PhysDisk (\d+)\s+(\S+)\s+(\S+)\s+\d+\s+(\S+)\s+/
634         disks[Regexp.last_match(3).to_i] = {
635           :id => devices[:disks].count,
636           :controller => controller[:id],
637           :vendor => Regexp.last_match(4),
638           :model => Regexp.last_match(5),
639           :sas_address => Regexp.last_match(6),
640           :arrays => []
641         }
642
643         controller[:disks] << devices[:disks].count
644         devices[:disks] << disks[Regexp.last_match(3).to_i]
645       end
646     end
647
648     controllers.each_with_index do |controller, index|
649       port = index + 1
650       array = nil
651
652       IO.popen(["lsiutil", "-p", port.to_s, "-a", "69,0"]).each do |line|
653         if line =~ /^ (\d+)\s+(\d+)\s+(\d+)\s+(\d+)\s+RAID/
654           seg = Regexp.last_match(1).to_i
655           bus = Regexp.last_match(2).to_i
656           dev = Regexp.last_match(3).to_i
657           fun = Regexp.last_match(4).to_i
658
659           controller[:pci_slot] = sprintf("%04x:%02x:%02x.%01x", seg, bus, dev, fun)
660         end
661       end
662
663       IO.popen(["lsiutil", "-p", port.to_s, "-a", "21,1,0,0"]).each do |line|
664         if line =~ /^Volume (\d+) is/
665           array = {
666             :id => devices[:arrays].count,
667             :controller => controller[:id],
668             :number => Regexp.last_match(1),
669             :disks => []
670           }
671
672           devices[:arrays] << array
673           controller[:arrays] << array[:id]
674         elsif line =~ /^  Member \d+ is PhysDisk (\d+) /
675           array[:disks] << disks[Regexp.last_match(1).to_i][:id]
676           disks[Regexp.last_match(1).to_i][:arrays] << array[:id]
677         end
678       end
679     end
680
681     disks.each do |disk|
682       slot = controllers[disk[:controller]][:pci_slot]
683       sas_address = "0x#{disk[:sas_address]}"
684
685       Dir.glob("/sys/bus/pci/devices/#{slot}/host*/port-*:*/end_device-*:*/sas_device/end_device-*:*").each do |sas_device|
686         if read_sysctl_file("#{sas_device}/sas_address") == sas_address
687           if device = Dir.glob("#{sas_device}/device/target*:0:*/*:0:*:0/scsi_generic/sg*").first
688             disk[:device] = "/dev/#{File.basename(device)}"            
689           end
690         end
691       end
692     end
693   end
694
695   def find_mpt2_disks(devices)
696     controllers = []
697
698     IO.popen(%w(sas2ircu list)).each do |line|
699       next unless line =~ /^\s+(\d+)\s+(\S+)\s+\h+h\s+\h+h\s+(\S+)\s+\h+h\s+\h+h\s*$/
700       controllers[Regexp.last_match(1).to_i] = {
701         :id => devices[:controllers].count,
702         :type => "mpt2",
703         :model => Regexp.last_match(2),
704         :pci_slot => Regexp.last_match(3).sub(/^(\h{2})h:(\h{2})h:(\h{2})h:0(\h)h$/, "00\\1:\\2:\\3.\\4"),
705         :arrays => [],
706         :disks => []
707       }
708
709       devices[:controllers] << controllers[Regexp.last_match(1).to_i]
710     end
711
712     controllers.each_with_index do |controller, index|
713       arrays = []
714       disks = []
715
716       array = nil
717       disk = nil
718
719       IO.popen(["sas2ircu", index.to_s, "display"]).each do |line|
720         if line =~ /^IR volume (\d+)$/
721           array = {
722             :id => devices[:arrays].count,
723             :controller => controller[:id],
724             :number => Regexp.last_match(1),
725             :disks => []
726           }
727
728           devices[:arrays] << array
729           controller[:arrays] << array[:id]
730
731           arrays << array
732         elsif line =~ /^Device is a Hard disk$/
733           disk = {
734             :id => devices[:disks].count,
735             :controller => controller[:id],
736             :arrays => []
737           }
738
739           devices[:disks] << disk
740           controller[:disks] << disk[:id]
741
742           disks << disk
743         elsif disk && line =~ /^  State\s+:\s+(.*\S)\s*$/
744           Regexp.last_match(1).split(/,\s*/).each do |state|
745             case state
746             when "Online (ONL)" then disk[:status] = "online"
747             when "Hot Spare (HSP)" then disk[:status] = "hotspare"
748             when "Ready (RDY)" then disk[:status] = "unconfigured"
749             when "Available (AVL)" then disk[:status] = "unconfigured"
750             when "Failed (FLD)" then disk[:status] = "failed"
751             when "Missing (MIS)" then disk[:status] = "missing"
752             when "Standby (SBY)" then disk[:status] = "unconfigured"
753             when "Out of Sync (OSY)" then disk[:status] = "degraded"
754             when "Degraded (DGD)" then disk[:status] = "degraded"
755             when "Rebuilding (RBLD)" then disk[:status] = "rebuilding"
756             when "Optimal (OPT)" then disk[:status] = "online"
757             else disk[:status] = "unknown"
758             end
759           end
760         elsif disk && line =~ /^  (\S.*\S)\s+:\s+(.*\S)\s*$/
761           case Regexp.last_match(1)
762           when "Enclosure #" then disk[:location] = Regexp.last_match(2)
763           when "Slot #" then disk[:location] = "#{disk[:location]}:#{Regexp.last_match(2)}"
764           when "SAS Address" then disk[:device] = find_sas_device(Regexp.last_match(2).tr("-", ""))
765           when "Size (in MB)/(in sectors)" then disk[:size] = memory_to_disk_size("#{Regexp.last_match(2).split('/').first} MB")
766           when "Manufacturer" then disk[:vendor] = Regexp.last_match(2)
767           when "Model Number" then disk[:model] = Regexp.last_match(2)
768           when "Firmware Revision" then disk[:firmware_version] = Regexp.last_match(2)
769           when "Serial Number" then disk[:serial_number] = Regexp.last_match(2)
770           when "Protocol" then disk[:interface] = Regexp.last_match(2)
771           end
772         elsif array && line =~ /^  PHY\[\d+\] Enclosure#\/Slot#\s+:\s+(\d+:\d+)\s*$/
773           array[:disks] << Regexp.last_match(1)
774         elsif array && line =~ /^  Status of volume\s+:\s+(.*\S)\s*$/
775           Regexp.last_match(1).split(/,\s*/).each do |state|
776             case state
777             when "Okay (OKY)" then array[:status] = "optimal"
778             when "Degraded (DGD)" then array[:status] = "degraded"
779             when "Failed (FLD)" then array[:status] = "failed"
780             when "Missing (MIS)" then array[:status] = "missing"
781             when "Initializing (INIT)" then array[:status] = "initialising"
782             when "Online (ONL)" then array[:status] = "optimal"
783             else array[:status] = "unknown"
784             end
785           end
786         elsif array && line =~ /^  (\S.*\S)\s+:\s+(.*\S)\s*$/
787           case Regexp.last_match(1)
788           when "Volume wwid" then array[:device] = find_sas_device(Regexp.last_match(2))
789           when "RAID level" then array[:raid_level] = Regexp.last_match(2).sub(/^RAID/, "")
790           when "Size (in MB)" then array[:size] = "#{Regexp.last_match(2)} MB"
791           end
792         elsif line =~ /^  (\S.*\S)\s+:\s+(.*\S)\s*$/
793           case Regexp.last_match(1)
794           when "BIOS version" then controller[:bios_version] = Regexp.last_match(2)
795           when "Firmware version" then controller[:firmware_version] = Regexp.last_match(2)
796           end
797         end
798       end
799
800       arrays.each do |array|
801         array[:disks].map! do |location|
802           disk = disks.find { |disk| disk[:location] == location }
803
804           disk[:arrays] << array[:id]
805           disk[:id]
806         end
807       end
808     end
809   end
810
811   def find_adaptec_disks(devices)
812     controller_count = IO.popen(%w(arcconf getconfig 0)).first.scan(/^Controllers Found: (\d+)$/i).first.first.to_i
813
814     1.upto(controller_count).each do |controller_number|
815       controller = {
816         :id => devices[:controllers].count,
817         :number => controller_number,
818         :type => "adaptec",
819         :arrays => [],
820         :disks => []
821       }
822
823       devices[:controllers] << controller
824
825       arrays = []
826       disks = []
827
828       array = nil
829       disk = nil
830
831       IO.popen(["arcconf", "getconfig", controller_number.to_s]).each do |line|
832         if line =~ /^Logical Device Number (\d+)$/i
833           array = {
834             :id => devices[:arrays].count,
835             :controller => controller[:id],
836             :number => Regexp.last_match(1).to_i,
837             :disks => []
838           }
839
840           devices[:arrays] << array
841           controller[:arrays] << array[:id]
842
843           arrays << array
844         elsif line =~ /^      Device #(\d+)$/
845           disk = nil
846         elsif line =~ /^         Device is a Hard drive$/
847           disk = {
848             :id => devices[:disks].count,
849             :controller => controller[:id],
850             :arrays => []
851           }
852
853           devices[:disks] << disk
854           controller[:disks] << disk[:id]
855
856           disks << disk
857         elsif disk && line =~ /^         Reported Channel,Device\(T:L\)\s*:\s+(\d+),(\d+)\(\d+:0\)\s*$/
858           disk[:channel_number] = Regexp.last_match(1)
859           disk[:device_number] = Regexp.last_match(2)
860         elsif disk && line =~ /^         State\s*:\s+(\S.*\S)\s*$/
861           case Regexp.last_match(1)
862           when "Online" then disk[:status] = "online"
863           when "Online (JBOD)" then disk[:status] = "online"
864           when "Hot Spare" then disk[:status] = "hotspare"
865           when "Ready" then disk[:status] = "unconfigured"
866           when "Global Hot-Spare" then disk[:status] = "hostspare"
867           when "Dedicated Hot-Spare" then disk[:status] = "hotspare"
868           else disk[:status] = "unknown"
869         end
870         elsif disk && line =~ /^         (\S.*\S)\s*:\s+(\S.*\S)\s*$/
871           case Regexp.last_match(1)
872           when "Reported Location" then disk[:location] = Regexp.last_match(2)
873           when "Vendor" then disk[:vendor] = Regexp.last_match(2)
874           when "Model" then disk[:model] = Regexp.last_match(2)
875           when "Firmware" then disk[:firmware_version] = Regexp.last_match(2)
876           when "Serial number" then disk[:serial_number] = Regexp.last_match(2)
877           when "Serial Number" then disk[:serial_number] = Regexp.last_match(2)
878           when "World-wide name" then disk[:wwn] = Regexp.last_match(2)
879           when "World-wide Name" then disk[:wwn] = Regexp.last_match(2)
880           when "Total Size" then disk[:size] = memory_to_disk_size(Regexp.last_match(2))
881           when "Size" then disk[:size] = memory_to_disk_size(Regexp.last_match(2))
882           end
883         elsif array && line =~ / Present \(.*((?:Connector|Enclosure):\d+,\s*(?:Device|Slot):\d+)\) /
884           array[:disks] << Regexp.last_match(1).tr(":", " ").gsub(/,\s*/, ", ")
885         elsif array && line =~ /^   Status of Logical Device\s*:\s+(\S.*\S)\s*$/
886           case Regexp.last_match(1)
887           when "Optimal" then array[:status] = "optimal"
888           else array[:status] = "unknown"
889         end
890         elsif array && line =~ /^   (\S.*\S)\s*:\s+(\S.*\S)\s*$/
891           case Regexp.last_match(1)
892           when "RAID level" then array[:raid_level] = Regexp.last_match(2)
893           when "RAID Level" then array[:raid_level] = Regexp.last_match(2)
894           when "Size" then array[:size] = memory_to_disk_size(Regexp.last_match(2))
895           end
896         elsif line =~ /^   (\S.*\S)\s*:\s+(\S.*\S)\s*$/
897           case Regexp.last_match(1)
898           when "Controller Model" then controller[:model] = Regexp.last_match(2)
899           when "Controller Serial Number" then controller[:serial_number] = Regexp.last_match(2)
900           when "Controller World Wide Name" then controller[:wwn] = Regexp.last_match(2)
901           when "BIOS" then controller[:bios_version] = Regexp.last_match(2)
902           when "Firmware" then controller[:firmware_version] = Regexp.last_match(2)
903           end
904         elsif line =~ /^         Serial Number\s*:\s+(\S.*\S)\s*$/
905           controller[:serial_number] = Regexp.last_match(1)
906         end
907       end
908
909       host = Dir.glob("/sys/class/scsi_host/host*").find do |host|
910         read_sysctl_file("#{host}/serial_number") == controller[:serial_number]
911       end
912
913       arrays.each do |array|
914         array_number = array[:number]
915         device = Dir.glob("#{host}/device/target*:0:#{array_number}/*:0:#{array_number}:0/block/*").first
916
917         array[:device] = "/dev/#{File.basename(device)}"
918
919         array[:disks].map! do |location|
920           disk = disks.find { |disk| disk[:location] == location }
921
922           controller_number = controller[:number] - 1
923           device_number = disk[:device_number]
924
925           disk[:device] = "/dev/#{File.basename(device)}"
926           disk[:smart_device] = "aacraid,#{controller_number},0,#{device_number}"
927
928           disk[:arrays] << array[:id]
929           disk[:id]
930         end
931       end
932     end
933   end
934
935   def find_areca_disks(devices)
936     controller = {
937       :id => devices[:controllers].count,
938       :type => "areca",
939       :arrays => [],
940       :disks => []
941     }
942
943     devices[:controllers] << controller
944
945     IO.popen(%w(/opt/areca/x86_64/cli64 sys info)).each do |line|
946       next unless line =~ /^(\S.*\S)\s+:\s+(.*\S)\s*$/
947
948       case Regexp.last_match(1)
949       when "Firmware Version" then controller[:firmware_version] = Regexp.last_match(2)
950       when "BOOT ROM Version" then controller[:bios_version] = Regexp.last_match(2)
951       when "Serial Number" then controller[:serial_number] = Regexp.last_match(2)
952       when "Controller Name" then controller[:model] = Regexp.last_match(2)
953       end
954     end
955
956     path = Dir.glob("/sys/bus/pci/devices/*/host*/scsi_host/host*/host_fw_model").find do |file|
957       read_sysctl_file(file) == controller[:model]
958     end
959
960     controller[:pci_slot] = File.basename(File.expand_path("#{path}/../../../.."))
961     controller[:device] = File.basename(Dir.glob(File.expand_path("#{path}/../../../target0:0:16/0:0:16:0/scsi_generic/*")).first)
962
963     arrays = []
964
965     IO.popen(%w(/opt/areca/x86_64/cli64 vsf info)).each do |line|
966       next unless line =~ /^\s+(\d+)\s+/
967       array = {
968         :id => devices[:arrays].count,
969         :number => Regexp.last_match(1),
970         :controller => controller[:id],
971         :disks => []
972       }
973
974       devices[:arrays] << array
975       controller[:arrays] << array[:id]
976
977       arrays << array
978     end
979
980     arrays.each do |array|
981       IO.popen(["/opt/areca/x86_64/cli64", "vsf", "info", "vol=#{array[:number]}"]).each do |line|
982         if line =~ /^SCSI Ch\/Id\/Lun\s+:\s+(\d+)\/(\d+)\/(\d+)\s*$/
983           pci_slot = controller[:pci_slot]
984           channel = Regexp.last_match(1).to_i
985           id = Regexp.last_match(2).to_i
986           lun = Regexp.last_match(3).to_i
987
988           device = Dir.glob("/sys/bus/pci/devices/#{pci_slot}/host*/target*:0:0/0:#{channel}:#{id}:#{lun}/block/*").first
989
990           array[:device] = "/dev/#{File.basename(device)}"
991         elsif line =~ /^Volume State\s+:\s+(.*\S)\s*$/
992           case Regexp.last_match(1)
993           when "Normal" then array[:status] = "optimal"
994           else array[:status] = "unknown"
995           end
996         elsif line =~ /^(\S.*\S)\s+:\s+(.*\S)\s*$/
997           case Regexp.last_match(1)
998           when "Volume Set Name" then array[:volume_set] = Regexp.last_match(2)
999           when "Raid Set Name" then array[:raid_set] = Regexp.last_match(2)
1000           when "Volume Capacity" then array[:size] = format_disk_size(Regexp.last_match(2).to_f * 1000 * 1000)
1001           when "Raid Level" then array[:raid_level] = Regexp.last_match(2).sub(/^Raid/, "")
1002           end
1003         end
1004       end
1005     end
1006
1007     disks = []
1008
1009     IO.popen(%w(/opt/areca/x86_64/cli64 disk info)).each do |line|
1010       next unless line =~ /^\s+(\d+)\s+.*\s+\d+\.\d+GB\s+(\S.*\S)\s*$/
1011       next if Regexp.last_match(2) == "N.A."
1012
1013       disk = {
1014         :id => devices[:disks].count,
1015         :number => Regexp.last_match(1),
1016         :controller => controller[:id],
1017         :arrays => []
1018       }
1019
1020       devices[:disks] << disk
1021       controller[:disks] << disk[:id]
1022
1023       if array = arrays.find { |array| array[:raid_set] == Regexp.last_match(2) }
1024         disk[:arrays] << array[:id]
1025         array[:disks] << disk[:id]
1026       end
1027
1028       disks << disk
1029     end
1030
1031     disks.each do |disk|
1032       IO.popen(["/opt/areca/x86_64/cli64", "disk", "info", "drv=#{disk[:number]}"]).each do |line|
1033         if line =~ /^IDE Channel\s+:\s+(\d+)\s*$/i
1034           disk[:smart_device] = "areca,#{Regexp.last_match(1)}"
1035         elsif line =~ /^Device Location\s+:\s+Enclosure#(\d+) Slot#?\s*0*(\d+)\s*$/i
1036           disk[:smart_device] = "areca,#{Regexp.last_match(2)}/#{Regexp.last_match(1)}"
1037         elsif line =~ /^Device State\s+:\s+(.*\S)\s*$/
1038           case Regexp.last_match(1)
1039           when "NORMAL" then disk[:status] = "online"
1040           else disk[:status] = "unknown"
1041           end
1042         elsif line =~ /^(\S.*\S)\s+:\s+(.*\S)\s*$/
1043           case Regexp.last_match(1)
1044           when "Model Name" then disk[:vendor], disk[:model] = Regexp.last_match(2).split
1045           when "Serial Number" then disk[:serial_number] = Regexp.last_match(2)
1046           when "Disk Capacity" then disk[:size] = format_disk_size(Regexp.last_match(2).to_f * 1000 * 1000)
1047           end
1048         end
1049       end
1050     end
1051   end
1052
1053   def lvm_devices
1054     {
1055       :pvs => find_lvm_pvs,
1056       :vgs => find_lvm_vgs,
1057       :lvs => find_lvm_lvs
1058     }
1059   end
1060
1061   def find_lvm_pvs
1062     IO.popen(["pvdisplay", "-c"]).each_with_object({}) do |line, pvs|
1063       fields = line.strip.split(":")
1064
1065       pvs[fields[0]] = {
1066         :vg => fields[1],
1067         :pv_size => fields[2],
1068         :pv_status => fields[4],
1069         :pe_size => fields[7],
1070         :pe_total => fields[8],
1071         :pe_free => fields[9],
1072         :pe_allocated => fields[10],
1073         :pv_uuid => fields[11]
1074       }
1075     end
1076   end
1077
1078   def find_lvm_vgs
1079     IO.popen(["vgdisplay", "-c"]).each_with_object({}) do |line, vgs|
1080       fields = line.strip.split(":")
1081
1082       vgs[fields[0]] = {
1083         :vg_access => fields[1],
1084         :vg_status => fields[2],
1085         :lv_maximum => fields[4],
1086         :lv_count => fields[5],
1087         :lv_open => fields[6],
1088         :pv_maximum => fields[8],
1089         :pv_current => fields[9],
1090         :pv_actual => fields[10],
1091         :vg_size => fields[11],
1092         :pe_size => fields[12],
1093         :pe_total => fields[13],
1094         :pe_allocated => fields[14],
1095         :pe_free => fields[15],
1096         :vg_uuid => fields[16]
1097       }
1098     end
1099   end
1100
1101   def find_lvm_lvs
1102     IO.popen(["lvdisplay", "-c"]).each_with_object({}) do |line, lvs|
1103       fields = line.strip.split(":")
1104
1105       lvs[fields[0]] = {
1106         :vg => fields[1],
1107         :lv_access => fields[2],
1108         :lv_status => fields[3],
1109         :lv_open => fields[5],
1110         :lv_size => fields[6],
1111         :le_count => fields[7],
1112         :lv_minor => fields[11],
1113         :lv_major => fields[12]
1114       }
1115     end
1116   end
1117
1118   def psu_devices
1119     device = nil
1120
1121     IO.popen(["dmidecode", "-t", "39"]).each_with_object([]) do |line, devices|
1122       if line =~ /^System Power Supply\s*$/
1123         device = {}
1124       elsif device && line =~ /^\s+([A-Z ]+):\s+(.*)\s*$/i
1125         device[Regexp.last_match(1).tr(" ", "_").downcase.to_sym] = Regexp.last_match(2).strip
1126       elsif device && line =~ /^\s*$/
1127         devices << device
1128         device = nil
1129       end
1130     end
1131   end
1132
1133   def mc_device
1134     device = {}
1135
1136     IO.popen(["ipmitool", "mc", "info"]).each_with_object([]) do |line, devices|
1137       if line =~ /(Manufacturer [A-Z ]+[A-Z])\s*:\s+(.*\S)\s+\(.*\)\s*$/i
1138         device[Regexp.last_match(1).tr(" ", "_").downcase.to_sym] = Regexp.last_match(2)
1139       elsif line =~ /(Product [A-Z ]+[A-Z])\s*:\s+(.*\S)\s+\(.*\)\s*$/i
1140         device[Regexp.last_match(1).tr(" ", "_").downcase.to_sym] = Regexp.last_match(2)
1141       elsif line =~ /([A-Z ]+[A-Z])\s*:\s+(.*\S)\s*$/i
1142         device[Regexp.last_match(1).tr(" ", "_").downcase.to_sym] = Regexp.last_match(2)
1143       end
1144     end
1145
1146     IO.popen(["ipmitool", "mc", "guid"]).each_with_object([]) do |line, devices|
1147       if line =~ /^System GUID\s*:\s+(\S+)\s*$/
1148         device[:system_guid] = Regexp.last_match(1)
1149       end
1150     end
1151
1152     device
1153   end
1154
1155   collect_data(:default) do
1156     hardware Mash.new
1157
1158     hardware[:pci] = pci_devices
1159     hardware[:network] = network_devices
1160     hardware[:memory] = memory_devices
1161     hardware[:disk] = disk_devices
1162     hardware[:lvm] = lvm_devices
1163     hardware[:psu] = psu_devices
1164     hardware[:mc] = mc_device
1165   end
1166 end