163 lines
2.5 KiB
C
163 lines
2.5 KiB
C
|
/* FR30 system call emulation code
|
||
|
|
Copyright (C) 1998 Free Software Foundation, Inc.
|
||
|
|
Contributed by Cygnus Solutions.
|
||
|
|
|
||
|
|
This file is part of GNU CC.
|
||
|
|
|
||
|
|
GNU CC 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 2, or (at your option)
|
||
|
|
any later version.
|
||
|
|
|
||
|
|
GNU CC 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 GNU CC; see the file COPYING. If not, write to
|
||
|
|
the Free Software Foundation, 59 Temple Place - Suite 330,
|
||
|
|
Boston, MA 02111-1307, USA. */
|
||
|
|
|
||
|
|
#include <sys/stat.h>
|
||
|
|
#include "../syscall.h"
|
||
|
|
|
||
|
|
int
|
||
|
|
_read (file, ptr, len)
|
||
|
|
int file;
|
||
|
|
char * ptr;
|
||
|
|
int len;
|
||
|
|
{
|
||
|
|
asm ("ldi:8 %0, r0" :: "i" (SYS_read) : "r0");
|
||
|
|
asm ("int #10");
|
||
|
|
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
int
|
||
|
|
_lseek (file, ptr, dir)
|
||
|
|
int file;
|
||
|
|
int ptr;
|
||
|
|
int dir;
|
||
|
|
{
|
||
|
|
asm ("ldi:8 %0, r0" :: "i" (SYS_lseek) : "r0");
|
||
|
|
asm ("int #10");
|
||
|
|
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
int
|
||
|
|
_write (file, ptr, len)
|
||
|
|
int file;
|
||
|
|
char * ptr;
|
||
|
|
int len;
|
||
|
|
{
|
||
|
|
asm ("ldi:8 %0, r0" :: "i" (SYS_write) : "r0");
|
||
|
|
asm ("int #10");
|
||
|
|
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
int
|
||
|
|
_open (path, flags)
|
||
|
|
const char * path;
|
||
|
|
int flags;
|
||
|
|
{
|
||
|
|
asm ("ldi:8 %0, r0" :: "i" (SYS_open) : "r0");
|
||
|
|
asm ("int #10");
|
||
|
|
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
int
|
||
|
|
_close (file)
|
||
|
|
int file;
|
||
|
|
{
|
||
|
|
asm ("ldi:8 %0, r0" :: "i" (SYS_close) : "r0");
|
||
|
|
asm ("int #10");
|
||
|
|
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
void
|
||
|
|
_exit (n)
|
||
|
|
int n;
|
||
|
|
{
|
||
|
|
asm ("ldi:8 %0, r0" :: "i" (SYS_exit) : "r0");
|
||
|
|
asm ("int #10");
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
caddr_t
|
||
|
|
_sbrk (incr)
|
||
|
|
int incr;
|
||
|
|
{
|
||
|
|
extern char end asm ("_end"); /* Defined by the linker */
|
||
|
|
extern int __stack; /* Defined by linker script. */
|
||
|
|
static char * heap_end;
|
||
|
|
char * prev_heap_end;
|
||
|
|
|
||
|
|
if (heap_end == NULL)
|
||
|
|
heap_end = & end;
|
||
|
|
|
||
|
|
prev_heap_end = heap_end;
|
||
|
|
#if 0
|
||
|
|
if (heap_end + incr > __stack)
|
||
|
|
{
|
||
|
|
_write ( 1, "_sbrk: Heap and stack collision\n", 32);
|
||
|
|
abort ();
|
||
|
|
}
|
||
|
|
#endif
|
||
|
|
heap_end += incr;
|
||
|
|
|
||
|
|
return (caddr_t) prev_heap_end;
|
||
|
|
}
|
||
|
|
|
||
|
|
int
|
||
|
|
_fstat (file, st)
|
||
|
|
int file;
|
||
|
|
struct stat * st;
|
||
|
|
{
|
||
|
|
st->st_mode = S_IFCHR;
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
int
|
||
|
|
_unlink ()
|
||
|
|
{
|
||
|
|
return -1;
|
||
|
|
}
|
||
|
|
|
||
|
|
int
|
||
|
|
isatty (fd)
|
||
|
|
int fd;
|
||
|
|
{
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
int
|
||
|
|
_raise ()
|
||
|
|
{
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
int
|
||
|
|
_times ()
|
||
|
|
{
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
int
|
||
|
|
_kill (pid, sig)
|
||
|
|
int pid;
|
||
|
|
int sig;
|
||
|
|
{
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
int
|
||
|
|
_getpid (void)
|
||
|
|
{
|
||
|
|
return 0;
|
||
|
|
}
|