RISC-V: Moved syscalls to separate files to fix aliasing problems.

This commit is contained in:
Jim Wilson 2017-12-26 12:27:52 -08:00
parent 347b083911
commit 28d5b98038
37 changed files with 513 additions and 450 deletions

View File

@ -6,8 +6,39 @@ gloss_hdrs = \
machine/syscall.h \
gloss_srcs = \
syscalls.c \
nanosleep.c
nanosleep.c \
sys_access.c \
sys_chdir.c \
sys_chmod.c \
sys_chown.c \
sys_close.c \
sys_conv_stat.c \
sys_execve.c \
sys_exit.c \
sys_faccessat.c \
sys_fork.c \
sys_fstatat.c \
sys_fstat.c \
sys_ftime.c \
sys_getcwd.c \
sys_getpid.c \
sys_gettimeofday.c \
sys_isatty.c \
sys_kill.c \
sys_link.c \
sys_lseek.c \
sys_lstat.c \
sys_openat.c \
sys_open.c \
sys_read.c \
sys_sbrk.c \
sys_stat.c \
sys_sysconf.c \
sys_times.c \
sys_unlink.c \
sys_utime.c \
sys_wait.c \
sys_write.c
# Extra files

View File

@ -0,0 +1,52 @@
/* Copyright (c) 2017 SiFive Inc. All rights reserved.
This copyrighted material is made available to anyone wishing to use,
modify, copy, or redistribute it subject to the terms and conditions
of the FreeBSD License. This program is distributed in the hope that
it will be useful, but WITHOUT ANY WARRANTY expressed or implied,
including the implied warranties of MERCHANTABILITY or FITNESS FOR
A PARTICULAR PURPOSE. A copy of this license is available at
http://www.opensource.org/licenses.
*/
#ifndef _INTERNAL_SYSCALL_H
#define _INTERNAL_SYSCALL_H
#include <errno.h>
static inline long
__syscall_error(long a0)
{
errno = -a0;
return -1;
}
static inline long
__internal_syscall(long n, long _a0, long _a1, long _a2, long _a3, long _a4, long _a5)
{
register long a0 asm("a0") = _a0;
register long a1 asm("a1") = _a1;
register long a2 asm("a2") = _a2;
register long a3 asm("a3") = _a3;
register long a4 asm("a4") = _a4;
register long a5 asm("a5") = _a5;
#ifdef __riscv_32e
register long syscall_id asm("t0") = n;
#else
register long syscall_id asm("a7") = n;
#endif
asm volatile ("scall"
: "+r"(a0) : "r"(a1), "r"(a2), "r"(a3), "r"(a4), "r"(a5), "r"(syscall_id));
if (a0 < 0)
return __syscall_error (a0);
else
return a0;
}
#define syscall_errno(n, a, b, c, d, e, f) \
__internal_syscall(n, (long)(a), (long)(b), (long)(c), (long)(d), (long)(e), (long)(f))
#endif

View File

@ -0,0 +1,39 @@
/* Copyright (c) 2017 SiFive Inc. All rights reserved.
This copyrighted material is made available to anyone wishing to use,
modify, copy, or redistribute it subject to the terms and conditions
of the FreeBSD License. This program is distributed in the hope that
it will be useful, but WITHOUT ANY WARRANTY expressed or implied,
including the implied warranties of MERCHANTABILITY or FITNESS FOR
A PARTICULAR PURPOSE. A copy of this license is available at
http://www.opensource.org/licenses.
*/
#ifndef _RISCV_KERNEL_STAT_H
#define _RISCV_KERNEL_STAT_H
#include <sys/types.h>
#include <sys/stat.h>
struct kernel_stat
{
unsigned long long st_dev;
unsigned long long st_ino;
unsigned int st_mode;
unsigned int st_nlink;
unsigned int st_uid;
unsigned int st_gid;
unsigned long long st_rdev;
unsigned long long __pad1;
long long st_size;
int st_blksize;
int __pad2;
long long st_blocks;
struct timespec st_atim;
struct timespec st_mtim;
struct timespec st_ctim;
int __glibc_reserved[2];
};
void _conv_stat (struct stat *, struct kernel_stat *);
#endif /* _RISCV_KERNEL_STAT_H */

