IGNOREPATH=/etc:/home:/var:/dev:/boot:/root:/tmp:/usr/local:/bin:/sbin:/mnt:/usr/src
STRIPLIB=y
STRIPBIN=y

VERSION=5.38
TCLVER=8.4.4
PROGNAME="Expect $VERSION"
DESC="\
expect                                                                 \n\
                                                                       \n\
Expect is a program that talks to other interactive programs according \n\
to a script.  Following the script, Expect knows what can be expected  \n\
from a program and what the correct response should be.  An            \n\
interpreted language provides branching and high-level control         \n\
structures to direct the dialogue.                                     \n\
                                                                       \n\
Expect was written by Don Libes of the National Institute of Standards \n\
and Technology.                                                        \n\
This version was patched to fix a problem that shows up in dejagnu."

BUILD=1
MAINTAINER="Mark Post <mark.post@eds.com>"
SOURCE=http://expect.nist.gov
PKGNAME=expect-dejagnu-$VERSION-s390-$BUILD
TAG=OPT

compile() {
   # We need includes from this:
   ( cd $TMP
     tar -zxvf $CWD/../../../source/tcl/tcl/tcl$TCLVER-src.tar.gz
     cd tcl$TCLVER/unix
     ./configure --prefix=/usr
   )

   tar -zxvf $CWD/../../../source/tcl/expect/expect-$VERSION.tar.gz
   cp -p /usr/share/libtool/config.sub ./expect-$VERSION
   cp -p /usr/share/libtool/config.guess ./expect-$VERSION

   cd $TMP/expect-$VERSION/
   # Get the weather from wunderground instead
   # since U of MI no longer provides the service:
   zcat $CWD/../../../source/tcl/expect/expect.weather.diff.gz | patch -p1
   chown -R root.root .
   cat $CWD/dejagnu.fix.version5.38.diff | patch -p1 --backup --suffix=.orig
   ./configure --prefix=/usr \
               --with-tclconfig=/usr/lib \
               --with-tclinclude=$TMP/tcl$TCLVER/generic \
               --enable-shared
   make
}

install() {
   cd $TMP/expect-$VERSION/
   make install INSTALL_ROOT=/package-expect-dejagnu

   mkdir -p /package-expect-dejagnu/usr/doc/expect-$VERSION
   cp -a FAQ HISTORY INSTALL NEWS README example \
       /package-expect-dejagnu/usr/doc/expect-$VERSION

   ( cd /package-expect-dejagnu/usr/lib
     rm -rf libexpect.a ; ln -sf libexpect5.38.a libexpect.a
     rm -rf libexpect.so ; ln -sf libexpect5.38.so libexpect.so
   )

   ( cd /package-expect-dejagnu/usr/man
     for dir in 1 3; do
       ( cd man$dir
         rm -f *.gz
         gzip -9 *.$dir
       )
     done
   )
}

attributes() {
   chown -R root.bin $PKG/package-expect-dejagnu/usr/bin

   ( cd $PKG/package-expect-dejagnu/usr/doc/expect-$VERSION/example
     chmod 754 autoexpect beer.exp chess.exp cryptdir decryptdir dislocate \
               dvorak ftp-inband ftp-rfc gethostbyaddr kibitz lpunlock \
               mkpasswd passmass rftp robohunt rogue.exp term_expect \
               tknewsbiff tkpasswd tkterm virterm weather xkibitz xpstat
     chmod 755 archie autopasswd irsh multixterm rlogin-cwd telnet-cwd \
               timed-read timed-run unbuffer vrfy
   )
}

special() {
   cd $PKG
   mv package-expect-dejagnu/* ./
   rmdir package-expect-dejagnu

   cd $CTL
   cat $CWD/slack-desc > slack-desc

   sed -e 's%package-expect-dejagnu/%%g' doinst.sh > doinst.sh.new
   cat doinst.sh.new > doinst.sh
   rm doinst.sh.new
}