#!/usr/bin/perl -w # # Install Linux into a given directory, either via: # # * debootstrap # * rpmstrap # * untarring. # * copying # use strict; # # Parse our arguments. # # # Check arguments. # # # Work out how to install: # if ( $CONFIG{'debootstrap'} ) { } elsif ( $CONFIG{'rpmstrap'} ) { } elsif ( $CONFIG{'copy-from'} ) { } elsif ( $CONFIG{'untar'} ) { } else { # # error # # return a code so that xen-create-image can abort. } # # Finished # # # Return 0 so that xen-create-image knows we succeeded. #