stand/forth/menu.rc

   1 \ Menu.rc
   2 \
   3 \ You should not edit this file! Put any overrides in menu.rc.local
   4 \ instead as this file can be replaced during system updates.
   5 \
   6 \ Load required Forth modules
   7 include /boot/version.4th
   8 include /boot/brand.4th
   9 include /boot/menu.4th
  10 include /boot/menu-commands.4th
  11 include /boot/shortcuts.4th
  12
  13 \ Screen prep
  14 clear         \ clear the screen (see `screen.4th')
  15 print_version \ print version string (bottom-right; see `version.4th')
  16 draw-beastie  \ draw freebsd mascot (on right; see `beastie.4th')
  17 draw-brand    \ draw the FreeBSD title (top-left; see `brand.4th')
  18 menu-init     \ initialize the menu area (see `menu.4th')
  19
  20 \ Initialize main menu constructs (see `menu.4th')
  21 \ NOTE: To use `non-ansi' variants, add `loader_color=0' to loader.conf(5)
  22 \ NOTE: ANSI variants can use `^' in place of literal `Esc' (ASCII 27)
  23
  24 \
  25 \ MAIN MENU
  26 \
  27
  28 set menuset_name1="main"
  29
  30 set mainmenu_init[1]="init_boot"
  31 set mainmenu_caption[1]="Boot Multi User [Enter]"
  32 set maintoggled_text[1]="Boot [S]ingle User [Enter]"
  33 set mainmenu_command[1]="boot"
  34 set mainansi_caption[1]="^[1mB^[moot Multi User ^[1m[Enter]^[m"
  35 set maintoggled_ansi[1]="Boot ^[1mS^[mingle User ^[1m[Enter]^[m"
  36 \ keycode set by init_boot
  37
  38 set mainmenu_init[2]="init_altboot"
  39 set mainmenu_caption[2]="Boot [S]ingle User"
  40 set maintoggled_text[2]="Boot [M]ulti User"
  41 set mainmenu_command[2]="altboot"
  42 set mainansi_caption[2]="Boot ^[1mS^[mingle User"
  43 set maintoggled_ansi[2]="Boot ^[1mM^[multi User"
  44 \ keycode set by init_altboot
  45
  46 set mainmenu_caption[3]="[Esc]ape to loader prompt"
  47 set mainmenu_command[3]="goto_prompt"
  48 set mainmenu_keycode[3]=27
  49 set mainansi_caption[3]="^[1mEsc^[mape to loader prompt"
  50
  51 \ Enable built-in "Reboot" trailing menuitem
  52 \ NOTE: appears before menu_options if configured
  53 \
  54 set mainmenu_reboot
  55
  56 \ Enable "Options:" separator. When set to a numerical value (1-8), a visual
  57 \ separator is inserted before that menuitem number.
  58 \
  59 set mainmenu_options=5
  60
  61 set mainmenu_kernel=5
  62 set mainmenu_command[5]="cycle_kernel"
  63 set mainmenu_keycode[5]=107
  64
  65 set mainmenu_caption[6]="Configure Boot [O]ptions..."
  66 set mainmenu_command[6]="2 goto_menu"
  67 set mainmenu_keycode[6]=111
  68 set mainansi_caption[6]="Configure Boot ^[1mO^[mptions..."
  69
  70 s" currdev" getenv dup 0> [if] drop 4 s" zfs:" compare 0= [if]
  71     set mainmenu_caption[7]="Select Boot [E]nvironment..."
  72     set mainmenu_command[7]="3 goto_menu"
  73     set mainmenu_keycode[7]=101
  74     set mainansi_caption[7]="Select Boot ^[1mE^[mnvironment..."
  75
  76     s" chain_disk" getenv? [if]
  77         set mainmenu_caption[8]="Chain[L]oad ${chain_disk}"
  78         set mainmenu_command[8]="chain ${chain_disk}"
  79         set mainmenu_keycode[8]=108
  80         set mainansi_caption[8]="Chain^[1mL^[moad ${chain_disk}"
  81     [then]
  82 [else]
  83     s" chain_disk" getenv? [if]
  84         set mainmenu_caption[7]="Chain[L]oad ${chain_disk}"
  85         set mainmenu_command[7]="chain ${chain_disk}"
  86         set mainmenu_keycode[7]=108
  87         set mainansi_caption[7]="Chain^[1mL^[moad ${chain_disk}"
  88     [then]
  89 [then] [else] drop [then]
  90
  91
  92 \
  93 \ BOOT OPTIONS MENU
  94 \
  95
  96 set menuset_name2="options"
  97
  98 set optionsmenu_caption[1]="Back to Main Menu [Backspace]"
  99 set optionsmenu_command[1]="1 goto_menu"
 100 set optionsmenu_keycode[1]=8
 101 set optionsansi_caption[1]="Back to Main Menu ^[1m[Backspace]^[m"
 102
 103 set optionsmenu_caption[2]="Load System [D]efaults"
 104 set optionsmenu_command[2]="set_default_boot_options"
 105 set optionsmenu_keycode[2]=100
 106 set optionsansi_caption[2]="Load System ^[1mD^[mefaults"
 107
 108 set optionsmenu_options=3
 109 set optionsmenu_optionstext="Boot Options:"
 110
 111 set optionsmenu_acpi=3
 112 set optionsmenu_caption[3]="[A]CPI Support off"
 113 set optionstoggled_text[3]="[A]CPI Support On"
 114 set optionsmenu_command[3]="toggle_acpi"
 115 set optionsmenu_keycode[3]=97
 116 set optionsansi_caption[3]="^[1mA^[mCPI Support ^[34;1mOff^[m"
 117 set optionstoggled_ansi[3]="^[1mA^[mCPI Support ^[32;7mOn^[m"
 118
 119 set optionsmenu_init[4]="init_safemode"
 120 set optionsmenu_caption[4]="Safe [M]ode... off"
 121 set optionstoggled_text[4]="Safe [M]ode... On"
 122 set optionsmenu_command[4]="toggle_safemode"
 123 set optionsmenu_keycode[4]=109
 124 set optionsansi_caption[4]="Safe ^[1mM^[mode... ^[34;1mOff^[m"
 125 set optionstoggled_ansi[4]="Safe ^[1mM^[mode... ^[32;7mOn^[m"
 126
 127 set optionsmenu_init[5]="init_singleuser"
 128 set optionsmenu_caption[5]="[S]ingle User. off"
 129 set optionstoggled_text[5]="[S]ingle User. On"
 130 set optionsmenu_command[5]="toggle_singleuser"
 131 set optionsmenu_keycode[5]=115
 132 set optionsansi_caption[5]="^[1mS^[mingle User. ^[34;1mOff^[m"
 133 set optionstoggled_ansi[5]="^[1mS^[mingle User. ^[32;7mOn^[m"
 134
 135 set optionsmenu_init[6]="init_verbose"
 136 set optionsmenu_caption[6]="[V]erbose..... off"
 137 set optionstoggled_text[6]="[V]erbose..... On"
 138 set optionsmenu_command[6]="toggle_verbose"
 139 set optionsmenu_keycode[6]=118
 140 set optionsansi_caption[6]="^[1mV^[merbose..... ^[34;1mOff^[m"
 141 set optionstoggled_ansi[6]="^[1mV^[merbose..... ^[32;7mOn^[m"
 142
 143 \
 144 \ BOOT ENVIRONMENT MENU
 145 \
 146
 147 set menuset_name3="bootenv"
 148
 149 set bemenu_current="Active: "
 150 set beansi_current="^[1m${bemenu_current}^[m"
 151 set bemenu_bootfs="bootfs: "
 152 set beansi_bootfs="^[1m${bemenu_bootfs}^[m"
 153 set bemenu_page="[P]age: "
 154 set beansi_page="^[1mP^[mage: "
 155 set bemenu_pageof=" of "
 156 set beansi_pageof="${bemenu_pageof}"
 157 set zfs_be_currpage=1
 158
 159 set bootenvmenu_init="init_bootenv"
 160
 161 set bootenvmenu_command[1]="be_draw_screen 1 goto_menu"
 162 set bootenvmenu_keycode[1]=8
 163
 164 set bootenvmenu_command[2]="set_bootenv"
 165 set bootenvmenu_keycode[2]=97
 166 set bootenv_root[2]="${zfs_be_active}"
 167
 168 set bootenvmenu_command[3]="set_be_page"
 169 set bootenvmenu_keycode[3]=112
 170
 171 set bootenvmenu_options=4
 172 set bootenvmenu_optionstext="Boot Environments:"
 173
 174 \ Enable automatic booting (add ``autoboot_delay=N'' to loader.conf(5) to
 175 \ customize the timeout; default is 10-seconds)
 176 \
 177 set menu_timeout_command="boot"
 178
 179 \ Include optional elements defined in a local file
 180 \
 181 try-include /boot/menu.rc.local
 182
 183 \ Initialize boot environment variables
 184 \
 185 s" reloadbe" sfind ( xt|0 bool ) [if]
 186     s" bootenv_autolist" getenv dup -1 = [if]
 187         drop s" execute" evaluate               \ Use evaluate to avoid passing
 188                                                 \ reloadbe an optional parameter
 189     [else]
 190         s" YES" compare-insensitive 0= [if]
 191             s" execute" evaluate
 192         [then]
 193     [then]
 194 [else]
 195     drop ( xt=0 )
 196 [then]
 197
 198 \ Display the main menu (see `menu.4th')
 199 set menuset_initial=1
 200 menuset-loadinitial
 201 menu-display