1 /*****************************************************************************/
5 /* Assembler output for the sp65 sprite and bitmap utility */
9 /* (C) 2012, Ullrich von Bassewitz */
10 /* Roemerstrasse 52 */
11 /* D-70794 Filderstadt */
12 /* EMail: uz@cc65.org */
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. */
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: */
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 */
32 /*****************************************************************************/
51 /*****************************************************************************/
53 /*****************************************************************************/
57 void WriteAsmFile (const StrBuf* Data, const Collection* A)
58 /* Write the contents of Data to the given file in assembler (ca65) format */
63 unsigned BytesPerLine = 16;
67 /* Get the file name */
68 const char* Name = NeedAttrVal (A, "name", "write");
70 /* Check for a bytesperline attribute */
71 const char* V = GetAttrVal (A, "bytesperline");
72 if ((V && sscanf (V, "%u%c", &BytesPerLine, &C) != 1) ||
73 (BytesPerLine < 1 || BytesPerLine > 64)) {
74 Error ("Invalid value for attribute `bytesperline'");
77 /* Open the output file */
78 F = fopen (Name, "w");
80 Error ("Cannot open output file `%s': %s", Name, strerror (errno));
83 /* Write a readable header */
86 "; This file was generated by %s %s\n"
90 GetVersionAsString ());
93 D = SB_GetConstBuf (Data);
94 Size = SB_GetLen (Data);
100 unsigned Chunk = Size;
101 if (Chunk > BytesPerLine) {
102 Chunk = BytesPerLine;
104 fprintf (F, " .byte $%02X", (*D++ & 0xFF));
105 for (I = 1; I < Chunk; ++I) {
106 fprintf (F, ",%02X", (*D++ & 0xFF));
110 /* Bump the counters */
114 /* Add an empty line at the end */
118 if (fclose (F) != 0) {
119 Error ("Error closing output file `%s': %s", Name, strerror (errno));