View File

@ -54,31 +54,4 @@
#define SYS_time 1062
#define SYS_getmainvars 2011
extern long __syscall_error(long);
static inline long
__internal_syscall(long n, long _a0, long _a1, long _a2, long _a3, long _a4, long _a5)
{
register long a0 asm("a0") = _a0;
register long a1 asm("a1") = _a1;
register long a2 asm("a2") = _a2;
register long a3 asm("a3") = _a3;
register long a4 asm("a4") = _a4;
register long a5 asm("a5") = _a5;
#ifdef __riscv_32e
register long syscall_id asm("t0") = n;
#else
register long syscall_id asm("a7") = n;
#endif
asm volatile ("scall"
: "+r"(a0) : "r"(a1), "r"(a2), "r"(a3), "r"(a4), "r"(a5), "r"(syscall_id));
if (a0 < 0)
return __syscall_error (a0);
else
return a0;
}
#endif

View File

@ -0,0 +1,9 @@
#include <machine/syscall.h>
#include "internal_syscall.h"
/* Permissions of a file (by name). */
int
_access(const char *file, int mode)
{
return syscall_errno (SYS_access, file, mode, 0, 0, 0, 0);
}

View File

@ -0,0 +1,8 @@
#include <machine/syscall.h>
/* Stub. */
int
_chdir(const char *path)
{
return -1;
}

View File

@ -0,0 +1,9 @@
#include <machine/syscall.h>
#include <sys/types.h>
/* Stub. */
int
_chmod(const char *path, mode_t mode)
{
return -1;
}

View File

@ -0,0 +1,8 @@
#include <machine/syscall.h>
#include <sys/types.h>
/* Stub. */
int _chown(const char *path, uid_t owner, gid_t group)
{
return -1;
}

View File

@ -0,0 +1,9 @@
#include <machine/syscall.h>
#include "internal_syscall.h"
/* Close a file. */
int
_close(int file)
{
return syscall_errno (SYS_close, file, 0, 0, 0, 0, 0);
}

View File

@ -0,0 +1,21 @@
#include <machine/syscall.h>
#include "kernel_stat.h"
/* Convert linux's stat64 sturct to newlib's stat. */
void
_conv_stat (struct stat *st, struct kernel_stat *kst)
{
st->st_dev = kst->st_dev;
st->st_ino = kst->st_ino;
st->st_mode = kst->st_mode;
st->st_nlink = kst->st_nlink;
st->st_uid = kst->st_uid;
st->st_gid = kst->st_gid;
st->st_rdev = kst->st_rdev;
st->st_size = kst->st_size;
st->st_blocks = kst->st_blocks;
st->st_blksize = kst->st_blksize;
st->st_atime = kst->st_atim.tv_sec;
st->st_mtime = kst->st_mtim.tv_sec;
st->st_ctime = kst->st_ctim.tv_sec;
}

View File

@ -0,0 +1,11 @@
#include <machine/syscall.h>
#include "internal_syscall.h"
/* Transfer control to a new process. Minimal implementation for a
system without processes from newlib documentation. */
int
_execve(const char *name, char *const argv[], char *const env[])
{
errno = ENOMEM;
return -1;
}

10
libgloss/riscv/sys_exit.c Normal file
View File

@ -0,0 +1,10 @@
#include <machine/syscall.h>
#include "internal_syscall.h"
/* Exit a program without cleaning up files. */
void
_exit(int exit_status)
{
syscall_errno (SYS_exit, exit_status, 0, 0, 0, 0, 0);
while (1);
}

View File

@ -0,0 +1,8 @@
#include <machine/syscall.h>
#include "internal_syscall.h"
/* Permissions of a file (by name) in a given directory. */
int _faccessat(int dirfd, const char *file, int mode, int flags)
{
return syscall_errno (SYS_faccessat, dirfd, file, mode, flags, 0, 0);
}

