diff options
author | Jean-Francois Moine <moinejf@free.fr> | 2008-08-31 08:23:58 +0200 |
---|---|---|
committer | Jean-Francois Moine <moinejf@free.fr> | 2008-08-31 08:23:58 +0200 |
commit | 83027ea1202394a80ca58ed8da84e207d855521e (patch) | |
tree | e785ac503165d57d3a5cfb88f20eff034d12199f /v4l/scripts | |
parent | f1a52a2e70204db19b6c81bb59de2c759cefaaa6 (diff) | |
parent | 7804585be37d9aa982df2d476a795cbe459dae4a (diff) | |
download | mediapointer-dvb-s2-83027ea1202394a80ca58ed8da84e207d855521e.tar.gz mediapointer-dvb-s2-83027ea1202394a80ca58ed8da84e207d855521e.tar.bz2 |
merge: v4l-dvb
Diffstat (limited to 'v4l/scripts')
-rw-r--r-- | v4l/scripts/headers_convert.pl | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/v4l/scripts/headers_convert.pl b/v4l/scripts/headers_convert.pl new file mode 100644 index 000000000..800a453e1 --- /dev/null +++ b/v4l/scripts/headers_convert.pl @@ -0,0 +1,30 @@ +#!/usr/bin/perl +# +# headers_install prepare the listed header files for use in +# user space and copy the files to their destination. +# + +use strict; +use warnings; + +foreach (@ARGV) { + my $file = $_; + my $tmpfile = $file . ".tmp"; + + open(my $infile, '<', "$file") + or die "$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; + system "mv $tmpfile $file"; +} +exit 0; |