1 /* Find line information for address.
2 Copyright (C) 2004 Red Hat, Inc.
3 Written by Ulrich Drepper <drepper@redhat.com>, 2004.
4
5 This program is Open Source software; you can redistribute it and/or
6 modify it under the terms of the Open Software License version 1.0 as
7 published by the Open Source Initiative.
8
9 You should have received a copy of the Open Software License along
10 with this program; if not, you may obtain a copy of the Open Software
11 License version 1.0 from http://www.opensource.org/licenses/osl.php or
12 by writing the Open Source Initiative c/o Lawrence Rosen, Esq.,
13 3001 King Ranch Road, Ukiah, CA 95482. */
14
15 #ifdef HAVE_CONFIG_H
16 # include <config.h>
17 #endif
18
19 #include "libdwP.h"
20
21
22 const char *
dwarf_linesrc(Dwarf_Line * line,Dwarf_Word * mtime,Dwarf_Word * length)23 dwarf_linesrc (Dwarf_Line *line, Dwarf_Word *mtime, Dwarf_Word *length)
24 {
25 if (line == NULL)
26 return NULL;
27
28 if (line->file >= line->files->nfiles)
29 {
30 __libdw_seterrno (DWARF_E_INVALID_DWARF);
31 return NULL;
32 }
33
34 if (mtime != NULL)
35 *mtime = line->files->info[line->file].mtime;
36
37 if (length != NULL)
38 *length = line->files->info[line->file].length;
39
40 return line->files->info[line->file].name;
41 }
42