Loader forth changes for customization

[Alfred Perlstein]

I added some hooks for menu.rc as well, you can see it via the github 
urls below.

I've attached a sample menu.rc.local that provides additional menus.

-Alfred

On 11/12/13, 6:35 PM, Alfred Perlstein wrote:
> Hey folks,
>
> I added some forth using Devin's help to make it easier to customize 
> the FreeBSD boot loader graphics.
>
> Diffs are here:
> https://github.com/alfredperlstein/freebsd/compare/loader_custom_rc
> -or-
> https://github.com/alfredperlstein/freebsd/compare/loader_custom_rc.diff
>
>
> Diff attached.
>
> Also attached is a custom loader.rc file and loader.conf file that 
> shows how to set the brand/logo.
>
> Please review.
>
> -Alfred

-------------- next part --------------

: zfsrecover_enabled? ( -- flag )
        s" vfs.zfs.recover" getenv -1 <> dup if
                swap drop ( c-addr flag -- flag )
        then
;

: zfsrecover_enable ( -- )
        s" set vfs.zfs.recover=1" evaluate
;

: zfsrecover_disable ( -- )
        s" vfs.zfs.recover" unsetenv
;

: init_zfsrecover ( N -- N )
        zfsrecover_enabled? if
                toggle_menuitem ( n -- n )
        then
;

: toggle_zfsrecover ( N -- N TRUE )
        toggle_menuitem
        menu-redraw

        \ Now we're going to make the change effective

        dup toggle_stateN @ 0= if
                zfsrecover_disable
        else
                zfsrecover_enable
        then

        TRUE \ loop menu again
;


set optionsmenu_init[7]="init_zfsrecover"
set optionsmenu_caption[7]="Boot [Z]FS Recover: NO"
set optionstoggled_text[7]="Boot [Z]FS Recover: YES"
set optionsmenu_command[7]="toggle_zfsrecover"
set optionsmenu_keycode[7]="122"
set optionsansi_caption[7]="Boot ZFS Recover: NO"
set optionstoggled_ansi[7]="Boot ZFS Recover: YES"