Fri, 05 Oct 2012 18:57:10 -0700
7177003: C1: LogCompilation support
Summary: add LogCompilation support in C1 - both client and tiered mode.
Reviewed-by: twisti, kvn
zgu@2364 | 1 | /* |
zgu@2364 | 2 | * Copyright (c) 1997, 2010, Oracle and/or its affiliates. All rights reserved. |
zgu@2364 | 3 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
zgu@2364 | 4 | * |
zgu@2364 | 5 | * This code is free software; you can redistribute it and/or modify it |
zgu@2364 | 6 | * under the terms of the GNU General Public License version 2 only, as |
zgu@2364 | 7 | * published by the Free Software Foundation. |
zgu@2364 | 8 | * |
zgu@2364 | 9 | * This code is distributed in the hope that it will be useful, but WITHOUT |
zgu@2364 | 10 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
zgu@2364 | 11 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
zgu@2364 | 12 | * version 2 for more details (a copy is included in the LICENSE file that |
zgu@2364 | 13 | * accompanied this code). |
zgu@2364 | 14 | * |
zgu@2364 | 15 | * You should have received a copy of the GNU General Public License version |
zgu@2364 | 16 | * 2 along with this work; if not, write to the Free Software Foundation, |
zgu@2364 | 17 | * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
zgu@2364 | 18 | * |
zgu@2364 | 19 | * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
zgu@2364 | 20 | * or visit www.oracle.com if you need additional information or have any |
zgu@2364 | 21 | * questions. |
zgu@2364 | 22 | * |
zgu@2364 | 23 | */ |
zgu@2364 | 24 | |
zgu@2364 | 25 | #include "precompiled.hpp" |
zgu@2364 | 26 | |
never@3156 | 27 | #if !defined(_WINDOWS) && !defined(__APPLE__) |
zgu@2364 | 28 | |
zgu@2364 | 29 | #include <string.h> |
zgu@2364 | 30 | #include <stdio.h> |
zgu@2364 | 31 | #include <limits.h> |
zgu@2834 | 32 | #include <new> |
zgu@2364 | 33 | |
zgu@2364 | 34 | #include "memory/allocation.inline.hpp" |
zgu@2364 | 35 | #include "utilities/decoder.hpp" |
zgu@2364 | 36 | #include "utilities/elfFile.hpp" |
zgu@2364 | 37 | #include "utilities/elfStringTable.hpp" |
zgu@2364 | 38 | #include "utilities/elfSymbolTable.hpp" |
zgu@2364 | 39 | |
zgu@2364 | 40 | |
zgu@2364 | 41 | ElfFile::ElfFile(const char* filepath) { |
zgu@2364 | 42 | assert(filepath, "null file path"); |
zgu@2364 | 43 | memset(&m_elfHdr, 0, sizeof(m_elfHdr)); |
zgu@2364 | 44 | m_string_tables = NULL; |
zgu@2364 | 45 | m_symbol_tables = NULL; |
zgu@2364 | 46 | m_next = NULL; |
zgu@3430 | 47 | m_status = NullDecoder::no_error; |
zgu@2364 | 48 | |
zgu@2364 | 49 | int len = strlen(filepath) + 1; |
zgu@3900 | 50 | m_filepath = (const char*)os::malloc(len * sizeof(char), mtInternal); |
zgu@2364 | 51 | if (m_filepath != NULL) { |
zgu@2364 | 52 | strcpy((char*)m_filepath, filepath); |
zgu@2364 | 53 | m_file = fopen(filepath, "r"); |
zgu@2364 | 54 | if (m_file != NULL) { |
zgu@2364 | 55 | load_tables(); |
zgu@2364 | 56 | } else { |
zgu@3430 | 57 | m_status = NullDecoder::file_not_found; |
zgu@2364 | 58 | } |
zgu@2364 | 59 | } else { |
zgu@3430 | 60 | m_status = NullDecoder::out_of_memory; |
zgu@2364 | 61 | } |
zgu@2364 | 62 | } |
zgu@2364 | 63 | |
zgu@2364 | 64 | ElfFile::~ElfFile() { |
zgu@2364 | 65 | if (m_string_tables != NULL) { |
zgu@2364 | 66 | delete m_string_tables; |
zgu@2364 | 67 | } |
zgu@2364 | 68 | |
zgu@2364 | 69 | if (m_symbol_tables != NULL) { |
zgu@2364 | 70 | delete m_symbol_tables; |
zgu@2364 | 71 | } |
zgu@2364 | 72 | |
zgu@2364 | 73 | if (m_file != NULL) { |
zgu@2364 | 74 | fclose(m_file); |
zgu@2364 | 75 | } |
zgu@2364 | 76 | |
zgu@2364 | 77 | if (m_filepath != NULL) { |
zgu@2834 | 78 | os::free((void*)m_filepath); |
zgu@2364 | 79 | } |
zgu@2364 | 80 | |
zgu@2364 | 81 | if (m_next != NULL) { |
zgu@2364 | 82 | delete m_next; |
zgu@2364 | 83 | } |
zgu@2364 | 84 | }; |
zgu@2364 | 85 | |
zgu@2364 | 86 | |
zgu@2364 | 87 | //Check elf header to ensure the file is valid. |
zgu@2364 | 88 | bool ElfFile::is_elf_file(Elf_Ehdr& hdr) { |
zgu@2364 | 89 | return (ELFMAG0 == hdr.e_ident[EI_MAG0] && |
zgu@2364 | 90 | ELFMAG1 == hdr.e_ident[EI_MAG1] && |
zgu@2364 | 91 | ELFMAG2 == hdr.e_ident[EI_MAG2] && |
zgu@2364 | 92 | ELFMAG3 == hdr.e_ident[EI_MAG3] && |
zgu@2364 | 93 | ELFCLASSNONE != hdr.e_ident[EI_CLASS] && |
zgu@2364 | 94 | ELFDATANONE != hdr.e_ident[EI_DATA]); |
zgu@2364 | 95 | } |
zgu@2364 | 96 | |
zgu@2364 | 97 | bool ElfFile::load_tables() { |
zgu@2364 | 98 | assert(m_file, "file not open"); |
zgu@3430 | 99 | assert(!NullDecoder::is_error(m_status), "already in error"); |
zgu@2364 | 100 | |
zgu@2364 | 101 | // read elf file header |
zgu@2364 | 102 | if (fread(&m_elfHdr, sizeof(m_elfHdr), 1, m_file) != 1) { |
zgu@3430 | 103 | m_status = NullDecoder::file_invalid; |
zgu@2364 | 104 | return false; |
zgu@2364 | 105 | } |
zgu@2364 | 106 | |
zgu@2364 | 107 | if (!is_elf_file(m_elfHdr)) { |
zgu@3430 | 108 | m_status = NullDecoder::file_invalid; |
zgu@2364 | 109 | return false; |
zgu@2364 | 110 | } |
zgu@2364 | 111 | |
zgu@2364 | 112 | // walk elf file's section headers, and load string tables |
zgu@2364 | 113 | Elf_Shdr shdr; |
zgu@2364 | 114 | if (!fseek(m_file, m_elfHdr.e_shoff, SEEK_SET)) { |
zgu@3430 | 115 | if (NullDecoder::is_error(m_status)) return false; |
zgu@2364 | 116 | |
zgu@2364 | 117 | for (int index = 0; index < m_elfHdr.e_shnum; index ++) { |
zgu@2364 | 118 | if (fread((void*)&shdr, sizeof(Elf_Shdr), 1, m_file) != 1) { |
zgu@3430 | 119 | m_status = NullDecoder::file_invalid; |
zgu@2364 | 120 | return false; |
zgu@2364 | 121 | } |
zgu@2364 | 122 | // string table |
zgu@2364 | 123 | if (shdr.sh_type == SHT_STRTAB) { |
zgu@2834 | 124 | ElfStringTable* table = new (std::nothrow) ElfStringTable(m_file, shdr, index); |
zgu@2364 | 125 | if (table == NULL) { |
zgu@3430 | 126 | m_status = NullDecoder::out_of_memory; |
zgu@2364 | 127 | return false; |
zgu@2364 | 128 | } |
zgu@2364 | 129 | add_string_table(table); |
zgu@2364 | 130 | } else if (shdr.sh_type == SHT_SYMTAB || shdr.sh_type == SHT_DYNSYM) { |
zgu@2834 | 131 | ElfSymbolTable* table = new (std::nothrow) ElfSymbolTable(m_file, shdr); |
zgu@2364 | 132 | if (table == NULL) { |
zgu@3430 | 133 | m_status = NullDecoder::out_of_memory; |
zgu@2364 | 134 | return false; |
zgu@2364 | 135 | } |
zgu@2364 | 136 | add_symbol_table(table); |
zgu@2364 | 137 | } |
zgu@2364 | 138 | } |
zgu@2364 | 139 | } |
zgu@2364 | 140 | return true; |
zgu@2364 | 141 | } |
zgu@2364 | 142 | |
zgu@3430 | 143 | bool ElfFile::decode(address addr, char* buf, int buflen, int* offset) { |
zgu@2364 | 144 | // something already went wrong, just give up |
zgu@3430 | 145 | if (NullDecoder::is_error(m_status)) { |
zgu@3430 | 146 | return false; |
zgu@2364 | 147 | } |
zgu@2364 | 148 | ElfSymbolTable* symbol_table = m_symbol_tables; |
zgu@2364 | 149 | int string_table_index; |
zgu@2364 | 150 | int pos_in_string_table; |
zgu@2364 | 151 | int off = INT_MAX; |
zgu@2364 | 152 | bool found_symbol = false; |
zgu@2364 | 153 | while (symbol_table != NULL) { |
zgu@3430 | 154 | if (symbol_table->lookup(addr, &string_table_index, &pos_in_string_table, &off)) { |
zgu@2364 | 155 | found_symbol = true; |
zgu@2364 | 156 | } |
zgu@2364 | 157 | symbol_table = symbol_table->m_next; |
zgu@2364 | 158 | } |
zgu@3430 | 159 | if (!found_symbol) return false; |
zgu@2364 | 160 | |
zgu@2364 | 161 | ElfStringTable* string_table = get_string_table(string_table_index); |
zgu@3430 | 162 | |
zgu@2364 | 163 | if (string_table == NULL) { |
zgu@3430 | 164 | m_status = NullDecoder::file_invalid; |
zgu@3430 | 165 | return false; |
zgu@2364 | 166 | } |
zgu@2364 | 167 | if (offset) *offset = off; |
zgu@3430 | 168 | |
zgu@3430 | 169 | return string_table->string_at(pos_in_string_table, buf, buflen); |
zgu@2364 | 170 | } |
zgu@2364 | 171 | |
zgu@2364 | 172 | |
zgu@2364 | 173 | void ElfFile::add_symbol_table(ElfSymbolTable* table) { |
zgu@2364 | 174 | if (m_symbol_tables == NULL) { |
zgu@2364 | 175 | m_symbol_tables = table; |
zgu@2364 | 176 | } else { |
zgu@2364 | 177 | table->m_next = m_symbol_tables; |
zgu@2364 | 178 | m_symbol_tables = table; |
zgu@2364 | 179 | } |
zgu@2364 | 180 | } |
zgu@2364 | 181 | |
zgu@2364 | 182 | void ElfFile::add_string_table(ElfStringTable* table) { |
zgu@2364 | 183 | if (m_string_tables == NULL) { |
zgu@2364 | 184 | m_string_tables = table; |
zgu@2364 | 185 | } else { |
zgu@2364 | 186 | table->m_next = m_string_tables; |
zgu@2364 | 187 | m_string_tables = table; |
zgu@2364 | 188 | } |
zgu@2364 | 189 | } |
zgu@2364 | 190 | |
zgu@2364 | 191 | ElfStringTable* ElfFile::get_string_table(int index) { |
zgu@2364 | 192 | ElfStringTable* p = m_string_tables; |
zgu@2364 | 193 | while (p != NULL) { |
zgu@2364 | 194 | if (p->index() == index) return p; |
zgu@2364 | 195 | p = p->m_next; |
zgu@2364 | 196 | } |
zgu@2364 | 197 | return NULL; |
zgu@2364 | 198 | } |
zgu@2364 | 199 | |
zgu@2364 | 200 | #endif // _WINDOWS |