Changeset 119 for trunk/debbuild

Timestamp:

07/27/07 16:56:59 (17 years ago)

Author:

kdeugau

Message:

/trunk

Added chunk to the .spec parser to choke and die Just Like rpmbuild if we
encounter a %[a-z]+ tag we don't understand.

File:

• trunk/debbuild (modified) (1 diff)

trunk/debbuild

@@ -481 +481 @@
     next if /^#/ && $stage eq 'preamble';       # Ignore comments...
     next if /^\s*$/ && $stage eq 'preamble';    # ... and blank lines.
+
+# no sense in continuing if we find something we don't grok
+    # Yes, this is really horribly fugly.  But it's a cheap crosscheck against invalid
+    # %-tags which also make rpmbuild barf.  In theory.
+# notes:  some of these are not *entirely* case-sensitive (%ifxxx), but most are.
+    # Extracted from the Maximum RPM online doc via:
+    # grep -h %[a-z] *|perl -e 'while (<>) { /\%([a-z0-9]+)\b/; print "$1|\n"; }'|sort -u
+    if (/^%[a-z]/ &&
+                $_ !~ /^%(?:attr|build|check|clean|config|configure|defattr|define|description|
+                dir|doc|docdir|else|endif|files|ghost|if|ifarch|ifn|ifnarch|ifnos|ifnxxx|fos|ifxxx|
+                install|package|patch|post|postun|pre|prep|preun|readme|setup|
+                triggerin|triggerpostun|triggerun|verify|verifyscript)\b/x
+        ) {
+        my ($badtag) = (/^%([a-z]+)/i);
+        die "Unknown tag \%$badtag at line $. of $specfile\n";
+    }
 
 # preprocess %define's