/*      $NetBSD: netbsd.cpp,v 1.2 2013/06/20 13:36:48 kiyohara Exp $    */
/*
 * Copyright (c) 2012 KIYOHARA Takashi
 * All rights reserved.
 *
 * 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 AUTHOR ``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 AUTHOR 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 <e32cons.h>
#include <e32std.h>
#include <f32file.h>

#include "e32boot.h"
#include "elf.h"
#include "netbsd.h"


NetBSD *
NetBSD::New(const TDesC &aFilename)
{
        NetBSD *netbsd = NULL;
        RFs fsSession;
        RFile file;
        TInt size;
        union {
                Elf32_Ehdr elf;
        } hdr;

        /* Connect to FileServer Session */
        User::LeaveIfError(fsSession.Connect());

        User::LeaveIfError(file.Open(fsSession, aFilename, EFileRead));
        User::LeaveIfError(file.Size(size));

        TPtr hdrBuf((TUint8 *)&hdr, sizeof(hdr));
        User::LeaveIfError(file.Read(hdrBuf));
        /* Currently support is ELF only. */
        if (Mem::Compare((TUint8 *)hdr.elf.e_ident, SELFMAG,
                                        (TUint8 *)ELFMAG, SELFMAG) == 0) {
                netbsd = new (ELeave) ELF(size);
        } else
                User::Leave(KErrNotSupported);
        TInt pos = 0;
        User::LeaveIfError(file.Seek(ESeekStart, pos));

        TPtr fileBuf(netbsd->Buffer, size);
        User::LeaveIfError(file.Read(fileBuf));
        if (fileBuf.Length() != size)
                User::Leave(KErrNotFound);
        file.Close();

        /* Close FileServer Session */
        fsSession.Close();

        netbsd->LoadDescriptor =
            (struct loaddesc *)PAGE_ALIGN(User::AllocL(ALIGN_SAFE_PAGE_SIZE));

        return netbsd;
}

NetBSD *
NetBSD::New(const TDesC &aFilename, const TDesC &aArgs)
{
        NetBSD *netbsd = New(aFilename);

        netbsd->Args = &aArgs;

        return netbsd;
}


void
ELF::ParseHeader(void)
{
        struct loaddesc *loaddesc = LoadDescriptor;
        Elf32_Ehdr ehdr;
        Elf32_Phdr *phdr = NULL;
        int PhdrSize, i;

        Mem::Copy(&ehdr, Buffer, sizeof(ehdr));
        PhdrSize = sizeof(Elf32_Phdr) * ehdr.e_phnum;
        phdr = (Elf32_Phdr *) new (ELeave) TUint8[PhdrSize];
        Mem::Copy(phdr, Buffer + ehdr.e_phoff, PhdrSize);

        for (i = 0; i < ehdr.e_phnum; i++) {
                if (phdr[i].p_type != PT_LOAD ||
                    (phdr[i].p_flags & (PF_W | PF_X)) == 0)
                        continue;

                loaddesc->addr = VTOP(phdr[i].p_vaddr);
                loaddesc->offset = phdr[i].p_offset;
                loaddesc->size = phdr[i].p_filesz;
                loaddesc++;
        }
        /* Terminate loaddesc. */
        loaddesc->addr = 0xffffffff;
        loaddesc->offset = 0xffffffff;
        loaddesc->size = 0xffffffff;

        EntryPoint = ehdr.e_entry;
}