Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!think.com!spool.mu.edu!munnari.oz.au!bruce!gdwb.oz.au!ajk From: ajk@gdwb.oz.au (Adrian Keats) Newsgroups: comp.databases Subject: Ingres termcap entry for xterm and/or OpenWindows shelltool Keywords: ingres xterm Message-ID: <586@rome.gdwb.oz.au> Date: 23 Apr 91 06:15:20 GMT Article-I.D.: rome.586 Sender: news@gdwb.oz.au Lines: 306 Posting in response to belle@skipper.dfrf.nasa.gov 8 Apr 1991 #! /bin/sh # This is a shell archive. Remove anything before this line, then unpack # it by saving it into a file and typing "sh file". To overwrite existing # files, type "sh file -c". You can also feed this as standard input via # unshar, or by typing "sh 'README' <<'END_OF_FILE' XThe files included in this archive are for ingres running under XOpenWindows. X X XREADME this file Xtermcap extract from .../ingres/files/termcap Xxsun4.map put in .../ingres/files XXdefaults resources to be set for users X X XThe site conditions are as follows: X X----------------------------------------------- XSun Sparcstations 1, 1+, 2, SLCs and IPCs XSun 4 Type Keyboards XOpenWindows v2 XSunOS 4.1.1 XIngres 6.3 X----------------------------------------------- X XThe keyboard mapping was done to utilise the actual key functions as much Xas possible. It works well here. X XYour comments as to its suitability for your site would be appreciated as I Xam more than happy to improve the mapping. X X X XRegards Xajk@gdwb.OZ.AU END_OF_FILE if test 709 -ne `wc -c <'README'`; then echo shar: \"'README'\" unpacked with wrong size! fi # end of 'README' fi if test -f 'termcap' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'termcap'\" else echo shar: Extracting \"'termcap'\" \(2816 characters\) sed "s/^X//" >'termcap' <<'END_OF_FILE' X######################################################################## X# Modifications by ajk@gdwb.oz.au 4.Oct.1990 X######################################################################## X# This is an improvement on the Sun terminal running under suntools X# Modified by ajk 3.Oct.90 to suit Sun Type 4 Keyboard X# Blinking and Change Intensity don't work, so aren't defined. X# Anything and Reverse Video is set to Reverse Video. X# Anything (but RV) and Underline is set to Underline. XMu|sun4|Sun Microsystems Workstation console Type 4:\ X :co#80:li#24:cl=^L:bs:cm=\E[%i%d;%dH:nd=\E[C:up=\E[A:\ X :am:bs:km:mi:ms:pt:\ X :ce=\E[K:cd=\E[J:so=\E[7m:se=\E[m:\ X :us=2\E[4m:ue=2\E[m:\ X :ku=\E[A:kd=\E[B:kr=\E[C:kl=\E[D:\ X :cs=5\E[%2;%2r:\ X :be=1\E[m:eb=1\E[m:rv=1\E[7m:re=1\E[m:ea=1\E[m:\ X :za=1\E[7m:zb=1\E[4m:zd=1\E[7m:\ X :ze=1\E[4m:zf=1\E[7m:zg=1\E[7m:zh=1\E[4m:\ X :zi=1\E[7m:zj=1\E[7m:zk=1\E[7m:es=\E[?7h:\ X :kh=\E[H:ky:k0=\E[208z:k1=\E[209z:k2=\E[210z:k3=\E[211z:pt:sr=5\EM:\ X :k4=\E[212z:k5=\E[213z:k6=\E[214z:k7=\E[216z:k8=\E[218z:k9=\E[220z:\ X :kA=\E[222z:kB=\E[225z:kC=\E[226z:kD=\E[227z:kE=\E[228z:kF=\E[229z:\ X :kG=\E[230z:kH=\E[231z:kI=\E[232z:kJ=\E[233z:kK=\E[234z:kL=\E[235z:\ X :kM=\E[193z:kN=\E[194z:kO=\E[195z:kP=\E[247z:kQ=\E[249z:kR=\E[250z:\ X :kS=\E[253z:kT=\E[254z:kn#30:\ X :mf=sun4.map:Ge=ansi:Gp=ansi:Gh:Go:Gw:GC#68:GR#23: X# This is an improvement on the Sun terminal running under X X# Modified by ajk 3.Oct.90 to suit Sun Type 4 Keyboard X# Blinking and Change Intensity don't work, so aren't defined. X# Anything and Reverse Video is set to Reverse Video. X# Anything (but RV) and Underline is set to Underline. XMu|xsun4|Sun Microsystems Workstation console Type 4:\ X :co#80:li#25:cl=\E[;H\E[2J:bs:cm=\E[%i%d;%dH:nd=\E[C:up=\E[A:\ X :am:bs:km:mi:ms:pt:\ X :ce=\E[K:cd=\E[J:so=\E[7m:se=\E[m:\ X :us=2\E[4m:ue=2\E[m:\ X :ku=\E[A:kd=\E[B:kr=\E[C:kl=\E[D:\ X :cs=5\E[%2;%2r:\ X :be=1\E[m:eb=1\E[m:rv=1\E[7m:re=1\E[m:ea=1\E[m:\ X :za=1\E[7m:zb=1\E[4m:zd=1\E[7m:\ X :ze=1\E[4m:zf=1\E[7m:zg=1\E[7m:zh=1\E[4m:\ X :zi=1\E[7m:zj=1\E[7m:zk=1\E[7m:es=\E[?7h:\ X :kh=\E[H:ky:k0=\E[208z:k1=\E[209z:k2=\E[210z:k3=\E[211z:pt:sr=5\EM:\ X :k4=\E[212z:k5=\E[213z:k6=\E[214z:k7=\E[216z:k8=\E[218z:k9=\E[220z:\ X :kA=\E[222z:kB=\E[225z:kC=\E[226z:kD=\E[227z:kE=\E[228z:kF=\E[229z:\ X :kG=\E[230z:kH=\E[231z:kI=\E[232z:kJ=\E[233z:kK=\E[234z:kL=\E[235z:\ X :kM=\E[193z:kN=\E[194z:kO=\E[195z:kP=\E[247z:kQ=\E[249z:kR=\E[250z:\ X :kS=\E[253z:kT=\E[254z:kU=\E[224z:kn#31:\ X :mf=xsun4.map:Ge=ansi:Gp=ansi:Gh:Go:Gw:GC#68:GR#23: X######################################################################## X# End of modifications by ajk@gdwb.oz.au 4.Oct.1990 X######################################################################## END_OF_FILE if test 2816 -ne `wc -c <'termcap'`; then echo shar: \"'termcap'\" unpacked with wrong size! fi # end of 'termcap' fi if test -f 'xsun4.map' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'xsun4.map'\" else echo shar: Extracting \"'xsun4.map'\" \(2692 characters\) sed "s/^X//" >'xsun4.map' <<'END_OF_FILE' X/* FRS mapping file for xsun4 (ajk) with Function Keys */ X X/* Menu Key */ X menu = pf9 (R11) X X/* Help facility */ X frskey1 = pf31 (F1) X X/* Quit from program */ X frskey2 = pf21 (F11) X X/* End current screen and return to previous screen */ X frskey3 = pf20 (F10) X X/* Go or execute function */ X frskey4 = pf28 (Enter) X X/* Put cursor on top of form or table field */ X frskey5 = pf7 (Home) X X/* Put cursor on bottom of form or table field */ X frskey6 = pf10 (End) X X/* Find next occurrence of string in this column of table field */ X frskey7 = pf22 (F12) X X/* Save object in database */ X frskey8 = pf24 (Props) X X/* Forget and Undo */ X frskey9 = pf25 (Undo) X X/* Scroll page or form left */ X scrollleft = controlL (^L) X X/* Scroll page or form right */ X scrollright = controlR (^R) X X/* Previous screen or set of rows in table field */ X scrolldown = pf8 (PgUp) X X/* Next screen or set of rows in table field */ X scrollup = pf11 (PgDn) X X/* Print contents of current screen to file or printer */ X printscreen = pf2 (PrSc) X X/* Select first menu item */ X menuitem1 = pf12 (F2) X X/* Select second menu item */ X menuitem2 = pf13 (F3) X X/* Select third menu item */ X menuitem3 = pf14 (F4) X X/* Select fourth menu item */ X menuitem4 = pf15 (F5) X X/* Select fifth menu item */ X menuitem5 = pf16 (F6) X X/* Select sixth menu item */ X menuitem6 = pf17 (F7) X X/* Select seventh menu item */ X menuitem7 = pf18 (F8) X X/* Select eighth menu item */ X menuitem8 = pf19 (F9) X X/* Select ninth menu item */ X menuitem9 = pf1 (R1) X menuitem10 = pf3 (R3) X menuitem11 = pf4 (R4) X menuitem12 = pf5 (R5) X menuitem13 = pf6 (R6) X X/* Move cursor to next field */ X/* nextfield = controlI (Tab)*/ X nextfield = controlM (Return) X X/* Move cursor to previous field */ X/* previousfield = controlP (^P)*/ X/* previousfield = controlH (BS)*/ X previousfield = controlI (Tab) X X/* Move up one word within field */ X nextword = pf29 (grey+) X X/* Move back one word within field */ X previousword = pf30 (grey-) X X/* Switch between insert and overstrike mode */ X mode = pf26 (Ins) X X/* Redraw the screen */ X redraw = controlW (^W) X X/* Delete the character under the cursor */ X/* deletechar = controlD (^D)*/ X deletechar = controlDEL (Delete) X X/* Delete character immediately to left of cursor */ X/* rubout = controlDEL (Delete)*/ X/* rubout = controlD (^D)*/ X rubout = controlH (BS) X X/* Start default text editor on field */ X editor = controlE (^E) X X/* Move to first column of next row in table field */ X newrow = controlN (^N) X X/* Clear out the rest of the field */ X clear = pf27 (Del) X X/* Clear out the rest of the field, and move to next field */ X clearrest = controlF (^F) X X/* Auto-duplicate value while in fill mode */ X duplicate = controlA (^A) X END_OF_FILE if test 2692 -ne `wc -c <'xsun4.map'`; then echo shar: \"'xsun4.map'\" unpacked with wrong size! fi # end of 'xsun4.map' fi if test -f 'Xdefaults' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'Xdefaults'\" else echo shar: Extracting \"'Xdefaults'\" \(1692 characters\) sed "s/^X//" >'Xdefaults' <<'END_OF_FILE' Xingres*sunFunctionKeys: true Xingres*VT100*geometry: 80x25 Xingres.VT100.Translations: \ X#override F1: string(0x1b) string("[224z") \n\ X F2: string(0x1b) string("[225z") \n\ X F3: string(0x1b) string("[226z") \n\ X F4: string(0x1b) string("[227z") \n\ X F5: string(0x1b) string("[228z") \n\ X F6: string(0x1b) string("[229z") \n\ X F7: string(0x1b) string("[230z") \n\ X F8: string(0x1b) string("[231z") \n\ X F9: string(0x1b) string("[232z") \n\ X F10: string(0x1b) string("[233z") \n\ X F11: string(0x1b) string("[234z") \n\ X F12: string(0x1b) string("[235z") \n\ X F19: string(0x1b) string("[235z") \n\ X F20: string(0x06) \n\ X F21: string(0x1b) string("[208z") \n\ X F22: string(0x1b) string("[209z") \n\ X F23: string(0x1b) string("[210z") \n\ X F24: string(0x1b) string("[211z") \n\ X F25: string(0x1b) string("[212z") \n\ X F26: string(0x1b) string("[213z") \n\ X F27: string(0x1b) string("[214z") \n\ X Help: string(0x1b) string("[224z") \n\ X F29: string(0x1b) string("[216z") \n\ X F31: string(0x1b) string("[218z") \n\ X R13: string(0x1b) string("[220z") \n\ X F35: string(0x1b) string("[222z") \n\ X Up: string(0x1b) string("[A") \n\ X Left: string(0x1b) string("[D") \n\ X Right: string(0x1b) string("[C") \n\ X Down: string(0x1b) string("[B") \n\ X Insert: string(0x1b) string("[247z") \n\ X KP_Decimal: string(0x1b) string("[249z") \n\ X KP_Enter: string(0x1b) string("[250z") \n\ X KP_Subtract: string(0x1b) string("[254z") \n\ X KP_Add: string(0x1b) string("[253z") END_OF_FILE if test 1692 -ne `wc -c <'Xdefaults'`; then echo shar: \"'Xdefaults'\" unpacked with wrong size! fi # end of 'Xdefaults' fi echo shar: End of shell archive. exit 0 -- Adrian Keats Geelong & District Water Board Phone: +61 52 262334 61-67 Ryrie St Geelong Fax: +61 52 218236 Victoria 3220 Australia