|
Packit |
6c4009 |
# Combine version map fragments into version scripts for our shared objects.
|
|
Packit |
6c4009 |
# Copyright (C) 1998-2018 Free Software Foundation, Inc.
|
|
Packit |
6c4009 |
# Written by Ulrich Drepper <drepper@cygnus.com>, 1998.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
# This script expects the following variables to be defined:
|
|
Packit |
6c4009 |
# defsfile name of Versions.def file
|
|
Packit |
6c4009 |
# buildroot name of build directory with trailing slash
|
|
Packit |
6c4009 |
# move_if_change move-if-change command
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
# Read definitions for the versions.
|
|
Packit |
6c4009 |
BEGIN {
|
|
Packit |
6c4009 |
lossage = 0;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
nlibs=0;
|
|
Packit |
6c4009 |
while (getline < defsfile) {
|
|
Packit |
6c4009 |
if (/^[a-zA-Z0-9_.]+ \{/) {
|
|
Packit |
6c4009 |
libs[$1] = 1;
|
|
Packit |
6c4009 |
curlib = $1;
|
|
Packit |
6c4009 |
while (getline < defsfile && ! /^}/) {
|
|
Packit |
6c4009 |
if ($2 == "=") {
|
|
Packit |
6c4009 |
renamed[curlib "::" $1] = $3;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
versions[curlib "::" $1] = 1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
close(defsfile);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
tmpfile = buildroot "Versions.tmp";
|
|
Packit |
6c4009 |
# POSIX sort needed.
|
|
Packit |
6c4009 |
sort = "sort -t. -k 1,1 -k 2n,2n -k 3 > " tmpfile;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
# Remove comment lines.
|
|
Packit |
6c4009 |
/^ *#/ {
|
|
Packit |
6c4009 |
next;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
# This matches the beginning of the version information for a new library.
|
|
Packit |
6c4009 |
/^[a-zA-Z0-9_.]+/ {
|
|
Packit |
6c4009 |
actlib = $1;
|
|
Packit |
6c4009 |
if (!libs[$1]) {
|
|
Packit |
6c4009 |
printf("no versions defined for %s\n", $1) > "/dev/stderr";
|
|
Packit |
6c4009 |
++lossage;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
next;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
# This matches the beginning of a new version for the current library.
|
|
Packit |
6c4009 |
/^ [A-Za-z_]/ {
|
|
Packit |
6c4009 |
if (renamed[actlib "::" $1])
|
|
Packit |
6c4009 |
actver = renamed[actlib "::" $1];
|
|
Packit |
6c4009 |
else if (!versions[actlib "::" $1] && $1 != "GLIBC_PRIVATE") {
|
|
Packit |
6c4009 |
printf("version %s not defined for %s\n", $1, actlib) > "/dev/stderr";
|
|
Packit |
6c4009 |
++lossage;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
actver = $1;
|
|
Packit |
6c4009 |
next;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
# This matches lines with names to be added to the current version in the
|
|
Packit |
6c4009 |
# current library. This is the only place where we print something to
|
|
Packit |
6c4009 |
# the intermediate file.
|
|
Packit |
6c4009 |
/^ / {
|
|
Packit |
6c4009 |
sortver=actver
|
|
Packit |
6c4009 |
# Ensure GLIBC_ versions come always first
|
|
Packit |
6c4009 |
sub(/^GLIBC_/," GLIBC_",sortver)
|
|
Packit |
6c4009 |
printf("%s %s %s\n", actlib, sortver, $0) | sort;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
function closeversion(name, oldname) {
|
|
Packit |
6c4009 |
if (firstinfile) {
|
|
Packit |
6c4009 |
printf(" local:\n *;\n") > outfile;
|
|
Packit |
6c4009 |
firstinfile = 0;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
# This version inherits from the last one only if they
|
|
Packit |
6c4009 |
# have the same nonnumeric prefix, i.e. GLIBC_x.y and GLIBC_x.z
|
|
Packit |
6c4009 |
# or FOO_x and FOO_y but not GLIBC_x and FOO_y.
|
|
Packit |
6c4009 |
pfx = oldname;
|
|
Packit |
6c4009 |
sub(/[0-9.]+/,".+",pfx);
|
|
Packit |
6c4009 |
if (oldname == "" || name !~ pfx) print "};" > outfile;
|
|
Packit |
6c4009 |
else printf("} %s;\n", oldname) > outfile;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
function close_and_move(name, real_name) {
|
|
Packit |
6c4009 |
close(name);
|
|
Packit |
6c4009 |
system(move_if_change " " name " " real_name " >&2");
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
# Now print the accumulated information.
|
|
Packit |
6c4009 |
END {
|
|
Packit |
6c4009 |
close(sort);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (lossage) {
|
|
Packit |
6c4009 |
system("rm -f " tmpfile);
|
|
Packit |
6c4009 |
exit 1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
oldlib = "";
|
|
Packit |
6c4009 |
oldver = "";
|
|
Packit |
6c4009 |
real_first_ver_header = buildroot "first-versions.h"
|
|
Packit |
6c4009 |
first_ver_header = real_first_ver_header "T"
|
|
Packit |
6c4009 |
printf("#ifndef _FIRST_VERSIONS_H\n") > first_ver_header;
|
|
Packit |
6c4009 |
printf("#define _FIRST_VERSIONS_H\n") > first_ver_header;
|
|
Packit |
6c4009 |
real_ldbl_compat_header = buildroot "ldbl-compat-choose.h"
|
|
Packit |
6c4009 |
ldbl_compat_header = real_ldbl_compat_header "T"
|
|
Packit |
6c4009 |
printf("#ifndef _LDBL_COMPAT_CHOOSE_H\n") > ldbl_compat_header;
|
|
Packit |
6c4009 |
printf("#define _LDBL_COMPAT_CHOOSE_H\n") > ldbl_compat_header;
|
|
Packit |
6c4009 |
printf("#ifndef LONG_DOUBLE_COMPAT\n") > ldbl_compat_header;
|
|
Packit |
6c4009 |
printf("# error LONG_DOUBLE_COMPAT not defined\n") > ldbl_compat_header;
|
|
Packit |
6c4009 |
printf("#endif\n") > ldbl_compat_header;
|
|
Packit |
6c4009 |
printf("version-maps =");
|
|
Packit |
6c4009 |
while (getline < tmpfile) {
|
|
Packit |
6c4009 |
if ($1 != oldlib) {
|
|
Packit |
6c4009 |
if (oldlib != "") {
|
|
Packit |
6c4009 |
closeversion(oldver, veryoldver);
|
|
Packit |
6c4009 |
oldver = "";
|
|
Packit |
6c4009 |
close_and_move(outfile, real_outfile);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
oldlib = $1;
|
|
Packit |
6c4009 |
real_outfile = buildroot oldlib ".map";
|
|
Packit |
6c4009 |
outfile = real_outfile "T";
|
|
Packit |
6c4009 |
firstinfile = 1;
|
|
Packit |
6c4009 |
veryoldver = "";
|
|
Packit |
6c4009 |
printf(" %s.map", oldlib);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
if ($2 != oldver) {
|
|
Packit |
6c4009 |
if (oldver != "") {
|
|
Packit |
6c4009 |
closeversion(oldver, veryoldver);
|
|
Packit |
6c4009 |
veryoldver = oldver;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
printf("%s {\n global:\n", $2) > outfile;
|
|
Packit |
6c4009 |
oldver = $2;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
printf(" ") > outfile;
|
|
Packit |
6c4009 |
for (n = 3; n <= NF; ++n) {
|
|
Packit |
6c4009 |
printf(" %s", $n) > outfile;
|
|
Packit |
6c4009 |
sym = $n;
|
|
Packit |
6c4009 |
sub(";", "", sym);
|
|
Packit |
6c4009 |
first_ver_macro = "FIRST_VERSION_" oldlib "_" sym;
|
|
Packit |
6c4009 |
if (!(first_ver_macro in first_ver_seen) \
|
|
Packit |
6c4009 |
&& oldver ~ "^GLIBC_[0-9]" \
|
|
Packit |
6c4009 |
&& sym ~ "^[A-Za-z0-9_]*$") {
|
|
Packit |
6c4009 |
ver_val = oldver;
|
|
Packit |
6c4009 |
gsub("\\.", "_", ver_val);
|
|
Packit |
6c4009 |
printf("#define %s %s\n", first_ver_macro, ver_val) > first_ver_header;
|
|
Packit |
6c4009 |
first_ver_seen[first_ver_macro] = 1;
|
|
Packit |
6c4009 |
if (oldlib == "libc" || oldlib == "libm") {
|
|
Packit |
6c4009 |
printf("#if LONG_DOUBLE_COMPAT (%s, %s)\n",
|
|
Packit |
6c4009 |
oldlib, ver_val) > ldbl_compat_header;
|
|
Packit |
6c4009 |
printf("# define LONG_DOUBLE_COMPAT_CHOOSE_%s_%s(a, b) a\n",
|
|
Packit |
6c4009 |
oldlib, sym) > ldbl_compat_header;
|
|
Packit |
6c4009 |
printf("#else\n") > ldbl_compat_header;
|
|
Packit |
6c4009 |
printf("# define LONG_DOUBLE_COMPAT_CHOOSE_%s_%s(a, b) b\n",
|
|
Packit |
6c4009 |
oldlib, sym) > ldbl_compat_header;
|
|
Packit |
6c4009 |
printf("#endif\n") > ldbl_compat_header;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
printf("\n") > outfile;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
printf("\n");
|
|
Packit |
6c4009 |
printf("#endif /* first-versions.h */\n") > first_ver_header;
|
|
Packit |
6c4009 |
printf("#endif /* ldbl-compat-choose.h */\n") > ldbl_compat_header;
|
|
Packit |
6c4009 |
closeversion(oldver, veryoldver);
|
|
Packit |
6c4009 |
close_and_move(outfile, real_outfile);
|
|
Packit |
6c4009 |
close_and_move(first_ver_header, real_first_ver_header);
|
|
Packit |
6c4009 |
close_and_move(ldbl_compat_header, real_ldbl_compat_header);
|
|
Packit |
6c4009 |
#system("rm -f " tmpfile);
|
|
Packit |
6c4009 |
}
|