26623b9f34
* harbour/bin/pack_src.sh
* added file list to archive so it's possible to recreate it later without SVN data
* harbour/common.mak
* harbour/make_b32.mak
* harbour/make_gcc.mak
+ added HBVMMT library for default builds
BCC version not tested - please test.
* harbour/source/vm/hvm.c
* moved language and code page setting before class and error initialization
* harbour/source/rtl/fserror.c
* harbour/source/rtl/fstemp.c
* harbour/source/rtl/fssize.c
* harbour/source/rtl/hbffind.c
* harbour/source/rtl/filesys.c
! fixed overloading FS error codes by other operations, f.e. accessing
TLS data by OS API function call
88 lines
2.0 KiB
Bash
Executable File
88 lines
2.0 KiB
Bash
Executable File
#!/bin/sh
|
|
[ "$BASH" ] || exec bash `which $0` ${1+"$@"}
|
|
#
|
|
# $Id$
|
|
#
|
|
# This script requires "TAR" utilities for compression.
|
|
|
|
if [ "$1" = "zip" ] || [ "$1" = "ZIP" ]; then
|
|
hb_archbin="zip"
|
|
hb_ext=".zip"
|
|
elif tar --version >/dev/null 2>&1; then
|
|
hb_archbin="tar"
|
|
hb_gnutar="yes"
|
|
elif gtar --version >/dev/null 2>&1; then
|
|
hb_archbin="gtar"
|
|
hb_gnutar="yes"
|
|
else
|
|
hb_archbin="tar"
|
|
hb_gnutar="no"
|
|
echo "Warning!!! Cannot find GNU TAR"
|
|
fi
|
|
|
|
hb_currdir=`pwd`
|
|
|
|
hb_archopt="-czf"
|
|
[ -n "${hb_ext}" ] || hb_ext=".tar.gz"
|
|
if [ -f bin/hb-func.sh ]; then
|
|
hb_rootdir="."
|
|
else
|
|
hb_rootdir=`dirname $0`
|
|
hb_rootdir="${hb_rootdir}/.."
|
|
fi
|
|
. ${hb_rootdir}/bin/hb-func.sh
|
|
|
|
hb_ver=`get_hbver ${hb_rootdir}`
|
|
hb_filename="${hb_currdir}/harbour-${hb_ver}.src${hb_ext}"
|
|
rm -f $hb_filename
|
|
|
|
#[ -z "$TZ" ] && export TZ=PST8PDT
|
|
|
|
hb_get_entries()
|
|
{
|
|
if [ "$format" = 8 ]; then
|
|
sed -e '/^\f/,+1 !d' -e '/[a-zA-Z0-9_]/ !d' $1/entries
|
|
else
|
|
sed -e '/^[ ]*name="..*"[\r]*$/ !d' -e 's/^[ ]*name="\(.*\)".*$/\1/g' $1/entries
|
|
fi
|
|
}
|
|
|
|
hb_collect_all()
|
|
{
|
|
for d in `find . -name ".svn"`
|
|
do
|
|
for f in `hb_get_entries $d`
|
|
do
|
|
f="`dirname $d`/$f"
|
|
[ -f "$f" ] && echo "$f"
|
|
done
|
|
done
|
|
}
|
|
|
|
hb_collect_all_svn()
|
|
{
|
|
for f in `svn status -v|sed -e '/^?/ d' -e 's/.* \([^ ]*\)/\1/g'`
|
|
do
|
|
[ -f "$f" ] && echo "$f"
|
|
done
|
|
}
|
|
|
|
hb_rmflst="no"
|
|
hb_flst="bin/hb_flst.tmp"
|
|
if [ -d "$hb_rootdir/.svn" ] || [ ! -r "$hb_rootdir/$hb_flst" ]; then
|
|
hb_rmflst="yes"
|
|
#format=`cat $hb_rootdir/.svn/format`
|
|
if [ "$format" = 4 ] || [ "$format" = 8 ]; then
|
|
(cd "$hb_rootdir";hb_collect_all) > "$hb_rootdir/$hb_flst"
|
|
else
|
|
(cd "$hb_rootdir";hb_collect_all_svn) > "$hb_rootdir/$hb_flst"
|
|
fi
|
|
echo "$hb_flst" >> "$hb_rootdir/$hb_flst"
|
|
fi
|
|
if [ "$hb_archbin" = "zip" ]; then
|
|
(cd "$hb_rootdir";$hb_archbin -r -q $hb_filename . "-i@$hb_flst")
|
|
else
|
|
(cd "$hb_rootdir";$hb_archbin $hb_archopt $hb_filename --files-from "$hb_flst")
|
|
fi
|
|
[ "$hb_rmflst" != "yes" ] || rm -fR "$hb_rootdir/$hb_flst"
|