zilasm/header.cpp

   1 /*
   2  * header.c -- part of ZilUtils/ZilAsm
   3  *
   4  * Copyright (C) 2016, 2019 Jason Self <j@jxself.org>
   5  *
   6  * This program is free software: you can redistribute it and/or modify
   7  * it under the terms of the GNU Affero General Public License as
   8  * published by the Free Software Foundation, either version 3 of the
   9  * License, or (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU Affero General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Affero General Public License
  17  * along with this program.  If not, see <http://www.gnu.org/licenses/>
  18  *
  19  * SPDX-License-Identifier: AGPL-3.0-or-later
  20  */
  21
  22 #include <string.h>             /* bzero */
  23 #include <assert.h>
  24 #include <stdio.h>
  25
  26 #include "header.h"
  27
  28 Program_header_struct Program_header;
  29
  30 const unsigned MAX_HEADER_LEN = 40;
  31
  32 void
  33 program_header_reset (unsigned zversion)
  34 {
  35   bzero (&Program_header, sizeof (Program_header));
  36   Program_header.version = zversion;
  37 }
  38
  39 ZMemblock *
  40 program_header_build (void)
  41 {
  42   ZMemblock *zmb = zmem_init (MAX_HEADER_LEN);
  43   zmem_putbyte (zmb, Program_header.version);
  44   /* TODO */
  45   return zmb;
  46 }
  47
  48
  49 Word
  50 swapBytes (Word w)
  51 {
  52   return ((w & 255) << 8) + (w >> 8);
  53 }
  54
  55
  56 void
  57 outputToFile (Program_header_struct * pHeader, FILE * file)
  58 {
  59   Program_header_struct h;
  60   memcpy (&h, pHeader, sizeof (Program_header_struct));
  61
  62   h.startPC = swapBytes (h.startPC);
  63   h.h_file_size = swapBytes (h.h_file_size);
  64   h.H_STRINGS_OFFSET = swapBytes (h.H_STRINGS_OFFSET);
  65
  66   int size = sizeof (Program_header_struct);
  67   fwrite (&h, sizeof (Program_header_struct), 1, file);
  68 }