|
|
|
@ -353,27 +353,6 @@ sub deparenthesize {
|
|
|
|
|
|
|
|
|
|
$chk_signoff = 0 if ($file);
|
|
|
|
|
|
|
|
|
|
my @dep_includes = ();
|
|
|
|
|
my @dep_functions = ();
|
|
|
|
|
my $removal = "Documentation/feature-removal-schedule.txt";
|
|
|
|
|
if ($tree && -f "$root/$removal") {
|
|
|
|
|
open(my $REMOVE, '<', "$root/$removal") ||
|
|
|
|
|
die "$P: $removal: open failed - $!\n";
|
|
|
|
|
while (<$REMOVE>) {
|
|
|
|
|
if (/^Check:\s+(.*\S)/) {
|
|
|
|
|
for my $entry (split(/[, ]+/, $1)) {
|
|
|
|
|
if ($entry =~ m@include/(.*)@) {
|
|
|
|
|
push(@dep_includes, $1);
|
|
|
|
|
|
|
|
|
|
} elsif ($entry !~ m@/@) {
|
|
|
|
|
push(@dep_functions, $entry);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
close($REMOVE);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
my @rawlines = ();
|
|
|
|
|
my @lines = ();
|
|
|
|
|
my $vname;
|
|
|
|
@ -3099,22 +3078,6 @@ sub process {
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
# don't include deprecated include files (uses RAW line)
|
|
|
|
|
for my $inc (@dep_includes) {
|
|
|
|
|
if ($rawline =~ m@^.\s*\#\s*include\s*\<$inc>@) {
|
|
|
|
|
ERROR("DEPRECATED_INCLUDE",
|
|
|
|
|
"Don't use <$inc>: see Documentation/feature-removal-schedule.txt\n" . $herecurr);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
# don't use deprecated functions
|
|
|
|
|
for my $func (@dep_functions) {
|
|
|
|
|
if ($line =~ /\b$func\b/) {
|
|
|
|
|
ERROR("DEPRECATED_FUNCTION",
|
|
|
|
|
"Don't use $func(): see Documentation/feature-removal-schedule.txt\n" . $herecurr);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
# no volatiles please
|
|
|
|
|
my $asm_volatile = qr{\b(__asm__|asm)\s+(__volatile__|volatile)\b};
|
|
|
|
|
if ($line =~ /\bvolatile\b/ && $line !~ /$asm_volatile/) {
|
|
|
|
|