Merge branch 'master' of /users/git/dtbartle/glibc-opensolaris
[kopensolaris-gnu/glibc.git] / scripts / abilist.awk
index 69da451..a042ce7 100644 (file)
@@ -9,19 +9,25 @@ BEGIN {
 }
 
 # Per-file header.
-/[^ :]+\.so\.[0-9]+:[  ]+.file format .*$/ {
-  if (parse_names && soname != "")
-    emit(1);
+/[^ :]+\.so\.[0-9.]+:[         ]+.file format .*$/ {
+  emit(0);
+
+  seen_opd = 0;
 
   sofullname = $1;
   sub(/:$/, "", sofullname);
   soname = sofullname;
   sub(/^.*\//, "", soname);
-  sub(/\.so\.[0-9]+$/, "", soname);
+  sub(/\.so\.[0-9.]+$/, "", soname);
+
+  suppress = ((filename_regexp != "" && sofullname !~ filename_regexp) \
+             || (libname_regexp != "" && soname !~ libname_regexp));
 
   next
 }
 
+suppress { next }
+
 # Normalize columns.
 /^[0-9a-fA-F]+      / { sub(/      /, "  -   ") }
 
@@ -48,8 +54,11 @@ $2 == "g" || $2 == "w" && NF == 7 {
     type = "T";
   }
   else if (type == "D" && $4 == ".opd") {
-    type = "O";
+    type = "F";
     size = "";
+    if (seen_opd < 0)
+      type = "O";
+    seen_opd = 1;
   }
   else if ($4 == "*ABS*") {
     type = "A";
@@ -59,6 +68,9 @@ $2 == "g" || $2 == "w" && NF == 7 {
     type = "D";
   }
   else if (type == "DF") {
+    if (symbol ~ /^\./ && seen_opd >= 0)
+      next;
+    seen_opd = -1;
     type = "F";
     size = "";
   }
@@ -74,6 +86,9 @@ $2 == "g" || $2 == "w" && NF == 7 {
   if (desc == "")
     desc = " " symbol " " type size;
 
+  if (combine)
+    version = soname " " version (combine_fullname ? " " sofullname : "");
+
   if (version in versions) {
     versions[version] = versions[version] "\n" desc;
   }
@@ -90,7 +105,11 @@ NF == 0 || /DYNAMIC SYMBOL TABLE/ || /file format/ { next }
   print "Don't grok this line:", $0
 }
 
-function emit(tofile) {
+function emit(end) {
+  if (!end && (combine || ! parse_names || soname == ""))
+    return;
+  tofile = parse_names && !combine;
+
   nverslist = 0;
   for (version in versions) {
     if (nverslist == 0) {
@@ -119,9 +138,6 @@ function emit(tofile) {
     ++nverslist;
   }
 
-  if (combine)
-    tofile = 0;
-
   if (tofile) {
     out = prefix soname ".symlist";
     if (soname in outfiles)
@@ -141,12 +157,9 @@ function emit(tofile) {
       outpipe = "sort >> " out;
     }
     else {
-      if (combine_fullname)
-       print prefix soname, version, sofullname;
-      else if (combine)
-       print prefix soname, version;
-      else
-       print version;
+      if (combine)
+       print "";
+      print prefix version;
       outpipe = "sort";
     }
     print versions[version] | outpipe;
@@ -162,9 +175,5 @@ function emit(tofile) {
 }
 
 END {
-  if (! parse_names)
-    emit(0);
-  else if (soname != "") {
-    emit(1);
-  }
+  emit(1);
 }