mes/mlibc/libc-mes+tcc.c

279 lines
4.0 KiB
C

/* -*-comment-start: "//";comment-end:""-*-
* Mes --- Maxwell Equations of Software
* Copyright © 2017 Jan Nieuwenhuizen <janneke@gnu.org>
*
* This file is part of Mes.
*
* Mes 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 3 of the License, or (at
* your option) any later version.
*
* Mes 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 Mes. If not, see <http://www.gnu.org/licenses/>.
*/
#define FULL_MALLOC 1
#include <libc-mes.c>
#include <setjmp.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include <unistd.h>
void
close ()
{
asm ("mov____0x8(%ebp),%ebx !8");
asm ("mov____$i32,%eax SYS_close");
asm ("int____$0x80");
}
char *
getcwd (char *buf, size_t size)
{
asm ("mov____0x8(%ebp),%ebx !8");
asm ("mov____0x8(%ebp),%ecx !12");
asm ("mov____$i32,%eax SYS_getcwd");
asm ("int____$0x80");
}
int
unlink (char const *file_name)
{
asm ("mov____0x8(%ebp),%ebx !8");
asm ("mov____$i32,%eax SYS_unlink");
asm ("int____$0x80");
}
off_t
lseek (int fd, off_t offset, int whence)
{
asm ("mov____0x8(%ebp),%ebx !8");
asm ("mov____0x8(%ebp),%ecx !12");
asm ("mov____0x8(%ebp),%edx !16");
asm ("mov____$i32,%eax SYS_lseek");
asm ("int____$0x80");
}
int
execvp (char const *file, char *const argv[])
{
return 0;
}
int
fclose (FILE *stream)
{
return 0;
}
FILE *
fdopen (int fd, char const *mode)
{
return 0;
}
int
fflush (FILE *stream)
{
return 0;
}
FILE *
fopen (char const *pathname, char const *mode)
{
return 0;
}
int
fprintf (FILE *stream, char const *format, ...)
{
return 0;
}
size_t
fread (void *ptr, size_t size, size_t nmemb, FILE *stream)
{
return 0;
}
void
free (void *ptr)
{
}
int
fseek (FILE *stream, long offset, int whence)
{
return 0;
}
long
ftell (FILE *stream)
{
return 0;
}
size_t
fwrite (void const *ptr, size_t size, size_t nmemb, FILE *stream)
{
return 0;
}
struct tm *
localtime (time_t const *timep)
{
return 0;
}
void
longjmp (jmp_buf env, int val)
{
}
void *
memcpy (void *dest, void const *src, size_t n)
{
char* p = dest;
char* q = src;
while (n--) *p++ = *q++;
return dest;
}
void *
memmove (void *dest, void const *src, size_t n)
{
return 0;
}
void *
memset (void *s, int c, size_t n)
{
char *p = s;
while (n--) *p++ = c;
return s;
}
int
memcmp (void const *s1, void const *s2, size_t n)
{
return 0;
}
void
qsort (void *base, size_t nmemb, size_t size, int (*compar)(void const *, void const *))
{
}
int
remove (char const *file_name)
{
return 0;
}
int
setjmp (jmp_buf env)
{
return 0;
}
int
snprintf(char *str, size_t size, char const *format, ...)
{
return 0;
}
int
sscanf (char const *str, const char *format, ...)
{
return 0;
}
char *
strchr (char const *s, int c)
{
return 0;
}
char *
strrchr (char const *s, int c)
{
return 0;
}
char *
strstr (char const *haystack, char const *needle)
{
return 0;
}
long
strtol (char const *nptr, char **endptr, int base)
{
return 0;
}
long long int
strtoll (char const *nptr, char **endptr, int base)
{
return 0;
}
unsigned long
strtoul (char const *nptr, char **endptr, int base)
{
return 0;
}
unsigned long long
strtoull (char const *nptr, char **endptr, int base)
{
return 0;
}
time_t time (time_t *tloc)
{
return 0;
}
int
vsnprintf (char *str, size_t size, char const *format, va_list ap)
{
return 0;
}
void *
calloc (size_t nmemb, size_t size)
{
size_t count = nmemb * size;
void *p = malloc (count);
memset (p, 0, count);
return p;
}
void *
realloc (void *ptr, size_t size)
{
void *new = malloc (size);
if (ptr && new)
{
memcpy (new, ptr, size);
free (ptr);
}
return new;
}