shithub: rgbds

ref: e4b4e427f12769fd309792c37bbbc1daf7908add
dir: /src/link/mapfile.c/

#include <errno.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "extern/err.h"
#include "link/main.h"
#include "link/mylink.h"
#include "link/assign.h"

FILE *mf = NULL;
FILE *sf = NULL;
SLONG currentbank = 0;
SLONG sfbank;

void
SetMapfileName(char *name)
{
	mf = fopen(name, "w");

	if (mf == NULL) {
		err(1, "Cannot open mapfile '%s'", name);
	}
}

void
SetSymfileName(char *name)
{
	sf = fopen(name, "w");

	if (sf == NULL) {
		err(1, "Cannot open symfile '%s'", name);
	}

	fprintf(sf, ";File generated by rgblink\n\n");
}

void
CloseMapfile(void)
{
	if (mf) {
		fclose(mf);
		mf = NULL;
	}
	if (sf) {
		fclose(sf);
		sf = NULL;
	}
}

void
MapfileInitBank(SLONG bank)
{
	if (mf) {
		currentbank = bank;
		if (bank == BANK_ROM0)
			fprintf(mf, "ROM Bank #0 (HOME):\n");
		else if (bank < BANK_WRAM0)
			fprintf(mf, "ROM Bank #%ld:\n", bank);
		else if (bank == BANK_WRAM0)
			fprintf(mf, "WRAM Bank #0:\n");
		else if (bank < BANK_VRAM)
			fprintf(mf, "WRAM Bank #%ld:\n", bank - BANK_WRAMX + 1);
		else if (bank == BANK_HRAM)
			fprintf(mf, "HRAM:\n");
		else if (bank == BANK_VRAM || bank == BANK_VRAM + 1)
			fprintf(mf, "VRAM Bank #%ld:\n", bank - BANK_VRAM);
		else if (bank == BANK_OAM)
			fprintf(mf, "OAM:\n");
		else if (bank < MAXBANKS)
			fprintf(mf, "SRAM Bank #%ld:\n", bank - BANK_SRAM);
	}
	if (sf) {
		if (bank < BANK_WRAM0)
			sfbank = bank;
		else if (bank == BANK_WRAM0)
			sfbank = 0;
		else if (bank < BANK_VRAM)
			sfbank = bank - BANK_WRAMX + 1;
		else if (bank == BANK_HRAM)
			sfbank = 0;
		else if (bank == BANK_VRAM || bank == BANK_VRAM + 1)
			sfbank = bank - BANK_VRAM;
		else if (bank == BANK_OAM)
			sfbank = 0;
		else if (bank < MAXBANKS)
			sfbank = bank - BANK_SRAM;
		else
			sfbank = 0;
	}
}

void
MapfileWriteSection(struct sSection * pSect)
{
	SLONG i;

	if (mf) {
		if (pSect->nByteSize > 0) {
			fprintf(mf, "  SECTION: $%04lX-$%04lX ($%04lX bytes) [\"%s\"]\n",
				pSect->nOrg, pSect->nOrg + pSect->nByteSize - 1,
				pSect->nByteSize, pSect->pzName);
		} else {
			fprintf(mf, "  SECTION: $%04lX ($0 bytes) [\"%s\"]\n",
				pSect->nOrg, pSect->pzName);
		}
	}

	for (i = 0; i < pSect->nNumberOfSymbols; i += 1) {
		struct sSymbol *pSym;
		pSym = pSect->tSymbols[i];
		if ((pSym->pSection == pSect)
		    && (pSym->Type != SYM_IMPORT)) {
			if (mf) {
				fprintf(mf, "           $%04lX = %s\n",
				    pSym->nOffset + pSect->nOrg,
				    pSym->pzName);
			}
			if (sf) {
				fprintf(sf, "%02lX:%04lX %s\n", sfbank,
				    pSym->nOffset + pSect->nOrg,
				    pSym->pzName);
			}
		}
	}
}

void
MapfileCloseBank(SLONG slack)
{
	if (!mf)
		return;

	if (slack == MaxAvail[currentbank])
		fprintf(mf, "  EMPTY\n\n");
	else
		fprintf(mf, "    SLACK: $%04lX bytes\n\n", slack);
}