1 /* Return symbol binding name.
2 Copyright (C) 2001, 2002 Red Hat, Inc.
3 Written by Ulrich Drepper <drepper@redhat.com>, 2001.
4
5 This program is Open Source software; you can redistribute it and/or
6 modify it under the terms of the Open Software License version 1.0 as
7 published by the Open Source Initiative.
8
9 You should have received a copy of the Open Software License along
10 with this program; if not, you may obtain a copy of the Open Software
11 License version 1.0 from http://www.opensource.org/licenses/osl.php or
12 by writing the Open Source Initiative c/o Lawrence Rosen, Esq.,
13 3001 King Ranch Road, Ukiah, CA 95482. */
14
15 #ifdef HAVE_CONFIG_H
16 # include <config.h>
17 #endif
18
19 #include <stdio.h>
20 #include <libeblP.h>
21
22
23 const char *
ebl_symbol_binding_name(ebl,binding,buf,len)24 ebl_symbol_binding_name (ebl, binding, buf, len)
25 Ebl *ebl;
26 int binding;
27 char *buf;
28 size_t len;
29 {
30 const char *res;
31
32 res = ebl != NULL ? ebl->symbol_type_name (binding, buf, len) : NULL;
33 if (res == NULL)
34 {
35 static const char *stb_names[STB_NUM] =
36 {
37 "LOCAL", "GLOBAL", "WEAK"
38 };
39
40 /* Standard binding? */
41 if (binding < STB_NUM)
42 res = stb_names[binding];
43 else
44 {
45 if (binding >= STB_LOPROC && binding <= STB_HIPROC)
46 snprintf (buf, len, "LOPROC+%d", binding - STB_LOPROC);
47 else if (binding >= STB_LOOS && binding <= STB_HIOS)
48 snprintf (buf, len, "LOOS+%d", binding - STB_LOOS);
49 else
50 snprintf (buf, len, gettext ("<unknown>: %d"), binding);
51
52 res = buf;
53 }
54 }
55
56 return res;
57 }
58