commit - a906f8181694a766e36e55c9f6917b6f2b44be16
commit + 28b38de889c28ccc6b2435687c449769964fb3b9
blob - e1dcf57e9f918953e13413b837526d8c5992b7ff
blob + 0fcace3e0ae1c76939fbc8d1ad79106c9290e4e6
--- Makefile
+++ Makefile
.POSIX:
+.SUFFIXES:
+.SUFFIXES: .c .S .o .elf
-CROSS = riscv32-unknown-linux-musl
-CFLAGS = -fno-PIC -O3
-LDFLAGS = -s -Wl,--image-base,0x78000000 -no-pie -static -lpthread -lutil
+CROSS = riscv32-unknown-linux-musl
+CFLAGS = -fno-PIC -O3
+LDFLAGS = -s -Wl,--image-base,0x78000000 -no-pie -static -lpthread -lutil
+OBJ = rvemu.o syscall.o cpu.o exec.o
+PROGS = test.elf hello.elf
-all: rvemu test.elf
+all: rvemu ${PROGS}
clean:
- rm -f rvemu test.o test.elf *.core
+ rm -f rvemu *.o test.elf *.core
run: rvemu test.elf
./rvemu test.elf
-test.o: test.S
- ${CROSS}-as -o test.o test.S
-test.elf: test.o test.ld
- ${CROSS}-ld -s -T test.ld -o test.elf test.o
+rvemu: ${OBJ}
+ ${CC} -o $@ ${OBJ} ${LDFLAGS}
+
+.c.o: rvemu.h
+ ${CC} -c -o $@ $< ${CFLAGS}
+
+
+.S.o:
+ ${CROSS}-as -o $@ $<
+
+.o.elf: linker.ld
+ ${CROSS}-ld -s -T linker.ld -o $@ $<
blob - /dev/null
blob + 0124be0d0399890d4e4aa77f2999f84e02b39223 (mode 644)
--- /dev/null
+++ .gitignore
+*.swp
+*.core
+*.o
+*.elf
+
blob - a11261750e131eaf4e04ca1386ecc82b41631c7b
blob + 10f6646bd6ae37bf7de1a9d35d7eccec7fbf3f7d
--- rvemu.c
+++ rvemu.c
#include <sys/resource.h>
-#include <sys/utsname.h>
-#include <sys/stat.h>
#include <sys/mman.h>
-#include <sys/msg.h>
-#include <sys/sem.h>
-#include <libelf.h>
#include <unistd.h>
#include <string.h>
#include <stdlib.h>
-#include <stdint.h>
-#include <signal.h>
#include <assert.h>
-#include <sched.h>
-#include <stdio.h>
+#include <libgen.h>
#include <fcntl.h>
#include <errno.h>
-#include <err.h>
+#include "rvemu.h"
-typedef uint8_t u8;
-typedef uint16_t u16;
-typedef uint32_t u32;
-typedef uint64_t u64;
-
-typedef int8_t i8;
-typedef int16_t i16;
-typedef int32_t i32;
-typedef int64_t i64;
-
-typedef unsigned int uint;
-
-#define DEBUG 0
-
-#if DEBUG
-# define eprintf(...) fprintf (stderr, __VA_ARGS__)
-#else
-# define eprintf(...)
-#endif
-
-struct cpu {
- u32 regs[31];
- u32 pc;
-};
-
-static u32 cpu_get (const struct cpu *cpu, u8 reg)
-{
- return reg == 0 ? 0 : cpu->regs[reg - 1];
-}
-
-static void cpu_set (struct cpu *cpu, u8 reg, u32 val)
-{
- if (reg != 0)
- cpu->regs[reg - 1] = val;
-}
-
-static u32 cpu_fetch (struct cpu *cpu)
-{
- const u32 i = *(const u32 *)(size_t)cpu->pc;
- //eprintf ("%08x: %08x\n", cpu->pc, i);
- cpu->pc += 4;
- return i;
-}
-
-static int map_errno (int err)
-{
- const int errnos[] = {
- [EPERM] = 1,
- [ENOENT] = 2,
- [ESRCH] = 3,
- [EINTR] = 4,
- [EIO] = 5,
- [ENXIO] = 6,
- [E2BIG] = 7,
- [ENOEXEC] = 8,
- [EBADF] = 9,
- [ECHILD] = 10,
- [EAGAIN] = 11,
- [ENOMEM] = 12,
- [EACCES] = 13,
- [EFAULT] = 14,
- [ENOTBLK] = 15,
- [EBUSY] = 16,
- [EEXIST] = 17,
- [EXDEV] = 18,
- [ENODEV] = 19,
- [ENOTDIR] = 20,
- [EISDIR] = 21,
- [EINVAL] = 22,
- [ENFILE] = 23,
- [EMFILE] = 24,
- [ENOTTY] = 25,
- [ETXTBSY] = 26,
- [EFBIG] = 27,
- [ENOSPC] = 28,
- [ESPIPE] = 29,
- [EROFS] = 30,
- [EMLINK] = 31,
- [EPIPE] = 32,
- [EDOM] = 33,
- [ERANGE] = 34,
- [EDEADLK] = 35,
- [ENAMETOOLONG] = 36,
- [ENOLCK] = 37,
- [ENOSYS] = 38,
- };
- return errnos[err];
-}
-
-static int map (int x) {
- return x < 0 ? -map_errno (errno) : x;
-}
-
-/*
-struct linux_stat {
- u64 dev;
- u64 ino;
- u32 mode;
- u32 nlink;
- u32 uid;
- u32 gid;
- u64 rdev;
- u64 __pad1;
- u32 size;
- u32 blksize;
- u32 __pad2;
- u32 blocks;
- u32 atime;
- u32 atime_ns;
- u32 mtime;
- u32 mtime_ns;
- u32 ctime;
- u32 ctime_ns;
- u32 __unused4;
- u32 __unused5;
-};
-*/
-
-struct linux_stat64 {
- u64 dev;
- u64 ino;
- u32 mode;
- u32 nlink;
- u32 uid;
- u32 gid;
- u64 rdev;
- u64 __pad1;
- u64 size;
- u32 blksize;
- u32 __pad2;
- u64 blocks;
- u32 atime;
- u32 atime_ns;
- u32 mtime;
- u32 mtime_ns;
- u32 ctime;
- u32 ctime_ns;
- u32 __unused4;
- u32 __unused5;
-};
-
-struct linux_utsname {
- char sysname[65];
- char nodename[65];
- char release[65];
- char version[65];
- char machine[65];
-};
-
-static void stat_to_linux_stat (struct linux_stat64 *lst, const struct stat *st)
-{
- memset (lst, 0, sizeof (*lst));
- lst->dev = st->st_dev;
- lst->ino = st->st_dev;
- lst->mode = st->st_dev;
- lst->nlink = st->st_dev;
- lst->uid = st->st_dev;
- lst->gid = st->st_dev;
- lst->rdev = st->st_dev;
- lst->size = st->st_dev;
- lst->blksize = st->st_dev;
- lst->blocks = st->st_dev;
- lst->atime = st->st_atim.tv_sec;
- lst->atime_ns = st->st_atim.tv_nsec;
- lst->mtime = st->st_mtim.tv_sec;
- lst->mtime_ns = st->st_mtim.tv_nsec;
- lst->ctime = st->st_ctim.tv_sec;
- lst->ctime_ns = st->st_ctim.tv_nsec;
-}
-
-static void utsname_to_linux_utsname (struct linux_utsname *lun, const struct utsname *un)
-{
- memset (lun, 0, sizeof (*lun));
- strlcpy (lun->sysname, un->sysname, 65);
- strlcpy (lun->nodename, un->nodename, 65);
- strlcpy (lun->release, un->release, 65);
- strlcpy (lun->version, un->version, 65);
- strlcpy (lun->machine, un->machine, 65);
-}
-
-static int enosys (const char *sys)
-{
- warnx ("unimplemented syscall: %s", sys);
- return -map_errno (ENOSYS);
-}
-
-static int my_execve (const char *path, char **argv, char **envp)
-{
- return -enosys ("execve");
-}
-
-#define ptr(T, x) ((T *)(size_t)(x))
-#define str(x) ptr (const char, x)
-static void ecall (struct cpu *cpu)
-{
- struct linux_stat64 lst;
- struct linux_utsname lun;
- struct stat st;
- struct utsname un;
- void *ptr;
- const u32 a0 = cpu_get (cpu, 10);
- const u32 a1 = cpu_get (cpu, 11);
- const u32 a2 = cpu_get (cpu, 12);
- const u32 a3 = cpu_get (cpu, 13);
- const u32 a4 = cpu_get (cpu, 14);
- const u32 a5 = cpu_get (cpu, 15);
- const u32 a7 = cpu_get (cpu, 17);
- u32 ret;
- switch (a7) {
- case 17: // getcwd
- ret = enosys ("getcwd");
- break;
- case 23: // dup
- ret = map (dup ((int)a0));
- break;
- case 24: // dup3
- ret = map (dup3 ((int)a0, (int)a1, (int)a2));
- break;
- case 25: // fcntl
- ret = enosys ("fcntl");
- break;
- case 29: // ioctl
- ret = enosys ("ioctl");
- break;
- case 32: // flock
- ret = map (flock ((int)a0, (int)a1));
- break;
- case 33: // mknodat
- ret = map (mknodat ((int)a0, str (a1), (mode_t)a2, (dev_t)a3));
-
- case 34: // mkdirat
- ret = map (mkdirat ((int)a0, str (a1), (mode_t)a2));
- break;
- case 35: // unlinkat
- ret = map (unlinkat ((int)a0, str (a1), (int)a2));
- break;
- case 36: // symlinkat
- ret = map (symlinkat (str (a0), (int)a1, str (a2)));
- break;
- case 37: // linkat
- ret = map (linkat ((int)a0, str (a1), (int)a2, str (a3), (int)a4));
- break;
- case 38: // renameat
- ret = map (renameat ((int)a0, str (a1), (int)a2, str (a3)));
- break;
- case 39: // umount
- ret = enosys ("umount");
- break;
- case 40: // mount
- ret = enosys ("mount");
- break;
- case 41: // pivot_root
- ret = enosys ("pivot_root");
- break;
- case 42: // nfsservctl
- ret = enosys ("nfsservctl");
- break;
- case 43: // statfs
- ret = enosys ("statfs");
- break;
- case 44: // fstatfs
- ret = enosys ("fstatfs");
- break;
- case 45: // truncate
- ret = map (truncate (str (a0), (off_t)a1));
- break;
- break;
- case 46: // ftruncate
- ret = map (ftruncate ((int)a0, (off_t)a1));
- break;
- case 47: // fallocate
- ret = enosys ("fallocate");
- break;
- case 48: // faccessat
- ret = map (faccessat ((int)a0, str (a1), (int)a2, (int)a3));
- break;
- case 49: // chdir
- ret = map (chdir (str (a0)));
- break;
- case 50: // fchdir
- ret = map (fchdir ((int)a0));
- break;
- case 51: // chroot
- ret = map (chroot (str (a0)));
- break;
- case 52: // fchmod
- ret = map (fchmod ((int)a0, (mode_t)a1));
- break;
- case 53: // fchmodat
- ret = map (fchmodat ((int)a0, str (a1), (mode_t)a2, (int)a3));
- break;
- case 54: // fchownat
- ret = map (fchownat ((int)a0, str (a1), (uid_t)a2, (gid_t)a3, (int)a4));
- break;
- case 55: // fchown
- ret = map (fchown ((int)a0, (uid_t)a1, (gid_t)a2));
- break;
- case 56: // openat
- ret = map (openat ((int)a0, str (a1), (int)a2, (int)a3));
- break;
- case 57: // close
- ret = map (close ((int)a0));
- break;
- case 58: // vhangup
- ret = enosys ("vhangup");
- break;
- case 59: // pipe2
- ret = map (pipe2 (ptr (int, a0), (int)a1));
- break;
- case 60: // quotactl
- ret = enosys ("quotactl");
- break;
- case 61: // getdents64
- ret = enosys ("getdents64");
- break;
- case 62: // lseek
- ret = map (lseek ((int)a0, (off_t)a1, (int)a2));
- break;
- case 63: // read
- ret = map (read ((int)a0, ptr (void, a1), (size_t)a2));
- break;
- case 64: // write
- ret = map (write ((int)a0, ptr (const void, a1), (size_t)a2));
- break;
- case 65: // readv
- ret = enosys ("readv");
- break;
- case 66: // writev
- ret = enosys ("writev");
- break;
- case 67: // pread
- ret = map (pread ((int)a0, ptr (void, a1), (size_t)a2, (off_t)a3));
- break;
- case 68: // pwrite
- ret = map (pwrite ((int)a0, ptr (const void, a1), (size_t)a2, (off_t)a3));
- break;
- case 69: // preadv
- ret = enosys ("preadv");
- break;
- case 70: // pwritev
- ret = enosys ("pwritev");
- break;
- case 71: // pwritev
- ret = enosys ("sendfile");
- break;
- case 72: // pselect6
- ret = enosys ("pselect6");
- break;
- case 73: // ppoll
- ret = enosys ("ppoll");
- break;
- case 74: // signalfd4
- ret = enosys ("signalfd4");
- break;
- case 75: // vmsplice
- ret = enosys ("vmsplice");
- break;
- case 76: // splice
- ret = enosys ("splice");
- break;
- case 77: // tee
- ret = enosys ("tee");
- break;
- case 78: // readlinkat
- ret = map (readlinkat ((int)a0, str (a1), ptr (char, a2), (size_t)a3));
- break;
- case 79: // fstatat
- ret = map (fstatat ((int)a0, str (a1), &st, (int)a3));
- stat_to_linux_stat (&lst, &st);
- memcpy (ptr (void, a2), &lst, sizeof (lst));
- break;
- case 80: // fstat
- ret = map (fstat ((int)a0, &st));
- stat_to_linux_stat (&lst, &st);
- memcpy (ptr (void, a1), &lst, sizeof (lst));
- break;
- case 81: // sync
- sync ();
- ret = 0;
- break;
- case 82: // fsync
- ret = map (fsync ((int)a0));
- break;
- case 83: // fdatasync
- ret = map (fdatasync ((int)a0));
- break;
- case 84: // sync_file_range
- ret = enosys ("sync_file_range");
- break;
- case 85: // timerfd_create
- ret = enosys ("timerfd_create");
- break;
- case 86: // timerfd_settime
- ret = enosys ("timerfd_settime");
- break;
- case 87: // timerfd_gettime
- ret = enosys ("timerfd_gettime");
- break;
- case 88: // utimensat
- ret = enosys ("utimensat");
- break;
- case 89: // acct
- ret = acct (str (a0));
- break;
- case 90: // capget
- ret = enosys ("capget");
- break;
- case 91: // capset
- ret = enosys ("capset");
- break;
- case 92: // personality
- ret = enosys ("personality");
- break;
- case 93: // exit
- exit (a0);
- ret = -1;
- break;
- case 94: // exit_group
- ret = enosys ("exit_group");
- break;
- case 95: // waitid
- ret = enosys ("waitid");
- break;
- case 96: // set_tid_address
- ret = enosys ("set_tid_address");
- break;
- case 97: // unshare
- ret = enosys ("unshare");
- break;
- case 98: // futex
- ret = enosys ("futex");
- break;
- case 99: // set_robust_limit
- ret = enosys ("set_robust_limit");
- break;
- case 100: // get_robust_limit
- ret = enosys ("get_robust_limit");
- break;
- case 101: // nanosleep
- ret = enosys ("nanosleep");
- break;
- case 102: // gettimer
- ret = enosys ("gettimer");
- break;
- case 103: // settimer
- ret = enosys ("settimer");
- break;
- case 104: // kexec_load
- ret = enosys ("kexec_load");
- break;
- case 105: // kexec_init_module
- ret = enosys ("kexec_init_module");
- break;
- case 106: // kexec_delete_module
- ret = enosys ("kexec_delete_module");
- break;
- case 107: // timer_create
- ret = enosys ("timer_create");
- break;
- case 108: // timer_gettime
- ret = enosys ("timer_gettime");
- break;
- case 109: // timer_getoverrun
- ret = enosys ("timer_getoverrun");
- break;
- case 110: // timer_settime
- ret = enosys ("timer_settime");
- break;
- case 111: // timer_delete
- ret = enosys ("timer_delete");
- break;
- case 112: // clock_settime
- ret = enosys ("clock_settime");
- break;
- case 113: // clock_gettime
- ret = enosys ("clock_gettime");
- break;
- case 114: // clock_getres
- ret = enosys ("clock_getres");
- break;
- case 115: // clock_nanosleep
- ret = enosys ("clock_nanosleep");
- break;
- case 116: // syslog
- ret = enosys ("syslog");
- break;
- case 117: // ptrace
- ret = enosys ("ptrace");
- break;
- case 118: // sched_setparam
- ret = enosys ("sched_setparam");
- break;
- case 119: // sched_setscheduler
- ret = enosys ("sched_setscheduler");
- break;
- case 120: // sched_getscheduler
- ret = enosys ("sched_getscheduler");
- break;
- case 121: // sched_getparam
- ret = enosys ("sched_getparam");
- break;
- case 122: // sched_setaffinity
- ret = enosys ("sched_setaffinity");
- break;
- case 123: // sched_getaffinity
- ret = enosys ("sched_getaffinity");
- break;
- case 124: // sched_yield
- ret = map (sched_yield ());
- break;
- case 125: // sched_get_priority_max
- ret = map (sched_get_priority_max ((int)a0));
- break;
- case 126: // sched_get_priority_min
- ret = map (sched_get_priority_min ((int)a0));
- break;
- case 127: // sched_rr_get_interval
- ret = enosys ("sched_rr_get_interval");
- break;
- case 128: // restart_syscall
- ret = enosys ("restart_syscall");
- break;
- case 129: // kill
- ret = map (kill ((pid_t)a0, (int)a1));
- break;
- case 130: // tkill
- ret = enosys ("tkill");
- break;
- case 131: // tgkill
- ret = enosys ("tgkill");
- break;
- case 132: // signalstack
- ret = enosys ("signalstack");
- break;
- case 133: // sigaction
- ret = enosys ("sigaction");
- break;
- case 134: // sigaction
- ret = enosys ("sigaction");
- break;
- case 135: // rt_sigprocmask
- ret = enosys ("rt_sigprocmask");
- break;
- case 136: // sigpending
- ret = enosys ("sigpending");
- break;
- case 137: // sigtimedwait
- ret = enosys ("sigtimedwait");
- break;
- case 138: // sigqueueinfo
- ret = enosys ("sigqueueinfo");
- break;
- case 139: // sigreturn
- ret = enosys ("sigreturn");
- break;
- case 140: // setpriority
- ret = map (setpriority ((int)a0, (id_t)a1, (int)a2));
- break;
- case 141: // getpriority
- ret = map (getpriority ((int)a0, (id_t)a1));
- break;
- case 142: // reboot
- ret = enosys ("reboot");
- break;
- case 143: // setregid
- ret = map (setregid ((gid_t)a0, (gid_t)a1));
- break;
- case 144: // setgid
- ret = map (setgid ((gid_t)a0));
- break;
- case 145: // setreuid
- ret = map (setreuid ((uid_t)a0, (uid_t)a1));
- break;
- case 146: // setuid
- ret = map (setuid ((uid_t)a0));
- break;
- case 147: // setresuid
- ret = map (setresuid ((uid_t)a0, (uid_t)a1, (uid_t)a2));
- break;
- case 148: // getresuid
- ret = map (getresuid (ptr (uid_t, a0), ptr (uid_t, a1), ptr (uid_t, a2)));
- break;
- case 149: // setresgid
- ret = map (setresgid ((gid_t)a0, (gid_t)a1, (gid_t)a2));
- break;
- case 150: // getresgid
- ret = map (getresgid (ptr (gid_t, a0), ptr (gid_t, a1), ptr (gid_t, a2)));
- break;
- case 151: // setfsuid
- ret = enosys ("setfsuid");
- break;
- case 152: // setfsgid
- ret = enosys ("setfsgid");
- break;
- case 153: // times
- ret = enosys ("times");
- break;
- case 154: // setpgid
- ret = map (setpgid ((pid_t)a0, (pid_t)a1));
- break;
- case 155: // getpgid
- ret = map (getpgid ((pid_t)a0));
- break;
- case 156: // getsid
- ret = map (getsid ((pid_t)a0));
- break;
- case 158: // setsid
- ret = map (setsid ());
- break;
- case 159: // setgroups
- ret = enosys ("setgroups");
- break;
- case 160: // uname
- ret = map (uname (&un));
- utsname_to_linux_utsname (&lun, &un);
- memcpy (ptr (void, a0), &lun, sizeof (lun));
- break;
- case 161: // sethostname
- ret = enosys ("sethostname");
- break;
- case 162: // setdomainname
- ret = enosys ("setdomainname");
- break;
- case 163: // getrlimit
- ret = enosys ("getrlimit");
- break;
- case 164: // setrlimit
- ret = enosys ("setrlimit");
- break;
- case 165: // getrusage
- ret = enosys ("getrusage");
- break;
- case 166: // umask
- ret = map (umask ((mode_t)a0));
- break;
- case 167: // prctl
- ret = enosys ("prctl");
- break;
- case 168: // getcpu
- ret = enosys ("getcpu");
- break;
- case 169: // gettimeofday
- ret = enosys ("gettimeofday");
- break;
- case 170: // settimeofday
- ret = enosys ("settimeofday");
- break;
- case 171: // adjtimex
- ret = enosys ("adjtimex");
- break;
- case 172: // getpid
- ret = map (getpid ());
- break;
- case 174: // getuid
- ret = map (getuid ());
- break;
- case 175: // geteuid
- ret = map (geteuid ());
- break;
- case 176: // getgid
- ret = map (getgid ());
- break;
- case 177: // getegid
- ret = map (getegid ());
- break;
- case 178: // gettid
- ret = enosys ("gettid");
- break;
- case 179: // sysinfo
- ret = enosys ("sysinfo");
- break;
- case 180:
- case 181:
- case 182:
- case 183:
- case 184:
- case 185:
- ret = enosys ("mq_*");
- break;
- case 186: // msgget
- ret = map (msgget ((key_t)a0, (int)a1));
- break;
- case 187: // msgctl
- ret = enosys ("msgctl");
- break;
- case 188: // msgrcv
- ret = map (msgrcv ((int)a0, ptr (void, a1), (size_t)a2, (long)a3, (int)a4));
- break;
- case 189: // msgsnd
- ret = map (msgsnd ((int)a0, ptr (const void, a1), (size_t)a2, (int)a3));
- break;
- case 190: // semget
- ret = map (semget ((key_t)a0, (int)a1, (int)a2));
- break;
- case 191: // semctl
- ret = enosys ("semctl");
- break;
- case 192: // semtimedop
- ret = enosys ("semtimedop");
- break;
- case 193: // semop
- ret = enosys ("semop");
- break;
- case 194:
- case 195:
- case 196:
- case 197:
- ret = enosys ("shm*");
- break;
- case 198:
- case 199:
- case 200:
- case 201:
- case 202:
- case 203:
- case 204:
- case 205:
- case 206:
- case 207:
- case 208:
- case 209:
- case 210:
- case 211:
- case 212:
- ret = enosys ("socket api");
- break;
- case 213: // readahead
- ret = enosys ("readahead");
- break;
- case 214: // brk
- ret = map (brk ((void *)(size_t)a0));
- break;
- case 215: // munmap
- ret = map (munmap (ptr (void, a0), (size_t)a1));
- break;
- case 216: // mremap
- ret = enosys ("mremap");
- break;
- case 217: // add_key
- ret = enosys ("add_key");
- break;
- case 218: // request_key
- ret = enosys ("request_key");
- break;
- case 219: // keyctl
- ret = enosys ("keyctl");
- break;
- case 220: // clone
- ret = enosys ("clone");
- break;
- case 221: // execve
- ret = my_execve (str (a0), ptr (char *, a1), ptr (char *, a2));
- break;
- case 222: // mmap
- ptr = mmap (ptr (void, a0), (size_t)a1, (int)a2, (int)a3, (int)a4, (off_t)a5);
- if (ptr == NULL) {
- ret = -map_errno (errno);
- } else if ((size_t)ptr > INT32_MAX) {
- ret = -map_errno (EINVAL);
- } else {
- ret = (size_t)ptr;
- }
- break;
- case 223: // fadvise64
- ret = enosys ("fadvise64");
- break;
- case 224: // swapon
- ret = enosys ("swapon");
- break;
- case 225: // swapoff
- ret = enosys ("swapoff");
- break;
- case 226: // mprotect
- ret = map (mprotect (ptr (void, a0), (size_t)a1, (int)a2));
- break;
- case 227: // msync
- ret = map (msync (ptr (void, a0), (size_t)a1, (int)a2));
- break;
- case 228: // mlock
- ret = map (mlock (ptr (void, a0), (size_t)a1));
- break;
- case 229: // munlock
- ret = map (munlock (ptr (void, a0), (size_t)a1));
- break;
- case 230: // mlockall
- ret = map (mlockall ((int)a0));
- break;
- case 231: // munlockall
- ret = map (munlockall ());
- break;
- case 232: // mincore
- ret = enosys ("mincore");
- break;
- case 233: // madvise
- ret = map (madvise (ptr (void, a0), (size_t)a1, (int)a2));
- break;
- case 234: // remap_file_pages
- ret = enosys ("remap_file_pages");
- break;
- case 235: // mbind
- ret = enosys ("mbind");
- break;
- case 236: // get_mempolicy
- ret = enosys ("get_mempolicy");
- break;
- case 237: // set_mempolicy
- ret = enosys ("set_mempolicy");
- break;
- case 238: // migrate_pages
- ret = enosys ("migrate_pages");
- break;
- case 239: // move_pages
- ret = enosys ("move_pages");
- break;
- case 240: // rt_tgsigqueueinfo
- ret = enosys ("rt_tgsigqueueinfo");
- break;
- case 241: // perf_event_open
- ret = enosys ("perf_event_open");
- break;
- case 242: // accept4
- ret = enosys ("accept4");
- break;
- case 243: // recvmsg
- ret = enosys ("recvmsg");
- break;
- case 244:
- case 245:
- case 246:
- case 247:
- case 248:
- case 249:
- case 250:
- case 251:
- case 252:
- case 253:
- case 254:
- case 255:
- case 256:
- case 257:
- case 258:
- case 259:
- ret = enosys ("arch-specific");
- break;
- case 260:
- ret = enosys ("wait4");
- break;
- case 261: // prlimit64
- ret = enosys ("prlimit64");
- break;
- case 262: // fanotify_init
- ret = enosys ("fanotify_init");
- break;
- case 263: // fanotify_mark
- ret = enosys ("fanotify_mark");
- break;
- case 264: // name_to_handle_at
- ret = enosys ("name_to_handle_at");
- break;
- case 265: // open_by_handle_at
- ret = enosys ("open_by_handle_at");
- break;
- case 266: // clock_adjtime
- ret = enosys ("clock_adjtime");
- break;
- case 267: // syncfs
- ret = enosys ("syncfs");
- break;
- case 268: // setns
- ret = enosys ("setns");
- break;
- case 269: // sendmsg
- ret = enosys ("sendmsg");
- break;
- case 270: // process_vm_readv
- ret = enosys ("process_vm_readv");
- break;
- case 271: // process_vm_writev
- ret = enosys ("process_vm_writev");
- break;
- case 272: // kcmp
- ret = enosys ("kcmp");
- break;
- case 273: // finit_module
- ret = enosys ("finit_module");
- break;
- case 274: // sched_setattr
- ret = enosys ("sched_setattr");
- break;
- case 275: // sched_getattr
- ret = enosys ("sched_getattr");
- break;
- case 276: // renameat2
- ret = enosys ("renameat2");
- break;
- case 277: // seccomp
- ret = enosys ("seccomp");
- break;
- case 278: // getrandom
- ret = enosys ("getrandom");
- break;
- case 279: // memfd_create
- ret = enosys ("seccomp");
- break;
- case 280: // bpf
- ret = enosys ("bpf");
- break;
- case 281: // execveat
- ret = enosys ("execveat");
- break;
- case 282: // userfaultfd
- ret = enosys ("usefaultfd");
- break;
- case 283: // membarrier
- ret = enosys ("membarrier");
- break;
- case 284: // mlock2
- ret = enosys ("mlock2");
- break;
- case 285: // copy_file_range
- ret = enosys ("copy_file_range");
- break;
- case 286: // preadv2
- ret = enosys ("preadv2");
- break;
- case 287: // pwritev2
- ret = enosys ("pwritev2");
- break;
- case 288: // pkey_mprotect
- ret = enosys ("pkey_mprotect");
- break;
- case 289: // pkey_alloc
- ret = enosys ("pkey_alloc");
- break;
- case 290: // pkey_free
- ret = enosys ("pkey_free");
- break;
- case 291: // statx
- ret = enosys ("statx");
- break;
- case 292: // io_pgetevents
- ret = enosys ("io_pgetevents");
- break;
- case 293: // rseq
- ret = enosys ("rseq");
- break;
- case 294: // kexec_file_load
- ret = enosys ("kexec_file_load");
- break;
- case 1024: // open
- ret = map (open ((const char *)(size_t)a0, (int)a1, (int)a2));
- break;
- case 1025: // link
- ret = map (link (str (a0), str (a1)));
- break;
- case 1026: // unlink
- ret = map (unlink (str (a0)));
- break;
- case 1030: // mkdir
- ret = map (mkdir (str (a0), (mode_t)a1));
- break;
- case 1033: // access
- ret = map (access (str (a0), (int)a1));
- break;
- case 1038: // stat
- ret = map (stat (str (a0), &st));
- stat_to_linux_stat (&lst, &st);
- memcpy (ptr (void, a1), &lst, sizeof (lst));
- break;
- case 1039: // lstat
- ret = map (lstat (str (a0), &st));
- stat_to_linux_stat (&lst, &st);
- memcpy (ptr (void, a1), &lst, sizeof (lst));
- break;
- case 1062: // time
- ret = enosys ("time");
- break;
- case 2011: // getmainvars
- ret = enosys ("getmainvars");
- break;
- case 2048:
- fprintf (stderr, "DEBUG: %u\n", a0);
- ret = 0;
- break;
- default:
- warnx ("%08x: unimplemented syscall %u", cpu->pc - 4, a7);
- ret = -map_errno (ENOSYS);
- break;
- }
- cpu_set (cpu, 10, ret);
-}
-
-static void cpu_exec (struct cpu *cpu, u32 instr)
-{
- const char *name;
- const u8 rd = (instr >> 7) & 0x1f;
- const u8 funct3 = (instr >> 12) & 0x7;
- const u8 rs1 = (instr >> 15) & 0x1f;
- const u8 rs2 = (instr >> 20) & 0x1f;
- const u8 funct7 = instr >> 25;
- const u32 imm_i = (i32)instr >> 20;
- const u32 imm_s = ((i32)instr >> 25 << 5) | ((instr >> 7) & 0x1f);
- const u32 imm_b = (instr >> 31 << 12)
- | (((instr >> 25) & 0x3f) << 5)
- | (((instr >> 8) & 0xf) << 1)
- | (((instr >> 7) & 1) << 11);
- const u32 imm_u = instr & 0xfffff000;
- const u32 imm_j = ((i32)instr >> 31 << 20)
- | (((instr >> 21) & 0x3ff) << 1)
- | (((instr >> 20) & 1) << 11)
- | (((instr >> 12) & 0xff) << 12);
+const char *interpreter = "./rvemu";
+u32 brkval;
- u32 a, b, c;
- switch (instr & 0x7f) {
- case 0b0110111: // lui rd, uimm
- eprintf ("lui x%u, %u\n", (uint)rd, imm_u);
- cpu_set (cpu, rd, imm_u);
- break;
- case 0b0010111: // auipc rd, uimm
- eprintf ("auipc x%u, %u\n", (uint)rd, imm_u);
- cpu_set (cpu, rd, cpu->pc + imm_u - 4);
- break;
- case 0b1101111: // jal rd, jimm
- eprintf ("jal x%u, %d\n", (uint)rd, (int)imm_j);
- cpu_set (cpu, rd, cpu->pc);
- cpu->pc += imm_j - 4;
- break;
- case 0b1100111: // jalr rd, rs1, iimm
- if (funct3 != 0b000)
- goto ud;
- eprintf ("jalr x%u, x%u, %d\n", (uint)rd, (uint)rs1, (int)imm_i);
- cpu_set (cpu, rd, cpu->pc);
- cpu->pc = cpu_get (cpu, rs1);
- break;
- case 0b1100011: // bcc rs1, rs2, bimm
- a = cpu_get (cpu, rs1);
- b = cpu_get (cpu, rs2);
- switch (funct3) {
- case 0b000:
- name = "beq";
- c = a == b;
- break;
- case 0b001:
- name = "bne";
- c = a != b;
- case 0b100:
- name = "blt";
- c = (i32)a < (i32)b;
- break;
- case 0b101:
- name = "bge";
- c = (i32)a >= (i32)b;
- break;
- case 0b110:
- name = "bltu";
- c = a < b;
- break;
- case 0b111:
- name = "bgeu";
- c = a >= b;
- break;
- default:
- goto ud;
- }
- eprintf ("%s x%u, x%u, %d\n", name, (uint)rs1, (uint)rs2, (int)imm_b);
- if (c)
- cpu->pc += imm_b - 4;
- break;
- case 0b0000011: // lx rd, iimm(rs1)
- a = cpu_get (cpu, rs1) + imm_i;
- switch (funct3) {
- case 0b000: // lb
- name = "lb";
- b = (i32)*(const i8 *)(size_t)a;
- break;
- case 0b001: // lh
- name = "lh";
- b = (i32)*(const i16 *)(size_t)a;
- break;
- case 0b010: // lw
- name = "lw";
- b = *(const u32 *)(size_t)a;
- break;
- case 0b100: // lbu
- name = "lbu";
- b = (u32)*(const u8 *)(size_t)a;
- break;
- case 0b101: // lhu
- name = "lhu";
- b = (u32)*(const u16 *)(size_t)a;
- break;
- default:
- goto ud;
- }
- eprintf ("%s x%u, %d(x%u)\n", name, (uint)rd, (int)imm_i, (uint)rs1);
- cpu_set (cpu, rd, b);
- break;
- case 0b0100011: // sx rs2, simm(rs1)
- a = cpu_get (cpu, rs2);
- b = cpu_get (cpu, rs1) + imm_s;
- switch (funct3) {
- case 0b000: // sb
- name = "sb";
- *(u8 *)(size_t)b = a;
- break;
- case 0b001: // sh
- name = "sh";
- *(u16 *)(size_t)b = a;
- break;
- case 0b010: // sw
- name = "sw";
- *(u32 *)(size_t)b = a;
- break;
- default:
- goto ud;
- }
- eprintf ("%s x%u, %d(x%u)\n", name, (uint)rs2, (int)imm_s, (uint)rs1);
- break;
- case 0b0010011: // alui rd, rs1, iimm
- a = cpu_get (cpu, rs1);
- b = imm_i;
- switch (funct3) {
- case 0b000: // addi
- name = "addi";
- c = a + b;
- break;
- case 0b001: // slli
- name = "slli";
- c = a << (b & 0x1f);
- break;
- case 0b010: // slti
- name = "slti";
- c = (i32)a < (i32)b;
- break;
- case 0b011: // sltiu
- name = "sltiu";
- c = a < b;
- break;
- case 0b100: // xori
- name = "xori";
- c = a ^ b;
- break;
- case 0b101: // srli/srai
- if ((instr >> 30) & 1) {
- name = "srai";
- c = (i32)a >> b;
- } else {
- name = "srli";
- c = a >> b;
- }
- break;
- case 0b110: // ori
- name = "ori";
- c = a | b;
- break;
- case 0b111: // andi
- name = "andi";
- c = a & b;
- break;
- default:
- goto ud;
- }
- eprintf ("%s x%u, x%u, %d\n", name, (uint)rd, (uint)rs1, (int)imm_i);
- cpu_set (cpu, rd, c);
- break;
- case 0b0110011: // alu rd, rs1, rs2
- a = cpu_get (cpu, rs1);
- b = cpu_get (cpu, rs2);
- c = (instr >> 30) & 1;
- switch (funct3) {
- case 0b000: // add/sub
- if (c) {
- name = "sub";
- a -= b;
- } else {
- name = "add";
- a += b;
- }
- break;
- case 0b001: // sll
- name = "sll";
- a <<= b;
- break;
- case 0b010: // slt
- name = "slt";
- a = (i32)a < (i32)b;
- break;
- case 0b011: // sltu
- name = "sltu";
- a = a < b;
- break;
- case 0b100: // xor
- name = "xor";
- a ^= b;
- break;
- case 0b101: // srl/sra
- if (c) {
- name = "sra";
- a = (i32)a >> b;
- } else {
- name = "srl";
- a >>= b;
- }
- break;
- case 0b110: // or
- name = "or";
- a |= b;
- break;
- case 0b111: // and
- name = "and";
- a &= b;
- break;
- }
- eprintf ("%s x%u, x%u, x%u\n", name, (uint)rd, (uint)rs1, (uint)rs2);
- cpu_set (cpu, rd, a);
- break;
- case 0b0001111: // fence/fence.tso/pause
- eprintf ("fence\n");
- break;
- case 0b1110011: // ecall/ebreak
- eprintf (
- "ecall a0=%u, a1=%u, a2=%u, a3=%u, a4=%u, a5=%u, a7=%u\n",
- cpu_get (cpu, 10),
- cpu_get (cpu, 11),
- cpu_get (cpu, 12),
- cpu_get (cpu, 13),
- cpu_get (cpu, 14),
- cpu_get (cpu, 15),
- cpu_get (cpu, 17)
- );
- ecall (cpu);
- break;
- default:
- ud:
- errx (1, "%08x: invalid instruction: %08x", cpu->pc - 4, instr);
- }
-}
-
-static void load_image (struct cpu *cpu, const char *filename)
+static void load_image (const char *filename)
{
Elf32_Ehdr ehdr;
int fd;
if (read (fd, &ehdr, sizeof (ehdr)) != sizeof (ehdr))
err (1, "read('%s')", filename);
- if (!IS_ELF (ehdr))
- errx (1, "not ELF");
+ if (!is_executable (&ehdr))
+ errx (1, "Invalid argument");
- if (ehdr.e_ident[EI_CLASS] != ELFCLASS32)
- errx (1, "not 32bit");
+ pc = ehdr.e_entry;
- if (ehdr.e_ident[EI_DATA] != ELFDATA2LSB)
- errx (1, "not little endian");
-
- //if (ehdr.e_ident[EI_OSABI] != ELFOSABI_LINUX)
- // errx (1, "not linux");
-
- if (ehdr.e_machine != EM_RISCV)
- errx (1, "invalid e_machine");
-
- cpu->pc = ehdr.e_entry;
-
for (unsigned i = 0; i < ehdr.e_phnum; ++i) {
Elf32_Phdr phdr;
- u32 flags = 0;
+ u32 flags = 0, end;
void *ptr;
if (phdr.p_flags & PF_R)
if ((size_t)ptr != (size_t)phdr.p_vaddr)
err (1, "%u: failed to map program header", i);
+
+ end = (((u32)(size_t)ptr + phdr.p_memsz) + 4095) & ~0x3ff;
+ if (end > brkval)
+ brkval = end;
break;
case PT_INTERP:
case PT_DYNAMIC:
close (fd);
}
-static void cpu_push (struct cpu *cpu, u32 val)
+static void cpu_push (u32 val)
{
- cpu_set (cpu, 2, cpu_get (cpu, 2) - 4);
- *(u32 *)(size_t)cpu_get (cpu, 2) = val;
+ cpu_set (2, cpu_get (2) - 4);
+ write_u32 (cpu_get (2), val);
}
-static void cpu_push_str (struct cpu *cpu, const char *ptr)
+static void cpu_push_str (const char *ptr)
{
if ((size_t)ptr > 0x80000000) {
const size_t len = strlen (ptr);
assert ((size_t)nptr < 0x80000000);
ptr = nptr;
}
- cpu_push (cpu, (u32)(size_t)ptr);
+ cpu_push ((u32)(size_t)ptr);
}
static void setup_stack (
- struct cpu *cpu,
u32 stack_size,
int argc,
char **argv,
void *stack_bottom;
// set stack pointer
- cpu_set (cpu, 2, 0x80000000);
+ cpu_set (2, 0x80000000);
stack_bottom = (void *)(size_t)(0x80000000 - stack_size);
ptr = mmap (
if (ptr != stack_bottom)
err (1, "failed to map stack");
- cpu_push (cpu, 0);
+ cpu_push (0);
for (int i = envc - 1; i >= 0; --i)
- cpu_push_str (cpu, envp[i]);
- cpu_push (cpu, 0);
+ cpu_push_str (envp[i]);
+ cpu_push (0);
for (int i = argc; i >= 0; --i)
- cpu_push_str (cpu, argv[i]);
- cpu_push (cpu, argc);
+ cpu_push_str (argv[i]);
+ cpu_push (argc);
}
int main (int argc, char *argv[], char *envp[])
{
- struct cpu cpu;
const char *filename;
struct rlimit rl;
size_t stack_size;
- int fd, option, envc;
+ int fd, envc;
+ char *base;
void *ptr;
- while ((option = getopt (argc, argv, "")) != -1) {
- switch (option) {
- default:
- return 1;
- }
- }
+ base = basename (argv[0]);
- argc -= optind;
- argv += optind;
+ if (strcmp (base, "rvemu") == 0) {
+ if (argc < 2)
+ errx (1, "usage: rvemu file");
- if (argc < 1)
- errx (1, "usage: rvemu file");
+ filename = argv[1];
+ } else {
+ filename = argv[0];
+ }
- filename = argv[0];
- memset (&cpu, 0, sizeof (cpu));
- load_image (&cpu, filename);
+ load_image (filename);
if (getrlimit (RLIMIT_STACK, &rl) == 0) {
stack_size = rl.rlim_cur;
for (envc = 0; envp[envc] != NULL; ++envc);
- setup_stack (&cpu, stack_size, argc, argv, envc, envp);
+ setup_stack (stack_size, argc, argv, envc, envp);
while (1) {
- const u32 instr = cpu_fetch (&cpu);
- cpu_exec (&cpu, instr);
+ const u32 instr = cpu_fetch ();
+ cpu_exec (instr);
}
return 0;
blob - 2ebd0fad6472bfc86aec71f22929eb1e170bfa13
blob + 609715196ddc1730c0e3b716900d66b8a948016e
--- test.S
+++ test.S
+.set SYS_write, 64
+.set SYS_exit, 93
+.set SYS_clone, 220
+.set SYS_execve, 221
+
+.section .data
+parent: .string "Parent\n"
+child: .string "Child\n"
+arg0:
+path: .string "./hello.elf"
+argv:
+ .int arg0
+ .int 0
+
+envp:
+ .int 0
+
.section .text
.global _start
.type _start, %function
_start:
addi sp, sp, -4
- li t0, 10
- sw t0, 0(sp)
+ li a0, 17
+ li a1, 0
+ li a7, SYS_clone
+ ecall
- li a0, 0x42
+ beq a0, zero, .Lchild
+
+ li a0, 1
+ la a1, parent
+ li a2, 7
+ li a7, SYS_write
+ ecall
+
+ la a0, path
+ la a1, argv
+ la a2, envp
+ li a7, SYS_execve
+ ecall
+
jal printhex
+ li a0, 0
+ li a7, SYS_exit
+ ecall
+
+.Lchild:
li a0, 1
- mv a1, sp
- li a2, 1
- li a7, 64
+ la a1, child
+ li a2, 6
+ li a7, SYS_write
ecall
+
li a0, 0
- li a7, 93
+ li a7, SYS_exit
ecall
# printhex(u32 a0)
j .Loop
.Lret:
+ li t0, 10
+ sw t0, 0(sp)
+ li a0, 1
+ mv a1, sp
+ li a2, 1
+ ecall
+
lw s1, 4(sp)
lw s0, 8(sp)
addi sp, sp, 12
ret
-.section .rodata
-str: .string "Hello World\n"
-.section .data
-buf: .space 1
blob - /dev/null
blob + be1763527ea5c72f4c66c475b65c59b496befb2e (mode 644)
--- /dev/null
+++ cpu.c
+#include "rvemu.h"
+
+static u32 regs[31];
+u32 pc;
+
+
+void cpu_set (size_t reg, u32 val)
+{
+ if (reg > 0)
+ regs[reg - 1] = val;
+}
+
+u32 cpu_get (size_t reg)
+{
+ return reg > 0 ? regs[reg - 1] : 0;
+}
+
+u32 cpu_fetch (void)
+{
+ const u32 i = *(const u32 *)(size_t)pc;
+ //eprintf ("%08x: %08x\n", cpu->pc, i);
+ pc += 4;
+ return i;
+}
+
+void cpu_exec (u32 instr)
+{
+ const char *name;
+ const u8 rd = (instr >> 7) & 0x1f;
+ const u8 funct3 = (instr >> 12) & 0x7;
+ const u8 rs1 = (instr >> 15) & 0x1f;
+ const u8 rs2 = (instr >> 20) & 0x1f;
+ const u8 funct7 = instr >> 25;
+ const u32 imm_i = (i32)instr >> 20;
+ const u32 imm_s = ((i32)instr >> 25 << 5) | ((instr >> 7) & 0x1f);
+ const u32 imm_b = (instr >> 31 << 12)
+ | (((instr >> 25) & 0x3f) << 5)
+ | (((instr >> 8) & 0xf) << 1)
+ | (((instr >> 7) & 1) << 11);
+ const u32 imm_u = instr & 0xfffff000;
+ const u32 imm_j = ((i32)instr >> 31 << 20)
+ | (((instr >> 21) & 0x3ff) << 1)
+ | (((instr >> 20) & 1) << 11)
+ | (((instr >> 12) & 0xff) << 12);
+
+ u32 a, b, c;
+ switch (instr & 0x7f) {
+ case 0b0110111: // lui rd, uimm
+ eprintf ("lui x%u, %u\n", (uint)rd, imm_u);
+ cpu_set (rd, imm_u);
+ break;
+ case 0b0010111: // auipc rd, uimm
+ eprintf ("auipc x%u, %u\n", (uint)rd, imm_u);
+ cpu_set (rd, pc + imm_u - 4);
+ break;
+ case 0b1101111: // jal rd, jimm
+ eprintf ("jal x%u, %d\n", (uint)rd, (int)imm_j);
+ cpu_set (rd, pc);
+ pc += imm_j - 4;
+ break;
+ case 0b1100111: // jalr rd, rs1, iimm
+ if (funct3 != 0b000)
+ goto ud;
+ eprintf ("jalr x%u, x%u, %d\n", (uint)rd, (uint)rs1, (int)imm_i);
+ cpu_set (rd, pc);
+ pc = cpu_get (rs1);
+ break;
+ case 0b1100011: // bcc rs1, rs2, bimm
+ a = cpu_get (rs1);
+ b = cpu_get (rs2);
+ switch (funct3) {
+ case 0b000:
+ name = "beq";
+ c = a == b;
+ break;
+ case 0b001:
+ name = "bne";
+ c = a != b;
+ case 0b100:
+ name = "blt";
+ c = (i32)a < (i32)b;
+ break;
+ case 0b101:
+ name = "bge";
+ c = (i32)a >= (i32)b;
+ break;
+ case 0b110:
+ name = "bltu";
+ c = a < b;
+ break;
+ case 0b111:
+ name = "bgeu";
+ c = a >= b;
+ break;
+ default:
+ goto ud;
+ }
+ eprintf ("%s x%u, x%u, %d\n", name, (uint)rs1, (uint)rs2, (int)imm_b);
+ if (c)
+ pc += imm_b - 4;
+ break;
+ case 0b0000011: // lx rd, iimm(rs1)
+ a = cpu_get (rs1) + imm_i;
+ switch (funct3) {
+ case 0b000: // lb
+ name = "lb";
+ b = (i32)read_i8 (a);
+ break;
+ case 0b001: // lh
+ name = "lh";
+ b = (i32)read_i16 (a);
+ break;
+ case 0b010: // lw
+ name = "lw";
+ b = read_u32 (a);
+ break;
+ case 0b100: // lbu
+ name = "lbu";
+ b = read_u8 (a);
+ break;
+ case 0b101: // lhu
+ name = "lhu";
+ b = read_u16 (a);
+ break;
+ default:
+ goto ud;
+ }
+ eprintf ("%s x%u, %d(x%u)\n", name, (uint)rd, (int)imm_i, (uint)rs1);
+ cpu_set (rd, b);
+ break;
+ case 0b0100011: // sx rs2, simm(rs1)
+ a = cpu_get (rs2);
+ b = cpu_get (rs1) + imm_s;
+ switch (funct3) {
+ case 0b000: // sb
+ name = "sb";
+ write_u8 (b, a);
+ break;
+ case 0b001: // sh
+ name = "sh";
+ write_u16 (b, a);
+ break;
+ case 0b010: // sw
+ name = "sw";
+ write_u32 (b, a);
+ break;
+ default:
+ goto ud;
+ }
+ eprintf ("%s x%u, %d(x%u)\n", name, (uint)rs2, (int)imm_s, (uint)rs1);
+ break;
+ case 0b0010011: // alui rd, rs1, iimm
+ a = cpu_get (rs1);
+ b = imm_i;
+ switch (funct3) {
+ case 0b000: // addi
+ name = "addi";
+ c = a + b;
+ break;
+ case 0b001: // slli
+ name = "slli";
+ c = a << (b & 0x1f);
+ break;
+ case 0b010: // slti
+ name = "slti";
+ c = (i32)a < (i32)b;
+ break;
+ case 0b011: // sltiu
+ name = "sltiu";
+ c = a < b;
+ break;
+ case 0b100: // xori
+ name = "xori";
+ c = a ^ b;
+ break;
+ case 0b101: // srli/srai
+ if ((instr >> 30) & 1) {
+ name = "srai";
+ c = (i32)a >> b;
+ } else {
+ name = "srli";
+ c = a >> b;
+ }
+ break;
+ case 0b110: // ori
+ name = "ori";
+ c = a | b;
+ break;
+ case 0b111: // andi
+ name = "andi";
+ c = a & b;
+ break;
+ default:
+ goto ud;
+ }
+ eprintf ("%s x%u, x%u, %d\n", name, (uint)rd, (uint)rs1, (int)imm_i);
+ cpu_set (rd, c);
+ break;
+ case 0b0110011: // alu rd, rs1, rs2
+ a = cpu_get (rs1);
+ b = cpu_get (rs2);
+ c = (instr >> 30) & 1;
+ switch (funct3) {
+ case 0b000: // add/sub
+ if (c) {
+ name = "sub";
+ a -= b;
+ } else {
+ name = "add";
+ a += b;
+ }
+ break;
+ case 0b001: // sll
+ name = "sll";
+ a <<= b;
+ break;
+ case 0b010: // slt
+ name = "slt";
+ a = (i32)a < (i32)b;
+ break;
+ case 0b011: // sltu
+ name = "sltu";
+ a = a < b;
+ break;
+ case 0b100: // xor
+ name = "xor";
+ a ^= b;
+ break;
+ case 0b101: // srl/sra
+ if (c) {
+ name = "sra";
+ a = (i32)a >> b;
+ } else {
+ name = "srl";
+ a >>= b;
+ }
+ break;
+ case 0b110: // or
+ name = "or";
+ a |= b;
+ break;
+ case 0b111: // and
+ name = "and";
+ a &= b;
+ break;
+ }
+ eprintf ("%s x%u, x%u, x%u\n", name, (uint)rd, (uint)rs1, (uint)rs2);
+ cpu_set (rd, a);
+ break;
+ case 0b0001111: // fence/fence.tso/pause
+ eprintf ("fence\n");
+ break;
+ case 0b1110011: // ecall/ebreak
+ eprintf (
+ "ecall a0=%u, a1=%u, a2=%u, a3=%u, a4=%u, a5=%u, a7=%u\n",
+ cpu_get (10),
+ cpu_get (11),
+ cpu_get (12),
+ cpu_get (13),
+ cpu_get (14),
+ cpu_get (15),
+ cpu_get (17)
+ );
+ ecall ();
+ break;
+ default:
+ ud:
+ errx (1, "%08x: invalid instruction: %08x", pc - 4, instr);
+ }
+}
+
blob - a5826bdff3660ddabb245f576fe5539b00f2243e (mode 644)
blob + /dev/null
--- test.ld
+++ /dev/null
-ENTRY(_start)
-
-SECTIONS {
- . = 1M;
-
- .text : ALIGN(4K) {
- *(.text*)
- }
-
- .rodata : ALIGN(4K) {
- *(.rodata*)
- }
-
- .data : ALIGN(4K) {
- *(.data*)
- }
-
- .bss : ALIGN(4K) {
- *(COMMON)
- *(.bss*)
- }
-
-}
blob - /dev/null
blob + 7f8efcda3a12cf5aff8ecfa2b29bb63f61b90cd3 (mode 644)
--- /dev/null
+++ exec.c
+#include <string.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <fcntl.h>
+#include <errno.h>
+#include <ctype.h>
+#include "rvemu.h"
+
+
+int is_executable (const Elf32_Ehdr *ehdr)
+{
+ return IS_ELF (*ehdr)
+ && ehdr->e_ident[EI_CLASS] == ELFCLASS32
+ && ehdr->e_ident[EI_DATA] == ELFDATA2LSB
+ && ehdr->e_machine == EM_RISCV
+ ;
+}
+
+static char **copyv (u32 v)
+{
+ char **a;
+ int n;
+
+ for (n = 0; read_u32 (v + n * 4) != 0; ++n);
+
+ a = calloc (n + 1, sizeof (char *));
+ for (int i = 0; i < n; ++i)
+ a[i] = (char *)(size_t)read_u32 (v + i * 4);
+
+ return a;
+}
+
+int my_execve (const char *path, u32 argv, u32 envp)
+{
+
+ Elf32_Ehdr ehdr;
+ char buffer[256], *nl, *s, **args, **env;
+ int fd;
+
+ fd = open (path, O_RDONLY);
+ if (fd < 0)
+ return -1;
+
+ memset (buffer, 0, sizeof (buffer));
+ read (fd, buffer, 2);
+
+ if (buffer[0] == '#' && buffer[1] == '!') {
+ read (fd, buffer, sizeof (buffer));
+ close (fd);
+
+ nl = memchr (buffer, '\n', sizeof (buffer));
+ if (nl == NULL) {
+ errno = EINVAL;
+ return -1;
+ }
+
+ *nl = '\0';
+
+ s = buffer;
+ while (isspace (*s))
+ ++s;
+
+ return my_execve (s, argv, envp);
+ }
+
+ memset (&ehdr, 0, sizeof (ehdr));
+ lseek (fd, 0, SEEK_SET);
+ read (fd, &ehdr, sizeof (ehdr));
+ close (fd);
+
+ args = copyv (argv);
+ env = copyv (envp);
+
+ if (is_executable (&ehdr)) {
+ path = interpreter;
+ }
+
+ return execve (path, args, env);
+}
+
blob - /dev/null
blob + e48a65d5ceb0daab64effa974cba050b24acdd14 (mode 644)
--- /dev/null
+++ hello.S
+.set SYS_write, 64
+.set SYS_exit, 93
+
+.section .rodata
+str: .string "Hello World\n"
+
+.section .text
+.global _start
+_start:
+ li a0, 1
+ la a1, str
+ li a2, 12
+ li a7, SYS_write
+ ecall
+
+ li a0, 0
+ li a7, SYS_exit
+ ecall
blob - /dev/null
blob + a5826bdff3660ddabb245f576fe5539b00f2243e (mode 644)
--- /dev/null
+++ linker.ld
+ENTRY(_start)
+
+SECTIONS {
+ . = 1M;
+
+ .text : ALIGN(4K) {
+ *(.text*)
+ }
+
+ .rodata : ALIGN(4K) {
+ *(.rodata*)
+ }
+
+ .data : ALIGN(4K) {
+ *(.data*)
+ }
+
+ .bss : ALIGN(4K) {
+ *(COMMON)
+ *(.bss*)
+ }
+
+}
blob - /dev/null
blob + b9cf831a66327caa176a853f9239c030145d5cc8 (mode 755)
Binary files /dev/null and rvemu differ
blob - /dev/null
blob + 982df935a81ad7877a60e5f5f7198413aa9a8819 (mode 644)
--- /dev/null
+++ rvemu.h
+#include <stddef.h>
+#include <stdint.h>
+#include <libelf.h>
+#include <stdio.h>
+#include <err.h>
+
+#define DEBUG 0
+
+#if DEBUG
+# define eprintf(...) fprintf (stderr, __VA_ARGS__)
+#else
+# define eprintf(...)
+#endif
+
+typedef uint8_t u8;
+typedef uint16_t u16;
+typedef uint32_t u32;
+typedef uint64_t u64;
+
+typedef int8_t i8;
+typedef int16_t i16;
+typedef int32_t i32;
+typedef int64_t i64;
+
+typedef unsigned int uint;
+
+extern u32 pc;
+extern u32 brkval;
+extern const char *interpreter;
+
+u32 cpu_fetch (void);
+u32 cpu_get (size_t reg);
+void cpu_set (size_t reg, u32 val);
+void cpu_exec (u32 instr);
+void ecall (void);
+int my_execve (const char *path, u32 argv, u32 envp);
+int is_executable (const Elf32_Ehdr *);
+
+#define read_u8(ptr) (*(const u8 *)(size_t)(ptr))
+#define read_u16(ptr) (*(const u16 *)(size_t)(ptr))
+#define read_u32(ptr) (*(const u32 *)(size_t)(ptr))
+#define read_u64(ptr) (*(const u64 *)(size_t)(ptr))
+#define read_i8(ptr) (*(const i8 *)(size_t)(ptr))
+#define read_i16(ptr) (*(const i16 *)(size_t)(ptr))
+#define read_i32(ptr) (*(const i32 *)(size_t)(ptr))
+#define read_i64(ptr) (*(const i64 *)(size_t)(ptr))
+#define write_u8(ptr, val) (*(u8 *)(size_t)(ptr) = (val))
+#define write_u16(ptr, val) (*(u16 *)(size_t)(ptr) = (val))
+#define write_u32(ptr, val) (*(u32 *)(size_t)(ptr) = (val))
+#define write_u64(ptr, val) (*(u64 *)(size_t)(ptr) = (val))
blob - /dev/null
blob + 687d4a84e1e49fbedc28cb07e931e816c372b093 (mode 644)
--- /dev/null
+++ syscall.c
+#include <sys/resource.h>
+#include <sys/utsname.h>
+#include <sys/mman.h>
+#include <sys/stat.h>
+#include <sys/msg.h>
+#include <sys/sem.h>
+#include <signal.h>
+#include <unistd.h>
+#include <string.h>
+#include <stdlib.h>
+#include <fcntl.h>
+#include <sched.h>
+#include <errno.h>
+#include "rvemu.h"
+
+struct linux_stat64 {
+ u64 dev;
+ u64 ino;
+ u32 mode;
+ u32 nlink;
+ u32 uid;
+ u32 gid;
+ u64 rdev;
+ u64 __pad1;
+ u64 size;
+ u32 blksize;
+ u32 __pad2;
+ u64 blocks;
+ u32 atime;
+ u32 atime_ns;
+ u32 mtime;
+ u32 mtime_ns;
+ u32 ctime;
+ u32 ctime_ns;
+ u32 __unused4;
+ u32 __unused5;
+};
+
+struct linux_utsname {
+ char sysname[65];
+ char nodename[65];
+ char release[65];
+ char version[65];
+ char machine[65];
+};
+
+static int map_errno (int err)
+{
+ const int errnos[] = {
+ [EPERM] = 1,
+ [ENOENT] = 2,
+ [ESRCH] = 3,
+ [EINTR] = 4,
+ [EIO] = 5,
+ [ENXIO] = 6,
+ [E2BIG] = 7,
+ [ENOEXEC] = 8,
+ [EBADF] = 9,
+ [ECHILD] = 10,
+ [EAGAIN] = 11,
+ [ENOMEM] = 12,
+ [EACCES] = 13,
+ [EFAULT] = 14,
+ [ENOTBLK] = 15,
+ [EBUSY] = 16,
+ [EEXIST] = 17,
+ [EXDEV] = 18,
+ [ENODEV] = 19,
+ [ENOTDIR] = 20,
+ [EISDIR] = 21,
+ [EINVAL] = 22,
+ [ENFILE] = 23,
+ [EMFILE] = 24,
+ [ENOTTY] = 25,
+ [ETXTBSY] = 26,
+ [EFBIG] = 27,
+ [ENOSPC] = 28,
+ [ESPIPE] = 29,
+ [EROFS] = 30,
+ [EMLINK] = 31,
+ [EPIPE] = 32,
+ [EDOM] = 33,
+ [ERANGE] = 34,
+ [EDEADLK] = 35,
+ [ENAMETOOLONG] = 36,
+ [ENOLCK] = 37,
+ [ENOSYS] = 38,
+ };
+ return errnos[err];
+}
+
+static int map (int x) {
+ return x < 0 ? -map_errno (errno) : x;
+}
+
+
+static void stat_to_linux_stat (struct linux_stat64 *lst, const struct stat *st)
+{
+ memset (lst, 0, sizeof (*lst));
+ lst->dev = st->st_dev;
+ lst->ino = st->st_dev;
+ lst->mode = st->st_dev;
+ lst->nlink = st->st_dev;
+ lst->uid = st->st_dev;
+ lst->gid = st->st_dev;
+ lst->rdev = st->st_dev;
+ lst->size = st->st_dev;
+ lst->blksize = st->st_dev;
+ lst->blocks = st->st_dev;
+ lst->atime = st->st_atim.tv_sec;
+ lst->atime_ns = st->st_atim.tv_nsec;
+ lst->mtime = st->st_mtim.tv_sec;
+ lst->mtime_ns = st->st_mtim.tv_nsec;
+ lst->ctime = st->st_ctim.tv_sec;
+ lst->ctime_ns = st->st_ctim.tv_nsec;
+}
+
+static void utsname_to_linux_utsname (struct linux_utsname *lun, const struct utsname *un)
+{
+ memset (lun, 0, sizeof (*lun));
+ strlcpy (lun->sysname, un->sysname, 65);
+ strlcpy (lun->nodename, un->nodename, 65);
+ strlcpy (lun->release, un->release, 65);
+ strlcpy (lun->version, un->version, 65);
+ strlcpy (lun->machine, un->machine, 65);
+}
+
+static int enosys (const char *sys)
+{
+ warnx ("unimplemented syscall: %s", sys);
+ return -map_errno (ENOSYS);
+}
+
+static u32 my_brk (u32 new)
+{
+ void *ptr;
+
+ if (new < brkval)
+ return brkval;
+ if (new >= 0x78000000) {
+ errno = ENOMEM;
+ return -1;
+ }
+
+ new = (new + 4095) & ~0x3ff;
+ ptr = mmap (
+ (void *)(size_t)brkval,
+ new - brkval,
+ PROT_READ | PROT_WRITE,
+ MAP_PRIVATE | MAP_ANON,
+ -1,
+ 0
+ );
+ if (ptr == NULL)
+ return -1;
+ brkval = new;
+ return brkval;
+}
+
+#define ptr(T, x) ((T *)(size_t)(x))
+#define str(x) ptr (const char, x)
+void ecall (void)
+{
+ struct linux_stat64 lst;
+ struct linux_utsname lun;
+ struct stat st;
+ struct utsname un;
+ void *ptr;
+ const u32 a0 = cpu_get (10);
+ const u32 a1 = cpu_get (11);
+ const u32 a2 = cpu_get (12);
+ const u32 a3 = cpu_get (13);
+ const u32 a4 = cpu_get (14);
+ const u32 a5 = cpu_get (15);
+ const u32 a7 = cpu_get (17);
+ u32 ret;
+ switch (a7) {
+ case 17: // getcwd
+ ret = enosys ("getcwd");
+ break;
+ case 23: // dup
+ ret = map (dup ((int)a0));
+ break;
+ case 24: // dup3
+ ret = map (dup3 ((int)a0, (int)a1, (int)a2));
+ break;
+ case 25: // fcntl
+ ret = enosys ("fcntl");
+ break;
+ case 29: // ioctl
+ ret = enosys ("ioctl");
+ break;
+ case 32: // flock
+ ret = map (flock ((int)a0, (int)a1));
+ break;
+ case 33: // mknodat
+ ret = map (mknodat ((int)a0, str (a1), (mode_t)a2, (dev_t)a3));
+
+ case 34: // mkdirat
+ ret = map (mkdirat ((int)a0, str (a1), (mode_t)a2));
+ break;
+ case 35: // unlinkat
+ ret = map (unlinkat ((int)a0, str (a1), (int)a2));
+ break;
+ case 36: // symlinkat
+ ret = map (symlinkat (str (a0), (int)a1, str (a2)));
+ break;
+ case 37: // linkat
+ ret = map (linkat ((int)a0, str (a1), (int)a2, str (a3), (int)a4));
+ break;
+ case 38: // renameat
+ ret = map (renameat ((int)a0, str (a1), (int)a2, str (a3)));
+ break;
+ case 39: // umount
+ ret = enosys ("umount");
+ break;
+ case 40: // mount
+ ret = enosys ("mount");
+ break;
+ case 41: // pivot_root
+ ret = enosys ("pivot_root");
+ break;
+ case 42: // nfsservctl
+ ret = enosys ("nfsservctl");
+ break;
+ case 43: // statfs
+ ret = enosys ("statfs");
+ break;
+ case 44: // fstatfs
+ ret = enosys ("fstatfs");
+ break;
+ case 45: // truncate
+ ret = map (truncate (str (a0), (off_t)a1));
+ break;
+ break;
+ case 46: // ftruncate
+ ret = map (ftruncate ((int)a0, (off_t)a1));
+ break;
+ case 47: // fallocate
+ ret = enosys ("fallocate");
+ break;
+ case 48: // faccessat
+ ret = map (faccessat ((int)a0, str (a1), (int)a2, (int)a3));
+ break;
+ case 49: // chdir
+ ret = map (chdir (str (a0)));
+ break;
+ case 50: // fchdir
+ ret = map (fchdir ((int)a0));
+ break;
+ case 51: // chroot
+ ret = map (chroot (str (a0)));
+ break;
+ case 52: // fchmod
+ ret = map (fchmod ((int)a0, (mode_t)a1));
+ break;
+ case 53: // fchmodat
+ ret = map (fchmodat ((int)a0, str (a1), (mode_t)a2, (int)a3));
+ break;
+ case 54: // fchownat
+ ret = map (fchownat ((int)a0, str (a1), (uid_t)a2, (gid_t)a3, (int)a4));
+ break;
+ case 55: // fchown
+ ret = map (fchown ((int)a0, (uid_t)a1, (gid_t)a2));
+ break;
+ case 56: // openat
+ ret = map (openat ((int)a0, str (a1), (int)a2, (int)a3));
+ break;
+ case 57: // close
+ ret = map (close ((int)a0));
+ break;
+ case 58: // vhangup
+ ret = enosys ("vhangup");
+ break;
+ case 59: // pipe2
+ ret = map (pipe2 (ptr (int, a0), (int)a1));
+ break;
+ case 60: // quotactl
+ ret = enosys ("quotactl");
+ break;
+ case 61: // getdents64
+ ret = enosys ("getdents64");
+ break;
+ case 62: // lseek
+ ret = map (lseek ((int)a0, (off_t)a1, (int)a2));
+ break;
+ case 63: // read
+ ret = map (read ((int)a0, ptr (void, a1), (size_t)a2));
+ break;
+ case 64: // write
+ ret = map (write ((int)a0, ptr (const void, a1), (size_t)a2));
+ break;
+ case 65: // readv
+ ret = enosys ("readv");
+ break;
+ case 66: // writev
+ ret = enosys ("writev");
+ break;
+ case 67: // pread
+ ret = map (pread ((int)a0, ptr (void, a1), (size_t)a2, (off_t)a3));
+ break;
+ case 68: // pwrite
+ ret = map (pwrite ((int)a0, ptr (const void, a1), (size_t)a2, (off_t)a3));
+ break;
+ case 69: // preadv
+ ret = enosys ("preadv");
+ break;
+ case 70: // pwritev
+ ret = enosys ("pwritev");
+ break;
+ case 71: // pwritev
+ ret = enosys ("sendfile");
+ break;
+ case 72: // pselect6
+ ret = enosys ("pselect6");
+ break;
+ case 73: // ppoll
+ ret = enosys ("ppoll");
+ break;
+ case 74: // signalfd4
+ ret = enosys ("signalfd4");
+ break;
+ case 75: // vmsplice
+ ret = enosys ("vmsplice");
+ break;
+ case 76: // splice
+ ret = enosys ("splice");
+ break;
+ case 77: // tee
+ ret = enosys ("tee");
+ break;
+ case 78: // readlinkat
+ ret = map (readlinkat ((int)a0, str (a1), ptr (char, a2), (size_t)a3));
+ break;
+ case 79: // fstatat
+ ret = map (fstatat ((int)a0, str (a1), &st, (int)a3));
+ stat_to_linux_stat (&lst, &st);
+ memcpy (ptr (void, a2), &lst, sizeof (lst));
+ break;
+ case 80: // fstat
+ ret = map (fstat ((int)a0, &st));
+ stat_to_linux_stat (&lst, &st);
+ memcpy (ptr (void, a1), &lst, sizeof (lst));
+ break;
+ case 81: // sync
+ sync ();
+ ret = 0;
+ break;
+ case 82: // fsync
+ ret = map (fsync ((int)a0));
+ break;
+ case 83: // fdatasync
+ ret = map (fdatasync ((int)a0));
+ break;
+ case 84: // sync_file_range
+ ret = enosys ("sync_file_range");
+ break;
+ case 85: // timerfd_create
+ ret = enosys ("timerfd_create");
+ break;
+ case 86: // timerfd_settime
+ ret = enosys ("timerfd_settime");
+ break;
+ case 87: // timerfd_gettime
+ ret = enosys ("timerfd_gettime");
+ break;
+ case 88: // utimensat
+ ret = enosys ("utimensat");
+ break;
+ case 89: // acct
+ ret = acct (str (a0));
+ break;
+ case 90: // capget
+ ret = enosys ("capget");
+ break;
+ case 91: // capset
+ ret = enosys ("capset");
+ break;
+ case 92: // personality
+ ret = enosys ("personality");
+ break;
+ case 93: // exit
+ exit (a0);
+ ret = -1;
+ break;
+ case 94: // exit_group
+ ret = enosys ("exit_group");
+ break;
+ case 95: // waitid
+ ret = enosys ("waitid");
+ break;
+ case 96: // set_tid_address
+ ret = enosys ("set_tid_address");
+ break;
+ case 97: // unshare
+ ret = enosys ("unshare");
+ break;
+ case 98: // futex
+ ret = enosys ("futex");
+ break;
+ case 99: // set_robust_limit
+ ret = enosys ("set_robust_limit");
+ break;
+ case 100: // get_robust_limit
+ ret = enosys ("get_robust_limit");
+ break;
+ case 101: // nanosleep
+ ret = enosys ("nanosleep");
+ break;
+ case 102: // gettimer
+ ret = enosys ("gettimer");
+ break;
+ case 103: // settimer
+ ret = enosys ("settimer");
+ break;
+ case 104: // kexec_load
+ ret = enosys ("kexec_load");
+ break;
+ case 105: // kexec_init_module
+ ret = enosys ("kexec_init_module");
+ break;
+ case 106: // kexec_delete_module
+ ret = enosys ("kexec_delete_module");
+ break;
+ case 107: // timer_create
+ ret = enosys ("timer_create");
+ break;
+ case 108: // timer_gettime
+ ret = enosys ("timer_gettime");
+ break;
+ case 109: // timer_getoverrun
+ ret = enosys ("timer_getoverrun");
+ break;
+ case 110: // timer_settime
+ ret = enosys ("timer_settime");
+ break;
+ case 111: // timer_delete
+ ret = enosys ("timer_delete");
+ break;
+ case 112: // clock_settime
+ ret = enosys ("clock_settime");
+ break;
+ case 113: // clock_gettime
+ ret = enosys ("clock_gettime");
+ break;
+ case 114: // clock_getres
+ ret = enosys ("clock_getres");
+ break;
+ case 115: // clock_nanosleep
+ ret = enosys ("clock_nanosleep");
+ break;
+ case 116: // syslog
+ ret = enosys ("syslog");
+ break;
+ case 117: // ptrace
+ ret = enosys ("ptrace");
+ break;
+ case 118: // sched_setparam
+ ret = enosys ("sched_setparam");
+ break;
+ case 119: // sched_setscheduler
+ ret = enosys ("sched_setscheduler");
+ break;
+ case 120: // sched_getscheduler
+ ret = enosys ("sched_getscheduler");
+ break;
+ case 121: // sched_getparam
+ ret = enosys ("sched_getparam");
+ break;
+ case 122: // sched_setaffinity
+ ret = enosys ("sched_setaffinity");
+ break;
+ case 123: // sched_getaffinity
+ ret = enosys ("sched_getaffinity");
+ break;
+ case 124: // sched_yield
+ ret = map (sched_yield ());
+ break;
+ case 125: // sched_get_priority_max
+ ret = map (sched_get_priority_max ((int)a0));
+ break;
+ case 126: // sched_get_priority_min
+ ret = map (sched_get_priority_min ((int)a0));
+ break;
+ case 127: // sched_rr_get_interval
+ ret = enosys ("sched_rr_get_interval");
+ break;
+ case 128: // restart_syscall
+ ret = enosys ("restart_syscall");
+ break;
+ case 129: // kill
+ ret = map (kill ((pid_t)a0, (int)a1));
+ break;
+ case 130: // tkill
+ ret = enosys ("tkill");
+ break;
+ case 131: // tgkill
+ ret = enosys ("tgkill");
+ break;
+ case 132: // signalstack
+ ret = enosys ("signalstack");
+ break;
+ case 133: // sigaction
+ ret = enosys ("sigaction");
+ break;
+ case 134: // sigaction
+ ret = enosys ("sigaction");
+ break;
+ case 135: // rt_sigprocmask
+ ret = enosys ("rt_sigprocmask");
+ break;
+ case 136: // sigpending
+ ret = enosys ("sigpending");
+ break;
+ case 137: // sigtimedwait
+ ret = enosys ("sigtimedwait");
+ break;
+ case 138: // sigqueueinfo
+ ret = enosys ("sigqueueinfo");
+ break;
+ case 139: // sigreturn
+ ret = enosys ("sigreturn");
+ break;
+ case 140: // setpriority
+ ret = map (setpriority ((int)a0, (id_t)a1, (int)a2));
+ break;
+ case 141: // getpriority
+ ret = map (getpriority ((int)a0, (id_t)a1));
+ break;
+ case 142: // reboot
+ ret = enosys ("reboot");
+ break;
+ case 143: // setregid
+ ret = map (setregid ((gid_t)a0, (gid_t)a1));
+ break;
+ case 144: // setgid
+ ret = map (setgid ((gid_t)a0));
+ break;
+ case 145: // setreuid
+ ret = map (setreuid ((uid_t)a0, (uid_t)a1));
+ break;
+ case 146: // setuid
+ ret = map (setuid ((uid_t)a0));
+ break;
+ case 147: // setresuid
+ ret = map (setresuid ((uid_t)a0, (uid_t)a1, (uid_t)a2));
+ break;
+ case 148: // getresuid
+ ret = map (getresuid (ptr (uid_t, a0), ptr (uid_t, a1), ptr (uid_t, a2)));
+ break;
+ case 149: // setresgid
+ ret = map (setresgid ((gid_t)a0, (gid_t)a1, (gid_t)a2));
+ break;
+ case 150: // getresgid
+ ret = map (getresgid (ptr (gid_t, a0), ptr (gid_t, a1), ptr (gid_t, a2)));
+ break;
+ case 151: // setfsuid
+ ret = enosys ("setfsuid");
+ break;
+ case 152: // setfsgid
+ ret = enosys ("setfsgid");
+ break;
+ case 153: // times
+ ret = enosys ("times");
+ break;
+ case 154: // setpgid
+ ret = map (setpgid ((pid_t)a0, (pid_t)a1));
+ break;
+ case 155: // getpgid
+ ret = map (getpgid ((pid_t)a0));
+ break;
+ case 156: // getsid
+ ret = map (getsid ((pid_t)a0));
+ break;
+ case 158: // setsid
+ ret = map (setsid ());
+ break;
+ case 159: // setgroups
+ ret = enosys ("setgroups");
+ break;
+ case 160: // uname
+ ret = map (uname (&un));
+ utsname_to_linux_utsname (&lun, &un);
+ memcpy (ptr (void, a0), &lun, sizeof (lun));
+ break;
+ case 161: // sethostname
+ ret = enosys ("sethostname");
+ break;
+ case 162: // setdomainname
+ ret = enosys ("setdomainname");
+ break;
+ case 163: // getrlimit
+ ret = enosys ("getrlimit");
+ break;
+ case 164: // setrlimit
+ ret = enosys ("setrlimit");
+ break;
+ case 165: // getrusage
+ ret = enosys ("getrusage");
+ break;
+ case 166: // umask
+ ret = map (umask ((mode_t)a0));
+ break;
+ case 167: // prctl
+ ret = enosys ("prctl");
+ break;
+ case 168: // getcpu
+ ret = enosys ("getcpu");
+ break;
+ case 169: // gettimeofday
+ ret = enosys ("gettimeofday");
+ break;
+ case 170: // settimeofday
+ ret = enosys ("settimeofday");
+ break;
+ case 171: // adjtimex
+ ret = enosys ("adjtimex");
+ break;
+ case 172: // getpid
+ ret = map (getpid ());
+ break;
+ case 174: // getuid
+ ret = map (getuid ());
+ break;
+ case 175: // geteuid
+ ret = map (geteuid ());
+ break;
+ case 176: // getgid
+ ret = map (getgid ());
+ break;
+ case 177: // getegid
+ ret = map (getegid ());
+ break;
+ case 178: // gettid
+ ret = enosys ("gettid");
+ break;
+ case 179: // sysinfo
+ ret = enosys ("sysinfo");
+ break;
+ case 180:
+ case 181:
+ case 182:
+ case 183:
+ case 184:
+ case 185:
+ ret = enosys ("mq_*");
+ break;
+ case 186: // msgget
+ ret = map (msgget ((key_t)a0, (int)a1));
+ break;
+ case 187: // msgctl
+ ret = enosys ("msgctl");
+ break;
+ case 188: // msgrcv
+ ret = map (msgrcv ((int)a0, ptr (void, a1), (size_t)a2, (long)a3, (int)a4));
+ break;
+ case 189: // msgsnd
+ ret = map (msgsnd ((int)a0, ptr (const void, a1), (size_t)a2, (int)a3));
+ break;
+ case 190: // semget
+ ret = map (semget ((key_t)a0, (int)a1, (int)a2));
+ break;
+ case 191: // semctl
+ ret = enosys ("semctl");
+ break;
+ case 192: // semtimedop
+ ret = enosys ("semtimedop");
+ break;
+ case 193: // semop
+ ret = enosys ("semop");
+ break;
+ case 194:
+ case 195:
+ case 196:
+ case 197:
+ ret = enosys ("shm*");
+ break;
+ case 198:
+ case 199:
+ case 200:
+ case 201:
+ case 202:
+ case 203:
+ case 204:
+ case 205:
+ case 206:
+ case 207:
+ case 208:
+ case 209:
+ case 210:
+ case 211:
+ case 212:
+ ret = enosys ("socket api");
+ break;
+ case 213: // readahead
+ ret = enosys ("readahead");
+ break;
+ case 214: // brk
+ ret = map (my_brk (a0));
+ break;
+ case 215: // munmap
+ ret = map (munmap (ptr (void, a0), (size_t)a1));
+ break;
+ case 216: // mremap
+ ret = enosys ("mremap");
+ break;
+ case 217: // add_key
+ ret = enosys ("add_key");
+ break;
+ case 218: // request_key
+ ret = enosys ("request_key");
+ break;
+ case 219: // keyctl
+ ret = enosys ("keyctl");
+ break;
+ case 220: // clone
+ if (a0 == 17 && a1 == 0) {
+ // fork
+ ret = map (fork ());
+ } else {
+ ret = enosys ("clone");
+ }
+ break;
+ case 221: // execve
+ ret = map (my_execve (str (a0), a1, a2));
+ break;
+ case 222: // mmap
+ ptr = mmap (ptr (void, a0), (size_t)a1, (int)a2, (int)a3, (int)a4, (off_t)a5);
+ if (ptr == NULL) {
+ ret = -map_errno (errno);
+ } else if ((size_t)ptr > INT32_MAX) {
+ ret = -map_errno (EINVAL);
+ } else {
+ ret = (size_t)ptr;
+ }
+ break;
+ case 223: // fadvise64
+ ret = enosys ("fadvise64");
+ break;
+ case 224: // swapon
+ ret = enosys ("swapon");
+ break;
+ case 225: // swapoff
+ ret = enosys ("swapoff");
+ break;
+ case 226: // mprotect
+ ret = map (mprotect (ptr (void, a0), (size_t)a1, (int)a2));
+ break;
+ case 227: // msync
+ ret = map (msync (ptr (void, a0), (size_t)a1, (int)a2));
+ break;
+ case 228: // mlock
+ ret = map (mlock (ptr (void, a0), (size_t)a1));
+ break;
+ case 229: // munlock
+ ret = map (munlock (ptr (void, a0), (size_t)a1));
+ break;
+ case 230: // mlockall
+ ret = map (mlockall ((int)a0));
+ break;
+ case 231: // munlockall
+ ret = map (munlockall ());
+ break;
+ case 232: // mincore
+ ret = enosys ("mincore");
+ break;
+ case 233: // madvise
+ ret = map (madvise (ptr (void, a0), (size_t)a1, (int)a2));
+ break;
+ case 234: // remap_file_pages
+ ret = enosys ("remap_file_pages");
+ break;
+ case 235: // mbind
+ ret = enosys ("mbind");
+ break;
+ case 236: // get_mempolicy
+ ret = enosys ("get_mempolicy");
+ break;
+ case 237: // set_mempolicy
+ ret = enosys ("set_mempolicy");
+ break;
+ case 238: // migrate_pages
+ ret = enosys ("migrate_pages");
+ break;
+ case 239: // move_pages
+ ret = enosys ("move_pages");
+ break;
+ case 240: // rt_tgsigqueueinfo
+ ret = enosys ("rt_tgsigqueueinfo");
+ break;
+ case 241: // perf_event_open
+ ret = enosys ("perf_event_open");
+ break;
+ case 242: // accept4
+ ret = enosys ("accept4");
+ break;
+ case 243: // recvmsg
+ ret = enosys ("recvmsg");
+ break;
+ case 244:
+ case 245:
+ case 246:
+ case 247:
+ case 248:
+ case 249:
+ case 250:
+ case 251:
+ case 252:
+ case 253:
+ case 254:
+ case 255:
+ case 256:
+ case 257:
+ case 258:
+ case 259:
+ ret = enosys ("arch-specific");
+ break;
+ case 260:
+ ret = enosys ("wait4");
+ break;
+ case 261: // prlimit64
+ ret = enosys ("prlimit64");
+ break;
+ case 262: // fanotify_init
+ ret = enosys ("fanotify_init");
+ break;
+ case 263: // fanotify_mark
+ ret = enosys ("fanotify_mark");
+ break;
+ case 264: // name_to_handle_at
+ ret = enosys ("name_to_handle_at");
+ break;
+ case 265: // open_by_handle_at
+ ret = enosys ("open_by_handle_at");
+ break;
+ case 266: // clock_adjtime
+ ret = enosys ("clock_adjtime");
+ break;
+ case 267: // syncfs
+ ret = enosys ("syncfs");
+ break;
+ case 268: // setns
+ ret = enosys ("setns");
+ break;
+ case 269: // sendmsg
+ ret = enosys ("sendmsg");
+ break;
+ case 270: // process_vm_readv
+ ret = enosys ("process_vm_readv");
+ break;
+ case 271: // process_vm_writev
+ ret = enosys ("process_vm_writev");
+ break;
+ case 272: // kcmp
+ ret = enosys ("kcmp");
+ break;
+ case 273: // finit_module
+ ret = enosys ("finit_module");
+ break;
+ case 274: // sched_setattr
+ ret = enosys ("sched_setattr");
+ break;
+ case 275: // sched_getattr
+ ret = enosys ("sched_getattr");
+ break;
+ case 276: // renameat2
+ ret = enosys ("renameat2");
+ break;
+ case 277: // seccomp
+ ret = enosys ("seccomp");
+ break;
+ case 278: // getrandom
+ ret = enosys ("getrandom");
+ break;
+ case 279: // memfd_create
+ ret = enosys ("seccomp");
+ break;
+ case 280: // bpf
+ ret = enosys ("bpf");
+ break;
+ case 281: // execveat
+ ret = enosys ("execveat");
+ break;
+ case 282: // userfaultfd
+ ret = enosys ("usefaultfd");
+ break;
+ case 283: // membarrier
+ ret = enosys ("membarrier");
+ break;
+ case 284: // mlock2
+ ret = enosys ("mlock2");
+ break;
+ case 285: // copy_file_range
+ ret = enosys ("copy_file_range");
+ break;
+ case 286: // preadv2
+ ret = enosys ("preadv2");
+ break;
+ case 287: // pwritev2
+ ret = enosys ("pwritev2");
+ break;
+ case 288: // pkey_mprotect
+ ret = enosys ("pkey_mprotect");
+ break;
+ case 289: // pkey_alloc
+ ret = enosys ("pkey_alloc");
+ break;
+ case 290: // pkey_free
+ ret = enosys ("pkey_free");
+ break;
+ case 291: // statx
+ ret = enosys ("statx");
+ break;
+ case 292: // io_pgetevents
+ ret = enosys ("io_pgetevents");
+ break;
+ case 293: // rseq
+ ret = enosys ("rseq");
+ break;
+ case 294: // kexec_file_load
+ ret = enosys ("kexec_file_load");
+ break;
+ case 1024: // open
+ ret = map (open ((const char *)(size_t)a0, (int)a1, (int)a2));
+ break;
+ case 1025: // link
+ ret = map (link (str (a0), str (a1)));
+ break;
+ case 1026: // unlink
+ ret = map (unlink (str (a0)));
+ break;
+ case 1030: // mkdir
+ ret = map (mkdir (str (a0), (mode_t)a1));
+ break;
+ case 1033: // access
+ ret = map (access (str (a0), (int)a1));
+ break;
+ case 1038: // stat
+ ret = map (stat (str (a0), &st));
+ stat_to_linux_stat (&lst, &st);
+ memcpy (ptr (void, a1), &lst, sizeof (lst));
+ break;
+ case 1039: // lstat
+ ret = map (lstat (str (a0), &st));
+ stat_to_linux_stat (&lst, &st);
+ memcpy (ptr (void, a1), &lst, sizeof (lst));
+ break;
+ case 1062: // time
+ ret = enosys ("time");
+ break;
+ case 2011: // getmainvars
+ ret = enosys ("getmainvars");
+ break;
+ case 2048:
+ fprintf (stderr, "DEBUG: %u\n", a0);
+ ret = 0;
+ break;
+ default:
+ warnx ("%08x: unimplemented syscall %u", pc - 4, a7);
+ ret = -map_errno (ENOSYS);
+ break;
+ }
+ cpu_set (10, ret);
+}
+
