mzexe.h

#ifndef MZEXE_H
#define MZEXE_H
 
#include <iomanip>
#include <set>
#include <string>
#include <vector>
#include "../common.h"
#include "../linker/linker.h"
#include "../linker/format.h"
#include "../linker/module.h"
#include "../linker/reader.h"
#include "../linker/section.h"
#include "../linker/segment.h"
#include "../linker/writer.h"
#include "../dumper/dumper.h"
 
namespace Microsoft
{
    class MZFormat : public virtual Linker::OutputFormat, public Linker::LinkerManager
    {
    public:
        /* * * General members * * */
 
        enum magic_type
        {
            MAGIC_MZ = 1,
            MAGIC_ZM,
            MAGIC_DL,
        };
 
        char signature[2] = { 'M', 'Z' }; /* TODO: make parameter */
 
        uint16_t last_block_size = 0;
        uint16_t file_size_blocks = 0; /* TODO: consider making file size a parameter */
 
        uint32_t GetFileSize() const;
 
        uint16_t relocation_count = 0;
        uint16_t header_size_paras = 0; /* TODO: make header size a parameter */
        uint16_t min_extra_paras = 0;
        uint16_t max_extra_paras = 0;
        uint16_t ss = 0;
        uint16_t sp = 0;
        uint16_t checksum = 0; /* TODO: fill when writing */
        uint16_t ip = 0;
        uint16_t cs = 0;
        uint16_t relocation_offset = 0; /* TODO: make parameter */
 
        uint16_t overlay_number = 0;
        uint16_t data_segment = 0;
 
        struct Relocation
        {
            uint16_t segment;
            uint16_t offset;
 
            Relocation(uint16_t segment, uint16_t offset)
                : segment(segment), offset(offset)
            {
            }
 
            static Relocation FromLinear(uint32_t address);
 
            uint32_t GetOffset() const;
 
            bool operator ==(const Relocation& other) const;
 
            bool operator <(const Relocation& other) const;
        };
 
        std::vector<Relocation> relocations;
 
        struct PIF
        {
            static constexpr uint32_t MAGIC_BEGIN = 0x0013EDC1;
            static constexpr uint32_t MAGIC_END = 0xEDC10013;
            static constexpr size_t SIZE = 19;
 
            /* TODO: requires testing */
            uint16_t maximum_extra_paragraphs;
            uint16_t minimum_extra_paragraphs;
            uint8_t flags;
            uint8_t lowest_used_interrupt;
            uint8_t highest_used_interrupt;
            uint8_t com_port_usage;
            uint8_t lpt_port_usage;
            uint8_t screen_usage;
 
            void SetDefaults();
 
            void ReadFile(Linker::Reader& rd);
 
            void WriteFile(Linker::Writer& wr);
 
            void Dump(Dumper::Dumper& dump, offset_t file_offset);
        };
 
        std::unique_ptr<PIF> pif;
 
        std::shared_ptr<Linker::Writable> image;
 
        magic_type GetSignature() const;
 
        void SetSignature(magic_type magic);
 
        void Clear() override;
 
        ~MZFormat()
        {
            Clear();
        }
 
        void SetFileSize(uint32_t size);
 
        uint32_t GetHeaderSize();
 
        uint32_t GetPifOffset() const;
 
        void ReadFile(Linker::Reader& rd) override;
 
        void WriteFile(Linker::Writer& wr) override;
 
        void Dump(Dumper::Dumper& dump) override;
 
        void CalculateValues() override;
 
        /* * * Writer members * * */
 
        enum memory_model_t
        {
            MODEL_DEFAULT,
            MODEL_TINY,
            MODEL_SMALL,
            MODEL_COMPACT,
            MODEL_LARGE,
        };
        memory_model_t memory_model = MODEL_DEFAULT;
 
        /* filled in automatically */
        uint16_t extra_paras = 0;
 
        uint32_t zero_fill = 0;
 
        uint32_t option_header_align = 0x10;
 
        uint32_t option_file_align = 1;
 
        bool FormatSupportsSegmentation() const override;
 
        bool FormatIs16bit() const override;
 
        unsigned FormatAdditionalSectionFlags(std::string section_name) const override;
 
        using LinkerManager::SetLinkScript;
 
        void SetModel(std::string model) override;
 
        void SetOptions(std::map<std::string, std::string>& options) override;
 
        void OnNewSegment(std::shared_ptr<Linker::Segment> segment) override;
 
        void CreateDefaultSegments();
 
        std::unique_ptr<Script::List> GetScript(Linker::Module& module);
 
        void Link(Linker::Module& module);
 
#if 0
        void LinkLarge(Linker::Module& module);
#endif
 
        void ProcessModule(Linker::Module& module) override;
 
        uint32_t GetDataSize() const;
 
        void GenerateFile(std::string filename, Linker::Module& module) override;
 
        std::string GetDefaultExtension(Linker::Module& module, std::string filename) override;
    };
 
    class MZSimpleStubWriter
    {
    public:
        std::string stub_file;
        bool stub_file_valid = true;
        std::ifstream stub;
 
        MZSimpleStubWriter(std::string stub_file = "")
            : stub_file(stub_file)
        {
        }
 
        offset_t stub_size = -1;
 
        bool OpenAndCheckValidFile();
 
        offset_t GetStubImageSize();
 
        void WriteStubImage(std::ostream& out);
 
        void WriteStubImage(Linker::Writer& wr);
 
        ~MZSimpleStubWriter()
        {
            if(stub.is_open())
            {
                stub.close();
            }
        }
    };
 
    class MZStubWriter
    {
    public:
        std::string stub_file;
        bool stub_file_valid = true;
        std::ifstream stub;
 
        MZStubWriter(std::string stub_file = "")
            : stub_file(stub_file)
        {
        }
 
        uint32_t original_file_size = -1;
        uint32_t stub_file_size = 0;
        uint16_t stub_reloc_count = 0;
        uint32_t original_header_size = 0;
        uint32_t stub_header_size = 0;
        uint16_t original_reloc_offset = 0;
        uint16_t stub_reloc_offset = 0;
 
        bool OpenAndCheckValidFile();
 
        offset_t GetStubImageSize();
 
        void WriteStubImage(std::ostream& out);
 
        void WriteStubImage(Linker::Writer& wr);
 
        ~MZStubWriter()
        {
            if(stub.is_open())
            {
                stub.close();
            }
        }
    };
 
}
 
#endif /* MZEXE_H */