mirror of
https://github.com/SquidDev-CC/CC-Tweaked
synced 2024-07-15 16:24:35 +00:00
57 lines
1.4 KiB
Lua
57 lines
1.4 KiB
Lua
![]() |
|
||
|
local native = (term.native and term.native()) or term
|
||
|
local redirectTarget = native
|
||
|
|
||
|
local function wrap( _sFunction )
|
||
|
return function( ... )
|
||
|
return redirectTarget[ _sFunction ]( ... )
|
||
|
end
|
||
|
end
|
||
|
|
||
|
local term = {}
|
||
|
|
||
|
term.redirect = function( target )
|
||
|
if target == nil or type( target ) ~= "table" then
|
||
|
error( "Invalid redirect target", 2 )
|
||
|
end
|
||
|
if target == term then
|
||
|
error( "term is not a recommended redirect target, try term.current() instead", 2 )
|
||
|
end
|
||
|
for k,v in pairs( native ) do
|
||
|
if type( k ) == "string" and type( v ) == "function" then
|
||
|
if type( target[k] ) ~= "function" then
|
||
|
target[k] = function()
|
||
|
error( "Redirect object is missing method "..k..".", 2 )
|
||
|
end
|
||
|
end
|
||
|
end
|
||
|
end
|
||
|
local oldRedirectTarget = redirectTarget
|
||
|
redirectTarget = target
|
||
|
return oldRedirectTarget
|
||
|
end
|
||
|
|
||
|
term.current = function()
|
||
|
return redirectTarget
|
||
|
end
|
||
|
|
||
|
term.native = function()
|
||
|
-- NOTE: please don't use this function unless you have to.
|
||
|
-- If you're running in a redirected or multitasked enviorment, term.native() will NOT be
|
||
|
-- the current terminal when your program starts up. It is far better to use term.current()
|
||
|
return native
|
||
|
end
|
||
|
|
||
|
for k,v in pairs( native ) do
|
||
|
if type( k ) == "string" and type( v ) == "function" then
|
||
|
if term[k] == nil then
|
||
|
term[k] = wrap( k )
|
||
|
end
|
||
|
end
|
||
|
end
|
||
|
|
||
|
local env = _ENV
|
||
|
for k,v in pairs( term ) do
|
||
|
env[k] = v
|
||
|
end
|