X-Git-Url: http://git.apps.os.sepia.ceph.com/?p=xfstests-dev.git;a=blobdiff_plain;f=lsqa.pl;h=8ca1167f845c79d671ae667b7cfe1bc1a397a714;hp=b4fc83f43f992ee304e1795ccc12c4feda4a6dab;hb=9ffcdd4c78101263b352ac555c78b0590945c746;hpb=a050cb00c78f8020c76ed6e20800ddaf15a0dd25 diff --git a/lsqa.pl b/lsqa.pl index b4fc83f4..8ca1167f 100755 --- a/lsqa.pl +++ b/lsqa.pl @@ -1,21 +1,7 @@ #!/usr/bin/perl -w -# +# SPDX-License-Identifier: GPL-2.0 # Copyright (c) 2008 Silicon Graphics, Inc. All Rights Reserved. # -# 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. -# -# This program is distributed in the hope that it would 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 the Free Software Foundation, -# Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA -# - # Print headers of given tests # Accepted parameter types: # - nothing - list all tests from all subdirectories in tests/* @@ -109,9 +95,11 @@ sub get_qa_header($) { open(my $FH, $f) || die "couldn't open '$f': $!"; while (<$FH>) { #ignore. - m/^#\!/ and next; #shebang - m/^#\s*\-{10}/ and last; #dashed lines - m/^#\s*copyright/i and last; #copyright lines + m/^#\!/ and next; # shebang + m/^# SPDX/i and next; # SPDX tags + m/^# Copyright/i and next; # Copyright tags + m/^#\s*\-{10}/ and last; # dashed lines + m/^seq/i and last; # test start s/^# *//;