mirror of https://github.com/perkeep/perkeep.git
Script to add missing copyright headers on files.
This commit is contained in:
parent
0baf46c69a
commit
9148279f3d
|
@ -0,0 +1,68 @@
|
|||
#!/usr/bin/perl
|
||||
#
|
||||
# Copyright 2010 Google Inc.
|
||||
#
|
||||
# Licensed under the Apache License, Version 2.0 (the "License");
|
||||
# you may not use this file except in compliance with the License.
|
||||
# You may obtain a copy of the License at
|
||||
#
|
||||
# http://www.apache.org/licenses/LICENSE-2.0
|
||||
#
|
||||
# Unless required by applicable law or agreed to in writing, software
|
||||
# distributed under the License is distributed on an "AS IS" BASIS,
|
||||
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
||||
# See the License for the specific language governing permissions and
|
||||
# limitations under the License.
|
||||
#
|
||||
#
|
||||
# This script adds copyright headers to files.
|
||||
|
||||
use strict;
|
||||
my $header = do { local $/; <DATA> };
|
||||
$header =~ s!\s+$!\n!;
|
||||
my $yyyy = (localtime())[5] + 1900;
|
||||
$header =~ s/YYYY/$yyyy/ or die;
|
||||
|
||||
unless (@ARGV == 1) {
|
||||
die "Usage: copyrightify <filename>\n";
|
||||
}
|
||||
|
||||
my $file = shift;
|
||||
open(my $fh, $file) or die "Open $file error: $!\n";
|
||||
my $source = do { local $/; <$fh> };
|
||||
close($fh);
|
||||
if ($source =~ /Copyright \d\d\d\d/) {
|
||||
print STDERR "# $file - OK\n";
|
||||
exit;
|
||||
}
|
||||
|
||||
my $newsource = $source;
|
||||
if ($file =~ /\.go$/) {
|
||||
$header = "/*\n$header*/\n\n";
|
||||
$newsource = $header . $source;
|
||||
} elsif ($file =~ /\.py$/) {
|
||||
$header = join("", map { "# $_\n" } split(/\n/, $header));
|
||||
$newsource = $header . $source;
|
||||
} else {
|
||||
die "File type not supported.";
|
||||
}
|
||||
|
||||
|
||||
open(my $fh, ">$file") or die "Open $file error: $!\n";
|
||||
print $fh $newsource;
|
||||
close($fh) or die;
|
||||
|
||||
__END__
|
||||
Copyright YYYY Google Inc.
|
||||
|
||||
Licensed under the Apache License, Version 2.0 (the "License");
|
||||
you may not use this file except in compliance with the License.
|
||||
You may obtain a copy of the License at
|
||||
|
||||
http://www.apache.org/licenses/LICENSE-2.0
|
||||
|
||||
Unless required by applicable law or agreed to in writing, software
|
||||
distributed under the License is distributed on an "AS IS" BASIS,
|
||||
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
||||
See the License for the specific language governing permissions and
|
||||
limitations under the License.
|
Loading…
Reference in New Issue