1 /* Find source file information.
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_filesrc(Dwarf_Files * file,size_t idx,Dwarf_Word * mtime,Dwarf_Word * length)23 dwarf_filesrc (Dwarf_Files *file, size_t idx, Dwarf_Word *mtime,
24 Dwarf_Word *length)
25 {
26 if (file == NULL || idx >= file->nfiles)
27 return NULL;
28
29 if (mtime != NULL)
30 *mtime = file->info[idx].mtime;
31
32 if (length != NULL)
33 *length = file->info[idx].length;
34
35 return file->info[idx].name;
36 }
37