199767f8919635c4928607450d9e0abb932109ceToomas Soome\ Copyright (c) 2011-2013 Devin Teske <dteske@FreeBSD.org>
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ All rights reserved.
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ Redistribution and use in source and binary forms, with or without
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ modification, are permitted provided that the following conditions
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ 1. Redistributions of source code must retain the above copyright
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ notice, this list of conditions and the following disclaimer.
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ 2. Redistributions in binary form must reproduce the above copyright
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ notice, this list of conditions and the following disclaimer in the
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ documentation and/or other materials provided with the distribution.
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ SUCH DAMAGE.
199767f8919635c4928607450d9e0abb932109ceToomas Soomemarker task-color.4th
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ This function returns FALSE if the `loader_color' environment variable is set
199767f8919635c4928607450d9e0abb932109ceToomas Soome\ to NO, no, or 0. Otherwise, TRUE is returned (unless booting serial).
199767f8919635c4928607450d9e0abb932109ceToomas Soome: loader_color? ( -- N )
199767f8919635c4928607450d9e0abb932109ceToomas Soome s" loader_color" getenv dup -1 <> if
199767f8919635c4928607450d9e0abb932109ceToomas Soome 2dup s" NO" compare-insensitive 0= if
199767f8919635c4928607450d9e0abb932109ceToomas Soome 2dup s" 0" compare 0= if
199767f8919635c4928607450d9e0abb932109ceToomas Soome boot_serial? if FALSE else TRUE then