1 /* Return symbol binding name. 2 Copyright (C) 2001, 2002 Red Hat, Inc. 3 Written by Ulrich Drepper <drepper (at) 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 * 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