10
libgloss/riscv/sys_fork.c Normal file
View File

@ -0,0 +1,10 @@
#include <machine/syscall.h>
#include "internal_syscall.h"
/* Create a new process. Minimal implementation for a system without
processes from newlib documentation. */
int _fork()
{
errno = EAGAIN;
return -1;
}

View File

@ -0,0 +1,15 @@
#include <machine/syscall.h>
#include "kernel_stat.h"
#include "internal_syscall.h"
/* Status of an open file. The sys/stat.h header file required is
distributed in the include subdirectory for this C library. */
int
_fstat(int file, struct stat *st)
{
struct kernel_stat kst;
int rv = syscall_errno (SYS_fstat, file, &kst, 0, 0, 0, 0);
_conv_stat (st, &kst);
return rv;
}

View File

@ -0,0 +1,14 @@
#include <machine/syscall.h>
#include "kernel_stat.h"
#include "internal_syscall.h"
/* Status of an open file. The sys/stat.h header file required is
distributed in the include subdirectory for this C library. */
int
_fstatat(int dirfd, const char *file, struct stat *st, int flags)
{
struct kernel_stat kst;
int rv = syscall_errno (SYS_fstatat, dirfd, file, &kst, flags, 0, 0);
_conv_stat (st, &kst);
return rv;
}

View File

@ -0,0 +1,10 @@
#include <machine/syscall.h>
#include <sys/timeb.h>
/* Get the current time. Only relatively correct. */
int
_ftime(struct timeb *tp)
{
tp->time = tp->millitm = 0;
return 0;
}

View File

@ -0,0 +1,9 @@
#include <machine/syscall.h>
#include <sys/types.h>
/* Stub. */
char *
_getcwd(char *buf, size_t size)
{
return NULL;
}

View File

@ -0,0 +1,11 @@
#include <machine/syscall.h>
/* Get process id. This is sometimes used to generate strings unlikely
to conflict with other processes. Minimal implementation for a
system without processes just returns 1. */
int
_getpid()
{
return 1;
}

View File

@ -0,0 +1,10 @@
#include <machine/syscall.h>
#include <sys/time.h>
#include "internal_syscall.h"
/* Get the current time. Only relatively correct. */
int
_gettimeofday(struct timeval *tp, void *tzp)
{
return syscall_errno (SYS_gettimeofday, tp, 0, 0, 0, 0, 0);
}

View File

@ -0,0 +1,17 @@
#include <machine/syscall.h>
#include <sys/stat.h>
#include "internal_syscall.h"
extern int _fstat(int file, struct stat *st);
/* Query whether output stream is a terminal. For consistency with the
other minimal implementations, which only support output to stdout,
this minimal implementation is suggested by the newlib docs. */
int
_isatty(int file)
{
struct stat s;
int ret = _fstat (file, &s);
return ret == -1 ? -1 : !!(s.st_mode & S_IFCHR);
}

11
libgloss/riscv/sys_kill.c Normal file
View File

@ -0,0 +1,11 @@
#include <machine/syscall.h>
#include "internal_syscall.h"
/* Send a signal. Minimal implementation for a system without processes
just causes an error. */
int
_kill(int pid, int sig)
{
errno = EINVAL;
return -1;
}

View File

@ -0,0 +1,8 @@
#include <machine/syscall.h>
#include "internal_syscall.h"
/* Establish a new name for an existing file. */
int _link(const char *old_name, const char *new_name)
{
return syscall_errno (SYS_link, old_name, new_name, 0, 0, 0, 0);
}

View File

@ -0,0 +1,10 @@
#include <machine/syscall.h>
#include <sys/types.h>
#include "internal_syscall.h"
/* Set position in a file. */
off_t
_lseek(int file, off_t ptr, int dir)
{
return syscall_errno (SYS_lseek, file, ptr, dir, 0, 0, 0);
}

View File

