Return to 6mw CVS log

Up to [Research Unix] / researchv10dc / 630 / bin

Annotation of researchv10dc/630/bin/6mw, revision 1.1.1.1

1.1       root        1: #! /bin/sh
                      2: #
                      3: #      mw - initiate a research-style mux window on the 630
                      4: #
                      5: #      mw [prog]
                      6: #
                      7: #      where   prog is the file to be loaded (called from New window only)
                      8: 
                      9: case $# in
                     10: 0)     prog=/usr/630/mbin/mw.m;;
                     11:        # hack to extract some interesting stty modes. This is V10-dependent.
                     12:        # first, extract current `nl' and `echo' settings...
                     13:        
                     14:        resettty=`stty | sed -n 4p | cut -f3,4 -d" "`
                     15:        
                     16:        # now, some characters of interest to the mux window (this is
                     17:        # a _real_ kludge: mw.m doesn't know if we change it after
                     18:        # this because it is not a terminal driver.)
                     19:        
                     20:        chars=` stty            |
                     21:                tr ';' '\012'   |
                     22:                sed -e "/ = /!d
                     23:                        s/[ ]*\([a-z]*\) = \(.*\)/\1 \2/"`
                     24: 1)     prog="$1";;
                     25: *)     echo "usage: $0 [mw term]"
                     26: esac
                     27: 
                     28:        
                     29: dmdld $prog $chars
                     30: 
                     31: trap 'stty $resettty' 0 3 13 15
                     32: stty -echo
                     33: exec sh

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.