1 | /*****************************************************************************/ |
2 | /* */ |
3 | /* dataseg.c */ |
4 | /* */ |
5 | /* Data segment structure */ |
6 | /* */ |
7 | /* */ |
8 | /* */ |
9 | /* (C) 2001-2009, Ullrich von Bassewitz */ |
10 | /* Roemerstrasse 52 */ |
11 | /* D-70794 Filderstadt */ |
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 | /* common */ |
37 | #include "check.h" |
38 | #include "xmalloc.h" |
39 | #include "xsprintf.h" |
40 | |
41 | /* cc65 */ |
42 | #include "dataseg.h" |
43 | #include "error.h" |
44 | #include "output.h" |
45 | |
46 | |
47 | |
48 | /*****************************************************************************/ |
49 | /* Code */ |
50 | /*****************************************************************************/ |
51 | |
52 | |
53 | |
54 | DataSeg* NewDataSeg (const char* Name, SymEntry* Func) |
55 | /* Create a new data segment, initialize and return it */ |
56 | { |
57 | /* Allocate memory */ |
58 | DataSeg* S = xmalloc (sizeof (DataSeg)); |
59 | |
60 | /* Initialize the fields */ |
61 | S->SegName = xstrdup (Name); |
62 | S->Func = Func; |
63 | InitCollection (&S->Lines); |
64 | |
65 | /* Return the new struct */ |
66 | return S; |
67 | } |
68 | |
69 | |
70 | |
71 | void DS_Append (DataSeg* Target, const DataSeg* Source) |
72 | /* Append the data from Source to Target */ |
73 | { |
74 | unsigned I; |
75 | |
76 | /* Append all lines from Source to Target */ |
77 | unsigned Count = CollCount (&Source->Lines); |
78 | for (I = 0; I < Count; ++I) { |
79 | CollAppend (&Target->Lines, xstrdup (CollConstAt (&Source->Lines, I))); |
80 | } |
81 | } |
82 | |
83 | |
84 | |
85 | void DS_AddVLine (DataSeg* S, const char* Format, va_list ap) |
86 | /* Add a line to the given data segment */ |
87 | { |
88 | /* Format the line */ |
89 | char Buf [256]; |
90 | xvsprintf (Buf, sizeof (Buf), Format, ap); |
91 | |
92 | /* Add a copy to the data segment */ |
93 | CollAppend (&S->Lines, xstrdup (Buf)); |
94 | } |
95 | |
96 | |
97 | |
98 | void DS_AddLine (DataSeg* S, const char* Format, ...) |
99 | /* Add a line to the given data segment */ |
100 | { |
101 | va_list ap; |
102 | va_start (ap, Format); |
103 | DS_AddVLine (S, Format, ap); |
104 | va_end (ap); |
105 | } |
106 | |
107 | |
108 | |
109 | void DS_Output (const DataSeg* S) |
110 | /* Output the data segment data to the output file */ |
111 | { |
112 | unsigned I; |
113 | |
114 | /* Get the number of entries in this segment */ |
115 | unsigned Count = CollCount (&S->Lines); |
116 | |
117 | /* If the segment is actually empty, bail out */ |
118 | if (Count == 0) { |
119 | return; |
120 | } |
121 | |
122 | /* Output the segment directive */ |
123 | WriteOutput (".segment\t\"%s\"\n\n" , S->SegName); |
124 | |
125 | /* Output all entries */ |
126 | for (I = 0; I < Count; ++I) { |
127 | WriteOutput ("%s\n" , (const char*) CollConstAt (&S->Lines, I)); |
128 | } |
129 | |
130 | /* Add an additional newline after the segment output */ |
131 | WriteOutput ("\n" ); |
132 | } |
133 | |