]> git.sur5r.net Git - cc65/blob - src/ld65/dbginfo.c
Ignore lunix.inc
[cc65] / src / ld65 / dbginfo.c
1 /*****************************************************************************/
2 /*                                                                           */
3 /*                                 dbginfo.c                                 */
4 /*                                                                           */
5 /*                  Debug info handling for the ld65 linker                  */
6 /*                                                                           */
7 /*                                                                           */
8 /*                                                                           */
9 /* (C) 2001      Ullrich von Bassewitz                                       */
10 /*               Wacholderweg 14                                             */
11 /*               D-70597 Stuttgart                                           */
12 /* EMail:        uz@cc65.org                                                 */
13 /*                                                                           */
14 /*                                                                           */
15 /* This software is provided 'as-is', without any expressed or implied       */
16 /* warranty.  In no event will the authors be held liable for any damages    */
17 /* arising from the use of this software.                                    */
18 /*                                                                           */
19 /* Permission is granted to anyone to use this software for any purpose,     */
20 /* including commercial applications, and to alter it and redistribute it    */
21 /* freely, subject to the following restrictions:                            */
22 /*                                                                           */
23 /* 1. The origin of this software must not be misrepresented; you must not   */
24 /*    claim that you wrote the original software. If you use this software   */
25 /*    in a product, an acknowledgment in the product documentation would be  */
26 /*    appreciated but is not required.                                       */
27 /* 2. Altered source versions must be plainly marked as such, and must not   */
28 /*    be misrepresented as being the original software.                      */
29 /* 3. This notice may not be removed or altered from any source              */
30 /*    distribution.                                                          */
31 /*                                                                           */
32 /*****************************************************************************/
33
34
35
36 /* ld65 */
37 #include "fileinfo.h"
38 #include "lineinfo.h"
39 #include "dbginfo.h"
40
41
42
43 /*****************************************************************************/
44 /*                                   Code                                    */
45 /*****************************************************************************/
46
47
48
49 void PrintDbgInfo (ObjData* O, FILE* F)
50 /* Print the debug info into a file */
51 {
52     unsigned I, J;
53
54     /* Output the files section */
55     for (I = 0; I < O->FileCount; ++I) {
56         const FileInfo* FI = O->Files[I];
57         fprintf (F, "file\t\"%s\", %lu, %lu\n", FI->Name, FI->Size, FI->MTime);
58     }
59
60     /* Output the lines */
61     for (I = 0; I < O->LineInfoCount; ++I) {
62
63         /* Get this line info */
64         const LineInfo* LI = O->LineInfos[I];
65
66         /* Get a pointer to the code ranges */
67         const Collection* CodeRanges = &LI->CodeRanges;
68
69         /* We must have code ranges, otherwise ignore the entry */
70         if (CollCount (CodeRanges) == 0) {
71             continue;
72         }
73
74         /* Name and line number */
75         fprintf (F, "line\t\"%s\", %lu", LI->File->Name, LI->Pos.Line);
76
77         /* Code ranges */
78         for (J = 0; J < CollCount (CodeRanges); ++J) {
79
80             /* Get this code range */
81             const CodeRange* R = CollConstAt (CodeRanges, J);
82
83             /* Print it */
84             fprintf (F, ", %06lX-%06lX", R->Offs, R->Offs + R->Size - 1);
85         }
86
87         /* Terminate the line */
88         fprintf (F, "\n");
89     }
90 }
91
92
93
94