/* * Copyright (c) 2006-2023, RT-Thread Development Team * * SPDX-License-Identifier: Apache-2.0 * * Change Logs: * Date Author Notes * 2018-06-10 Bernard first version * 2021-02-03 lizhirui add limit condition for network syscall and add 64-bit arch support * 2021-02-06 lizhirui fix some bugs * 2021-02-12 lizhirui add 64-bit support for sys_brk * 2021-02-20 lizhirui fix some warnings * 2023-03-13 WangXiaoyao Format & fix syscall return value * 2023-07-06 Shell adapt the signal API, and clone, fork to new implementation of lwp signal * 2023-07-27 Shell Move tid_put() from lwp_free() to sys_exit() */ #define __RT_IPC_SOURCE__ #define _GNU_SOURCE /* RT-Thread System call */ #include #include #include #include #include #include #define DBG_TAG "lwp.syscall" #define DBG_LVL DBG_INFO #include #include "syscall_generic.h" #include "libc_musl.h" #include "lwp_internal.h" #ifdef ARCH_MM_MMU #include #include #include #endif #include #include #ifdef RT_USING_DFS #include #include #include #include #include #ifdef RT_USING_DFS_V2 #include #endif #include #include /* rename() */ #include #include /* statfs() */ #include #ifdef RT_USING_MUSLLIBC #include #endif #endif #include "mqueue.h" #ifdef RT_USING_SAL #include #include #include #include #include #endif /* RT_USING_SAL */ #if (defined(RT_USING_SAL) && defined(SAL_USING_POSIX)) #include #define SYSCALL_NET(f) f #else #define SYSCALL_NET(f) SYSCALL_SIGN(sys_notimpl) #endif /* (defined(RT_USING_SAL) && defined(SAL_USING_POSIX)) */ #if defined(RT_USING_DFS) && defined(ARCH_MM_MMU) #define SYSCALL_USPACE(f) f #else #define SYSCALL_USPACE(f) SYSCALL_SIGN(sys_notimpl) #endif /* defined(RT_USING_DFS) && defined(ARCH_MM_MMU) */ #include #include "lwp_ipc_internal.h" #include #include #ifndef GRND_NONBLOCK #define GRND_NONBLOCK 0x0001 #endif /* GRND_NONBLOCK */ #ifndef GRND_RANDOM #define GRND_RANDOM 0x0002 #endif /*GRND_RANDOM */ #ifndef RT_USING_POSIX_TIMER #error "No definition RT_USING_POSIX_TIMER" #endif /* RT_USING_POSIX_TIMER */ #ifndef RT_USING_POSIX_CLOCK #error "No definition RT_USING_POSIX_CLOCK" #endif /* RT_USING_POSIX_CLOCK */ void lwp_cleanup(struct rt_thread *tid); #ifdef ARCH_MM_MMU #define ALLOC_KERNEL_STACK_SIZE 5120 static void *kmem_get(size_t size) { return rt_malloc(size); } static void kmem_put(void *kptr) { rt_free(kptr); } #else /* ARCH_MM_MMU */ #define ALLOC_KERNEL_STACK_SIZE 1536 #define ALLOC_KERNEL_STACK_SIZE_MIN 1024 #define ALLOC_KERNEL_STACK_SIZE_MAX 4096 extern void set_user_context(void *stack); #endif /* ARCH_MM_MMU */ #ifdef RT_USING_SAL /* The same socket option is defined differently in the user interfaces and the * implementation. The options should be converted in the kernel. */ #include "lwp_sys_socket.h" static void convert_sockopt(int *level, int *optname) { if (*level == INTF_SOL_SOCKET) { *level = IMPL_SOL_SOCKET; switch (*optname) { case INTF_SO_REUSEADDR: *optname = IMPL_SO_REUSEADDR; break; case INTF_SO_KEEPALIVE: *optname = IMPL_SO_KEEPALIVE; break; case INTF_SO_BROADCAST: *optname = IMPL_SO_BROADCAST; break; case INTF_SO_ACCEPTCONN: *optname = IMPL_SO_ACCEPTCONN; break; case INTF_SO_DONTROUTE: *optname = IMPL_SO_DONTROUTE; break; case INTF_SO_LINGER: *optname = IMPL_SO_LINGER; break; case INTF_SO_OOBINLINE: *optname = IMPL_SO_OOBINLINE; break; case INTF_SO_REUSEPORT: *optname = IMPL_SO_REUSEPORT; break; case INTF_SO_SNDBUF: *optname = IMPL_SO_SNDBUF; break; case INTF_SO_RCVBUF: *optname = IMPL_SO_RCVBUF; break; case INTF_SO_SNDLOWAT: *optname = IMPL_SO_SNDLOWAT; break; case INTF_SO_RCVLOWAT: *optname = IMPL_SO_RCVLOWAT; break; case INTF_SO_SNDTIMEO: *optname = IMPL_SO_SNDTIMEO; break; case INTF_SO_RCVTIMEO: *optname = IMPL_SO_RCVTIMEO; break; case INTF_SO_ERROR: *optname = IMPL_SO_ERROR; break; case INTF_SO_TYPE: *optname = IMPL_SO_TYPE; break; case INTF_SO_NO_CHECK: *optname = IMPL_SO_NO_CHECK; break; /* * SO_DONTLINGER (*level = ((int)(~SO_LINGER))), * SO_USELOOPBACK (*level = 0x0040) and * SO_CONTIMEO (*level = 0x1009) are not supported for now. */ default: *optname = 0; break; } return; } if (*level == INTF_IPPROTO_IP) { *level = IMPL_IPPROTO_IP; switch (*optname) { case INTF_IP_TTL: *optname = IMPL_IP_TTL; break; case INTF_IP_TOS: *optname = IMPL_IP_TOS; break; case INTF_IP_MULTICAST_TTL: *optname = IMPL_IP_MULTICAST_TTL; break; case INTF_IP_MULTICAST_IF: *optname = IMPL_IP_MULTICAST_IF; break; case INTF_IP_MULTICAST_LOOP: *optname = IMPL_IP_MULTICAST_LOOP; break; case INTF_IP_ADD_MEMBERSHIP: *optname = IMPL_IP_ADD_MEMBERSHIP; break; case INTF_IP_DROP_MEMBERSHIP: *optname = IMPL_IP_DROP_MEMBERSHIP; break; default: break; } } if (*level == INTF_IPPROTO_TCP) { *level = IMPL_IPPROTO_TCP; switch (*optname) { case INTF_TCP_NODELAY: *optname = IMPL_TCP_NODELAY; break; case INTF_TCP_KEEPALIVE: *optname = IMPL_TCP_KEEPALIVE; break; case INTF_TCP_KEEPIDLE: *optname = IMPL_TCP_KEEPIDLE; break; case INTF_TCP_KEEPINTVL: *optname = IMPL_TCP_KEEPINTVL; break; case INTF_TCP_KEEPCNT: *optname = IMPL_TCP_KEEPCNT; break; default: break; } return; } if (*level == INTF_IPPROTO_IPV6) { *level = IMPL_IPPROTO_IPV6; switch (*optname) { case INTF_IPV6_V6ONLY: *optname = IMPL_IPV6_V6ONLY; break; default: break; } return; } } #endif /* RT_USING_SAL */ #if defined(RT_USING_LWIP) || defined(SAL_USING_UNET) static void sockaddr_tolwip(const struct musl_sockaddr *std, struct sockaddr *lwip) { if (std && lwip) { lwip->sa_len = sizeof(*lwip); lwip->sa_family = (sa_family_t) std->sa_family; memcpy(lwip->sa_data, std->sa_data, sizeof(lwip->sa_data)); } } static void sockaddr_tomusl(const struct sockaddr *lwip, struct musl_sockaddr *std) { if (std && lwip) { std->sa_family = (uint16_t) lwip->sa_family; memcpy(std->sa_data, lwip->sa_data, sizeof(std->sa_data)); } } #endif static void _crt_thread_entry(void *parameter) { rt_thread_t tid; rt_size_t user_stack; tid = rt_thread_self(); user_stack = (rt_size_t)tid->user_stack + tid->user_stack_size; user_stack &= ~7; //align 8 #ifdef ARCH_MM_MMU arch_crt_start_umode(parameter, tid->user_entry, (void *)user_stack, (char *)tid->stack_addr + tid->stack_size); #else set_user_context((void*)user_stack); arch_start_umode(parameter, tid->user_entry, ((struct rt_lwp *)tid->lwp)->data_entry, (void*)user_stack); #endif /* ARCH_MM_MMU */ } /* exit group */ sysret_t sys_exit_group(int value) { sysret_t rc = 0; struct rt_lwp *lwp = lwp_self(); if (lwp) lwp_exit(lwp, value); else { LOG_E("Can't find matching process of current thread"); rc = -EINVAL; } return rc; } /* thread exit */ sysret_t sys_exit(int status) { sysret_t rc = 0; rt_thread_t tid; tid = rt_thread_self(); if (tid && tid->lwp) lwp_thread_exit(tid, status); { LOG_E("Can't find matching process of current thread"); rc = -EINVAL; } return rc; } /* syscall: "read" ret: "ssize_t" args: "int" "void *" "size_t" */ ssize_t sys_read(int fd, void *buf, size_t nbyte) { #ifdef ARCH_MM_MMU void *kmem = RT_NULL; ssize_t ret = -1; if (!nbyte) { return -EINVAL; } if (!lwp_user_accessable((void *)buf, nbyte)) { return -EFAULT; } kmem = kmem_get(nbyte); if (!kmem) { return -ENOMEM; } ret = read(fd, kmem, nbyte); if (ret > 0) { if (ret != lwp_put_to_user(buf, kmem, ret)) return -EFAULT; } if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kmem); return ret; #else if (!lwp_user_accessable((void *)buf, nbyte)) { return -EFAULT; } ssize_t ret = read(fd, buf, nbyte); return (ret < 0 ? GET_ERRNO() : ret); #endif } /* syscall: "write" ret: "ssize_t" args: "int" "const void *" "size_t" */ ssize_t sys_write(int fd, const void *buf, size_t nbyte) { #ifdef ARCH_MM_MMU void *kmem = RT_NULL; ssize_t ret = -1; if (nbyte) { if (!lwp_user_accessable((void *)buf, nbyte)) { return -EFAULT; } kmem = kmem_get(nbyte); if (!kmem) { return -ENOMEM; } lwp_get_from_user(kmem, (void *)buf, nbyte); } ret = write(fd, kmem, nbyte); if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kmem); return ret; #else if (!lwp_user_accessable((void *)buf, nbyte)) { return -EFAULT; } ssize_t ret = write(fd, buf, nbyte); return (ret < 0 ? GET_ERRNO() : ret); #endif } /* syscall: "lseek" ret: "off_t" args: "int" "off_t" "int" */ size_t sys_lseek(int fd, size_t offset, int whence) { size_t ret = lseek(fd, offset, whence); return (ret < 0 ? GET_ERRNO() : ret); } /* syscall: "open" ret: "int" args: "const char *" "int" "..." */ sysret_t sys_open(const char *name, int flag, ...) { #ifdef ARCH_MM_MMU int ret = -1; rt_size_t len = 0; char *kname = RT_NULL; mode_t mode = 0; if (!lwp_user_accessable((void *)name, 1)) { return -EFAULT; } len = lwp_user_strlen(name); if (!len) { return -EINVAL; } kname = (char *)kmem_get(len + 1); if (!kname) { return -ENOMEM; } if ((flag & O_CREAT) || (flag & O_TMPFILE) == O_TMPFILE) { va_list ap; va_start(ap, flag); mode = va_arg(ap, mode_t); va_end(ap); } if (lwp_get_from_user(kname, (void *)name, len + 1) != (len + 1)) { kmem_put(kname); return -EINVAL; } ret = open(kname, flag, mode); if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kname); return ret; #else int ret; mode_t mode = 0; if (!lwp_user_accessable((void *)name, 1)) { return -EFAULT; } if ((flag & O_CREAT) || (flag & O_TMPFILE) == O_TMPFILE) { va_list ap; va_start(ap, flag); mode = va_arg(ap, mode_t); va_end(ap); } ret = open(name, flag, mode); return (ret < 0 ? GET_ERRNO() : ret); #endif } /* syscall: "openat" ret: "int" args: "const char *" "mode_t" "mode" */ sysret_t sys_openat(int dirfd, const char *name, int flag, mode_t mode) { #ifdef ARCH_MM_MMU int ret = -1; rt_size_t len = 0; char *kname = RT_NULL; len = lwp_user_strlen(name); if (len <= 0) { return -EINVAL; } kname = (char *)kmem_get(len + 1); if (!kname) { return -ENOMEM; } lwp_get_from_user(kname, (void *)name, len + 1); ret = openat(dirfd, kname, flag, mode); if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kname); return ret; #else if (!lwp_user_accessable((void *)name, 1)) { return -EFAULT; } int ret = openat(dirfd, name, flag, mode); return (ret < 0 ? GET_ERRNO() : ret); #endif } /* syscall: "close" ret: "int" args: "int" */ sysret_t sys_close(int fd) { int ret = close(fd); return (ret < 0 ? GET_ERRNO() : ret); } /* syscall: "ioctl" ret: "int" args: "int" "u_long" "..." */ sysret_t sys_ioctl(int fd, unsigned long cmd, void* data) { int ret = ioctl(fd, cmd, data); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_fstat(int file, struct stat *buf) { #ifdef ARCH_MM_MMU int ret = -1; struct stat statbuff = {0}; if (!lwp_user_accessable((void *)buf, sizeof(struct stat))) { return -EFAULT; } else { ret = fstat(file, &statbuff); if (ret == 0) { lwp_put_to_user(buf, &statbuff, sizeof statbuff); } else { ret = GET_ERRNO(); } return ret; } #else if (!lwp_user_accessable((void *)buf, sizeof(struct stat))) { return -EFAULT; } int ret = fstat(file, buf); return (ret < 0 ? GET_ERRNO() : ret); #endif } /* DFS and lwip definitions */ #define IMPL_POLLIN (0x01) #define IMPL_POLLOUT (0x02) #define IMPL_POLLERR (0x04) #define IMPL_POLLHUP (0x08) #define IMPL_POLLNVAL (0x10) /* musl definitions */ #define INTF_POLLIN 0x001 #define INTF_POLLPRI 0x002 #define INTF_POLLOUT 0x004 #define INTF_POLLERR 0x008 #define INTF_POLLHUP 0x010 #define INTF_POLLNVAL 0x020 #define INTF_POLLRDNORM 0x040 #define INTF_POLLRDBAND 0x080 #define INTF_POLLWRNORM 0x100 #define INTF_POLLWRBAND 0x200 #define INTF_POLLMSG 0x400 #define INTF_POLLRDHUP 0x2000 #define INTF_POLLIN_MASK (INTF_POLLIN | INTF_POLLRDNORM | INTF_POLLRDBAND | INTF_POLLPRI) #define INTF_POLLOUT_MASK (INTF_POLLOUT | INTF_POLLWRNORM | INTF_POLLWRBAND) static void musl2dfs_events(short *events) { short origin_e = *events; short result_e = 0; if (origin_e & INTF_POLLIN_MASK) { result_e |= IMPL_POLLIN; } if (origin_e & INTF_POLLOUT_MASK) { result_e |= IMPL_POLLOUT; } if (origin_e & INTF_POLLERR) { result_e |= IMPL_POLLERR; } if (origin_e & INTF_POLLHUP) { result_e |= IMPL_POLLHUP; } if (origin_e & INTF_POLLNVAL) { result_e |= IMPL_POLLNVAL; } *events = result_e; } static void dfs2musl_events(short *events) { short origin_e = *events; short result_e = 0; if (origin_e & IMPL_POLLIN) { result_e |= INTF_POLLIN_MASK; } if (origin_e & IMPL_POLLOUT) { result_e |= INTF_POLLOUT_MASK; } if (origin_e & IMPL_POLLERR) { result_e |= INTF_POLLERR; } if (origin_e & IMPL_POLLHUP) { result_e |= INTF_POLLHUP; } if (origin_e & IMPL_POLLNVAL) { result_e |= INTF_POLLNVAL; } *events = result_e; } sysret_t sys_poll(struct pollfd *fds, nfds_t nfds, int timeout) { int ret = -1; int i = 0; #ifdef ARCH_MM_MMU struct pollfd *kfds = RT_NULL; if (!lwp_user_accessable((void *)fds, nfds * sizeof *fds)) { return -EFAULT; } kfds = (struct pollfd *)kmem_get(nfds * sizeof *kfds); if (!kfds) { return -ENOMEM; } lwp_get_from_user(kfds, fds, nfds * sizeof *kfds); for (i = 0; i < nfds; i++) { musl2dfs_events(&kfds[i].events); } ret = poll(kfds, nfds, timeout); if (ret > 0) { for (i = 0; i < nfds; i++) { dfs2musl_events(&kfds->revents); } lwp_put_to_user(fds, kfds, nfds * sizeof *kfds); } kmem_put(kfds); return ret; #else #ifdef RT_USING_MUSLLIBC for (i = 0; i < nfds; i++) { musl2dfs_events(&fds->events); } #endif /* RT_USING_MUSLLIBC */ if (!lwp_user_accessable((void *)fds, nfds * sizeof *fds)) { return -EFAULT; } ret = poll(fds, nfds, timeout); #ifdef RT_USING_MUSLLIBC if (ret > 0) { for (i = 0; i < nfds; i++) { dfs2musl_events(&fds->revents); } } #endif /* RT_USING_MUSLLIBC */ return ret; #endif /* ARCH_MM_MMU */ } sysret_t sys_select(int nfds, fd_set *readfds, fd_set *writefds, fd_set *exceptfds, struct timeval *timeout) { #ifdef ARCH_MM_MMU int ret = -1; fd_set *kreadfds = RT_NULL, *kwritefds = RT_NULL, *kexceptfds = RT_NULL; if (readfds) { if (!lwp_user_accessable((void *)readfds, sizeof *readfds)) { SET_ERRNO(EFAULT); goto quit; } kreadfds = (fd_set *)kmem_get(sizeof *kreadfds); if (!kreadfds) { SET_ERRNO(ENOMEM); goto quit; } lwp_get_from_user(kreadfds, readfds, sizeof *kreadfds); } if (writefds) { if (!lwp_user_accessable((void *)writefds, sizeof *writefds)) { SET_ERRNO(EFAULT); goto quit; } kwritefds = (fd_set *)kmem_get(sizeof *kwritefds); if (!kwritefds) { SET_ERRNO(ENOMEM); goto quit; } lwp_get_from_user(kwritefds, writefds, sizeof *kwritefds); } if (exceptfds) { if (!lwp_user_accessable((void *)exceptfds, sizeof *exceptfds)) { SET_ERRNO(EFAULT); goto quit; } kexceptfds = (fd_set *)kmem_get(sizeof *kexceptfds); if (!kexceptfds) { SET_ERRNO(EINVAL); goto quit; } lwp_get_from_user(kexceptfds, exceptfds, sizeof *kexceptfds); } ret = select(nfds, kreadfds, kwritefds, kexceptfds, timeout); if (kreadfds) { lwp_put_to_user(readfds, kreadfds, sizeof *kreadfds); } if (kwritefds) { lwp_put_to_user(writefds, kwritefds, sizeof *kwritefds); } if (kexceptfds) { lwp_put_to_user(exceptfds, kexceptfds, sizeof *kexceptfds); } quit: if (ret < 0) { ret = GET_ERRNO(); } if (kreadfds) { kmem_put(kreadfds); } if (kwritefds) { kmem_put(kwritefds); } if (kexceptfds) { kmem_put(kexceptfds); } return ret; #else int ret; if (!lwp_user_accessable((void *)readfds, sizeof *readfds)) { return -EFAULT; } if (!lwp_user_accessable((void *)writefds, sizeof *writefds)) { return -EFAULT; } if (!lwp_user_accessable((void *)exceptfds, sizeof *exceptfds)) { return -EFAULT; } ret = select(nfds, readfds, writefds, exceptfds, timeout); return (ret < 0 ? GET_ERRNO() : ret); #endif } sysret_t sys_unlink(const char *pathname) { #ifdef ARCH_MM_MMU int ret = -1; rt_size_t len = 0; char *kname = RT_NULL; len = lwp_user_strlen(pathname); if (!len) { return -EINVAL; } kname = (char *)kmem_get(len + 1); if (!kname) { return -ENOMEM; } if (lwp_get_from_user(kname, (void *)pathname, len + 1) != (len + 1)) { kmem_put(kname); return -EINVAL; } ret = unlink(kname); if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kname); return ret; #else int ret = 0; ret = unlink(pathname); return (ret < 0 ? GET_ERRNO() : ret); #endif } /* syscall: "nanosleep" ret: "int" args: "const struct timespec *" "struct timespec *" */ sysret_t sys_nanosleep(const struct timespec *rqtp, struct timespec *rmtp) { int ret = 0; dbg_log(DBG_LOG, "sys_nanosleep\n"); if (!lwp_user_accessable((void *)rqtp, sizeof *rqtp)) return -EFAULT; #ifdef ARCH_MM_MMU struct timespec rqtp_k; struct timespec rmtp_k; lwp_get_from_user(&rqtp_k, (void *)rqtp, sizeof rqtp_k); ret = nanosleep(&rqtp_k, &rmtp_k); if ((ret != -1 || rt_get_errno() == EINTR) && rmtp && lwp_user_accessable((void *)rmtp, sizeof *rmtp)) { lwp_put_to_user(rmtp, (void *)&rmtp_k, sizeof rmtp_k); if(ret != 0) return -EINTR; } #else if (rmtp) { if (!lwp_user_accessable((void *)rmtp, sizeof *rmtp)) return -EFAULT; ret = nanosleep(rqtp, rmtp); } #endif return (ret < 0 ? GET_ERRNO() : ret); } /* syscall: "gettimeofday" ret: "int" args: "struct timeval *" "struct timezone *" */ sysret_t sys_gettimeofday(struct timeval *tp, struct timezone *tzp) { #ifdef ARCH_MM_MMU struct timeval t_k; if (tp) { if (!lwp_user_accessable((void *)tp, sizeof *tp)) { return -EFAULT; } t_k.tv_sec = rt_tick_get() / RT_TICK_PER_SECOND; t_k.tv_usec = (rt_tick_get() % RT_TICK_PER_SECOND) * (1000000 / RT_TICK_PER_SECOND); lwp_put_to_user(tp, (void *)&t_k, sizeof t_k); } #else if (tp) { if (!lwp_user_accessable((void *)tp, sizeof *tp)) { return -EFAULT; } tp->tv_sec = rt_tick_get() / RT_TICK_PER_SECOND; tp->tv_usec = (rt_tick_get() % RT_TICK_PER_SECOND) * (1000000 / RT_TICK_PER_SECOND); } #endif return 0; } sysret_t sys_settimeofday(const struct timeval *tv, const struct timezone *tzp) { return 0; } sysret_t sys_exec(char *filename, int argc, char **argv, char **envp) { int ret = 0; int len = 0; char *kfilename = RT_NULL; len = lwp_user_strlen(filename); if (len <= 0) { return -EFAULT; } kfilename = (char *)kmem_get(len + 1); if (!kfilename) { return -ENOMEM; } if (lwp_get_from_user(kfilename, (void *)filename, len + 1) != (len + 1)) { kmem_put(kfilename); return -EFAULT; } ret = lwp_execve(kfilename, 0, argc, argv, envp); kmem_put(kfilename); return ret; } sysret_t sys_kill(int pid, int signo) { rt_err_t kret; sysret_t sysret; struct rt_lwp *lwp; /* handling the semantics of sys_kill */ if (pid > 0) { /** * Brief: Match the pid and send signal to the lwp if found * Note: Critical Section * - pid tree (READ. since the lwp is fetch from the pid tree, it must stay there) */ lwp_pid_lock_take(); lwp = lwp_from_pid_locked(pid); if (lwp) { lwp_ref_inc(lwp); lwp_pid_lock_release(); kret = lwp_signal_kill(lwp, signo, SI_USER, 0); lwp_ref_dec(lwp); kret = 0; } else { lwp_pid_lock_release(); kret = -RT_ENOENT; } } else if (pid == 0) { /** * sig shall be sent to all processes (excluding an unspecified set * of system processes) whose process group ID is equal to the process * group ID of the sender, and for which the process has permission to * send a signal. */ kret = -RT_ENOSYS; } else if (pid == -1) { /** * sig shall be sent to all processes (excluding an unspecified set * of system processes) for which the process has permission to send * that signal. */ kret = -RT_ENOSYS; } else /* pid < -1 */ { /** * sig shall be sent to all processes (excluding an unspecified set * of system processes) whose process group ID is equal to the absolute * value of pid, and for which the process has permission to send a signal. */ kret = -RT_ENOSYS; } switch (kret) { case -RT_ENOENT: sysret = -ESRCH; break; case -RT_EINVAL: sysret = -EINVAL; break; case -RT_ENOSYS: sysret = -ENOSYS; break; /** * kill() never returns ENOMEM, so return normally to caller. * IEEE Std 1003.1-2017 says the kill() function is successful * if the process has permission to send sig to any of the * processes specified by pid. */ case -RT_ENOMEM: default: sysret = 0; } return sysret; } sysret_t sys_getpid(void) { return lwp_getpid(); } /* syscall: "getpriority" ret: "int" args: "int" "id_t" */ sysret_t sys_getpriority(int which, id_t who) { long prio = 0xff; if (which == PRIO_PROCESS) { struct rt_lwp *lwp = RT_NULL; lwp_pid_lock_take(); if(who == 0) lwp = lwp_self(); else lwp = lwp_from_pid_locked(who); if (lwp) { rt_thread_t thread = rt_list_entry(lwp->t_grp.prev, struct rt_thread, sibling); prio = RT_SCHED_PRIV(thread).current_priority; } lwp_pid_lock_release(); } return prio; } /* syscall: "setpriority" ret: "int" args: "int" "id_t" "int" */ sysret_t sys_setpriority(int which, id_t who, int prio) { if (which == PRIO_PROCESS) { struct rt_lwp *lwp = RT_NULL; lwp_pid_lock_take(); if(who == 0) lwp = lwp_self(); else lwp = lwp_from_pid_locked(who); if (lwp && prio >= 0 && prio < RT_THREAD_PRIORITY_MAX) { rt_list_t *list; rt_thread_t thread; for (list = lwp->t_grp.next; list != &lwp->t_grp; list = list->next) { thread = rt_list_entry(list, struct rt_thread, sibling); rt_thread_control(thread, RT_THREAD_CTRL_CHANGE_PRIORITY, &prio); } lwp_pid_lock_release(); return 0; } else { lwp_pid_lock_release(); } } return -1; } rt_sem_t sys_sem_create(const char *name, rt_uint32_t value, rt_uint8_t flag) { int len = 0; char *kname = RT_NULL; len = lwp_user_strlen(name); if (len <= 0) { return RT_NULL; } kname = (char *)kmem_get(len + 1); if (!kname) { return RT_NULL; } if (lwp_get_from_user(kname, (void *)name, len + 1) != (len + 1)) { kmem_put(kname); return RT_NULL; } rt_sem_t sem = rt_sem_create(kname, value, flag); if (lwp_user_object_add(lwp_self(), (rt_object_t)sem) != 0) { rt_sem_delete(sem); sem = NULL; } kmem_put(kname); return sem; } sysret_t sys_sem_delete(rt_sem_t sem) { return lwp_user_object_delete(lwp_self(), (rt_object_t)sem); } sysret_t sys_sem_take(rt_sem_t sem, rt_int32_t time) { return rt_sem_take_interruptible(sem, time); } sysret_t sys_sem_release(rt_sem_t sem) { return rt_sem_release(sem); } rt_mutex_t sys_mutex_create(const char *name, rt_uint8_t flag) { int len = 0; char *kname = RT_NULL; rt_mutex_t mutex = RT_NULL; len = lwp_user_strlen(name); if (len <= 0) { return RT_NULL; } kname = (char *)kmem_get(len + 1); if (!kname) { return RT_NULL; } if (lwp_get_from_user(kname, (void *)name, len + 1) != (len + 1)) { kmem_put(kname); return RT_NULL; } mutex = rt_mutex_create(kname, flag); if(mutex == RT_NULL) return RT_NULL; if (lwp_user_object_add(lwp_self(), (rt_object_t)mutex) != 0) { rt_mutex_delete(mutex); mutex = RT_NULL; } kmem_put(kname); return mutex; } sysret_t sys_mutex_delete(rt_mutex_t mutex) { return lwp_user_object_delete(lwp_self(), (rt_object_t)mutex); } sysret_t sys_mutex_take(rt_mutex_t mutex, rt_int32_t time) { return rt_mutex_take_interruptible(mutex, time); } sysret_t sys_mutex_release(rt_mutex_t mutex) { return rt_mutex_release(mutex); } #ifdef ARCH_MM_MMU /* memory allocation */ rt_base_t sys_brk(void *addr) { return lwp_brk(addr); } void *sys_mmap2(void *addr, size_t length, int prot, int flags, int fd, size_t pgoffset) { sysret_t rc = 0; long offset = 0; /* aligned for user addr */ if ((rt_base_t)addr & ARCH_PAGE_MASK) { if (flags & MAP_FIXED) rc = -EINVAL; else { offset = (char *)addr - (char *)RT_ALIGN_DOWN((rt_base_t)addr, ARCH_PAGE_SIZE); length += offset; addr = (void *)RT_ALIGN_DOWN((rt_base_t)addr, ARCH_PAGE_SIZE); } } if (rc == 0) { /* fix parameter passing (both along have same effect) */ if (fd == -1 || flags & MAP_ANONYMOUS) { fd = -1; /* MAP_SHARED has no effect and treated as nothing */ flags &= ~MAP_SHARED; flags |= MAP_PRIVATE | MAP_ANONYMOUS; } rc = (sysret_t)lwp_mmap2(lwp_self(), addr, length, prot, flags, fd, pgoffset); } return (char *)rc + offset; } sysret_t sys_munmap(void *addr, size_t length) { return lwp_munmap(lwp_self(), addr, length); } void *sys_mremap(void *old_address, size_t old_size, size_t new_size, int flags, void *new_address) { return (void *)-1; } sysret_t sys_madvise(void *addr, size_t len, int behav) { return -ENOSYS; } #endif rt_event_t sys_event_create(const char *name, rt_uint8_t flag) { int len = 0; rt_event_t event = RT_NULL; char *kname = RT_NULL; len = lwp_user_strlen(name); if (len <= 0) { return RT_NULL; } kname = (char *)kmem_get(len + 1); if (!kname) { return RT_NULL; } if (lwp_get_from_user(kname, (void *)name, len + 1) != (len + 1)) { kmem_put(kname); return RT_NULL; } event = rt_event_create(kname, flag); if (lwp_user_object_add(lwp_self(), (rt_object_t)event) != 0) { rt_event_delete(event); event = NULL; } kmem_put(kname); return event; } sysret_t sys_event_delete(rt_event_t event) { return lwp_user_object_delete(lwp_self(), (rt_object_t)event); } sysret_t sys_event_send(rt_event_t event, rt_uint32_t set) { return rt_event_send(event, set); } sysret_t sys_event_recv(rt_event_t event, rt_uint32_t set, rt_uint8_t opt, rt_int32_t timeout, rt_uint32_t *recved) { int ret = 0; rt_uint32_t krecved; if ((recved != NULL) && !lwp_user_accessable((void *)recved, sizeof(rt_uint32_t *))) { return -EFAULT; } ret = rt_event_recv(event, set, opt, timeout, &krecved); if ((ret == RT_EOK) && recved) { lwp_put_to_user((void *)recved, &krecved, sizeof(rt_uint32_t *)); } return ret; } rt_mailbox_t sys_mb_create(const char *name, rt_size_t size, rt_uint8_t flag) { int len = 0; rt_mailbox_t mb = RT_NULL; char *kname = RT_NULL; len = lwp_user_strlen(name); if (len <= 0) { return RT_NULL; } kname = (char *)kmem_get(len + 1); if (!kname) { return RT_NULL; } if (lwp_get_from_user(kname, (void *)name, len + 1) != (len + 1)) { kmem_put(kname); return RT_NULL; } mb = rt_mb_create(kname, size, flag); if (lwp_user_object_add(lwp_self(), (rt_object_t)mb) != 0) { rt_mb_delete(mb); mb = NULL; } kmem_put(kname); return mb; } sysret_t sys_mb_delete(rt_mailbox_t mb) { return lwp_user_object_delete(lwp_self(), (rt_object_t)mb); } sysret_t sys_mb_send(rt_mailbox_t mb, rt_ubase_t value) { return rt_mb_send(mb, value); } sysret_t sys_mb_send_wait(rt_mailbox_t mb, rt_ubase_t value, rt_int32_t timeout) { return rt_mb_send_wait(mb, value, timeout); } sysret_t sys_mb_recv(rt_mailbox_t mb, rt_ubase_t *value, rt_int32_t timeout) { int ret = 0; rt_ubase_t *kvalue; if (!lwp_user_accessable((void *)value, sizeof(rt_ubase_t *))) { return -EFAULT; } kvalue = kmem_get(sizeof(rt_ubase_t *)); if (kvalue == RT_NULL) { return -ENOMEM; } ret = rt_mb_recv(mb, (rt_ubase_t *)kvalue, timeout); if (ret == RT_EOK) { lwp_put_to_user(value, kvalue, sizeof(rt_ubase_t *)); } kmem_put(kvalue); return ret; } rt_mq_t sys_mq_create(const char *name, rt_size_t msg_size, rt_size_t max_msgs, rt_uint8_t flag) { rt_mq_t mq = RT_NULL; int len = 0; char *kname = RT_NULL; len = lwp_user_strlen(name); if (len <= 0) { return RT_NULL; } kname = (char *)kmem_get(len + 1); if (!kname) { return RT_NULL; } if (lwp_get_from_user(kname, (void *)name, len + 1) != (len + 1)) { kmem_put(kname); return RT_NULL; } mq = rt_mq_create(kname, msg_size, max_msgs, flag); if (lwp_user_object_add(lwp_self(), (rt_object_t)mq) != 0) { rt_mq_delete(mq); mq = NULL; } kmem_put(kname); return mq; } sysret_t sys_mq_delete(rt_mq_t mq) { return lwp_user_object_delete(lwp_self(), (rt_object_t)mq); } sysret_t sys_mq_send(rt_mq_t mq, void *buffer, rt_size_t size) { int ret = 0; void *kbuffer = RT_NULL; if (!lwp_user_accessable((void *)buffer, size)) { return -EFAULT; } kbuffer = kmem_get(size); if (kbuffer == RT_NULL) { return -ENOMEM; } if (lwp_get_from_user(kbuffer, buffer, size) != size) { kmem_put(kbuffer); return -EINVAL; } ret = rt_mq_send(mq, kbuffer, size); kmem_put(kbuffer); return ret; } sysret_t sys_mq_urgent(rt_mq_t mq, void *buffer, rt_size_t size) { int ret = 0; void *kbuffer = RT_NULL; if (!lwp_user_accessable((void *)buffer, size)) { return -EFAULT; } kbuffer = kmem_get(size); if (kbuffer == RT_NULL) { return -ENOMEM; } if (lwp_get_from_user(kbuffer, buffer, size) != size) { kmem_put(kbuffer); return -EINVAL; } ret = rt_mq_urgent(mq, kbuffer, size); kmem_put(kbuffer); return ret; } sysret_t sys_mq_recv(rt_mq_t mq, void *buffer, rt_size_t size, rt_int32_t timeout) { int ret = 0; void *kbuffer = RT_NULL; if (!lwp_user_accessable((void *)buffer, size)) { return -EFAULT; } kbuffer = kmem_get(size); if (kbuffer == RT_NULL) { return -ENOMEM; } ret = rt_mq_recv(mq, kbuffer, size, timeout); if (ret > 0) lwp_put_to_user((void *)buffer, (void *)kbuffer, ret); kmem_put(kbuffer); return ret; } static void timer_timeout_callback(void *parameter) { rt_sem_t sem = (rt_sem_t)parameter; rt_sem_release(sem); } rt_timer_t sys_rt_timer_create(const char *name, void *data, rt_tick_t time, rt_uint8_t flag) { int len = 0; char *kname = RT_NULL; rt_timer_t timer = RT_NULL; len = lwp_user_strlen(name); if (len <= 0) { return RT_NULL; } kname = (char *)kmem_get(len + 1); if (!kname) { return RT_NULL; } if (lwp_get_from_user(kname, (void *)name, len + 1) != (len + 1)) { kmem_put(kname); return RT_NULL; } timer = rt_timer_create(kname, timer_timeout_callback, (void *)data, time, flag); if (lwp_user_object_add(lwp_self(), (rt_object_t)timer) != 0) { rt_timer_delete(timer); timer = NULL; } kmem_put(kname); return timer; } sysret_t sys_rt_timer_delete(rt_timer_t timer) { return lwp_user_object_delete(lwp_self(), (rt_object_t)timer); } sysret_t sys_rt_timer_start(rt_timer_t timer) { return rt_timer_start(timer); } sysret_t sys_rt_timer_stop(rt_timer_t timer) { return rt_timer_stop(timer); } sysret_t sys_rt_timer_control(rt_timer_t timer, int cmd, void *arg) { return rt_timer_control(timer, cmd, arg); } /* MUSL compatible */ struct ksigevent { union sigval sigev_value; int sigev_signo; int sigev_notify; int sigev_tid; }; /* to protect unsafe implementation in current rt-smart toolchain */ RT_STATIC_ASSERT(sigevent_compatible, offsetof(struct ksigevent, sigev_tid) == offsetof(struct sigevent, sigev_notify_function)); sysret_t sys_timer_create(clockid_t clockid, struct sigevent *restrict sevp, timer_t *restrict timerid) { int ret = 0; #ifdef ARCH_MM_MMU struct sigevent sevp_k; timer_t timerid_k; int utimer; if (sevp == NULL) { sevp_k.sigev_notify = SIGEV_SIGNAL; sevp_k.sigev_signo = SIGALRM; sevp = &sevp_k; } else { /* clear extra bytes if any */ if (sizeof(struct ksigevent) < sizeof(struct sigevent)) memset(&sevp_k, 0, sizeof(sevp_k)); /* musl passes `struct ksigevent` to kernel, we shoule only get size of that bytes */ if (!lwp_get_from_user(&sevp_k, (void *)sevp, sizeof(struct ksigevent))) { return -EINVAL; } } ret = _SYS_WRAP(timer_create(clockid, &sevp_k, &timerid_k)); if (ret != -RT_ERROR) { utimer = (rt_ubase_t)timerid_k; if (!lwp_put_to_user(sevp, (void *)&sevp_k, sizeof(struct ksigevent)) || !lwp_put_to_user(timerid, (void *)&utimer, sizeof(utimer))) ret = -EINVAL; } #else ret = _SYS_WRAP(timer_create(clockid, sevp, timerid)); #endif return ret; } sysret_t sys_timer_delete(timer_t timerid) { int ret = timer_delete(timerid); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_timer_settime(timer_t timerid, int flags, const struct itimerspec *restrict new_value, struct itimerspec *restrict old_value) { int ret = 0; #ifdef ARCH_MM_MMU struct itimerspec new_value_k; struct itimerspec old_value_k; if (!lwp_get_from_user(&new_value_k, (void *)new_value, sizeof(*new_value)) || (old_value && !lwp_get_from_user(&old_value_k, (void *)old_value, sizeof(*old_value)))) { return -EFAULT; } ret = timer_settime(timerid, flags, &new_value_k, &old_value_k); lwp_put_to_user(old_value, (void *)&old_value_k, sizeof old_value_k); #else ret = timer_settime(timerid, flags, new_value, old_value); #endif return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_timer_gettime(timer_t timerid, struct itimerspec *curr_value) { int ret = 0; #ifdef ARCH_MM_MMU struct itimerspec curr_value_k; lwp_get_from_user(&curr_value_k, (void *)curr_value, sizeof curr_value_k); ret = timer_gettime(timerid, &curr_value_k); lwp_put_to_user(curr_value, (void *)&curr_value_k, sizeof curr_value_k); #else ret = timer_gettime(timerid, curr_value); #endif return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_timer_getoverrun(timer_t timerid) { int ret = 0; ret = timer_getoverrun(timerid); return (ret < 0 ? GET_ERRNO() : ret); } rt_thread_t sys_thread_create(void *arg[]) { void *user_stack = 0; struct rt_lwp *lwp = 0; rt_thread_t thread = RT_NULL; int tid = 0; lwp = rt_thread_self()->lwp; lwp_ref_inc(lwp); #ifdef ARCH_MM_MMU user_stack = lwp_map_user(lwp, 0, (size_t)arg[3], 0); if (!user_stack) { goto fail; } if ((tid = lwp_tid_get()) == 0) { goto fail; } thread = rt_thread_create((const char *)arg[0], _crt_thread_entry, (void *)arg[2], ALLOC_KERNEL_STACK_SIZE, (rt_uint8_t)(size_t)arg[4], (rt_uint32_t)(rt_size_t)arg[5]); if (!thread) { goto fail; } #ifdef RT_USING_SMP RT_SCHED_CTX(thread).bind_cpu = lwp->bind_cpu; #endif thread->cleanup = lwp_cleanup; thread->user_entry = (void (*)(void *))arg[1]; thread->user_stack = (void *)user_stack; thread->user_stack_size = (rt_size_t)arg[3]; #else rt_uint32_t kstack_size = (rt_uint32_t)arg[7]; if (kstack_size < ALLOC_KERNEL_STACK_SIZE_MIN) { /* When kstack size is 0, the default size of the kernel stack is used */ kstack_size = kstack_size ? ALLOC_KERNEL_STACK_SIZE_MIN : ALLOC_KERNEL_STACK_SIZE; } else if (kstack_size > ALLOC_KERNEL_STACK_SIZE_MAX) { kstack_size = ALLOC_KERNEL_STACK_SIZE_MAX; } user_stack = (void *)arg[3]; if ((!user_stack) || ((rt_uint32_t)arg[6] == RT_NULL)) { goto fail; } if ((tid = lwp_tid_get()) == 0) { goto fail; } thread = rt_thread_create((const char *)arg[0], _crt_thread_entry, (void *)arg[2], kstack_size, (rt_uint8_t)(size_t)arg[5], (rt_uint32_t)arg[6]); if (!thread) { goto fail; } thread->cleanup = lwp_cleanup; thread->user_entry = (void (*)(void *))arg[1]; thread->user_stack = (void *)user_stack; thread->user_stack_size = (uint32_t)arg[4]; rt_memset(thread->user_stack, '#', thread->user_stack_size); #endif /* ARCH_MM_MMU */ thread->lwp = (void*)lwp; thread->tid = tid; lwp_tid_set_thread(tid, thread); if (lwp->debug) { rt_thread_control(thread, RT_THREAD_CTRL_BIND_CPU, (void*)0); } LWP_LOCK(lwp); rt_list_insert_after(&lwp->t_grp, &thread->sibling); LWP_UNLOCK(lwp); return thread; fail: lwp_tid_put(tid); if (lwp) { lwp_ref_dec(lwp); } return RT_NULL; } #ifdef ARCH_MM_MMU long _sys_clone(void *arg[]) { struct rt_lwp *lwp = 0; rt_thread_t thread = RT_NULL; rt_thread_t self = RT_NULL; int tid = 0; unsigned long flags = 0; void *user_stack = RT_NULL; int *new_tid = RT_NULL; void *tls = RT_NULL; /* musl call flags (CLONE_VM | CLONE_FS | CLONE_FILES | CLONE_SIGHAND | CLONE_THREAD | CLONE_SYSVSEM | CLONE_SETTLS | CLONE_PARENT_SETTID | CLONE_CHILD_CLEARTID | CLONE_DETACHED); */ /* check args */ if (!lwp_user_accessable(arg, sizeof(void *[SYS_CLONE_ARGS_NR]))) { return -EFAULT; } flags = (unsigned long)(size_t)arg[0]; if ((flags & (CLONE_VM | CLONE_FS | CLONE_FILES | CLONE_THREAD | CLONE_SYSVSEM)) != (CLONE_VM | CLONE_FS | CLONE_FILES | CLONE_THREAD | CLONE_SYSVSEM)) { return -EINVAL; } user_stack = arg[1]; new_tid = (int *)arg[2]; tls = (void *)arg[3]; if ((flags & CLONE_PARENT_SETTID) == CLONE_PARENT_SETTID) { if (!lwp_user_accessable(new_tid, sizeof(int))) { return -EFAULT; } } self = rt_thread_self(); lwp = self->lwp; lwp_ref_inc(lwp); if (!user_stack) { SET_ERRNO(EINVAL); goto fail; } if ((tid = lwp_tid_get()) == 0) { SET_ERRNO(ENOMEM); goto fail; } thread = rt_thread_create(self->parent.name, RT_NULL, RT_NULL, self->stack_size, RT_SCHED_PRIV(self).init_priority, RT_SCHED_PRIV(self).init_tick); if (!thread) { goto fail; } #ifdef RT_USING_SMP RT_SCHED_CTX(self).bind_cpu = lwp->bind_cpu; #endif thread->cleanup = lwp_cleanup; thread->user_entry = RT_NULL; thread->user_stack = RT_NULL; thread->user_stack_size = 0; thread->lwp = (void *)lwp; thread->tid = tid; if ((flags & CLONE_SETTLS) == CLONE_SETTLS) { thread->thread_idr = tls; } if ((flags & CLONE_PARENT_SETTID) == CLONE_PARENT_SETTID) { *new_tid = (int)(tid); } if ((flags & CLONE_CHILD_CLEARTID) == CLONE_CHILD_CLEARTID) { thread->clear_child_tid = (int *)arg[4]; } if (lwp->debug) { rt_thread_control(thread, RT_THREAD_CTRL_BIND_CPU, (void*)0); } LWP_LOCK(lwp); rt_list_insert_after(&lwp->t_grp, &thread->sibling); LWP_UNLOCK(lwp); /* copy origin stack */ lwp_memcpy(thread->stack_addr, self->stack_addr, thread->stack_size); lwp_tid_set_thread(tid, thread); arch_set_thread_context(arch_clone_exit, (void *)((char *)thread->stack_addr + thread->stack_size), user_stack, &thread->sp); /* new thread never reach there */ rt_thread_startup(thread); return (long)tid; fail: lwp_tid_put(tid); if (thread) { rt_thread_delete(thread); } if (lwp) { lwp_ref_dec(lwp); } return GET_ERRNO(); } rt_weak long sys_clone(void *arg[]) { return _sys_clone(arg); } static void lwp_struct_copy(struct rt_lwp *dst, struct rt_lwp *src) { #ifdef ARCH_MM_MMU dst->end_heap = src->end_heap; #endif dst->lwp_type = src->lwp_type; dst->text_entry = src->text_entry; dst->text_size = src->text_size; dst->data_entry = src->data_entry; dst->data_size = src->data_size; dst->args = src->args; dst->leader = 0; dst->session = src->session; dst->background = src->background; dst->tty_old_pgrp = 0; dst->__pgrp = src->__pgrp; dst->tty = src->tty; rt_memcpy(dst->cmd, src->cmd, RT_NAME_MAX); rt_memcpy(&dst->signal.sig_action, &src->signal.sig_action, sizeof(dst->signal.sig_action)); rt_memcpy(&dst->signal.sig_action_mask, &src->signal.sig_action_mask, sizeof(dst->signal.sig_action_mask)); rt_memcpy(&dst->signal.sig_action_nodefer, &src->signal.sig_action_nodefer, sizeof(dst->signal.sig_action_nodefer)); rt_memcpy(&dst->signal.sig_action_onstack, &src->signal.sig_action_onstack, sizeof(dst->signal.sig_action_onstack)); rt_memcpy(&dst->signal.sig_action_restart, &dst->signal.sig_action_restart, sizeof(dst->signal.sig_action_restart)); rt_memcpy(&dst->signal.sig_action_siginfo, &dst->signal.sig_action_siginfo, sizeof(dst->signal.sig_action_siginfo)); rt_strcpy(dst->working_directory, src->working_directory); } static int lwp_copy_files(struct rt_lwp *dst, struct rt_lwp *src) { struct dfs_fdtable *dst_fdt; struct dfs_fdtable *src_fdt; src_fdt = &src->fdt; dst_fdt = &dst->fdt; /* init fds */ dst_fdt->fds = rt_calloc(src_fdt->maxfd, sizeof(void *)); if (dst_fdt->fds) { struct dfs_file *d_s; int i; dst_fdt->maxfd = src_fdt->maxfd; dfs_file_lock(); /* dup files */ for (i = 0; i < src_fdt->maxfd; i++) { d_s = fdt_get_file(src_fdt, i); if (d_s) { dst_fdt->fds[i] = d_s; d_s->ref_count++; } } dfs_file_unlock(); return 0; } return -RT_ERROR; } sysret_t _sys_fork(void) { int tid = 0; sysret_t falival = 0; struct rt_lwp *lwp = RT_NULL; struct rt_lwp *self_lwp = RT_NULL; rt_thread_t thread = RT_NULL; rt_thread_t self_thread = RT_NULL; void *user_stack = RT_NULL; /* new lwp */ lwp = lwp_create(LWP_CREATE_FLAG_ALLOC_PID); if (!lwp) { SET_ERRNO(ENOMEM); goto fail; } /* new tid */ if ((tid = lwp_tid_get()) == 0) { SET_ERRNO(ENOMEM); goto fail; } /* user space init */ if (lwp_user_space_init(lwp, 1) != 0) { SET_ERRNO(ENOMEM); goto fail; } self_lwp = lwp_self(); /* copy address space of process from this proc to forked one */ if (lwp_fork_aspace(lwp, self_lwp) != 0) { SET_ERRNO(ENOMEM); goto fail; } /* copy lwp struct data */ lwp_struct_copy(lwp, self_lwp); /* copy files */ if (lwp_copy_files(lwp, self_lwp) != 0) { SET_ERRNO(ENOMEM); goto fail; } /* create thread */ self_thread = rt_thread_self(); thread = rt_thread_create(self_thread->parent.name, RT_NULL, RT_NULL, self_thread->stack_size, RT_SCHED_PRIV(self_thread).init_priority, RT_SCHED_PRIV(self_thread).init_tick); if (!thread) { SET_ERRNO(ENOMEM); goto fail; } thread->cleanup = self_thread->cleanup; thread->user_entry = self_thread->user_entry; thread->user_stack = self_thread->user_stack; thread->user_stack_size = self_thread->user_stack_size; thread->signal.sigset_mask = self_thread->signal.sigset_mask; thread->thread_idr = self_thread->thread_idr; thread->clear_child_tid = self_thread->clear_child_tid; thread->lwp = (void *)lwp; thread->tid = tid; LWP_LOCK(self_lwp); /* add thread to lwp process */ rt_list_insert_after(&lwp->t_grp, &thread->sibling); LWP_UNLOCK(self_lwp); lwp_children_register(self_lwp, lwp); /* copy kernel stack context from self thread */ lwp_memcpy(thread->stack_addr, self_thread->stack_addr, self_thread->stack_size); lwp_tid_set_thread(tid, thread); /* duplicate user objects */ lwp_user_object_dup(lwp, self_lwp); user_stack = arch_get_user_sp(); arch_set_thread_context(arch_fork_exit, (void *)((char *)thread->stack_addr + thread->stack_size), user_stack, &thread->sp); /* new thread never reach there */ LWP_LOCK(lwp); if (lwp->tty != RT_NULL) { int ret; struct rt_lwp *old_lwp; old_lwp = lwp->tty->foreground; rt_mutex_take(&lwp->tty->lock, RT_WAITING_FOREVER); ret = tty_push(&lwp->tty->head, old_lwp); rt_mutex_release(&lwp->tty->lock); if (ret < 0) { LOG_E("malloc fail!\n"); SET_ERRNO(ENOMEM); goto fail; } lwp->tty->foreground = lwp; } LWP_UNLOCK(lwp); rt_thread_startup(thread); return lwp_to_pid(lwp); fail: falival = GET_ERRNO(); if (tid != 0) { lwp_tid_put(tid); } if (thread) { rt_thread_delete(thread); } if (lwp) { lwp_ref_dec(lwp); } return falival; } /* arm needs to wrap fork/clone call to preserved lr & caller saved regs */ rt_weak sysret_t sys_fork(void) { return _sys_fork(); } rt_weak sysret_t sys_vfork(void) { return sys_fork(); } struct process_aux *lwp_argscopy(struct rt_lwp *lwp, int argc, char **argv, char **envp); int lwp_load(const char *filename, struct rt_lwp *lwp, uint8_t *load_addr, size_t addr_size, struct process_aux *aux); void lwp_user_obj_free(struct rt_lwp *lwp); #define _swap_lwp_data(lwp_used, lwp_new, type, member) \ do {\ type tmp;\ tmp = lwp_used->member;\ lwp_used->member = lwp_new->member;\ lwp_new->member = tmp;\ } while (0) static char *_insert_args(int new_argc, char *new_argv[], struct lwp_args_info *args) { void *page = NULL; int err = 0; char **nargv; char **nenvp; char *p; int i, len; int nsize; if (new_argc == 0) { goto quit; } page = rt_pages_alloc_ext(0, PAGE_ANY_AVAILABLE); /* 1 page */ if (!page) { goto quit; } nsize = new_argc * sizeof(char *); for (i = 0; i < new_argc; i++) { nsize += lwp_user_strlen(new_argv[i]) + 1; } if (nsize + args->size > ARCH_PAGE_SIZE) { err = 1; goto quit; } nargv = (char **)page; nenvp = nargv + args->argc + new_argc + 1; p = (char *)(nenvp + args->envc + 1); /* insert argv */ for (i = 0; i < new_argc; i++) { nargv[i] = p; len = lwp_user_strlen(new_argv[i]) + 1; lwp_memcpy(p, new_argv[i], len); p += len; } /* copy argv */ nargv += new_argc; for (i = 0; i < args->argc; i++) { nargv[i] = p; len = lwp_user_strlen(args->argv[i]) + 1; lwp_memcpy(p, args->argv[i], len); p += len; } nargv[i] = NULL; /* copy envp */ for (i = 0; i < args->envc; i++) { nenvp[i] = p; len = lwp_user_strlen(args->envp[i]) + 1; lwp_memcpy(p, args->envp[i], len); p += len; } nenvp[i] = NULL; /* update args */ args->argv = (char **)page; args->argc = args->argc + new_argc; args->envp = args->argv + args->argc + 1; /* args->envc no change */ args->size = args->size + nsize; quit: if (err && page) { rt_pages_free(page, 0); page = NULL; } return page; } #define INTERP_BUF_SIZE 128 static char *_load_script(const char *filename, void *old_page, struct lwp_args_info *args) { char *new_page = NULL; int fd = -RT_ERROR; int len; char interp[INTERP_BUF_SIZE]; char *cp; char *i_name; char *i_arg; fd = open(filename, O_BINARY | O_RDONLY, 0); if (fd < 0) { goto quit; } len = read(fd, interp, INTERP_BUF_SIZE); if (len < 2) { goto quit; } /* * match find file header the first line. * eg: #!/bin/sh */ if ((interp[0] != '#') || (interp[1] != '!')) { goto quit; } if (len == INTERP_BUF_SIZE) { len--; } interp[len] = '\0'; if ((cp = strchr(interp, '\n')) == NULL) { cp = interp + INTERP_BUF_SIZE - 1; } *cp = '\0'; while (cp > interp) { cp--; if ((*cp == ' ') || (*cp == '\t')) { *cp = '\0'; } else { break; } } for (cp = interp + 2; (*cp == ' ') || (*cp == '\t'); cp++) { /* nothing */ } if (*cp == '\0') { goto quit; /* No interpreter name found */ } i_name = cp; i_arg = NULL; for (; *cp && (*cp != ' ') && (*cp != '\t'); cp++) { /* nothing */ } while ((*cp == ' ') || (*cp == '\t')) { *cp++ = '\0'; } if (*cp) { i_arg = cp; } if (i_arg) { new_page = _insert_args(1, &i_arg, args); if (!new_page) { goto quit; } rt_pages_free(old_page, 0); old_page = new_page; } new_page = _insert_args(1, &i_name, args); if (!new_page) { goto quit; } rt_pages_free(old_page, 0); quit: if (fd >= 0) { close(fd); } return new_page; } int load_ldso(struct rt_lwp *lwp, char *exec_name, char *const argv[], char *const envp[]) { int ret = -1; int i; void *page; void *new_page; int argc = 0; int envc = 0; int size; char **kargv; char **kenvp; size_t len; char *p; char *i_arg; struct lwp_args_info args_info; struct process_aux *aux; size = sizeof(char *); if (argv) { while (1) { if (!argv[argc]) { break; } len = lwp_user_strlen_ext(lwp, (const char *)argv[argc]); size += sizeof(char *) + len + 1; argc++; } } if (envp) { while (1) { if (!envp[envc]) { break; } len = lwp_user_strlen_ext(lwp, (const char *)envp[envc]); size += sizeof(char *) + len + 1; envc++; } } page = rt_pages_alloc_ext(0, PAGE_ANY_AVAILABLE); /* 1 page */ if (!page) { SET_ERRNO(ENOMEM); goto quit; } kargv = (char **)page; kenvp = kargv + argc + 1; p = (char *)(kenvp + envc + 1); /* copy argv */ if (argv) { for (i = 0; i < argc; i++) { kargv[i] = p; len = lwp_user_strlen_ext(lwp, argv[i]) + 1; lwp_memcpy(p, argv[i], len); p += len; } kargv[i] = NULL; } /* copy envp */ if (envp) { for (i = 0; i < envc; i++) { kenvp[i] = p; len = lwp_user_strlen_ext(lwp, envp[i]) + 1; lwp_memcpy(p, envp[i], len); p += len; } kenvp[i] = NULL; } args_info.argc = argc; args_info.argv = kargv; args_info.envc = envc; args_info.envp = kenvp; args_info.size = size; new_page = _insert_args(1, &exec_name, &args_info); if (!new_page) { SET_ERRNO(ENOMEM); goto quit; } rt_pages_free(page, 0); page = new_page; i_arg = "-e"; new_page = _insert_args(1, &i_arg, &args_info); if (!new_page) { SET_ERRNO(ENOMEM); goto quit; } rt_pages_free(page, 0); page = new_page; i_arg = "ld.so"; new_page = _insert_args(1, &i_arg, &args_info); if (!new_page) { SET_ERRNO(ENOMEM); goto quit; } rt_pages_free(page, 0); page = new_page; if ((aux = lwp_argscopy(lwp, args_info.argc, args_info.argv, args_info.envp)) == NULL) { SET_ERRNO(ENOMEM); goto quit; } ret = lwp_load("/lib/ld.so", lwp, RT_NULL, 0, aux); rt_strncpy(lwp->cmd, exec_name, RT_NAME_MAX); quit: if (page) { rt_pages_free(page, 0); } return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_execve(const char *path, char *const argv[], char *const envp[]) { int ret = -1; int argc = 0; int envc = 0; void *page = NULL; void *new_page; int size = 0; size_t len; char **kargv; char **kenvp; char *p; struct rt_lwp *new_lwp = NULL; struct rt_lwp *lwp; int uni_thread; rt_thread_t thread; struct process_aux *aux; int i; struct lwp_args_info args_info; if (access(path, X_OK) != 0) { return -EACCES; } lwp = lwp_self(); thread = rt_thread_self(); uni_thread = 1; LWP_LOCK(lwp); if (lwp->t_grp.prev != &thread->sibling) { uni_thread = 0; } if (lwp->t_grp.next != &thread->sibling) { uni_thread = 0; } LWP_UNLOCK(lwp); if (!uni_thread) { SET_ERRNO(EINVAL); goto quit; } len = lwp_user_strlen(path); if (len <= 0) { SET_ERRNO(EFAULT); goto quit; } size += sizeof(char *); if (argv) { while (1) { if (!lwp_user_accessable((void *)(argv + argc), sizeof(char *))) { SET_ERRNO(EFAULT); goto quit; } if (!argv[argc]) { break; } len = lwp_user_strlen((const char *)argv[argc]); if (len < 0) { SET_ERRNO(EFAULT); goto quit; } size += sizeof(char *) + len + 1; argc++; } } size += sizeof(char *); if (envp) { while (1) { if (!lwp_user_accessable((void *)(envp + envc), sizeof(char *))) { SET_ERRNO(EFAULT); goto quit; } if (!envp[envc]) { break; } len = lwp_user_strlen((const char *)envp[envc]); if (len < 0) { SET_ERRNO(EFAULT); goto quit; } size += sizeof(char *) + len + 1; envc++; } } if (size > ARCH_PAGE_SIZE) { SET_ERRNO(EINVAL); goto quit; } page = rt_pages_alloc_ext(0, PAGE_ANY_AVAILABLE); /* 1 page */ if (!page) { SET_ERRNO(ENOMEM); goto quit; } kargv = (char **)page; kenvp = kargv + argc + 1; p = (char *)(kenvp + envc + 1); /* copy argv */ if (argv) { for (i = 0; i < argc; i++) { kargv[i] = p; len = lwp_user_strlen(argv[i]) + 1; lwp_memcpy(p, argv[i], len); p += len; } kargv[i] = NULL; } /* copy envp */ if (envp) { for (i = 0; i < envc; i++) { kenvp[i] = p; len = lwp_user_strlen(envp[i]) + 1; lwp_memcpy(p, envp[i], len); p += len; } kenvp[i] = NULL; } /* alloc new lwp to operation */ new_lwp = lwp_create(LWP_CREATE_FLAG_NONE); if (!new_lwp) { SET_ERRNO(ENOMEM); goto quit; } ret = lwp_user_space_init(new_lwp, 0); if (ret != 0) { SET_ERRNO(ENOMEM); goto quit; } /* file is a script ? */ args_info.argc = argc; args_info.argv = kargv; args_info.envc = envc; args_info.envp = kenvp; args_info.size = size; while (1) { new_page = _load_script(path, page, &args_info); if (!new_page) { break; } page = new_page; path = args_info.argv[0]; } /* now load elf */ if ((aux = lwp_argscopy(new_lwp, args_info.argc, args_info.argv, args_info.envp)) == NULL) { SET_ERRNO(ENOMEM); goto quit; } ret = lwp_load(path, new_lwp, RT_NULL, 0, aux); if (ret == 1) { /* dynamic */ lwp_unmap_user(new_lwp, (void *)(USER_VADDR_TOP - ARCH_PAGE_SIZE)); ret = load_ldso(new_lwp, (char *)path, args_info.argv, args_info.envp); } if (ret == RT_EOK) { int off = 0; int last_backslash = 0; char *run_name = args_info.argv[0]; /* clear all user objects */ lwp_user_object_clear(lwp); /* find last \ or / */ while (1) { char c = run_name[off++]; if (c == '\0') { break; } if (c == '\\' || c == '/') { last_backslash = off; } } /** * Set thread name and swap the data of lwp and new_lwp. * Since no other threads can access the lwp field, it't uneccessary to * take a lock here */ RT_ASSERT(rt_list_entry(lwp->t_grp.prev, struct rt_thread, sibling) == thread); strncpy(thread->parent.name, run_name + last_backslash, RT_NAME_MAX); strncpy(lwp->cmd, new_lwp->cmd, RT_NAME_MAX); rt_pages_free(page, 0); #ifdef ARCH_MM_MMU _swap_lwp_data(lwp, new_lwp, struct rt_aspace *, aspace); _swap_lwp_data(lwp, new_lwp, size_t, end_heap); #endif _swap_lwp_data(lwp, new_lwp, uint8_t, lwp_type); _swap_lwp_data(lwp, new_lwp, void *, text_entry); _swap_lwp_data(lwp, new_lwp, uint32_t, text_size); _swap_lwp_data(lwp, new_lwp, void *, data_entry); _swap_lwp_data(lwp, new_lwp, uint32_t, data_size); _swap_lwp_data(lwp, new_lwp, void *, args); lwp_thread_signal_detach(&thread->signal); rt_memset(&thread->signal.sigset_mask, 0, sizeof(thread->signal.sigset_mask)); lwp_signal_detach(&lwp->signal); lwp_signal_init(&lwp->signal); /* to do: clsoe files with flag CLOEXEC, recy sub-thread */ lwp_aspace_switch(thread); lwp_ref_dec(new_lwp); arch_start_umode(lwp->args, lwp->text_entry, (void*)USER_STACK_VEND, (char *)thread->stack_addr + thread->stack_size); /* never reach here */ } return -EINVAL; quit: if (page) { rt_pages_free(page, 0); } if (new_lwp) { lwp_ref_dec(new_lwp); } return (ret < 0 ? GET_ERRNO() : ret); } #endif /* ARCH_MM_MMU */ sysret_t sys_thread_delete(rt_thread_t thread) { #ifdef ARCH_MM_MMU return rt_thread_delete(thread); #else sysret_t ret = 0; if(thread->parent.type != RT_Object_Class_Thread) { ret = -EINVAL; goto __exit; } ret = rt_thread_delete(thread); if (rt_thread_self() == thread) { rt_schedule(); } __exit: return ret; #endif } sysret_t sys_thread_startup(rt_thread_t thread) { return rt_thread_startup(thread); } rt_thread_t sys_thread_self(void) { return rt_thread_self(); } /* sys channel */ sysret_t sys_channel_open(const char *name, int flags) { rt_size_t ret = 0; char *kname = RT_NULL; int len = 0; len = lwp_user_strlen(name); if (len <= 0) { return -EFAULT; } kname = (char *)kmem_get(len + 1); if (!kname) { return -ENOMEM; } if (lwp_get_from_user(kname, (void *)name, len + 1) != (len + 1)) { kmem_put(kname); return -EFAULT; } ret = lwp_channel_open(FDT_TYPE_LWP, kname, flags); kmem_put(kname); return ret; } sysret_t sys_channel_close(int fd) { return lwp_channel_close(FDT_TYPE_LWP, fd); } sysret_t sys_channel_send(int fd, rt_channel_msg_t data) { rt_size_t ret = 0; rt_channel_msg_t kdata = RT_NULL; if (!lwp_user_accessable((void *)data, sizeof(*data))) { return -EFAULT; } kdata = kmem_get(sizeof(*data)); if (kdata == RT_NULL) return -ENOMEM; if (lwp_get_from_user(kdata, data, sizeof(*kdata)) != sizeof(*kdata)) { kmem_put(kdata); return -EFAULT; } ret = lwp_channel_send(FDT_TYPE_LWP, fd, kdata); kmem_put(kdata); return ret; } sysret_t sys_channel_send_recv_timeout(int fd, rt_channel_msg_t data, rt_channel_msg_t data_ret, rt_int32_t time) { rt_size_t ret = 0; rt_channel_msg_t kdata = RT_NULL; rt_channel_msg_t kdata_ret = RT_NULL; if (!lwp_user_accessable((void *)data, sizeof(*data))) { return -EFAULT; } kdata = kmem_get(sizeof(*data)); if (kdata == RT_NULL) return -ENOMEM; if (lwp_get_from_user(kdata, data, sizeof(*kdata)) != sizeof(*kdata)) { kmem_put(kdata); return -EFAULT; } kdata_ret = kmem_get(sizeof(*data_ret)); if (kdata_ret == RT_NULL) return -ENOMEM; ret = lwp_channel_send_recv_timeout(FDT_TYPE_LWP, fd, kdata, kdata_ret, time); lwp_put_to_user(data_ret, kdata_ret, sizeof(*kdata_ret)); kmem_put(kdata); kmem_put(kdata_ret); return ret; } sysret_t sys_channel_reply(int fd, rt_channel_msg_t data) { rt_size_t ret = 0; rt_channel_msg_t kdata = RT_NULL; if (!lwp_user_accessable((void *)data, sizeof(*data))) { return -EFAULT; } kdata = kmem_get(sizeof(*data)); if (kdata == RT_NULL) return -ENOMEM; if (lwp_get_from_user(kdata, data, sizeof(*kdata)) != sizeof(*data)) { kmem_put(kdata); return -EFAULT; } ret = lwp_channel_reply(FDT_TYPE_LWP, fd, kdata); kmem_put(kdata); return ret; } sysret_t sys_channel_recv_timeout(int fd, rt_channel_msg_t data, rt_int32_t time) { rt_size_t ret = 0; rt_channel_msg_t kdata = RT_NULL; kdata = kmem_get(sizeof(*data)); if (kdata == RT_NULL) return -ENOMEM; ret = lwp_channel_recv_timeout(FDT_TYPE_LWP, fd, kdata, time); lwp_put_to_user(data, kdata, sizeof(*kdata)); kmem_put(kdata); return ret; } static struct rt_semaphore critical_lock; static int critical_init(void) { rt_sem_init(&critical_lock, "ct_lock", 1, RT_IPC_FLAG_FIFO); return 0; } INIT_DEVICE_EXPORT(critical_init); void sys_enter_critical(void) { rt_sem_take(&critical_lock, RT_WAITING_FOREVER); } void sys_exit_critical(void) { rt_sem_release(&critical_lock); } /* syscall: "sys_log" ret: "int" args: "const char*" "size" */ static int __sys_log_enable = 0; static int sys_log_enable(int argc, char** argv) { if (argc == 1) { rt_kprintf("sys_log = %d\n", __sys_log_enable); return 0; } else { __sys_log_enable = atoi(argv[1]); } return 0; } MSH_CMD_EXPORT_ALIAS(sys_log_enable, sys_log, sys_log 1(enable)/0(disable)); sysret_t sys_log(const char* log, int size) { char *klog = RT_NULL; rt_device_t console = RT_NULL; if (!lwp_user_accessable((void *)log, size)) return -EFAULT; klog = kmem_get(size); if (klog == RT_NULL) { return -ENOMEM; } if (lwp_get_from_user((void *)klog, (void *)log, size) != size) { kmem_put(klog); return -EINVAL; } console = rt_console_get_device(); if (console && __sys_log_enable) { rt_device_write(console, -1, klog, size); } kmem_put(klog); return 0; } sysret_t sys_stat(const char *file, struct stat *buf) { int ret = 0; size_t len; size_t copy_len; char *copy_path; struct stat statbuff = {0}; if (!lwp_user_accessable((void *)buf, sizeof(struct stat))) { return -EFAULT; } len = lwp_user_strlen(file); if (len <= 0) { return -EFAULT; } copy_path = (char*)rt_malloc(len + 1); if (!copy_path) { return -ENOMEM; } copy_len = lwp_get_from_user(copy_path, (void*)file, len); if (copy_len == 0) { rt_free(copy_path); return -EFAULT; } copy_path[copy_len] = '\0'; ret = _SYS_WRAP(stat(copy_path, &statbuff)); rt_free(copy_path); if (ret == 0) { lwp_put_to_user(buf, &statbuff, sizeof statbuff); } return ret; } sysret_t sys_lstat(const char *file, struct stat *buf) { int ret = 0; size_t len; size_t copy_len; char *copy_path; struct stat statbuff = {0}; if (!lwp_user_accessable((void *)buf, sizeof(struct stat))) { return -EFAULT; } len = lwp_user_strlen(file); if (len <= 0) { return -EFAULT; } copy_path = (char*)rt_malloc(len + 1); if (!copy_path) { return -ENOMEM; } copy_len = lwp_get_from_user(copy_path, (void*)file, len); if (copy_len == 0) { rt_free(copy_path); return -EFAULT; } copy_path[copy_len] = '\0'; #ifdef RT_USING_DFS_V2 ret = _SYS_WRAP(dfs_file_lstat(copy_path, &statbuff)); #else ret = _SYS_WRAP(stat(copy_path, &statbuff)); #endif rt_free(copy_path); if (ret == 0) { lwp_put_to_user(buf, &statbuff, sizeof statbuff); } return ret; } sysret_t sys_notimpl(void) { return -ENOSYS; } uint32_t sys_hw_interrupt_disable(void) { return rt_hw_interrupt_disable(); } void sys_hw_interrupt_enable(uint32_t level) { rt_hw_interrupt_enable(level); } #ifdef ARCH_MM_MMU sysret_t sys_shmget(size_t key, size_t size, int create) { return lwp_shmget(key, size, create); } sysret_t sys_shmrm(int id) { return lwp_shmrm(id); } void* sys_shmat(int id, void* shm_vaddr) { return lwp_shmat(id, shm_vaddr); } sysret_t sys_shmdt(void* shm_vaddr) { return lwp_shmdt(shm_vaddr); } #elif defined RT_LWP_USING_SHM void *sys_shm_alloc(int size) { if (size < 0) { return RT_NULL; } return lwp_shm_alloc((rt_size_t)size); } void *sys_shm_retain(void *mem) { if (!lwp_user_accessable(mem, sizeof (void *))) { return RT_NULL; } return lwp_shm_retain(mem); } sysret_t sys_shm_free(void *mem) { if (!lwp_user_accessable(mem, sizeof (void *))) { return -EFAULT; } lwp_shm_free(mem); return 0; } #endif /* device interfaces */ sysret_t sys_device_init(rt_device_t dev) { return rt_device_init(dev); } sysret_t sys_device_register(rt_device_t dev, const char *name, rt_uint16_t flags) { return rt_device_register(dev, name, flags); } sysret_t sys_device_control(rt_device_t dev, int cmd, void *arg) { return rt_device_control(dev, cmd, arg); } rt_device_t sys_device_find(const char* name) { return rt_device_find(name); } sysret_t sys_device_open(rt_device_t dev, rt_uint16_t oflag) { return rt_device_open(dev, oflag); } sysret_t sys_device_close(rt_device_t dev) { return rt_device_close(dev); } rt_ssize_t sys_device_read(rt_device_t dev, rt_off_t pos, void *buffer, rt_size_t size) { return rt_device_read(dev, pos, buffer, size); } rt_ssize_t sys_device_write(rt_device_t dev, rt_off_t pos, const void *buffer, rt_size_t size) { return rt_device_write(dev, pos, buffer, size); } #ifdef RT_USING_SAL /* network interfaces */ sysret_t sys_accept(int socket, struct musl_sockaddr *addr, socklen_t *addrlen) { int ret = -1; struct sockaddr ksa; struct musl_sockaddr kmusladdr; socklen_t uaddrlen; socklen_t kaddrlen; if (addr) { if (!lwp_user_accessable(addrlen, sizeof(socklen_t))) { return -EFAULT; } lwp_get_from_user(&uaddrlen, addrlen, sizeof(socklen_t)); if (!uaddrlen) { return -EINVAL; } if (!lwp_user_accessable(addr, uaddrlen)) { return -EFAULT; } } kaddrlen = sizeof(struct sockaddr); ret = accept(socket, &ksa, &kaddrlen); if (ret >= 0) { if (addr) { sockaddr_tomusl(&ksa, &kmusladdr); if (uaddrlen > sizeof(struct musl_sockaddr)) { uaddrlen = sizeof(struct musl_sockaddr); } lwp_put_to_user(addr, &kmusladdr, uaddrlen); lwp_put_to_user(addrlen, &uaddrlen, sizeof(socklen_t)); } } return ret; } sysret_t sys_bind(int socket, const struct musl_sockaddr *name, socklen_t namelen) { rt_err_t ret = 0; struct sockaddr sa; struct sockaddr_un un_addr; struct musl_sockaddr kname; rt_uint16_t family = 0; if (!lwp_user_accessable((void *)name, namelen)) { return -EFAULT; } lwp_get_from_user(&family, (void *)name, 2); if (family == AF_UNIX) { if (!lwp_user_accessable((void *)name, sizeof(struct sockaddr_un))) { return -EFAULT; } lwp_get_from_user(&un_addr, (void *)name, sizeof(struct sockaddr_un)); ret = bind(socket, (struct sockaddr *)&un_addr, namelen); } else if (family == AF_NETLINK) { if (!lwp_user_accessable((void *)name, namelen)) { return -EFAULT; } lwp_get_from_user(&sa, (void *)name, namelen); ret = bind(socket, &sa, namelen); } else { lwp_get_from_user(&kname, (void *)name, namelen); sockaddr_tolwip(&kname, &sa); ret = bind(socket, &sa, namelen); } return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_shutdown(int socket, int how) { return shutdown(socket, how); } sysret_t sys_getpeername(int socket, struct musl_sockaddr *name, socklen_t *namelen) { int ret = -1; struct sockaddr sa; struct musl_sockaddr kname; socklen_t unamelen; socklen_t knamelen; if (!lwp_user_accessable(namelen, sizeof(socklen_t))) { return -EFAULT; } lwp_get_from_user(&unamelen, namelen, sizeof(socklen_t)); if (!unamelen) { return -EINVAL; } if (!lwp_user_accessable(name, unamelen)) { return -EFAULT; } knamelen = sizeof(struct sockaddr); ret = getpeername(socket, &sa, &knamelen); if (ret == 0) { sockaddr_tomusl(&sa, &kname); if (unamelen > sizeof(struct musl_sockaddr)) { unamelen = sizeof(struct musl_sockaddr); } lwp_put_to_user(name, &kname, unamelen); lwp_put_to_user(namelen, &unamelen, sizeof(socklen_t)); } else { ret = GET_ERRNO(); } return ret; } sysret_t sys_getsockname(int socket, struct musl_sockaddr *name, socklen_t *namelen) { int ret = -1; struct sockaddr sa; struct musl_sockaddr kname; socklen_t unamelen; socklen_t knamelen; if (!lwp_user_accessable(namelen, sizeof (socklen_t))) { return -EFAULT; } lwp_get_from_user(&unamelen, namelen, sizeof (socklen_t)); if (!unamelen) { return -EINVAL; } if (!lwp_user_accessable(name, unamelen)) { return -EFAULT; } knamelen = sizeof(struct sockaddr); ret = getsockname(socket, &sa, &knamelen); if (ret == 0) { sockaddr_tomusl(&sa, &kname); if (unamelen > sizeof(struct musl_sockaddr)) { unamelen = sizeof(struct musl_sockaddr); } lwp_put_to_user(name, &kname, unamelen); lwp_put_to_user(namelen, &unamelen, sizeof(socklen_t)); } else { ret = GET_ERRNO(); } return ret; } sysret_t sys_getsockopt(int socket, int level, int optname, void *optval, socklen_t *optlen) { int ret = 0; socklen_t koptlen = 0; void *koptval = RT_NULL; if (!lwp_user_accessable((void *)optlen, sizeof(uint32_t))) return -EFAULT; if (lwp_get_from_user(&koptlen, optlen, sizeof(uint32_t)) != sizeof(uint32_t)) { return -EINVAL; } if (!lwp_user_accessable((void *)optval, koptlen)) return -EFAULT; koptval = kmem_get(koptlen); if (koptval == RT_NULL) { return -ENOMEM; } if (lwp_get_from_user(koptval, optval, koptlen) != koptlen) { kmem_put(koptval); return -EINVAL; } convert_sockopt(&level, &optname); ret = getsockopt(socket, level, optname, koptval, &koptlen); lwp_put_to_user((void *)optval, koptval, koptlen); lwp_put_to_user((void *)optlen, &koptlen, sizeof(uint32_t)); kmem_put(koptval); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_setsockopt(int socket, int level, int optname, const void *optval, socklen_t optlen) { int ret; void *koptval = RT_NULL; if (!lwp_user_accessable((void *)optval, optlen)) return -EFAULT; koptval = kmem_get(optlen); if (koptval == RT_NULL) { return -ENOMEM; } if (lwp_get_from_user(koptval, (void *)optval, optlen) != optlen) { kmem_put(koptval); return -EINVAL; } convert_sockopt(&level, &optname); ret = setsockopt(socket, level, optname, koptval, optlen); kmem_put(koptval); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_connect(int socket, const struct musl_sockaddr *name, socklen_t namelen) { int ret = 0; rt_uint16_t family = 0; struct sockaddr sa; struct musl_sockaddr kname; struct sockaddr_un addr_un; if (!lwp_user_accessable((void *)name, namelen)) { return -EFAULT; } lwp_get_from_user(&family, (void *)name, 2); if (family == AF_UNIX) { if (!lwp_user_accessable((void *)name, sizeof(struct sockaddr_un))) { return -EFAULT; } lwp_get_from_user(&addr_un, (void *)name, sizeof(struct sockaddr_un)); ret = connect(socket, (struct sockaddr *)(&addr_un), namelen); } else { lwp_get_from_user(&kname, (void *)name, namelen); sockaddr_tolwip(&kname, &sa); ret = connect(socket, &sa, namelen); } return ret; } sysret_t sys_listen(int socket, int backlog) { return listen(socket, backlog); } #define MUSLC_MSG_OOB 0x0001 #define MUSLC_MSG_PEEK 0x0002 #define MUSLC_MSG_DONTWAIT 0x0040 #define MUSLC_MSG_WAITALL 0x0100 #define MUSLC_MSG_MORE 0x8000 static int netflags_muslc_2_lwip(int flags) { int flgs = 0; if (flags & MUSLC_MSG_PEEK) { flgs |= MSG_PEEK; } if (flags & MUSLC_MSG_WAITALL) { flgs |= MSG_WAITALL; } if (flags & MUSLC_MSG_OOB) { flgs |= MSG_OOB; } if (flags & MUSLC_MSG_DONTWAIT) { flgs |= MSG_DONTWAIT; } if (flags & MUSLC_MSG_MORE) { flgs |= MSG_MORE; } return flgs; } #ifdef ARCH_MM_MMU static int copy_msghdr_from_user(struct msghdr *kmsg, struct msghdr *umsg, struct iovec **out_iov, void **out_msg_control) { size_t iovs_size; struct iovec *uiov, *kiov; size_t iovs_buffer_size = 0; void *iovs_buffer; if (!lwp_user_accessable(umsg, sizeof(*umsg))) { return -EFAULT; } lwp_get_from_user(kmsg, umsg, sizeof(*kmsg)); iovs_size = sizeof(*kmsg->msg_iov) * kmsg->msg_iovlen; if (!lwp_user_accessable(kmsg->msg_iov, iovs_size)) { return -EFAULT; } /* user and kernel */ kiov = kmem_get(iovs_size * 2); if (!kiov) { return -ENOMEM; } uiov = (void *)kiov + iovs_size; lwp_get_from_user(uiov, kmsg->msg_iov, iovs_size); if (out_iov) { *out_iov = uiov; } kmsg->msg_iov = kiov; for (int i = 0; i < kmsg->msg_iovlen; ++i) { /* * We MUST check we can copy data to user after socket done in uiov * otherwise we will be lost the messages from the network! */ if (!lwp_user_accessable(uiov->iov_base, uiov->iov_len)) { kmem_put(kmsg->msg_iov); return -EPERM; } iovs_buffer_size += uiov->iov_len; kiov->iov_len = uiov->iov_len; ++kiov; ++uiov; } /* msg_iov and msg_control */ iovs_buffer = kmem_get(iovs_buffer_size + kmsg->msg_controllen); if (!iovs_buffer) { kmem_put(kmsg->msg_iov); return -ENOMEM; } kiov = kmsg->msg_iov; for (int i = 0; i < kmsg->msg_iovlen; ++i) { kiov->iov_base = iovs_buffer; iovs_buffer += kiov->iov_len; ++kiov; } *out_msg_control = kmsg->msg_control; /* msg_control is the end of the iovs_buffer */ kmsg->msg_control = iovs_buffer; return 0; } #endif /* ARCH_MM_MMU */ sysret_t sys_recvmsg(int socket, struct msghdr *msg, int flags) { int flgs, ret = -1; struct msghdr kmsg; #ifdef ARCH_MM_MMU void *msg_control; struct iovec *uiov, *kiov; #endif if (!msg) { return -EPERM; } flgs = netflags_muslc_2_lwip(flags); #ifdef ARCH_MM_MMU ret = copy_msghdr_from_user(&kmsg, msg, &uiov, &msg_control); if (!ret) { ret = recvmsg(socket, &kmsg, flgs); if (ret < 0) { goto _free_res; } kiov = kmsg.msg_iov; for (int i = 0; i < kmsg.msg_iovlen; ++i) { lwp_put_to_user(uiov->iov_base, kiov->iov_base, kiov->iov_len); ++kiov; ++uiov; } lwp_put_to_user(msg_control, kmsg.msg_control, kmsg.msg_controllen); lwp_put_to_user(&msg->msg_flags, &kmsg.msg_flags, sizeof(kmsg.msg_flags)); _free_res: kmem_put(kmsg.msg_iov->iov_base); kmem_put(kmsg.msg_iov); } #else rt_memcpy(&kmsg, msg, sizeof(kmsg)); ret = recvmsg(socket, &kmsg, flgs); if (!ret) { msg->msg_flags = kmsg.msg_flags; } #endif /* ARCH_MM_MMU */ return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_recvfrom(int socket, void *mem, size_t len, int flags, struct musl_sockaddr *from, socklen_t *fromlen) { int flgs = 0; #ifdef ARCH_MM_MMU int ret = -1; void *kmem = RT_NULL; #endif flgs = netflags_muslc_2_lwip(flags); #ifdef ARCH_MM_MMU if (!len) { return -EINVAL; } if (!lwp_user_accessable((void *)mem, len)) { return -EFAULT; } kmem = kmem_get(len); if (!kmem) { return -ENOMEM; } if (flags == 0x2) { flags = 0x1; } if (from) { struct sockaddr sa; ret = recvfrom(socket, kmem, len, flgs, &sa, fromlen); sockaddr_tomusl(&sa, from); } else { ret = recvfrom(socket, kmem, len, flgs, NULL, NULL); } if (ret > 0) { lwp_put_to_user(mem, kmem, len); } if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kmem); return ret; #else int ret = -1; if (from) { struct sockaddr sa = {0}; ret = recvfrom(socket, mem, len, flgs, &sa, fromlen); sockaddr_tomusl(&sa, from); } else { ret = recvfrom(socket, mem, len, flags, NULL, NULL); } return (ret < 0 ? GET_ERRNO() : ret); #endif } sysret_t sys_recv(int socket, void *mem, size_t len, int flags) { int flgs = 0; int ret; void *kmem = RT_NULL; if (!lwp_user_accessable((void *)mem, len)) return -EFAULT; kmem = kmem_get(sizeof(*kmem)); if (kmem == RT_NULL) { return -ENOMEM; } flgs = netflags_muslc_2_lwip(flags); ret = recvfrom(socket, kmem, len, flgs, NULL, NULL); lwp_put_to_user((void *)mem, kmem, len); kmem_put(kmem); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_sendmsg(int socket, const struct msghdr *msg, int flags) { int flgs, ret = -1; struct msghdr kmsg; #ifdef ARCH_MM_MMU void *msg_control; struct iovec *uiov, *kiov; #endif if (!msg) { return -EPERM; } flgs = netflags_muslc_2_lwip(flags); #ifdef ARCH_MM_MMU ret = copy_msghdr_from_user(&kmsg, (struct msghdr *)msg, &uiov, &msg_control); if (!ret) { kiov = kmsg.msg_iov; for (int i = 0; i < kmsg.msg_iovlen; ++i) { lwp_get_from_user(kiov->iov_base, uiov->iov_base, kiov->iov_len); ++kiov; ++uiov; } lwp_get_from_user(kmsg.msg_control, msg_control, kmsg.msg_controllen); ret = sendmsg(socket, &kmsg, flgs); kmem_put(kmsg.msg_iov->iov_base); kmem_put(kmsg.msg_iov); } #else rt_memcpy(&kmsg, msg, sizeof(kmsg)); ret = sendmsg(socket, &kmsg, flgs); if (!ret) { msg->msg_flags = kmsg.msg_flags; } #endif /* ARCH_MM_MMU */ return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_sendto(int socket, const void *dataptr, size_t size, int flags, const struct musl_sockaddr *to, socklen_t tolen) { int flgs = 0; #ifdef ARCH_MM_MMU int ret = -1; void *kmem = RT_NULL; #endif flgs = netflags_muslc_2_lwip(flags); #ifdef ARCH_MM_MMU if (!size) { return -EINVAL; } if (!lwp_user_accessable((void *)dataptr, size)) { return -EFAULT; } kmem = kmem_get(size); if (!kmem) { return -ENOMEM; } lwp_get_from_user(kmem, (void *)dataptr, size); if (to) { struct sockaddr sa; sockaddr_tolwip(to, &sa); ret = sendto(socket, kmem, size, flgs, &sa, tolen); } else { ret = sendto(socket, kmem, size, flgs, NULL, tolen); } if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kmem); return ret; #else int ret; if (to) { struct sockaddr sa; sockaddr_tolwip(to, &sa); ret = sendto(socket, dataptr, size, flgs, &sa, tolen); } else { ret = sendto(socket, dataptr, size, flgs, NULL, tolen); } return (ret < 0 ? GET_ERRNO() : ret); #endif } sysret_t sys_send(int socket, const void *dataptr, size_t size, int flags) { int flgs = 0; int ret = 0; void *kdataptr = RT_NULL; if (!lwp_user_accessable((void *)dataptr, size)) return -EFAULT; kdataptr = kmem_get(size); if (kdataptr == RT_NULL) { return -ENOMEM; } if (lwp_get_from_user(kdataptr, (void *)dataptr, size) != size) { kmem_put(kdataptr); return -EINVAL; } flgs = netflags_muslc_2_lwip(flags); ret = sendto(socket, kdataptr, size, flgs, NULL, 0); kmem_put(kdataptr); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_socket(int domain, int type, int protocol) { int fd = -1; int nonblock = 0; /* not support SOCK_CLOEXEC type */ if (type & SOCK_CLOEXEC) { type &= ~SOCK_CLOEXEC; } if (type & SOCK_NONBLOCK) { nonblock = 1; type &= ~SOCK_NONBLOCK; } fd = socket(domain, type, protocol); if (fd < 0) { goto out; } if (nonblock) { fcntl(fd, F_SETFL, O_NONBLOCK); } out: return (fd < 0 ? GET_ERRNO() : fd); } sysret_t sys_socketpair(int domain, int type, int protocol, int fd[2]) { #ifdef RT_USING_SAL int ret = 0; int k_fd[2]; if (!lwp_user_accessable((void *)fd, sizeof(int [2]))) { return -EFAULT; } ret = socketpair(domain, type, protocol, k_fd); if (ret == 0) { lwp_put_to_user(fd, k_fd, sizeof(int [2])); } return ret; #else return -ELIBACC; #endif } sysret_t sys_closesocket(int socket) { return closesocket(socket); } #endif rt_thread_t sys_thread_find(char *name) { int len = 0; char *kname = RT_NULL; rt_thread_t thread; len = lwp_user_strlen(name); if (len <= 0) { return RT_NULL; } kname = (char *)kmem_get(len + 1); if (!kname) { return RT_NULL; } if (lwp_get_from_user(kname, (void *)name, len + 1) != (len + 1)) { kmem_put(kname); return RT_NULL; } thread = rt_thread_find(name); kmem_put(kname); return thread; } rt_tick_t sys_tick_get(void) { return rt_tick_get(); } sysret_t sys_thread_mdelay(rt_int32_t ms) { return rt_thread_mdelay(ms); } struct k_sigaction { void (*handler)(int); unsigned long flags; void (*restorer)(void); unsigned mask[2]; }; sysret_t sys_sigaction(int sig, const struct k_sigaction *act, struct k_sigaction *oact, size_t sigsetsize) { int ret = -RT_EINVAL; struct rt_lwp *lwp; struct lwp_sigaction kact, *pkact = RT_NULL; struct lwp_sigaction koact, *pkoact = RT_NULL; if (!sigsetsize) { SET_ERRNO(EINVAL); goto out; } if (sigsetsize > sizeof(lwp_sigset_t)) { sigsetsize = sizeof(lwp_sigset_t); } if (!act && !oact) { SET_ERRNO(EINVAL); goto out; } if (oact) { if (!lwp_user_accessable((void *)oact, sizeof(*oact))) { SET_ERRNO(EFAULT); goto out; } pkoact = &koact; } if (act) { if (!lwp_user_accessable((void *)act, sizeof(*act))) { SET_ERRNO(EFAULT); goto out; } kact.sa_flags = act->flags; kact.__sa_handler._sa_handler = act->handler; lwp_memcpy(&kact.sa_mask, &act->mask, sigsetsize); kact.sa_restorer = act->restorer; pkact = &kact; } lwp = lwp_self(); RT_ASSERT(lwp); ret = lwp_signal_action(lwp, sig, pkact, pkoact); #ifdef ARCH_MM_MMU if (ret == 0 && oact) { lwp_put_to_user(&oact->handler, &pkoact->__sa_handler._sa_handler, sizeof(void (*)(int))); lwp_put_to_user(&oact->mask, &pkoact->sa_mask, sigsetsize); lwp_put_to_user(&oact->flags, &pkoact->sa_flags, sizeof(int)); lwp_put_to_user(&oact->restorer, &pkoact->sa_restorer, sizeof(void (*)(void))); } #endif /* ARCH_MM_MMU */ out: return (ret < 0 ? GET_ERRNO() : ret); } static int mask_command_u2k[] = { [SIG_BLOCK] = LWP_SIG_MASK_CMD_BLOCK, [SIG_UNBLOCK] = LWP_SIG_MASK_CMD_UNBLOCK, [SIG_SETMASK] = LWP_SIG_MASK_CMD_SET_MASK, }; sysret_t sys_sigprocmask(int how, const sigset_t *sigset, sigset_t *oset, size_t size) { int ret = -1; lwp_sigset_t *pnewset = RT_NULL, *poldset = RT_NULL; #ifdef ARCH_MM_MMU lwp_sigset_t newset, oldset; #endif /* ARCH_MM_MMU*/ if (!size) { return -EINVAL; } if (!oset && !sigset) { return -EINVAL; } if (size > sizeof(lwp_sigset_t)) { size = sizeof(lwp_sigset_t); } if (oset) { #ifdef ARCH_MM_MMU if (!lwp_user_accessable((void *)oset, size)) { return -EFAULT; } poldset = &oldset; #else if (!lwp_user_accessable((void *)oset, size)) { return -EFAULT; } poldset = (lwp_sigset_t *)oset; #endif } if (sigset) { #ifdef ARCH_MM_MMU if (!lwp_user_accessable((void *)sigset, size)) { return -EFAULT; } lwp_get_from_user(&newset, (void *)sigset, size); pnewset = &newset; #else if (!lwp_user_accessable((void *)sigset, size)) { return -EFAULT; } pnewset = (lwp_sigset_t *)sigset; #endif /* ARCH_MM_MMU */ } ret = lwp_thread_signal_mask(rt_thread_self(), mask_command_u2k[how], pnewset, poldset); #ifdef ARCH_MM_MMU if (ret < 0) { return ret; } if (oset) { lwp_put_to_user(oset, poldset, size); } #endif /* ARCH_MM_MMU */ return (ret < 0 ? -EFAULT: ret); } sysret_t sys_sigpending(sigset_t *sigset, size_t sigsize) { sysret_t ret = 0; lwp_sigset_t lwpset; /* Verify and Get sigset, timeout */ if (!sigset || !lwp_user_accessable((void *)sigset, sigsize)) { ret = -EFAULT; } else { /* Fit sigset size to lwp set */ if (sizeof(lwpset) < sigsize) { LOG_I("%s: sigsize (%lx) extends lwp sigset chunk\n", __func__, sigsize); sigsize = sizeof(lwpset); } lwp_thread_signal_pending(rt_thread_self(), &lwpset); if (!lwp_put_to_user(sigset, &lwpset, sigsize)) RT_ASSERT(0); /* should never happened */ } return ret; } sysret_t sys_sigtimedwait(const sigset_t *sigset, siginfo_t *info, const struct timespec *timeout, size_t sigsize) { int sig; size_t ret; lwp_sigset_t lwpset; siginfo_t kinfo; struct timespec ktimeout; struct timespec *ptimeout; /* for RT_ASSERT */ RT_UNUSED(ret); /* Fit sigset size to lwp set */ if (sizeof(lwpset) < sigsize) { LOG_I("%s: sigsize (%lx) extends lwp sigset chunk\n", __func__, sigsize); sigsize = sizeof(lwpset); } else { /* if sigset of user is smaller, clear extra space */ memset(&lwpset, 0, sizeof(lwpset)); } /* Verify and Get sigset, timeout */ if (!sigset || !lwp_user_accessable((void *)sigset, sigsize)) { return -EFAULT; } else { ret = lwp_get_from_user(&lwpset, (void *)sigset, sigsize); RT_ASSERT(ret == sigsize); } if (timeout) { if (!lwp_user_accessable((void *)timeout, sizeof(*timeout))) return -EFAULT; else { ret = lwp_get_from_user(&ktimeout, (void *)timeout, sizeof(*timeout)); ptimeout = &ktimeout; RT_ASSERT(ret == sizeof(*timeout)); } } else { ptimeout = RT_NULL; } sig = lwp_thread_signal_timedwait(rt_thread_self(), &lwpset, &kinfo, ptimeout); if (sig > 0 && info) { if (!lwp_user_accessable((void *)info, sizeof(*info))) return -EFAULT; else { ret = lwp_put_to_user(info, &kinfo, sizeof(*info)); RT_ASSERT(ret == sizeof(*info)); } } return sig; } sysret_t sys_tkill(int tid, int sig) { #ifdef ARCH_MM_MMU rt_thread_t thread; sysret_t ret; /** * Brief: Match a tid and do the kill * * Note: Critical Section * - the thread (READ. may be released at the meantime; protected by locked) */ thread = lwp_tid_get_thread_and_inc_ref(tid); ret = lwp_thread_signal_kill(thread, sig, SI_USER, 0); lwp_tid_dec_ref(thread); return ret; #else return lwp_thread_kill((rt_thread_t)tid, sig); #endif } sysret_t sys_thread_sigprocmask(int how, const lwp_sigset_t *sigset, lwp_sigset_t *oset, size_t size) { int ret = -1; lwp_sigset_t *pnewset = RT_NULL, *poldset = RT_NULL; #ifdef ARCH_MM_MMU lwp_sigset_t newset, oldset; #endif /* ARCH_MM_MMU */ if (!size) { return -EINVAL; } if (!oset && !sigset) { return -EINVAL; } if (size != sizeof(lwp_sigset_t)) { return -EINVAL; } if (oset) { #ifdef ARCH_MM_MMU if (!lwp_user_accessable((void *)oset, size)) { return -EFAULT; } poldset = &oldset; #else if (!lwp_user_accessable((void *)oset, size)) { return -EFAULT; } poldset = oset; #endif } if (sigset) { #ifdef ARCH_MM_MMU if (!lwp_user_accessable((void *)sigset, size)) { return -EFAULT; } lwp_get_from_user(&newset, (void *)sigset, sizeof(lwp_sigset_t)); pnewset = &newset; #else if (!lwp_user_accessable((void *)sigset, size)) { return -EFAULT; } pnewset = (lwp_sigset_t *)sigset; #endif } ret = lwp_thread_signal_mask(rt_thread_self(), mask_command_u2k[how], pnewset, poldset); if (ret < 0) { return ret; } #ifdef ARCH_MM_MMU if (oset) { lwp_put_to_user(oset, poldset, sizeof(lwp_sigset_t)); } #endif return (ret < 0 ? -EFAULT: ret); } #ifndef ARCH_MM_MMU sysret_t sys_lwp_sighandler_set(int sig, lwp_sighandler_t func) { if (!lwp_user_accessable((void *)func, sizeof(lwp_sighandler_t))) { return -EFAULT; } lwp_sighandler_set(sig, func); return 0; } sysret_t sys_thread_sighandler_set(int sig, lwp_sighandler_t func) { if (!lwp_user_accessable((void *)func, sizeof(lwp_sighandler_t))) { return -EFAULT; } lwp_thread_sighandler_set(sig, func); return 0; } #endif /* not defined ARCH_MM_MMU */ sysret_t sys_waitpid(int32_t pid, int *status, int options) { int ret = -1; #ifdef ARCH_MM_MMU if (!lwp_user_accessable((void *)status, sizeof(int))) { return -EFAULT; } else { ret = lwp_waitpid(pid, status, options); } #else if (!lwp_user_accessable((void *)status, sizeof(int))) { return -EFAULT; } ret = waitpid(pid, status, options); #endif return ret; } #if defined(RT_USING_SAL) && defined(SAL_USING_POSIX) struct musl_addrinfo { int ai_flags; int ai_family; int ai_socktype; int ai_protocol; socklen_t ai_addrlen; struct musl_sockaddr *ai_addr; char *ai_canonname; struct musl_addrinfo *ai_next; }; sysret_t sys_getaddrinfo(const char *nodename, const char *servname, const struct musl_addrinfo *hints, struct musl_addrinfo *res) { int ret = -1; struct addrinfo *k_res = NULL; char *k_nodename = NULL; char *k_servname = NULL; struct addrinfo *k_hints = NULL; #ifdef ARCH_MM_MMU int len = 0; #endif #ifdef ARCH_MM_MMU if (!lwp_user_accessable((void *)res, sizeof(*res))) { SET_ERRNO(EFAULT); goto exit; } #endif if (nodename) { #ifdef ARCH_MM_MMU len = lwp_user_strlen(nodename); if (len <= 0) { SET_ERRNO(EFAULT); goto exit; } k_nodename = (char *)kmem_get(len + 1); if (!k_nodename) { SET_ERRNO(ENOMEM); goto exit; } if (lwp_get_from_user(k_nodename, (void *)nodename, len + 1) != len + 1) { SET_ERRNO(EFAULT); goto exit; } #else k_nodename = rt_strdup(nodename); if (!k_nodename) { SET_ERRNO(ENOMEM); goto exit; } #endif } if (servname) { #ifdef ARCH_MM_MMU len = lwp_user_strlen(servname); if (len <= 0) { SET_ERRNO(EFAULT); goto exit; } k_servname = (char *)kmem_get(len + 1); if (!k_servname) { SET_ERRNO(ENOMEM); goto exit; } if (lwp_get_from_user(k_servname, (void *)servname, len + 1) < 0) { SET_ERRNO(EFAULT); goto exit; } #else k_servname = rt_strdup(servname); if (!k_servname) { SET_ERRNO(ENOMEM); goto exit; } #endif } if (hints) { #ifdef ARCH_MM_MMU if (!lwp_user_accessable((void *)hints, sizeof(*hints))) { SET_ERRNO(EFAULT); goto exit; } #endif k_hints = (struct addrinfo *) rt_malloc(sizeof *hints); if (!k_hints) { SET_ERRNO(ENOMEM); goto exit; } rt_memset(k_hints, 0x0, sizeof(struct addrinfo)); k_hints->ai_flags = hints->ai_flags; k_hints->ai_family = hints->ai_family; k_hints->ai_socktype = hints->ai_socktype; k_hints->ai_protocol = hints->ai_protocol; k_hints->ai_addrlen = hints->ai_addrlen; } ret = sal_getaddrinfo(k_nodename, k_servname, k_hints, &k_res); if (ret == 0) { /* set sockaddr */ sockaddr_tomusl(k_res->ai_addr, res->ai_addr); res->ai_addrlen = k_res->ai_addrlen; /* set up addrinfo */ res->ai_family = k_res->ai_family; res->ai_flags = k_res->ai_flags; res->ai_next = NULL; if (hints != NULL) { /* copy socktype & protocol from hints if specified */ res->ai_socktype = hints->ai_socktype; res->ai_protocol = hints->ai_protocol; } sal_freeaddrinfo(k_res); k_res = NULL; } exit: if (ret < 0) { ret = GET_ERRNO(); } #ifdef ARCH_MM_MMU if (k_nodename) { kmem_put(k_nodename); } #else if (k_nodename) { rt_free(k_nodename); } #endif #ifdef ARCH_MM_MMU if (k_servname) { kmem_put(k_servname); } #else if (k_servname) { rt_free(k_servname); } #endif if (k_hints) { rt_free(k_hints); } return ret; } #define HOSTENT_BUFSZ 512 sysret_t sys_gethostbyname2_r(const char *name, int af, struct hostent *ret, char *buf, size_t buflen, struct hostent **result, int *err) { int ret_val = -1; int sal_ret = -1 , sal_err = -1; struct hostent sal_he, sal_tmp; struct hostent *sal_result = NULL; char *sal_buf = NULL; char *k_name = NULL; int len = 0; #ifdef ARCH_MM_MMU if (!lwp_user_accessable((void *)err, sizeof(*err))) { SET_ERRNO(EFAULT); goto __exit; } if (!lwp_user_accessable((void *)result, sizeof(*result)) || !lwp_user_accessable((void *)ret, sizeof(*ret)) || !lwp_user_accessable((void *)buf, buflen)) { /* not all arguments given */ *err = EFAULT; SET_ERRNO(EFAULT); goto __exit; } len = lwp_user_strlen(name); if (len <= 0) { *err = EFAULT; SET_ERRNO(EFAULT); goto __exit; } k_name = (char *)kmem_get(len + 1); if (!k_name) { SET_ERRNO(ENOMEM); goto __exit; } if (lwp_get_from_user(k_name, (void *)name, len + 1) < 0) { SET_ERRNO(EFAULT); goto __exit; } #else k_name = rt_strdup(name); if (k_name == NULL) { SET_ERRNO(ENOMEM); goto __exit; } #endif *result = ret; sal_buf = (char *)malloc(HOSTENT_BUFSZ); if (sal_buf == NULL) { SET_ERRNO(ENOMEM); goto __exit; } /* get host by name in SAL */ sal_ret = sal_gethostbyname_r(k_name, &sal_he, sal_buf, HOSTENT_BUFSZ, &sal_result, &sal_err); if (sal_ret == 0) { int index = 0, cnt = 0; char *ptr = buf; /* get counter */ index = 0; while (sal_he.h_addr_list[index] != NULL) { index++; } cnt = index + 1; #ifdef ARCH_MM_MMU /* update user space hostent */ lwp_put_to_user(buf, k_name, buflen - (ptr - buf)); lwp_memcpy(&sal_tmp, &sal_he, sizeof(sal_he)); sal_tmp.h_name = ptr; ptr += rt_strlen(k_name); sal_tmp.h_addr_list = (char**)ptr; ptr += cnt * sizeof(char *); index = 0; while (sal_he.h_addr_list[index] != NULL) { sal_tmp.h_addr_list[index] = ptr; lwp_memcpy(ptr, sal_he.h_addr_list[index], sal_he.h_length); ptr += sal_he.h_length; index++; } sal_tmp.h_addr_list[index] = NULL; lwp_put_to_user(ret, &sal_tmp, sizeof(sal_tmp)); #else /* update user space hostent */ ret->h_addrtype = sal_he.h_addrtype; ret->h_length = sal_he.h_length; rt_strncpy(ptr, k_name, buflen - (ptr - buf)); ret->h_name = ptr; ptr += lwp_user_strlen(k_name); ret->h_addr_list = (char**)ptr; ptr += cnt * sizeof(char *); index = 0; while (sal_he.h_addr_list[index] != NULL) { ret->h_addr_list[index] = ptr; lwp_memcpy(ptr, sal_he.h_addr_list[index], sal_he.h_length); ptr += sal_he.h_length; index++; } ret->h_addr_list[index] = NULL; #endif ret_val = 0; } __exit: if (ret_val < 0) { ret_val = GET_ERRNO(); } /* release buffer */ if (sal_buf) { free(sal_buf); } #ifdef ARCH_MM_MMU if (k_name) { kmem_put(k_name); } #else if (k_name) { free(k_name); } #endif return ret_val; } #endif char *sys_getcwd(char *buf, size_t size) { char *tmp, *ret = RT_NULL; if (!lwp_user_accessable((void *)buf, size)) { return ret; } tmp = (char *)rt_malloc(size); if (!tmp) { return ret; } if (getcwd(tmp, size) != RT_NULL) { if (lwp_put_to_user(buf, tmp, size) > 0) { ret = buf; } } rt_free(tmp); return ret; } sysret_t sys_chdir(const char *path) { #ifdef ARCH_MM_MMU int err = 0; int len = 0; char *kpath = RT_NULL; len = lwp_user_strlen(path); if (len <= 0) { return -EFAULT; } kpath = (char *)kmem_get(len + 1); if (!kpath) { return -ENOMEM; } if (lwp_get_from_user(kpath, (void *)path, len + 1) != (len + 1)) { kmem_put(kpath); return -EINVAL; } err = chdir(kpath); kmem_put(kpath); return (err < 0 ? GET_ERRNO() : err); #else int ret = chdir(path); return (ret < 0 ? GET_ERRNO() : ret); #endif } sysret_t sys_mkdir(const char *path, mode_t mode) { #ifdef ARCH_MM_MMU int err = 0; int len = 0; char *kpath = RT_NULL; len = lwp_user_strlen(path); if (len <= 0) { return -EFAULT; } kpath = (char *)kmem_get(len + 1); if (!kpath) { return -ENOMEM; } if (lwp_get_from_user(kpath, (void *)path, len + 1) != (len + 1)) { kmem_put(kpath); return -EINVAL; } err = mkdir(kpath, mode); kmem_put(kpath); return (err < 0 ? GET_ERRNO() : err); #else int ret = mkdir(path, mode); return (ret < 0 ? GET_ERRNO() : ret); #endif } sysret_t sys_rmdir(const char *path) { #ifdef ARCH_MM_MMU int err = 0; int len = 0; char *kpath = RT_NULL; len = lwp_user_strlen(path); if (len <= 0) { return -EFAULT; } kpath = (char *)kmem_get(len + 1); if (!kpath) { return -ENOMEM; } if (lwp_get_from_user(kpath, (void *)path, len + 1) != (len + 1)) { kmem_put(kpath); return -EINVAL; } err = rmdir(kpath); kmem_put(kpath); return (err < 0 ? GET_ERRNO() : err); #else int ret = rmdir(path); return (ret < 0 ? GET_ERRNO() : ret); #endif } #ifdef RT_USING_MUSLLIBC typedef uint64_t ino_t; #endif struct libc_dirent { ino_t d_ino; off_t d_off; unsigned short d_reclen; unsigned char d_type; char d_name[DIRENT_NAME_MAX]; }; sysret_t sys_getdents(int fd, struct libc_dirent *dirp, size_t nbytes) { int ret = -1; struct dfs_file *file; size_t cnt = (nbytes / sizeof(struct libc_dirent)); size_t rtt_nbytes = 0; struct dirent *rtt_dirp; #ifdef ARCH_MM_MMU if (!lwp_user_accessable((void *)dirp, sizeof(struct libc_dirent))) { return -EFAULT; } #endif if (cnt == 0) { return -EINVAL; } rtt_nbytes = cnt * sizeof(struct dirent); rtt_dirp = (struct dirent *)rt_malloc(rtt_nbytes); if (!rtt_dirp) { return -ENOMEM; } file = fd_get(fd); ret = dfs_file_getdents(file, rtt_dirp, rtt_nbytes); if (ret > 0) { size_t i = 0; cnt = ret / sizeof(struct dirent); for (i = 0; i < cnt; i++) { dirp[i].d_ino = 0; dirp[i].d_off = i*sizeof(struct libc_dirent); dirp[i].d_type = rtt_dirp[i].d_type; dirp[i].d_reclen = sizeof(struct libc_dirent); strcpy(dirp[i].d_name, rtt_dirp[i].d_name); } ret = cnt * sizeof(struct libc_dirent); } if (ret < 0) { ret = GET_ERRNO(); } rt_free(rtt_dirp); return ret; } sysret_t sys_get_errno(void) { return rt_get_errno(); } #ifdef ARCH_MM_MMU sysret_t sys_set_thread_area(void *p) { rt_thread_t thread; thread = rt_thread_self(); thread->thread_idr = p; arch_set_thread_area(p); return 0; } sysret_t sys_set_tid_address(int *tidptr) { rt_thread_t thread; #ifdef ARCH_MM_MMU if (!lwp_user_accessable((void *)tidptr, sizeof(int))) { return -EFAULT; } #endif thread = rt_thread_self(); thread->clear_child_tid = tidptr; return thread->tid; } #endif /* ARCH_MM_MMU */ sysret_t sys_gettid(void) { return rt_thread_self()->tid; } sysret_t sys_access(const char *filename, int mode) { int ret = 0; #ifdef ARCH_MM_MMU rt_size_t len = 0; char *kfilename = RT_NULL; len = lwp_user_strlen(filename); if (len <= 0) { return -EINVAL; } kfilename = (char *)kmem_get(len + 1); if (!kfilename) { return -ENOMEM; } if (lwp_get_from_user(kfilename, (void *)filename, len + 1) != (len + 1)) { kmem_put(kfilename); return -EFAULT; } ret = access(kfilename, mode); if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kfilename); return ret; #else ret = access(filename, mode); return (ret < 0 ? GET_ERRNO() : ret); #endif } sysret_t sys_pipe(int fd[2]) { int ret; int kfd[2] = {0, 0}; if (!lwp_user_accessable((void *)fd, sizeof(int[2]))) { return -EFAULT; } ret = pipe(kfd); lwp_put_to_user((void *)fd, kfd, sizeof(int[2])); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_clock_settime(clockid_t clk, const struct timespec *ts) { int ret = 0; #ifdef ARCH_MM_MMU size_t size = sizeof(struct timespec); struct timespec *kts = NULL; if (!lwp_user_accessable((void *)ts, size)) { return -EFAULT; } kts = kmem_get(size); if (!kts) { return -ENOMEM; } lwp_get_from_user(kts, (void *)ts, size); ret = clock_settime(clk, kts); if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kts); return ret; #else if (!lwp_user_accessable((void *)ts, sizeof(struct timespec))) { return -EFAULT; } ret = clock_settime(clk, ts); return (ret < 0 ? GET_ERRNO() : ret); #endif } sysret_t sys_clock_gettime(clockid_t clk, struct timespec *ts) { int ret = 0; #ifdef ARCH_MM_MMU size_t size = sizeof(struct timespec); struct timespec *kts = NULL; if (!lwp_user_accessable((void *)ts, size)) { return -EFAULT; } kts = kmem_get(size); if (!kts) { return -ENOMEM; } ret = clock_gettime(clk, kts); if (ret != -1) lwp_put_to_user(ts, kts, size); if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kts); return ret; #else if (!lwp_user_accessable((void *)ts, sizeof(struct timespec))) { return -EFAULT; } ret = clock_gettime(clk, ts); return (ret < 0 ? GET_ERRNO() : ret); #endif } sysret_t sys_clock_nanosleep(clockid_t clk, int flags, const struct timespec *rqtp, struct timespec *rmtp) { int ret = 0; dbg_log(DBG_LOG, "sys_nanosleep\n"); if (!lwp_user_accessable((void *)rqtp, sizeof *rqtp)) return -EFAULT; #ifdef ARCH_MM_MMU struct timespec rqtp_k; struct timespec rmtp_k; lwp_get_from_user(&rqtp_k, (void *)rqtp, sizeof rqtp_k); ret = clock_nanosleep(clk, flags, &rqtp_k, &rmtp_k); if ((ret != -1 || rt_get_errno() == EINTR) && rmtp && lwp_user_accessable((void *)rmtp, sizeof *rmtp)) { lwp_put_to_user(rmtp, (void *)&rmtp_k, sizeof rmtp_k); if(ret != 0) return -EINTR; } #else if (rmtp) { if (!lwp_user_accessable((void *)rmtp, sizeof *rmtp)) return -EFAULT; ret = clock_nanosleep(clk, flags, rqtp, rmtp); } #endif return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_clock_getres(clockid_t clk, struct timespec *ts) { int ret = 0; #ifdef ARCH_MM_MMU struct timespec kts; size_t size = sizeof(struct timespec); if (!lwp_user_accessable((void *)ts, size)) { return -EFAULT; } ret = clock_getres(clk, &kts); if (ret != -1) lwp_put_to_user(ts, &kts, size); #else if (!lwp_user_accessable((void *)ts, sizeof(struct timespec))) { return -EFAULT; } ret = clock_getres(clk, ts); #endif return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_rename(const char *oldpath, const char *newpath) { int ret = -1; #ifdef ARCH_MM_MMU int err; err = lwp_user_strlen(oldpath); if (err <= 0) { return -EFAULT; } err = lwp_user_strlen(newpath); if (err <= 0) { return -EFAULT; } #endif ret = rename(oldpath, newpath); return (ret < 0 ? GET_ERRNO() : ret); } typedef unsigned long long rlim_t; struct rlimit { rlim_t rlim_cur; rlim_t rlim_max; }; #define RLIMIT_CPU 0 #define RLIMIT_FSIZE 1 #define RLIMIT_DATA 2 #define RLIMIT_STACK 3 #define RLIMIT_CORE 4 #define RLIMIT_RSS 5 #define RLIMIT_NPROC 6 #define RLIMIT_NOFILE 7 #define RLIMIT_MEMLOCK 8 #define RLIMIT_AS 9 sysret_t sys_prlimit64(pid_t pid, unsigned int resource, const struct rlimit *new_rlim, struct rlimit *old_rlim) { return -ENOSYS; } sysret_t sys_getrlimit(unsigned int resource, unsigned long rlim[2]) { int ret = -1; unsigned long krlim[2] = {0, 0}; if (!lwp_user_accessable((void *)rlim, sizeof(unsigned long [2]))) { return -EFAULT; } if (lwp_get_from_user(krlim, rlim, sizeof(unsigned long [2])) != sizeof(unsigned long [2])) { return -EINVAL; } switch (resource) { case RLIMIT_NOFILE: { struct dfs_fdtable *fdt = dfs_fdtable_get(); dfs_file_lock(); krlim[0] = fdt->maxfd; dfs_file_unlock(); krlim[1] = DFS_FD_MAX; ret = 0; } break; default: return -EINVAL; break; } lwp_put_to_user((void *)rlim, krlim, sizeof(unsigned long [2])); kmem_put(krlim); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_setrlimit(unsigned int resource, struct rlimit *rlim) { return -ENOSYS; } sysret_t sys_setsid(void) { int ret = 0; ret = setsid(); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_getrandom(void *buf, size_t buflen, unsigned int flags) { int ret = -1; int count = 0; void *kmem = RT_NULL; rt_device_t rd_dev = RT_NULL; if (flags & GRND_RANDOM) rd_dev = rt_device_find("random"); else rd_dev = rt_device_find("urandom"); if (rd_dev == RT_NULL) { return -EFAULT; } if (rt_device_open(rd_dev, RT_DEVICE_OFLAG_RDONLY) != RT_EOK) { return -EFAULT; } if (!lwp_user_accessable(buf, buflen)) { rt_device_close(rd_dev); return -EFAULT; } #ifdef ARCH_MM_MMU kmem = kmem_get(buflen); if (!kmem) { rt_device_close(rd_dev); return -ENOMEM; } while (count < buflen) { ret = rt_device_read(rd_dev, count, (char *)kmem + count, buflen - count); if (ret <= 0) break; count += ret; } rt_device_close(rd_dev); ret = count; if (count > 0) { ret = lwp_put_to_user(buf, kmem, count); } kmem_put(kmem); #else while (count < buflen) { ret = rt_device_read(rd_dev, count, (char *)kmem + count, buflen - count); if (ret <= 0) break; count += ret; } rt_device_close(rd_dev); ret = count; #endif return ret; } ssize_t sys_readlink(char* path, char *buf, size_t bufsz) { size_t len, copy_len; int err, rtn; int fd = -1; struct dfs_file *d; char *copy_path; len = lwp_user_strlen(path); if (len <= 0) { return -EFAULT; } if (!lwp_user_accessable(buf, bufsz)) { return -EINVAL; } copy_path = (char*)rt_malloc(len + 1); if (!copy_path) { return -ENOMEM; } copy_len = lwp_get_from_user(copy_path, path, len); copy_path[copy_len] = '\0'; /* musl __procfdname */ err = sscanf(copy_path, "/proc/self/fd/%d", &fd); if (err != 1) { rtn = 0; if (access(copy_path, 0)) { rtn = -ENOENT; LOG_E("readlink: path not is /proc/self/fd/* and path not exits, call by musl __procfdname()?"); } else { #ifdef RT_USING_DFS_V2 char *link_fn = (char *)rt_malloc(DFS_PATH_MAX); if (link_fn) { err = dfs_file_readlink(copy_path, link_fn, DFS_PATH_MAX); if (err > 0) { rtn = lwp_put_to_user(buf, link_fn, bufsz > err ? err : bufsz - 1); } else { rtn = -EIO; } rt_free(link_fn); } else { rtn = -ENOMEM; } #else rtn = lwp_put_to_user(buf, copy_path, copy_len); #endif } rt_free(copy_path); return rtn; } else { rt_free(copy_path); } d = fd_get(fd); if (!d) { return -EBADF; } if (!d->vnode) { return -EBADF; } #ifdef RT_USING_DFS_V2 { char *fullpath = dfs_dentry_full_path(d->dentry); if (fullpath) { copy_len = strlen(fullpath); if (copy_len > bufsz) { copy_len = bufsz; } bufsz = lwp_put_to_user(buf, fullpath, copy_len); rt_free(fullpath); } else { bufsz = 0; } } #else copy_len = strlen(d->vnode->fullpath); if (copy_len > bufsz) { copy_len = bufsz; } bufsz = lwp_put_to_user(buf, d->vnode->fullpath, copy_len); #endif return bufsz; } sysret_t sys_sched_setaffinity(pid_t pid, size_t size, void *set) { void *kset = RT_NULL; if (size <= 0 || size > sizeof(cpu_set_t)) { return -EINVAL; } if (!lwp_user_accessable((void *)set, size)) return -EFAULT; kset = kmem_get(size); if (kset == RT_NULL) { return -ENOMEM; } if (lwp_get_from_user(kset, set, size) != size) { kmem_put(kset); return -EINVAL; } for (int i = 0;i < size * 8; i++) { if (CPU_ISSET_S(i, size, kset)) { kmem_put(kset); return lwp_setaffinity(pid, i); } } kmem_put(kset); return -1; } sysret_t sys_sched_getaffinity(const pid_t pid, size_t size, void *set) { #ifdef ARCH_MM_MMU LWP_DEF_RETURN_CODE(rc); void *mask; struct rt_lwp *lwp; rt_bool_t need_release = RT_FALSE; if (size <= 0 || size > sizeof(cpu_set_t)) { return -EINVAL; } if (!lwp_user_accessable(set, size)) { return -EFAULT; } mask = kmem_get(size); if (!mask) { return -ENOMEM; } CPU_ZERO_S(size, mask); if (pid == 0) { lwp = lwp_self(); } else { need_release = RT_TRUE; lwp_pid_lock_take(); lwp = lwp_from_pid_locked(pid); } if (!lwp) { rc = -ESRCH; } else { #ifdef RT_USING_SMP if (lwp->bind_cpu == RT_CPUS_NR) /* not bind */ { for(int i = 0; i < RT_CPUS_NR; i++) { CPU_SET_S(i, size, mask); } } else /* set bind cpu */ { /* TODO: only single-core bindings are now supported of rt-smart */ CPU_SET_S(lwp->bind_cpu, size, mask); } #else CPU_SET_S(0, size, mask); #endif if (lwp_put_to_user(set, mask, size) != size) rc = -EFAULT; else rc = size; } if (need_release) lwp_pid_lock_release(); kmem_put(mask); LWP_RETURN(rc); #else return -1; #endif } sysret_t sys_sysinfo(void *info) { #ifdef ARCH_MM_MMU struct sysinfo kinfo = {0}; rt_size_t total_pages = 0, free_pages = 0; if (!lwp_user_accessable(info, sizeof(struct sysinfo))) { return -EFAULT; } kinfo.uptime = rt_tick_get_millisecond() / 1000; /* TODO: 1, 5, and 15 minute load averages */ kinfo.loads[0] = kinfo.loads[1] = kinfo.loads[2] = rt_object_get_length(RT_Object_Class_Thread); rt_page_get_info(&total_pages, &free_pages); kinfo.totalram = total_pages; kinfo.freeram = free_pages; /* TODO: implementation procfs, here is counter the lwp number */ struct lwp_avl_struct *pids = lwp_get_pid_ary(); for (int index = 0; index < RT_LWP_MAX_NR; index++) { struct rt_lwp *lwp = (struct rt_lwp *)pids[index].data; if (lwp) { kinfo.procs++; } } rt_page_high_get_info(&total_pages, &free_pages); kinfo.totalhigh = total_pages; kinfo.freehigh = free_pages; kinfo.mem_unit = ARCH_PAGE_SIZE; if (lwp_put_to_user(info, &kinfo, sizeof(struct sysinfo)) != sizeof(struct sysinfo)) { return -EFAULT; } return 0; #else return -1; #endif } sysret_t sys_sched_setparam(pid_t pid, void *param) { struct sched_param *sched_param = RT_NULL; struct rt_lwp *lwp = NULL; rt_thread_t main_thread; rt_bool_t need_release = RT_FALSE; int ret = -1; if (!lwp_user_accessable(param, sizeof(struct sched_param))) { return -EFAULT; } sched_param = kmem_get(sizeof(struct sched_param)); if (sched_param == RT_NULL) { return -ENOMEM; } if (lwp_get_from_user(sched_param, param, sizeof(struct sched_param)) != sizeof(struct sched_param)) { kmem_put(sched_param); return -EINVAL; } if (pid > 0) { need_release = RT_TRUE; lwp_pid_lock_take(); lwp = lwp_from_pid_locked(pid); } else if (pid == 0) { lwp = lwp_self(); } if (lwp) { main_thread = rt_list_entry(lwp->t_grp.prev, struct rt_thread, sibling); if (need_release) lwp_pid_lock_release(); ret = rt_thread_control(main_thread, RT_THREAD_CTRL_CHANGE_PRIORITY, (void *)&sched_param->sched_priority); } kmem_put(sched_param); return ret; } sysret_t sys_sched_yield(void) { rt_thread_yield(); return 0; } sysret_t sys_sched_getparam(const pid_t tid, void *param) { struct sched_param *sched_param = RT_NULL; rt_thread_t thread; int ret = -1; if (!lwp_user_accessable(param, sizeof(struct sched_param))) { return -EFAULT; } sched_param = kmem_get(sizeof(struct sched_param)); if (sched_param == RT_NULL) { return -ENOMEM; } thread = lwp_tid_get_thread_and_inc_ref(tid); if (thread) { sched_param->sched_priority = RT_SCHED_PRIV(thread).current_priority; ret = 0; } lwp_tid_dec_ref(thread); lwp_put_to_user((void *)param, sched_param, sizeof(struct sched_param)); kmem_put(sched_param); return ret; } sysret_t sys_sched_get_priority_max(int policy) { if(policy < 0) { SET_ERRNO(EINVAL); return -rt_get_errno(); } return RT_THREAD_PRIORITY_MAX; } sysret_t sys_sched_get_priority_min(int policy) { if(policy < 0) { SET_ERRNO(EINVAL); return -rt_get_errno(); } return 0; } sysret_t sys_sched_setscheduler(int tid, int policy, void *param) { sysret_t ret; struct sched_param *sched_param = RT_NULL; rt_thread_t thread = RT_NULL; if (!lwp_user_accessable(param, sizeof(struct sched_param))) { return -EFAULT; } sched_param = kmem_get(sizeof(struct sched_param)); if (sched_param == RT_NULL) { return -ENOMEM; } if (lwp_get_from_user(sched_param, param, sizeof(struct sched_param)) != sizeof(struct sched_param)) { kmem_put(sched_param); return -EINVAL; } thread = lwp_tid_get_thread_and_inc_ref(tid); ret = rt_thread_control(thread, RT_THREAD_CTRL_CHANGE_PRIORITY, (void *)&sched_param->sched_priority); lwp_tid_dec_ref(thread); kmem_put(sched_param); return ret; } sysret_t sys_sched_getscheduler(int tid, int *policy, void *param) { struct sched_param *sched_param = RT_NULL; rt_thread_t thread = RT_NULL; if (!lwp_user_accessable(param, sizeof(struct sched_param))) { return -EFAULT; } sched_param = kmem_get(sizeof(struct sched_param)); if (sched_param == RT_NULL) { return -ENOMEM; } if (lwp_get_from_user(sched_param, param, sizeof(struct sched_param)) != sizeof(struct sched_param)) { kmem_put(sched_param); return -EINVAL; } thread = lwp_tid_get_thread_and_inc_ref(tid); sched_param->sched_priority = RT_SCHED_PRIV(thread).current_priority; lwp_tid_dec_ref(thread); lwp_put_to_user((void *)param, sched_param, sizeof(struct sched_param)); kmem_put(sched_param); *policy = 0; return 0; } sysret_t sys_fsync(int fd) { int res = fsync(fd); if (res < 0) res = rt_get_errno(); return res; } mqd_t sys_mq_open(const char *name, int flags, mode_t mode, struct mq_attr *attr) { mqd_t mqdes; sysret_t ret = 0; #ifdef ARCH_MM_MMU char *kname = RT_NULL; rt_size_t len = 0; struct mq_attr attr_k; len = lwp_user_strlen(name); if (!len) return (mqd_t)-EINVAL; kname = (char *)kmem_get(len + 1); if (!kname) return (mqd_t)-ENOMEM; if (attr == NULL) { attr_k.mq_maxmsg = 10; attr_k.mq_msgsize = 8192; attr_k.mq_flags = 0; attr = &attr_k; } else { if (!lwp_get_from_user(&attr_k, (void *)attr, sizeof(struct mq_attr))) return -EINVAL; } lwp_get_from_user(kname, (void *)name, len + 1); mqdes = mq_open(kname, flags, mode, &attr_k); if (mqdes == -1) { ret = GET_ERRNO(); } lwp_put_to_user(attr, &attr_k, sizeof(struct mq_attr)); kmem_put(kname); #else mqdes = mq_open(name, flags, mode, attr); #endif if (mqdes == -1) return (mqd_t)ret; else return mqdes; } sysret_t sys_mq_unlink(const char *name) { int ret = 0; #ifdef ARCH_MM_MMU char *kname = RT_NULL; rt_size_t len = 0; len = lwp_user_strlen(name); if (!len) return -EINVAL; kname = (char *)kmem_get(len + 1); if (!kname) return -ENOMEM; lwp_get_from_user(kname, (void *)name, len + 1); ret = mq_unlink(kname); if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kname); return ret; #else ret = mq_unlink(name); return (ret < 0 ? GET_ERRNO() : ret); #endif } sysret_t sys_mq_timedsend(mqd_t mqd, const char *msg, size_t len, unsigned prio, const struct timespec *at) { int ret = 0; #ifdef ARCH_MM_MMU char *kmsg = RT_NULL; struct timespec at_k; kmsg = (char *)kmem_get(len + 1); if (!kmsg) return -ENOMEM; lwp_get_from_user(&at_k, (void *)at, sizeof(struct timespec)); lwp_get_from_user(kmsg, (void *)msg, len + 1); ret = mq_timedsend(mqd, kmsg, len, prio, &at_k); if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kmsg); return ret; #else ret = mq_timedsend(mqd, msg, len, prio, at); return (ret < 0 ? GET_ERRNO() : ret); #endif } sysret_t sys_mq_timedreceive(mqd_t mqd, char *restrict msg, size_t len, unsigned *restrict prio, const struct timespec *restrict at) { int ret = 0; #ifdef ARCH_MM_MMU char *restrict kmsg = RT_NULL; struct timespec at_k; kmsg = (char *restrict)kmem_get(len + 1); if (!kmsg) return -ENOMEM; lwp_get_from_user(kmsg, (void *)msg, len + 1); if (at == RT_NULL) { ret = mq_timedreceive(mqd, kmsg, len, prio, RT_NULL); } else { if (!lwp_get_from_user(&at_k, (void *)at, sizeof(struct timespec))) return -EINVAL; ret = mq_timedreceive(mqd, kmsg, len, prio, &at_k); } if (ret > 0) lwp_put_to_user(msg, kmsg, len + 1); if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kmsg); return ret; #else ret = mq_timedreceive(mqd, msg, len, prio, at); return (ret < 0 ? GET_ERRNO() : ret); #endif } sysret_t sys_mq_notify(mqd_t mqd, const struct sigevent *sev) { int ret = 0; #ifdef ARCH_MM_MMU struct sigevent sev_k; lwp_get_from_user(&sev_k, (void *)sev, sizeof(struct timespec)); ret = mq_notify(mqd, &sev_k); #else ret = mq_notify(mqd, sev); #endif return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_mq_getsetattr(mqd_t mqd, const struct mq_attr *restrict new, struct mq_attr *restrict old) { int ret = 0; #ifdef ARCH_MM_MMU size_t size = sizeof(struct mq_attr); struct mq_attr *restrict knew = NULL; struct mq_attr *restrict kold = NULL; if (new != RT_NULL) { if (!lwp_user_accessable((void *)new, size)) return -EFAULT; knew = kmem_get(size); if (!knew) return -ENOMEM; lwp_get_from_user(knew, (void *)new, size); } if (!lwp_user_accessable((void *)old, size)) return -EFAULT; kold = kmem_get(size); if (!kold) return -ENOMEM; lwp_get_from_user(kold, (void *)old, size); ret = mq_setattr(mqd, knew, kold); if (ret != -1) lwp_put_to_user(old, kold, size); if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kold); if (new != RT_NULL) kmem_put(knew); return ret; #else ret = mq_setattr(mqd, new, old); return (ret < 0 ? GET_ERRNO() : ret); #endif } sysret_t sys_mq_close(mqd_t mqd) { int ret = 0; #ifdef ARCH_MM_MMU ret = mq_close(mqd); #else ret = mq_close(mqd); #endif return (ret < 0 ? GET_ERRNO() : ret); } #define ICACHE (1<<0) #define DCACHE (1<<1) #define BCACHE (ICACHE|DCACHE) rt_weak sysret_t sys_cacheflush(void *addr, int size, int cache) { if (!lwp_user_accessable(addr, size)) return -EFAULT; if (((size_t)addr < (size_t)addr + size) && ((size_t)addr >= USER_VADDR_START) && ((size_t)addr + size < USER_VADDR_TOP)) { if ((cache & DCACHE)) { rt_hw_cpu_dcache_clean_and_invalidate(addr, size); } if ((cache & ICACHE)) { rt_hw_cpu_icache_invalidate(addr, size); } return 0; } return -EFAULT; } sysret_t sys_uname(struct utsname *uts) { struct utsname utsbuff = {0}; int ret = 0; const char *machine; if (!lwp_user_accessable((void *)uts, sizeof(struct utsname))) { return -EFAULT; } rt_strncpy(utsbuff.sysname, "RT-Thread", sizeof(utsbuff.sysname)); utsbuff.nodename[0] = '\0'; ret = rt_snprintf(utsbuff.release, sizeof(utsbuff.release), "%u.%u.%u", RT_VERSION_MAJOR, RT_VERSION_MINOR, RT_VERSION_PATCH); if (ret < 0) { return -EIO; } ret = rt_snprintf(utsbuff.version, sizeof(utsbuff.version), "RT-Thread %u.%u.%u %s %s", RT_VERSION_MAJOR, RT_VERSION_MINOR, RT_VERSION_PATCH, __DATE__, __TIME__); if (ret < 0) { return -EIO; } machine = rt_hw_cpu_arch(); rt_strncpy(utsbuff.machine, machine, sizeof(utsbuff.machine)); utsbuff.domainname[0] = '\0'; lwp_put_to_user(uts, &utsbuff, sizeof utsbuff); return 0; } sysret_t sys_statfs(const char *path, struct statfs *buf) { int ret = 0; size_t len; size_t copy_len; char *copy_path; struct statfs statfsbuff = {0}; if (!lwp_user_accessable((void *)buf, sizeof(struct statfs))) { return -EFAULT; } len = lwp_user_strlen(path); if (len <= 0) { return -EFAULT; } copy_path = (char*)rt_malloc(len + 1); if (!copy_path) { return -ENOMEM; } copy_len = lwp_get_from_user(copy_path, (void*)path, len); if (copy_len == 0) { rt_free(copy_path); return -EFAULT; } copy_path[copy_len] = '\0'; ret = _SYS_WRAP(statfs(copy_path, &statfsbuff)); rt_free(copy_path); if (ret == 0) { lwp_put_to_user(buf, &statfsbuff, sizeof statfsbuff); } return ret; } sysret_t sys_statfs64(const char *path, size_t sz, struct statfs *buf) { int ret = 0; size_t len; size_t copy_len; char *copy_path; struct statfs statfsbuff = {0}; if (!lwp_user_accessable((void *)buf, sizeof(struct statfs))) { return -EFAULT; } if (sz != sizeof(struct statfs)) { return -EINVAL; } len = lwp_user_strlen(path); if (len <= 0) { return -EFAULT; } copy_path = (char*)rt_malloc(len + 1); if (!copy_path) { return -ENOMEM; } copy_len = lwp_get_from_user(copy_path, (void*)path, len); if (copy_len == 0) { rt_free(copy_path); return -EFAULT; } copy_path[copy_len] = '\0'; ret = _SYS_WRAP(statfs(copy_path, &statfsbuff)); rt_free(copy_path); if (ret == 0) { lwp_put_to_user(buf, &statfsbuff, sizeof statfsbuff); } return ret; } sysret_t sys_fstatfs(int fd, struct statfs *buf) { int ret = 0; struct statfs statfsbuff = {0}; if (!lwp_user_accessable((void *)buf, sizeof(struct statfs))) { return -EFAULT; } ret = _SYS_WRAP(fstatfs(fd, &statfsbuff)); if (ret == 0) { lwp_put_to_user(buf, &statfsbuff, sizeof statfsbuff); } return ret; } sysret_t sys_fstatfs64(int fd, size_t sz, struct statfs *buf) { int ret = 0; struct statfs statfsbuff = {0}; if (!lwp_user_accessable((void *)buf, sizeof(struct statfs))) { return -EFAULT; } if (sz != sizeof(struct statfs)) { return -EINVAL; } ret = _SYS_WRAP(fstatfs(fd, &statfsbuff)); if (ret == 0) { lwp_put_to_user(buf, &statfsbuff, sizeof statfsbuff); } return ret; } sysret_t sys_mount(char *source, char *target, char *filesystemtype, unsigned long mountflags, void *data) { char *copy_source; char *copy_target; char *copy_filesystemtype; size_t len_source, copy_len_source; size_t len_target, copy_len_target; size_t len_filesystemtype, copy_len_filesystemtype; char *tmp = NULL; int ret = 0; len_source = lwp_user_strlen(source); if (len_source <= 0) return -EINVAL; len_target = lwp_user_strlen(target); if (len_target <= 0) return -EINVAL; len_filesystemtype = lwp_user_strlen(filesystemtype); if (len_filesystemtype <= 0) return -EINVAL; copy_source = (char*)rt_malloc(len_source + 1 + len_target + 1 + len_filesystemtype + 1); if (!copy_source) { return -ENOMEM; } copy_target = copy_source + len_source + 1; copy_filesystemtype = copy_target + len_target + 1; copy_len_source = lwp_get_from_user(copy_source, source, len_source); copy_source[copy_len_source] = '\0'; copy_len_target = lwp_get_from_user(copy_target, target, len_target); copy_target[copy_len_target] = '\0'; copy_len_filesystemtype = lwp_get_from_user(copy_filesystemtype, filesystemtype, len_filesystemtype); copy_filesystemtype[copy_len_filesystemtype] = '\0'; if (strcmp(copy_filesystemtype, "nfs") == 0) { tmp = copy_source; copy_source = NULL; } if (strcmp(copy_filesystemtype, "tmp") == 0) { copy_source = NULL; } ret = dfs_mount(copy_source, copy_target, copy_filesystemtype, 0, tmp); rt_free(copy_source); return ret; } sysret_t sys_umount2(char *__special_file, int __flags) { char *copy_special_file; size_t len_special_file, copy_len_special_file; int ret = 0; len_special_file = lwp_user_strlen(__special_file); if (len_special_file <= 0) { return -EFAULT; } copy_special_file = (char*)rt_malloc(len_special_file + 1); if (!copy_special_file) { return -ENOMEM; } copy_len_special_file = lwp_get_from_user(copy_special_file, __special_file, len_special_file); copy_special_file[copy_len_special_file] = '\0'; ret = dfs_unmount(copy_special_file); rt_free(copy_special_file); return ret; } sysret_t sys_link(const char *existing, const char *new) { int ret = -1; #ifdef RT_USING_DFS_V2 #ifdef ARCH_MM_MMU int len = 0; char *kexisting = RT_NULL; char *knew = RT_NULL; len = lwp_user_strlen(existing); if (len <= 0) { return -EFAULT; } kexisting = (char *)kmem_get(len + 1); if (!kexisting) { return -ENOMEM; } if (lwp_get_from_user(kexisting, (void *)existing, len + 1) != (len + 1)) { kmem_put(kexisting); return -EINVAL; } len = lwp_user_strlen(new); if (len <= 0) { kmem_put(kexisting); return -EFAULT; } knew = (char *)kmem_get(len + 1); if (!knew) { kmem_put(kexisting); return -ENOMEM; } if (lwp_get_from_user(knew, (void *)new, len + 1) != (len + 1)) { kmem_put(knew); kmem_put(kexisting); return -EINVAL; } ret = dfs_file_link(kexisting, knew); kmem_put(knew); kmem_put(kexisting); #else ret = dfs_file_link(existing, new); #endif #else SET_ERRNO(EFAULT); #endif return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_symlink(const char *existing, const char *new) { int ret = -1; #ifdef ARCH_MM_MMU int err; err = lwp_user_strlen(existing); if (err <= 0) { return -EFAULT; } err = lwp_user_strlen(new); if (err <= 0) { return -EFAULT; } #endif #ifdef RT_USING_DFS_V2 ret = dfs_file_symlink(existing, new); #else SET_ERRNO(EFAULT); #endif return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_eventfd2(unsigned int count, int flags) { int ret; ret = eventfd(count, flags); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_epoll_create1(int flags) { int ret; ret = epoll_create(flags); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_epoll_ctl(int fd, int op, int fd2, struct epoll_event *ev) { int ret = 0; struct epoll_event *kev = RT_NULL; if (!lwp_user_accessable((void *)ev, sizeof(struct epoll_event))) return -EFAULT; kev = kmem_get(sizeof(struct epoll_event)); if (kev == RT_NULL) { return -ENOMEM; } if (lwp_get_from_user(kev, ev, sizeof(struct epoll_event)) != sizeof(struct epoll_event)) { kmem_put(kev); return -EINVAL; } ret = epoll_ctl(fd, op, fd2, kev); kmem_put(kev); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_epoll_pwait(int fd, struct epoll_event *ev, int cnt, int to, const sigset_t *sigs, unsigned long sigsetsize) { int ret = 0; struct epoll_event *kev = RT_NULL; sigset_t *ksigs = RT_NULL; if (!lwp_user_accessable((void *)ev, cnt * sizeof(struct epoll_event))) return -EFAULT; kev = kmem_get(cnt * sizeof(struct epoll_event)); if (kev == RT_NULL) { return -ENOMEM; } if (sigs != RT_NULL) { if (!lwp_user_accessable((void *)sigs, sizeof(sigset_t))) { kmem_put(kev); return -EFAULT; } ksigs = kmem_get(sizeof(sigset_t)); if (ksigs == RT_NULL) { kmem_put(kev); return -ENOMEM; } if (lwp_get_from_user(ksigs, (void *)sigs, sizeof(sigset_t)) != sizeof(sigset_t)) { kmem_put(kev); kmem_put(ksigs); return -EINVAL; } } ret = epoll_pwait(fd, kev, cnt, to, ksigs); if (ret > 0) { lwp_put_to_user((void *)ev, kev, ret * sizeof(struct epoll_event)); } if (sigs != RT_NULL) kmem_put(ksigs); kmem_put(kev); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_ftruncate(int fd, size_t length) { int ret; ret = ftruncate(fd, length); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_utimensat(int __fd, const char *__path, const struct timespec __times[2], int __flags) { #ifdef RT_USING_DFS_V2 #ifdef ARCH_MM_MMU int ret = -1; rt_size_t len = 0; char *kpath = RT_NULL; len = lwp_user_strlen(__path); if (len <= 0) { return -EINVAL; } kpath = (char *)kmem_get(len + 1); if (!kpath) { return -ENOMEM; } lwp_get_from_user(kpath, (void *)__path, len + 1); ret = utimensat(__fd, kpath, __times, __flags); kmem_put(kpath); return ret; #else if (!lwp_user_accessable((void *)__path, 1)) { return -EFAULT; } int ret = utimensat(__fd, __path, __times, __flags); return ret; #endif #else return -1; #endif } sysret_t sys_chmod(const char *fileName, mode_t mode) { char *copy_fileName; size_t len_fileName, copy_len_fileName; #ifdef RT_USING_DFS_V2 struct dfs_attr attr; attr.st_mode = mode; #endif int ret = 0; len_fileName = lwp_user_strlen(fileName); if (len_fileName <= 0) { return -EFAULT; } copy_fileName = (char*)rt_malloc(len_fileName + 1); if (!copy_fileName) { return -ENOMEM; } copy_len_fileName = lwp_get_from_user(copy_fileName, (void *)fileName, len_fileName); copy_fileName[copy_len_fileName] = '\0'; #ifdef RT_USING_DFS_V2 ret = dfs_file_setattr(copy_fileName, &attr); #else SET_ERRNO(EFAULT); #endif rt_free(copy_fileName); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_reboot(int magic) { rt_hw_cpu_reset(); return 0; } ssize_t sys_pread64(int fd, void *buf, int size, size_t offset) #ifdef RT_USING_DFS_V2 { ssize_t pread(int fd, void *buf, size_t len, size_t offset); #ifdef ARCH_MM_MMU ssize_t ret = -1; void *kmem = RT_NULL; if (!size) { return -EINVAL; } if (!lwp_user_accessable((void *)buf, size)) { return -EFAULT; } kmem = kmem_get(size); if (!kmem) { return -ENOMEM; } ret = pread(fd, kmem, size, offset); if (ret > 0) { lwp_put_to_user(buf, kmem, ret); } if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kmem); return ret; #else if (!lwp_user_accessable((void *)buf, size)) { return -EFAULT; } ssize_t ret = pread(fd, kmem, size, offset); return (ret < 0 ? GET_ERRNO() : ret); #endif } #else { ssize_t ret = -ENOSYS; return (ret < 0 ? GET_ERRNO() : ret); } #endif ssize_t sys_pwrite64(int fd, void *buf, int size, size_t offset) #ifdef RT_USING_DFS_V2 { ssize_t pwrite(int fd, const void *buf, size_t len, size_t offset); #ifdef ARCH_MM_MMU ssize_t ret = -1; void *kmem = RT_NULL; if (!size) { return -EINVAL; } if (!lwp_user_accessable((void *)buf, size)) { return -EFAULT; } kmem = kmem_get(size); if (!kmem) { return -ENOMEM; } lwp_get_from_user(kmem, (void *)buf, size); ret = pwrite(fd, kmem, size, offset); if (ret < 0) { ret = GET_ERRNO(); } kmem_put(kmem); return ret; #else if (!lwp_user_accessable((void *)buf, size)) { return -EFAULT; } ssize_t ret = pwrite(fd, kmem, size, offset); return (ret < 0 ? GET_ERRNO() : ret); #endif } #else { ssize_t ret = -ENOSYS; return (ret < 0 ? GET_ERRNO() : ret); } #endif sysret_t sys_timerfd_create(int clockid, int flags) { int ret; ret = timerfd_create(clockid, flags); return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_timerfd_settime(int fd, int flags, const struct itimerspec *new, struct itimerspec *old) { int ret = -1; struct itimerspec *knew = RT_NULL; struct itimerspec *kold = RT_NULL; if (new == RT_NULL) return -EINVAL; if (!lwp_user_accessable((void *)new, sizeof(struct itimerspec))) { return -EFAULT; } knew = kmem_get(sizeof(struct itimerspec)); if (knew) { lwp_get_from_user(knew, (void*)new, sizeof(struct itimerspec)); if (old) { if (!lwp_user_accessable((void *)old, sizeof(struct itimerspec))) { kmem_put(knew); return -EFAULT; } kold = kmem_get(sizeof(struct itimerspec)); if (kold == RT_NULL) { kmem_put(knew); return -ENOMEM; } } ret = timerfd_settime(fd, flags, knew, kold); if (old) { lwp_put_to_user(old, kold, sizeof(*kold)); kmem_put(kold); } kmem_put(knew); } return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_timerfd_gettime(int fd, struct itimerspec *cur) { int ret = -1; struct itimerspec *kcur; if (cur == RT_NULL) return -EINVAL; if (!lwp_user_accessable((void *)cur, sizeof(struct itimerspec))) { return -EFAULT; } kcur = kmem_get(sizeof(struct itimerspec)); if (kcur) { lwp_get_from_user(kcur, cur, sizeof(struct itimerspec)); ret = timerfd_gettime(fd, kcur); lwp_put_to_user(cur, kcur, sizeof(struct itimerspec)); kmem_put(kcur); } return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_signalfd(int fd, const sigset_t *mask, int flags) { int ret = 0; sigset_t *kmask = RT_NULL; #ifdef RT_USING_MUSLLIBC if (mask == RT_NULL) return -EINVAL; if (!lwp_user_accessable((void *)mask, sizeof(struct itimerspec))) { return -EFAULT; } kmask = kmem_get(sizeof(struct itimerspec)); if (kmask) { if (lwp_get_from_user(kmask, (void *)mask, sizeof(struct itimerspec)) != sizeof(struct itimerspec)) { kmem_put(kmask); return -EFAULT; } ret = signalfd(fd, mask, flags); kmem_put(kmask); } #endif return (ret < 0 ? GET_ERRNO() : ret); } sysret_t sys_memfd_create() { return 0; } sysret_t sys_setitimer(int which, const struct itimerspec *restrict new, struct itimerspec *restrict old) { sysret_t rc = 0; rt_lwp_t lwp = lwp_self(); struct itimerspec new_value_k; struct itimerspec old_value_k; if (lwp_get_from_user(&new_value_k, (void *)new, sizeof(*new)) != sizeof(*new)) { return -EFAULT; } rc = lwp_signal_setitimer(lwp, which, &new_value_k, &old_value_k); if (old && lwp_put_to_user(old, (void *)&old_value_k, sizeof old_value_k) != sizeof old_value_k) return -EFAULT; return rc; } const static struct rt_syscall_def func_table[] = { SYSCALL_SIGN(sys_exit), /* 01 */ SYSCALL_SIGN(sys_read), SYSCALL_SIGN(sys_write), SYSCALL_SIGN(sys_lseek), SYSCALL_SIGN(sys_open), /* 05 */ SYSCALL_SIGN(sys_close), SYSCALL_SIGN(sys_ioctl), SYSCALL_SIGN(sys_fstat), SYSCALL_SIGN(sys_poll), SYSCALL_SIGN(sys_nanosleep), /* 10 */ SYSCALL_SIGN(sys_gettimeofday), SYSCALL_SIGN(sys_settimeofday), SYSCALL_SIGN(sys_exec), SYSCALL_SIGN(sys_kill), SYSCALL_SIGN(sys_getpid), /* 15 */ SYSCALL_SIGN(sys_getpriority), SYSCALL_SIGN(sys_setpriority), SYSCALL_SIGN(sys_sem_create), SYSCALL_SIGN(sys_sem_delete), SYSCALL_SIGN(sys_sem_take), /* 20 */ SYSCALL_SIGN(sys_sem_release), SYSCALL_SIGN(sys_mutex_create), SYSCALL_SIGN(sys_mutex_delete), SYSCALL_SIGN(sys_mutex_take), SYSCALL_SIGN(sys_mutex_release), /* 25 */ SYSCALL_SIGN(sys_event_create), SYSCALL_SIGN(sys_event_delete), SYSCALL_SIGN(sys_event_send), SYSCALL_SIGN(sys_event_recv), SYSCALL_SIGN(sys_mb_create), /* 30 */ SYSCALL_SIGN(sys_mb_delete), SYSCALL_SIGN(sys_mb_send), SYSCALL_SIGN(sys_mb_send_wait), SYSCALL_SIGN(sys_mb_recv), SYSCALL_SIGN(sys_mq_create), /* 35 */ SYSCALL_SIGN(sys_mq_delete), SYSCALL_SIGN(sys_mq_send), SYSCALL_SIGN(sys_mq_urgent), SYSCALL_SIGN(sys_mq_recv), SYSCALL_SIGN(sys_thread_create), /* 40 */ SYSCALL_SIGN(sys_thread_delete), SYSCALL_SIGN(sys_thread_startup), SYSCALL_SIGN(sys_thread_self), SYSCALL_SIGN(sys_channel_open), SYSCALL_SIGN(sys_channel_close), /* 45 */ SYSCALL_SIGN(sys_channel_send), SYSCALL_SIGN(sys_channel_send_recv_timeout), SYSCALL_SIGN(sys_channel_reply), SYSCALL_SIGN(sys_channel_recv_timeout), SYSCALL_SIGN(sys_enter_critical), /* 50 */ SYSCALL_SIGN(sys_exit_critical), SYSCALL_USPACE(SYSCALL_SIGN(sys_brk)), SYSCALL_USPACE(SYSCALL_SIGN(sys_mmap2)), SYSCALL_USPACE(SYSCALL_SIGN(sys_munmap)), #ifdef ARCH_MM_MMU SYSCALL_USPACE(SYSCALL_SIGN(sys_shmget)), /* 55 */ SYSCALL_USPACE(SYSCALL_SIGN(sys_shmrm)), SYSCALL_USPACE(SYSCALL_SIGN(sys_shmat)), SYSCALL_USPACE(SYSCALL_SIGN(sys_shmdt)), #else #ifdef RT_LWP_USING_SHM SYSCALL_SIGN(sys_shm_alloc), /* 55 */ SYSCALL_SIGN(sys_shm_free), SYSCALL_SIGN(sys_shm_retain), SYSCALL_SIGN(sys_notimpl), #else SYSCALL_SIGN(sys_notimpl), /* 55 */ SYSCALL_SIGN(sys_notimpl), SYSCALL_SIGN(sys_notimpl), SYSCALL_SIGN(sys_notimpl), #endif /* RT_LWP_USING_SHM */ #endif /* ARCH_MM_MMU */ SYSCALL_SIGN(sys_device_init), SYSCALL_SIGN(sys_device_register), /* 60 */ SYSCALL_SIGN(sys_device_control), SYSCALL_SIGN(sys_device_find), SYSCALL_SIGN(sys_device_open), SYSCALL_SIGN(sys_device_close), SYSCALL_SIGN(sys_device_read), /* 65 */ SYSCALL_SIGN(sys_device_write), SYSCALL_SIGN(sys_stat), SYSCALL_SIGN(sys_thread_find), SYSCALL_NET(SYSCALL_SIGN(sys_accept)), SYSCALL_NET(SYSCALL_SIGN(sys_bind)), /* 70 */ SYSCALL_NET(SYSCALL_SIGN(sys_shutdown)), SYSCALL_NET(SYSCALL_SIGN(sys_getpeername)), SYSCALL_NET(SYSCALL_SIGN(sys_getsockname)), SYSCALL_NET(SYSCALL_SIGN(sys_getsockopt)), SYSCALL_NET(SYSCALL_SIGN(sys_setsockopt)), /* 75 */ SYSCALL_NET(SYSCALL_SIGN(sys_connect)), SYSCALL_NET(SYSCALL_SIGN(sys_listen)), SYSCALL_NET(SYSCALL_SIGN(sys_recv)), SYSCALL_NET(SYSCALL_SIGN(sys_recvfrom)), SYSCALL_NET(SYSCALL_SIGN(sys_send)), /* 80 */ SYSCALL_NET(SYSCALL_SIGN(sys_sendto)), SYSCALL_NET(SYSCALL_SIGN(sys_socket)), SYSCALL_NET(SYSCALL_SIGN(sys_closesocket)), SYSCALL_NET(SYSCALL_SIGN(sys_getaddrinfo)), SYSCALL_NET(SYSCALL_SIGN(sys_gethostbyname2_r)), /* 85 */ SYSCALL_NET(SYSCALL_SIGN(sys_sendmsg)), SYSCALL_NET(SYSCALL_SIGN(sys_recvmsg)), SYSCALL_SIGN(sys_notimpl), //network, SYSCALL_SIGN(sys_notimpl), //network, SYSCALL_SIGN(sys_notimpl), //network, /* 90 */ SYSCALL_SIGN(sys_notimpl), //network, SYSCALL_SIGN(sys_notimpl), //network, SYSCALL_SIGN(sys_notimpl), //network, #ifdef RT_USING_DFS SYSCALL_SIGN(sys_select), #else SYSCALL_SIGN(sys_notimpl), #endif SYSCALL_SIGN(sys_notimpl), //SYSCALL_SIGN(sys_hw_interrupt_disable), /* 95 */ SYSCALL_SIGN(sys_notimpl), //SYSCALL_SIGN(sys_hw_interrupt_enable), SYSCALL_SIGN(sys_tick_get), SYSCALL_SIGN(sys_exit_group), SYSCALL_SIGN(sys_notimpl), //rt_delayed_work_init, SYSCALL_SIGN(sys_notimpl), //rt_work_submit, /* 100 */ SYSCALL_SIGN(sys_notimpl), //rt_wqueue_wakeup, SYSCALL_SIGN(sys_thread_mdelay), SYSCALL_SIGN(sys_sigaction), SYSCALL_SIGN(sys_sigprocmask), SYSCALL_SIGN(sys_tkill), /* 105 */ SYSCALL_SIGN(sys_thread_sigprocmask), #ifdef ARCH_MM_MMU SYSCALL_SIGN(sys_cacheflush), SYSCALL_SIGN(sys_notimpl), SYSCALL_SIGN(sys_notimpl), #else SYSCALL_SIGN(sys_notimpl), SYSCALL_SIGN(sys_lwp_sighandler_set), SYSCALL_SIGN(sys_thread_sighandler_set), #endif SYSCALL_SIGN(sys_waitpid), /* 110 */ SYSCALL_SIGN(sys_rt_timer_create), SYSCALL_SIGN(sys_rt_timer_delete), SYSCALL_SIGN(sys_rt_timer_start), SYSCALL_SIGN(sys_rt_timer_stop), SYSCALL_SIGN(sys_rt_timer_control), /* 115 */ SYSCALL_SIGN(sys_getcwd), SYSCALL_SIGN(sys_chdir), SYSCALL_SIGN(sys_unlink), SYSCALL_SIGN(sys_mkdir), SYSCALL_SIGN(sys_rmdir), /* 120 */ SYSCALL_SIGN(sys_getdents), SYSCALL_SIGN(sys_get_errno), #ifdef ARCH_MM_MMU SYSCALL_SIGN(sys_set_thread_area), SYSCALL_SIGN(sys_set_tid_address), #else SYSCALL_SIGN(sys_notimpl), SYSCALL_SIGN(sys_notimpl), #endif SYSCALL_SIGN(sys_access), /* 125 */ SYSCALL_SIGN(sys_pipe), SYSCALL_SIGN(sys_clock_settime), SYSCALL_SIGN(sys_clock_gettime), SYSCALL_SIGN(sys_clock_getres), SYSCALL_USPACE(SYSCALL_SIGN(sys_clone)), /* 130 */ SYSCALL_USPACE(SYSCALL_SIGN(sys_futex)), SYSCALL_USPACE(SYSCALL_SIGN(sys_pmutex)), SYSCALL_SIGN(sys_dup), SYSCALL_SIGN(sys_dup2), SYSCALL_SIGN(sys_rename), /* 135 */ SYSCALL_USPACE(SYSCALL_SIGN(sys_fork)), SYSCALL_USPACE(SYSCALL_SIGN(sys_execve)), SYSCALL_USPACE(SYSCALL_SIGN(sys_vfork)), SYSCALL_SIGN(sys_gettid), SYSCALL_SIGN(sys_prlimit64), /* 140 */ SYSCALL_SIGN(sys_getrlimit), SYSCALL_SIGN(sys_setrlimit), SYSCALL_SIGN(sys_setsid), SYSCALL_SIGN(sys_getrandom), SYSCALL_SIGN(sys_readlink), // SYSCALL_SIGN(sys_readlink) /* 145 */ SYSCALL_USPACE(SYSCALL_SIGN(sys_mremap)), SYSCALL_USPACE(SYSCALL_SIGN(sys_madvise)), SYSCALL_SIGN(sys_sched_setparam), SYSCALL_SIGN(sys_sched_getparam), SYSCALL_SIGN(sys_sched_get_priority_max), /* 150 */ SYSCALL_SIGN(sys_sched_get_priority_min), SYSCALL_SIGN(sys_sched_setscheduler), SYSCALL_SIGN(sys_sched_getscheduler), SYSCALL_SIGN(sys_sched_setaffinity), SYSCALL_SIGN(sys_fsync), /* 155 */ SYSCALL_SIGN(sys_clock_nanosleep), SYSCALL_SIGN(sys_timer_create), SYSCALL_SIGN(sys_timer_delete), SYSCALL_SIGN(sys_timer_settime), SYSCALL_SIGN(sys_timer_gettime), /* 160 */ SYSCALL_SIGN(sys_timer_getoverrun), SYSCALL_SIGN(sys_mq_open), SYSCALL_SIGN(sys_mq_unlink), SYSCALL_SIGN(sys_mq_timedsend), SYSCALL_SIGN(sys_mq_timedreceive), /* 165 */ SYSCALL_SIGN(sys_mq_notify), SYSCALL_SIGN(sys_mq_getsetattr), SYSCALL_SIGN(sys_mq_close), SYSCALL_SIGN(sys_lstat), SYSCALL_SIGN(sys_uname), /* 170 */ SYSCALL_SIGN(sys_statfs), SYSCALL_SIGN(sys_statfs64), SYSCALL_SIGN(sys_fstatfs), SYSCALL_SIGN(sys_fstatfs64), SYSCALL_SIGN(sys_openat), /* 175 */ SYSCALL_SIGN(sys_mount), SYSCALL_SIGN(sys_umount2), SYSCALL_SIGN(sys_link), SYSCALL_SIGN(sys_symlink), SYSCALL_SIGN(sys_sched_getaffinity), /* 180 */ SYSCALL_SIGN(sys_sysinfo), SYSCALL_SIGN(sys_chmod), SYSCALL_SIGN(sys_reboot), SYSCALL_SIGN(sys_sched_yield), SYSCALL_SIGN(sys_pread64), /* 185 */ SYSCALL_SIGN(sys_pwrite64), SYSCALL_SIGN(sys_sigpending), SYSCALL_SIGN(sys_sigtimedwait), SYSCALL_SIGN(sys_notimpl), SYSCALL_SIGN(sys_notimpl), /* 190 */ SYSCALL_SIGN(sys_eventfd2), SYSCALL_SIGN(sys_epoll_create1), SYSCALL_SIGN(sys_epoll_ctl), SYSCALL_SIGN(sys_epoll_pwait), SYSCALL_SIGN(sys_notimpl), /* 195 */ SYSCALL_SIGN(sys_timerfd_create), SYSCALL_SIGN(sys_timerfd_settime), SYSCALL_SIGN(sys_timerfd_gettime), SYSCALL_SIGN(sys_signalfd), SYSCALL_SIGN(sys_memfd_create), /* 200 */ SYSCALL_SIGN(sys_ftruncate), SYSCALL_SIGN(sys_setitimer), SYSCALL_SIGN(sys_utimensat), #ifdef RT_USING_POSIX_SOCKET SYSCALL_SIGN(sys_notimpl), SYSCALL_SIGN(sys_socketpair), /* 205 */ #else SYSCALL_SIGN(sys_notimpl), SYSCALL_SIGN(sys_notimpl), #endif }; const void *lwp_get_sys_api(rt_uint32_t number) { const void *func = (const void *)sys_notimpl; if (number == 0xff) { func = (void *)sys_log; } else { number -= 1; if (number < sizeof(func_table) / sizeof(func_table[0])) { func = func_table[number].func; } else { if (__sys_log_enable) { LOG_I("Unimplement syscall %d", number); } } } return func; } const char *lwp_get_syscall_name(rt_uint32_t number) { const char *name = "sys_notimpl"; if (number == 0xff) { name = "sys_log"; } else { number -= 1; if (number < sizeof(func_table) / sizeof(func_table[0])) { name = (char*)func_table[number].name; } else { if (__sys_log_enable) { LOG_I("Unimplement syscall %d", number); } } } // skip sys_ return name; }