glibc/scripts/soversions.awk

73 lines
1.5 KiB
Awk
Raw Normal View History

2007-07-12 18:26:36 +00:00
# awk script for shlib-versions.v -> soversions.i; see Makeconfig.
2007-07-12 18:26:36 +00:00
BEGIN {
config = cpu "-" vendor "-" os;
configs[config] = "DEFAULT";
}
{ thiscf = $1 }
$2 ~ /WORDSIZE[3264]/ {
if ((config ~ thiscf) && !othercf) {
othercf = $3;
sub(/@CPU@/, cpu, othercf);
sub(/@VENDOR@/, vendor, othercf);
sub(/@OS@/, os, othercf);
configs[othercf] = $2;
}
next;
}
# Obey the first matching DEFAULT line.
$2 == "DEFAULT" {
2007-07-12 18:26:36 +00:00
$1 = $2 = "";
default_set[++ndefault_set] = thiscf "\n" $0;
next
}
# Collect all lib lines before emitting anything, so DEFAULT
# can be interspersed.
{
lib = number = $2;
sub(/=.*$/, "", lib);
sub(/^.*=/, "", number);
2007-07-12 18:26:36 +00:00
if ((thiscf FS lib) in numbers) next;
numbers[thiscf FS lib] = number;
order[thiscf FS lib] = ++order_n;
if (NF > 2) {
$1 = $2 = "";
2007-07-12 18:26:36 +00:00
versions[thiscf FS lib] = $0
}
}
END {
2007-07-12 18:26:36 +00:00
for (elt in numbers) {
split(elt, x);
cf = x[1];
lib = x[2];
for (c in configs)
if (c ~ cf) {
if (elt in versions)
set = versions[elt];
else {
set = (c == config) ? default_setname : "";
for (i = 1; i <= ndefault_set; ++i) {
split(default_set[i], x, "\n");
if (c ~ x[1]) {
set = x[2];
break;
}
}
}
line = set ? (lib FS numbers[elt] FS set) : (lib FS numbers[elt]);
if (!((c FS lib) in lineorder) || order[elt] < lineorder[c FS lib]) {
lineorder[c FS lib] = order[elt];
lines[c FS lib] = configs[c] FS line;
}
}
}
for (c in lines) {
print lines[c]
}
}