// Copyright 2020 The Libc Authors. All rights reserved. // Use of this source code is governed by a BSD-style // license that can be found in the LICENSE file. package libc // import "modernc.org/libc" import ( "fmt" "io" "os" "os/exec" "path/filepath" "runtime" "runtime/debug" "strings" "syscall" gotime "time" "unsafe" guuid "github.com/google/uuid" "golang.org/x/sys/unix" "modernc.org/libc/errno" "modernc.org/libc/fcntl" "modernc.org/libc/fts" gonetdb "modernc.org/libc/honnef.co/go/netdb" "modernc.org/libc/langinfo" "modernc.org/libc/limits" "modernc.org/libc/netdb" "modernc.org/libc/netinet/in" "modernc.org/libc/stdio" "modernc.org/libc/sys/socket" "modernc.org/libc/sys/stat" "modernc.org/libc/sys/types" "modernc.org/libc/termios" "modernc.org/libc/time" "modernc.org/libc/unistd" "modernc.org/libc/uuid" ) var ( in6_addr_any in.In6_addr ) // // Keep these outside of the var block otherwise go generate will miss them. var X__stderrp = Xstdout var X__stdinp = Xstdin var X__stdoutp = Xstdout var X__sF [3]stdio.FILE var X_tolower_tab_ = Xmalloc(nil, 2*65537) var X_toupper_tab_ = Xmalloc(nil, 2*65537) func init() { for c := rune(0); c < 0xffff; c++ { y := c s := strings.ToLower(string(c)) a := []rune(s) if len(a) != 0 { y = a[0] } (*[65536]uint16)(unsafe.Pointer(X_tolower_tab_))[c+1] = uint16(y) y = c s = strings.ToUpper(string(c)) a = []rune(s) if len(a) != 0 { y = a[0] } (*[65536]uint16)(unsafe.Pointer(X_toupper_tab_))[c+1] = uint16(y) } } // include/stdio.h:486:extern int __isthreaded; var X__isthreaded int32 // lib/libc/locale/mblocal.h:62: int __mb_sb_limit; var X__mb_sb_limit int32 = 128 // UTF-8 // include/runetype.h:94:extern _Thread_local const _RuneLocale *_ThreadRuneLocale; var X_ThreadRuneLocale uintptr //TODO initialize and implement _Thread_local semantics. // include/xlocale/_ctype.h:54:_RuneLocale *__runes_for_locale(locale_t, int*); func X__runes_for_locale(t *TLS, l locale_t, p uintptr) uintptr { if __ccgo_strace { trc("t=%v l=%v p=%v, (%v:)", t, l, p, origin(2)) } panic(todo("")) } type file uintptr func (f file) fd() int32 { return int32((*stdio.FILE)(unsafe.Pointer(f)).F_file) } func (f file) setFd(fd int32) { (*stdio.FILE)(unsafe.Pointer(f)).F_file = int16(fd) } func (f file) err() bool { return (*stdio.FILE)(unsafe.Pointer(f)).F_flags&1 != 0 } func (f file) setErr() { (*stdio.FILE)(unsafe.Pointer(f)).F_flags |= 1 } func (f file) close(t *TLS) int32 { fd := f.fd() r := Xclose(t, fd) switch fd { case unistd.STDIN_FILENO, unistd.STDOUT_FILENO, unistd.STDERR_FILENO: X__sF[fd] = stdio.FILE{} default: Xfree(t, uintptr(f)) } if r < 0 { return stdio.EOF } return 0 } func newFile(t *TLS, fd int32) uintptr { var p uintptr switch fd { case unistd.STDIN_FILENO: p = uintptr(unsafe.Pointer(&X__sF[0])) case unistd.STDOUT_FILENO: p = uintptr(unsafe.Pointer(&X__sF[1])) case unistd.STDERR_FILENO: p = uintptr(unsafe.Pointer(&X__sF[2])) default: if p = Xcalloc(t, 1, types.Size_t(unsafe.Sizeof(stdio.FILE{}))); p == 0 { return 0 } } file(p).setFd(fd) return p } func fwrite(fd int32, b []byte) (int, error) { if fd == unistd.STDOUT_FILENO { return write(b) } // if dmesgs { // dmesg("%v: fd %v: %s", origin(1), fd, b) // } return unix.Write(int(fd), b) //TODO use Xwrite } // unsigned long ___runetype(__ct_rune_t) __pure; func X___runetype(t *TLS, x int32) ulong { if __ccgo_strace { trc("t=%v x=%v, (%v:)", t, x, origin(2)) } panic(todo("")) } // int fprintf(FILE *stream, const char *format, ...); func Xfprintf(t *TLS, stream, format, args uintptr) int32 { if __ccgo_strace { trc("t=%v args=%v, (%v:)", t, args, origin(2)) } n, _ := fwrite(int32((*stdio.FILE)(unsafe.Pointer(stream)).F_file), printf(format, args)) return int32(n) } // int usleep(useconds_t usec); func Xusleep(t *TLS, usec uint32) int32 { if __ccgo_strace { trc("t=%v usec=%v, (%v:)", t, usec, origin(2)) } gotime.Sleep(gotime.Microsecond * gotime.Duration(usec)) return 0 } // int getrusage(int who, struct rusage *usage); func Xgetrusage(t *TLS, who int32, usage uintptr) int32 { if __ccgo_strace { trc("t=%v who=%v usage=%v, (%v:)", t, who, usage, origin(2)) } if _, _, err := unix.Syscall(unix.SYS_GETRUSAGE, uintptr(who), usage, 0); err != 0 { t.setErrno(err) return -1 } return 0 } // int fgetc(FILE *stream); func Xfgetc(t *TLS, stream uintptr) int32 { if __ccgo_strace { trc("t=%v stream=%v, (%v:)", t, stream, origin(2)) } fd := int((*stdio.FILE)(unsafe.Pointer(stream)).F_file) var buf [1]byte if n, _ := unix.Read(fd, buf[:]); n != 0 { return int32(buf[0]) } return stdio.EOF } // int lstat(const char *pathname, struct stat *statbuf); func Xlstat(t *TLS, pathname, statbuf uintptr) int32 { if __ccgo_strace { trc("t=%v statbuf=%v, (%v:)", t, statbuf, origin(2)) } return Xlstat64(t, pathname, statbuf) } // int stat(const char *pathname, struct stat *statbuf); func Xstat(t *TLS, pathname, statbuf uintptr) int32 { if __ccgo_strace { trc("t=%v statbuf=%v, (%v:)", t, statbuf, origin(2)) } return Xstat64(t, pathname, statbuf) } // int chdir(const char *path); func Xchdir(t *TLS, path uintptr) int32 { if __ccgo_strace { trc("t=%v path=%v, (%v:)", t, path, origin(2)) } if _, _, err := unix.Syscall(unix.SYS_CHDIR, path, 0, 0); err != 0 { t.setErrno(err) return -1 } // if dmesgs { // dmesg("%v: %q: ok", origin(1), GoString(path)) // } return 0 } var localtime time.Tm // struct tm *localtime(const time_t *timep); func Xlocaltime(_ *TLS, timep uintptr) uintptr { loc := getLocalLocation() ut := *(*time.Time_t)(unsafe.Pointer(timep)) t := gotime.Unix(int64(ut), 0).In(loc) localtime.Ftm_sec = int32(t.Second()) localtime.Ftm_min = int32(t.Minute()) localtime.Ftm_hour = int32(t.Hour()) localtime.Ftm_mday = int32(t.Day()) localtime.Ftm_mon = int32(t.Month() - 1) localtime.Ftm_year = int32(t.Year() - 1900) localtime.Ftm_wday = int32(t.Weekday()) localtime.Ftm_yday = int32(t.YearDay()) localtime.Ftm_isdst = Bool32(isTimeDST(t)) return uintptr(unsafe.Pointer(&localtime)) } // struct tm *localtime_r(const time_t *timep, struct tm *result); func Xlocaltime_r(_ *TLS, timep, result uintptr) uintptr { loc := getLocalLocation() ut := *(*time.Time_t)(unsafe.Pointer(timep)) t := gotime.Unix(int64(ut), 0).In(loc) (*time.Tm)(unsafe.Pointer(result)).Ftm_sec = int32(t.Second()) (*time.Tm)(unsafe.Pointer(result)).Ftm_min = int32(t.Minute()) (*time.Tm)(unsafe.Pointer(result)).Ftm_hour = int32(t.Hour()) (*time.Tm)(unsafe.Pointer(result)).Ftm_mday = int32(t.Day()) (*time.Tm)(unsafe.Pointer(result)).Ftm_mon = int32(t.Month() - 1) (*time.Tm)(unsafe.Pointer(result)).Ftm_year = int32(t.Year() - 1900) (*time.Tm)(unsafe.Pointer(result)).Ftm_wday = int32(t.Weekday()) (*time.Tm)(unsafe.Pointer(result)).Ftm_yday = int32(t.YearDay()) (*time.Tm)(unsafe.Pointer(result)).Ftm_isdst = Bool32(isTimeDST(t)) return result } // int open(const char *pathname, int flags, ...); func Xopen(t *TLS, pathname uintptr, flags int32, args uintptr) int32 { if __ccgo_strace { trc("t=%v pathname=%v flags=%v args=%v, (%v:)", t, pathname, flags, args, origin(2)) } return Xopen64(t, pathname, flags, args) } // int open(const char *pathname, int flags, ...); func Xopen64(t *TLS, pathname uintptr, flags int32, args uintptr) int32 { if __ccgo_strace { trc("t=%v pathname=%v flags=%v args=%v, (%v:)", t, pathname, flags, args, origin(2)) } var mode types.Mode_t if args != 0 { mode = (types.Mode_t)(VaUint32(&args)) } fdcwd := fcntl.AT_FDCWD n, _, err := unix.Syscall6(unix.SYS_OPENAT, uintptr(fdcwd), pathname, uintptr(flags), uintptr(mode), 0, 0) if err != 0 { // if dmesgs { // dmesg("%v: %q %#x: %v", origin(1), GoString(pathname), flags, err) // } t.setErrno(err) return -1 } // if dmesgs { // dmesg("%v: %q flags %#x mode %#o: fd %v", origin(1), GoString(pathname), flags, mode, n) // } return int32(n) } // off_t lseek(int fd, off_t offset, int whence); func Xlseek(t *TLS, fd int32, offset types.Off_t, whence int32) types.Off_t { if __ccgo_strace { trc("t=%v fd=%v offset=%v whence=%v, (%v:)", t, fd, offset, whence, origin(2)) } return types.Off_t(Xlseek64(t, fd, offset, whence)) } func whenceStr(whence int32) string { panic(todo("")) } var fsyncStatbuf stat.Stat // int fsync(int fd); func Xfsync(t *TLS, fd int32) int32 { if __ccgo_strace { trc("t=%v fd=%v, (%v:)", t, fd, origin(2)) } if noFsync { // Simulate -DSQLITE_NO_SYNC for sqlite3 testfixture, see function full_sync in sqlite3.c return Xfstat(t, fd, uintptr(unsafe.Pointer(&fsyncStatbuf))) } if _, _, err := unix.Syscall(unix.SYS_FSYNC, uintptr(fd), 0, 0); err != 0 { t.setErrno(err) return -1 } // if dmesgs { // dmesg("%v: %d: ok", origin(1), fd) // } return 0 } // long sysconf(int name); func Xsysconf(t *TLS, name int32) long { if __ccgo_strace { trc("t=%v name=%v, (%v:)", t, name, origin(2)) } switch name { case unistd.X_SC_PAGESIZE: return long(unix.Getpagesize()) case unistd.X_SC_GETPW_R_SIZE_MAX: return -1 case unistd.X_SC_GETGR_R_SIZE_MAX: return -1 case unistd.X_SC_NPROCESSORS_ONLN: return long(runtime.NumCPU()) } panic(todo("", name)) } // int close(int fd); func Xclose(t *TLS, fd int32) int32 { if __ccgo_strace { trc("t=%v fd=%v, (%v:)", t, fd, origin(2)) } if _, _, err := unix.Syscall(unix.SYS_CLOSE, uintptr(fd), 0, 0); err != 0 { t.setErrno(err) return -1 } // if dmesgs { // dmesg("%v: %d: ok", origin(1), fd) // } return 0 } // char *getcwd(char *buf, size_t size); func Xgetcwd(t *TLS, buf uintptr, size types.Size_t) uintptr { if __ccgo_strace { trc("t=%v buf=%v size=%v, (%v:)", t, buf, size, origin(2)) } if _, err := unix.Getcwd((*RawMem)(unsafe.Pointer(buf))[:size:size]); err != nil { if dmesgs { dmesg("%v: %v FAIL", origin(1), err) } t.setErrno(err) return 0 } if dmesgs { dmesg("%v: ok", origin(1)) } return buf } // int fstat(int fd, struct stat *statbuf); func Xfstat(t *TLS, fd int32, statbuf uintptr) int32 { if __ccgo_strace { trc("t=%v fd=%v statbuf=%v, (%v:)", t, fd, statbuf, origin(2)) } return Xfstat64(t, fd, statbuf) } // int ftruncate(int fd, off_t length); func Xftruncate(t *TLS, fd int32, length types.Off_t) int32 { if __ccgo_strace { trc("t=%v fd=%v length=%v, (%v:)", t, fd, length, origin(2)) } if err := unix.Ftruncate(int(fd), int64(length)); err != nil { if dmesgs { dmesg("%v: fd %d: %v FAIL", origin(1), fd, err) } t.setErrno(err) return -1 } if dmesgs { dmesg("%v: fd %d length %#0x: ok", origin(1), fd, length) } return 0 } // int fcntl(int fd, int cmd, ... /* arg */ ); func Xfcntl(t *TLS, fd, cmd int32, args uintptr) int32 { if __ccgo_strace { trc("t=%v cmd=%v args=%v, (%v:)", t, cmd, args, origin(2)) } return Xfcntl64(t, fd, cmd, args) } // ssize_t read(int fd, void *buf, size_t count); func Xread(t *TLS, fd int32, buf uintptr, count types.Size_t) types.Ssize_t { if __ccgo_strace { trc("t=%v fd=%v buf=%v count=%v, (%v:)", t, fd, buf, count, origin(2)) } n, _, err := unix.Syscall(unix.SYS_READ, uintptr(fd), buf, uintptr(count)) if err != 0 { t.setErrno(err) return -1 } if dmesgs { // dmesg("%v: %d %#x: %#x\n%s", origin(1), fd, count, n, hex.Dump(GoBytes(buf, int(n)))) dmesg("%v: fd %d, buf %#0x, count %#x: n %#x", origin(1), fd, count, n) } return types.Ssize_t(n) } // ssize_t write(int fd, const void *buf, size_t count); func Xwrite(t *TLS, fd int32, buf uintptr, count types.Size_t) types.Ssize_t { if __ccgo_strace { trc("t=%v fd=%v buf=%v count=%v, (%v:)", t, fd, buf, count, origin(2)) } const retry = 5 var err syscall.Errno for i := 0; i < retry; i++ { var n uintptr switch n, _, err = unix.Syscall(unix.SYS_WRITE, uintptr(fd), buf, uintptr(count)); err { case 0: if dmesgs { // dmesg("%v: %d %#x: %#x\n%s", origin(1), fd, count, n, hex.Dump(GoBytes(buf, int(n)))) dmesg("%v: %d %#x: %#x", origin(1), fd, count, n) } return types.Ssize_t(n) case errno.EAGAIN: // nop } } if dmesgs { dmesg("%v: fd %v, buf %#0x, count %#x: %v", origin(1), fd, count, err) } t.setErrno(err) return -1 } // int fchmod(int fd, mode_t mode); func Xfchmod(t *TLS, fd int32, mode types.Mode_t) int32 { if __ccgo_strace { trc("t=%v fd=%v mode=%v, (%v:)", t, fd, mode, origin(2)) } if _, _, err := unix.Syscall(unix.SYS_FCHMOD, uintptr(fd), uintptr(mode), 0); err != 0 { t.setErrno(err) return -1 } // if dmesgs { // dmesg("%v: %d %#o: ok", origin(1), fd, mode) // } return 0 } // int fchown(int fd, uid_t owner, gid_t group); func Xfchown(t *TLS, fd int32, owner types.Uid_t, group types.Gid_t) int32 { if __ccgo_strace { trc("t=%v fd=%v owner=%v group=%v, (%v:)", t, fd, owner, group, origin(2)) } if _, _, err := unix.Syscall(unix.SYS_FCHOWN, uintptr(fd), uintptr(owner), uintptr(group)); err != 0 { t.setErrno(err) return -1 } return 0 } // uid_t geteuid(void); func Xgeteuid(t *TLS) types.Uid_t { if __ccgo_strace { trc("t=%v, (%v:)", t, origin(2)) } n, _, _ := unix.Syscall(unix.SYS_GETEUID, 0, 0, 0) return types.Uid_t(n) } // int munmap(void *addr, size_t length); func Xmunmap(t *TLS, addr uintptr, length types.Size_t) int32 { if __ccgo_strace { trc("t=%v addr=%v length=%v, (%v:)", t, addr, length, origin(2)) } if _, _, err := unix.Syscall(unix.SYS_MUNMAP, addr, uintptr(length), 0); err != 0 { t.setErrno(err) return -1 } return 0 } // int gettimeofday(struct timeval *tv, struct timezone *tz); func Xgettimeofday(t *TLS, tv, tz uintptr) int32 { if __ccgo_strace { trc("t=%v tz=%v, (%v:)", t, tz, origin(2)) } if tz != 0 { panic(todo("")) } var tvs unix.Timeval err := unix.Gettimeofday(&tvs) if err != nil { t.setErrno(err) return -1 } *(*unix.Timeval)(unsafe.Pointer(tv)) = tvs return 0 } // int getsockopt(int sockfd, int level, int optname, void *optval, socklen_t *optlen); func Xgetsockopt(t *TLS, sockfd, level, optname int32, optval, optlen uintptr) int32 { if __ccgo_strace { trc("t=%v optname=%v optlen=%v, (%v:)", t, optname, optlen, origin(2)) } if _, _, err := unix.Syscall6(unix.SYS_GETSOCKOPT, uintptr(sockfd), uintptr(level), uintptr(optname), optval, optlen, 0); err != 0 { t.setErrno(err) return -1 } return 0 } // int setsockopt(int sockfd, int level, int optname, const void *optval, socklen_t optlen); func Xsetsockopt(t *TLS, sockfd, level, optname int32, optval uintptr, optlen socket.Socklen_t) int32 { if __ccgo_strace { trc("t=%v optname=%v optval=%v optlen=%v, (%v:)", t, optname, optval, optlen, origin(2)) } if _, _, err := unix.Syscall6(unix.SYS_SETSOCKOPT, uintptr(sockfd), uintptr(level), uintptr(optname), optval, uintptr(optlen), 0); err != 0 { t.setErrno(err) return -1 } return 0 } // int ioctl(int fd, unsigned long request, ...); func Xioctl(t *TLS, fd int32, request ulong, va uintptr) int32 { if __ccgo_strace { trc("t=%v fd=%v request=%v va=%v, (%v:)", t, fd, request, va, origin(2)) } var argp uintptr if va != 0 { argp = VaUintptr(&va) } n, _, err := unix.Syscall(unix.SYS_IOCTL, uintptr(fd), uintptr(request), argp) if err != 0 { t.setErrno(err) return -1 } return int32(n) } // int getsockname(int sockfd, struct sockaddr *addr, socklen_t *addrlen); func Xgetsockname(t *TLS, sockfd int32, addr, addrlen uintptr) int32 { if __ccgo_strace { trc("t=%v sockfd=%v addrlen=%v, (%v:)", t, sockfd, addrlen, origin(2)) } if _, _, err := unix.Syscall(unix.SYS_GETSOCKNAME, uintptr(sockfd), addr, addrlen); err != 0 { // if dmesgs { // dmesg("%v: fd %v: %v", origin(1), sockfd, err) // } t.setErrno(err) return -1 } return 0 } // int select(int nfds, fd_set *readfds, fd_set *writefds, fd_set *exceptfds, struct timeval *timeout); func Xselect(t *TLS, nfds int32, readfds, writefds, exceptfds, timeout uintptr) int32 { if __ccgo_strace { trc("t=%v nfds=%v timeout=%v, (%v:)", t, nfds, timeout, origin(2)) } n, err := unix.Select( int(nfds), (*unix.FdSet)(unsafe.Pointer(readfds)), (*unix.FdSet)(unsafe.Pointer(writefds)), (*unix.FdSet)(unsafe.Pointer(exceptfds)), (*unix.Timeval)(unsafe.Pointer(timeout)), ) if err != nil { t.setErrno(err) return -1 } return int32(n) } // int mkfifo(const char *pathname, mode_t mode); func Xmkfifo(t *TLS, pathname uintptr, mode types.Mode_t) int32 { if __ccgo_strace { trc("t=%v pathname=%v mode=%v, (%v:)", t, pathname, mode, origin(2)) } panic(todo("")) } // mode_t umask(mode_t mask); func Xumask(t *TLS, mask types.Mode_t) types.Mode_t { if __ccgo_strace { trc("t=%v mask=%v, (%v:)", t, mask, origin(2)) } n, _, _ := unix.Syscall(unix.SYS_UMASK, uintptr(mask), 0, 0) return types.Mode_t(n) } // int execvp(const char *file, char *const argv[]); func Xexecvp(t *TLS, file, argv uintptr) int32 { if __ccgo_strace { trc("t=%v argv=%v, (%v:)", t, argv, origin(2)) } if _, _, err := unix.Syscall(unix.SYS_EXECVE, file, argv, Environ()); err != 0 { t.setErrno(err) return -1 } return 0 } // pid_t waitpid(pid_t pid, int *wstatus, int options); func Xwaitpid(t *TLS, pid types.Pid_t, wstatus uintptr, optname int32) types.Pid_t { if __ccgo_strace { trc("t=%v pid=%v wstatus=%v optname=%v, (%v:)", t, pid, wstatus, optname, origin(2)) } n, _, err := unix.Syscall6(unix.SYS_WAIT4, uintptr(pid), wstatus, uintptr(optname), 0, 0, 0) if err != 0 { t.setErrno(err) return -1 } return types.Pid_t(n) } // int uname(struct utsname *buf); func Xuname(t *TLS, buf uintptr) int32 { if __ccgo_strace { trc("t=%v buf=%v, (%v:)", t, buf, origin(2)) } if err := unix.Uname((*unix.Utsname)(unsafe.Pointer(buf))); err != nil { if dmesgs { dmesg("%v: %v FAIL", origin(1), err) } t.setErrno(err) return -1 } if dmesgs { dmesg("%v: ok", origin(1)) } return 0 } // ssize_t recv(int sockfd, void *buf, size_t len, int flags); func Xrecv(t *TLS, sockfd int32, buf uintptr, len types.Size_t, flags int32) types.Ssize_t { if __ccgo_strace { trc("t=%v sockfd=%v buf=%v len=%v flags=%v, (%v:)", t, sockfd, buf, len, flags, origin(2)) } n, _, err := unix.Syscall6(unix.SYS_RECVFROM, uintptr(sockfd), buf, uintptr(len), uintptr(flags), 0, 0) if err != 0 { t.setErrno(err) return -1 } return types.Ssize_t(n) } // ssize_t send(int sockfd, const void *buf, size_t len, int flags); func Xsend(t *TLS, sockfd int32, buf uintptr, len types.Size_t, flags int32) types.Ssize_t { if __ccgo_strace { trc("t=%v sockfd=%v buf=%v len=%v flags=%v, (%v:)", t, sockfd, buf, len, flags, origin(2)) } n, _, err := unix.Syscall6(unix.SYS_SENDTO, uintptr(sockfd), buf, uintptr(len), uintptr(flags), 0, 0) if err != 0 { t.setErrno(err) return -1 } return types.Ssize_t(n) } // int shutdown(int sockfd, int how); func Xshutdown(t *TLS, sockfd, how int32) int32 { if __ccgo_strace { trc("t=%v how=%v, (%v:)", t, how, origin(2)) } if _, _, err := unix.Syscall(unix.SYS_SHUTDOWN, uintptr(sockfd), uintptr(how), 0); err != 0 { t.setErrno(err) return -1 } return 0 } // int getpeername(int sockfd, struct sockaddr *addr, socklen_t *addrlen); func Xgetpeername(t *TLS, sockfd int32, addr uintptr, addrlen uintptr) int32 { if __ccgo_strace { trc("t=%v sockfd=%v addr=%v addrlen=%v, (%v:)", t, sockfd, addr, addrlen, origin(2)) } if _, _, err := unix.Syscall(unix.SYS_GETPEERNAME, uintptr(sockfd), addr, uintptr(addrlen)); err != 0 { t.setErrno(err) return -1 } return 0 } // int socket(int domain, int type, int protocol); func Xsocket(t *TLS, domain, type1, protocol int32) int32 { if __ccgo_strace { trc("t=%v protocol=%v, (%v:)", t, protocol, origin(2)) } n, _, err := unix.Syscall(unix.SYS_SOCKET, uintptr(domain), uintptr(type1), uintptr(protocol)) if err != 0 { t.setErrno(err) return -1 } return int32(n) } // int bind(int sockfd, const struct sockaddr *addr, socklen_t addrlen); func Xbind(t *TLS, sockfd int32, addr uintptr, addrlen uint32) int32 { if __ccgo_strace { trc("t=%v sockfd=%v addr=%v addrlen=%v, (%v:)", t, sockfd, addr, addrlen, origin(2)) } n, _, err := unix.Syscall(unix.SYS_BIND, uintptr(sockfd), addr, uintptr(addrlen)) if err != 0 { t.setErrno(err) return -1 } return int32(n) } // int connect(int sockfd, const struct sockaddr *addr, socklen_t addrlen); func Xconnect(t *TLS, sockfd int32, addr uintptr, addrlen uint32) int32 { if __ccgo_strace { trc("t=%v sockfd=%v addr=%v addrlen=%v, (%v:)", t, sockfd, addr, addrlen, origin(2)) } if _, _, err := unix.Syscall(unix.SYS_CONNECT, uintptr(sockfd), addr, uintptr(addrlen)); err != 0 { t.setErrno(err) return -1 } return 0 } // int listen(int sockfd, int backlog); func Xlisten(t *TLS, sockfd, backlog int32) int32 { if __ccgo_strace { trc("t=%v backlog=%v, (%v:)", t, backlog, origin(2)) } if _, _, err := unix.Syscall(unix.SYS_LISTEN, uintptr(sockfd), uintptr(backlog), 0); err != 0 { t.setErrno(err) return -1 } return 0 } // int accept(int sockfd, struct sockaddr *addr, socklen_t *addrlen); func Xaccept(t *TLS, sockfd int32, addr uintptr, addrlen uintptr) int32 { if __ccgo_strace { trc("t=%v sockfd=%v addr=%v addrlen=%v, (%v:)", t, sockfd, addr, addrlen, origin(2)) } panic(todo("")) // n, _, err := unix.Syscall6(unix.SYS_ACCEPT4, uintptr(sockfd), addr, uintptr(addrlen), 0, 0, 0) // if err != 0 { // t.setErrno(err) // return -1 // } // return int32(n) } // int getrlimit(int resource, struct rlimit *rlim); func Xgetrlimit(t *TLS, resource int32, rlim uintptr) int32 { if __ccgo_strace { trc("t=%v resource=%v rlim=%v, (%v:)", t, resource, rlim, origin(2)) } return Xgetrlimit64(t, resource, rlim) } // int setrlimit(int resource, const struct rlimit *rlim); func Xsetrlimit(t *TLS, resource int32, rlim uintptr) int32 { if __ccgo_strace { trc("t=%v resource=%v rlim=%v, (%v:)", t, resource, rlim, origin(2)) } return Xsetrlimit64(t, resource, rlim) } // int setrlimit(int resource, const struct rlimit *rlim); func Xsetrlimit64(t *TLS, resource int32, rlim uintptr) int32 { if __ccgo_strace { trc("t=%v resource=%v rlim=%v, (%v:)", t, resource, rlim, origin(2)) } if _, _, err := unix.Syscall(unix.SYS_SETRLIMIT, uintptr(resource), uintptr(rlim), 0); err != 0 { t.setErrno(err) return -1 } return 0 } // uid_t getuid(void); func Xgetuid(t *TLS) types.Uid_t { if __ccgo_strace { trc("t=%v, (%v:)", t, origin(2)) } return types.Uid_t(os.Getuid()) } // pid_t getpid(void); func Xgetpid(t *TLS) int32 { if __ccgo_strace { trc("t=%v, (%v:)", t, origin(2)) } return int32(os.Getpid()) } // int system(const char *command); func Xsystem(t *TLS, command uintptr) int32 { if __ccgo_strace { trc("t=%v command=%v, (%v:)", t, command, origin(2)) } s := GoString(command) if command == 0 { panic(todo("")) } cmd := exec.Command("sh", "-c", s) cmd.Stdout = os.Stdout cmd.Stderr = os.Stderr err := cmd.Run() if err != nil { ps := err.(*exec.ExitError) return int32(ps.ExitCode()) } return 0 } // int setvbuf(FILE *stream, char *buf, int mode, size_t size); func Xsetvbuf(t *TLS, stream, buf uintptr, mode int32, size types.Size_t) int32 { if __ccgo_strace { trc("t=%v buf=%v mode=%v size=%v, (%v:)", t, buf, mode, size, origin(2)) } return 0 //TODO } // int raise(int sig); func Xraise(t *TLS, sig int32) int32 { if __ccgo_strace { trc("t=%v sig=%v, (%v:)", t, sig, origin(2)) } panic(todo("")) } // int backtrace(void **buffer, int size); func Xbacktrace(t *TLS, buf uintptr, size int32) int32 { if __ccgo_strace { trc("t=%v buf=%v size=%v, (%v:)", t, buf, size, origin(2)) } panic(todo("")) } // void backtrace_symbols_fd(void *const *buffer, int size, int fd); func Xbacktrace_symbols_fd(t *TLS, buffer uintptr, size, fd int32) { if __ccgo_strace { trc("t=%v buffer=%v fd=%v, (%v:)", t, buffer, fd, origin(2)) } panic(todo("")) } // int fileno(FILE *stream); func Xfileno(t *TLS, stream uintptr) int32 { if __ccgo_strace { trc("t=%v stream=%v, (%v:)", t, stream, origin(2)) } panic(todo("")) } func newCFtsent(t *TLS, info int, path string, stat *unix.Stat_t, err syscall.Errno) uintptr { p := Xcalloc(t, 1, types.Size_t(unsafe.Sizeof(fts.FTSENT{}))) if p == 0 { panic("OOM") } *(*fts.FTSENT)(unsafe.Pointer(p)) = *newFtsent(t, info, path, stat, err) return p } func ftsentClose(t *TLS, p uintptr) { Xfree(t, (*fts.FTSENT)(unsafe.Pointer(p)).Ffts_path) Xfree(t, (*fts.FTSENT)(unsafe.Pointer(p)).Ffts_statp) } type ftstream struct { s []uintptr x int } func (f *ftstream) close(t *TLS) { for _, p := range f.s { ftsentClose(t, p) Xfree(t, p) } *f = ftstream{} } // FTS *fts_open(char * const *path_argv, int options, int (*compar)(const FTSENT **, const FTSENT **)); func Xfts_open(t *TLS, path_argv uintptr, options int32, compar uintptr) uintptr { if __ccgo_strace { trc("t=%v path_argv=%v options=%v compar=%v, (%v:)", t, path_argv, options, compar, origin(2)) } return Xfts64_open(t, path_argv, options, compar) } // FTS *fts_open(char * const *path_argv, int options, int (*compar)(const FTSENT **, const FTSENT **)); func Xfts64_open(t *TLS, path_argv uintptr, options int32, compar uintptr) uintptr { if __ccgo_strace { trc("t=%v path_argv=%v options=%v compar=%v, (%v:)", t, path_argv, options, compar, origin(2)) } f := &ftstream{} var walk func(string) walk = func(path string) { var fi os.FileInfo var err error switch { case options&fts.FTS_LOGICAL != 0: fi, err = os.Stat(path) case options&fts.FTS_PHYSICAL != 0: fi, err = os.Lstat(path) default: panic(todo("")) } if err != nil { return } var statp *unix.Stat_t if options&fts.FTS_NOSTAT == 0 { var stat unix.Stat_t switch { case options&fts.FTS_LOGICAL != 0: if err := unix.Stat(path, &stat); err != nil { panic(todo("")) } case options&fts.FTS_PHYSICAL != 0: if err := unix.Lstat(path, &stat); err != nil { panic(todo("")) } default: panic(todo("")) } statp = &stat } out: switch { case fi.IsDir(): f.s = append(f.s, newCFtsent(t, fts.FTS_D, path, statp, 0)) g, err := os.Open(path) switch x := err.(type) { case nil: // ok case *os.PathError: f.s = append(f.s, newCFtsent(t, fts.FTS_DNR, path, statp, errno.EACCES)) break out default: panic(todo("%q: %v %T", path, x, x)) } names, err := g.Readdirnames(-1) g.Close() if err != nil { panic(todo("")) } for _, name := range names { walk(path + "/" + name) if f == nil { break out } } f.s = append(f.s, newCFtsent(t, fts.FTS_DP, path, statp, 0)) default: info := fts.FTS_F if fi.Mode()&os.ModeSymlink != 0 { info = fts.FTS_SL } switch { case statp != nil: f.s = append(f.s, newCFtsent(t, info, path, statp, 0)) case options&fts.FTS_NOSTAT != 0: f.s = append(f.s, newCFtsent(t, fts.FTS_NSOK, path, nil, 0)) default: panic(todo("")) } } } for { p := *(*uintptr)(unsafe.Pointer(path_argv)) if p == 0 { if f == nil { return 0 } if compar != 0 { panic(todo("")) } return addObject(f) } walk(GoString(p)) path_argv += unsafe.Sizeof(uintptr(0)) } } // FTSENT *fts_read(FTS *ftsp); func Xfts_read(t *TLS, ftsp uintptr) uintptr { if __ccgo_strace { trc("t=%v ftsp=%v, (%v:)", t, ftsp, origin(2)) } return Xfts64_read(t, ftsp) } // FTSENT *fts_read(FTS *ftsp); func Xfts64_read(t *TLS, ftsp uintptr) uintptr { if __ccgo_strace { trc("t=%v ftsp=%v, (%v:)", t, ftsp, origin(2)) } f := getObject(ftsp).(*ftstream) if f.x == len(f.s) { t.setErrno(0) return 0 } r := f.s[f.x] if e := (*fts.FTSENT)(unsafe.Pointer(r)).Ffts_errno; e != 0 { t.setErrno(e) } f.x++ return r } // int fts_close(FTS *ftsp); func Xfts_close(t *TLS, ftsp uintptr) int32 { if __ccgo_strace { trc("t=%v ftsp=%v, (%v:)", t, ftsp, origin(2)) } return Xfts64_close(t, ftsp) } // int fts_close(FTS *ftsp); func Xfts64_close(t *TLS, ftsp uintptr) int32 { if __ccgo_strace { trc("t=%v ftsp=%v, (%v:)", t, ftsp, origin(2)) } getObject(ftsp).(*ftstream).close(t) removeObject(ftsp) return 0 } // void tzset (void); func Xtzset(t *TLS) { if __ccgo_strace { trc("t=%v, (%v:)", t, origin(2)) } //TODO } var strerrorBuf [100]byte // char *strerror(int errnum); func Xstrerror(t *TLS, errnum int32) uintptr { if __ccgo_strace { trc("t=%v errnum=%v, (%v:)", t, errnum, origin(2)) } if dmesgs { dmesg("%v: %v\n%s", origin(1), errnum, debug.Stack()) } copy(strerrorBuf[:], fmt.Sprintf("strerror(%d)\x00", errnum)) return uintptr(unsafe.Pointer(&strerrorBuf[0])) } // void *dlopen(const char *filename, int flags); func Xdlopen(t *TLS, filename uintptr, flags int32) uintptr { if __ccgo_strace { trc("t=%v filename=%v flags=%v, (%v:)", t, filename, flags, origin(2)) } panic(todo("")) } // char *dlerror(void); func Xdlerror(t *TLS) uintptr { if __ccgo_strace { trc("t=%v, (%v:)", t, origin(2)) } panic(todo("")) } // int dlclose(void *handle); func Xdlclose(t *TLS, handle uintptr) int32 { if __ccgo_strace { trc("t=%v handle=%v, (%v:)", t, handle, origin(2)) } panic(todo("")) } // void *dlsym(void *handle, const char *symbol); func Xdlsym(t *TLS, handle, symbol uintptr) uintptr { if __ccgo_strace { trc("t=%v symbol=%v, (%v:)", t, symbol, origin(2)) } panic(todo("")) } // void perror(const char *s); func Xperror(t *TLS, s uintptr) { if __ccgo_strace { trc("t=%v s=%v, (%v:)", t, s, origin(2)) } panic(todo("")) } // int pclose(FILE *stream); func Xpclose(t *TLS, stream uintptr) int32 { if __ccgo_strace { trc("t=%v stream=%v, (%v:)", t, stream, origin(2)) } panic(todo("")) } var gai_strerrorBuf [100]byte // const char *gai_strerror(int errcode); func Xgai_strerror(t *TLS, errcode int32) uintptr { if __ccgo_strace { trc("t=%v errcode=%v, (%v:)", t, errcode, origin(2)) } copy(gai_strerrorBuf[:], fmt.Sprintf("gai error %d\x00", errcode)) return uintptr(unsafe.Pointer(&gai_strerrorBuf)) } // int tcgetattr(int fd, struct termios *termios_p); func Xtcgetattr(t *TLS, fd int32, termios_p uintptr) int32 { if __ccgo_strace { trc("t=%v fd=%v termios_p=%v, (%v:)", t, fd, termios_p, origin(2)) } panic(todo("")) } // int tcsetattr(int fd, int optional_actions, const struct termios *termios_p); func Xtcsetattr(t *TLS, fd, optional_actions int32, termios_p uintptr) int32 { if __ccgo_strace { trc("t=%v optional_actions=%v termios_p=%v, (%v:)", t, optional_actions, termios_p, origin(2)) } panic(todo("")) } // speed_t cfgetospeed(const struct termios *termios_p); func Xcfgetospeed(t *TLS, termios_p uintptr) termios.Speed_t { if __ccgo_strace { trc("t=%v termios_p=%v, (%v:)", t, termios_p, origin(2)) } panic(todo("")) } // int cfsetospeed(struct termios *termios_p, speed_t speed); func Xcfsetospeed(t *TLS, termios_p uintptr, speed uint32) int32 { if __ccgo_strace { trc("t=%v termios_p=%v speed=%v, (%v:)", t, termios_p, speed, origin(2)) } panic(todo("")) } // int cfsetispeed(struct termios *termios_p, speed_t speed); func Xcfsetispeed(t *TLS, termios_p uintptr, speed uint32) int32 { if __ccgo_strace { trc("t=%v termios_p=%v speed=%v, (%v:)", t, termios_p, speed, origin(2)) } panic(todo("")) } // pid_t fork(void); func Xfork(t *TLS) int32 { if __ccgo_strace { trc("t=%v, (%v:)", t, origin(2)) } t.setErrno(errno.ENOSYS) return -1 } var emptyStr = [1]byte{} // char *setlocale(int category, const char *locale); func Xsetlocale(t *TLS, category int32, locale uintptr) uintptr { if __ccgo_strace { trc("t=%v category=%v locale=%v, (%v:)", t, category, locale, origin(2)) } return uintptr(unsafe.Pointer(&emptyStr)) //TODO } // char *nl_langinfo(nl_item item); func Xnl_langinfo(t *TLS, item langinfo.Nl_item) uintptr { if __ccgo_strace { trc("t=%v item=%v, (%v:)", t, item, origin(2)) } return uintptr(unsafe.Pointer(&emptyStr)) //TODO } // FILE *popen(const char *command, const char *type); func Xpopen(t *TLS, command, type1 uintptr) uintptr { if __ccgo_strace { trc("t=%v type1=%v, (%v:)", t, type1, origin(2)) } panic(todo("")) } // char *realpath(const char *path, char *resolved_path); func Xrealpath(t *TLS, path, resolved_path uintptr) uintptr { if __ccgo_strace { trc("t=%v resolved_path=%v, (%v:)", t, resolved_path, origin(2)) } s, err := filepath.EvalSymlinks(GoString(path)) if err != nil { if os.IsNotExist(err) { // if dmesgs { // dmesg("%v: %q: %v", origin(1), GoString(path), err) // } t.setErrno(errno.ENOENT) return 0 } panic(todo("", err)) } if resolved_path == 0 { panic(todo("")) } if len(s) >= limits.PATH_MAX { s = s[:limits.PATH_MAX-1] } copy((*RawMem)(unsafe.Pointer(resolved_path))[:len(s):len(s)], s) (*RawMem)(unsafe.Pointer(resolved_path))[len(s)] = 0 return resolved_path } // struct tm *gmtime_r(const time_t *timep, struct tm *result); func Xgmtime_r(t *TLS, timep, result uintptr) uintptr { if __ccgo_strace { trc("t=%v result=%v, (%v:)", t, result, origin(2)) } panic(todo("")) } // char *inet_ntoa(struct in_addr in); func Xinet_ntoa(t *TLS, in1 in.In_addr) uintptr { if __ccgo_strace { trc("t=%v in1=%v, (%v:)", t, in1, origin(2)) } panic(todo("")) } func X__ccgo_in6addr_anyp(t *TLS) uintptr { if __ccgo_strace { trc("t=%v, (%v:)", t, origin(2)) } return uintptr(unsafe.Pointer(&in6_addr_any)) } func Xabort(t *TLS) { if __ccgo_strace { trc("t=%v, (%v:)", t, origin(2)) } panic(todo("")) //TODO // if dmesgs { // dmesg("%v:", origin(1)) // } // p := Xcalloc(t, 1, types.Size_t(unsafe.Sizeof(signal.Sigaction{}))) // if p == 0 { // panic("OOM") // } // (*signal.Sigaction)(unsafe.Pointer(p)).F__sigaction_u.F__sa_handler = signal.SIG_DFL // Xsigaction(t, signal.SIGABRT, p, 0) // Xfree(t, p) // unix.Kill(unix.Getpid(), syscall.Signal(signal.SIGABRT)) // panic(todo("unrechable")) } // int fflush(FILE *stream); func Xfflush(t *TLS, stream uintptr) int32 { if __ccgo_strace { trc("t=%v stream=%v, (%v:)", t, stream, origin(2)) } return 0 //TODO } // size_t fread(void *ptr, size_t size, size_t nmemb, FILE *stream); func Xfread(t *TLS, ptr uintptr, size, nmemb types.Size_t, stream uintptr) types.Size_t { if __ccgo_strace { trc("t=%v ptr=%v nmemb=%v stream=%v, (%v:)", t, ptr, nmemb, stream, origin(2)) } m, _, err := unix.Syscall(unix.SYS_READ, uintptr(file(stream).fd()), ptr, uintptr(size*nmemb)) if err != 0 { file(stream).setErr() return 0 } // if dmesgs { // // dmesg("%v: %d %#x x %#x: %#x\n%s", origin(1), file(stream).fd(), size, nmemb, types.Size_t(m)/size, hex.Dump(GoBytes(ptr, int(m)))) // dmesg("%v: %d %#x x %#x: %#x", origin(1), file(stream).fd(), size, nmemb, types.Size_t(m)/size) // } return types.Size_t(m) / size } // size_t fwrite(const void *ptr, size_t size, size_t nmemb, FILE *stream); func Xfwrite(t *TLS, ptr uintptr, size, nmemb types.Size_t, stream uintptr) types.Size_t { if __ccgo_strace { trc("t=%v ptr=%v nmemb=%v stream=%v, (%v:)", t, ptr, nmemb, stream, origin(2)) } m, _, err := unix.Syscall(unix.SYS_WRITE, uintptr(file(stream).fd()), ptr, uintptr(size*nmemb)) if err != 0 { file(stream).setErr() return 0 } // if dmesgs { // // dmesg("%v: %d %#x x %#x: %#x\n%s", origin(1), file(stream).fd(), size, nmemb, types.Size_t(m)/size, hex.Dump(GoBytes(ptr, int(m)))) // dmesg("%v: %d %#x x %#x: %#x", origin(1), file(stream).fd(), size, nmemb, types.Size_t(m)/size) // } return types.Size_t(m) / size } // int fclose(FILE *stream); func Xfclose(t *TLS, stream uintptr) int32 { if __ccgo_strace { trc("t=%v stream=%v, (%v:)", t, stream, origin(2)) } return file(stream).close(t) } // int fputc(int c, FILE *stream); func Xfputc(t *TLS, c int32, stream uintptr) int32 { if __ccgo_strace { trc("t=%v c=%v stream=%v, (%v:)", t, c, stream, origin(2)) } if _, err := fwrite(file(stream).fd(), []byte{byte(c)}); err != nil { return stdio.EOF } return int32(byte(c)) } // int fseek(FILE *stream, long offset, int whence); func Xfseek(t *TLS, stream uintptr, offset long, whence int32) int32 { if __ccgo_strace { trc("t=%v stream=%v offset=%v whence=%v, (%v:)", t, stream, offset, whence, origin(2)) } if n := Xlseek(t, int32(file(stream).fd()), types.Off_t(offset), whence); n < 0 { // if dmesgs { // dmesg("%v: fd %v, off %#x, whence %v: %v", origin(1), file(stream).fd(), offset, whenceStr(whence), n) // } file(stream).setErr() return -1 } // if dmesgs { // dmesg("%v: fd %v, off %#x, whence %v: ok", origin(1), file(stream).fd(), offset, whenceStr(whence)) // } return 0 } // long ftell(FILE *stream); func Xftell(t *TLS, stream uintptr) long { if __ccgo_strace { trc("t=%v stream=%v, (%v:)", t, stream, origin(2)) } n := Xlseek(t, file(stream).fd(), 0, stdio.SEEK_CUR) if n < 0 { file(stream).setErr() return -1 } // if dmesgs { // dmesg("%v: fd %v, n %#x: ok %#x", origin(1), file(stream).fd(), n, long(n)) // } return long(n) } // int ferror(FILE *stream); func Xferror(t *TLS, stream uintptr) int32 { if __ccgo_strace { trc("t=%v stream=%v, (%v:)", t, stream, origin(2)) } return Bool32(file(stream).err()) } // int ungetc(int c, FILE *stream); func Xungetc(t *TLS, c int32, stream uintptr) int32 { if __ccgo_strace { trc("t=%v c=%v stream=%v, (%v:)", t, c, stream, origin(2)) } panic(todo("")) } // int fscanf(FILE *stream, const char *format, ...); func Xfscanf(t *TLS, stream, format, va uintptr) int32 { if __ccgo_strace { trc("t=%v va=%v, (%v:)", t, va, origin(2)) } panic(todo("")) } // int fputs(const char *s, FILE *stream); func Xfputs(t *TLS, s, stream uintptr) int32 { if __ccgo_strace { trc("t=%v stream=%v, (%v:)", t, stream, origin(2)) } if _, _, err := unix.Syscall(unix.SYS_WRITE, uintptr(file(stream).fd()), s, uintptr(Xstrlen(t, s))); err != 0 { return -1 } return 0 } var getservbynameStaticResult netdb.Servent // struct servent *getservbyname(const char *name, const char *proto); func Xgetservbyname(t *TLS, name, proto uintptr) uintptr { if __ccgo_strace { trc("t=%v proto=%v, (%v:)", t, proto, origin(2)) } var protoent *gonetdb.Protoent if proto != 0 { protoent = gonetdb.GetProtoByName(GoString(proto)) } servent := gonetdb.GetServByName(GoString(name), protoent) if servent == nil { // if dmesgs { // dmesg("%q %q: nil (protoent %+v)", GoString(name), GoString(proto), protoent) // } return 0 } Xfree(t, (*netdb.Servent)(unsafe.Pointer(&getservbynameStaticResult)).Fs_name) if v := (*netdb.Servent)(unsafe.Pointer(&getservbynameStaticResult)).Fs_aliases; v != 0 { for { p := *(*uintptr)(unsafe.Pointer(v)) if p == 0 { break } Xfree(t, p) v += unsafe.Sizeof(uintptr(0)) } Xfree(t, v) } Xfree(t, (*netdb.Servent)(unsafe.Pointer(&getservbynameStaticResult)).Fs_proto) cname, err := CString(servent.Name) if err != nil { getservbynameStaticResult = netdb.Servent{} return 0 } var protoname uintptr if protoent != nil { if protoname, err = CString(protoent.Name); err != nil { Xfree(t, cname) getservbynameStaticResult = netdb.Servent{} return 0 } } var a []uintptr for _, v := range servent.Aliases { cs, err := CString(v) if err != nil { for _, v := range a { Xfree(t, v) } return 0 } a = append(a, cs) } v := Xcalloc(t, types.Size_t(len(a)+1), types.Size_t(unsafe.Sizeof(uintptr(0)))) if v == 0 { Xfree(t, cname) Xfree(t, protoname) for _, v := range a { Xfree(t, v) } getservbynameStaticResult = netdb.Servent{} return 0 } for _, p := range a { *(*uintptr)(unsafe.Pointer(v)) = p v += unsafe.Sizeof(uintptr(0)) } getservbynameStaticResult = netdb.Servent{ Fs_name: cname, Fs_aliases: v, Fs_port: int32(servent.Port), Fs_proto: protoname, } return uintptr(unsafe.Pointer(&getservbynameStaticResult)) } func Xreaddir64(t *TLS, dir uintptr) uintptr { if __ccgo_strace { trc("t=%v dir=%v, (%v:)", t, dir, origin(2)) } return Xreaddir(t, dir) } func __syscall(r, _ uintptr, errno syscall.Errno) long { if errno != 0 { return long(-errno) } return long(r) } func X__syscall1(t *TLS, trap, p1 long) long { if __ccgo_strace { trc("t=%v p1=%v, (%v:)", t, p1, origin(2)) } return __syscall(unix.Syscall(uintptr(trap), uintptr(p1), 0, 0)) } func X__syscall3(t *TLS, trap, p1, p2, p3 long) long { if __ccgo_strace { trc("t=%v p3=%v, (%v:)", t, p3, origin(2)) } return __syscall(unix.Syscall(uintptr(trap), uintptr(p1), uintptr(p2), uintptr(p3))) } func X__syscall4(t *TLS, trap, p1, p2, p3, p4 long) long { if __ccgo_strace { trc("t=%v p4=%v, (%v:)", t, p4, origin(2)) } return __syscall(unix.Syscall6(uintptr(trap), uintptr(p1), uintptr(p2), uintptr(p3), uintptr(p4), 0, 0)) } func fcntlCmdStr(cmd int32) string { switch cmd { case fcntl.F_GETOWN: return "F_GETOWN" case fcntl.F_SETLK: return "F_SETLK" case fcntl.F_GETLK: return "F_GETLK" case fcntl.F_SETFD: return "F_SETFD" case fcntl.F_GETFD: return "F_GETFD" default: return fmt.Sprintf("cmd(%d)", cmd) } } // int setenv(const char *name, const char *value, int overwrite); func Xsetenv(t *TLS, name, value uintptr, overwrite int32) int32 { if __ccgo_strace { trc("t=%v value=%v overwrite=%v, (%v:)", t, value, overwrite, origin(2)) } panic(todo("")) } // int unsetenv(const char *name); func Xunsetenv(t *TLS, name uintptr) int32 { if __ccgo_strace { trc("t=%v name=%v, (%v:)", t, name, origin(2)) } panic(todo("")) } // int pause(void); func Xpause(t *TLS) int32 { if __ccgo_strace { trc("t=%v, (%v:)", t, origin(2)) } panic(todo("")) } // ssize_t writev(int fd, const struct iovec *iov, int iovcnt); func Xwritev(t *TLS, fd int32, iov uintptr, iovcnt int32) types.Ssize_t { if __ccgo_strace { trc("t=%v fd=%v iov=%v iovcnt=%v, (%v:)", t, fd, iov, iovcnt, origin(2)) } panic(todo("")) } // int __isoc99_sscanf(const char *str, const char *format, ...); func X__isoc99_sscanf(t *TLS, str, format, va uintptr) int32 { if __ccgo_strace { trc("t=%v va=%v, (%v:)", t, va, origin(2)) } r := Xsscanf(t, str, format, va) // if dmesgs { // dmesg("%v: %q %q: %d", origin(1), GoString(str), GoString(format), r) // } return r } // void __assert(const char * func, const char * file, int line, const char *expr) __dead2; func X__assert(t *TLS, fn, file uintptr, line int32, expr uintptr) { if __ccgo_strace { trc("t=%v file=%v line=%v expr=%v, (%v:)", t, file, line, expr, origin(2)) } X__assert_fail(t, expr, file, uint32(line), fn) } func X__assert13(t *TLS, file uintptr, line int32, fn, msg uintptr) { if __ccgo_strace { trc("t=%v file=%v line=%v msg=%v, (%v:)", t, file, line, msg, origin(2)) } X__assert_fail(t, msg, file, uint32(line), fn) } // include/stdio.h:456:int __swbuf(int, FILE *); func X__swbuf(t *TLS, n int32, file uintptr) int32 { if __ccgo_strace { trc("t=%v n=%v file=%v, (%v:)", t, n, file, origin(2)) } return Xfputc(t, n, file) //TODO improve performance, use a real buffer. } // int rmdir(const char *pathname); func Xrmdir(t *TLS, pathname uintptr) int32 { if __ccgo_strace { trc("t=%v pathname=%v, (%v:)", t, pathname, origin(2)) } if err := unix.Rmdir(GoString(pathname)); err != nil { if dmesgs { dmesg("%v: %v FAIL", origin(1), err) } t.setErrno(err) return -1 } if dmesgs { dmesg("%v: ok", origin(1)) } return 0 } // struct dirent *readdir(DIR *dirp); func Xreaddir(t *TLS, dir uintptr) uintptr { if __ccgo_strace { trc("t=%v dir=%v, (%v:)", t, dir, origin(2)) } if (*darwinDir)(unsafe.Pointer(dir)).eof { return 0 } if (*darwinDir)(unsafe.Pointer(dir)).l == (*darwinDir)(unsafe.Pointer(dir)).h { n, err := unix.Getdirentries((*darwinDir)(unsafe.Pointer(dir)).fd, (*darwinDir)(unsafe.Pointer(dir)).buf[:], nil) // trc("must read: %v %v", n, err) if n == 0 { if err != nil && err != io.EOF { if dmesgs { dmesg("%v: %v FAIL", origin(1), err) } t.setErrno(err) } (*darwinDir)(unsafe.Pointer(dir)).eof = true return 0 } (*darwinDir)(unsafe.Pointer(dir)).l = 0 (*darwinDir)(unsafe.Pointer(dir)).h = n // trc("new l %v, h %v", (*darwinDir)(unsafe.Pointer(dir)).l, (*darwinDir)(unsafe.Pointer(dir)).h) } de := dir + unsafe.Offsetof(darwinDir{}.buf) + uintptr((*darwinDir)(unsafe.Pointer(dir)).l) (*darwinDir)(unsafe.Pointer(dir)).l += int((*unix.Dirent)(unsafe.Pointer(de)).Reclen) return de } type darwinDir struct { buf [4096]byte fd int h int l int eof bool } // int sscanf(const char *str, const char *format, ...); func Xsscanf(t *TLS, str, format, va uintptr) int32 { if __ccgo_strace { trc("t=%v va=%v, (%v:)", t, va, origin(2)) } r := scanf(strings.NewReader(GoString(str)), format, va) // if dmesgs { // dmesg("%v: %q %q: %d", origin(1), GoString(str), GoString(format), r) // } return r } // int * __error(void); func X__error(t *TLS) uintptr { if __ccgo_strace { trc("t=%v, (%v:)", t, origin(2)) } return t.errnop } func Xclosedir(t *TLS, dir uintptr) int32 { if __ccgo_strace { trc("t=%v dir=%v, (%v:)", t, dir, origin(2)) } r := Xclose(t, int32((*darwinDir)(unsafe.Pointer(dir)).fd)) Xfree(t, dir) return r } // int __xuname(int namesize, void *namebuf) func X__xuname(t *TLS, namesize int32, namebuf uintptr) int32 { if __ccgo_strace { trc("t=%v namesize=%v namebuf=%v, (%v:)", t, namesize, namebuf, origin(2)) } return Xuname(t, namebuf) } // int chflags(const char *path, u_int flags); func Xchflags(t *TLS, path uintptr, flags uint32) int32 { if __ccgo_strace { trc("t=%v path=%v flags=%v, (%v:)", t, path, flags, origin(2)) } if err := unix.Chflags(GoString(path), int(flags)); err != nil { if dmesgs { dmesg("%v: %v FAIL", origin(1), err) } t.setErrno(err) return -1 } if dmesgs { dmesg("%v: ok", origin(1)) } return 0 } // int pipe(int pipefd[2]); func Xpipe(t *TLS, pipefd uintptr) int32 { if __ccgo_strace { trc("t=%v pipefd=%v, (%v:)", t, pipefd, origin(2)) } var a [2]int if err := syscall.Pipe(a[:]); err != nil { if dmesgs { dmesg("%v: %v FAIL", origin(1), err) } t.setErrno(err) return -1 } *(*[2]int32)(unsafe.Pointer(pipefd)) = [2]int32{int32(a[0]), int32(a[1])} if dmesgs { dmesg("%v: %v ok", origin(1), a) } return 0 } // char *inet_ntoa(struct in_addr in); func X__inet_ntoa(t *TLS, in1 in.In_addr) uintptr { if __ccgo_strace { trc("t=%v in1=%v, (%v:)", t, in1, origin(2)) } panic(todo("")) } func Xmmap(t *TLS, addr uintptr, length types.Size_t, prot, flags, fd int32, offset types.Off_t) uintptr { if __ccgo_strace { trc("t=%v addr=%v length=%v fd=%v offset=%v, (%v:)", t, addr, length, fd, offset, origin(2)) } // On 2021-12-23, a new syscall for mmap was introduced: // // 49 STD NOLOCK { void *sys_mmap(void *addr, size_t len, int prot, \ // int flags, int fd, off_t pos); } // src: https://github.com/golang/go/issues/59661 const unix_SYS_MMAP = 49 // Cannot avoid the syscall here, addr sometimes matter. data, _, err := unix.Syscall6(unix_SYS_MMAP, addr, uintptr(length), uintptr(prot), uintptr(flags), uintptr(fd), uintptr(offset)) if err != 0 { if dmesgs { dmesg("%v: %v FAIL", origin(1), err) } t.setErrno(err) return ^uintptr(0) // (void*)-1 } if dmesgs { dmesg("%v: addr %#0x, length %#x0, prot %#0x, flags %#0x, fd %d, offset %#0x returns %#0x", origin(1), addr, length, prot, flags, fd, offset, data) } return data } func X__errno(t *TLS) uintptr { if __ccgo_strace { trc("t=%v, (%v:)", t, origin(2)) } return X__errno_location(t) } func X__ccgo_pthreadMutexattrGettype(tls *TLS, a uintptr) int32 { /* pthread_attr_get.c:93:5: */ if __ccgo_strace { trc("tls=%v a=%v, (%v:)", tls, a, origin(2)) } return (int32((*pthread_mutexattr_t)(unsafe.Pointer(a)).F__attr & uint32(3))) } func X__ccgo_getMutexType(tls *TLS, m uintptr) int32 { /* pthread_mutex_lock.c:3:5: */ if __ccgo_strace { trc("tls=%v m=%v, (%v:)", tls, m, origin(2)) } return (*(*int32)(unsafe.Pointer((m /* &.__u */ /* &.__i */))) & 15) } func X__ccgo_pthreadAttrGetDetachState(tls *TLS, a uintptr) int32 { /* pthread_attr_get.c:3:5: */ if __ccgo_strace { trc("tls=%v a=%v, (%v:)", tls, a, origin(2)) } return *(*int32)(unsafe.Pointer((a /* &.__u */ /* &.__i */) + 6*4)) } func Xpthread_attr_getdetachstate(tls *TLS, a uintptr, state uintptr) int32 { /* pthread_attr_get.c:7:5: */ if __ccgo_strace { trc("tls=%v a=%v state=%v, (%v:)", tls, a, state, origin(2)) } *(*int32)(unsafe.Pointer(state)) = *(*int32)(unsafe.Pointer((a /* &.__u */ /* &.__i */) + 6*4)) return 0 } func Xpthread_attr_setdetachstate(tls *TLS, a uintptr, state int32) int32 { /* pthread_attr_setdetachstate.c:3:5: */ if __ccgo_strace { trc("tls=%v a=%v state=%v, (%v:)", tls, a, state, origin(2)) } if uint32(state) > 1 { return 22 } *(*int32)(unsafe.Pointer((a /* &.__u */ /* &.__i */) + 6*4)) = state return 0 } func Xpthread_mutexattr_destroy(tls *TLS, a uintptr) int32 { /* pthread_mutexattr_destroy.c:3:5: */ if __ccgo_strace { trc("tls=%v a=%v, (%v:)", tls, a, origin(2)) } return 0 } func Xpthread_mutexattr_init(tls *TLS, a uintptr) int32 { /* pthread_mutexattr_init.c:3:5: */ if __ccgo_strace { trc("tls=%v a=%v, (%v:)", tls, a, origin(2)) } *(*pthread_mutexattr_t)(unsafe.Pointer(a)) = pthread_mutexattr_t{} return 0 } func Xpthread_mutexattr_settype(tls *TLS, a uintptr, type1 int32) int32 { /* pthread_mutexattr_settype.c:3:5: */ if __ccgo_strace { trc("tls=%v a=%v type1=%v, (%v:)", tls, a, type1, origin(2)) } if uint32(type1) > uint32(2) { return 22 } (*pthread_mutexattr_t)(unsafe.Pointer(a)).F__attr = (((*pthread_mutexattr_t)(unsafe.Pointer(a)).F__attr & Uint32FromInt32(CplInt32(3))) | uint32(type1)) return 0 } // int uuid_parse( char *in, uuid_t uu); func Xuuid_parse(t *TLS, in uintptr, uu uintptr) int32 { if __ccgo_strace { trc("t=%v in=%v uu=%v, (%v:)", t, in, uu, origin(2)) } r, err := guuid.Parse(GoString(in)) if err != nil { return -1 } copy((*RawMem)(unsafe.Pointer(uu))[:unsafe.Sizeof(uuid.Uuid_t{})], r[:]) return 0 } func X__srget(t *TLS, stream uintptr) int32 { if __ccgo_strace { trc("t=%v stream=%v, (%v:)", t, stream, origin(2)) } return Xgetc(t, stream) } // void __assert2(const char *, int, const char *, const char *); // __assert2(__FILE__, __LINE__, __func__, #e)) func X__assert2(t *TLS, file uintptr, line int32, fn, expr uintptr) { if __ccgo_strace { trc("t=%v file=%v line=%v expr=%v, (%v:)", t, file, line, expr, origin(2)) } X__assert_fail(t, expr, file, uint32(line), fn) } // int getpagesize(void); func Xgetpagesize(t *TLS) int32 { if __ccgo_strace { trc("t=%v, (%v:)", t, origin(2)) } return int32(unix.Getpagesize()) } const PTHREAD_MUTEX_DEFAULT = 0 // The pthread_mutex_init() function shall initialize the mutex referenced by // mutex with attributes specified by attr. If attr is NULL, the default mutex // attributes are used; the effect shall be the same as passing the address of // a default mutex attributes object. Upon successful initialization, the state // of the mutex becomes initialized and unlocked. // // If successful, the pthread_mutex_destroy() and pthread_mutex_init() // functions shall return zero; otherwise, an error number shall be returned to // indicate the error. // // int pthread_mutex_init(pthread_mutex_t *restrict mutex, const pthread_mutexattr_t *restrict attr); func Xpthread_mutex_init(t *TLS, pMutex, pAttr uintptr) int32 { if __ccgo_strace { trc("t=%v pAttr=%v, (%v:)", t, pAttr, origin(2)) } typ := PTHREAD_MUTEX_DEFAULT if pAttr != 0 { typ = int(X__ccgo_pthreadMutexattrGettype(t, pAttr)) } mutexesMu.Lock() defer mutexesMu.Unlock() mutexes[pMutex] = newMutex(typ) return 0 } // uint16_t __builtin_bswap16 (uint32_t x) func Xbswap16(t *TLS, x uint16) uint16 { if __ccgo_strace { trc("t=%v x=%v, (%v:)", t, x, origin(2)) } return X__builtin_bswap16(t, x) } func X__swap16md(t *TLS, x uint16) uint16 { if __ccgo_strace { trc("t=%v x=%v, (%v:)", t, x, origin(2)) } return X__builtin_bswap16(t, x) } // uint32_t __builtin_bswap32 (uint32_t x) func Xbswap32(t *TLS, x uint32) uint32 { if __ccgo_strace { trc("t=%v x=%v, (%v:)", t, x, origin(2)) } return X__builtin_bswap32(t, x) } // uint64_t __builtin_bswap64 (uint64_t x) func Xbswap64(t *TLS, x uint64) uint64 { if __ccgo_strace { trc("t=%v x=%v, (%v:)", t, x, origin(2)) } return X__builtin_bswap64(t, x) } func X__builtin_isblank(t *TLS, _c int32) int32 { if __ccgo_strace { trc("t=%v _c=%v, (%v:)", t, _c, origin(2)) } return Xisblank(t, _c) } // int nanosleep(const struct timespec *req, struct timespec *rem); func Xnanosleep(t *TLS, req, rem uintptr) int32 { if __ccgo_strace { trc("t=%v rem=%v, (%v:)", t, rem, origin(2)) } v := *(*time.Timespec)(unsafe.Pointer(req)) gotime.Sleep(gotime.Second*gotime.Duration(v.Ftv_sec) + gotime.Duration(v.Ftv_nsec)) return 0 } // ssize_t pwrite(int fd, const void *buf, size_t count, off_t offset); func Xpwrite(t *TLS, fd int32, buf uintptr, count types.Size_t, offset types.Off_t) types.Ssize_t { if __ccgo_strace { trc("t=%v fd=%v buf=%v count=%v offset=%v, (%v:)", t, fd, buf, count, offset, origin(2)) } var n int var err error switch { case count == 0: n, err = unix.Pwrite(int(fd), nil, int64(offset)) default: n, err = unix.Pwrite(int(fd), (*RawMem)(unsafe.Pointer(buf))[:count:count], int64(offset)) // if dmesgs { // dmesg("%v: fd %v, off %#x, count %#x\n%s", origin(1), fd, offset, count, hex.Dump((*RawMem)(unsafe.Pointer(buf))[:count:count])) // } } if err != nil { // if dmesgs { // dmesg("%v: %v FAIL", origin(1), err) // } t.setErrno(err) return -1 } // if dmesgs { // dmesg("%v: ok", origin(1)) // } return types.Ssize_t(n) }