newlib/libc/sys/sh/syscalls.c

   1 #include <_ansi.h>
   2 #include <sys/types.h>
   3 #include <sys/stat.h>
   4 #include <sys/time.h>
   5 #include "sys/syscall.h"
   6 #include <errno.h>
   7 #undef errno
   8 extern int errno;
   9
  10 void abort (void) __attribute__((__noreturn__));
  11
  12 extern int __trap34 (int function, ...);
  13
  14 /* This is used by _sbrk.  */
  15 register char *stack_ptr asm ("r15");
  16
  17 extern int main (int, char**);
  18
  19 int
  20 _read (int file,
  21        char *ptr,
  22        int len)
  23 {
  24   return __trap34 (SYS_read, file, ptr, len);
  25 }
  26
  27 int
  28 _lseek (int file,
  29         int ptr,
  30         int dir)
  31 {
  32   return __trap34 (SYS_lseek, file, ptr, dir);
  33 }
  34
  35 int
  36 _write ( int file,
  37          char *ptr,
  38          int len)
  39 {
  40   return __trap34 (SYS_write, file, ptr, len);
  41 }
  42
  43 int
  44 _close (int file)
  45 {
  46   return __trap34 (SYS_close, file, 0, 0);
  47 }
  48
  49 int
  50 _link (char *old, char *new)
  51 {
  52   return -1;
  53 }
  54
  55 caddr_t
  56 _sbrk (int incr)
  57 {
  58   extern char end;              /* Defined by the linker */
  59   static char *heap_end;
  60   char *prev_heap_end;
  61
  62   if (heap_end == 0)
  63     {
  64       heap_end = &end;
  65     }
  66   prev_heap_end = heap_end;
  67   if (heap_end + incr > stack_ptr)
  68     {
  69       _write (1, "Heap and stack collision\n", 25);
  70       abort ();
  71     }
  72   heap_end += incr;
  73   return (caddr_t) prev_heap_end;
  74 }
  75
  76 int
  77 _fstat (int file,
  78         struct stat *st)
  79 {
  80   st->st_mode = S_IFCHR;
  81   return 0;
  82 }
  83
  84 int
  85 _open (const char *path,
  86         int flags)
  87 {
  88   return __trap34 (SYS_open, path, flags, 0);
  89 }
  90
  91 int
  92 _creat (const char *path,
  93         int mode)
  94 {
  95   return __trap34 (SYS_creat, path, mode, 0);
  96 }
  97
  98 int
  99 _unlink ()
 100 {
 101   return -1;
 102 }
 103
 104 int
 105 isatty (int fd)
 106 {
 107   return 1;
 108 }
 109
 110 int
 111 _isatty (int fd)
 112 {
 113   return 1;
 114 }
 115
 116 _ATTRIBUTE ((__noreturn__)) void
 117 _exit (int n)
 118 {
 119   __trap34 (SYS_exit, n, 0, 0);
 120 }
 121
 122 int
 123 _kill (int pid,
 124        int sig)
 125 {
 126   return __trap34 (SYS_exit, 0xdead, 0, 0);
 127 }
 128
 129 int
 130 _getpid ()
 131 {
 132   return 1;
 133 }
 134
 135 void
 136 _raise ()
 137 {
 138 }
 139
 140 int
 141 _stat (const char *path, struct stat *st)
 142
 143 {
 144   return __trap34 (SYS_stat, path, st, 0);
 145 }
 146
 147 int
 148 _chmod (const char *path, short mode)
 149 {
 150   return __trap34 (SYS_chmod, path, mode);
 151 }
 152
 153 int
 154 _chown (const char *path, short owner, short group)
 155 {
 156   return __trap34 (SYS_chown, path, owner, group);
 157 }
 158
 159 int
 160 _utime (const char *path,
 161         char *times)
 162 {
 163   return __trap34 (SYS_utime, path, times);
 164 }
 165
 166 int
 167 _fork ()
 168 {
 169   return __trap34 (SYS_fork);
 170 }
 171
 172 int
 173 _wait (int *statusp)
 174 {
 175   return __trap34 (SYS_wait);
 176 }
 177
 178 int
 179 _execve (const char *path, char *const argv[], char *const envp[])
 180 {
 181   return __trap34 (SYS_execve, path, argv, envp);
 182 }
 183
 184 int
 185 _execv (const char *path, char *const argv[])
 186 {
 187   return __trap34 (SYS_execv, path, argv);
 188 }
 189
 190 int
 191 _pipe (int *fd)
 192 {
 193   return __trap34 (SYS_pipe, fd);
 194 }
 195
 196 /* This is only provided because _gettimeofday_r and _times_r are
 197    defined in the same module, so we avoid a link error.  */
 198 clock_t
 199 _times (struct tms *tp)
 200 {
 201   return -1;
 202 }
 203
 204 int
 205 _gettimeofday (struct timeval *tv, void *tz)
 206 {
 207   tv->tv_usec = 0;
 208   tv->tv_sec = __trap34 (SYS_time);
 209   return 0;
 210 }
 211
 212 static inline int
 213 __setup_argv_for_main (int argc)
 214 {
 215   char **argv;
 216   int i = argc;
 217
 218   argv = __builtin_alloca ((1 + argc) * sizeof (*argv));
 219
 220   argv[i] = NULL;
 221   while (i--) {
 222     argv[i] = __builtin_alloca (1 + __trap34 (SYS_argnlen, i));
 223     __trap34 (SYS_argn, i, argv[i]);
 224   }
 225
 226   return main (argc, argv);
 227 }
 228
 229 int
 230 __setup_argv_and_call_main ()
 231 {
 232   int argc = __trap34 (SYS_argc);
 233
 234   if (argc <= 0)
 235     return main (argc, NULL);
 236   else
 237     return __setup_argv_for_main (argc);
 238 }