summaryrefslogtreecommitdiff
path: root/source4/script
diff options
context:
space:
mode:
authorJelmer Vernooij <jelmer@samba.org>2014-08-30 01:50:35 +0200
committerDavid Disseldorp <ddiss@samba.org>2014-08-31 21:21:13 +0200
commitb97248297c332aa15c9d30393ee498782241259e (patch)
treef5a591e74e22f17c78119370839274945c5795e8 /source4/script
parentf8ec0f98072e6646e204b4c90f5f6ad250b5dd5d (diff)
downloadsamba-b97248297c332aa15c9d30393ee498782241259e.tar.gz
source4: Remove script to find unused makefile variables.
Signed-Off-By: Jelmer Vernooij <jelmer@samba.org> Reviewed-by: David Disseldorp <ddiss@samba.org>
Diffstat (limited to 'source4/script')
-rwxr-xr-xsource4/script/find_unused_makefilevars.pl55
1 files changed, 0 insertions, 55 deletions
diff --git a/source4/script/find_unused_makefilevars.pl b/source4/script/find_unused_makefilevars.pl
deleted file mode 100755
index 23fc36ef6a5..00000000000
--- a/source4/script/find_unused_makefilevars.pl
+++ /dev/null
@@ -1,55 +0,0 @@
-#!/usr/bin/perl
-# Script that reads in Makefile.in and outputs the names of all
-# used but undefined vars and all defined but unused vars
-# Copyright Jelmer Vernooij <jelmer@samba.org>
-
-# Arguments:
-# 1: Makefile.in
-#
-
-my %references;
-my %defines;
-
-# First, make a list of defines in configure
-$in = shift;
-
-sub process_file($)
-{
- my ($fn) = @_;
- open(IN, $fn);
- while(<IN>) {
- my $line = $_;
- while($line =~ /^\b([a-zA-Z0-9_][a-zA-Z0-9_]*)\b[ \t]*=.*/sgm) {
- $defines{$1} = 1;
- }
- while($line =~ /\$\(([a-zA-Z0-9_][a-zA-Z0-9_]*)\)/sgm) {
- $references{$1} = 1;
- }
- while ($line =~ /^include (.*)/sgm) {
- process_file($1);
- }
- }
- close IN;
-}
-
-process_file($in);
-
-print "##### DEFINED BUT UNUSED: #####\n";
-foreach(%defines) {
-# print $_." defined\n";
-
- if ($_ != 1) {
- if ($references{$_} != 1) {
- print $_."\n";
- }
- }
-}
-
-print "##### USED BUT UNDEFINED: #####\n";
-foreach(%references) {
- if ($_ != 1) {
- if ($defines{$_} != 1) {
- print $_."\n";
- }
- }
-}