177 lines
6.2 KiB
Plaintext
177 lines
6.2 KiB
Plaintext
-- OpenComputers TTY driver
|
|
|
|
local kernel = ...
|
|
local component = kernel.oc.component
|
|
local computer = kernel.oc.computer
|
|
|
|
local plt = {
|
|
0x000000, 0x000040, 0x000080, 0x0000C0, 0x0000FF,
|
|
0x002400, 0x002440, 0x002480, 0x0024C0, 0x0024FF,
|
|
0x004900, 0x004940, 0x004980, 0x0049C0, 0x0049FF,
|
|
0x006D00, 0x006D40, 0x006D80, 0x006DC0, 0x006DFF,
|
|
0x009200, 0x009240, 0x009280, 0x0092C0, 0x0092FF,
|
|
0x00B600, 0x00B640, 0x00B680, 0x00B6C0, 0x00B6FF,
|
|
0x00DB00, 0x00DB40, 0x00DB80, 0x00DBC0, 0x00DBFF,
|
|
0x00FF00, 0x00FF40, 0x00FF80, 0x00FFC0, 0x00FFFF,
|
|
|
|
0x330000, 0x330040, 0x330080, 0x3300C0, 0x3300FF,
|
|
0x332400, 0x332440, 0x332480, 0x3324C0, 0x3324FF,
|
|
0x334900, 0x334940, 0x334980, 0x3349C0, 0x3349FF,
|
|
0x336D00, 0x336D40, 0x336D80, 0x336DC0, 0x336DFF,
|
|
0x339200, 0x339240, 0x339280, 0x3392C0, 0x3392FF,
|
|
0x33B600, 0x33B640, 0x33B680, 0x33B6C0, 0x33B6FF,
|
|
0x33DB00, 0x33DB40, 0x33DB80, 0x33DBC0, 0x33DBFF,
|
|
0x33FF00, 0x33FF40, 0x33FF80, 0x33FFC0, 0x33FFFF,
|
|
|
|
0x660000, 0x660040, 0x660080, 0x6600C0, 0x6600FF,
|
|
0x662400, 0x662440, 0x662480, 0x6624C0, 0x6624FF,
|
|
0x664900, 0x664940, 0x664980, 0x6649C0, 0x6649FF,
|
|
0x666D00, 0x666D40, 0x666D80, 0x666DC0, 0x666DFF,
|
|
0x669200, 0x669240, 0x669280, 0x6692C0, 0x6692FF,
|
|
0x66B600, 0x66B640, 0x66B680, 0x66B6C0, 0x66B6FF,
|
|
0x66DB00, 0x66DB40, 0x66DB80, 0x66DBC0, 0x66DBFF,
|
|
0x66FF00, 0x66FF40, 0x66FF80, 0x66FFC0, 0x66FFFF,
|
|
|
|
0x990000, 0x990040, 0x990080, 0x9900C0, 0x9900FF,
|
|
0x992400, 0x992440, 0x992480, 0x9924C0, 0x9924FF,
|
|
0x994900, 0x994940, 0x994980, 0x9949C0, 0x9949FF,
|
|
0x996D00, 0x996D40, 0x996D80, 0x996DC0, 0x996DFF,
|
|
0x999200, 0x999240, 0x999280, 0x9992C0, 0x9992FF,
|
|
0x99B600, 0x99B640, 0x99B680, 0x99B6C0, 0x99B6FF,
|
|
0x99DB00, 0x99DB40, 0x99DB80, 0x99DBC0, 0x99DBFF,
|
|
0x99FF00, 0x99FF40, 0x99FF80, 0x99FFC0, 0x99FFFF,
|
|
|
|
0xCC0000, 0xCC0040, 0xCC0080, 0xCC00C0, 0xCC00FF,
|
|
0xCC2400, 0xCC2440, 0xCC2480, 0xCC24C0, 0xCC24FF,
|
|
0xCC4900, 0xCC4940, 0xCC4980, 0xCC49C0, 0xCC49FF,
|
|
0xCC6D00, 0xCC6D40, 0xCC6D80, 0xCC6DC0, 0xCC6DFF,
|
|
0xCC9200, 0xCC9240, 0xCC9280, 0xCC92C0, 0xCC92FF,
|
|
0xCCB600, 0xCCB640, 0xCCB680, 0xCCB6C0, 0xCCB6FF,
|
|
0xCCDB00, 0xCCDB40, 0xCCDB80, 0xCCDBC0, 0xCCDBFF,
|
|
0xCCFF00, 0xCCFF40, 0xCCFF80, 0xCCFFC0, 0xCCFFFF,
|
|
|
|
0xFF0000, 0xFF0040, 0xFF0080, 0xFF00C0, 0xFF00FF,
|
|
0xFF2400, 0xFF2440, 0xFF2480, 0xFF24C0, 0xFF24FF,
|
|
0xFF4900, 0xFF4940, 0xFF4980, 0xFF49C0, 0xFF49FF,
|
|
0xFF6D00, 0xFF6D40, 0xFF6D80, 0xFF6DC0, 0xFF6DFF,
|
|
0xFF9200, 0xFF9240, 0xFF9280, 0xFF92C0, 0xFF92FF,
|
|
0xFFB600, 0xFFB640, 0xFFB680, 0xFFB6C0, 0xFFB6FF,
|
|
0xFFDB00, 0xFFDB40, 0xFFDB80, 0xFFDBC0, 0xFFDBFF,
|
|
0xFFFF00, 0xFFFF40, 0xFFFF80, 0xFFFFC0, 0xFFFFFF,
|
|
|
|
0x000000, 0x0F0F0F, 0x1E1E1E, 0x2D2D2D,
|
|
0x3C3C3C, 0x4B4B4B, 0x5A5A5A, 0x696969,
|
|
0x787878, 0x878787, 0x969696, 0xA5A5A5,
|
|
0xB4B4B4, 0xC3C3C3, 0xD2D2D2, 0xE1E1E1
|
|
}
|
|
|
|
local gpus,screens = {},{}
|
|
|
|
for addr, typ in component.list("gpu") do
|
|
if typ == "gpu" then
|
|
gpus[#gpus+1]=component.proxy(addr)
|
|
end
|
|
end
|
|
|
|
if #gpus>0 then
|
|
for addr, typ in component.list("screen") do
|
|
if typ == "screen" then
|
|
gpus[1].bind(addr)
|
|
local w,h = gpus[1].maxResolution()
|
|
gpus[1].setResolution(w,h)
|
|
screens[addr]={cx=1,cy=1,w=w,h=h,addr=addr,fg=0,bg=0,gpu=nil}
|
|
end
|
|
end
|
|
end
|
|
|
|
local scrnum = 0
|
|
for i,v in pairs(screens) do
|
|
scrnum=scrnum+1
|
|
end
|
|
|
|
kernel.log("initialized "..tostring(#gpus).." gpus and "..tostring(scrnum).." screens")
|
|
|
|
local binds,newid={},0
|
|
local curaddr=""
|
|
local function scroll(scr, gpu) gpu.copy(1,2,scr.w,scr.h-1,0,-1);gpu.fill(1,scr.h,scr.w,1," ") end
|
|
local function write(text, addr)
|
|
local g=gpus[1]
|
|
local scr=screens[addr]
|
|
if not scr then error("NODEV") end
|
|
if curaddr~=addr then g.bind(addr); g.setForeground(scr.fg); g.setBackground(scr.bg) end
|
|
for i=1,#text do
|
|
local char=text:sub(i,i)
|
|
if char=="\n" then scr.cx=1;scr.cy=scr.cy+1
|
|
elseif char=="\t" then scr.cx=scr.cx+(4-((scr.cx-1)%4))
|
|
elseif char=="\b" then if scr.cx>1 then scr.cx=scr.cx-1;g.set(scr.cx,scr.cy," ") end
|
|
else g.set(scr.cx,scr.cy,char);scr.cx=scr.cx+1 end
|
|
if scr.cx>scr.w then scr.cx=1;scr.cy=scr.cy+1 end
|
|
if scr.cy>scr.h then scroll(scr, g);scr.cy=scr.cy-1 end
|
|
end
|
|
end
|
|
|
|
local function newtty(addr)
|
|
newid=newid+1
|
|
kernel.devfs.data["tty"][tostring(newid)]=function(op, mode)
|
|
if op=="type" then
|
|
return "Terminal"
|
|
elseif op=="open" then
|
|
local h = {
|
|
read=function(amount) end,
|
|
write=function(content)
|
|
write(content, addr)
|
|
end,
|
|
size=function()
|
|
return screens[addr].w, screens[addr].h
|
|
end,
|
|
clear=function()
|
|
local g=gpus[1]
|
|
local scr=screens[addr]
|
|
if addr~=curaddr then g.bind(addr) end
|
|
g.fill(1,1,scr.w,scr.h," ");
|
|
scr.cx,scr.cy=1,1
|
|
end,
|
|
gpos=function()
|
|
return screens[addr].cx, screens[addr].cy
|
|
end,
|
|
spos=function(x,y)
|
|
if not tonumber(x) or not tonumber(y) then error("Invailid arg") end
|
|
screens[addr].cx, screens[addr].cy = x,y
|
|
end,
|
|
sfgc=function(c)
|
|
screens[addr].fg=c
|
|
end,
|
|
sbgc=function(c)
|
|
screens[addr].bg=c
|
|
end,
|
|
gfgc=function()
|
|
return screens[addr].fg
|
|
end,
|
|
gbgc=function()
|
|
return screens[addr].bg
|
|
end,
|
|
isvirt=function()
|
|
return false
|
|
end,
|
|
gplt=function()
|
|
return plt
|
|
end
|
|
}
|
|
if mode=="rw" then
|
|
return h
|
|
elseif mode=="r" then
|
|
h["write"]=nil
|
|
return h
|
|
elseif mode=="w" then
|
|
h["read"]=nil
|
|
return h
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
if #gpus>=1 and scrnum>=1 then
|
|
for addr,obj in pairs(screens) do
|
|
newtty(addr)
|
|
end
|
|
end |