#!/bin/rc

mount /srv/pipe /n/pipe
bind /n/pipe/data1 /tmp/t.log
>>/tmp/t.log >>[2]/tmp/t.log {
sleep 4

mount /srv/testpipe /n/testpipe
ramfs -m /n/wrapslaves
mount /srv/cursor /n/cursor
mount /srv/mouse /n/mouse
x=1
while(sleep 1){
	if(test -f /srv/wrapslave){
		echo `{date} mounting /srv/wrapslave 
		s=/n/wrapslaves/$x
		mkdir $s
		mount /srv/wrapslave $s
		#du -a /n/wrapslaves/
		rm /srv/wrapslave
		echo starting drawthingy
		{	<[3] $s/draw/new {
				y=`''{read -c 144 <[0=3]}
				echo y is $y
				yi=`{echo $y}
				yid=$yi(1)
				w=`''{cat $s/winname}
				< /n/testpipe/draw/new {
					wy=`{read -c 144}
					wy=$wy(1)
					<>[4] $s/mouse <>[5] /n/testpipe/draw/$wy/wrap {
						cat /n/mouse/data1 >[1=4] &
						@{
							echo mouse wrapslave $x cat start
							rfork n
							bind -b $s /dev
							/usr/hiro/vnc/utils/6.wrapdrawinit $s /n/mouse/data1 >[1=5] <[0=4]  >>[2]/tmp/terror.log
							echo mouse wrapslave $x cat ended
						} &
						sleep 5
						echo cat wrap
						cat <[0=5]  > $s/draw/$yid/data >>[2]/tmp/t.log
						sleep 1
						echo cat closed!!!
					}
				}
			}
		} &
		{ 
			echo cursor wrapslave $x cat start
			cat0 /n/cursor/data1 > $s/cursor
			echo cursor wrapslave $x cat ended
		} &
		sleep 1
		cat $s/kbd > /dev/kbdin &
		sleep 1
		x=`{echo $x+1|bc}
		#wsys=/srv/rio.hiro.378961 window -m
	}
}
}