fc_windows.cpp

JAPAN RTOS TOPPERS/JSP kernel 1.4 PreRelease simulation environment JSP kernel Windows simulation

/*
 *  TOPPERS/JSP Kernel
 *      Toyohashi Open Platform for Embedded Real-Time Systems/
 *      Just Standard Profile Kernel
 * 
 *  Copyright (C) 2000-2002 by Embedded and Real-Time Systems Laboratory
 *                              Toyohashi Univ. of Technology, JAPAN
 * 
 *  忋婰挊嶌尃幰偼丆埲壓偺 (1)乣(4) 偺忦審偐丆Free Software Foundation 
 *  偵傛偭偰岞昞偝傟偰偄傞 GNU General Public License 偺 Version 2 偵婰
 *  弎偝傟偰偄傞忦審傪枮偨偡応崌偵尷傝丆杮僜僼僩僂僃傾乮杮僜僼僩僂僃傾
 *  傪夵曄偟偨傕偺傪娷傓丏埲壓摨偠乯傪巊梡丒暋惢丒夵曄丒嵞攝晍乮埲壓丆
 *  棙梡偲屇傇乯偡傞偙偲傪柍彏偱嫋戻偡傞丏
 *  (1) 杮僜僼僩僂僃傾傪僜乕僗僐乕僪偺宍偱棙梡偡傞応崌偵偼丆忋婰偺挊嶌
 *      尃昞帵丆偙偺棙梡忦審偍傛傃壓婰偺柍曐徹婯掕偑丆偦偺傑傑偺宍偱僜乕
 *      僗僐乕僪拞偵娷傑傟偰偄傞偙偲丏
 *  (2) 杮僜僼僩僂僃傾傪丆儔僀僽儔儕宍幃側偳丆懠偺僜僼僩僂僃傾奐敪偵巊
 *      梡偱偒傞宍偱嵞攝晍偡傞応崌偵偼丆嵞攝晍偵敽偆僪僉儏儊儞僩乮棙梡
 *      幰儅僯儏傾儖側偳乯偵丆忋婰偺挊嶌尃昞帵丆偙偺棙梡忦審偍傛傃壓婰
 *      偺柍曐徹婯掕傪宖嵹偡傞偙偲丏
 *  (3) 杮僜僼僩僂僃傾傪丆婡婍偵慻傒崬傓側偳丆懠偺僜僼僩僂僃傾奐敪偵巊
 *      梡偱偒側偄宍偱嵞攝晍偡傞応崌偵偼丆師偺偄偢傟偐偺忦審傪枮偨偡偙
 *      偲丏
 *    (a) 嵞攝晍偵敽偆僪僉儏儊儞僩乮棙梡幰儅僯儏傾儖側偳乯偵丆忋婰偺挊
 *        嶌尃昞帵丆偙偺棙梡忦審偍傛傃壓婰偺柍曐徹婯掕傪宖嵹偡傞偙偲丏
 *    (b) 嵞攝晍偺宍懺傪丆暿偵掕傔傞曽朄偵傛偭偰丆TOPPERS僾儘僕僃僋僩偵
 *        曬崘偡傞偙偲丏
 *  (4) 杮僜僼僩僂僃傾偺棙梡偵傛傝捈愙揑傑偨偼娫愙揑偵惗偠傞偄偐側傞懝
 *      奞偐傜傕丆忋婰挊嶌尃幰偍傛傃TOPPERS僾儘僕僃僋僩傪柶愑偡傞偙偲丏
 * 
 *  杮僜僼僩僂僃傾偼丆柍曐徹偱採嫙偝傟偰偄傞傕偺偱偁傞丏忋婰挊嶌尃幰偍
 *  傛傃TOPPERS僾儘僕僃僋僩偼丆杮僜僼僩僂僃傾偵娭偟偰丆偦偺揔梡壜擻惈傕
 *  娷傔偰丆偄偐側傞曐徹傕峴傢側偄丏傑偨丆杮僜僼僩僂僃傾偺棙梡偵傛傝捈
 *  愙揑傑偨偼娫愙揑偵惗偠偨偄偐側傞懝奞偵娭偟偰傕丆偦偺愑擟傪晧傢側偄丏
 * 
 *  @(#) $Id: fc_windows.cpp,v 1.6 2003/07/01 10:41:24 takayuki Exp $
 */

