wmi-1.3.16 from opsview.com

2019-02-16 00:16:52 +01:00
parent 163fdd3d1b
commit 17b3af2911
2146 changed files with 678824 additions and 0 deletions
@@ -0,0 +1,38 @@
+#!/usr/bin/perl
+# Script that reads in C files and prints defines that are used nowhere in the 
+# code
+
+# Arguments: C and H files
+# Copyright Jelmer Vernooij <jelmer@samba.org>, GPL
+
+use strict;
+
+my %defined;
+my %used;
+my %files;
+
+my $tmp;
+while($tmp = shift) { 
+	$files{$tmp} = $tmp;
+	open(FI, $tmp);
+	my $ln = 0;
+	while(<FI>) { 
+		$ln++;
+		my $line = $_;
+		my $cur = "";
+		if(/^#define ([A-Za-z0-9_]+)/) {
+			$defined{$1} = "$tmp:$ln";
+			$cur = $1;
+		}
+
+		$_ = $line;
+		while(/([A-Za-z0-9_]+)/sgm) { 
+			if($cur ne $1) { $used{$1} = "$tmp:$ln"; }
+		}
+	}
+	close FI;
+}
+
+foreach(keys %defined) {
+	if(!$used{$_}) { print "$defined{$_}: Macro `$_' is unused\n"; }
+}