/* Copyright (C) 2005 David Decotigny
 
    This program is free software; you can redistribute it and/or
    modify it under the terms of the GNU General Public License
    as published by the Free Software Foundation; either version 2
    of the License, or (at your option) any later version.
    
    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.
    
    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,
    USA. 
 */
 
 #include "crt.h"
 #include "libc.h"
 
 
 void * mmap(void *start, size_t length, int prot , int flags,
             const char *path, loff_t offset)
 {
   /* At kernel side, offset is considered positive */
   if (offset < 0)
     return NULL;
 
   if (0 != _sos_mmap(& start, length, prot, flags, path, offset))
     return NULL;
 
   return start;
 }
 
 
 void * mremap(void * old_addr, size_t old_len,
               size_t new_len,
               unsigned long flags)
 {
   void * new_uaddr = old_addr;
   if (0 != _sos_mresize(old_addr, old_len, & new_uaddr, new_len, flags))
     return NULL;
 
   return new_uaddr;
 }
 
 
 /**
  * The presence of this global variable without any protected access
  * to it explains why the "brk/sbrk" functions below are MT-unsafe !
  */
 static void * kernel_heap_top = NULL;
 int brk(void *end_data_seg)
 {
   if (! end_data_seg)
     return -1;
 
   kernel_heap_top = _sos_brk(end_data_seg);
   return 0;
 }
 
 
 void *sbrk(ptrdiff_t increment)
 {
   if (! kernel_heap_top)
     kernel_heap_top = _sos_brk(0);
 
   kernel_heap_top = _sos_brk(kernel_heap_top + increment);
   return kernel_heap_top;
 }
 
 
 void * calloc (size_t nmemb, size_t size)
 {
   return malloc(nmemb * size);
 }
 
 
 /**
  * The presence of this global variable without any protected access
  * to it explains why the "malloc/calloc" functions below are
  * MT-unsafe !
  */
 static void * malloc_heap_top = NULL;
 void * malloc (size_t size)
 {
   void * retval;
 
   if (size <= 0)
     return NULL;
 
   /* Align on a 4B boundary */
   size = ((size-1) & ~3) + 4;
 
   if (! kernel_heap_top)
     kernel_heap_top = _sos_brk(0);
 
   if (! malloc_heap_top)
     malloc_heap_top = kernel_heap_top;
 
   retval = malloc_heap_top;
   malloc_heap_top += size;
 
   return retval;
 }