| Current File : //usr/bin/mk_modmap |
#!/bin/sh
# mk_modmap
# Tries to translate a keytable file into a file parseable by xmodmap
#
# This is a hack, and has a lot of magic numbers and names hardcoded
# into it. Suggestions on how to avoid this are welcome.
#
# Kjetil T. Homme, University of Oslo 1993
# <kjetilho@ifi.uio.no>
#
# Added support for BackSpace, dead keys, Cyrillic, Greek and Hebrew keysysms
# Pablo Saratxaga <srtxg@chanae.stben.be> - May 1997
#
# Added support for keys found in Microsoft keyboards, Compose keysym
# (translates to Multi_key in X11) and for numeric hexadecimal values.
# Pablo Saratxaga <srtxg@f2219.n293.z2.fidonet.org> - Jun 1997
case $1 in
-v*) verbose=1; shift ;;
esac
if test ! -f /usr/include/X11/X.h; then
echo Make sure you have a link to you X include files called
echo /usr/include/X11 first.
exit 1
fi
cat <<__EOH__
! Converted keytable file to xmodmap file
! with `basename $0` by `whoami`@`hostname` `date`
clear Mod1
clear Mod2
__EOH__
awk -F'#' '
/[a-z]+.*keycode/ { next }
/^[ \t]*$/ { next }
/^string/ { next }
{ sub("^[ \t]*", "") }
NF > 1 {
printf("!");
for (i = 2; i <= NF; i++) {
printf(" " $i);
$i = "";
}
print "";
if ($1 == "")
next;
}
{ print }
' "$@" | awk -v verbose=$verbose '
BEGIN {
while (getline < "/usr/include/X11/keysymdef.h" == 1) {
if ($0 ~ /XK_/) {
sub(/.*XK_/, "");
sub(/[\t ].*/, "");
valid[$0] = 1;
}
}
valid["X386Sys_Req"] = 1;
valid["BackSpace"] = 1;
shifts["Control"] = shifts["Shift"] = 1;
shift_keys[29] = "Control_L";
shift_keys[97] = "Control_R";
shift_keys[42] = "Shift_L";
shift_keys[54] = "Shift_R";
trans_keys[ 96] = 108; # KP_Enter
trans_keys[ 97] = 109; # Control_R
trans_keys[ 98] = 112; # KP_Divide
trans_keys[100] = 113; # Mode_switch (AltGr)
trans_keys[101] = 114; # Break
trans_keys[103] = 98; # Up
trans_keys[104] = 99; # Prior
trans_keys[105] = 100; # Left
trans_keys[106] = 102; # Right
trans_keys[108] = 104; # Down
trans_keys[109] = 105; # Next
trans_keys[110] = 106; # Insert
trans_keys[111] = 107; # Delete
trans_keys[125] = 115; # left windows key (MS keyboards)
trans_keys[126] = 116; # right windows key (MS keyboards)
trans_keys[127] = 117; # menu key (MS keyboards)
trans_names["Alt"] = "Alt_L Meta_L";
trans_names["AltGr"] = "Mode_switch";
trans_names["one"] = "1";
trans_names["two"] = "2";
trans_names["three"] = "3";
trans_names["four"] = "4";
trans_names["five"] = "5";
trans_names["six"] = "6";
trans_names["seven"] = "7";
trans_names["eight"] = "8";
trans_names["nine"] = "9";
trans_names["zero"] = "0";
trans_names["KP_Comma"] = "KP_Decimal";
trans_names["dead_tilde"] = "dead_tilde";
trans_names["dead_circumflex"] = "dead_circumflex";
trans_names["dead_acute"] = "dead_acute";
trans_names["dead_grave"] = "dead_grave";
trans_names["dead_diaeresis"] = "dead_diaeresis";
trans_names["dead_cedilla"] = "dead_cedilla";
trans_names["dead_ogonek"] = "dead_ogonek";
trans_names["dead_caron"] = "dead_caron";
trans_names["dead_breve"] = "dead_breve";
trans_names["dead_doubleacute"] = "dead_doubleacute";
trans_names["Compose"] = "Multi_key";
# trans_names["Last_Console"] = "X386Sys_Req";
# Greek
trans_names["Alphaaccent"] = "Greek_ALPHAaccent";
trans_names["Epsilonaccent"] = "Greek_EPSILONaccent";
trans_names["Etaaccent"] = "Greek_ETAaccent";
trans_names["Iotaaccent"] = "Greek_IOTAaccent";
trans_names["Iotadiaeresis"] = "Greek_IOTAdiaeresis";
trans_names["Omicronaccent"] = "Greek_OMICRONaccent";
trans_names["Upsilonaccent"] = "Greek_UPSILONaccent";
trans_names["Upsilondieresis"] = "Greek_UPSILONdieresis";
trans_names["Omegaaccent"] = "Greek_OMEGAaccent";
trans_names["Alpha"] = "Greek_ALPHA";
trans_names["Beta"] = "Greek_BETA";
trans_names["Gamma"] = "Greek_GAMMA";
trans_names["Delta"] = "Greek_DELTA";
trans_names["Epsilon"] = "Greek_EPSILON";
trans_names["Zeta"] = "Greek_ZETA";
trans_names["Eta"] = "Greek_ETA";
trans_names["Theta"] = "Greek_THETA";
trans_names["Iota"] = "Greek_IOTA";
trans_names["Kappa"] = "Greek_KAPPA";
trans_names["Lamda"] = "Greek_LAMDA";
trans_names["Lambda"] = "Greek_LAMBDA";
trans_names["Mu"] = "Greek_MU";
trans_names["Nu"] = "Greek_NU";
trans_names["Xi"] = "Greek_XI";
trans_names["Ksi"] = "Greek_XI";
trans_names["Omicron"] = "Greek_OMICRON";
trans_names["Pi"] = "Greek_PI";
trans_names["Rho"] = "Greek_RHO";
trans_names["Sigma"] = "Greek_SIGMA";
trans_names["Tau"] = "Greek_TAU";
trans_names["Upsilon"] = "Greek_UPSILON";
trans_names["Phi"] = "Greek_PHI";
trans_names["Chi"] = "Greek_CHI";
trans_names["Khi"] = "Greek_CHI";
trans_names["Psi"] = "Greek_PSI";
trans_names["Omega"] = "Greek_OMEGA";
trans_names["accent"] = "Greek_accentdieresis";
trans_names["horizbar"] = "Greek_horizbar";
trans_names["alphaaccent"] = "Greek_alphaaccent";
trans_names["epsilonaccent"] = "Greek_epsilonaccent";
trans_names["etaaccent"] = "Greek_etaaccent";
trans_names["iotaaccent"] = "Greek_iotaaccent";
trans_names["iotadieresis"] = "Greek_iotadieresis";
trans_names["iotaaccentdieresis"] = "Greek_iotaaccentdieresis";
trans_names["omicronaccent"] = "Greek_omicronaccent";
trans_names["upsilonaccent"] = "Greek_upsilonaccent";
trans_names["upsilondieresis"] = "Greek_upsilondieresis";
trans_names["upsilonaccentdieresis"] = "Greek_upsilonaccentdieresis";
trans_names["omegaaccent"] = "Greek_omegaaccent";
trans_names["alpha"] = "Greek_alpha";
trans_names["beta"] = "Greek_beta";
trans_names["gamma"] = "Greek_gamma";
trans_names["delta"] = "Greek_delta";
trans_names["epsilon"] = "Greek_epsilon";
trans_names["zeta"] = "Greek_zeta";
trans_names["eta"] = "Greek_eta";
trans_names["theta"] = "Greek_theta";
trans_names["iota"] = "Greek_iota";
trans_names["kappa"] = "Greek_kappa";
trans_names["lamda"] = "Greek_lamda";
trans_names["lambda"] = "Greek_lambda";
trans_names["mu"] = "Greek_mu";
trans_names["nu"] = "Greek_nu";
trans_names["xi"] = "Greek_xi";
trans_names["ksi"] = "Greek_xi";
trans_names["omicron"] = "Greek_omicron";
trans_names["pi"] = "Greek_pi";
trans_names["rho"] = "Greek_rho";
trans_names["sigma"] = "Greek_sigma";
trans_names["terminalsigma"] = "Greek_finalsmallsigma";
trans_names["tau"] = "Greek_tau";
trans_names["upsilon"] = "Greek_upsilon";
trans_names["phi"] = "Greek_phi";
trans_names["chi"] = "Greek_chi";
trans_names["khi"] = "Greek_chi";
trans_names["psi"] = "Greek_psi";
trans_names["omega"] = "Greek_omega";
trans_names["switch"] = "Greek_switch";
# Cyrillic
trans_names["cyrillic_capital_letter_io"] = "Cyrillic_IO";
trans_names["cyrillic_capital_letter_je"] = "Cyrillic_JE";
trans_names["cyrillic_capital_letter_lje"] = "Cyrillic_LJE";
trans_names["cyrillic_capital_letter_nje"] = "Cyrillic_NJE";
trans_names["cyrillic_capital_letter_dzhe"] = "Cyrillic_DZHE";
trans_names["cyrillic_capital_letter_yu"] = "Cyrillic_YU";
trans_names["cyrillic_capital_letter_iu"] = "Cyrillic_YU";
trans_names["cyrillic_capital_letter_a"] = "Cyrillic_A";
trans_names["cyrillic_capital_letter_be"] = "Cyrillic_BE";
trans_names["cyrillic_capital_letter_tse"] = "Cyrillic_TSE";
trans_names["cyrillic_capital_letter_de"] = "Cyrillic_DE";
trans_names["cyrillic_capital_letter_ie"] = "Cyrillic_IE";
trans_names["cyrillic_capital_letter_ef"] = "Cyrillic_EF";
trans_names["cyrillic_capital_letter_ghe"] = "Cyrillic_GHE";
trans_names["cyrillic_capital_letter_ge"] = "Cyrillic_GHE";
trans_names["cyrillic_capital_letter_ha"] = "Cyrillic_HA";
trans_names["cyrillic_capital_letter_kha"] = "Cyrillic_HA";
trans_names["cyrillic_capital_letter_i"] = "Cyrillic_I";
trans_names["cyrillic_capital_letter_ii"] = "Cyrillic_I";
trans_names["cyrillic_capital_letter_short_i"] = "Cyrillic_SHORTI";
trans_names["cyrillic_capital_letter_short_ii"] = "Cyrillic_SHORTI";
trans_names["cyrillic_capital_letter_ka"] = "Cyrillic_KA";
trans_names["cyrillic_capital_letter_el"] = "Cyrillic_EL";
trans_names["cyrillic_capital_letter_em"] = "Cyrillic_EM";
trans_names["cyrillic_capital_letter_en"] = "Cyrillic_EN";
trans_names["cyrillic_capital_letter_o"] = "Cyrillic_O";
trans_names["cyrillic_capital_letter_pe"] = "Cyrillic_PE";
trans_names["cyrillic_capital_letter_ya"] = "Cyrillic_YA";
trans_names["cyrillic_capital_letter_ia"] = "Cyrillic_YA";
trans_names["cyrillic_capital_letter_er"] = "Cyrillic_ER";
trans_names["cyrillic_capital_letter_es"] = "Cyrillic_ES";
trans_names["cyrillic_capital_letter_te"] = "Cyrillic_TE";
trans_names["cyrillic_capital_letter_u"] = "Cyrillic_U";
trans_names["cyrillic_capital_letter_zhe"] = "Cyrillic_ZHE";
trans_names["cyrillic_capital_letter_ve"] = "Cyrillic_VE";
trans_names["cyrillic_capital_soft_sign"] = "Cyrillic_SOFTSIGN";
trans_names["cyrillic_capital_letter_yeru"] = "Cyrillic_YERU";
trans_names["cyrillic_capital_letter_yeri"] = "Cyrillic_YERU";
trans_names["cyrillic_capital_letter_ze"] = "Cyrillic_ZE";
trans_names["cyrillic_capital_letter_sha"] = "Cyrillic_SHA";
trans_names["cyrillic_capital_letter_e"] = "Cyrillic_E";
trans_names["cyrillic_capital_letter_reversed_e"] = "Cyrillic_E";
trans_names["cyrillic_capital_letter_shcha"] = "Cyrillic_SHCHA";
trans_names["cyrillic_capital_letter_che"] = "Cyrillic_CHE";
trans_names["cyrillic_capital_hard_sign"] = "Cyrillic_HARDSIGN";
trans_names["cyrillic_small_letter_io"] = "Cyrillic_io";
trans_names["cyrillic_small_letter_je"] = "Cyrillic_je";
trans_names["cyrillic_small_letter_lje"] = "Cyrillic_lje";
trans_names["cyrillic_small_letter_nje"] = "Cyrillic_nje";
trans_names["cyrillic_small_letter_dzhe"] = "Cyrillic_dzhe";
trans_names["cyrillic_small_letter_yu"] = "Cyrillic_yu";
trans_names["cyrillic_small_letter_iu"] = "Cyrillic_yu";
trans_names["cyrillic_small_letter_a"] = "Cyrillic_a";
trans_names["cyrillic_small_letter_be"] = "Cyrillic_be";
trans_names["cyrillic_small_letter_tse"] = "Cyrillic_tse";
trans_names["cyrillic_small_letter_de"] = "Cyrillic_de";
trans_names["cyrillic_small_letter_ie"] = "Cyrillic_ie";
trans_names["cyrillic_small_letter_ef"] = "Cyrillic_ef";
trans_names["cyrillic_small_letter_ghe"] = "Cyrillic_ghe";
trans_names["cyrillic_small_letter_ge"] = "Cyrillic_ghe";
trans_names["cyrillic_small_letter_ha"] = "Cyrillic_ha";
trans_names["cyrillic_small_letter_kha"] = "Cyrillic_ha";
trans_names["cyrillic_small_letter_i"] = "Cyrillic_i";
trans_names["cyrillic_small_letter_ii"] = "Cyrillic_i";
trans_names["cyrillic_small_letter_short_i"] = "Cyrillic_shorti";
trans_names["cyrillic_small_letter_short_ii"] = "Cyrillic_shorti";
trans_names["cyrillic_small_letter_ka"] = "Cyrillic_ka";
trans_names["cyrillic_small_letter_el"] = "Cyrillic_el";
trans_names["cyrillic_small_letter_em"] = "Cyrillic_em";
trans_names["cyrillic_small_letter_en"] = "Cyrillic_en";
trans_names["cyrillic_small_letter_o"] = "Cyrillic_o";
trans_names["cyrillic_small_letter_pe"] = "Cyrillic_pe";
trans_names["cyrillic_small_letter_ya"] = "Cyrillic_ya";
trans_names["cyrillic_small_letter_ia"] = "Cyrillic_ya";
trans_names["cyrillic_small_letter_er"] = "Cyrillic_er";
trans_names["cyrillic_small_letter_es"] = "Cyrillic_es";
trans_names["cyrillic_small_letter_te"] = "Cyrillic_te";
trans_names["cyrillic_small_letter_u"] = "Cyrillic_u";
trans_names["cyrillic_small_letter_zhe"] = "Cyrillic_zhe";
trans_names["cyrillic_small_letter_ve"] = "Cyrillic_ve";
trans_names["cyrillic_small_soft_sign"] = "Cyrillic_softsign";
trans_names["cyrillic_small_letter_yeru"] = "Cyrillic_yeru";
trans_names["cyrillic_small_letter_yeri"] = "Cyrillic_yeru";
trans_names["cyrillic_small_letter_ze"] = "Cyrillic_ze";
trans_names["cyrillic_small_letter_sha"] = "Cyrillic_sha";
trans_names["cyrillic_small_letter_e"] = "Cyrillic_e";
trans_names["cyrillic_small_letter_reversed_e"] = "Cyrillic_e";
trans_names["cyrillic_small_letter_shcha"] = "Cyrillic_shcha";
trans_names["cyrillic_small_letter_che"] = "Cyrillic_che";
trans_names["cyrillic_small_hard_sign"] = "Cyrillic_hardsign";
trans_names["serbocroatian_cyrillic_capital_letter_dje"] = "Serbian_DJE";
trans_names["serbocroatian_cyrillic_capital_letter_je"] = "Serbian_JE";
trans_names["serbocroatian_cyrillic_capital_letter_lje"] = "Serbian_LJE";
trans_names["serbocroatian_cyrillic_capital_letter_nje"] = "Serbian_NJE";
trans_names["serbocroatian_cyrillic_capital_letter_tshe"] = "Serbian_TSHE";
trans_names["serbocroatian_cyrillic_capital_letter_dze"] = "Serbian_DZE";
trans_names["serbocroatian_cyrillic_small_letter_dje"] = "Serbian_dje";
trans_names["serbocroatian_cyrillic_small_letter_je"] = "Serbian_je";
trans_names["serbocroatian_cyrillic_small_letter_lje"] = "Serbian_lje";
trans_names["serbocroatian_cyrillic_small_letter_nje"] = "Serbian_nje";
trans_names["serbocroatian_cyrillic_small_letter_tshe"] = "Serbian_tshe";
trans_names["serbocroatian_cyrillic_small_letter_dze"] = "Serbian_dze";
trans_names["macedonian_cyrillic_capital_letter_gje"] = "Macedonia_GJE";
trans_names["macedonian_cyrillic_capital_letter_dze"] = "Macedonia_DSE";
trans_names["macedonian_cyrillic_capital_letter_kje"] = "Macedonia_KJE";
trans_names["macedonian_cyrillic_small_letter_gje"] = "Macedonia_gje";
trans_names["macedonian_cyrillic_small_letter_dze"] = "Macedonia_dse";
trans_names["macedonian_cyrillic_small_letter_kje"] = "Macedonia_kje";
trans_names["ukrainian_cyrillic_capital_letter_ie"] = "Ukrainian_JE";
trans_names["ukrainian_cyrillic_capital_letter_i"] = "Ukrainian_I";
trans_names["ukrainian_cyrillic_capital_letter_yi"] = "Ukrainian_YI";
trans_names["ukrainian_cyrillic_small_letter_ie"] = "Ukrainian_ie";
trans_names["ukrainian_cyrillic_small_letter_i"] = "Ukrainian_i";
trans_names["ukrainian_cyrillic_small_letter_yi"] = "Ukrainian_yi";
trans_names["bielorussian_cyrillic_capital_letter_short_u"] = "Byelorussian_SHORTU";
trans_names["bielorussian_cyrillic_capital_letter_i"] = "Ukrainian_I";
trans_names["bielorussian_cyrillic_small_letter_short_u"] = "Byelorussian_shortu";
trans_names["bielorussian_cyrillic_small_letter_i"] = "Ukrainian_i";
# Hebrew
trans_names["doubleunderscore"] = "hebrew_doublelowline";
trans_names["alef"] = "hebrew_aleph";
trans_names["bet"] = "hebrew_bet";
trans_names["gimel"] = "hebrew_gimel";
trans_names["dalet"] = "hebrew_dalet";
trans_names["he"] = "hebrew_he";
trans_names["vav"] = "hebrew_waw";
trans_names["zayin"] = "hebrew_zain";
trans_names["het"] = "hebrew_chet";
trans_names["tet"] = "hebrew_tet";
trans_names["yod"] = "hebrew_yod";
trans_names["finalkaf"] = "hebrew_finalkaph";
trans_names["kaf"] = "hebrew_kaph";
trans_names["lamed"] = "hebrew_lamed";
trans_names["finalmem"] = "hebrew_finalmem";
trans_names["mem"] = "hebrew_mem";
trans_names["finalnun"] = "hebrew_finalnun";
trans_names["nun"] = "hebrew_nun";
trans_names["samekh"] = "hebrew_samech";
trans_names["ayin"] = "hebrew_ayin";
trans_names["finalpe"] = "hebrew_finalpe";
trans_names["pe"] = "hebrew_pe";
trans_names["finaltsadi"] = "hebrew_finalzade";
trans_names["tsadi"] = "hebrew_zade";
trans_names["qof"] = "hebrew_qoph";
trans_names["resh"] = "hebrew_resh";
trans_names["shin"] = "hebrew_shin";
trans_names["tav"] = "hebrew_taw";
}
$1 == "keycode" {
output = "";
keycode = $2;
i = ($3 == "=") ? 4 : 3;
for ( ; i <= NF; i++) {
sub(/^\+/, "", $i);
n = $i;
if ($i in shifts)
n = shift_keys[keycode];
else if ($i in trans_names)
n = trans_names[$i];
if (n in valid || n in valid || $i in trans_names)
output = output " " n;
else if (n ~ /0x[0-9a-fA-F]*/)
output = output " " n;
else
msg("Skipped " $i);
}
if (keycode in trans_keys)
keycode = trans_keys[keycode];
else
keycode += 8;
if (keycode > 117)
msg("Skipped keycode " keycode-8 ": " output);
else if (output)
printf("keycode %3d = %s\n", keycode, output);
next;
}
{ print }
function msg(m) { if (verbose) print m > "/dev/stderr"; }'
cat <<__EOH__
add Mod1 = Alt_L
add Mod2 = Mode_switch
__EOH__