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
54DataSeg* 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
71void 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
85void 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
98void 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
109void 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