#!/bin/csh -f
## ###################################################################### ##
##         Copyright IBM Corporation 1988,1991 - All Rights Reserved      ##
##        For full copyright information see:'andrew/config/COPYRITE'     ##
## ###################################################################### ##
# $Disclaimer: This software is part of version 7.2 of the 
# Andrew User Interface System and is the 
# property of IBM, Carnegie Mellon University, 
# and the other copyright holders.  The source 
# code of this version is for the sole use of 
# members of the Andrew Consortium with 
# memberships extending into calendar year 
# 1994.  This source code is not to be distributed 
# to non-members of the consortium nor beyond 
# a fifty-mile radius from the membership address.  
# Binary object code compiled or derived from 
# these sources is not to be distributed to non-
# members.  Members may have additional 
# distribution rights granted by prior written 
# permission of Carnegie Mellon University.
# 
# IBM, CARNEGIE MELLON UNIVERSITY, 
# AND THE OTHER COPYRIGHT HOLDERS
#  DISCLAIM ALL WARRANTIES WITH 
# REGARD TO THIS SOFTWARE, INCLUDING 
# ALL IMPLIED WARRANTIES OF MERCHANT-
# ABILITY AND FITNESS. IN 
# NO EVENT SHALL  IBM, CARNEGIE 
# MELLON UNIVERSITY, OR ANY OTHER 
# COPYRIGHT HOLDER BE LIABLE FOR 
# ANY SPECIAL, INDIRECT OR CONSE-
# QUENTIAL DAMAGES OR ANY DAMAGES 
# WHATSOEVER RESULTING FROM LOSS OF
# USE, DATA OR PROFITS, WHETHER IN AN
# ACTION OF CONTRACT, NEGLIGENCE OR
# OTHER TORTIOUS ACTION, ARISING OUT 
# OF OR IN CONNECTION WITH THE USE OR
# PERFORMANCE OF THIS SOFTWARE.
#  $
#
# This script may be used for generating a spiffy demo folder/bboard for the Andrew Message system.
#
# It assumes you have run an AMS appliation at least once, to create the .MESSAGES 
# tree in your home directory or wherever it is you're creating the demo folder.
#
# See the imkfile in this directory for further explanations.

set force=0
if ($#argv > 1 && "$1" == "-force") then
    set force=1
    shift
endif
if ( $?ANDREWDIR ) then
    set AndrewDir = "$ANDREWDIR"
else
    set AndrewDir = "/usr/andrew"
endif
if ($#argv > 2 && "$1" == "-DESTDIR" ) then
    set AndrewDir=$2
    shift
    shift
endif
if ($#argv < 1) then
    echo Usage:  gendemo creatable-folder-name
    echo Example use: gendemo \~/.MESSAGES/amsdemo
    exit 1
endif
if ($force == 0) then
    echo -n "Do you want to create a messages demo folder in the directory $1, erasing any previous contents AND ALL SUBDIRECTORIES recursively [no] ? "
    set ans=$<
    if ($ans !~ y*) then
       echo No demo created.
       exit
    endif
endif
set targetdir=$1
if (-e $targetdir) then
	rm -rf $targetdir
	if ($status != 0) then
		echo rm failed, aborting.
		exit
	endif
endif
$AndrewDir/bin/cui set level wizard \; set script on \; set term 0 \; create $targetdir:t \; quit <<!
$targetdir:h

!
# sanity check next
if (! -d $targetdir) then
	echo $targetdir is not a directory--aborting.
	exit 1
endif

set Me=`whoami`
if (! $?Me) then
	set Me = `who am i`
	if(! $?Me) then
		set Me = $USER
	endif
endif

@ i = 1
while (1)
	if (! -e d$i.heads) break
	echo Processing post number $i
	echo "Date: `$AndrewDir/etc/arpadate`" > /tmp/demotemp
	echo From: ${Me} >> /tmp/demotemp
	echo To: AMS Demo Part $i >> /tmp/demotemp
	echo Content-Type: X-BE2\; 12 >> /tmp/demotemp
	echo If-Type-Unsupported: send >> /tmp/demotemp
	cat d$i.heads >> /tmp/demotemp
	echo "" >> /tmp/demotemp
	cat d$i >> /tmp/demotemp
	mv /tmp/demotemp $targetdir/$i.post
	@ i ++
end
$AndrewDir/bin/cui set level wizard \; set script on \; set term 0 \; recon $targetdir\; quit <<!


!
