#!/bin/sh

# Slackware build script for Free Pascal

# Written by Michiel Broek

# Redistribution and use of this script, with or without modification, is
# permitted provided that the following conditions are met:
#
# 1. Redistributions of this script must retain the above copyright
#    notice, this list of conditions and the following disclaimer.
#
# THIS SOFTWARE IS PROVIDED BY THE AUTHOR ''AS IS'' AND ANY EXPRESS OR IMPLIED
# WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
# MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO
# EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
# SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
# PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
# OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
# WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
# OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
# ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
#
# Modified by the SlackBuilds.org project.

PACKAGE="fpc"
PACKAGE_EXT="gz"
VERSION=${VERSION:-3.2.2}
BUILD=${BUILD:-2}

if [ -f ~/.slackbuildrc ]; then
  . ~/.slackbuildrc
elif [ -f ../../runtime/slackbuildrc ]; then
  . ../../runtime/slackbuildrc
fi

check_required

BSRC="${PACKAGE}build-$VERSION.tar.$PACKAGE_EXT"
BURL="https://downloads.sourceforge.net/freepascal/$BSRC"
get_source $BSRC $BURL

SRC="${PACKAGE}-$VERSION.$ARCH-linux.tar"
URL="https://downloads.sourceforge.net/freepascal/$SRC"
get_source $SRC $URL

cd $TMP
rm -rf ${PACKAGE}-$VERSION ${PACKAGE}build-$VERSION
mkdir ${PACKAGE}-$VERSION ${PACKAGE}build-$VERSION

cd $TMP/$PACKAGE-$VERSION
tar xvf $CWD/$PACKAGE-$VERSION.$ARCH-linux.tar --strip-components=1
cd $TMP/${PACKAGE}build-$VERSION
tar xvf $CWD/${PACKAGE}build-$VERSION.tar.gz


# Unpack binary files. This is the bootstrap compiler; these binaries
# don't get installed as part of the package.
(
  mkdir -p $TMP/$PACKAGE-$VERSION/binary
  cd $TMP/$PACKAGE-$VERSION/binary
  tar xvf $TMP/$PACKAGE-$VERSION/binary.$ARCH-linux.tar

  cd  $TMP/$PACKAGE-$VERSION
  tar xvf $TMP/$PACKAGE-$VERSION/binary/base.$ARCH-linux.tar.gz
  tar xvf $TMP/$PACKAGE-$VERSION/binary/utils.$ARCH-linux.tar.gz

  cd $TMP/$PACKAGE-$VERSION/bin
  if [ "$ARCH" = "x86_64" ]; then
    ln -s ../lib/fpc/$VERSION/ppcx64
  else
    ln -s ../lib/fpc/$VERSION/ppc386
  fi
)

export PATH="$TMP/$PACKAGE-$VERSION/bin":$PATH
echo "=== PATH is $PATH"

cd $TMP/${PACKAGE}build-$VERSION/${PACKAGE}build-$VERSION

# it's => its. It's one of my pet peeves; its occurrence annoys me.
sed -i "s,\\(as\\|control\\) it's,\\1 its," install/man/man?/*.?

# 20210905 bkw: patch taken from Debian with many thanks. Installs the
# IDE's data files somewhere besides /usr/bin, and patches the IDE to
# look for them there.
patch -p1 < $CWD/fix-IDE-data-file-location.patch

# 20210905 bkw: don't let the NOGDB=1 scare you. During the compile
# we get this message:
# Compiling IDE with GDB/MI debugger support, LibGDB is not needed
# ...and it appears that the IDE does indeed have its debugging
# support enabled.
make build NOGDB=1
make -j1 NOGDB=1 PREFIX=$PKG/usr install

# Fix library dir
[ "$LIBDIRSUFFIX" = "64" ] && mv $PKG/usr/lib $PKG/usr/lib${LIBDIRSUFFIX}

cd $PKG/usr/bin
if [ "$ARCH" = "x86_64" ]; then
  ln -s ../lib$LIBDIRSUFFIX/fpc/$VERSION/ppcx64
else
  ln -s ../lib$LIBDIRSUFFIX/fpc/$VERSION/ppc386
fi

# copy docs
mv $PKG/usr/share/doc $PKG/usr/doc
rmdir $PKG/usr/share
#cat $CWD/$PACKAGE.SlackBuild > $PKG/usr/doc/$PACKAGE-$VERSION/$PACKAGE.SlackBuild

# 20220415 bkw: compiled pascal programs don't use .rsj files at
# runtime. see https://wiki.lazarus.freepascal.org/Using_resourcestrings
# and note that there are no *.mo files in this package.
rm -f $PKG/usr/bin/*.rsj

# 20210905 bkw: fancier than the template, but quite a bit faster and less
# resource-intensive.
find $PKG -type f -a -perm /111 | \
  xargs file -m /etc/file/magic/elf | \
  grep -e "executable" -e "shared object" | grep ELF | \
  cut -f 1 -d : | \
  xargs strip --strip-unneeded 2> /dev/null || true

# we include one man page borrowed from Debian and edited for
# grammar and accuracy.
cat $CWD/instantfpc.1 > $PKG/usr/man/man1/instantfpc.1

gzip $PKG/usr/man/man?/*.*

# no idea why Debian renames instantfpc => ifpc, so support both names.
ln -s instantfpc.1.gz $PKG/usr/man/man1/ifpc.1.gz
ln -s instantfpc $PKG/usr/bin/ifpc

# Create compiler config file.
mkdir -p $PKG/etc $PKG/usr/lib$LIBDIRSUFFIX/fpc/$VERSION/ide/text
$PKG/usr/lib$LIBDIRSUFFIX/fpc/$VERSION/samplecfg \
  $PKG/usr/lib$LIBDIRSUFFIX/fpc/$VERSION \
  $PKG/etc

# Clean up the configs by removing our package directory.
sed -i -e "s:$PKG::g" \
  $PKG/etc/fpc.cfg \
  $PKG/etc/fppkg.cfg \
  $PKG/etc/fppkg/default \
 $PKG/usr/lib$LIBDIRSUFFIX/fpc/$VERSION/ide/text/fp.cfg
mv $PKG/etc/fpc.cfg $PKG/etc/fpc.cfg.new

cd $PKG
# fix permissions for program docs and demos.
chown -R root:root .
find -L .  -perm /111 -a \! -perm 755 -a -exec chmod 755 {} \+ -o \
        \! -perm /111 -a \! -perm 644 -a -exec chmod 644 {} \+


echo "** Fixup and build package"
fixup_package $PKG

# Clean up the extra stuff:
set +u
if [ "$1" = "--cleanup" ]; then
  rm -rf $TMP/$PACKAGE-$VERSION
  rm -rf $PKG
fi