-function check_unversioned {
- # has to be called in the projects base directory
- # result: "M" in stdout or nothing
-
- project=$(pwd)
- project=${project##*/}
- pushd .. >/dev/null
- mCM $project -b -an > /dev/null
- wc=$(wc $project.batch)
- rm $project.batch
- if [ "${wc:0:5}" != "0 0 0" ]
- then
- echo "M"
- fi
- popd >/dev/null
-}
-
-function set_build {
- if [ -e .svn ]
- then
- version="0.0"
- build=$(svnversion)
- build=${build/:/-}
- build="$build$(check_unversioned)"
- elif [ -e .git ]
- then
- tag=$(git describe --tags --match "${paket}_*" 2>/dev/null) || true
- if test -z "$tag"
- then
- tag="0.0-0TOP"
- fi
- changes=$(check_unversioned)
- tag="$tag$changes"
- version=${tag%-*}
- version=${version##*_}
- build=${tag##*-}
- else
- echo "No configuration system found. Cannot determine version."
- exit 1
- fi
-}
-
-function check_version {
-
- vline=$(head -1 debian/$paket.changelog)
- vline=${vline%-*}
- clversion=${vline#*(}
- if [ $version = "0.0" ]
- then
- version=$clversion
- return
- fi
+##############################################################################
+# Main program
+##############################################################################