125b3c049e70834cf33790a28643ab058b507b35cBen Cheng/* Find line information for given file/line/column triple. 225b3c049e70834cf33790a28643ab058b507b35cBen Cheng Copyright (C) 2005-2009 Red Hat, Inc. 303333823c75a1c1887e923828113a1b0fd12020cElliott Hughes This file is part of elfutils. 425b3c049e70834cf33790a28643ab058b507b35cBen Cheng Written by Ulrich Drepper <drepper@redhat.com>, 2005. 525b3c049e70834cf33790a28643ab058b507b35cBen Cheng 603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes This file is free software; you can redistribute it and/or modify 703333823c75a1c1887e923828113a1b0fd12020cElliott Hughes it under the terms of either 825b3c049e70834cf33790a28643ab058b507b35cBen Cheng 903333823c75a1c1887e923828113a1b0fd12020cElliott Hughes * the GNU Lesser General Public License as published by the Free 1003333823c75a1c1887e923828113a1b0fd12020cElliott Hughes Software Foundation; either version 3 of the License, or (at 1103333823c75a1c1887e923828113a1b0fd12020cElliott Hughes your option) any later version 1203333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 1303333823c75a1c1887e923828113a1b0fd12020cElliott Hughes or 1403333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 1503333823c75a1c1887e923828113a1b0fd12020cElliott Hughes * the GNU General Public License as published by the Free 1603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes Software Foundation; either version 2 of the License, or (at 1703333823c75a1c1887e923828113a1b0fd12020cElliott Hughes your option) any later version 1803333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 1903333823c75a1c1887e923828113a1b0fd12020cElliott Hughes or both in parallel, as here. 2003333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 2103333823c75a1c1887e923828113a1b0fd12020cElliott Hughes elfutils is distributed in the hope that it will be useful, but 2225b3c049e70834cf33790a28643ab058b507b35cBen Cheng WITHOUT ANY WARRANTY; without even the implied warranty of 2325b3c049e70834cf33790a28643ab058b507b35cBen Cheng MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 2425b3c049e70834cf33790a28643ab058b507b35cBen Cheng General Public License for more details. 2525b3c049e70834cf33790a28643ab058b507b35cBen Cheng 2603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes You should have received copies of the GNU General Public License and 2703333823c75a1c1887e923828113a1b0fd12020cElliott Hughes the GNU Lesser General Public License along with this program. If 2803333823c75a1c1887e923828113a1b0fd12020cElliott Hughes not, see <http://www.gnu.org/licenses/>. */ 2925b3c049e70834cf33790a28643ab058b507b35cBen Cheng 3025b3c049e70834cf33790a28643ab058b507b35cBen Cheng#ifdef HAVE_CONFIG_H 3125b3c049e70834cf33790a28643ab058b507b35cBen Cheng# include <config.h> 3225b3c049e70834cf33790a28643ab058b507b35cBen Cheng#endif 3325b3c049e70834cf33790a28643ab058b507b35cBen Cheng 3425b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include <assert.h> 3525b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include <limits.h> 3625b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include <stdlib.h> 3725b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include <string.h> 3825b3c049e70834cf33790a28643ab058b507b35cBen Cheng 3925b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include "libdwP.h" 4025b3c049e70834cf33790a28643ab058b507b35cBen Cheng 4125b3c049e70834cf33790a28643ab058b507b35cBen Cheng 4225b3c049e70834cf33790a28643ab058b507b35cBen Chengint 4325b3c049e70834cf33790a28643ab058b507b35cBen Chengdwarf_getsrc_file (Dwarf *dbg, const char *fname, int lineno, int column, 4425b3c049e70834cf33790a28643ab058b507b35cBen Cheng Dwarf_Line ***srcsp, size_t *nsrcs) 4525b3c049e70834cf33790a28643ab058b507b35cBen Cheng{ 4625b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (dbg == NULL) 4725b3c049e70834cf33790a28643ab058b507b35cBen Cheng return -1; 4825b3c049e70834cf33790a28643ab058b507b35cBen Cheng 4925b3c049e70834cf33790a28643ab058b507b35cBen Cheng bool is_basename = strchr (fname, '/') == NULL; 5025b3c049e70834cf33790a28643ab058b507b35cBen Cheng 5125b3c049e70834cf33790a28643ab058b507b35cBen Cheng size_t max_match = *nsrcs ?: ~0u; 5225b3c049e70834cf33790a28643ab058b507b35cBen Cheng size_t act_match = *nsrcs; 5325b3c049e70834cf33790a28643ab058b507b35cBen Cheng size_t cur_match = 0; 5425b3c049e70834cf33790a28643ab058b507b35cBen Cheng Dwarf_Line **match = *nsrcs == 0 ? NULL : *srcsp; 5525b3c049e70834cf33790a28643ab058b507b35cBen Cheng 5625b3c049e70834cf33790a28643ab058b507b35cBen Cheng size_t cuhl; 5725b3c049e70834cf33790a28643ab058b507b35cBen Cheng Dwarf_Off noff; 5825b3c049e70834cf33790a28643ab058b507b35cBen Cheng for (Dwarf_Off off = 0; 5925b3c049e70834cf33790a28643ab058b507b35cBen Cheng INTUSE(dwarf_nextcu) (dbg, off, &noff, &cuhl, NULL, NULL, NULL) == 0; 6025b3c049e70834cf33790a28643ab058b507b35cBen Cheng off = noff) 6125b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 6225b3c049e70834cf33790a28643ab058b507b35cBen Cheng Dwarf_Die cudie_mem; 6325b3c049e70834cf33790a28643ab058b507b35cBen Cheng Dwarf_Die *cudie = INTUSE(dwarf_offdie) (dbg, off + cuhl, &cudie_mem); 6425b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (cudie == NULL) 6525b3c049e70834cf33790a28643ab058b507b35cBen Cheng continue; 6625b3c049e70834cf33790a28643ab058b507b35cBen Cheng 6725b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Get the line number information for this file. */ 6825b3c049e70834cf33790a28643ab058b507b35cBen Cheng Dwarf_Lines *lines; 6925b3c049e70834cf33790a28643ab058b507b35cBen Cheng size_t nlines; 7025b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (INTUSE(dwarf_getsrclines) (cudie, &lines, &nlines) != 0) 7125b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 7225b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Ignore a CU that just has no DW_AT_stmt_list at all. */ 7325b3c049e70834cf33790a28643ab058b507b35cBen Cheng int error = INTUSE(dwarf_errno) (); 7425b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (error == 0) 7525b3c049e70834cf33790a28643ab058b507b35cBen Cheng continue; 7625b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (error); 7725b3c049e70834cf33790a28643ab058b507b35cBen Cheng return -1; 7825b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 7925b3c049e70834cf33790a28643ab058b507b35cBen Cheng 8025b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Search through all the line number records for a matching 8125b3c049e70834cf33790a28643ab058b507b35cBen Cheng file and line/column number. If any of the numbers is zero, 8225b3c049e70834cf33790a28643ab058b507b35cBen Cheng no match is performed. */ 8325b3c049e70834cf33790a28643ab058b507b35cBen Cheng unsigned int lastfile = UINT_MAX; 8425b3c049e70834cf33790a28643ab058b507b35cBen Cheng bool lastmatch = false; 8525b3c049e70834cf33790a28643ab058b507b35cBen Cheng for (size_t cnt = 0; cnt < nlines; ++cnt) 8625b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 8725b3c049e70834cf33790a28643ab058b507b35cBen Cheng Dwarf_Line *line = &lines->info[cnt]; 8825b3c049e70834cf33790a28643ab058b507b35cBen Cheng 8925b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (lastfile != line->file) 9025b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 9125b3c049e70834cf33790a28643ab058b507b35cBen Cheng lastfile = line->file; 9225b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (lastfile >= line->files->nfiles) 9325b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 9425b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_INVALID_DWARF); 9525b3c049e70834cf33790a28643ab058b507b35cBen Cheng return -1; 9625b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 9725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 9825b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Match the name with the name the user provided. */ 9925b3c049e70834cf33790a28643ab058b507b35cBen Cheng const char *fname2 = line->files->info[lastfile].name; 10025b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (is_basename) 10125b3c049e70834cf33790a28643ab058b507b35cBen Cheng lastmatch = strcmp (basename (fname2), fname) == 0; 10225b3c049e70834cf33790a28643ab058b507b35cBen Cheng else 10325b3c049e70834cf33790a28643ab058b507b35cBen Cheng lastmatch = strcmp (fname2, fname) == 0; 10425b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 10525b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (!lastmatch) 10625b3c049e70834cf33790a28643ab058b507b35cBen Cheng continue; 10725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 10825b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* See whether line and possibly column match. */ 10925b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (lineno != 0 11025b3c049e70834cf33790a28643ab058b507b35cBen Cheng && (lineno > line->line 11125b3c049e70834cf33790a28643ab058b507b35cBen Cheng || (column != 0 && column > line->column))) 11225b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Cannot match. */ 11325b3c049e70834cf33790a28643ab058b507b35cBen Cheng continue; 11425b3c049e70834cf33790a28643ab058b507b35cBen Cheng 11525b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Determine whether this is the best match so far. */ 11625b3c049e70834cf33790a28643ab058b507b35cBen Cheng size_t inner; 11725b3c049e70834cf33790a28643ab058b507b35cBen Cheng for (inner = 0; inner < cur_match; ++inner) 11825b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (match[inner]->files == line->files 11925b3c049e70834cf33790a28643ab058b507b35cBen Cheng && match[inner]->file == line->file) 12025b3c049e70834cf33790a28643ab058b507b35cBen Cheng break; 12125b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (inner < cur_match 12225b3c049e70834cf33790a28643ab058b507b35cBen Cheng && (match[inner]->line != line->line 12325b3c049e70834cf33790a28643ab058b507b35cBen Cheng || match[inner]->line != lineno 12425b3c049e70834cf33790a28643ab058b507b35cBen Cheng || (column != 0 12525b3c049e70834cf33790a28643ab058b507b35cBen Cheng && (match[inner]->column != line->column 12625b3c049e70834cf33790a28643ab058b507b35cBen Cheng || match[inner]->column != column)))) 12725b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 12825b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* We know about this file already. If this is a better 12925b3c049e70834cf33790a28643ab058b507b35cBen Cheng match for the line number, use it. */ 13025b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (match[inner]->line >= line->line 13125b3c049e70834cf33790a28643ab058b507b35cBen Cheng && (match[inner]->line != line->line 13225b3c049e70834cf33790a28643ab058b507b35cBen Cheng || match[inner]->column >= line->column)) 13325b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Use the new line. Otherwise the old one. */ 13425b3c049e70834cf33790a28643ab058b507b35cBen Cheng match[inner] = line; 13525b3c049e70834cf33790a28643ab058b507b35cBen Cheng continue; 13625b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 13725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 13825b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (cur_match < max_match) 13925b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 14025b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (cur_match == act_match) 14125b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 14225b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Enlarge the array for the results. */ 14325b3c049e70834cf33790a28643ab058b507b35cBen Cheng act_match += 10; 14425b3c049e70834cf33790a28643ab058b507b35cBen Cheng Dwarf_Line **newp = realloc (match, 14525b3c049e70834cf33790a28643ab058b507b35cBen Cheng act_match 14625b3c049e70834cf33790a28643ab058b507b35cBen Cheng * sizeof (Dwarf_Line *)); 14725b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (newp == NULL) 14825b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 14925b3c049e70834cf33790a28643ab058b507b35cBen Cheng free (match); 15025b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_NOMEM); 15125b3c049e70834cf33790a28643ab058b507b35cBen Cheng return -1; 15225b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 15325b3c049e70834cf33790a28643ab058b507b35cBen Cheng match = newp; 15425b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 15525b3c049e70834cf33790a28643ab058b507b35cBen Cheng 15625b3c049e70834cf33790a28643ab058b507b35cBen Cheng match[cur_match++] = line; 15725b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 15825b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 15925b3c049e70834cf33790a28643ab058b507b35cBen Cheng 16025b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* If we managed to find as many matches as the user requested 16125b3c049e70834cf33790a28643ab058b507b35cBen Cheng already, there is no need to go on to the next CU. */ 16225b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (cur_match == max_match) 16325b3c049e70834cf33790a28643ab058b507b35cBen Cheng break; 16425b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 16525b3c049e70834cf33790a28643ab058b507b35cBen Cheng 16625b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (cur_match > 0) 16725b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 16825b3c049e70834cf33790a28643ab058b507b35cBen Cheng assert (*nsrcs == 0 || *srcsp == match); 16925b3c049e70834cf33790a28643ab058b507b35cBen Cheng 17025b3c049e70834cf33790a28643ab058b507b35cBen Cheng *nsrcs = cur_match; 17125b3c049e70834cf33790a28643ab058b507b35cBen Cheng *srcsp = match; 17225b3c049e70834cf33790a28643ab058b507b35cBen Cheng 17325b3c049e70834cf33790a28643ab058b507b35cBen Cheng return 0; 17425b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 17525b3c049e70834cf33790a28643ab058b507b35cBen Cheng 17625b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_NO_MATCH); 17725b3c049e70834cf33790a28643ab058b507b35cBen Cheng return -1; 17825b3c049e70834cf33790a28643ab058b507b35cBen Cheng} 179