aboutsummaryrefslogtreecommitdiff
path: root/examples/depmod.pl
diff options
context:
space:
mode:
authorEric Andersen <andersen@codepoet.org>2004-03-15 08:29:22 +0000
committerEric Andersen <andersen@codepoet.org>2004-03-15 08:29:22 +0000
commitc7bda1ce659294d6e22c06e087f6f265983c7578 (patch)
tree4c6d2217f4d8306c59cf1096f8664e1cfd167213 /examples/depmod.pl
parent8854004b41065b3d081af7f3df13a100b0c8bfbe (diff)
downloadbusybox-w32-c7bda1ce659294d6e22c06e087f6f265983c7578.tar.gz
busybox-w32-c7bda1ce659294d6e22c06e087f6f265983c7578.tar.bz2
busybox-w32-c7bda1ce659294d6e22c06e087f6f265983c7578.zip
Remove trailing whitespace. Update copyright to include 2004.
Diffstat (limited to 'examples/depmod.pl')
-rwxr-xr-xexamples/depmod.pl18
1 files changed, 9 insertions, 9 deletions
diff --git a/examples/depmod.pl b/examples/depmod.pl
index ea29e8883..9af192208 100755
--- a/examples/depmod.pl
+++ b/examples/depmod.pl
@@ -4,7 +4,7 @@
4# Copyright (c) 2001 Erik Andersen <andersen@codepoet.org> 4# Copyright (c) 2001 Erik Andersen <andersen@codepoet.org>
5# Copyright (c) 2001 Stuart Hughes <stuarth@lineo.com> 5# Copyright (c) 2001 Stuart Hughes <stuarth@lineo.com>
6# Copyright (c) 2002 Steven J. Hill <shill@broadcom.com> 6# Copyright (c) 2002 Steven J. Hill <shill@broadcom.com>
7# This program is free software; you can redistribute it and/or modify it 7# This program is free software; you can redistribute it and/or modify it
8# under the same terms as Perl itself. 8# under the same terms as Perl itself.
9 9
10# TODO -- use strict mode... 10# TODO -- use strict mode...
@@ -54,13 +54,13 @@ if($basedir !~ m-/lib/modules-) {
54 warn "WARNING: base directory does not match ..../lib/modules\n"; 54 warn "WARNING: base directory does not match ..../lib/modules\n";
55} 55}
56 56
57# Find the list of .o files living under $basedir 57# Find the list of .o files living under $basedir
58#if ($verbose) { printf "Locating all modules\n"; } 58#if ($verbose) { printf "Locating all modules\n"; }
59my($ofile) = ""; 59my($ofile) = "";
60my($file) = ""; 60my($file) = "";
61my(@liblist) = (); 61my(@liblist) = ();
62find sub { 62find sub {
63 if ( -f $_ && ! -d $_ ) { 63 if ( -f $_ && ! -d $_ ) {
64 $file = $File::Find::name; 64 $file = $File::Find::name;
65 if ( $file =~ /.o$/ ) { 65 if ( $file =~ /.o$/ ) {
66 push(@liblist, $file); 66 push(@liblist, $file);
@@ -118,14 +118,14 @@ foreach $obj ( @liblist, $kernel ){
118foreach $module (keys %$dep) { 118foreach $module (keys %$dep) {
119 $mod->{$module} = {}; 119 $mod->{$module} = {};
120 foreach (@{$dep->{$module}}) { 120 foreach (@{$dep->{$module}}) {
121 if( $exp->{$_} ) { 121 if( $exp->{$_} ) {
122 warn "resolved symbol $_ in file $exp->{$_}\n" if $verbose; 122 warn "resolved symbol $_ in file $exp->{$_}\n" if $verbose;
123 next if $exp->{$_} =~ /vmlinux/; 123 next if $exp->{$_} =~ /vmlinux/;
124 $mod->{$module}{$exp->{$_}} = 1; 124 $mod->{$module}{$exp->{$_}} = 1;
125 } else { 125 } else {
126 warn "unresolved symbol $_ in file $module\n"; 126 warn "unresolved symbol $_ in file $module\n";
127 } 127 }
128 } 128 }
129} 129}
130 130
131# resolve the dependancies for each module 131# resolve the dependancies for each module
@@ -222,9 +222,9 @@ Be verbose (not implemented)
222=head1 COPYRIGHT 222=head1 COPYRIGHT
223 223
224Copyright (c) 2001 David Schleef <ds@schleef.org> 224Copyright (c) 2001 David Schleef <ds@schleef.org>
225Copyright (c) 2001 Erik Andersen <andersen@lineo.com> 225Copyright (c) 2001 Erik Andersen <andersen@codepoet.org>
226Copyright (c) 2001 Stuart Hughes <stuarth@lineo.com> 226Copyright (c) 2001 Stuart Hughes <stuarth@lineo.com>
227This program is free software; you can redistribute it and/or modify it 227This program is free software; you can redistribute it and/or modify it
228under the same terms as Perl itself. 228under the same terms as Perl itself.
229 229
230=head1 AUTHOR 230=head1 AUTHOR
@@ -233,5 +233,5 @@ David Schleef <ds@schleef.org>
233 233
234=cut 234=cut
235 235
236# $Id: depmod.pl,v 1.3 2003/07/14 21:20:51 andersen Exp $ 236# $Id: depmod.pl,v 1.4 2004/03/15 08:28:33 andersen Exp $
237 237