This file is indexed.

/usr/bin/noncvslist is in kdesdk-scripts 4:4.13.0-0ubuntu1.

This file is owned by root:root, with mode 0o755.

The actual contents of the file can be viewed below.

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
#! /usr/bin/env perl

# Offline check for extra in a checked-out
# CVS module. Sirtaj Singh Kang <taj@kde.org> May 2000.
# Usage:
# 	noncvsfiles <module dir>...

@dirqueue = @ARGV;
%entries = ();
@files = ();

sub processEntries
{
	my ( $dir ) = @_;

	open( ENTRIES, $dir."/CVS/Entries" ) 
		|| warn "Couldn't read '$dir/CVS/Entries'";

	while( <ENTRIES> ) {
		if ( m#^\s*D/([^/]+)/# ) {
			push ( @dirqueue, "$dir/$1" );
			$entries{ "$dir/$1" } = 1;
			next;
		}

		next unless m#^\s*/([^/]+)/([\d\.]*)/([^/]+)/#;

		$fname = $1;
		$ver = $2;
		$stamp = $3;

		$entries{ "$dir/$fname" } = $stamp;
	}

	close( ENTRIES );

        open( IGNORE, $dir."/.cvsignore" ) || return;

        while( <IGNORE> ) {
                chomp;
                s/^\s+//;
                s/\s+$//;
                $entries{ "$dir/$_" } = "ignored";
        }

        close( IGNORE );
}

# month assoc array for name -> index lookups
$mctr = 0;

foreach $month ( @monthlist ) {
	$months{ $month } = $mctr;
	$mctr++;
}

# Try current directory if none specified

if( $#dirqueue < 0 ) {
	push( @dirqueue, "." );
}

# process directory queue, filling entries hash
foreach $dir ( @dirqueue ) {
	processEntries( $dir );

	open( FILES, 'find "'.$dir.'" | grep -v "/CVS"|' )
			|| die "Couldn't find files in $dir";

	while( <FILES> ) {
		chop;
		next if $_ eq '.';
		next if m/\/\.#/;     #ignore .#blah
		push @files, $_;
	}
}

#foreach my $entry ( sort keys %entries ) 
#{
#	print $entry,"\n";
#}

my $lastfile = "";

foreach my $file ( sort @files ) 
{
	next if $file eq $lastfile;
	$lastfile = $file;

	if ( !exists $entries{ $file } ) {
		print $file,"\n";
	}
}

=head1 NAME

noncvslist -- List all files in a checked out CVS module that are not
known by the CVS server.

=head1 SYNOPSIS

When the current directory is a CVS module:
 
        noncvslist
 
Checking checked out subdirectories:
 
        noncvslist [<dir>...]

=head1 DESCRIPTION

This script will list all files and directories in the module(s) that are 
not listed in the CVS/Entries files. These may be files created during builds,
new un-added sources files etc. It is a useful housekeeping tool.

=head1 EXAMPLES

Assuming baseline/ has kdelibs/ and kdebase/ checked out within it:

	cd baseline/kdelibs; noncvslist
	cd baseline; noncvslist kdelibs kdebase

=head1 AUTHOR

Sirtaj Singh Kang <taj@kde.org>

=cut