xref: /freebsd/stand/lua/screen.lua (revision 9f71d421c89dde4e5a642f4555bcd20558fd91b0)
1--
2-- Copyright (c) 2015 Pedro Souza <pedrosouza@freebsd.org>
3-- All rights reserved.
4--
5-- Redistribution and use in source and binary forms, with or without
6-- modification, are permitted provided that the following conditions
7-- are met:
8-- 1. Redistributions of source code must retain the above copyright
9--    notice, this list of conditions and the following disclaimer.
10-- 2. Redistributions in binary form must reproduce the above copyright
11--    notice, this list of conditions and the following disclaimer in the
12--    documentation and/or other materials provided with the distribution.
13--
14-- THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15-- ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16-- IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17-- ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18-- FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19-- DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20-- OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21-- HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22-- LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23-- OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24-- SUCH DAMAGE.
25--
26-- $FreeBSD$
27--
28
29local color = require("color")
30local core = require("core")
31
32local screen = {}
33
34-- XXX TODO: This should be fixed in the interpreter to not print decimals
35local intstring = function(num)
36	local str = tostring(num)
37	local decimal = str:find("%.")
38
39	if decimal then
40		return str:sub(1, decimal - 1)
41	end
42	return str
43end
44
45-- Module exports
46function screen.clear()
47	if core.isSerialBoot() then
48		return
49	end
50	loader.printc("\027[H\027[J")
51end
52
53function screen.setcursor(x, y)
54	if core.isSerialBoot() then
55		return
56	end
57
58	loader.printc("\027[" .. intstring(y) .. ";" .. intstring(x) .. "H")
59end
60
61function screen.setforeground(c)
62	if color.disabled then
63		return c
64	end
65	loader.printc("\027[3" .. c .. "m")
66end
67
68function screen.setbackground(c)
69	if color.disabled then
70		return c
71	end
72	loader.printc("\027[4" .. c .. "m")
73end
74
75function screen.defcolor()
76	loader.printc(color.default())
77end
78
79function screen.defcursor()
80	if core.isSerialBoot() then
81		return
82	end
83	loader.printc("\027[25;0H")
84end
85
86return screen
87