/* -*-C++-*-	$NetBSD: arch.cpp,v 1.15 2008/04/28 20:23:20 martin Exp $	 */

/*-
 * Copyright (c) 2001, 2002, 2004 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * This code is derived from software contributed to The NetBSD Foundation
 * by UCHIYAMA Yasushi.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

#include <hpcboot.h>
#include <hpcmenu.h>

#include <menu/window.h>
#include <menu/rootwindow.h>	// MessageBox

#include <console.h>
#include <memory.h>
#include <load.h>
#include <arch.h>
#include <framebuffer.h>

Architecture::Architecture(Console *&cons, MemoryManager *&mem)
	:_cons(cons), _mem(mem)
{

	_loader_addr = 0;
	_debug = FALSE;
	_dll = 0;
}

Architecture::~Architecture(void)
{

	if (_dll)
		FreeLibrary(_dll);
}

BOOL
Architecture::allocateMemory(size_t sz)
{
	//binary image.
	sz = _mem->estimateTaggedPageSize(sz);
	//pvec + BootArgs + 2 nd bootloader + bootloader stack.
	sz += _mem->getPageSize() * 4;
	sz = _mem->roundRegion(sz);
	return _mem->reservePage(sz);
}

paddr_t
Architecture::setupBootInfo(Loader &loader)
{
	HpcMenuInterface &menu = HpcMenuInterface::Instance();
	vaddr_t v;
	paddr_t p;

	_mem->getPage(v, p);
	_boot_arg = reinterpret_cast <struct BootArgs *>(v);

	_boot_arg->argc = menu.setup_kernel_args(v + sizeof(struct BootArgs),
	    p + sizeof(struct BootArgs),
	    _mem->getTaggedPageSize() - sizeof(struct BootArgs));
	_boot_arg->argv = ptokv(p + sizeof(struct BootArgs));
	menu.setup_bootinfo(_boot_arg->bi);
	_boot_arg->bi.bi_cnuse = _cons->getBootConsole();

	_boot_arg->bootinfo = ptokv(p + offsetof(struct BootArgs, bi));
	_boot_arg->kernel_entry = loader.jumpAddr();

	struct bootinfo &bi = _boot_arg->bi;
	DPRINTF((TEXT("framebuffer: %dx%d type=%d linebytes=%d addr=0x%08x\n"),
	    bi.fb_width, bi.fb_height, bi.fb_type, bi.fb_line_bytes,
	    bi.fb_addr));
	DPRINTF((TEXT("console = %d\n"), bi.bi_cnuse));

	return p;
}

void *
Architecture::_load_func(const TCHAR * name)
{

	if (_dll == NULL)
		_dll = LoadLibrary(TEXT("coredll.dll"));

	if (_dll == NULL) {
		HWND owner = HpcMenuInterface::Instance()._root->_window;
		MessageBox(owner,
		    TEXT("Can't load coredll.dll."), TEXT("WARNING"),
		    MB_ICONWARNING | MB_OK);
		UpdateWindow(owner);

		return NULL;
	}

	return reinterpret_cast <void *>(GetProcAddress(_dll, name));
}

void
Architecture::systemInfo(void)
{
	uint32_t val = 0;
	SYSTEM_INFO si;

	DPRINTF((TEXT("_WIN32_WCE = %d\n"), _WIN32_WCE));
	//
	// WCE200 ... GetVersionEx
	// WCE210 or later ... GetVersionExA or GetVersionExW
	// see winbase.h
	//
	BOOL (*getVersionEx)(LPOSVERSIONINFO);
	getVersionEx = reinterpret_cast <BOOL(*)(LPOSVERSIONINFO)>
	    (_load_func(TEXT("GetVersionEx")));

	if (getVersionEx) {
		getVersionEx(&WinCEVersion);
		DPRINTF((TEXT("GetVersionEx\n")));
	} else {
		GetVersionEx(&WinCEVersion);
		DPRINTF((TEXT("GetVersionExW\n")));
	}

	DPRINTF((TEXT("Windows CE %d.%d\n"), WinCEVersion.dwMajorVersion,
	    WinCEVersion.dwMinorVersion));

	GetSystemInfo(&si);
	DPRINTF((TEXT("GetSystemInfo:\n")));
#if _WIN32_WCE >= 200
	DPRINTF((TEXT("wProcessorArchitecture      0x%x\n"),
	    si.wProcessorArchitecture));
	DPRINTF((TEXT("wProcessorLevel             0x%x\n"),
	    si.wProcessorLevel));
	DPRINTF((TEXT("wProcessorRevision          0x%x\n"),
	    si.wProcessorRevision));
#endif
	DPRINTF((TEXT("dwPageSize                  0x%x\n"),
	    si.dwPageSize));
	DPRINTF((TEXT("dwAllocationGranularity     0x%08x\n"),
	    si.dwAllocationGranularity));
	DPRINTF((TEXT("dwProcessorType             0x%x\n"),
	    si.dwProcessorType));
	// inquire default setting.
	FrameBufferInfo fb(0, 0);
	DPRINTF((TEXT("Display: %dx%d %dbpp\n"), fb.width(), fb.height(),
	    fb.bpp()));
}

BOOL(*Architecture::_load_LockPages(void))(LPVOID, DWORD, PDWORD, int)
{

	return reinterpret_cast <BOOL(*)(LPVOID, DWORD, PDWORD, int)>
	    (_load_func(TEXT("LockPages")));
}

BOOL(*Architecture::_load_UnlockPages(void))(LPVOID, DWORD)
{

	return reinterpret_cast <BOOL(*)(LPVOID, DWORD)>
	    (_load_func(TEXT("UnlockPages")));
}