sam hint

[presotto@plan9.att.com presotto@plan9.att.com]

#!/bin/rc

files=()
dest=()
line=''

if(~ $#* 0){
	echo usage: B file ... >[1=2]
	exit usage
}

if(test -f /mnt/term/srv/sam.$user) dest = /mnt/term/srv/sam.$user
if not if(test -f /srv/sam.$user) dest = /srv/sam.$user
if not {
	echo B: can''''t find sam server file >[1=2]
	exit open
}

for(i)
	switch($i){
	case /*
		files = ( $files $i )
	case -*
		line = `{echo $i | sed 's/.//' }
	case *
		files = ( $files `{pwd}^/$i )
	}

echo B $files >> $dest
if(! ~ $line '') echo $line >> $dest

------ original message follows ------

>From cse.psu.edu!9fans-outgoing-owner Wed Sep 27 11:22:43 EDT 1995
Received: by colossus.cse.psu.edu id <78362>; Wed, 27 Sep 1995 11:06:52 -0400
Received: from mail.swip.net ([192.71.180.65]) by colossus.cse.psu.edu with SMTP id <78360>; Wed, 27 Sep 1995 11:06:36 -0400
Received: from bull.se by mail.swip.net (8.6.8/3.01)
	id QAA22868; Wed, 27 Sep 1995 16:13:10 +0100
Received: from comserv.bull.se by bull.se with smtp
	(Smail3.1.28.1 #8) id m0sxy3O-0000xAC; Wed, 27 Sep 95 16:05 MET
Received: from ml by comserv.bull.se with uucp
	(Smail3.1.28.1 #2) id m0sxy7E-0000vQC; Wed, 27 Sep 95 17:09 MET
Received: by ml.link.bull.se (Smail3.1.28.1 #5)
	id m0sxy44-000AxJC; Wed, 27 Sep 95 16:06 MET
Message-Id: <m0sxy44-000AxJC@ml.link.bull.se>
Date:	Wed, 27 Sep 1995 11:06:00 -0400
From:	mkc@bull.se
To:	9fans@cse.psu.edu
Subject: sam hint
In-Reply-To: <95Sep26.085044edt.34102@psuvax1.cse.psu.edu>
References: <95Sep26.085044edt.34102@psuvax1.cse.psu.edu>
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
Sender: owner-9fans@cse.psu.edu
Precedence: bulk
Reply-To: 9fans@cse.psu.edu

forsyth@plan9.cs.york.ac.uk writes:

> in my window system startup file, i typically create one window of
> significant size in which i run sam.  that remains on screen until i
> log out (subject to `Hide' in 8½ or 9wm).  as i wander about the
> system in other windows, i use the B command (see sam(1)) to throw
> files into it for editing.

I found the scripts for B for Bourne shell and rc somewhere, but at
that time I only downloaded the Bourne version, which I still have,
and now I don't seem to find the place I snarfed them from. I have
gone through the Bell Labs FTP site, but I wasn't able to find them
there.

Where can I find an rc version of B that will work under Plan 9? The
Bourne shell version I have makes use of a temporary file to send
commands to sam. The file is named after the user and the DISPLAY
variable. I figured that the rc script available was for Unix systems,
too. Is it possible to use the same script under Unix and Plan 9? I
find that strange.

Mikael Cardell <mkc@bull.se>
Systems Engineer
Telco Solutions, System Integration Services
Bull Northern Europe