Remote terminal Client mk2

--[[
        reciver client mk2
        by BigSHinyToys
]]--

local oldError = error
error = function(...)
    local data = {...}
    local file = fs.open("log","a")
    if file then
        for i = 1,#data do
            file.write(tostring(data[i]).." ")
        end
        file.write("\n")
        file.close()
    end
    oldError(unpack(data))
end

local function findDevice(sType)
    for _,sSide in pairs(rs.getSides()) do
        if peripheral.isPresent(sSide) and peripheral.getType(sSide) == sType then
            return sSide,peripheral.wrap(sSide)
        end
    end
end

local modemSide,modem = findDevice("modem")
local freq = 0

local function main()
    while true do

        local event = {os.pullEvent()}
        if event[1] == "modem_message" then
            local test,tInput = pcall(textutils.unserialize,event[5])
            for i = 1,#tInput do
                pcall(
                    function()
                        local this = textutils.unserialize(tInput[i])
                        local sFunk = this[1]
                        table.remove(this,1)
                        term[sFunk](unpack(this))
                    end
                )
            end
        else
            table.insert(event,1,"INS")
            modem.transmit(freq,freq,textutils.serialize(event))
        end

    end
end

if modemSide then
    print(" --- Remote access client --- ")
    while true do
        write("Choose Freq : ")
        local temp = read()
        if string.lower(temp) == "exit" then
            print(" --- Exiting program --- ")
            return
        end
        temp = tonumber(temp)
        if type(temp) == "number" and temp >= 0 and temp <= 65535 then
            freq = temp
            break
        end
        print("ERROR : Range 0 - 65535 or Exit")
    end
    write("User : ")
    local user = read()
    write("Password : ")
    local pass = read("*")
    print("Opening modem : "..modemSide.." Freq : "..tostring(freq))
    modem.open(freq)
    modem.transmit(freq,freq,textutils.serialize({user = user,password = pass}))
    os.pullEvent()
    local width,hight = term.getSize()
    modem.transmit(freq,freq,textutils.serialize({cmd = "REPLY-SCP",test = term.isColor(),w = width,h = hight}))
    term.clear()
    term.setCursorPos(1,1)
    main()
else
    print("ERROR : Failed to find modem ")
end