Blame scripts/versionlist.awk

Packit Service 82fcde
# Extract ordered list of version sets from Versions files.
Packit Service 82fcde
# Copyright (C) 2014-2018 Free Software Foundation, Inc.
Packit Service 82fcde
Packit Service 82fcde
BEGIN { in_lib = ""; in_version = 0 }
Packit Service 82fcde
Packit Service 82fcde
!in_lib && NF == 2 && $2 == "{" {
Packit Service 82fcde
  in_lib = $1;
Packit Service 82fcde
  all_libs[in_lib] = 1;
Packit Service 82fcde
  next
Packit Service 82fcde
}
Packit Service 82fcde
!in_lib { next }
Packit Service 82fcde
Packit Service 82fcde
NF == 2 && $2 == "{" {
Packit Service 82fcde
  in_version = 1;
Packit Service 82fcde
  lib_versions[in_lib, $1] = 1;
Packit Service 82fcde
  # Partition the version sets into GLIBC_* and others.
Packit Service 82fcde
  if ($1 ~ /GLIBC_/) {
Packit Service 82fcde
    libs[in_lib] = libs[in_lib] "  " $1 "\n";
Packit Service 82fcde
    all_versions[$1] = 1;
Packit Service 82fcde
  }
Packit Service 82fcde
  else {
Packit Service 82fcde
    others_libs[in_lib] = others_libs[in_lib] "  " $1 "\n";
Packit Service 82fcde
    others_all_versions[$1] = 1;
Packit Service 82fcde
  }
Packit Service 82fcde
  next
Packit Service 82fcde
}
Packit Service 82fcde
Packit Service 82fcde
in_version && $1 == "}" { in_version = 0; next }
Packit Service 82fcde
in_version { next }
Packit Service 82fcde
Packit Service 82fcde
$1 == "}" { in_lib = ""; next }
Packit Service 82fcde
Packit Service 82fcde
END {
Packit Service 82fcde
  nlibs = asorti(all_libs, libs_order);
Packit Service 82fcde
  for (i = 1; i <= nlibs; ++i) {
Packit Service 82fcde
    lib = libs_order[i];
Packit Service 82fcde
Packit Service 82fcde
    for (v in all_versions) {
Packit Service 82fcde
      if (!((lib, v) in lib_versions)) {
Packit Service 82fcde
        libs[lib] = libs[lib] "  " v "\n";
Packit Service 82fcde
      }
Packit Service 82fcde
    }
Packit Service 82fcde
Packit Service 82fcde
    for (v in others_all_versions) {
Packit Service 82fcde
      if (!((lib, v) in lib_versions)) {
Packit Service 82fcde
        others_libs[lib] = others_libs[lib] "  " v "\n";
Packit Service 82fcde
      }
Packit Service 82fcde
    }
Packit Service 82fcde
Packit Service 82fcde
    print lib, "{";
Packit Service 82fcde
Packit Service 82fcde
    # Sort and print all the GLIBC_* sets first, then all the others.
Packit Service 82fcde
    # This is not really generically right, but it suffices
Packit Service 82fcde
    # for the cases we have so far.  e.g. GCC_3.0 is "later than"
Packit Service 82fcde
    # all GLIBC_* sets that matter for purposes of Versions files.
Packit Service 82fcde
Packit Service 82fcde
    sort = "sort -u -t. -k 1,1 -k 2n,2n -k 3";
Packit Service 82fcde
    printf "%s", libs[lib] | sort;
Packit Service 82fcde
    close(sort);
Packit Service 82fcde
Packit Service 82fcde
    sort = "sort -u -t. -k 1,1 -k 2n,2n -k 3";
Packit Service 82fcde
    printf "%s", others_libs[lib] | sort;
Packit Service 82fcde
    close(sort);
Packit Service 82fcde
Packit Service 82fcde
    print "}";
Packit Service 82fcde
  }
Packit Service 82fcde
}