#ifndef NO_FC_WINDOWS_CPP

#include "base/filecontainer.h"

#include "base/message.h"

#include <windows.h>
#include <imagehlp.h>

#include <string>

using namespace std;

class filecontainer_windows : public filecontainer
{
protected:
	HANDLE process;
	LOADED_IMAGE image;
	DWORD base;

public:
	filecontainer_windows(void);
	~filecontainer_windows(void);

	virtual bool attach_module(const char *);
	virtual bool change_endian(void * target, unsigned int size);
	virtual bool load_contents(void * dest, unsigned long address, unsigned int size);
	virtual unsigned long get_symbol_address(const char *);
	virtual const char * get_architecture(void) { return "Windows"; };

} Instance_of_filecontainer_windows;

filecontainer_windows::filecontainer_windows(void)
{
	process = 0;
	base = 0;
	instance = this;
}

filecontainer_windows::~filecontainer_windows(void)
{}


bool filecontainer_windows::attach_module(const char * filename)
{
	process = ::GetCurrentProcess();
	if(::SymInitialize( process , NULL, FALSE) == FALSE)
		ExceptionMessage("Internal Error : ImageHelper API initialization failure","撪晹僄儔乕 : 弶婜壔偵幐攕偟傑偟偨 (ImageHlp)").throwException();
	
	base = ::SymLoadModule(process, NULL, const_cast<char *>(filename), NULL, 0, 0);
	
	image.SizeOfImage = sizeof(LOADED_IMAGE);
	if(::MapAndLoad(const_cast<char *>(filename), NULL, &image, FALSE, TRUE) == FALSE)
		ExceptionMessage("Internel error : Module loading failure [%]","撪晹僄儔乕:儌僕儏乕儖偺撉傒崬傒偵幐攕偟傑偟偨 [%]") << filename << throwException;
	return true;
}

bool filecontainer_windows::change_endian(void * target, unsigned int size)
{
		//Windows僱僀僥傿僽摨巑偩偐傜曄姺側傫偰梫傜側偄
	return true;
}


bool filecontainer_windows::load_contents(void * dest, unsigned long address, unsigned int size)
{
	PIMAGE_SECTION_HEADER header;
	unsigned int i;

	address -= base;
	for(i=0;i<image.NumberOfSections;i++)
	{
		header = image.Sections+i;
		if(address >= header->VirtualAddress && address < header->VirtualAddress + header->SizeOfRawData)
		{
			address -= header->VirtualAddress - header->PointerToRawData;
			::CopyMemory(dest,image.MappedAddress + address,size);

			return true;
		}
	}

	ExceptionMessage("Internel error: Memory read with unmapped address","撪晹僄儔乕; 儅僢僾偝傟偰側偄傾僪儗僗傪巊偭偰儊儌儕儕乕僪偑峴傢傟傑偟偨").throwException();

	return false;
}

unsigned long filecontainer_windows::get_symbol_address(const char * symbol)
{
	IMAGEHLP_SYMBOL sym;
	char buffer[256];

	if(process == NULL || base == 0)
		ExceptionMessage("Not initialized","弶婜壔偝傟偰傑偣傫").throwException();

	sym.SizeOfStruct = sizeof(sym);
	sym.MaxNameLength = 0;

	if(::SymGetSymFromName(process, const_cast<char *>(symbol), &sym) == FALSE)
	{
		sprintf(buffer,"_%s",symbol);
		if(::SymGetSymFromName(process, const_cast<char *>(buffer), &sym) == FALSE)
			return 0;
	}

	return sym.Address;
}

#endif