xref: /freebsd/stand/lua/screen.lua (revision b57465454b35f6e24a6df02a93a27d0136c016d9)
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