+++ /dev/null
-#! /usr/bin/perl -w
-# -*- perl -*-
-
-eval 'case $# in 0) exec /usr/bin/perl -S "$0";; *) exec /usr/bin/perl -S "$0" "$@";; esac'
- if 0;
-
-# gnu-configize - install the GNU config.guess / config.sub in a directory tree
-# Based on autoreconf:
-# Copyright (C) 1994, 1999, 2000, 2001, 2002, 2003
-# Free Software Foundation, Inc.
-
-# This program is free software; you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 2, or (at your option)
-# any later version.
-
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-# GNU General Public License for more details.
-
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
-# 02111-1307, USA.
-
-BEGIN
-{
- my $datadir = $ENV{'autom4te_perllibdir'} || '@autom4te_perllibdir@';
-# '/home/kergoth/code/build-arm/tmp/staging/share/autoconf';
- unshift @INC, $datadir;
-
- # Override SHELL. On DJGPP SHELL may not be set to a shell
- # that can handle redirection and quote arguments correctly,
- # e.g.: COMMAND.COM. For DJGPP always use the shell that configure
- # has detected.
- $ENV{'SHELL'} = '/bin/sh' if ($^O eq 'dos');
-}
-
-use Autom4te::ChannelDefs;
-use Autom4te::Channels;
-use Autom4te::Configure_ac;
-use Autom4te::FileUtils;
-use Autom4te::General;
-use Autom4te::XFile;
-# Do not use Cwd::chdir, since it might hang.
-use Cwd 'cwd';
-use strict;
-
-## ----------- ##
-## Variables. ##
-## ----------- ##
-
-# $HELP
-# -----
-$help = "Usage: $0 [OPTION] ... [CONFIGURE-AC or DIRECTORY] ...
-
-Install the GNU config.sub and config.guess scripts in the
-DIRECTORIES or the directory trees driven by CONFIGURE-AC
-(defaulting to `.').
-
-Operation modes:
- -h, --help print this help, then exit
- -V, --version print version number, then exit
- -v, --verbose verbosely report processing
- -f, --force consider all files obsolete
- -s, --symlink install symbolic links instead of copies
- -W, --warnings=CATEGORY report the warnings falling in CATEGORY [syntax]
-
-" . Autom4te::ChannelDefs::usage . "
-
-The environment variable \`WARNINGS\' is honored. Some subtools might
-support other warning types, using \`all' is encouraged.
-";
-
-# $VERSION
-# --------
-$version = "gnu-configize 1.0
-
-Copyright (C) 2004 Chris Larson
-This is free software; see the source for copying conditions. There is NO
-warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-";
-
-my $configdir = '@gnu-configdir@';
-#'/home/kergoth/code/build-arm/tmp/staging/i686-linux/share/gnu-config';
-my $autoconf = $ENV{'AUTOCONF'} || 'autoconf';
-
-# use symlinks instead.
-my $symlink = 0;
-
-my $configure_ac;
-
-my $rm = "rm -f";
-my $ln_s = "ln -sf";
-my $cp = "cp -f";
-my $mkdir = "mkdir";
-my $chmod = "chmod";
-
-## ---------- ##
-## Routines. ##
-## ---------- ##
-
-
-# parse_args ()
-# -------------
-# Process any command line arguments.
-sub parse_args ()
-{
- my $srcdir;
-
- getopt ('s|symlink' => \$symlink);
-
- # Even if the user specified a configure.ac, trim to get the
- # directory, and look for configure.ac again. Because (i) the code
- # is simpler, and (ii) we are still able to diagnose simultaneous
- # presence of configure.ac and configure.in.
- @ARGV = map { /configure\.(ac|in)$/ ? dirname ($_) : $_ } @ARGV;
- push @ARGV, '.' unless @ARGV;
-}
-
-
-# &gnu_configize_current_directory
-# -----------------------------
-sub gnu_configize_current_directory ()
-{
- my $configure_ac = require_configure_ac;
-
- # ---------------------- #
- # Is it using Autoconf? #
- # ---------------------- #
-
- my $uses_autoconf;
- my $uses_gettext;
- my $configure_ac_file = new Autom4te::XFile $configure_ac;
- while ($_ = $configure_ac_file->getline)
- {
- s/#.*//;
- s/dnl.*//;
- $uses_autoconf = 1 if /AC_INIT/;
- }
-
- if (!$uses_autoconf)
- {
- verb "$configure_ac: not using Autoconf";
- return;
- }
-
- my $aux_dir;
- my @subdir;
- my $cmd;
- my $dest;
-
- verb "$configure_ac: tracing";
- my $traces = new Autom4te::XFile
- ("$autoconf"
- . join (' --trace=', '',
- # If you change this list, update the
- # `Autoreconf-preselections' section of autom4te.in.
- 'AC_CONFIG_AUX_DIR:AC_CONFIG_AUX_DIR:\$1',
- 'AC_CONFIG_SUBDIRS:AC_CONFIG_SUBDIRS:\$1',
- 'AC_INIT',
- )
- . ' |');
- while ($_ = $traces->getline)
- {
- $aux_dir = $1 if /AC_CONFIG_AUX_DIR:(.*)/;
- $uses_autoconf = 1 if /AC_INIT/;
- push @subdir, split (' ', $1) if /AC_CONFIG_SUBDIRS:(.*)/;
- }
-
- # The subdirs are *optional*, they may not exist.
- foreach (@subdir)
- {
- if (-d)
- {
- verb "$configure_ac: subdirectory $_ to gnu-configize";
- gnu_configize ($_);
- }
- else
- {
- verb "$configure_ac: subdirectory $_ not present";
- }
- }
-
- $dest = ".";
-
- if (defined $aux_dir)
- {
- $dest = $aux_dir;
- if (! -d $aux_dir)
- {
- verb "$configure_ac: creating directory $aux_dir";
- mkdir $aux_dir
- or error "cannot create $aux_dir: $!";
- }
- }
-
- if (!$symlink)
- {
- $cmd = $cp;
- }
- else
- {
- $cmd = $ln_s;
- }
-
- xsystem ("$cmd $configdir/config.guess $dest/");
- xsystem ("$chmod u+x $dest/config.guess");
- xsystem ("$cmd $configdir/config.sub $dest/");
- xsystem ("$chmod u+x $dest/config.sub");
-}
-
-
-# &gnu_configize ($DIRECTORY)
-# ------------------------
-# Reconf the $DIRECTORY.
-sub gnu_configize ($)
-{
- my ($directory) = @_;
- my $cwd = cwd;
-
- # The format for this message is not free: taken from Emacs, itself
- # using GNU Make's format.
- verb "Entering directory `$directory'";
- chdir $directory
- or error "cannot chdir to $directory: $!";
-
- gnu_configize_current_directory;
-
- # The format is not free: taken from Emacs, itself using GNU Make's
- # format.
- verb "Leaving directory `$directory'";
- chdir $cwd
- or error "cannot chdir to $cwd: $!";
-}
-
-
-## ------ ##
-## Main. ##
-## ------ ##
-
-parse_args;
-
-# Autoreconf all the given configure.ac. A while loop, not a for,
-# since the list can change at runtime because of AC_CONFIG_SUBDIRS.
-for my $directory (@ARGV)
- {
- gnu_configize ($directory);
- }
-
-### Setup "GNU" style for perl-mode and cperl-mode.
-## Local Variables:
-## perl-indent-level: 2
-## perl-continued-statement-offset: 2
-## perl-continued-brace-offset: 0
-## perl-brace-offset: 0
-## perl-brace-imaginary-offset: 0
-## perl-label-offset: -2
-## cperl-indent-level: 2
-## cperl-brace-offset: 0
-## cperl-continued-brace-offset: 0
-## cperl-label-offset: -2
-## cperl-extra-newline-before-brace: t
-## cperl-merge-trailing-else: nil
-## cperl-continued-statement-offset: 2
-## End:
projects / vuplus_openembedded / blobdiff