Adds an LE executable parser.

Adds the binparse library that holds common components for the MZ and LE parsers.

4 files changed, 287 insertions, 0 deletions

diff --git a/le/CMakeLists.txt b/le/CMakeLists.txt
new file mode 100644
index 0000000..a4887c5
--- /dev/null
+++ b/le/CMakeLists.txt
@@ -0,0 +1,31 @@
+
+add_library(le STATIC
+	le_header.hpp le_header.cpp
+)
+
+target_include_directories(le
+	INTERFACE ${CMAKE_CURRENT_SOURCE_DIR}
+)
+
+target_link_libraries(le
+	PUBLIC fusion-utils
+	PUBLIC binparse
+)
+
+add_executable(le_header_parser
+	le_header_parser.cpp
+)
+
+find_package(Boost COMPONENTS filesystem program_options system REQUIRED)
+
+target_link_libraries(le_header_parser
+	PRIVATE le
+	PRIVATE ${Boost_LIBRARIES}	
+)
+
+target_include_directories(le_header_parser
+	PRIVATE ${Boost_INCLUDE_DIRS}
+)
+
+
+
diff --git a/le/le_header.cpp b/le/le_header.cpp
new file mode 100644
index 0000000..a429add
--- /dev/null
+++ b/le/le_header.cpp
@@ -0,0 +1,92 @@
+
+#include "le_header.hpp"
+
+#include "index_list.hpp"
+#include "binparse.hpp"
+
+#include <boost/fusion/adapted/struct.hpp>
+
+BOOST_FUSION_ADAPT_STRUCT(
+	le::LEHeader,
+	(binparse::Magic16, magic)
+	(binparse::Value8, B_ord)
+	(binparse::Value8, W_ord)
+	(binparse::Value32, format_level)
+	(binparse::Value16, cpu_type)
+	(binparse::Value16, os_type)
+	(binparse::Value32, module_version)
+	(binparse::Value32, module_flags)
+	(binparse::Value32, module_nr_of_pages)
+	(binparse::Offset32, EIP_object)
+	(binparse::Offset32, EIP)
+	(binparse::Offset32, ESP_object)
+	(binparse::Offset32, ESP)
+	(binparse::Value32, page_size)
+	(binparse::Offset32, page_offset_shift)
+	(binparse::Value32, fixup_section_size)
+	(binparse::Value32, fixup_section_checksum)
+	(binparse::Value32, loader_section_size)
+	(binparse::Value32, loader_section_checksum)
+	(binparse::Offset32, object_table_offset)
+	(binparse::Value32, nr_objects_in_module)
+	(binparse::Offset32, object_page_table_offset)
+	(binparse::Offset32, objct_iter_pages_offset)
+	(binparse::Offset32, resource_table_offset)
+	(binparse::Value32, nr_resource_table_entries)
+	(binparse::Offset32, resident_name_table_offset)
+	(binparse::Offset32, entry_table_offset)
+	(binparse::Offset32, module_directives_offset)
+	(binparse::Value32, nr_module_directives)
+	(binparse::Offset32, fixup_page_table_offset)
+	(binparse::Offset32, fixup_record_table_offset)
+	(binparse::Offset32, import_module_table_offset)
+	(binparse::Value32, import_mod_entries)
+	(binparse::Offset32, import_proc_table_offset)
+	(binparse::Offset32, per_page_checksum_offset)
+	(binparse::Offset32, data_page_offset)
+	(binparse::Value32, nr_preload_pages)
+	(binparse::Offset32, non_res_name_table_offset)
+	(binparse::Value32, non_res_name_table_length)
+	(binparse::Value32, non_res_name_table_checksum)
+	(binparse::Value32, auto_ds_object_nr)
+	(binparse::Offset32, debug_info_offset)
+	(binparse::Value32, debug_info_length)
+	(binparse::Value32, nr_instance_preload)
+	(binparse::Value32, nr_instance_demand)
+	(binparse::Value32, heapsize)
+)
+
+namespace le {
+
+template <int... Indices>
+LEHeader parse_file_impl(std::istream& is, indices<Indices...>) {
+	
+	return {parse<typename std::decay<typename boost::fusion::result_of::at_c<LEHeader, Indices>::type>::type>(is, boost::fusion::extension::struct_member_name<LEHeader, Indices>::call())...};
+	
+}
+
+LEHeader parse_file(std::istream& is) {
+	
+	typedef build_indices<boost::fusion::result_of::size<LEHeader>::value>::type indices;
+	
+	return parse_file_impl(is, indices{});
+}
+
+std::ostream& output_impl(std::ostream& os, LEHeader const&, indices<>) {
+	return os;
+}
+
+template <int I, int... Indices>
+std::ostream& output_impl(std::ostream& os, const LEHeader& header, indices<I, Indices...>) {
+	os << boost::fusion::extension::struct_member_name<LEHeader, I>::call() << ": " << boost::fusion::at_c<I>(header) << std::endl;
+	return output_impl(os, header, indices<Indices...>{});
+}
+
+std::ostream& operator<<(std::ostream& os, LEHeader const& header)
+{
+	typedef build_indices<boost::fusion::result_of::size<LEHeader>::value>::type indices;
+	
+	return output_impl(os, header, indices{});
+}
+
+}
\ No newline at end of file
diff --git a/le/le_header.hpp b/le/le_header.hpp
new file mode 100644
index 0000000..9501127
--- /dev/null
+++ b/le/le_header.hpp
@@ -0,0 +1,107 @@
+
+#include "types.hpp"
+
+#include <cstdint>
+
+namespace le {
+
+using namespace binparse;
+
+struct NotALEFileException : public std::runtime_error {
+	NotALEFileException();
+};
+
+enum class Bord : uint8_t {
+	little_endian = 0,
+	big_endian = 1,
+};
+
+enum class Word : uint8_t {
+	little_endian = 0,
+	big_endian = 0,
+};
+
+enum class CpuType : uint16_t {
+	_80286 = 1,
+	_80386 = 2,
+	_80486 = 3,
+};
+
+enum class OsType : uint16_t {
+	Unknown = 0,
+	OS_2 = 1,
+	Windows = 2,
+	Dos_4x = 3,
+	Windows_386 = 4,
+};
+
+enum class module_flags {
+	per_process_library_initialization = 0x4,
+	internal_fixups = 0x10,
+	incompat_pm_windowing = 0x100,
+	compat_pm_windowing = 0x200,
+	uses_pm_windowing = 0x300,
+	module_not_loadable = 0x2000,
+	module_type_mask = 0x38000,
+	program_module = 0x0,
+	library_module = 0x8000,
+	protected_memory_library_module = 0x18000,
+	physical_device_driver_module = 0x20000,
+	virtual_device_driver_module = 0x28000,
+	per_process_library_temrination = 0x40000000,
+};
+
+struct LEHeader {
+	Magic16 magic;
+	Value8 B_ord;
+	Value8 W_ord;
+	Value32 format_level;
+	Value16 cpu_type;
+	Value16 os_type;
+	Value32 module_version;
+	Value32 module_flags;
+	Value32 module_nr_of_pages;
+	Offset32 EIP_object;
+	Offset32 EIP;
+	Offset32 ESP_object;
+	Offset32 ESP;
+	Value32 page_size;
+	Offset32 page_offset_shift;
+	Value32 fixup_section_size;
+	Value32 fixup_section_checksum;
+	Value32 loader_section_size;
+	Value32 loader_section_checksum;
+	Offset32 object_table_offset;
+	Value32 nr_objects_in_module;
+	Offset32 object_page_table_offset;
+	Offset32 objct_iter_pages_offset;
+	Offset32 resource_table_offset;
+	Value32 nr_resource_table_entries;
+	Offset32 resident_name_table_offset;
+	Offset32 entry_table_offset;
+	Offset32 module_directives_offset;
+	Value32 nr_module_directives;
+	Offset32 fixup_page_table_offset;
+	Offset32 fixup_record_table_offset;
+	Offset32 import_module_table_offset;
+	Value32 import_mod_entries;
+	Offset32 import_proc_table_offset;
+	Offset32 per_page_checksum_offset;
+	Offset32 data_page_offset;
+	Value32 nr_preload_pages;
+	Offset32 non_res_name_table_offset;
+	Value32 non_res_name_table_length;
+	Value32 non_res_name_table_checksum;
+	Value32 auto_ds_object_nr;
+	Offset32 debug_info_offset;
+	Value32 debug_info_length;
+	Value32 nr_instance_preload;
+	Value32 nr_instance_demand;
+	Value32 heapsize;
+};
+
+LEHeader parse_file(std::istream& is);
+
+std::ostream& operator<<(std::ostream& os, LEHeader const& header);
+
+}
\ No newline at end of file
diff --git a/le/le_header_parser.cpp b/le/le_header_parser.cpp
new file mode 100644
index 0000000..524c60d
--- /dev/null
+++ b/le/le_header_parser.cpp
@@ -0,0 +1,57 @@
+
+#include "le_header.hpp"
+
+#include <boost/program_options.hpp>
+#include <boost/filesystem.hpp>
+
+#include <iostream>
+
+int main(int argc, char* argv[]) {
+	boost::program_options::options_description description;
+	description.add_options()
+		("help,h", "produces this help message")
+		("exe,e", boost::program_options::value<std::string>(), "The LE executable to parse the header for.")
+	;
+	
+	boost::program_options::variables_map vm;
+	boost::program_options::store(boost::program_options::parse_command_line(argc, argv, description), vm);
+	boost::program_options::notify(vm);
+	
+	if(vm.count("help")) {
+		std::cout << description << std::endl;
+		return 0;
+	}
+	
+	boost::filesystem::path file_path;
+	if(vm.count("exe")) {
+		std::string exe_file = vm["exe"].as<std::string>();
+		
+		if(boost::filesystem::exists(exe_file)) {
+			if(!boost::filesystem::is_directory(exe_file)) {
+				file_path = exe_file;
+			} else {
+				std::cerr << exe_file << " is a folder" << std::endl;
+				std::cerr << std::endl;
+				std::cerr << description << std::endl;
+				return -1;
+			}
+		} else {
+			std::cerr << "file: " << exe_file << " does not exist" << std::endl;
+			std::cerr << std::endl;
+			std::cerr << description << std::endl;
+			return -1;
+		}
+	} else {
+		std::cerr << "Option \"exe_file\" is required";
+		std::cerr << std::endl;
+		std::cerr << description << std::endl;
+		return -1;
+	}
+	
+	std::ifstream file(file_path.string());
+	file.seekg(0x2aa8);
+	auto x = le::parse_file(file);
+	std::cout << x << std::endl;
+	
+	return 0;
+}