1b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper/* Create new ABS symbol. 2b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper Copyright (C) 2002 Red Hat, Inc. 3de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard This file is part of elfutils. 4b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper Written by Ulrich Drepper <drepper@redhat.com>, 2002. 5b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 6de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard This file is free software; you can redistribute it and/or modify 7de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard it under the terms of either 8361df7da6dfecd817b27e62b91752ac316d7cdd4Ulrich Drepper 9de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard * the GNU Lesser General Public License as published by the Free 10de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard Software Foundation; either version 3 of the License, or (at 11de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard your option) any later version 12de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard 13de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard or 14de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard 15de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard * the GNU General Public License as published by the Free 16de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard Software Foundation; either version 2 of the License, or (at 17de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard your option) any later version 18de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard 19de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard or both in parallel, as here. 20de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard 21de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard elfutils is distributed in the hope that it will be useful, but 22361df7da6dfecd817b27e62b91752ac316d7cdd4Ulrich Drepper WITHOUT ANY WARRANTY; without even the implied warranty of 23361df7da6dfecd817b27e62b91752ac316d7cdd4Ulrich Drepper MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 24361df7da6dfecd817b27e62b91752ac316d7cdd4Ulrich Drepper General Public License for more details. 25361df7da6dfecd817b27e62b91752ac316d7cdd4Ulrich Drepper 26de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard You should have received copies of the GNU General Public License and 27de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard the GNU Lesser General Public License along with this program. If 28de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard not, see <http://www.gnu.org/licenses/>. */ 29b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 30b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper#ifdef HAVE_CONFIG_H 31b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper# include <config.h> 32b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper#endif 33b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 34b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper#include <inttypes.h> 35b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper#include <stdio.h> 36b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper#include <stdlib.h> 37b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper#include <string.h> 38b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 39b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper#include <libasmP.h> 40b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper#include <system.h> 41b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 42b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 43b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper/* Object for special COMMON section. */ 44b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepperstatic const AsmScn_t __libasm_abs_scn = 45b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper { 46b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper .data = { 47b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper .main = { 48b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper .scn = ASM_ABS_SCN 49b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper } 50b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper } 51b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper }; 52b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 53b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 54b08d5a8fb42f4586d756068065186b5af7e48daUlrich DrepperAsmSym_t * 551ccdfb683ad6c7e59793136c3a657ddf131cafd1Mark Wielaardasm_newabssym (AsmCtx_t *ctx, const char *name, GElf_Xword size, 561ccdfb683ad6c7e59793136c3a657ddf131cafd1Mark Wielaard GElf_Addr value, int type, int binding) 57b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper{ 58b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper AsmSym_t *result; 59b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 60b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (ctx == NULL) 61b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* Something went wrong before. */ 62b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper return NULL; 63b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 64b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* Common symbols are public. Therefore the user must provide a 65b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper name. */ 66b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (name == NULL) 67b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper { 68b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper __libasm_seterrno (ASM_E_INVALID); 69b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper return NULL; 70b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper } 71b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 72b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper rwlock_wrlock (ctx->lock); 73b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 74b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result = (AsmSym_t *) malloc (sizeof (AsmSym_t)); 75b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (result == NULL) 76b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper return NULL; 77b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 78b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result->scn = (AsmScn_t *) &__libasm_abs_scn; 79b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result->size = size; 80b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result->type = type; 81b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result->binding = binding; 82b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result->symidx = 0; 83b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result->strent = ebl_strtabadd (ctx->symbol_strtab, name, 0); 84b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 85b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* The value of an ABS symbol must not be modified. Since there are 86b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper no subsection and the initial offset of the section is 0 we can 87b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper get the alignment recorded by storing it into the offset 88b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper field. */ 89b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result->offset = value; 90b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 91b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (unlikely (ctx->textp)) 92b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper { 93b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* An absolute symbol can be defined by giving a symbol a 94b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper specific value. */ 95b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (binding == STB_GLOBAL) 96b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper fprintf (ctx->out.file, "\t.globl %s\n", name); 97b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper else if (binding == STB_WEAK) 98b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper fprintf (ctx->out.file, "\t.weak %s\n", name); 99b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 100b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (type == STT_OBJECT) 101b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper fprintf (ctx->out.file, "\t.type %s,@object\n", name); 102b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper else if (type == STT_FUNC) 103b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper fprintf (ctx->out.file, "\t.type %s,@function\n", name); 104b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 105b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper fprintf (ctx->out.file, "%s = %llu\n", 106b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper name, (unsigned long long int) value); 107b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 108b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (size != 0) 109b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper fprintf (ctx->out.file, "\t.size %s, %llu\n", 110b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper name, (unsigned long long int) size); 111b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper } 112b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper else 113b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper { 114b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* Put the symbol in the hash table so that we can later find it. */ 115b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (asm_symbol_tab_insert (&ctx->symbol_tab, elf_hash (name), result) 116b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper != 0) 117b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper { 118b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* The symbol already exists. */ 119b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper __libasm_seterrno (ASM_E_DUPLSYM); 120b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper free (result); 121b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result = NULL; 122b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper } 123b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper else if (name != NULL && asm_emit_symbol_p (name)) 124b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* Only count non-private symbols. */ 125b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper ++ctx->nsymbol_tab; 126b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper } 127b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 128b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper rwlock_unlock (ctx->lock); 129b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 130b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper return result; 131b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper} 132