/airlock/doorclient

--   Copyright 2012 John Paul Alcala
--
--   Licensed under the Apache License, Version 2.0 (the "License");
--   you may not use this file except in compliance with the License.
--   You may obtain a copy of the License at
--
--       http://www.apache.org/licenses/LICENSE-2.0
--
--   Unless required by applicable law or agreed to in writing, software
--   distributed under the License is distributed on an "AS IS" BASIS,
--   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
--   See the License for the specific language governing permissions and
--   limitations under the License.


local openAirlockColor = colors.cyan
local closeAirlockColor = colors.lime
local maxRetriesForAcknowledgementSignal = 10

local getEntranceHatchState = function()
  if redstone.testBundledInput("bottom", colors.red) ~= true then
    return "OPEN"
  else
    return "CLOSED"
  end
end

local getExitHatchState = function()
  if redstone.testBundledInput("bottom", colors.yellow) ~= true then
    return "OPEN"
  else
    return "CLOSED"
  end
end

local sendCommand = function(color)
  redstone.setBundledOutput("bottom", color)
  sleep(0.5)
  redstone.setBundledOutput("bottom", 0)
end

local waitForAcknowledgementSignal = function(color)
  for i=1,maxRetriesForAcknowledgementSignal do
    local event = os.pullEvent("redstone")
    if redstone.testBundledInput("bottom", color) == true then
      print("DONE!")
      sleep(1.5)
      return
    end
  end

  print("TIMEOUT ENCOUNTERED!")
  sleep(1.5)
end

local openAirlockCommand = function()
  if getEntranceHatchState() == "CLOSED" then
    print("")
    print("Opening Airlock...")
    sendCommand(openAirlockColor)
    waitForAcknowledgementSignal(openAirlockColor)
  else
    print("")
    print("Airlock is already open!")
    sleep(1.5)
  end
end

local closeAirlockCommand = function()
  if getEntranceHatchState() == "OPEN" then
    print("")
    print("Closing Airlock...")
    sendCommand(closeAirlockColor)
    waitForAcknowledgementSignal(closeAirlockColor)
  else
    print("")
    print("Airlock is already closed!")
    sleep(1.5)
  end
end

local askForCommand = function()
  write("open/close? ")
  local command = read()

  if command == "open" then
    openAirlockCommand()
  elseif command == "close" then
    closeAirlockCommand()
  else
    print("Invalid command!")
    sleep(1.5)
  end
end


-- Run the airlock client

while true do
  term.clear()
  term.setCursorPos(1,3)

  print("AIRLOCK STATUS")
  print("")
  print("Entrance Hatch: "..getEntranceHatchState())
  print("Exit Hatch: "..getExitHatchState())
  print("")
  print("Press space to enter command")
  print("Press any other key to update status")
  print("")

  local event, param = os.pullEvent("char")
  if param == " " then
    askForCommand()
  end
end