diff options
author | Joey Hess <joey@kitenet.net> | 2012-09-01 15:22:13 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-09-01 15:22:22 -0400 |
commit | 47b88bbd165c17a830955ef867b64d2d473c2e53 (patch) | |
tree | 89297458416a2da4bdd82e51666a6af571942118 /Build | |
parent | 87b9da70e6436bda534425b82553972c55208ac2 (diff) |
move build scripts
Diffstat (limited to 'Build')
-rwxr-xr-x | Build/make-sdist.sh | 21 | ||||
-rwxr-xr-x | Build/mdwn2man | 43 |
2 files changed, 64 insertions, 0 deletions
diff --git a/Build/make-sdist.sh b/Build/make-sdist.sh new file mode 100755 index 000000000..950334532 --- /dev/null +++ b/Build/make-sdist.sh @@ -0,0 +1,21 @@ +#!/bin/sh +# +# Workaround for `cabal sdist` requiring all included files to be listed +# in .cabal. + +# Create target directory +sdist_dir=git-annex-$(grep '^Version:' git-annex.cabal | sed -re 's/Version: *//') +mkdir --parents dist/$sdist_dir + +find . \( -name .git -or -name dist -or -name cabal-dev \) -prune \ + -or -not -name \\*.orig -not -type d -print \ +| perl -ne "print unless length >= 100 - length q{$sdist_dir}" \ +| xargs cp --parents --target-directory dist/$sdist_dir + +cd dist +tar -caf $sdist_dir.tar.gz $sdist_dir + +# Check that tarball can be unpacked by cabal. +# It's picky about tar longlinks etc. +rm -rf $sdist_dir +cabal unpack $sdist_dir.tar.gz diff --git a/Build/mdwn2man b/Build/mdwn2man new file mode 100755 index 000000000..ad6d3c602 --- /dev/null +++ b/Build/mdwn2man @@ -0,0 +1,43 @@ +#!/usr/bin/perl +# Warning: hack + +my $prog=shift; +my $section=shift; + +print ".TH $prog $section\n"; + +while (<>) { + s{(\\?)\[\[([^\s\|\]]+)(\|[^\s\]]+)?\]\]}{$1 ? "[[$2]]" : $2}eg; + s/\`//g; + s/^\s*\./\\&./g; + if (/^#\s/) { + s/^#\s/.SH /; + <>; # blank; + } + s/^[ \n]+//; + s/^\t/ /; + s/-/\\-/g; + s/^Warning:.*//g; + s/^$/.PP\n/; + s/^\*\s+(.*)/.IP "$1"/; + next if $_ eq ".PP\n" && $skippara; + if (/^.IP /) { + $inlist=1; + $spippara=0; + } + elsif (/.SH/) { + $skippara=0; + $inlist=0; + } + elsif (/^\./) { + $skippara=1; + } + else { + $skippara=0; + } + if ($inlist && $_ eq ".PP\n") { + $_=".IP\n"; + } + + print $_; +} |