libc/libgloss/arm/libcfunc.c

89 lines
1.7 KiB
C

/* Support files for GNU libc. Files in the C namespace go here.
Files in the system namespace (ie those that start with an underscore)
go in syscalls.c.
Note: These functions are in a seperate file so that OS providers can
overrride the system call stubs (defined in syscalls.c) without having
to provide libc funcitons as well. */
#include "swi.h"
#include <errno.h>
#include <unistd.h>
#ifdef ARM_RDI_MONITOR
static inline int
do_AngelSWI (int reason, void * arg)
{
int value;
asm volatile ("mov r0, %1; mov r1, %2; " AngelSWIInsn " %a3; mov %0, r0"
: "=r" (value) /* Outputs */
: "r" (reason), "r" (arg), "i" (AngelSWI) /* Inputs */
: "r0", "r1", "lr"
/* Clobbers r0 and r1, and lr if in supervisor mode */);
return value;
}
#endif /* ARM_RDI_MONITOR */
void
abort (void)
{
extern void _exit (int n);
#ifdef ARM_RDI_MONITOR
do_AngelSWI (AngelSWI_Reason_ReportException,
(void *) ADP_Stopped_RunTimeError);
#else
_exit(17);
#endif
}
unsigned __attribute__((weak))
alarm (unsigned seconds)
{
(void)seconds;
return 0;
}
clock_t _clock(void);
clock_t __attribute__((weak))
clock(void)
{
return _clock();
}
int _isatty(int fildes);
int __attribute__((weak))
isatty(int fildes)
{
return _isatty(fildes);
}
int __attribute__((weak))
pause(void)
{
errno = ENOSYS;
return -1;
}
#include <sys/types.h>
#include <time.h>
unsigned __attribute__((weak))
sleep(unsigned seconds)
{
clock_t t0 = _clock();
clock_t dt = seconds * CLOCKS_PER_SEC;
while (_clock() - t0 < dt);
return 0;
}
int __attribute__((weak))
usleep(useconds_t useconds)
{
clock_t t0 = _clock();
clock_t dt = useconds / (1000000/CLOCKS_PER_SEC);
while (_clock() - t0 < dt);
return 0;
}