Retro68/gcc/libgloss/sparc/cygmon-salib.c
2012-03-27 01:51:53 +02:00

221 lines
2.6 KiB
C

#ifdef TARGET_CPU_SPARC64
#include <sys/types.h>
#endif
#include <sys/time.h>
void
putTtyChar(int c)
{
/* 2 is fork under solaris; bad juju */
asm(" mov %i0,%o0 \n\
or %g0,2,%g1 \n\
ta 8 \n\
nop");
}
int
write(int fd,char *ptr,int amt)
{
if (fd < 0 || fd > 2)
{
return -1;
}
asm(" or %g0, 4, %g1 \n\
ta 8 \n\
nop");
return amt;
}
int
read(int fd,char *ptr,int amt)
{
if (fd < 0 || fd > 2)
{
return -1;
}
asm(" or %g0, 3, %g1 \n\
ta 8 \n\
nop");
return amt;
}
void
_exit(int code)
{
while(1) {
asm(" or %g0,1,%g1 \n\
ta 8 \n\
nop \n\
ta 1 \n\
nop");
}
}
int
setitimer(int which, const struct itimerval *value, struct itimerval *ovalue)
{
asm(" or %g0, 158, %g1 \n\
ta 8 \n\
nop");
}
long
sbrk (unsigned long amt)
{
extern char _end;
static char *ptr = 0;
char *res;
if (ptr == 0)
ptr = &_end;
if (amt == 0)
return (long)ptr;
if (((long)ptr) % 8)
ptr = ptr + (8 - (((long)(ptr)) % 8));
res = ptr;
ptr += amt;
return (long)res;
}
#ifdef TARGET_CPU_SPARC64
long
_sbrk_r (void *foo, unsigned long amt)
{
return sbrk(amt);
}
long
_fstat_r (void *foo, void *bar, void *baz)
{
return -1;
}
long
_brk_r (void *foo)
{
return sbrk(0);
}
int
_open_r (char *filename, int mode)
{
return open (filename, mode);
}
int
_close_r (int fd)
{
return close(fd);
}
#endif
int
close (int fd)
{
return 0;
}
int
fstat(int des,void *buf)
{
return -1;
}
int
lseek(int des,unsigned long offset, int whence)
{
return -1;
}
int
isatty(int fd)
{
return (fd < 3);
}
int
kill (int pid, int signal)
{
asm ("or %g0, 37, %g1 \n\
ta 8 \n\
nop");
}
int
getpid ()
{
return -1;
}
int
getitimer (int which, struct itimerval *value)
{
asm ("or %g0, 157, %g1 \n\
ta 8 \n\
nop");
}
void
__install_signal_handler (void *func)
{
asm ("mov %o0, %o1 \n\
mov %g0, %o0 \n\
or %g0, 48, %g1 \n\
ta 8 \n\
nop");
}
int
gettimeofday (struct timeval *tp, void *tzp)
{
asm ("or %g0, 156, %g1 \n\
ta 8 \n\
nop");
}
int
stime (long *seconds)
{
asm ("or %g0, 25, %g1 \n\
ta 8 \n\
nop");
}
int
add_mapping (long vma, long pma, long size)
{
asm ("or %g0, 115, %g1 \n\
ta 8 \n\
nop");
}
int
remove_mapping (long vma, long vma_end)
{
asm ("or %g0, 117, %g1 \n\
ta 8 \n\
nop");
}
int
open (char *filename, int mode)
{
return -1;
}
void *
__getProgramArgs (int *argv)
{
int *res;
/* 184 is tsolsys under solaris; bad juju */
asm ("mov %1, %%o0 \n\
or %%g0, 184, %%g1 \n\
ta 8 \n\
nop \n\
mov %%o0, %0" : "=r" (res) : "r" (argv): "g1");
return res;
}