git.sur5r.net Git - cc65/blob - src/sp65/asm.c

   1 /*****************************************************************************/
   2 /*                                                                           */
   3 /*                                   asm.c                                   */
   4 /*                                                                           */
   5 /*          Assembler output for the sp65 sprite and bitmap utility          */
   6 /*                                                                           */
   7 /*                                                                           */
   8 /*                                                                           */
   9 /* (C) 2012,      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 #include <errno.h>
  37 #include <stdio.h>
  38 #include <string.h>
  39
  40 /* common */
  41 #include "cmdline.h"
  42 #include "version.h"
  43
  44 /* sp65 */
  45 #include "attr.h"
  46 #include "bin.h"
  47 #include "error.h"
  48
  49
  50
  51 /*****************************************************************************/
  52 /*                                   Code                                    */
  53 /*****************************************************************************/
  54
  55
  56
  57 void WriteAsmFile (const StrBuf* Data, const Collection* A)
  58 /* Write the contents of Data to the given file in assembler (ca65) format */
  59 {
  60     FILE*       F;
  61     const char* D;
  62     unsigned    Size;
  63     unsigned    BytesPerLine = 16;
  64     char        C;
  65
  66
  67     /* Get the file name */
  68     const char* Name = NeedAttrVal (A, "name", "write");
  69
  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'");
  75     }
  76
  77     /* Open the output file */
  78     F = fopen (Name, "w");
  79     if (F == 0) {
  80         Error ("Cannot open output file `%s': %s", Name, strerror (errno));
  81     }
  82
  83     /* Write a readable header */
  84     fprintf (F,
  85              ";\n"
  86              "; This file was generated by %s %s\n"
  87              ";\n"
  88              "\n",
  89              ProgName,
  90              GetVersionAsString ());
  91
  92     /* Write the data */
  93     D    = SB_GetConstBuf (Data);
  94     Size = SB_GetLen (Data);
  95     while (Size) {
  96
  97         unsigned I;
  98
  99         /* Output one line */
 100         unsigned Chunk = Size;
 101         if (Chunk > BytesPerLine) {
 102             Chunk = BytesPerLine;
 103         }
 104         fprintf (F, "        .byte   $%02X", (*D++ & 0xFF));
 105         for (I = 1; I < Chunk; ++I) {
 106             fprintf (F, ",%02X", (*D++ & 0xFF));
 107         }
 108         fputc ('\n', F);
 109
 110         /* Bump the counters */
 111         Size -= Chunk;
 112     }
 113
 114     /* Add an empty line at the end */
 115     fputc ('\n', F);
 116
 117     /* Close the file */
 118     if (fclose (F) != 0) {
 119         Error ("Error closing output file `%s': %s", Name, strerror (errno));
 120     }
 121 }
 122
 123
 124