blob: dfb27d827694ef6f637a50c3d82f5bc86699c0d9 [file] [log] [blame]
Ulrich Drepperb08d5a82005-07-26 05:00:05 +00001/* Get information from a source line record returned by libdwfl.
Roland McGrath1743d7f2010-11-12 16:46:47 -08002 Copyright (C) 2005-2010 Red Hat, Inc.
Mark Wielaardde2ed972012-06-05 17:15:16 +02003 This file is part of elfutils.
Ulrich Drepperb08d5a82005-07-26 05:00:05 +00004
Mark Wielaardde2ed972012-06-05 17:15:16 +02005 This file is free software; you can redistribute it and/or modify
6 it under the terms of either
Ulrich Drepperb08d5a82005-07-26 05:00:05 +00007
Mark Wielaardde2ed972012-06-05 17:15:16 +02008 * the GNU Lesser General Public License as published by the Free
9 Software Foundation; either version 3 of the License, or (at
10 your option) any later version
11
12 or
13
14 * the GNU General Public License as published by the Free
15 Software Foundation; either version 2 of the License, or (at
16 your option) any later version
17
18 or both in parallel, as here.
19
20 elfutils is distributed in the hope that it will be useful, but
Ulrich Drepper361df7d2006-04-04 21:38:57 +000021 WITHOUT ANY WARRANTY; without even the implied warranty of
22 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
23 General Public License for more details.
24
Mark Wielaardde2ed972012-06-05 17:15:16 +020025 You should have received copies of the GNU General Public License and
26 the GNU Lesser General Public License along with this program. If
27 not, see <http://www.gnu.org/licenses/>. */
Ulrich Drepperb08d5a82005-07-26 05:00:05 +000028
29#include "libdwflP.h"
30#include "../libdw/libdwP.h"
31
Ulrich Dreppere1812e12006-07-12 07:46:03 +000032const char *
Ulrich Drepperb08d5a82005-07-26 05:00:05 +000033dwfl_lineinfo (Dwfl_Line *line, Dwarf_Addr *addr, int *linep, int *colp,
34 Dwarf_Word *mtime, Dwarf_Word *length)
35{
36 if (line == NULL)
37 return NULL;
38
39 struct dwfl_cu *cu = dwfl_linecu (line);
40 const Dwarf_Line *info = &cu->die.cu->lines->info[line->idx];
41
42 if (addr != NULL)
Roland McGrath1743d7f2010-11-12 16:46:47 -080043 *addr = dwfl_adjusted_dwarf_addr (cu->mod, info->addr);
Ulrich Drepperb08d5a82005-07-26 05:00:05 +000044 if (linep != NULL)
45 *linep = info->line;
46 if (colp != NULL)
47 *colp = info->column;
48
49 struct Dwarf_Fileinfo_s *file = &info->files->info[info->file];
50 if (mtime != NULL)
51 *mtime = file->mtime;
52 if (length != NULL)
53 *length = file->length;
54 return file->name;
55}