Re: [PATCH 6/6] kbuild: optimize headers_* targets

["Vegard Nossum" <vegard.nossum@gmail.com>]

Hi Sam,

Just one more comment from me :-)

On Sun, Jun 8, 2008 at 10:07 PM, Sam Ravnborg <sam@ravnborg.org> wrote:
> diff --git a/scripts/headers_install.pl b/scripts/headers_install.pl
> new file mode 100644
> index 0000000..283c055
> --- /dev/null
> +++ b/scripts/headers_install.pl
> @@ -0,0 +1,43 @@
> +#!/usr/bin/perl
> +#
> +# headers_install prepare the listed header files for use in
> +# user space and copy the files to their destination.
> +#
> +# Usage: headers_install.pl odir installdir [files...]
> +# odir:    dir to open files
> +# install: dir to install the files
> +# files:   list of files to check
> +#
> +# Step in preparation for users space:
> +# 1) Drop all use of compiler.h definitions
> +# 2) Drop include of compiler.h
> +# 3) Drop all sections defined out by __KERNEL__ (using unifdef)
> +
> +use strict;
> +use warnings;
> +
> +my ($odir, $installdir, @files) = @ARGV;
> +
> +my $ret = 0;
> +my $unifdef = "scripts/unifdef -U__KERNEL__";
> +
> +foreach my $file (@files) {
> +       my $tmpfile = "$installdir/$file.tmp";
> +       open(my $infile, '<', "$odir/$file") or die "$odir/$file: $!\n";
> +       open(my $outfile, '>', "$tmpfile") or die "$tmpfile: $!\n";
> +       while (my $line = <$infile>) {
> +               $line =~ s/([\s(])__user\s/$1/g;
> +               $line =~ s/([\s(])__force\s/$1/g;
> +               $line =~ s/([\s(])__iomem\s/$1/g;
> +               $line =~ s/\s__attribute_const__\s/ /g;
> +               $line =~ s/\s__attribute_const__$//g;
> +               $line =~ s/^#include <linux\/compiler.h>//;
> +               printf $outfile "%s", $line;
> +       }
> +       close $outfile;
> +       close $infile;
> +       $ret = system $unifdef . " $tmpfile > $installdir/$file";

This seems flawed as we'll always exit with the $ret of the last file.
Do you intend to abort on the first error, or go as far as possible?

Maybe you can use something like this:

system ... or warn "$file: $!\n"
$ret = $? unless $ret;

(This should preserve the $ret from the first process that fails with
a non-zero exit code.)

> +       unlink $tmpfile;
> +}
> +
> +exit $ret;

What do you think?


Vegard

-- 
"The animistic metaphor of the bug that maliciously sneaked in while
the programmer was not looking is intellectually dishonest as it
disguises that the error is the programmer's own creation."
	-- E. W. Dijkstra, EWD1036