Return to 6mw CVS log

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

Annotation of researchv10dc/630/bin/6mw, revision 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.