rickers@drexel.UUCP (Rick Wargo) (08/02/88)
The following is a shar file to patch catie. I am sorry about making changes so soon, but I just didn't put enough time into looking at the program (I got it up and running in about a half day ;-). Rickers ..!drexel!rickers ----------------------------- cut here ----------------------------------- #!/bin/sh # shar: Shell Archiver (v1.22) # # Run the following text with /bin/sh to create: # README.p01 # patch01 # patchlevel.h # echo "x - extracting README.p01 (Text)" sed 's/^X//' << 'SHAR_EOF' > README.p01 && XCatie is a shell script that allows custom terminfo entries for the XAT386 (or ANSI) monitor under Microport System V. This shar Xfixes up a few problems in the initial posting (sorry :-) and Xcreates the patchlevel.h file. X XTo use: cd to the directory where catie lives and sh < this-file. XIt will create README, patch01 and patchlevel.h. X XAfter unsharing, you must patch catie using `patch < patch01'. XBeware, Microport supplies a program also named patch that does Xbinary patching. The patch I am referring to is Larry Wall's patch. XI have renamed the Microport supplied patch program to "Patch" and Xkept Larry Wall's patch program named "patch". X XIf you do not have the patch program, send me email and I can mail you Xthe latest version of catie. X X Good luck, X Rickers X ..!drexel!rickers X SHAR_EOF chmod 0664 README.p01 || echo "restore of README.p01 fails" echo "x - extracting patch01 (Text)" sed 's/^X//' << 'SHAR_EOF' > patch01 && XSystem: catie XPatch #: 1 XPriority: HIGH XSubject: Updates to terminfo description for AT386/ANSI monitor. XFrom: rickers@drexel (Rick Wargo) X XDescription: X Catie does not make sure you are in mono mode when selecting mono. X The entry for blink is missing a left brace. Had knp and kpp X reversed. Forgot to put %p9 in sgr and a 10 in sgr0. Added a few X entries that I didn't have. Changed the ascs line to be what X james@bigtex (James Van Artsdalen) suggested in his terminfo posting. X Modified the init/reset entries slightly. Changed the order of some X of the cursor parameters. Added xoffc and xonc. Fixed synonyms. X XFix: X Easy, just say `cd catie-dir; patch < this-patch-file' and watch it go. X X*** catie.old Mon Aug 1 19:57:32 1988 X--- catie Mon Aug 1 19:57:03 1988 X*************** X*** 106,112 **** X # X # Let's do it. X # X- # setcolor -f white -b black X echo "$clear\c" X cat <<!Funky!Stuff! X X--- 106,111 ---- X*************** X*** 139,144 **** X--- 138,144 ---- X color_mono=mono X fi X if [ $color_mono = "mono" ]; then X+ setcolor -f white -b black X echo "" X echo Select the type of standout mode you would like: X echo " 1) \033[${reverse}mstandout mode type 1 -- reverse\033[m" X*************** X*** 330,336 **** X rm -f ${filename} X fi X X! if [ -s "$synonyms" ]; then X header="${major}|${synonyms}" X else X header=${major} X--- 330,336 ---- X rm -f ${filename} X fi X X! if [ -n "$synonyms" ]; then X header="${major}|${synonyms}" X else X header=${major} X*************** X*** 348,393 **** X it#8, X lines#${lines}, X vt#3, X! acsc=0[a~fxgqh~jYk?lZm@nEqDtCu4vAwBx3~y, X bel=^G, X! blink=\E[$blink}m, X bold=\E[${bold}m, X cbt=\E[Z, X! civis=\E[${cursor_invisible};${cursor_reset}m, X clear=\E[H\E[J, X! cnorm=\E[${normal_cursor};${cursor_reset}m, X cr=\r, X csr=\E[%i%p1%d;%p2%dr, X- cub=\E[%p1%dD, X cub1=\b, X! cud=\E[%p1%dB, X cud1=\n, X! cuf=\E[%p1%dC, X cuf1=\E[C, X cup=\E[%i%p1%d;%p2%dH, X- cuu=\E[%p1%dA, X cuu1=\E[A, X cvvis=\E[${very_visible_cursor}m, X- dch=\E[%p1%dP, X dch1=\E[P, X! dl=\E[%p1%dM, X dl1=\E[M, X ech=\E[%p1%dX, X ed=\E[J, X- el=\E[K, X el1=\E[1K, X home=\E[H, X hpa=\E[%i%p1%dG, X ht=\t, X hts=\EH, X! il=\E[%p1%dL, X il1=\E[L, X ind=\E[S, X indn=\E[%p1%dS, X invis=\E[${invisible}m, X is1=\E[=h, X! is2=\E7\E[1;25r\E8\E>\E[?3l\E[?4l\E[?5l\E[?7l\E[?8l\E[0;10;${normal_cursor};${cursor_reset};${fore_color};${back_color}m, X kbs=\b, X kcub1=\E[D, X kcud1=\E[B, X kcuf1=\E[C, X--- 348,397 ---- X it#8, X lines#${lines}, X vt#3, X! acsc=+/0~.ga1fxgqh20[lZm@k?jYqDx3tCu9vPwQ~z, X bel=^G, X! blink=\E[${blink}m, X bold=\E[${bold}m, X cbt=\E[Z, X! civis=\E[${cursor_reset};${cursor_invisible}m, X clear=\E[H\E[J, X! cnorm=\E[${cursor_reset};${normal_cursor}m, X cr=\r, X csr=\E[%i%p1%d;%p2%dr, X cub1=\b, X! cub=\E[%p1%dD, X cud1=\n, X! cud=\E[%p1%dB, X cuf1=\E[C, X+ cuf=\E[%p1%dC, X cup=\E[%i%p1%d;%p2%dH, X cuu1=\E[A, X+ cuu=\E[%p1%dA, X cvvis=\E[${very_visible_cursor}m, X dch1=\E[P, X! dch=\E[%p1%dP, X dl1=\E[M, X+ dl=\E[%p1%dM, X ech=\E[%p1%dX, X ed=\E[J, X el1=\E[1K, X+ el=\E[K, X home=\E[H, X hpa=\E[%i%p1%dG, X ht=\t, X hts=\EH, X! .ich1=\E[@ (*** if not using enter/exit insert mode), X! .ich=\E[%p1@ (*** if not using enter/exit insert mode), X il1=\E[L, X+ il=\E[%p1%dL, X ind=\E[S, X indn=\E[%p1%dS, X invis=\E[${invisible}m, X is1=\E[=h, X! is2=\E7\E[r\E8\E>\E[?3l\E[?4l\E[?5l\E[?7l\E[?8l\E[0;10;${cursor_reset};${normal_cursor};${fore_color};${back_color}m, X! kb2=\E[G, X kbs=\b, X+ kcbt=\E[Z, X kcub1=\E[D, X kcud1=\E[B, X kcuf1=\E[C, X*************** X*** 395,409 **** X kdch1=\E[P, X kdl1=\E[M, X kend=\E[Y, X- kf1=\EOP, X- kf2=\EOQ, X- kf3=\EOR, X- kf4=\EOS, X- kf5=\EOT, X- kf6=\EOU, X- kf7=\EOV, X- kf8=\EOW, X- kf9=\EOX, X kf10=\EOY, X kf11=\EOp, X kf12=\EOq, X--- 399,404 ---- X*************** X*** 414,426 **** X kf17=\EOv, X kf18=\EOw, X kf19=\EOx, X kf20=\EOy, X khome=\E[H, X kich1=\E[@, X kil1=\E[L, X! knp=\E[V, X! kpp=\E[U, X rc=\E8, X rev=\E[${reverse}m, X ri=\E[T, X rin=\E[%p1%dT, X--- 409,434 ---- X kf17=\EOv, X kf18=\EOw, X kf19=\EOx, X+ kf1=\EOP, X kf20=\EOy, X+ kf2=\EOQ, X+ kf3=\EOR, X+ kf4=\EOS, X+ kf5=\EOT, X+ kf6=\EOU, X+ kf7=\EOV, X+ kf8=\EOW, X+ kf9=\EOX, X khome=\E[H, X kich1=\E[@, X kil1=\E[L, X! kind=\E[T, X! knp=\E[U, X! kpp=\E[V, X! kri=\E[S, X! nel=\EE, X rc=\E8, X+ .rep=%p1%c\E[%p2%{1}%-%db (*** buggy), X rev=\E[${reverse}m, X ri=\E[T, X rin=\E[%p1%dT, X*************** X*** 429,437 **** X rmir=\E[4l, X rmso=\E[${back_color}m, X rmul=\E[m, X sc=\E7, X! sgr=\E[%?%p1%t${standout};%;%?%p2%t4;%;%?%p3%t7;%;%?%p4%t5;%;%?%p5%t8;%;%?%p6%t1;%;%?%p7%t8;%;m, X! sgr0=\E[0;${fore_color};${back_color}m, X smacs=\E[${upperchars}m, X smam=\E[?7l, X smir=\E[4h, X--- 437,448 ---- X rmir=\E[4l, X rmso=\E[${back_color}m, X rmul=\E[m, X+ rs1=\Ec\E[0m\E[r, X+ rs2=\E[22m, X+ rs3=\E[55m, X sc=\E7, X! sgr0=\E[0;10;${fore_color};${back_color}m, X! sgr=\E[%?%p1%t${standout};%;%?%p2%t4;%;%?%p3%t7;%;%?%p4%t5;%;%?%p5%t8;%;%?%p6%t1;%;%?%p9%t12%e10%;m, X smacs=\E[${upperchars}m, X smam=\E[?7l, X smir=\E[4h, X*************** X*** 439,447 **** X smul=\E[${underline}m, X tbc=\E[2g, X vpa=\E[%p1%dd, X! .ich=\E[%p1@ (*** if not using enter/exit insert mode), X! .ich1=\E[@ (*** if not using enter/exit insert mode), X! .rep=%p1%c\E[%p2%{1}%-%db (*** buggy), X !Color! X else X cat <<!Mono! >> ${filename} X--- 450,457 ---- X smul=\E[${underline}m, X tbc=\E[2g, X vpa=\E[%p1%dd, X! xoffc=^S, X! xonc=^Q, X !Color! X else X cat <<!Mono! >> ${filename} X*************** X*** 452,465 **** X it#8, X lines#${lines}, X vt#3, X! acsc=0[a~fxgqh~jYk?lZm@nEqDtCu4vAwBx3~y, X bel=^G, X blink=\E[${blink}m, X bold=\E[${bold}m, X cbt=\E[Z, X! civis=\E[${cursor_invisible};${cursor_reset}m, X clear=\E[H\E[J, X! cnorm=\E[${normal_cursor};${cursor_reset}m, X cr=\r, X csr=\E[%i%p1%d;%p2%dr, X cub1=\b, X--- 462,475 ---- X it#8, X lines#${lines}, X vt#3, X! acsc=+/0~.ga1fxgqh20[lZm@k?jYqDx3tCu9vPwQ~z, X bel=^G, X blink=\E[${blink}m, X bold=\E[${bold}m, X cbt=\E[Z, X! civis=\E[${cursor_reset};${cursor_invisible}m, X clear=\E[H\E[J, X! cnorm=\E[${cursor_reset};${normal_cursor}m, X cr=\r, X csr=\E[%i%p1%d;%p2%dr, X cub1=\b, X*************** X*** 484,497 **** X hpa=\E[%i%p1%dG, X ht=\t, X hts=\EH, X il1=\E[L, X il=\E[%p1%dL, X ind=\E[S, X indn=\E[%p1%dS, X invis=\E[${invisible}m, X is1=\E[=h, X! is2=\E7\E[1;25r\E8\E>\E[?3l\E[?4l\E[?5l\E[?7l\E[?8l\E[0;10;${normal_cursor};${cursor_reset}m, X kbs=\b, X kcub1=\E[D, X kcud1=\E[B, X kcuf1=\E[C, X--- 494,511 ---- X hpa=\E[%i%p1%dG, X ht=\t, X hts=\EH, X+ .ich1=\E[@ (*** if not using enter/exit insert mode), X+ .ich=\E[%p1@ (*** if not using enter/exit insert mode), X il1=\E[L, X il=\E[%p1%dL, X ind=\E[S, X indn=\E[%p1%dS, X invis=\E[${invisible}m, X is1=\E[=h, X! is2=\E7\E[r\E8\E>\E[?3l\E[?4l\E[?5l\E[?7l\E[?8l\E[0;10;${cursor_reset};${normal_cursor};${fore_color};${back_color}m, X! kb2=\E[G, X kbs=\b, X+ kcbt=\E[Z, X kcub1=\E[D, X kcud1=\E[B, X kcuf1=\E[C, X*************** X*** 499,513 **** X kdch1=\E[P, X kdl1=\E[M, X kend=\E[Y, X- kf1=\EOP, X- kf2=\EOQ, X- kf3=\EOR, X- kf4=\EOS, X- kf5=\EOT, X- kf6=\EOU, X- kf7=\EOV, X- kf8=\EOW, X- kf9=\EOX, X kf10=\EOY, X kf11=\EOp, X kf12=\EOq, X--- 513,518 ---- X*************** X*** 518,530 **** X kf17=\EOv, X kf18=\EOw, X kf19=\EOx, X kf20=\EOy, X khome=\E[H, X kich1=\E[@, X kil1=\E[L, X! knp=\E[V, X! kpp=\E[U, X rc=\E8, X rev=\E[${reverse}m, X ri=\E[T, X rin=\E[%p1%dT, X--- 523,548 ---- X kf17=\EOv, X kf18=\EOw, X kf19=\EOx, X+ kf1=\EOP, X kf20=\EOy, X+ kf2=\EOQ, X+ kf3=\EOR, X+ kf4=\EOS, X+ kf5=\EOT, X+ kf6=\EOU, X+ kf7=\EOV, X+ kf8=\EOW, X+ kf9=\EOX, X khome=\E[H, X kich1=\E[@, X kil1=\E[L, X! kind=\E[T, X! knp=\E[U, X! kpp=\E[V, X! kri=\E[S, X! nel=\EE, X rc=\E8, X+ .rep=%p1%c\E[%p2%{1}%-%db (*** buggy), X rev=\E[${reverse}m, X ri=\E[T, X rin=\E[%p1%dT, X*************** X*** 533,541 **** X rmir=\E[4l, X rmso=\E[m, X rmul=\E[m, X sc=\E7, X! sgr0=\E[0m, X! sgr=\E[%?%p1%t${standout};%;%?%p2%t4;%;%?%p3%t7;%;%?%p4%t5;%;%?%p5%t8;%;%?%p6%t1;%;%?%p7%t8;%;m, X smacs=\E[${upperchars}m, X smam=\E[?7l, X smir=\E[4h, X--- 551,562 ---- X rmir=\E[4l, X rmso=\E[m, X rmul=\E[m, X+ rs1=\Ec\E[0m\E[r, X+ rs2=\E[22m, X+ rs3=\E[55m, X sc=\E7, X! sgr0=\E[0;10m, X! sgr=\E[%?%p1%t${standout};%;%?%p2%t4;%;%?%p3%t7;%;%?%p4%t5;%;%?%p5%t8;%;%?%p6%t1;%;%?%p9%t12%e10%;m, X smacs=\E[${upperchars}m, X smam=\E[?7l, X smir=\E[4h, X*************** X*** 543,551 **** X smul=\E[${underline}m, X tbc=\E[2g, X vpa=\E[%p1%dd, X! .ich=\E[%p1@ (*** if not using enter/exit insert mode), X! .ich1=\E[@ (*** if not using enter/exit insert mode), X! .rep=%p1%c\E[%p2%{1}%-%db (*** buggy), X !Mono! X fi X X--- 564,571 ---- X smul=\E[${underline}m, X tbc=\E[2g, X vpa=\E[%p1%dd, X! xoffc=^S, X! xonc=^Q, X !Mono! X fi X SHAR_EOF chmod 0664 patch01 || echo "restore of patch01 fails" echo "x - extracting patchlevel.h (Text)" sed 's/^X//' << 'SHAR_EOF' > patchlevel.h && X#define PATCHLEVEL 1 SHAR_EOF chmod 0664 patchlevel.h || echo "restore of patchlevel.h fails" exit 0
det@hawkmoon.MN.ORG (Derek E. Terveer) (08/03/88)
In article <657@drexel.UUCP>, rickers@drexel.UUCP (Rick Wargo) writes: > XAfter unsharing, you must patch catie using `patch < patch01'. > XBeware, Microport supplies a program also named patch that does > Xbinary patching. The patch I am referring to is Larry Wall's patch. > XI have renamed the Microport supplied patch program to "Patch" and > Xkept Larry Wall's patch program named "patch". I did this same thing with V/386 3.0-L2.2 and found that several system routines (shell scripts mostly, i believe) reference "patch" and kind of die/do funny things if they find larry wall's program instead. Therefore, i bowed to good sense and renamed larry wall's program to "Patch". -- Derek Terveer det@hawkmoon.MN.ORG w(612)681-6986 h(612)688-0667
rick@pcrat.UUCP (Rick Richardson) (08/06/88)
In article <231@hawkmoon.MN.ORG> det@hawkmoon.MN.ORG (Derek E. Terveer) writes: >funny things if they find larry wall's program instead. Therefore, i bowed to >good sense and renamed larry wall's program to "Patch". Larry Wall is one of the few people who have had a command name "retired". I can only think of a handfull of others, which include Thompson, Ritchie, Joy, A...-W...-K..., Lesk... Listen, Microport, Stroustrup (c++ has a "patch"), and everybody else: "patch", "rn", and "perl" are retired. Larry Wall has them. -- Rick Richardson, PC Research, Inc. (201) 542-3734 (voice, nights) OR (201) 389-8963 (voice, days) uunet!pcrat!rick (UUCP) rick%pcrat.uucp@uunet.uu.net (INTERNET)