#include <stdint.h>
#include <moduleinterface.h>
#include <elf.h>
#include <base/output.hpp>
/** \brief beginning of constructor table */
extern "C" void(*start_ctors)(); 
/** \brief end of constructor table */
extern "C" void(*end_ctors)();
/** \brief start of destructor table */
extern "C" void(*start_dtors)();
/** \brief end of destructor table */
extern "C" void(*end_dtors)();
/**
 * \function load(Elf32_Ehdr)
 * \brief returns program entry point
 */
auto load(Elf32_Ehdr* file) -> void(**(*)(void*))() {
    if((file->e_ident[0]!=ELFMAG0)||
      (file->e_ident[1]!=ELFMAG1)||
      (file->e_ident[2]!=ELFMAG2)||
      (file->e_ident[3]!=ELFMAG3) ) {
        return nullptr;
    }
    Elf32_Phdr *phdr = (Elf32_Phdr*)((uintptr_t)(file->e_phoff)+(uintptr_t)file);
    for(int i=0;i<file->e_phnum;i++) {
        uint32_t start=phdr[i].p_vaddr;
        uint32_t end=start+phdr[i].p_memsz;
        if((start <= file->e_entry) && (file->e_entry < end)) {
            return (void (** (*)(void*))()) (file->e_entry-start+phdr[i].p_offset+(uintptr_t)file); //Calculate _start address
        }
    }
  return nullptr;
}
MTGos::Base::Output out;
/**
 * \function _start()
 * \brief Initializes the kernel
 */
extern "C" void _start(void ** modtable) {
    //for(void(**i)()=&start_ctors;i<&end_ctors;i++)
    //    (*i)(); //Calling constructors
    for(int i=0;i<1024;i++) {
        if(!modtable[i])
            break;
        void(**(*fptr)(void*))() = load((Elf32_Ehdr*) modtable[i]);
        if(!fptr)
            continue;
        void(**table)()=fptr(modtable[i]);
        ModType type=((getType_type)table[0])(); //Get module type
        if(type!=ModType::output_text)
            continue;
        size_t size=((sizeof_type)table[1])(); //Get module size
        ((spawnAt_type)table[2])((void*)&out);
        out << "HI!\nbye!";
    }
    for(void(**i)()=&start_dtors;i<&end_dtors;i++)
        (*i)(); //Calling destructors
    for(;;);
}
/**
 * \function __cxa_pure_virtual()
 * \brief Called when a function tries to call a pure-virtual function
 */
extern "C" void __cxa_pure_virtual()
{
    // Do nothing or print an error message.
}