mirror of https://github.com/CGAL/cgal
104 lines
2.9 KiB
Ruby
104 lines
2.9 KiB
Ruby
#! /usr/bin/ruby
|
|
|
|
# == Synopsis
|
|
#
|
|
# "Mirrors" package files into a build folder for compilation.
|
|
#
|
|
# The package files are taken from a source package directory
|
|
# (typically a folder under an svn working copy)
|
|
#
|
|
# The directory structure under the package folder is replicated under
|
|
# a target build directory (creating subdirs as neccesary)
|
|
#
|
|
# "Mirroring" a package file consist on creating within the build directory a "view"
|
|
# to the file located into the package directory.
|
|
# This allows compilation within a "CGAL build directory structure" while
|
|
# keeping the source files in its original location within an svn working copy.
|
|
#
|
|
# In true POSIX platforms this is done via a symlink.
|
|
#
|
|
# In Windows platforms hardlinks are used instead. To ensure that broken hardlinks
|
|
# are properly syncronized, these are re-created whenever the source file is newer.
|
|
#
|
|
# The mirroring operation is automatically selected according to the platform,
|
|
# but can be overrided if needed via the '--mirror_operation' option.
|
|
#
|
|
# Unless specified otherwise using the '-all' option, internal "dont_submit" files
|
|
# are excluded.
|
|
#
|
|
# == Usage
|
|
#
|
|
# mirror_package [OPTIONS] PACKAGE_SUBDIR BUILD_ROOT
|
|
#
|
|
# PACKAGE_SUBDIR the source package sub directory
|
|
#
|
|
# BUILD_ROOT the destination build root directory
|
|
#
|
|
# OPTIONS:
|
|
#
|
|
# -h, --help:
|
|
# show help
|
|
#
|
|
# -o, --mirror_operation [symlink|hardlink]
|
|
# Mirroring operation
|
|
# symlink is the default in platforms supporting it (*nix)
|
|
# hardlink is the default in platforms not supporting symlinks (windows)
|
|
#
|
|
# -i, --include_internal
|
|
# Include internal files (excluded by default).
|
|
#
|
|
|
|
require 'getoptlong'
|
|
require 'rdoc/usage'
|
|
|
|
require 'list_package_files_impl.rb'
|
|
require 'mirror_package_impl.rb'
|
|
|
|
# -- TEST --
|
|
ARGV = [TEST_PKG_ROOT, TEST_BUILD_ROOT]
|
|
# ARGV = ['-i',TEST_PKG_DIR, TEST_BUILD_ROOT]
|
|
# -- TEST --
|
|
|
|
opts = GetoptLong.new( [ '--help' , '-h', GetoptLong::NO_ARGUMENT ],
|
|
[ '--mirror_operation', '-o', GetoptLong::REQUIRED_ARGUMENT ],
|
|
[ '--include_internal', '-i', GetoptLong::NO_ARGUMENT ]
|
|
)
|
|
|
|
include_internal = false
|
|
|
|
mirror_operation = default_mirror_op
|
|
|
|
opts.each do |opt, arg|
|
|
case opt
|
|
when '--help'
|
|
RDoc::usage
|
|
|
|
when '--mirror_operation'
|
|
case arg
|
|
when 'symlink'
|
|
mirror_operation = :symlink
|
|
when 'hardlink'
|
|
mirror_operation = :hardlink
|
|
else
|
|
$stderr << "Invalid mirror operation: " << arg
|
|
end
|
|
|
|
when '--include_internal'
|
|
include_internal = true
|
|
|
|
end
|
|
end
|
|
|
|
src_package_subdir = ARGV.length >= 1 ? ARGV.shift : ''
|
|
tgt_build_root = ARGV.length >= 1 ? ARGV.shift : ''
|
|
|
|
unless src_package_subdir.empty? || tgt_build_root.empty? then
|
|
|
|
files = list_package_files(src_package_subdir,include_internal)
|
|
|
|
mirror_package(files,src_package_subdir,tgt_build_root,mirror_operation)
|
|
|
|
else
|
|
RDoc::usage
|
|
end
|