--Setup redworks functions

local path=":/mem/redworks/programs:/mem/redworks/libs"
if http then path=path..":/mem/redworks/programs/http:/bin"end

shell.setPath( ".:/mem/redworks/programs:/rom/programs"..path )
help.setPath( "mem/redworks/help:/rom/help/" )
shell.setAlias( "ls", "list" )
shell.setAlias( "dir", "list" )
shell.setAlias( "cp", "copy" )
shell.setAlias( "mv", "move" )
shell.setAlias( "rm", "delete" )
shell.setAlias( "off", "shutdown" )
shell.setAlias( "faq", "help" )
shell.setAlias( "cl", "clear" )
shell.setAlias( "goto", "cd" )
shell.setAlias( "del", "delete" )

-- Load APIs
local tApis = fs.list( "/mem/redworks/apis" )
for n,sFile in ipairs( tApis ) do
	if not fs.isDir( sFile ) then
		os.loadAPI( fs.combine( "/mem/redworks/apis", sFile ) )
	end
end

-- Do login code
redworks.showLogo()
local user,succ = redworks.doLogin()
if not succ then
	--Login failed
	term.clear()
	term.setCursorPos(1,5)
	print("login failed.\n\nLocking terminal for 15 seconds")
	local bExit=false
	os.startTimer(15)
	while not bExit do
		falt, sEvent, param = pcall(os.pullEvent)
		if sEvent == "timer" then
			bExit = true
		end
	end
	os.shutdown()
else
	redworks.setUser(user)
end

term.clear()
term.setCursorPos(1,1)
print(os.version() .. " with Redworks "..redworks.version().." Terminal ID# " .. os.getComputerID())
print("Welcome " .. redworks.getUser()..".".. " Current time is "..textutils.formatTime( os.time(), false ))
term.setCursorPos(1,4)