156 lines
4.4 KiB
C
156 lines
4.4 KiB
C
|
/*****************************************************************************/
|
||
|
|
/* */
|
||
|
|
/* output.c */
|
||
|
|
/* */
|
||
|
|
/* Disassembler output routines */
|
||
|
|
/* */
|
||
|
|
/* */
|
||
|
|
/* */
|
||
|
|
/* (C) 2000 Ullrich von Bassewitz */
|
||
|
|
/* Wacholderweg 14 */
|
||
|
|
/* D-70597 Stuttgart */
|
||
|
|
/* EMail: uz@musoftware.de */
|
||
|
|
/* */
|
||
|
|
/* */
|
||
|
|
/* This software is provided 'as-is', without any expressed or implied */
|
||
|
|
/* warranty. In no event will the authors be held liable for any damages */
|
||
|
|
/* arising from the use of this software. */
|
||
|
|
/* */
|
||
|
|
/* Permission is granted to anyone to use this software for any purpose, */
|
||
|
|
/* including commercial applications, and to alter it and redistribute it */
|
||
|
|
/* freely, subject to the following restrictions: */
|
||
|
|
/* */
|
||
|
|
/* 1. The origin of this software must not be misrepresented; you must not */
|
||
|
|
/* claim that you wrote the original software. If you use this software */
|
||
|
|
/* in a product, an acknowledgment in the product documentation would be */
|
||
|
|
/* appreciated but is not required. */
|
||
|
|
/* 2. Altered source versions must be plainly marked as such, and must not */
|
||
|
|
/* be misrepresented as being the original software. */
|
||
|
|
/* 3. This notice may not be removed or altered from any source */
|
||
|
|
/* distribution. */
|
||
|
|
/* */
|
||
|
|
/*****************************************************************************/
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
#include <stdio.h>
|
||
|
|
#include <stdarg.h>
|
||
|
|
#include <string.h>
|
||
|
|
#include <errno.h>
|
||
|
|
|
||
|
|
/* da65 */
|
||
|
|
#include "code.h"
|
||
|
|
#include "error.h"
|
||
|
|
#include "global.h"
|
||
|
|
#include "output.h"
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/*****************************************************************************/
|
||
|
|
/* Data */
|
||
|
|
/*****************************************************************************/
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
static FILE* F = 0; /* Output stream */
|
||
|
|
static unsigned Col = 1; /* Current column */
|
||
|
|
|
||
|
|
|
||
|
|
/*****************************************************************************/
|
||
|
|
/* Code */
|
||
|
|
/*****************************************************************************/
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
void OpenOutput (const char* Name)
|
||
|
|
/* Open the given file for output */
|
||
|
|
{
|
||
|
|
/* Open the output file */
|
||
|
|
F = fopen (Name, "w");
|
||
|
|
if (F == 0) {
|
||
|
|
Error ("Cannot open `%s': %s", Name, strerror (errno));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
void CloseOutput (void)
|
||
|
|
/* Close the output file */
|
||
|
|
{
|
||
|
|
if (fclose (F) != 0) {
|
||
|
|
Error ("Error closing output file: %s", strerror (errno));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
void Output (const char* Format, ...)
|
||
|
|
/* Write to the output file */
|
||
|
|
{
|
||
|
|
if (Pass > 1) {
|
||
|
|
va_list ap;
|
||
|
|
va_start (ap, Format);
|
||
|
|
Col += vfprintf (F, Format, ap);
|
||
|
|
va_end (ap);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
void Indent (unsigned N)
|
||
|
|
/* Make sure the current line column is at position N (zero based) */
|
||
|
|
{
|
||
|
|
if (Pass > 1) {
|
||
|
|
while (Col < N) {
|
||
|
|
fputc (' ', F);
|
||
|
|
++Col;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
void LineFeed (void)
|
||
|
|
/* Add a linefeed to the output file */
|
||
|
|
{
|
||
|
|
if (Pass > 1) {
|
||
|
|
fputc ('\n', F);
|
||
|
|
Col = 1;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
void DefLabel (const char* Name)
|
||
|
|
/* Define a label with the given name */
|
||
|
|
{
|
||
|
|
Output ("%s:", Name);
|
||
|
|
LineFeed ();
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
void OneDataByte (void)
|
||
|
|
/* Output a .byte line with the current code byte */
|
||
|
|
{
|
||
|
|
if (Pass > 1) {
|
||
|
|
Indent (MIndent);
|
||
|
|
Output (".byte");
|
||
|
|
Indent (AIndent);
|
||
|
|
Output ("$%02X", GetCodeByte());
|
||
|
|
LineFeed ();
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
void SeparatorLine (void)
|
||
|
|
/* Print a separator line */
|
||
|
|
{
|
||
|
|
Output ("; -------------------------------------------------------------------------");
|
||
|
|
LineFeed ();
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|