#!/bin/sh -

# $Id: make-slides.sh,v 1.1 2000/01/10 04:16:41 sra Exp $

SEDEXP='s=mgp00\([0-9][0-9][0-9]\)\.idx\.gif=thumb\1.gif=g;s=mgp00=slide=g'

test -d kakameymi.slides && rm -rf kakameymi.slides
mkdir kakameymi.slides

newdisplay="$(netstat -f inet -an | sort | awk '
              BEGIN {FS="[. \t]+"}
	      $1 !~ /^tcp/ || $8 != "LISTEN" {next}
	      {this = $5 - 6000}
	      this == display && this < 100 {display++}
	      END {print ":" display}')"

Xnest -geometry 1024x768+0+0 "$newdisplay" -name MagicPoint &
xnest="$!"

sleep 1
DISPLAY="$newdisplay" xwininfo -root >/dev/null 2>&1
DISPLAY="$newdisplay" mgp -d -D kakameymi.slides kakameymi.mgp

kill "$xnest"

cd kakameymi.slides

for i in *.html
do
  sed "$SEDEXP" <$i >foo && mv foo $i
done

ls -1 | while read i
do
  mv $i $(echo $i | sed "$SEDEXP")
done

rm -f ../kakameymi.slides.zip
zip ../kakameymi.slides.zip *