@ -0,0 +1,13 @@
#include <machine/syscall.h>
#include <sys/stat.h>
#include "internal_syscall.h"
#include "kernel_stat.h"
/* Status of a link (by name). */
int _lstat(const char *file, struct stat *st)
{
struct kernel_stat kst;
int rv = syscall_errno (SYS_lstat, file, &kst, 0, 0, 0, 0);
_conv_stat (st, &kst);
return rv;
}

View File

@ -0,0 +1,9 @@
#include <machine/syscall.h>
#include "internal_syscall.h"
/* Open a file. */
int
_open(const char *name, int flags, int mode)
{
return syscall_errno (SYS_open, name, flags, mode, 0, 0, 0);
}

View File

@ -0,0 +1,8 @@
#include <machine/syscall.h>
#include "internal_syscall.h"
/* Open file relative to given directory. */
int _openat(int dirfd, const char *name, int flags, int mode)
{
return syscall_errno (SYS_openat, dirfd, name, flags, mode, 0, 0);
}

View File

@ -0,0 +1,9 @@
#include <machine/syscall.h>
#include <sys/types.h>
#include "internal_syscall.h"
/* Read from a file. */
ssize_t _read(int file, void *ptr, size_t len)
{
return syscall_errno (SYS_read, file, ptr, len, 0, 0, 0);
}

27
libgloss/riscv/sys_sbrk.c Normal file
View File

@ -0,0 +1,27 @@
#include <machine/syscall.h>
#include <sys/types.h>
#include "internal_syscall.h"
/* Increase program data space. As malloc and related functions depend
on this, it is useful to have a working implementation. The following
is suggested by the newlib docs and suffices for a standalone
system. */
void *
_sbrk(ptrdiff_t incr)
{
static unsigned long heap_end;
if (heap_end == 0)
{
long brk = syscall_errno (SYS_brk, 0, 0, 0, 0, 0, 0);
if (brk == -1)
return (void *)-1;
heap_end = brk;
}
if (syscall_errno (SYS_brk, heap_end + incr, 0, 0, 0, 0, 0) != heap_end + incr)
return (void *)-1;
heap_end += incr;
return (void *)(heap_end - incr);
}

14
libgloss/riscv/sys_stat.c Normal file
View File

@ -0,0 +1,14 @@
#include <machine/syscall.h>
#include "kernel_stat.h"
#include "internal_syscall.h"
/* Status of a file (by name). */
int
_stat(const char *file, struct stat *st)
{
struct kernel_stat kst;
int rv = syscall_errno (SYS_stat, file, &kst, 0, 0, 0, 0);
_conv_stat (st, &kst);
return rv;
}

View File

@ -0,0 +1,17 @@
#include <machine/syscall.h>
#include <unistd.h>
#include <time.h>
/* Get configurable system variables. */
long
_sysconf(int name)
{
switch (name)
{
case _SC_CLK_TCK:
return CLOCKS_PER_SEC;
}
return -1;
}

View File

@ -0,0 +1,37 @@
#include <machine/syscall.h>
#include <sys/types.h>
#include <sys/times.h>
#include <sys/time.h>
#include "internal_syscall.h"
extern int _gettimeofday(struct timeval *, void *);
/* Timing information for current process. From
newlib/libc/include/sys/times.h the tms struct fields are as follows:
- clock_t tms_utime : user clock ticks
- clock_t tms_stime : system clock ticks
- clock_t tms_cutime : children's user clock ticks
- clock_t tms_cstime : children's system clock ticks
Since maven does not currently support processes we set both of the
children's times to zero. Eventually we might want to separately
account for user vs system time, but for now we just return the total
number of cycles since starting the program. */
clock_t
_times(struct tms *buf)
{
// when called for the first time, initialize t0
static struct timeval t0;
if (t0.tv_sec == 0)
_gettimeofday (&t0, 0);
struct timeval t;
_gettimeofday (&t, 0);
long long utime = (t.tv_sec - t0.tv_sec) * 1000000 + (t.tv_usec - t0.tv_usec);
buf->tms_utime = utime * CLOCKS_PER_SEC / 1000000;
buf->tms_stime = buf->tms_cstime = buf->tms_cutime = 0;
return -1;
}

