-- scan.lua
-- Oppdager peripheraler paa det monterte luftskipet.
-- Skriver til skjerm OG til scan.txt slik at resultatet kan deles.
-- Kjor paa CC-computeren NAR skipet er montert/lever.

local OUT = "scan.txt"
local file = fs.open(OUT, "w")

local function emit(line)
  print(line)
  file.writeLine(line)
end

emit("=== PERIPHERAL-SCAN ===")
emit("")

local names = peripheral.getNames()

if #names == 0 then
  emit("Ingen peripheraler funnet.")
  emit("Sjekk at skipet er montert og at computeren sitter paa contraptionen.")
  file.close()
  return
end

for _, name in ipairs(names) do
  local ptype = peripheral.getType(name)
  emit("------------------------------------------")
  emit("Navn:  " .. tostring(name))
  emit("Type:  " .. tostring(ptype))
  emit("Metoder:")

  local methods = peripheral.getMethods(name)
  table.sort(methods)
  for _, m in ipairs(methods) do
    emit("   " .. m)
  end
  emit("")
end

emit("==========================================")
emit("Totalt " .. #names .. " peripheral(er).")
emit("Lagret til " .. OUT)

file.close()