1b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper/* Get information from a source line record returned by libdwfl.
23c1d1642789856f7a7975b92429747254083149fMark Wielaard   Copyright (C) 2005-2010, 2015 Red Hat, Inc.
3de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard   This file is part of elfutils.
4b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper
5de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard   This file is free software; you can redistribute it and/or modify
6de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard   it under the terms of either
7b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper
8de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard     * the GNU Lesser General Public License as published by the Free
9de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard       Software Foundation; either version 3 of the License, or (at
10de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard       your option) any later version
11de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard
12de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard   or
13de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard
14de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard     * the GNU General Public License as published by the Free
15de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard       Software Foundation; either version 2 of the License, or (at
16de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard       your option) any later version
17de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard
18de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard   or both in parallel, as here.
19de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard
20de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard   elfutils is distributed in the hope that it will be useful, but
21361df7da6dfecd817b27e62b91752ac316d7cdd4Ulrich Drepper   WITHOUT ANY WARRANTY; without even the implied warranty of
22361df7da6dfecd817b27e62b91752ac316d7cdd4Ulrich Drepper   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
23361df7da6dfecd817b27e62b91752ac316d7cdd4Ulrich Drepper   General Public License for more details.
24361df7da6dfecd817b27e62b91752ac316d7cdd4Ulrich Drepper
25de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard   You should have received copies of the GNU General Public License and
26de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard   the GNU Lesser General Public License along with this program.  If
27de2ed97f33139af5c7a0811e4ec66fc896a13cf2Mark Wielaard   not, see <http://www.gnu.org/licenses/>.  */
28b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper
29b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper#include "libdwflP.h"
30b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper#include "../libdw/libdwP.h"
31b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper
32e1812e1d90090450e3d93be56a487e2f11affcedUlrich Drepperconst char *
33b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepperdwfl_lineinfo (Dwfl_Line *line, Dwarf_Addr *addr, int *linep, int *colp,
34b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper	       Dwarf_Word *mtime, Dwarf_Word *length)
35b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper{
36b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper  if (line == NULL)
37b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper    return NULL;
38b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper
39b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper  struct dwfl_cu *cu = dwfl_linecu (line);
40b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper  const Dwarf_Line *info = &cu->die.cu->lines->info[line->idx];
41b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper
42b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper  if (addr != NULL)
431743d7f010bead5e869d097e23ce840583913381Roland McGrath    *addr = dwfl_adjusted_dwarf_addr (cu->mod, info->addr);
44b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper  if (linep != NULL)
45b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper    *linep = info->line;
46b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper  if (colp != NULL)
47b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper    *colp = info->column;
48b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper
493c1d1642789856f7a7975b92429747254083149fMark Wielaard  if (unlikely (info->file >= info->files->nfiles))
503c1d1642789856f7a7975b92429747254083149fMark Wielaard    {
513c1d1642789856f7a7975b92429747254083149fMark Wielaard      __libdwfl_seterrno (DWFL_E (LIBDW, DWARF_E_INVALID_DWARF));
523c1d1642789856f7a7975b92429747254083149fMark Wielaard      return NULL;
533c1d1642789856f7a7975b92429747254083149fMark Wielaard    }
543c1d1642789856f7a7975b92429747254083149fMark Wielaard
55b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper  struct Dwarf_Fileinfo_s *file = &info->files->info[info->file];
56b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper  if (mtime != NULL)
57b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper    *mtime = file->mtime;
58b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper  if (length != NULL)
59b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper    *length = file->length;
60b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper  return file->name;
61b08d5a8fb42f4586d756068065186b5af7e48daUlrich Drepper}
62