View File

@ -0,0 +1,9 @@
#include <machine/syscall.h>
#include "internal_syscall.h"
/* Remove a file's directory entry. */
int
_unlink(const char *name)
{
return syscall_errno (SYS_unlink, name, 0, 0, 0, 0, 0);
}

View File

@ -0,0 +1,8 @@
#include <machine/syscall.h>
/* Stub. */
int
_utime(const char *path, const struct utimbuf *times)
{
return -1;
}

10
libgloss/riscv/sys_wait.c Normal file
View File

@ -0,0 +1,10 @@
#include <machine/syscall.h>
#include <errno.h>
/* Wait for a child process. Minimal implementation for a system without
processes just causes an error. */
int _wait(int *status)
{
errno = ECHILD;
return -1;
}

View File

@ -0,0 +1,10 @@
#include <machine/syscall.h>
#include <sys/types.h>
#include "internal_syscall.h"
/* Write to a file. */
ssize_t
_write(int file, const void *ptr, size_t len)
{
return syscall_errno (SYS_write, file, ptr, len, 0, 0, 0);
}

View File

@ -1,421 +0,0 @@
/* Copyright (c) 2017 SiFive Inc. All rights reserved.
This copyrighted material is made available to anyone wishing to use,
modify, copy, or redistribute it subject to the terms and conditions
of the FreeBSD License. This program is distributed in the hope that
it will be useful, but WITHOUT ANY WARRANTY expressed or implied,
including the implied warranties of MERCHANTABILITY or FITNESS FOR
A PARTICULAR PURPOSE. A copy of this license is available at
http://www.opensource.org/licenses.
========================================================================
syscalls.c : Newlib operating system interface
========================================================================
This is the maven implementation of the narrow newlib operating
system interface. It is based on the minimum stubs in the newlib
documentation, the error stubs in libnosys, and the previous scale
implementation. Please do not include any additional system calls or
other functions in this file. Additional header and source files
should be in the machine subdirectory.
Here is a list of the functions which make up the operating system
interface. The file management instructions execute syscall assembly
instructions so that a proxy kernel (or the simulator) can marshal up
the request to the host machine. The process management functions are
mainly just stubs since for now maven only supports a single process.
- File management functions
+ open : (v) open file
+ lseek : (v) set position in file
+ read : (v) read from file
+ write : (v) write to file
+ fstat : (z) status of an open file
+ stat : (z) status of a file by name
+ close : (z) close a file
+ link : (z) rename a file
+ unlink : (z) remote file's directory entry
- Process management functions
+ execve : (z) transfer control to new proc
+ fork : (z) create a new process
+ getpid : (v) get process id
+ kill : (z) send signal to child process
+ wait : (z) wait for a child process
- Misc functions
+ isatty : (v) query whether output stream is a terminal
+ times : (z) timing information for current process
+ sbrk : (v) increase program data space
+ _exit : (-) exit program without cleaning up files
There are two types of system calls. Those which return a value when
everything is okay (marked with (v) in above list) and those which
return a zero when everything is okay (marked with (z) in above
list). On an error (ie. when the error flag is 1) the return value is
always an errno which should correspond to the numbers in
newlib/libc/include/sys/errno.h
See the newlib documentation for more information
http://sourceware.org/newlib/libc.html#Syscalls
*/
#include <machine/syscall.h>
#include <sys/stat.h>
#include <sys/times.h>
#include <sys/time.h>
#include <sys/timeb.h>
#include <errno.h>
#include <string.h>
#include <unistd.h>
#include <utime.h>
#define syscall_errno(n, a, b, c, d, e, f) \
__internal_syscall(n, (long)(a), (long)(b), (long)(c), \
(long)(d), (long)(e), (long)(f))
long
__syscall_error(long a0)
{
errno = -a0;
return -1;
}
/* Open a file. */
int
_open(const char *name, int flags, int mode)
{
return syscall_errno (SYS_open, name, flags, mode, 0, 0, 0);
}
/* Open file relative to given directory. */
int
_openat(int dirfd, const char *name, int flags, int mode)
{
return syscall_errno (SYS_openat, dirfd, name, flags, mode, 0, 0);
}
/* Set position in a file. */
off_t
_lseek(int file, off_t ptr, int dir)
{
return syscall_errno (SYS_lseek, file, ptr, dir, 0, 0, 0);
}
/* Read from a file. */
ssize_t
_read(int file, void *ptr, size_t len)
{
return syscall_errno (SYS_read, file, ptr, len, 0, 0, 0);
}
/* Write to a file. */
ssize_t
_write(int file, const void *ptr, size_t len)
{
return syscall_errno (SYS_write, file, ptr, len, 0, 0, 0);
}
struct kernel_stat
{
unsigned long long st_dev;
unsigned long long st_ino;
unsigned int st_mode;
unsigned int st_nlink;
unsigned int st_uid;
unsigned int st_gid;
unsigned long long st_rdev;
unsigned long long __pad1;
long long st_size;
int st_blksize;
int __pad2;
long long st_blocks;
struct timespec st_atim;
struct timespec st_mtim;
struct timespec st_ctim;
int __glibc_reserved[2];
};
/* Convert linux's stat64 sturct to newlib's stat. */
static void
conv_stat (struct stat *st, struct kernel_stat *kst)
{
st->st_dev = kst->st_dev;
st->st_ino = kst->st_ino;
st->st_mode = kst->st_mode;
st->st_nlink = kst->st_nlink;
st->st_uid = kst->st_uid;
st->st_gid = kst->st_gid;
st->st_rdev = kst->st_rdev;
st->st_size = kst->st_size;
st->st_blocks = kst->st_blocks;
st->st_blksize = kst->st_blksize;
st->st_atime = kst->st_atim.tv_sec;
st->st_mtime = kst->st_mtim.tv_sec;
st->st_ctime = kst->st_ctim.tv_sec;
}
/* Status of an open file. The sys/stat.h header file required is
distributed in the include subdirectory for this C library. */
int
_fstat(int file, struct stat *st)
{
struct kernel_stat kst;
int rv = syscall_errno (SYS_fstat, file, &kst, 0, 0, 0, 0);
conv_stat (st, &kst);
return rv;
}
/* Status of a file (by name). */
int
_stat(const char *file, struct stat *st)
{
struct kernel_stat kst;
int rv = syscall_errno (SYS_stat, file, &kst, 0, 0, 0, 0);
conv_stat (st, &kst);
return rv;
}
/* Status of a link (by name). */
int
_lstat(const char *file, struct stat *st)
{
struct kernel_stat kst;
int rv = syscall_errno (SYS_lstat, file, &kst, 0, 0, 0, 0);
conv_stat (st, &kst);
return rv;
}
/* Status of a file (by name) in a given directory. */
int
_fstatat(int dirfd, const char *file, struct stat *st, int flags)
{
struct kernel_stat kst;
int rv = syscall_errno (SYS_fstatat, dirfd, file, &kst, flags, 0, 0);
conv_stat (st, &kst);
return rv;
}
/* Permissions of a file (by name). */
int
_access(const char *file, int mode)
{
return syscall_errno (SYS_access, file, mode, 0, 0, 0, 0);
}
/* Permissions of a file (by name) in a given directory. */
int
_faccessat(int dirfd, const char *file, int mode, int flags)
{
return syscall_errno (SYS_faccessat, dirfd, file, mode, flags, 0, 0);
}
/* Close a file. */
int
_close(int file)
{
return syscall_errno (SYS_close, file, 0, 0, 0, 0, 0);
}
/* Establish a new name for an existing file. */
int
_link(const char *old_name, const char *new_name)
{
return syscall_errno (SYS_link, old_name, new_name, 0, 0, 0, 0);
}
/* Remove a file's directory entry. */
int
_unlink(const char *name)
{
return syscall_errno (SYS_unlink, name, 0, 0, 0, 0, 0);
}
/* Transfer control to a new process. Minimal implementation for a
system without processes from newlib documentation. */
int
_execve(const char *name, char *const argv[], char *const env[])
{
errno = ENOMEM;
return -1;
}
/* Create a new process. Minimal implementation for a system without
processes from newlib documentation. */
int
_fork()
{
errno = EAGAIN;
return -1;
}
/* Get process id. This is sometimes used to generate strings unlikely
to conflict with other processes. Minimal implementation for a
system without processes just returns 1. */
int
_getpid()
{
return 1;
}
/* Send a signal. Minimal implementation for a system without processes
just causes an error. */
int
_kill(int pid, int sig)
{
errno = EINVAL;
return -1;
}
/* Wait for a child process. Minimal implementation for a system without
processes just causes an error. */
int
_wait(int *status)
{
errno = ECHILD;
return -1;
}
/* Query whether output stream is a terminal. For consistency with the
other minimal implementations, which only support output to stdout,
this minimal implementation is suggested by the newlib docs. */
int
_isatty(int file)
{
struct stat s;
int ret = _fstat (file, &s);
return ret == -1 ? -1 : !!(s.st_mode & S_IFCHR);
}
/* Get the current time. Only relatively correct. */
int
_gettimeofday(struct timeval *tp, void *tz)
{
return syscall_errno (SYS_gettimeofday, tp, 0, 0, 0, 0, 0);
}
/* Timing information for current process. From
newlib/libc/include/sys/times.h the tms struct fields are as follows:
- clock_t tms_utime : user clock ticks
- clock_t tms_stime : system clock ticks
- clock_t tms_cutime : children's user clock ticks
- clock_t tms_cstime : children's system clock ticks
Since maven does not currently support processes we set both of the
children's times to zero. Eventually we might want to separately
account for user vs system time, but for now we just return the total
number of cycles since starting the program. */
clock_t
_times(struct tms *buf)
{
// when called for the first time, initialize t0
static struct timeval t0;
if(t0.tv_sec == 0)
_gettimeofday (&t0,0);
struct timeval t;
_gettimeofday (&t, 0);
long long utime = (t.tv_sec - t0.tv_sec) * 1000000 + (t.tv_usec - t0.tv_usec);
buf->tms_utime = utime * CLOCKS_PER_SEC / 1000000;
buf->tms_stime = buf->tms_cstime = buf->tms_cutime = 0;
return -1;
}
/* Get the current time. Only relatively correct. */
int
_ftime(struct timeb *tp)
{
tp->time = tp->millitm = 0;
return 0;
}
/* Stub. */
int
_utime(const char *path, const struct utimbuf *times)
{
return -1;
}
/* Stub. */
int
_chown(const char *path, uid_t owner, gid_t group)
{
return -1;
}
/* Stub. */
int
_chmod(const char *path, mode_t mode)
{
return -1;
}
/* Stub. */
int
_chdir(const char *path)
{
return -1;
}
/* Stub. */
char *
_getcwd(char *buf, size_t size)
{
return NULL;
}
/* Get configurable system variables. */
long
_sysconf(int name)
{
switch (name)
{
case _SC_CLK_TCK:
return CLOCKS_PER_SEC;
}
return -1;
}
/* Increase program data space. As malloc and related functions depend
on this, it is useful to have a working implementation. The following
is suggested by the newlib docs and suffices for a standalone
system. */
void *
_sbrk(ptrdiff_t incr)
{
static unsigned long heap_end;
if (heap_end == 0)
{
long brk = syscall_errno (SYS_brk, 0, 0, 0, 0, 0, 0);
if (brk == -1)
return (void *)-1;
heap_end = brk;
}
if (syscall_errno (SYS_brk, heap_end + incr, 0, 0, 0, 0, 0)
!= heap_end + incr)
return (void *)-1;
heap_end += incr;
return (void *)(heap_end - incr);
}
/* Exit a program without cleaning up files. */
void
_exit(int exit_status)
{
syscall_errno (SYS_exit, exit_status, 0, 0, 0, 0, 0);
while (1);
}