1b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper/* Define new symbol for current position in given section. 2b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper Copyright (C) 2002, 2005 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 8b08d5a8fb42f4586d756068065186b5af7e48daUlrich 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 DrepperAsmSym_t * 441ccdfb683ad6c7e59793136c3a657ddf131cafd1Mark Wielaardasm_newsym (AsmScn_t *asmscn, const char *name, GElf_Xword size, 451ccdfb683ad6c7e59793136c3a657ddf131cafd1Mark Wielaard int type, int binding) 46b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper{ 47b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper#define TEMPSYMLEN 10 48b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper char tempsym[TEMPSYMLEN]; 49b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper AsmSym_t *result; 50b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 51b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (asmscn == NULL) 52b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* Something went wrong before. */ 53b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper return NULL; 54b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 55b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* Generate a temporary symbol if necessary. */ 56b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (name == NULL) 57b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper { 58b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* If a local symbol name is created the symbol better have 59b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper local binding. */ 60b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (binding != STB_LOCAL) 61b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper { 62b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper __libasm_seterrno (ASM_E_INVALID); 63b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper return NULL; 64b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper } 65b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 66b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper // XXX This requires getting the format from the machine backend. */ 67b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper snprintf (tempsym, TEMPSYMLEN, ".L%07u", asmscn->ctx->tempsym_count++); 68b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 69b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper name = tempsym; 70b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper } 71b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 72b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper size_t name_len = strlen (name) + 1; 73b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 74b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result = (AsmSym_t *) malloc (sizeof (AsmSym_t) + name_len); 75b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (result == NULL) 76b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper return NULL; 77b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 78b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper rwlock_wrlock (asmscn->ctx->lock); 79b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 80b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result->scn = asmscn; 81b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result->offset = asmscn->offset; 82b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result->size = size; 83b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result->type = type; 84b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result->binding = binding; 85b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result->symidx = 0; 86b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result->strent = ebl_strtabadd (asmscn->ctx->symbol_strtab, 87b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper memcpy (result + 1, name, name_len), 0); 88b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 89b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (unlikely (asmscn->ctx->textp)) 90b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper { 91b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* We are only interested in the name and don't need to know whether 92b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper it is a local name or not. */ 93b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* First print the binding pseudo-op. */ 94b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (binding == STB_GLOBAL) 95b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper fprintf (asmscn->ctx->out.file, "\t.globl\t%s\n", name); 96b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper else if (binding == STB_WEAK) 97b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper fprintf (asmscn->ctx->out.file, "\t.weak\t%s\n", name); 98b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 99b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* Next the symbol type. */ 100b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (type == STT_OBJECT) 101b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper fprintf (asmscn->ctx->out.file, "\t.type\t%s,@object\n", name); 102b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper else if (type == STT_FUNC) 103b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper fprintf (asmscn->ctx->out.file, "\t.type\t%s,@function\n", name); 104b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 105b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* Finally the size and the label. */ 106b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper fprintf (asmscn->ctx->out.file, "\t.size\t%s,%" PRIuMAX "\n%s:\n", 107b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper name, (uintmax_t) size, name); 108b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper } 109b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper else 110b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper { 111b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* Put the symbol in the hash table so that we can later find it. */ 112b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper if (asm_symbol_tab_insert (&asmscn->ctx->symbol_tab, elf_hash (name), 113b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result) != 0) 114b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper { 115b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* The symbol already exists. */ 116b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper __libasm_seterrno (ASM_E_DUPLSYM); 117b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* Note that we can free the entry since there must be no 118b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper reference in the string table to the string. We can only 119b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper fail to insert the symbol into the symbol table if there 120b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper is already a symbol with this name. In this case the 121b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper ebl_strtabadd function would use the previously provided 122b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper name. */ 123b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper free (result); 124b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper result = NULL; 125b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper } 126b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper else if (name != tempsym && asm_emit_symbol_p (name)) 127b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper /* Only count non-private symbols. */ 128b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper ++asmscn->ctx->nsymbol_tab; 129b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper } 130b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 131b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper rwlock_unlock (asmscn->ctx->lock); 132b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper 133b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper return result; 134b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper} 135