Lines Matching +full:sub +full:- +full:module

7 # Usage: export_report.pl -k Module.symvers [-o report_file ] -f *.mod.c
14 sub numerically {
20 sub alphabetically {
26 sub print_depends_on {
30 		my $list = $href->{$mod};
34 			printf("\t\t%-25s\n", $symbol);
42 sub usage {
43         print "Usage: @_ -h -k Module.symvers  [ -o outputfile ] \n",
44 	      "\t-f: treat all the non-option argument as .mod.c files. ",
46 	      "\t-h: print detailed help\n",
47 	      "\t-k: the path to Module.symvers file. By default uses ",
49 	      "\t-o outputfile: output the report to outputfile\n";
53 sub collectcfiles {
66 my (%SYMBOL, %MODULE, %opt, @allcfiles);
79 	$opt{'k'} = "Module.symvers";
94 # Module.symvers file
98 	my (undef, $symbol, $module, $gpl) = split;
99 	$SYMBOL { $symbol } =  [ $module , "0" , $symbol, $gpl];
109 	my $module;
111 	unless (open ($module, '<', $thismod)) {
117 	while ( <$module> ) {
128 			if ( $_ !~ /0x[0-9a-f]+,/ ) {
132 			my ($module, $value, $symbol, $gpl) = @{$SYMBOL{$sym}};
133 			$SYMBOL{ $sym } =  [ $module, $value+1, $symbol, $gpl];
134 			push(@{$MODULE{$thismod}} , $sym);
141 	close($module);
144 print "\tThis file reports the exported symbols usage patterns by in-tree\n",
152 printf("%-25s\t%-25s\t%-5s\t%-25s\n", "Symbol", "Module", "Usage count",
159 	my ($module, $value, $symbol, $gpl) = @{$list};
160 	printf("%-25s\t%-25s\t%-10s\t", $symbol, $module, $value);
162 		printf("%-25s\n",$gpl);
169 printf("SECTION 2:\n\tThis section reports export-symbol-usage of in-kernel
170 modules. Each module lists the modules, and the symbols from that module that
177 for my $thismod (sort keys %MODULE) {
178 	my $list = $MODULE{$thismod};
183 		my ($module, $value, undef, $gpl) = @{$SYMBOL{$symbol}};
184 		push (@{$depends{"$module"}}, "$symbol $value");