Lines Matching refs:name

5 #	Perform a name space analysis on the linux kernel.
61 # * Repeat the name space analysis until you can live with with the
82 my %def = (); # all definitions for each name
84 my %ref = (); # $ref{$name} exists if there is a true external reference to $name
85 my %export = (); # $export{$name} exists if there is an EXPORT_... of $name
161 $_ = $File::Find::name;
221 my ($source, $type, $name);
265 ($type, $name) = (split(/ +/, $_, 3))[1..2];
291 elsif ($name =~ /\./) {
292 # name with '.' is local static
297 $type = 'R' if ($name =~ /^__ksymtab/ || $name =~ /^__kstrtab/);
298 $name =~ s/_R[a-f0-9]{8}$//; # module versions adds this
300 $name ne 'init_module' &&
301 $name ne 'cleanup_module' &&
302 $name ne 'Using_Versions' &&
303 $name !~ /^Version_[0-9]+$/ &&
304 $name !~ /^__parm_/ &&
305 $name !~ /^__kstrtab/ &&
306 $name !~ /^__ksymtab/ &&
307 $name !~ /^__kcrctab_/ &&
308 $name !~ /^__exitcall_/ &&
309 $name !~ /^__initcall_/ &&
310 $name !~ /^__kdb_initcall_/ &&
311 $name !~ /^__kdb_exitcall_/ &&
312 $name !~ /^__module_/ &&
313 $name !~ /^__mod_/ &&
314 $name !~ /^__crc_/ &&
315 $name ne '__this_module' &&
316 $name ne 'kernel_version') {
317 if (!exists($def{$name})) {
318 $def{$name} = [];
320 push(@{$def{$name}}, $fullname);
322 push(@nmdata, "$type $name");
323 if ($name =~ /^__ksymtab_/) {
324 $name = substr($name, 10);
325 if (!exists($ksymtab{$name})) {
326 $ksymtab{$name} = [];
328 push(@{$ksymtab{$name}}, $fullname);
344 my ($object, $name) = @_;
348 if ($name eq (split(' ', $nmdata->[$i], 2))[1]) {
350 my $def = $def{$name};
351 for ($j = 0; $j < $#{$def{$name}}; ++$j) {
352 if ($def{$name}[$j] eq $object) {
353 splice(@{$def{$name}}, $j, 1);
363 foreach my $name (keys(%def)) {
364 if ($#{$def{$name}} > 0) {
366 if ($#{$def{$name}} == 1 &&
367 ($name =~ /^sys_/ || $name =~ /^compat_sys_/ ||
368 $name =~ /^sys32_/)) {
369 if($def{$name}[0] eq "kernel/sys_ni.o" ||
370 $def{$name}[1] eq "kernel/sys_ni.o") {
371 &drop_def("kernel/sys_ni.o", $name);
376 printf "$name is multiply defined in :-\n";
377 foreach my $module (@{$def{$name}}) {
392 my ($type, $name) = split(' ', $nmdata->[$i], 2);
394 if (exists($def{$name}) || exists($ksymtab{$name})) {
396 $nmdata->[$i] = "$type $name $object";
398 $kstrtab = "R __kstrtab_$name";
399 $ksymtab = "R __ksymtab_$name";
409 $export{$name} = "";
412 $ref{$name} = ""
415 elsif ( ! $nameexception{$name}
416 && $name !~ /^__sched_text_/
417 && $name !~ /^__start_/
418 && $name !~ /^__end_/
419 && $name !~ /^__stop_/
420 && $name !~ /^__scheduling_functions_.*_here/
421 && $name !~ /^__.*initcall_/
422 && $name !~ /^__.*per_cpu_start/
423 && $name !~ /^__.*per_cpu_end/
424 && $name !~ /^__alt_instructions/
425 && $name !~ /^__setup_/
426 && $name !~ /^__mod_timer/
427 && $name !~ /^__mod_page_state/
428 && $name !~ /^init_module/
429 && $name !~ /^cleanup_module/
433 printf "reference to $name from $object\n";
444 foreach my $name (keys(%def)) {
445 if (! exists($ref{$name})) {
446 my @module = @{$def{$name}};
451 push(@{$noref{$module}}, $name);