#define FOOLOS_MODULE_NAME "syscalls"
#include "lib/buffer/ringbuffer.h"
#include "lib/logger/log.h"
#include "lib/bool/bool.h"
#include "fs/fs.h"
#include "fs/ext2.h"
#include "kernel/console.h"
#include "kernel/config.h"
#include <sys/stat.h>



int syscall_write(int file, char *buf, int len)
{

    #ifdef LOG_SYSCALLS
    log(FOOLOS_MODULE_NAME,FOOLOS_LOG_INFO,"write(file=%d, buf=0x%08X, len=%d)", file,buf,len);
    #endif

    // ALL output to stdout
    for(int i=0;i<len;i++)
    {
	//PutConsoleChar(buf[i],0b1111111111000000);
	console_put_char(buf[i]);
    }
    return len;
}

int syscall_read(int file, char *buf, int len)
{

    #ifdef LOG_SYSCALLS
    log(FOOLOS_MODULE_NAME,FOOLOS_LOG_INFO,"read(file=%d, buf=0x%08X, len=%d)", file,buf,len);
    #endif

    // stdin TODO: other descroptiors!
    if(file==1||file!=1)
    {
    
	char c;

	while(1)
	{
	    asm("cli");
	    bool ret=ringbuffer_get(&c);
	    asm("sti");
	    
	    if(ret)
	    {
		*buf=c;
		if(c=='X')return 0;
		return 1;
	    }

	}
    }

}

int syscall_readdir(const char *name,fs_dirent *dirs,int max)
{
    #ifdef LOG_SYSCALLS
    log(FOOLOS_MODULE_NAME,FOOLOS_LOG_INFO,"readdir(name=0x%08X, dirs=0x%08X,  %d)", name,dirs,max);
    #endif

    return fs_readdir(name,dirs,max);
}

int syscall_execve(char *name, char **argv, char **env)
{
    #ifdef LOG_SYSCALLS
    log(FOOLOS_MODULE_NAME,FOOLOS_LOG_INFO,"execve (name=0x%08X, argvs=0x%08X,  env=0x%08X)", name,argv,env);
    #endif

    // lets first clean some area for loading our prog!
    // we need this to zero-initalize bss
    for(uint32_t *addr=0x800000; addr<=0xb00000; addr++)
    {
	*addr=0;
    }


    ext2_inode_content(EXT2_RAM_ADDRESS,name,0x800000,0x100000);

    // autorun "user-space" prog
    asm("push $10");//argv TODO: addresse
    asm("push $20"); //argc TODO: real number of params!
    asm("push $0x800000");
    asm("ret");
}

int syscall_open(char *name, int flags, int mode)
{
    #ifdef LOG_SYSCALLS
    log(FOOLOS_MODULE_NAME,FOOLOS_LOG_INFO,"open (name=0x%08X(\"%s\"), flags=%d,  mode=%d)",name, name,flags,mode);
    #endif

    return 99;

}

//newcomers
//
int syscall_close(int file,int none1,int none2)  
{
    #ifdef LOG_SYSCALLS
    log(FOOLOS_MODULE_NAME,FOOLOS_LOG_INFO,"close (file=%d)", file);
    #endif

    return -1;
}

int syscall_fstat(int file, struct stat *st,int none)
{
    #ifdef LOG_SYSCALLS
    log(FOOLOS_MODULE_NAME,FOOLOS_LOG_INFO,"fstat (file=%d,stat=0x%08X)", file,st);
    #endif

    st->st_mode = S_IFCHR;
    return 0;
}

int syscall_isatty(int file,int none1,int none2)  
{
    #ifdef LOG_SYSCALLS
    log(FOOLOS_MODULE_NAME,FOOLOS_LOG_INFO,"isatty (file=%d)", file);
    #endif

    return 1;
}

int syscall_lseek(int file,int ptr,int dir) 
{

    #ifdef LOG_SYSCALLS
    log(FOOLOS_MODULE_NAME,FOOLOS_LOG_INFO,"lseek (file=%d, ptr=%d, dir=%d)", file,ptr,dir);
    #endif
/*
    if(dir==0)preread=ptr;
    else{ while(1);}
*/
    return 0;

}

uint32_t syscall_sbrk(int incr, int none1, int none2) 
{
    static uint32_t alloc;

    // fool-os-convention to set bss_end:
    if(incr==0)
    {
	alloc=0;
	return 0;
    }
    if(alloc==0)
    {
	#ifdef LOG_SYSCALLS
	log(FOOLOS_MODULE_NAME,FOOLOS_LOG_INFO,"sbrk RESET to 0x%08X", incr);
	#endif

	alloc=incr;
	return alloc;
    }

    uint32_t oldalloc=alloc;
    alloc+=incr;

    #ifdef LOG_SYSCALLS
    log(FOOLOS_MODULE_NAME,FOOLOS_LOG_INFO,"sbrk (incr=%d) = 0x%08X", incr,oldalloc);
    #endif

    return oldalloc;

	    /*
	    
            extern char end;	    
//	    char _end;
            static char *heap_end;
            char *prev_heap_end;
          
            if (heap_end == 0) {
              heap_end = &end;
            }
            prev_heap_end = heap_end;

            if (heap_end + incr > stack_ptr) {
              write (1, "Heap and stack collision\n", 25);
              abort ();
            }
          
            heap_end += incr;
            return (caddr_t) prev_heap_end;
	    */
}

int syscall_exit(int ret, int none1, int none2)
{
    #ifdef LOG_SYSCALLS
    log(FOOLOS_MODULE_NAME,FOOLOS_LOG_INFO,"exit (ret=%d)", ret);
    #endif
    syscall_execve(15,0,0); // start shell
}