cc95fb221794d0d0559da2c9f14f84710bb0ee4e
[samba.git] / source / heimdal_build / asn1_deps.pl
1 #!/usr/bin/perl
2 # Generate make dependency rules for asn1 files
3 # Jelmer Vernooij <jelmer@samba.org> 2005
4 # GPL
5
6 use File::Basename;
7
8 my $file = shift;
9 my $prefix = shift;
10 my $options = shift;
11 my $x_file, @x_files;
12 my $c_file, @c_files;
13 if (not defined ($prefix)) { $prefix = "asn1"; }
14
15 $dirname = dirname($file);
16 $basename = basename($file);
17 if (not defined $options) {
18     $options = "";
19 }
20
21 my $header = "$dirname/$prefix.h";
22
23 print "$header: $file bin/asn1_compile\n";
24 print "\t\@echo \"Compiling ASN1 file $file\"\n";
25 print "\t\@cd $dirname && ../../../bin/asn1_compile $options $basename $prefix\n\n";
26
27 open(IN,$file) or die("Can't open $file: $!");
28 foreach(<IN>) {
29         if (/^([A-Za-z0-9_-]+)[ \t]*::= /) {
30                 my $output = $1;
31                 $output =~ s/-/_/g;
32                 $c_file = "$dirname/asn1_$output.c";
33                 $x_file = "$dirname/asn1_$output.x";
34                 print "$x_file: $header\n";
35                 print "$c_file: $dirname/asn1_$output.x\n";
36                 print "\t\@cp $x_file $c_file\n\n";
37                 push @x_files, $x_file;
38                 push @c_files, $c_file;
39         }
40 }
41 close(IN);
42 print $prefix."_clean: \n";
43 print "\t\@echo \"Deleting ASN1 output files generated from $file\"";
44 print "\n\t\@rm -f $header";
45 foreach $c_file (@c_files) {
46     print "\n\t\@rm -f $c_file";
47 }
48 foreach $x_file (@x_files) {
49     print "\n\t\@rm -f $x_file";
50 }
51 print "\n\n";