Initial revision
[chise/xemacs-chise.git.1] / lib-src / process-gnu-depends.sh
1 #!/bin/sh
2
3 perl -e '
4 while (<>)
5 {
6     chop;
7     $foo .= $_;
8     if (!/\\$/)
9     {
10         @foo = split (/[ \\:\n]+/, $foo);
11         $filename = $foo[0];
12         if (($filename =~ /^unex/) ||
13             ($filename =~ /^sgiplay/) ||
14             ($filename =~ /^Extern/) ||
15             ($filename =~ /^extw/))
16         {
17             $foo = "";
18             next;
19         }
20         @foo = grep (!/\.c$/, @foo);
21         @foo = grep ((s/\/.*lwlib\//\$(LWLIBSRCDIR)\//, 1), @foo);
22         @foo = grep (!/lisp\.h/, @foo);
23         @foo = grep (!/lisp\.h/, @foo);
24         @foo = grep (!/lisp-union\.h/, @foo);
25         @foo = grep (!/lisp-disunion\.h/, @foo);
26         @foo = grep (!/lrecord\.h/, @foo);
27         @foo = grep (!/emacsfns\.h/, @foo);
28         @foo = grep (!/symeval\.h/, @foo);
29         @foo = grep (!/symsinit\.h/, @foo);
30         @foo = grep (!/syssignal\.h/, @foo);
31         @foo = grep (!/intl\.h/, @foo);
32         @foo = grep (!/tt_c\.h/, @foo);
33         @foo = grep (!/descrip\.h/, @foo);
34         shift @foo;
35         if (!$#foo)
36         {
37             next;
38         }
39         foreach $i (0 .. $#foo)
40         {
41             $foo[$i] = $filename . ": " . $foo[$i];
42         }
43         print $filename . ": config.h\n";
44         print join ("\n", @foo);
45         print "\n";
46         $foo = "";
47     }
48 }
49 ' | sort | uniq