newlib/libgloss/arm/redboot-syscalls.c
2002-01-07 18:12:32 +00:00

204 lines
2.9 KiB
C

/*
* redboot-syscalls.c -- provide system call support for RedBoot
*
* Copyright (c) 1997, 2001 Cygnus Support
*
* The authors hereby grant permission to use, copy, modify, distribute,
* and license this software and its documentation for any purpose, provided
* that existing copyright notices are retained in all copies and that this
* notice is included verbatim in any distributions. No written agreement,
* license, or royalty fee is required for any of the authorized uses.
* Modifications to this software may be copyrighted by their authors
* and need not follow the licensing terms described here, provided that
* the new terms are clearly indicated on the first page of each file where
* they apply.
*
*/
#include <stdlib.h>
#include <sys/stat.h>
#include <sys/times.h>
#include <errno.h>
#include "syscall.h"
// Use "naked" attribute to suppress C prologue/epilogue
static int __attribute__ ((naked)) __syscall(int func_no, ...)
{
asm ("mov r12, lr\n");
#ifdef __thumb__
asm ("swi 0x18\n");
#else
asm ("swi 0x180001\n");
#endif
asm ("mov pc, r12\n");
}
int
_close(int fd)
{
int err;
err = __syscall(SYS_close, fd);
if (err)
errno = err;
return err;
}
void
_exit(int stat)
{
while (1)
__syscall(SYS_exit, stat);
}
int
_fstat (int file, struct stat *st)
{
st->st_mode = S_IFCHR;
st->st_blksize = 4096;
return 0;
}
int
_getpid(void)
{
return 1;
}
int
_gettimeofday (void * tp, void * tzp)
{
return 0;
}
int
isatty(int fd)
{
return (1);
}
int
_kill(int pid, int sig)
{
if(pid == 1)
_exit(sig);
return 0;
}
off_t
_lseek(int fd, off_t offset, int whence)
{
int err;
err = __syscall(SYS_lseek, fd, offset, whence);
if (err)
errno = err;
return err;
}
int
_open(const char *buf, int flags, int mode)
{
int err ;
err = __syscall(SYS_open, buf, flags, mode);
if (err)
errno = err;
return err;
}
int
_write(int fd, const char *buf, int nbytes)
{
int err;
err = __syscall(SYS_write, fd, buf, nbytes);
if (err)
errno = err;
return err;
}
void
print(char *ptr)
{
char *p = ptr;
while (*p != '\0')
p++;
_write (1, ptr, p-ptr);
}
void
_raise (void)
{
return;
}
int
_read(int fd, char *buf, int nbytes)
{
int err;
err = __syscall(SYS_read, fd, buf, nbytes);
if (err)
errno = err;
return err;
}
extern char end[]; /* end is set in the linker command file */
char *heap_ptr;
char *
_sbrk (int nbytes)
{
char *base;
if (!heap_ptr)
heap_ptr = (char *)&end;
base = heap_ptr;
heap_ptr += nbytes;
return base;
}
clock_t
_times(struct tms * tp)
{
clock_t utime;
#ifdef HAVE_BSP_CLOCK
int err;
err = __syscall(SYS_utime, &utime);
if (err)
utime = 0;
#else
utime = 0;
#endif
if (tp) {
tp->tms_utime = utime;
tp->tms_stime = 0;
tp->tms_cutime = 0;
tp->tms_cstime = 0;
}
return utime;
}
int
_unlink (const char *pathname)
{
return -1;
}