home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 1 / 1772 / pmwindow < prev    next >
Encoding:
Text File  |  1990-12-28  |  867 b   |  27 lines
  1. #!/bin/sh
  2. otc=$TERMCAP;TERMCAP=`printenv TERMCAP|tr : '\012'|grep -v '^cs='|tr '\012' :`
  3. export TERMCAP
  4. s1=`sess -qJ sh -c 'echo -n $$;tty;disconnect;exec csh -f'|sed 's-/dev/tty- -'`
  5. s2=`sess -qJ sh -c 'echo -n $$;tty;disconnect;exec csh -f'|sed 's-/dev/tty- -'`
  6. export s1; p1=`printenv s1|sed 's/ .*//'`; s1=`printenv s1|sed 's/.* //'`
  7. export s2; p2=`printenv s2|sed 's/ .*//'`; s2=`printenv s2|sed 's/.* //'`
  8. TERMCAP=$otc
  9.  
  10. clear; stty rows 11; stty raw cbreak -echo
  11. while :
  12. do
  13.   tcs 10 0
  14.   sess -qJ sh -c 'reconnect "'"$s1"'" >/dev/null 2>&1'
  15.   kill0 $p1 || { die=1; break; }
  16.   tcs 22 12
  17.   sess -qJ sh -c 'reconnect "'"$s2"'" >/dev/null 2>&1'
  18.   kill0 $p2 || { die=2; break; }
  19. done
  20.  
  21. stty rows 24; tcs 23 0
  22. case $die in
  23. 1) sess -qJ sh -c 'reconnect "'"$s2"'" >/dev/null 2>&1' ;;
  24. 2) sess -qJ sh -c 'reconnect "'"$s1"'" >/dev/null 2>&1' ;;
  25. esac
  26. stty -raw -cbreak echo
  27.