d/freebsd-nq
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
e813a87350
freebsd-nq/usr.sbin/bsdconfig/console/keymap
Devin Teske d4ae33f072 Performance and debugging enhancements: 
+ Remove UNAME_P=$(...) from startup/misc -- already supplied by common.subr
+ Use f_getvar instead of $(eval echo \$$var) -- f_getvar is sub-shell free
+ Add `-e' and `-k var' options to f_eval_catch -- increasing use-cases
+ Use f_eval_catch to display errors on failure -- reducing duplicated code
+ Use f_eval_catch when we need output from a command -- improving debugging
+ Optimize f_isinter of strings.subr for performance -- now sub-shell free
+ Improve error checking on pidfiles -- using f_eval_catch and f_isinteger
+ Use $var_to_set arg of f_ifconfig_{inet,netmask} -- eliminate sub-shells
+ Use f_sprintf instead of $(printf ...) -- consolidate sub-shells
+ Use $var_to_set arg of f_route_get_default -- eliminate sub-shells
+ Add f_count to replace $(set -- ...;echo $#) -- eliminate sub-shells
+ Add f_count_ifs to replace $(IFS=x;set -- ...;echo $#) -- no sub-shells
+ Replace var="$var${var:+ }..." in loops with var="$var ..." with a follow-
  up var="${var# }" to trim leading whitespace -- optimize loops
+ Use $var_to_set arg of f_resolv_conf_nameservers -- eliminate sub-shells
+ Comments for the f_eval_catch function
+ Remove a duplicate `local ... desc ...' in f_device_get_all of device.subr
+ Use $var_to_set arg of f_device_capacity -- eliminate sub-shells
+ Whitespace fixes in f_dialog_init of dialog.subr
+ Optimize f_inet_atoi of media/tcpip.subr for performance -- sub-shell free
+ In several cases, send stderr to /dev/null -- clean up runtime execution
+ Change f_err of common.subr to go to program stderr not terminal stderr,
  allowing redirection of output from functions that use f_err
+ Disable debugging when using f_getvar to get variable argument to
  f_startup_rcconf_map_expand of startup/rcconf.subr
+ Use f_replace_all instead of $(echo ... | tr | sed) -- performance
+ Add a $var_to_set option to f_index_{file,menusel_{command,keyword}} of
  common.subr -- centralize sub-shells
2013-12-07 00:31:01 +00:00

333 lines
15 KiB
Bash
Executable File
Raw Blame History

#!/bin/sh
#-
# Copyright (c) 2012-2013 Devin Teske
# 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$
#
############################################################ INCLUDES
BSDCFG_SHARE="/usr/share/bsdconfig"
. $BSDCFG_SHARE/common.subr || exit 1
f_dprintf "%s: loading includes..." "$0"
f_include $BSDCFG_SHARE/dialog.subr
f_include $BSDCFG_SHARE/mustberoot.subr
f_include $BSDCFG_SHARE/sysrc.subr
BSDCFG_LIBE="/usr/libexec/bsdconfig" APP_DIR="080.console"
f_include_lang $BSDCFG_LIBE/$APP_DIR/include/messages.subr
f_index_menusel_keyword $BSDCFG_LIBE/$APP_DIR/INDEX "$pgm" ipgm &&
pgm="${ipgm:-$pgm}"
############################################################ CONFIGURATION
#
# List of keymap names
#
KEYMAP_NAMES="
belgian brazil_cp850 brazil_iso
brazil_iso_accent bulgarian_bds bulgarian_phonetic
central_european_iso croatian_iso czech_iso_accent
danish_cp865 danish_iso estonian_cp850
estonian_iso estonian_iso_15 finnish_cp850
finnish_iso french_iso french_iso_accent
french_iso_macbook german_cp850 german_iso
greek_101 greek_104 greek_elot
hungarian_101 hungarian_102 icelandic
icelandic_accent italian japanese_106
latin_american latin_american_accent norway_iso
polish_iso portuguese portuguese_accent
russia_koi8_r slovak slovenian
spanish spanish_accent swedish_cp850
swedish_iso swiss_french_cp850 swiss_french_iso
swiss_french_iso_accent swiss_german_cp850 swiss_german_iso
swiss_german_iso_accent uk_cp850 uk_iso
ukrainian_koi8_u ukrainian_koi8_u_koi8_r usa_capslock_ctrl
usa_dvorak usa_dvorak_left usa_dvorak_right
usa_emacs usa_iso usa_unix
" # END-QUOTE
############################################################ FUNCTIONS
# dialog_menu_main
#
# Display the dialog(1)-based application main menu.
#
dialog_menu_main()
{
local prompt="$msg_keymap_menu_text"
local menu_list defaultitem= # Calculated below
local hline="$hline_choose_a_keyboard_map"
#
# Export variables for awk(1) ENVIRON visibility
#
local name
for name in $KEYMAP_NAMES; do
export msg_$name msg_${name}_desc
done
#
# Generate a sorted list of keymaps. If the first letter of the keymap
# name is unique (case-insensitive) then it is used as the tag to allow
# the user to jump to that entry.
#
menu_list=$(
for name in $KEYMAP_NAMES; do
eval echo \"\$msg_$name\" msg_$name
done | sort | awk 'BEGIN { prefix = "" }
{
cur_prefix = tolower(substr(ENVIRON[$NF], 1, 1))
printf "'\''"
if ( prefix != cur_prefix )
prefix = cur_prefix
else
printf " "
printf "%s'\'' '\''%s'\''\n",
ENVIRON[$NF], ENVIRON[$NF"_desc"]
}'
)
local height width rows
eval f_dialog_menu_size height width rows \
\"\$DIALOG_TITLE\" \
\"\$DIALOG_BACKTITLE\" \
\"\$prompt\" \
\"\$hline\" \
$menu_list
case "$( f_sysrc_get keymap )" in
be.iso) defaultitem="$msg_belgian" ;;
br275.cp850) defaultitem="$msg_brazil_cp850" ;;
br275.iso) defaultitem="$msg_brazil_iso" ;;
br275.iso.acc) defaultitem="$msg_brazil_iso_accent" ;;
bg.bds.ctrlcaps) defaultitem="$msg_bulgarian_bds" ;;
bg.phonetic.ctrlcaps) defaultitem="$msg_bulgarian_phonetic" ;;
ce.iso2) defaultitem="$msg_central_european_iso" ;;
hr.iso) defaultitem="$msg_croatian_iso" ;;
cs.latin2.qwertz) defaultitem="$msg_czech_iso_accent" ;;
danish.cp865) defaultitem="$msg_danish_cp865" ;;
danish.iso) defaultitem="$msg_danish_iso" ;;
estonian.cp850) defaultitem="$msg_estonian_cp850" ;;
estonian.iso) defaultitem="$msg_estonian_iso" ;;
estonian.iso15) defaultitem="$msg_estonian_iso_15" ;;
finnish.cp850) defaultitem="$msg_finnish_cp850" ;;
finnish.iso) defaultitem="$msg_finnish_iso" ;;
fr.iso) defaultitem="$msg_french_iso" ;;
fr.iso.acc) defaultitem="$msg_french_iso_accent" ;;
fr.macbook.acc) defaultitem="$msg_french_iso_macbook" ;;
german.cp850) defaultitem="$msg_german_cp850" ;;
german.iso) defaultitem="$msg_german_iso" ;;
gr.us101.acc) defaultitem="$msg_greek_101" ;;
el.iso07) defaultitem="$msg_greek_104" ;;
gr.elot.acc) defaultitem="$msg_greek_elot" ;;
hu.iso2.101keys) defaultitem="$msg_hungarian_101" ;;
hu.iso2.102keys) defaultitem="$msg_hungarian_102" ;;
icelandic.iso) defaultitem="$msg_icelandic" ;;
icelandic.iso.acc) defaultitem="$msg_icelandic_accent" ;;
it.iso) defaultitem="$msg_italian" ;;
jp.106) defaultitem="$msg_japanese_106" ;;
latinamerican) defaultitem="$msg_latin_american" ;;
latinamerican.iso.acc) defaultitem="$msg_latin_american_accent" ;;
norwegian.iso) defaultitem="$msg_norway_iso" ;;
pl_PL.ISO8859-2) defaultitem="$msg_polish_iso" ;;
pt.iso) defaultitem="$msg_portuguese" ;;
pt.iso.acc) defaultitem="$msg_portuguese_accent" ;;
ru.koi8-r) defaultitem="$msg_russia_koi8_r" ;;
sk.iso2) defaultitem="$msg_slovak" ;;
si.iso) defaultitem="$msg_slovenian" ;;
spanish.iso) defaultitem="$msg_spanish" ;;
spanish.iso.acc) defaultitem="$msg_spanish_accent" ;;
swedish.cp850) defaultitem="$msg_swedish_cp850" ;;
swedish.iso) defaultitem="$msg_swedish_iso" ;;
swissfrench.cp850) defaultitem="$msg_swiss_french_cp850" ;;
swissfrench.iso) defaultitem="$msg_swiss_french_iso" ;;
swissfrench.iso.acc) defaultitem="$msg_swiss_french_iso_accent" ;;
swissgerman.cp850) defaultitem="$msg_swiss_german_cp850" ;;
swissgerman.iso) defaultitem="$msg_swiss_german_iso" ;;
swissgerman.iso.acc) defaultitem="$msg_swiss_german_iso_accent" ;;
uk.cp850) defaultitem="$msg_uk_cp850" ;;
uk.iso) defaultitem="$msg_uk_iso" ;;
ua.koi8-u) defaultitem="$msg_ukrainian_koi8_u" ;;
ua.koi8-u.shift.alt) defaultitem="$msg_ukrainian_koi8_u_koi8_r" ;;
us.pc-ctrl) defaultitem="$msg_usa_capslock_ctrl" ;;
us.dvorak) defaultitem="$msg_usa_dvorak" ;;
us.dvorakl) defaultitem="$msg_usa_dvorak_left" ;;
us.dvorakr) defaultitem="$msg_usa_dvorak_right" ;;
us.emacs) defaultitem="$msg_usa_emacs" ;;
us.iso) defaultitem="$msg_usa_iso" ;;
us.unix) defaultitem="$msg_usa_unix" ;;
esac
# The defaultitem may have to be indented to match the menu_list
if [ "$defaultitem" ]; then
( eval set -- $menu_list
while [ $# -gt 0 ]; do
[ "$defaultitem" = "$1" ] && break
[ " $defaultitem" = "$1" ] && exit 0
shift 2 # tag/item
done
exit 1 # No modification needed
) && defaultitem=" $defaultitem"
fi
local menu_choice
menu_choice=$( eval $DIALOG \
--title \"\$DIALOG_TITLE\" \
--backtitle \"\$DIALOG_BACKTITLE\" \
--hline \"\$hline\" \
--ok-label \"\$msg_ok\" \
--cancel-label \"\$msg_cancel\" \
--default-item \"\$defaultitem\" \
--menu \"\$prompt\" \
$height $width $rows \
$menu_list \
2>&1 >&$DIALOG_TERMINAL_PASSTHRU_FD
)
local retval=$?
f_dialog_menutag_store -s "$menu_choice"
return $retval
}
############################################################ MAIN
# Incorporate rc-file if it exists
[ -f "$HOME/.bsdconfigrc" ] && f_include "$HOME/.bsdconfigrc"
#
# Process command-line arguments
#
while getopts h$GETOPTS_STDARGS flag; do
case "$flag" in
h|\?) f_usage $BSDCFG_LIBE/$APP_DIR/USAGE "PROGRAM_NAME" "$pgm" ;;
esac
done
shift $(( $OPTIND - 1 ))
#
# Initialize
#
f_dialog_title "$msg_system_console_keymap"
f_dialog_backtitle "${ipgm:+bsdconfig }$pgm"
f_mustberoot_init
#
# Launch application main menu
#
while :; do
dialog_menu_main || f_die
f_dialog_menutag_fetch mtag
#
# Reverse the users choice into the variable name
#
keymap_name=
mtag="${mtag# }" # remove single leading-space if-present
for name in $KEYMAP_NAMES; do
debug= f_getvar msg_$name msg
[ "$msg" = "$mtag" ] && keymap_name="$name" break
done
[ "$keymap_name" ] || continue
keymap_to_set=
case "$keymap_name" in
belgian) keymap_to_set="be.iso" ;;
brazil_cp850) keymap_to_set="br275.cp850" ;;
brazil_iso) keymap_to_set="br275.iso" ;;
brazil_iso_accent) keymap_to_set="br275.iso.acc" ;;
bulgarian_bds) keymap_to_set="bg.bds.ctrlcaps" ;;
bulgarian_phonetic) keymap_to_set="bg.phonetic.ctrlcaps" ;;
central_european_iso) keymap_to_set="ce.iso2" ;;
croatian_iso) keymap_to_set="hr.iso" ;;
czech_iso_accent) keymap_to_set="cs.latin2.qwertz" ;;
danish_cp865) keymap_to_set="danish.cp865" ;;
danish_iso) keymap_to_set="danish.iso" ;;
estonian_cp850) keymap_to_set="estonian.cp850" ;;
estonian_iso) keymap_to_set="estonian.iso" ;;
estonian_iso_15) keymap_to_set="estonian.iso15" ;;
finnish_cp850) keymap_to_set="finnish.cp850" ;;
finnish_iso) keymap_to_set="finnish.iso" ;;
french_iso) keymap_to_set="fr.iso" ;;
french_iso_accent) keymap_to_set="fr.iso.acc" ;;
french_iso_macbook) keymap_to_set="fr.macbook.acc" ;;
german_cp850) keymap_to_set="german.cp850" ;;
german_iso) keymap_to_set="german.iso" ;;
greek_101) keymap_to_set="gr.us101.acc" ;;
greek_104) keymap_to_set="el.iso07" ;;
greek_elot) keymap_to_set="gr.elot.acc" ;;
hungarian_101) keymap_to_set="hu.iso2.101keys" ;;
hungarian_102) keymap_to_set="hu.iso2.102keys" ;;
icelandic) keymap_to_set="icelandic.iso" ;;
icelandic_accent) keymap_to_set="icelandic.iso.acc" ;;
italian) keymap_to_set="it.iso" ;;
japanese_106) keymap_to_set="jp.106" ;;
latin_american) keymap_to_set="latinamerican" ;;
latin_american_accent) keymap_to_set="latinamerican.iso.acc" ;;
norway_iso) keymap_to_set="norwegian.iso" ;;
polish_iso) keymap_to_set="pl_PL.ISO8859-2" ;;
portuguese) keymap_to_set="pt.iso" ;;
portuguese_accent) keymap_to_set="pt.iso.acc" ;;
russia_koi8_r) keymap_to_set="ru.koi8-r" ;;
slovak) keymap_to_set="sk.iso2" ;;
slovenian) keymap_to_set="si.iso" ;;
spanish) keymap_to_set="spanish.iso" ;;
spanish_accent) keymap_to_set="spanish.iso.acc" ;;
swedish_cp850) keymap_to_set="swedish.cp850" ;;
swedish_iso) keymap_to_set="swedish.iso" ;;
swiss_french_cp850) keymap_to_set="swissfrench.cp850" ;;
swiss_french_iso) keymap_to_set="swissfrench.iso" ;;
swiss_french_iso_accent) keymap_to_set="swissfrench.iso.acc" ;;
swiss_german_cp850) keymap_to_set="swissgerman.cp850" ;;
swiss_german_iso) keymap_to_set="swissgerman.iso" ;;
swiss_german_iso_accent) keymap_to_set="swissgerman.iso.acc" ;;
uk_cp850) keymap_to_set="uk.cp850" ;;
uk_iso) keymap_to_set="uk.iso" ;;
ukrainian_koi8_u) keymap_to_set="ua.koi8-u" ;;
ukrainian_koi8_u_koi8_r) keymap_to_set="ua.koi8-u.shift.alt" ;;
usa_capslock_ctrl) keymap_to_set="us.pc-ctrl" ;;
usa_dvorak) keymap_to_set="us.dvorak" ;;
usa_dvorak_left) keymap_to_set="us.dvorakl" ;;
usa_dvorak_right) keymap_to_set="us.dvorakr" ;;
usa_emacs) keymap_to_set="us.emacs" ;;
usa_iso) keymap_to_set="us.iso" ;;
usa_unix) keymap_to_set="us.unix" ;;
esac
if [ "$keymap_to_set" ]; then
f_eval_catch "$0" f_sysrc_set \
'f_sysrc_set keymap "%s"' "$keymap_to_set" || f_die
break
else
f_die 1 "$msg_unknown_keymap"
fi
done
exit $SUCCESS
################################################################################
# END
################################################################################
Reference in New Issue View Git Blame Copy Permalink