-#!/bin/sh
+#!/usr/bin/perl -w
-set -e
+use strict;
-chmod +x rts/gmp/configure
-chmod +x darcs-all
+use Cwd;
-./darcs-all ${1+"$@"} get
+# Create libraries/*/{ghc.mk,GNUmakefile}
+system("/usr/bin/perl", "-w", "boot-pkgs") == 0
+ or die "Running boot-pkgs failed: $?";
-autoreconf
+my $dir;
+my $curdir;
-for lib in libraries/*; do
- if test -e $lib/configure.ac
- then
- cd $lib
- autoreconf
- cd ../..
- fi
-done
+$curdir = &cwd()
+ or die "Can't find current directory: $!";
+# Check that we have all boot packages.
+open PACKAGES, "< packages";
+while (<PACKAGES>) {
+ if (/^#/) {
+ # Comment; do nothing
+ }
+ elsif (/^([a-zA-Z0-9\/.-]+) *[^ ]+ *[^ ]+$/) {
+ $dir = $1;
+
+ # We would like to just check for an _darcs directory here, but in
+ # an lndir tree we avoid making _darcs directories, so it doesn't
+ # exist. We therefore require that every repo has a LICENSE file
+ # instead.
+ if (! -f "$dir/LICENSE") {
+ print STDERR "Error: $dir/LICENSE doesn't exist.\n";
+ die "Maybe you haven't done './darcs-all get'?";
+ }
+ }
+ elsif (/^([a-zA-Z0-9\/.-]+) *[^ ]+ *[^ ]+ *[^ ]+$/) {
+ # These are lines which refer to optional repositories, so their
+ # absence isn't an error.
+ }
+ else {
+ die "Bad line in packages file: $_";
+ }
+}
+close PACKAGES;
+
+# autoreconf everything that needs it.
+foreach $dir (".", glob("libraries/*/")) {
+ if (-f "$dir/configure.ac") {
+ print "Booting $dir\n";
+ chdir $dir or die "can't change to $dir: $!";
+ system("autoreconf") == 0
+ or die "Running autoreconf failed with exitcode $?";
+ chdir $curdir or die "can't change to $curdir: $!";
+ }
+}
+
+# Alas, darcs doesn't handle file permissions, so fix a few of them.
+for my $file ("boot", "darcs-all", "validate") {
+ chmod 0755, $file if -f $file
+ or die "Can't chmod 0755 $file: $!";
+}