1// Copyright 2016 The Go Authors. All rights reserved. 2// Use of this source code is governed by a BSD-style 3// license that can be found in the LICENSE file. 4 5//go:build s390x && linux 6// +build s390x,linux 7 8package unix 9 10import ( 11 "unsafe" 12) 13 14//sys dup2(oldfd int, newfd int) (err error) 15//sysnb EpollCreate(size int) (fd int, err error) 16//sys EpollWait(epfd int, events []EpollEvent, msec int) (n int, err error) 17//sys Fadvise(fd int, offset int64, length int64, advice int) (err error) = SYS_FADVISE64 18//sys Fchown(fd int, uid int, gid int) (err error) 19//sys Fstat(fd int, stat *Stat_t) (err error) 20//sys Fstatat(dirfd int, path string, stat *Stat_t, flags int) (err error) = SYS_NEWFSTATAT 21//sys Fstatfs(fd int, buf *Statfs_t) (err error) 22//sys Ftruncate(fd int, length int64) (err error) 23//sysnb Getegid() (egid int) 24//sysnb Geteuid() (euid int) 25//sysnb Getgid() (gid int) 26//sysnb Getrlimit(resource int, rlim *Rlimit) (err error) 27//sysnb Getuid() (uid int) 28//sysnb InotifyInit() (fd int, err error) 29//sys Lchown(path string, uid int, gid int) (err error) 30//sys Lstat(path string, stat *Stat_t) (err error) 31//sys Pause() (err error) 32//sys Pread(fd int, p []byte, offset int64) (n int, err error) = SYS_PREAD64 33//sys Pwrite(fd int, p []byte, offset int64) (n int, err error) = SYS_PWRITE64 34//sys Renameat(olddirfd int, oldpath string, newdirfd int, newpath string) (err error) 35//sys Seek(fd int, offset int64, whence int) (off int64, err error) = SYS_LSEEK 36//sys Select(nfd int, r *FdSet, w *FdSet, e *FdSet, timeout *Timeval) (n int, err error) 37//sys sendfile(outfd int, infd int, offset *int64, count int) (written int, err error) 38//sys setfsgid(gid int) (prev int, err error) 39//sys setfsuid(uid int) (prev int, err error) 40//sysnb Setregid(rgid int, egid int) (err error) 41//sysnb Setresgid(rgid int, egid int, sgid int) (err error) 42//sysnb Setresuid(ruid int, euid int, suid int) (err error) 43//sysnb Setrlimit(resource int, rlim *Rlimit) (err error) 44//sysnb Setreuid(ruid int, euid int) (err error) 45//sys Splice(rfd int, roff *int64, wfd int, woff *int64, len int, flags int) (n int64, err error) 46//sys Stat(path string, stat *Stat_t) (err error) 47//sys Statfs(path string, buf *Statfs_t) (err error) 48//sys SyncFileRange(fd int, off int64, n int64, flags int) (err error) 49//sys Truncate(path string, length int64) (err error) 50//sys Ustat(dev int, ubuf *Ustat_t) (err error) 51//sysnb getgroups(n int, list *_Gid_t) (nn int, err error) 52//sysnb setgroups(n int, list *_Gid_t) (err error) 53 54//sys futimesat(dirfd int, path string, times *[2]Timeval) (err error) 55//sysnb Gettimeofday(tv *Timeval) (err error) 56 57func Time(t *Time_t) (tt Time_t, err error) { 58 var tv Timeval 59 err = Gettimeofday(&tv) 60 if err != nil { 61 return 0, err 62 } 63 if t != nil { 64 *t = Time_t(tv.Sec) 65 } 66 return Time_t(tv.Sec), nil 67} 68 69//sys Utime(path string, buf *Utimbuf) (err error) 70//sys utimes(path string, times *[2]Timeval) (err error) 71 72func setTimespec(sec, nsec int64) Timespec { 73 return Timespec{Sec: sec, Nsec: nsec} 74} 75 76func setTimeval(sec, usec int64) Timeval { 77 return Timeval{Sec: sec, Usec: usec} 78} 79 80//sysnb pipe2(p *[2]_C_int, flags int) (err error) 81 82func Pipe(p []int) (err error) { 83 if len(p) != 2 { 84 return EINVAL 85 } 86 var pp [2]_C_int 87 err = pipe2(&pp, 0) // pipe2 is the same as pipe when flags are set to 0. 88 p[0] = int(pp[0]) 89 p[1] = int(pp[1]) 90 return 91} 92 93func Pipe2(p []int, flags int) (err error) { 94 if len(p) != 2 { 95 return EINVAL 96 } 97 var pp [2]_C_int 98 err = pipe2(&pp, flags) 99 p[0] = int(pp[0]) 100 p[1] = int(pp[1]) 101 return 102} 103 104func Ioperm(from int, num int, on int) (err error) { 105 return ENOSYS 106} 107 108func Iopl(level int) (err error) { 109 return ENOSYS 110} 111 112func (r *PtraceRegs) PC() uint64 { return r.Psw.Addr } 113 114func (r *PtraceRegs) SetPC(pc uint64) { r.Psw.Addr = pc } 115 116func (iov *Iovec) SetLen(length int) { 117 iov.Len = uint64(length) 118} 119 120func (msghdr *Msghdr) SetControllen(length int) { 121 msghdr.Controllen = uint64(length) 122} 123 124func (msghdr *Msghdr) SetIovlen(length int) { 125 msghdr.Iovlen = uint64(length) 126} 127 128func (cmsg *Cmsghdr) SetLen(length int) { 129 cmsg.Len = uint64(length) 130} 131 132// Linux on s390x uses the old mmap interface, which requires arguments to be passed in a struct. 133// mmap2 also requires arguments to be passed in a struct; it is currently not exposed in <asm/unistd.h>. 134func mmap(addr uintptr, length uintptr, prot int, flags int, fd int, offset int64) (xaddr uintptr, err error) { 135 mmap_args := [6]uintptr{addr, length, uintptr(prot), uintptr(flags), uintptr(fd), uintptr(offset)} 136 r0, _, e1 := Syscall(SYS_MMAP, uintptr(unsafe.Pointer(&mmap_args[0])), 0, 0) 137 xaddr = uintptr(r0) 138 if e1 != 0 { 139 err = errnoErr(e1) 140 } 141 return 142} 143 144// On s390x Linux, all the socket calls go through an extra indirection. 145// The arguments to the underlying system call (SYS_SOCKETCALL) are the 146// number below and a pointer to an array of uintptr. 147const ( 148 // see linux/net.h 149 netSocket = 1 150 netBind = 2 151 netConnect = 3 152 netListen = 4 153 netAccept = 5 154 netGetSockName = 6 155 netGetPeerName = 7 156 netSocketPair = 8 157 netSend = 9 158 netRecv = 10 159 netSendTo = 11 160 netRecvFrom = 12 161 netShutdown = 13 162 netSetSockOpt = 14 163 netGetSockOpt = 15 164 netSendMsg = 16 165 netRecvMsg = 17 166 netAccept4 = 18 167 netRecvMMsg = 19 168 netSendMMsg = 20 169) 170 171func accept(s int, rsa *RawSockaddrAny, addrlen *_Socklen) (int, error) { 172 args := [3]uintptr{uintptr(s), uintptr(unsafe.Pointer(rsa)), uintptr(unsafe.Pointer(addrlen))} 173 fd, _, err := Syscall(SYS_SOCKETCALL, netAccept, uintptr(unsafe.Pointer(&args)), 0) 174 if err != 0 { 175 return 0, err 176 } 177 return int(fd), nil 178} 179 180func accept4(s int, rsa *RawSockaddrAny, addrlen *_Socklen, flags int) (int, error) { 181 args := [4]uintptr{uintptr(s), uintptr(unsafe.Pointer(rsa)), uintptr(unsafe.Pointer(addrlen)), uintptr(flags)} 182 fd, _, err := Syscall(SYS_SOCKETCALL, netAccept4, uintptr(unsafe.Pointer(&args)), 0) 183 if err != 0 { 184 return 0, err 185 } 186 return int(fd), nil 187} 188 189func getsockname(s int, rsa *RawSockaddrAny, addrlen *_Socklen) error { 190 args := [3]uintptr{uintptr(s), uintptr(unsafe.Pointer(rsa)), uintptr(unsafe.Pointer(addrlen))} 191 _, _, err := RawSyscall(SYS_SOCKETCALL, netGetSockName, uintptr(unsafe.Pointer(&args)), 0) 192 if err != 0 { 193 return err 194 } 195 return nil 196} 197 198func getpeername(s int, rsa *RawSockaddrAny, addrlen *_Socklen) error { 199 args := [3]uintptr{uintptr(s), uintptr(unsafe.Pointer(rsa)), uintptr(unsafe.Pointer(addrlen))} 200 _, _, err := RawSyscall(SYS_SOCKETCALL, netGetPeerName, uintptr(unsafe.Pointer(&args)), 0) 201 if err != 0 { 202 return err 203 } 204 return nil 205} 206 207func socketpair(domain int, typ int, flags int, fd *[2]int32) error { 208 args := [4]uintptr{uintptr(domain), uintptr(typ), uintptr(flags), uintptr(unsafe.Pointer(fd))} 209 _, _, err := RawSyscall(SYS_SOCKETCALL, netSocketPair, uintptr(unsafe.Pointer(&args)), 0) 210 if err != 0 { 211 return err 212 } 213 return nil 214} 215 216func bind(s int, addr unsafe.Pointer, addrlen _Socklen) error { 217 args := [3]uintptr{uintptr(s), uintptr(addr), uintptr(addrlen)} 218 _, _, err := Syscall(SYS_SOCKETCALL, netBind, uintptr(unsafe.Pointer(&args)), 0) 219 if err != 0 { 220 return err 221 } 222 return nil 223} 224 225func connect(s int, addr unsafe.Pointer, addrlen _Socklen) error { 226 args := [3]uintptr{uintptr(s), uintptr(addr), uintptr(addrlen)} 227 _, _, err := Syscall(SYS_SOCKETCALL, netConnect, uintptr(unsafe.Pointer(&args)), 0) 228 if err != 0 { 229 return err 230 } 231 return nil 232} 233 234func socket(domain int, typ int, proto int) (int, error) { 235 args := [3]uintptr{uintptr(domain), uintptr(typ), uintptr(proto)} 236 fd, _, err := RawSyscall(SYS_SOCKETCALL, netSocket, uintptr(unsafe.Pointer(&args)), 0) 237 if err != 0 { 238 return 0, err 239 } 240 return int(fd), nil 241} 242 243func getsockopt(s int, level int, name int, val unsafe.Pointer, vallen *_Socklen) error { 244 args := [5]uintptr{uintptr(s), uintptr(level), uintptr(name), uintptr(val), uintptr(unsafe.Pointer(vallen))} 245 _, _, err := Syscall(SYS_SOCKETCALL, netGetSockOpt, uintptr(unsafe.Pointer(&args)), 0) 246 if err != 0 { 247 return err 248 } 249 return nil 250} 251 252func setsockopt(s int, level int, name int, val unsafe.Pointer, vallen uintptr) error { 253 args := [5]uintptr{uintptr(s), uintptr(level), uintptr(name), uintptr(val), vallen} 254 _, _, err := Syscall(SYS_SOCKETCALL, netSetSockOpt, uintptr(unsafe.Pointer(&args)), 0) 255 if err != 0 { 256 return err 257 } 258 return nil 259} 260 261func recvfrom(s int, p []byte, flags int, from *RawSockaddrAny, fromlen *_Socklen) (int, error) { 262 var base uintptr 263 if len(p) > 0 { 264 base = uintptr(unsafe.Pointer(&p[0])) 265 } 266 args := [6]uintptr{uintptr(s), base, uintptr(len(p)), uintptr(flags), uintptr(unsafe.Pointer(from)), uintptr(unsafe.Pointer(fromlen))} 267 n, _, err := Syscall(SYS_SOCKETCALL, netRecvFrom, uintptr(unsafe.Pointer(&args)), 0) 268 if err != 0 { 269 return 0, err 270 } 271 return int(n), nil 272} 273 274func sendto(s int, p []byte, flags int, to unsafe.Pointer, addrlen _Socklen) error { 275 var base uintptr 276 if len(p) > 0 { 277 base = uintptr(unsafe.Pointer(&p[0])) 278 } 279 args := [6]uintptr{uintptr(s), base, uintptr(len(p)), uintptr(flags), uintptr(to), uintptr(addrlen)} 280 _, _, err := Syscall(SYS_SOCKETCALL, netSendTo, uintptr(unsafe.Pointer(&args)), 0) 281 if err != 0 { 282 return err 283 } 284 return nil 285} 286 287func recvmsg(s int, msg *Msghdr, flags int) (int, error) { 288 args := [3]uintptr{uintptr(s), uintptr(unsafe.Pointer(msg)), uintptr(flags)} 289 n, _, err := Syscall(SYS_SOCKETCALL, netRecvMsg, uintptr(unsafe.Pointer(&args)), 0) 290 if err != 0 { 291 return 0, err 292 } 293 return int(n), nil 294} 295 296func sendmsg(s int, msg *Msghdr, flags int) (int, error) { 297 args := [3]uintptr{uintptr(s), uintptr(unsafe.Pointer(msg)), uintptr(flags)} 298 n, _, err := Syscall(SYS_SOCKETCALL, netSendMsg, uintptr(unsafe.Pointer(&args)), 0) 299 if err != 0 { 300 return 0, err 301 } 302 return int(n), nil 303} 304 305func Listen(s int, n int) error { 306 args := [2]uintptr{uintptr(s), uintptr(n)} 307 _, _, err := Syscall(SYS_SOCKETCALL, netListen, uintptr(unsafe.Pointer(&args)), 0) 308 if err != 0 { 309 return err 310 } 311 return nil 312} 313 314func Shutdown(s, how int) error { 315 args := [2]uintptr{uintptr(s), uintptr(how)} 316 _, _, err := Syscall(SYS_SOCKETCALL, netShutdown, uintptr(unsafe.Pointer(&args)), 0) 317 if err != 0 { 318 return err 319 } 320 return nil 321} 322 323//sys poll(fds *PollFd, nfds int, timeout int) (n int, err error) 324 325func Poll(fds []PollFd, timeout int) (n int, err error) { 326 if len(fds) == 0 { 327 return poll(nil, 0, timeout) 328 } 329 return poll(&fds[0], len(fds), timeout) 330} 331 332//sys kexecFileLoad(kernelFd int, initrdFd int, cmdlineLen int, cmdline string, flags int) (err error) 333 334func KexecFileLoad(kernelFd int, initrdFd int, cmdline string, flags int) error { 335 cmdlineLen := len(cmdline) 336 if cmdlineLen > 0 { 337 // Account for the additional NULL byte added by 338 // BytePtrFromString in kexecFileLoad. The kexec_file_load 339 // syscall expects a NULL-terminated string. 340 cmdlineLen++ 341 } 342 return kexecFileLoad(kernelFd, initrdFd, cmdlineLen, cmdline, flags) 343} 344