installer

-----------------PASTEBINs--------------------------
installer = "Ja5bQSqT"

player_module = "rWp0GXDW"
redstone_module = "KkCYWkSU"
fluid_module = "XFMjJp5H"
energy_module = "RxLuZWHp"

hash_api = "FLQ68J88"
startup = "KnmEN37h"
---------------------------------------------
term.clear()
local token = ''
local module_name = ''
local username = ''
local type = ''
local updating = false
local user = ''

function draw_text_term(x, y, text, text_color, bg_color)
  term.setTextColor(text_color)
  term.setBackgroundColor(bg_color)
  term.setCursorPos(x,y)
  write(text)
end

function draw_line_term(x, y, length, color)
    term.setBackgroundColor(color)
    term.setCursorPos(x,y)
    term.write(string.rep(" ", length))
end

function bars()
        draw_line_term(1, 1, 51, colors.lime)
        draw_line_term(1, 19, 51, colors.lime)
        draw_text_term(12, 1, 'CraftNanny Module Installer', colors.gray, colors.lime)
        draw_text_term(17, 19, 'craftnanny.org', colors.gray, colors.lime)
end

-- saves current token variable to local text file
function save_config()
  sw = fs.open("config.txt", "w")
    sw.writeLine(token)
        sw.writeLine(module_name)
        sw.writeLine(username)
        sw.writeLine(type)
  sw.close()
end

function load_config()
  sr = fs.open("config.txt", "r")
    token = sr.readLine()
        module_name = sr.readLine()
        username = sr.readLine()
        type = sr.readLine()
  sr.close()
end

function launch_module()
  shell.run("CN_module")
end

function install_module()
        if type == '1' then
                pastebin = player_module
        else if type == '2' then
                pastebin = energy_module
        else if type == '3' then
                pastebin = fluid_module
        else if type == '4' then
                pastebin = redstone_module
        end
        end
        end
        end

        term.clear()
        bars()
        draw_text_term(1, 3, 'successfully logged in', colors.lime, colors.black)
        sleep(0.5)
        draw_text_term(1, 4, 'installing...', colors.white, colors.black)
        sleep(0.5)

        draw_text_term(1, 5, 'removing old versions', colors.white, colors.black)
        if fs.exists("CN_module") then
          fs.delete("CN_module")
        end
        sleep(0.5)

        draw_text_term(1, 6, 'fetch from pastebin', colors.white, colors.black)
        term.setCursorPos(1,7)
        term.setTextColor(colors.white)
  shell.run("pastebin get "..pastebin.." CN_module")
  sleep(0.5)

  draw_text_term(1, 9, 'create startup file', colors.white, colors.black)
        term.setCursorPos(1,10)
        term.setTextColor(colors.white)
  if fs.exists("startup") then
    fs.delete("startup")
  end
  shell.run("pastebin get "..startup.." startup")
  sleep(1)

  draw_text_term(1, 13, 'Setup Complete', colors.lime, colors.black)

  draw_text_term(1, 14, 'press enter to continue', colors.lightGray, colors.black)

  if updating then

  else
        input = read()
  end

  launch_module()
end

function hash(password)
        shell.run("pastebin get "..hash_api.." sha1_api")
        os.loadAPI('sha1_api')
        response = http.post(
                "http://craftnanny.org/code/salt.php",
                "user="..user)
        salt = response.readAll()
        hash = sha1_api.sha1(salt..password)
        return hash
end

function login()
        term.clear()
        bars()
        draw_text_term(1, 3, 'Register module to your CraftNanny account.', colors.lime, colors.black)
        draw_text_term(1, 4, 'Create an account at www.craftnanny.org', colors.lightGray, colors.black)

        draw_text_term(1, 6, 'Username: ', colors.lime, colors.black)
        term.setTextColor(colors.white)
        user = read()
        draw_text_term(1, 7, 'Password: ', colors.lime, colors.black)
        term.setTextColor(colors.white)
        pass = read("*")

        password = hash(pass)

        response = http.post(
                "http://craftnanny.org/code/signin.php",
                "user="..user.."&pass="..password.."&id="..os.getComputerID().."&name="..module_name.."&module_type="..type)
        token = response.readAll()

        if token == 'error' then
                draw_text_term(1, 8, 'login failed', colors.red, colors.black)
                sleep(2)
                login()
        else
                username = user
                save_config()
                install_module()
        end
end

function name()
        term.clear()
        bars()

        draw_text_term(1, 3, 'Give this module a unique name:', colors.lime, colors.black)
        term.setCursorPos(2,4)
        term.setTextColor(colors.white)
        module_name = read()
        login()
end

function player_tracker()

        -- code to check that openperipheral sensor is present. give relavent error

        type = '1'
        name()
end

function choose_module(input)
        if input == '1' then
                player_tracker()
        else if input == '2' then
                type = '2'
                name()
        else if input == '3' then
                type = '3'
                name()
        else if input == '4' then
                type = '4'
                name()
        else if input == '5' then

        end
        end
        end
        end
        end

end

function install_select()
        term.clear()
        bars()
        draw_text_term(15, 3, 'Welcome to CraftNanny!', colors.lime, colors.black)
        draw_text_term(1, 5, 'What module would you like to install?', colors.white, colors.black)

        draw_text_term(2, 7, '1. Player Tracking', colors.white, colors.black)
        draw_text_term(2, 8, '2. Energy Monitor', colors.white, colors.black)
        draw_text_term(2, 9, '3. Fluid Monitor', colors.white, colors.black)
        draw_text_term(2, 10, '4. Redstone Controls', colors.white, colors.black)
        draw_text_term(2, 11, '5. Rednet Controls', colors.white, colors.black)
        draw_text_term(1, 13, 'Enter number:', colors.white, colors.black)
        term.setCursorPos(1,14)
        term.setTextColor(colors.white)
        input = read()

        choose_module(input)
end

function start()
  term.clear()
  if fs.exists("config.txt") then
        load_config()
        updating = true
    install_module()
  else
    install_select()
  end
end

start()