freebsd-nq/stand/lua/color.lua
Warner Losh 088b4f5f32 Add the lua scripts from the lua-bootloader SoC
These are the .lua files from from Pedro Souza's 2014 Summer of Code
project. Rui Paulo, Pedro Arthur and Wojciech A. Koszek also
contributed.

Obtained from: https://wiki.freebsd.org/SummerOfCode2014/LuaLoader
Sponsored by: Google Summer of Code

Improve the SoC lua menu code to bring it in line with forth
menu functionality

Submitted by: Zakary Nafziger
Sponsored by: FreeBSD Foundation

Use loader.setenv and loader.unsetenv instead of loader.perform

Convert from include("/boot/foo.lua") to foo = require("foo");
to bring in line with latest lua module conventions.

Enforce a uniform style for the new .lua files:
	o hard tab indenation for 8 spaces
	o don't have if foo then bar; else bas; end on one line

MFC After: 1 month
Relnotes: yes
Differential Review: https://reviews.freebsd.org/D14295
2018-02-12 15:32:00 +00:00

100 lines
2.4 KiB
Lua

--
-- Copyright (c) 2015 Pedro Souza <pedrosouza@freebsd.org>
-- All rights reserved.
--
-- Redistribution and use in source and binary forms, with or without
-- modification, are permitted provided that the following conditions
-- are met:
-- 1. Redistributions of source code must retain the above copyright
-- notice, this list of conditions and the following disclaimer.
-- 2. Redistributions in binary form must reproduce the above copyright
-- notice, this list of conditions and the following disclaimer in the
-- documentation and/or other materials provided with the distribution.
--
-- THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
-- ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-- IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
-- ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
-- FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
-- DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
-- OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
-- HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
-- LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
-- OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
-- SUCH DAMAGE.
--
-- $FreeBSD$
--
local color = {};
local core = require("core");
color.BLACK = 0;
color.RED = 1;
color.GREEN = 2;
color.YELLOW = 3;
color.BLUE = 4;
color.MAGENTA = 5;
color.CYAN = 6;
color.WHITE = 7;
color.DEFAULT = 0;
color.BRIGHT = 1;
color.DIM = 2;
function color.isEnabled()
local c = loader.getenv("loader_color");
if c ~= nil then
if c:lower() == "no" or c == "0" then
return false;
end
end
return not core.bootserial();
end
color.disabled = not color.isEnabled();
function color.escapef(c)
if color.disabled then
return c;
end
return "\027[3"..c.."m";
end
function color.escapeb(c)
if color.disabled then
return c;
end
return "\027[4"..c.."m";
end
function color.escape(fg, bg, att)
if color.disabled then
return "";
end
if not att then
att = ""
else
att = att..";";
end
return "\027["..att.."3"..fg..";4"..bg.."m";
end
function color.default()
if color.disabled then
return "";
end
return "\027[0;37;40m";
end
function color.highlight(str)
if color.disabled then
return str;
end
return "\027[1m"..str.."\027[0m";
end
return color