mirror of
https://github.com/hardkernel/kernel_common_drivers.git
synced 2026-06-25 12:03:48 +09:00
a923dea38d
PD#SWPL-128588 Problem: Cannot copy files when compiling Solution: Remove Makefile autoreview script Verify: no Change-Id: Icdbe276ef2a5c2aefe0173c0b8457c09a3b40e4b Signed-off-by: pengzhao.liu <pengzhao.liu@amlogic.com>
54 lines
820 B
Perl
Executable File
54 lines
820 B
Perl
Executable File
#!/usr/bin/perl -W
|
|
# SPDX-License-Identifier: (GPL-2.0+ OR MIT)
|
|
#
|
|
# Copyright (c) 2019 Amlogic, Inc. All rights reserved.
|
|
#
|
|
my $FILE;
|
|
$flist = " ";
|
|
open($FILE, '<&STDIN');
|
|
while (<$FILE>) {
|
|
chomp;
|
|
my $line = $_;
|
|
my $new = "";
|
|
if($line =~/^A\s+(.+\.[cChH])/)
|
|
{
|
|
$new = $1;
|
|
}
|
|
elsif(/^A\s+(.+\.dts*)/i)
|
|
{
|
|
$new = $1;
|
|
}
|
|
if( -e $new)
|
|
{
|
|
$flist = $flist.$new." ";
|
|
}
|
|
|
|
}
|
|
close $FILE;
|
|
|
|
if($flist =~/^\s*$/)
|
|
{
|
|
#print "\n LicenceCheck exit:No *.[CcHh] added.\n\n";
|
|
exit 0;
|
|
}
|
|
else
|
|
{
|
|
print "\n Check :$flist\n";
|
|
}
|
|
|
|
$match = "Licence_WARN: <";
|
|
$pl = "./scripts/amlogic/licence_check.pl";
|
|
$out = 0;
|
|
$result_0 = `$pl --nofix $flist`;
|
|
if($result_0 =~/$match/)
|
|
{
|
|
$out =1;
|
|
print $result_0;
|
|
print "\n Licence Check Error, please try to fix:\n $pl $flist\n\n"
|
|
}
|
|
else
|
|
{
|
|
print "\n Licence Check OK\n\n"
|
|
}
|
|
exit $out;
|