summaryrefslogtreecommitdiff
path: root/source4/heimdal_build/asn1_deps.pl
diff options
context:
space:
mode:
Diffstat (limited to 'source4/heimdal_build/asn1_deps.pl')
-rwxr-xr-xsource4/heimdal_build/asn1_deps.pl47
1 files changed, 43 insertions, 4 deletions
diff --git a/source4/heimdal_build/asn1_deps.pl b/source4/heimdal_build/asn1_deps.pl
index b45a90d416..fe9791c0d7 100755
--- a/source4/heimdal_build/asn1_deps.pl
+++ b/source4/heimdal_build/asn1_deps.pl
@@ -1,6 +1,7 @@
#!/usr/bin/perl
# Generate make dependency rules for asn1 files
# Jelmer Vernooij <jelmer@samba.org> 2005
+# Stefan Metzmacher <metze@samba.org> 2007
# GPL
use File::Basename;
@@ -15,6 +16,10 @@ my $c_file;
my @c_files = ();
my $o_file;
my @o_files = ();
+my $import;
+my @imports = ();
+my $dep;
+my @deps = ();
$basename = basename($file);
if (not defined $options) {
@@ -28,8 +33,10 @@ print "\t\@echo \"Compiling ASN1 file $file\"\n";
print "\t\@\$(builddir)/heimdal_build/asn1_compile_wrapper.sh \$(srcdir) \$(builddir) $dirname bin/asn1_compile $file $prefix $options\n\n";
open(IN,$file) or die("Can't open $file: $!");
-foreach(<IN>) {
- if (/^([\w]+[\w\-]+)(\s+OBJECT IDENTIFIER)?\s*::=/) {
+my @lines = <IN>;
+close(IN);
+foreach my $line (@lines) {
+ if ($line =~ /^([\w]+[\w\-]+)(\s+OBJECT IDENTIFIER)?\s*::=/) {
my $output = $1;
$output =~ s/-/_/g;
$c_file = "$dirname/asn1_$output.c";
@@ -41,9 +48,41 @@ foreach(<IN>) {
push @x_files, $x_file;
push @c_files, $c_file;
push @o_files, $o_file;
+ } elsif ($line =~ /^(\s*IMPORT)([\w\,\s])*(\s+FROM\s+)([\w]+[\w\-]+);/) {
+ $import = $line;
+ chomp $import;
+ push @imports, $import;
+ $import = undef;
+ } elsif ($line =~ /^(\s*IMPORT).*/) {
+ $import = $line;
+ chomp $import;
+ } elsif (defined($import) and ($line =~ /;/)) {
+ $import .= $line;
+ chomp $import;
+ push @imports, $import;
+ $import = undef;
+ } elsif (defined($import)) {
+ $import .= $line;
+ chomp $import;
}
}
-close(IN);
+
+foreach $import (@imports) {
+ next unless ($import =~ /^(\s*IMPORT)([\w\,\s])*(\s+FROM\s+)([\w]+[\w\-]+);/);
+
+ my @froms = split (/\s+FROM\s+/, $import);
+ foreach my $from (@froms) {
+ next if ($from =~ /^(\s*IMPORT).*/);
+ if ($from =~ /^(\w+)/) {
+ my $f = $1;
+ $dep = 'HEIMDAL_'.uc($f).'_ASN1';
+ push @deps, $dep;
+ }
+ }
+}
+
+unshift @deps, "HEIMDAL_HEIM_ASN1" unless grep /HEIMDAL_HEIM_ASN1/, @deps;
+my $depstr = join(' ', @deps);
print '[SUBSYSTEM::HEIMDAL_'.uc($prefix).']'."\n";
print "CFLAGS = -Iheimdal_build -Iheimdal/lib/roken -I$dirname\n";
@@ -51,7 +90,7 @@ print "OBJ_FILES = ";
foreach $o_file (@o_files) {
print "\\\n\t$o_file";
}
-print "\nPRIVATE_DEPENDENCIES = HEIMDAL_ASN1\n\n";
+print "\nPUBLIC_DEPENDENCIES = $depstr\n\n";
print "clean:: \n";
print "\t\@echo \"Deleting ASN1 output files generated from $file\"\n";