# Build recipe for xml-sax-base.
#
# Copyright (c) 2019, 2021 Matias Fonzo, <selk@dragora.org>.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
#    http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.

# Exit immediately on any error
set -e

program=XML-SAX-Base
version=1.09
release=1

pkgname=perl-xml-sax-base

# Define a category for the output of the package name
pkgcategory=perl

description="
Base class SAX drivers and filters.

XML::SAX::Base is intended for use as a base class for SAX filter
modules and XML parsers generating SAX events.

If you simply wish to build a SAX handler class to 'consume' SAX events
you do not need to use XML::SAX::Base directly although you will need
to install XML::SAX.

This module used to be distributed as part of the XML:SAX distribution
but is now distributed separately and referenced as a dependency by
XML::SAX.
"

homepage=https://metacpan.org/release/XML-SAX-Base
license="The Perl 5 License"

tarname=${program}-${version}.tar.gz

# Remote source(s)
fetch=https://cpan.metacpan.org/authors/id/G/GR/GRANTM/$tarname

# Source documentation
docs="Changes README"
docsdir="${docdir}/${pkgname}-${version}"

build() {
    unpack "${tardir}/$tarname"

    cd "$srcdir"

    # Set sane permissions
    chmod -R u+w,go-w,a+rX-s .

    perl Makefile.PL INSTALLDIRS=vendor

    make -j${jobs} V=1 docdir=$docsdir
    make -j${jobs} DESTDIR="$destdir" install

    # Strip remaining binaries and libraries
    find "$destdir" -type f | xargs file | \
     awk '/ELF/ && /executable/ || /shared object/' | \
      cut -f 1 -d : | xargs strip --strip-unneeded 2> /dev/null || true

    # Clean up inventory file for Perl

    # This line removes 'destdir' adding the suffix '.lz' for manpages
    find "${destdir}/" -type f -name '.packlist' | while read -r file
    do
         sed -i \
          -e "s|${destdir}||g" \
          -e "s|\.[0-9][a-z]*|&.lz|g" \
          $file
    done

    find "${destdir}/" -type f -name 'perllocal.pod' -exec rm -f {} +

    # Compress manual pages
    if [ -d "${destdir}/$mandir" ] ; then
	(
            cd "${destdir}/$mandir"
	    find . -type f -exec lzip -9 {} +
	    find . -type l | while read -r file
	    do
		ln -sf "$(readlink -- "$file").lz" "${file}.lz"
		rm -- "$file"
	    done
	)
    fi

    # Copy documentation
    mkdir -p "${destdir}${docsdir}"
    cp -p $docs "${destdir}${docsdir}/"
}

