1#! /bin/sh 2# $Id: MKkey_defs.sh,v 1.8 2002/06/01 17:24:28 tom Exp $ 3############################################################################## 4# Copyright (c) 2001,2002 Free Software Foundation, Inc. # 5# # 6# Permission is hereby granted, free of charge, to any person obtaining a # 7# copy of this software and associated documentation files (the "Software"), # 8# to deal in the Software without restriction, including without limitation # 9# the rights to use, copy, modify, merge, publish, distribute, distribute # 10# with modifications, sublicense, and/or sell copies of the Software, and to # 11# permit persons to whom the Software is furnished to do so, subject to the # 12# following conditions: # 13# # 14# The above copyright notice and this permission notice shall be included in # 15# all copies or substantial portions of the Software. # 16# # 17# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR # 18# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, # 19# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL # 20# THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER # 21# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING # 22# FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER # 23# DEALINGS IN THE SOFTWARE. # 24# # 25# Except as contained in this notice, the name(s) of the above copyright # 26# holders shall not be used in advertising or otherwise to promote the sale, # 27# use or other dealings in this Software without prior written # 28# authorization. # 29############################################################################## 30# 31# MKkey_defs.sh -- generate function-key definitions for curses.h 32# 33# Author: Thomas E. Dickey <dickey@herndon4.his.com> 2001 34# 35# Extract function-key definitions from the Caps file 36# 37: ${AWK-awk} 38DATA=${1-Caps} 39 40data=data$$ 41pass1=pass1_$$ 42pass2=pass2_$$ 43pass3=pass3_$$ 44pass4=pass4_$$ 45trap 'rm -f $data pass[1234]_$$' 0 1 2 5 15 46sed -e 's/[ ]\+/ /g' < $DATA |sort -n +5 >$data 47cat >>$data <<EOF 48key_resize kr1 str R1 KEY_RESIZE + ----- Terminal resize event 49EOF 50 51cat <<EOF 52/* 53 * These definitions were generated by $0 $DATA 54 */ 55EOF 56 57# KEY_RESET 58maxkey=345 59 60for pass in 1 2 3 4 61do 62 63output=pass${pass}_$$ 64 65${AWK-awk} >$output <$data ' 66function print_cols(text,cols) { 67 printf "%s", text 68 len = length(text); 69 while (len < cols) { 70 printf " " 71 len += 8; 72 } 73} 74function decode(keycode) { 75 result = 0; 76 if (substr(keycode, 1, 2) == "0x") { 77 digits="0123456789abcdef"; 78 } else if (substr(keycode, 1, 1) == "0") { 79 digits="01234567"; 80 } else { 81 digits="0123456789"; 82 } 83 while (length(keycode) != 0) { 84 digit=substr(keycode, 1, 1); 85 keycode=substr(keycode, 2); 86 result = result * length(digits) + index(digits, digit) - 1; 87 } 88 return result; 89} 90 91BEGIN { 92 maxkey='$maxkey'; 93 pass='$pass'; 94 key_max=1; 95 bits=1; 96 while (key_max < maxkey) { 97 bits = bits + 1; 98 key_max = (key_max * 2) + 1; 99 } 100 octal_fmt = sprintf ("%%0%do", (bits + 2) / 3 + 1); 101} 102 103/^$/ {next;} 104/^#/ {next;} 105/^capalias/ {next;} 106/^infoalias/ {next;} 107 108$5 != "-" && $6 != "-" { 109 if ($6 == "+") { 110 if (pass == 1 || pass == 2) 111 next; 112 thiskey=maxkey + 1; 113 } else { 114 if (pass == 3) 115 next; 116 thiskey=decode($6); 117 } 118 if (thiskey > maxkey) 119 maxkey = thiskey; 120 if (pass == 2 || pass == 3) { 121 showkey=sprintf(octal_fmt, thiskey); 122 if ($5 == "KEY_F(0)" ) { 123 printf "#define " 124 print_cols("KEY_F0", 16); 125 print_cols(showkey, 16); 126 print "/* Function keys. Space for 64 */"; 127 printf "#define " 128 print_cols("KEY_F(n)", 16); 129 print_cols("(KEY_F0+(n))", 16); 130 print "/* Value of function key n */" 131 } else { 132 printf "#define " 133 print_cols($5, 16); 134 print_cols(showkey, 16); 135 printf "/*" 136 for (i = 8; i <= NF; i++) 137 printf " %s", $i 138 print " */" 139 } 140 } 141 } 142END { 143 if (pass == 1) { 144 print maxkey; 145 } else if (pass == 4) { 146 print ""; 147 printf "#define "; 148 print_cols("KEY_MAX", 16); 149 result = sprintf (octal_fmt, key_max); 150 print_cols(result, 16); 151 printf "/* Maximum key value is "; 152 printf octal_fmt, maxkey; 153 print " */"; 154 } 155 } 156' 157if test $pass = 1 ; then 158 maxkey=`cat $pass1` 159fi 160 161done 162 163cat $pass2 164cat $pass3 165cat $pass4 166