#! /bin/rc
rfork
ramfs -p
rimport temuorin /lib/ /n/t
cd /
bind /usr/jalae/www/media/gemsound /usr/jalae/www/media/sound/

echo '---grabbing gemini ls(1)-lp ---'

rcpu -h temuorin -c 'cd /lib/gem/ ; ls -lp > /lib/ls/tgmi.ls;
					 cd /lib/gem/links/ ; ls -lp > /lib/ls/tlink.ls;
					 cd /lib/gem/src/ ; ls -lp > /lib/ls/tsrc.ls;
					 cd /lib/gem/media/bg/ ; ls -lp > /lib/ls/tbg.ls;
					 cd /lib/gem/media/sound/ ; ls -lp > /lib/ls/tsnd.ls;
					 cd /lib/gem/media/img/generic/ ; ls -lp > /lib/ls/tgen.ls;
					 cd /lib/gem/media/img/services/ ; ls -lp > /lib/ls/tsrv.ls;'

clone /n/t/ls/*ls /tmp/
cat /tmp/tgmi.ls | grep gmi > /tmp/gmi.ls

ls -lp /lib/muffet/gemini/*gmi > /tmp/mgmi.ls
ls -lp /lib/muffet/links/*xml > /tmp/mlink.ls
ls -lp /usr/jalae/www/src/ > /tmp/msrc.ls
ls -lp /usr/jalae/www/media/bg/*png > /tmp/mbg.ls

ls -lp /usr/jalae/www/media/sound/*mp3 > /tmp/msnd.ls
ls -lp /usr/jalae/www/media/img/generic/*png > /tmp/mgen.ls
ls -lp /usr/jalae/www/media/img/services/ > /tmp/msrv.ls

gmi=` {lsdif /tmp/mgmi.ls /tmp/gmi.ls}
link=` {lsdif /tmp/mlink.ls /tmp/tlink.ls}
src=` {lsdif /tmp/msrc.ls /tmp/tsrc.ls}
bg=` {lsdif /tmp/mbg.ls /tmp/tbg.ls}
snd=` {lsdif /tmp/msnd.ls /tmp/tsnd.ls}
gen=` {lsdif /tmp/mgen.ls /tmp/tgen.ls}
srv=` {lsdif /tmp/msrv.ls /tmp/tsrv.ls}

	echo '---tar(1)ing:
	./ '^$"gmi^'
	./links/ '^$"link^'
	./src/ '^$"src'
	./media/bg/ '^$"bg'
	./media/sound/ '^$"snd'
	./media/img/generic/ '^$"gen'
	./media/img/services/ '^$"srv

	cd /lib/muffet/gemini/
	touch updated
	tar c updated > /tmp/g.tar
	if(test $#gmi -gt '0'){
		tar c $gmi > /tmp/gmi.tar
	}


	cd /lib/muffet/
	if(test $#link -gt '0'){
		tar c ./links/^$link > /tmp/link.tar
	}

	cd /usr/jalae/www/
	if(test $#src -gt '0'){
		tar c ./src/^$src > /tmp/src.tar
	}
	
	if(test $#bg -gt '0'){
		tar c ./media/bg/^$bg > /tmp/bg.tar
	}

	if(test $#snd -gt '0'){
		tar c ./media/sound/^$snd > /tmp/snd.tar
	}

	if(test $#gen -gt '0'){
		tar c ./media/img/generic/^$gen > /tmp/gen.tar
	}

	if(test $#srv -gt '0'){
		tar c ./media/img/services/^$srv > /tmp/srv.tar
	}

	cd /tmp
	tar c *tar | gzip -c > /tmp/g.tar.gz

	echo cloning...
	clone /tmp/g.tar.gz /n/t/gem/
	echo decompressing...
	cd /
	rcpu -h temuorin -c 'cd /lib/gem/ ; cat g.tar.gz | tar xTz ; for(f in *tar) cat $f | tar xT ; rm *tar; rm g.tar.gz'