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 132func (rsa *RawSockaddrNFCLLCP) SetServiceNameLen(length int) { 133 rsa.Service_name_len = uint64(length) 134} 135 136// Linux on s390x uses the old mmap interface, which requires arguments to be passed in a struct. 137// mmap2 also requires arguments to be passed in a struct; it is currently not exposed in <asm/unistd.h>. 138func mmap(addr uintptr, length uintptr, prot int, flags int, fd int, offset int64) (xaddr uintptr, err error) { 139 mmap_args := [6]uintptr{addr, length, uintptr(prot), uintptr(flags), uintptr(fd), uintptr(offset)} 140 r0, _, e1 := Syscall(SYS_MMAP, uintptr(unsafe.Pointer(&mmap_args[0])), 0, 0) 141 xaddr = uintptr(r0) 142 if e1 != 0 { 143 err = errnoErr(e1) 144 } 145 return 146} 147 148// On s390x Linux, all the socket calls go through an extra indirection. 149// The arguments to the underlying system call (SYS_SOCKETCALL) are the 150// number below and a pointer to an array of uintptr. 151const ( 152 // see linux/net.h 153 netSocket = 1 154 netBind = 2 155 netConnect = 3 156 netListen = 4 157 netAccept = 5 158 netGetSockName = 6 159 netGetPeerName = 7 160 netSocketPair = 8 161 netSend = 9 162 netRecv = 10 163 netSendTo = 11 164 netRecvFrom = 12 165 netShutdown = 13 166 netSetSockOpt = 14 167 netGetSockOpt = 15 168 netSendMsg = 16 169 netRecvMsg = 17 170 netAccept4 = 18 171 netRecvMMsg = 19 172 netSendMMsg = 20 173) 174 175func accept(s int, rsa *RawSockaddrAny, addrlen *_Socklen) (int, error) { 176 args := [3]uintptr{uintptr(s), uintptr(unsafe.Pointer(rsa)), uintptr(unsafe.Pointer(addrlen))} 177 fd, _, err := Syscall(SYS_SOCKETCALL, netAccept, uintptr(unsafe.Pointer(&args)), 0) 178 if err != 0 { 179 return 0, err 180 } 181 return int(fd), nil 182} 183 184func accept4(s int, rsa *RawSockaddrAny, addrlen *_Socklen, flags int) (int, error) { 185 args := [4]uintptr{uintptr(s), uintptr(unsafe.Pointer(rsa)), uintptr(unsafe.Pointer(addrlen)), uintptr(flags)} 186 fd, _, err := Syscall(SYS_SOCKETCALL, netAccept4, uintptr(unsafe.Pointer(&args)), 0) 187 if err != 0 { 188 return 0, err 189 } 190 return int(fd), nil 191} 192 193func getsockname(s int, rsa *RawSockaddrAny, addrlen *_Socklen) error { 194 args := [3]uintptr{uintptr(s), uintptr(unsafe.Pointer(rsa)), uintptr(unsafe.Pointer(addrlen))} 195 _, _, err := RawSyscall(SYS_SOCKETCALL, netGetSockName, uintptr(unsafe.Pointer(&args)), 0) 196 if err != 0 { 197 return err 198 } 199 return nil 200} 201 202func getpeername(s int, rsa *RawSockaddrAny, addrlen *_Socklen) error { 203 args := [3]uintptr{uintptr(s), uintptr(unsafe.Pointer(rsa)), uintptr(unsafe.Pointer(addrlen))} 204 _, _, err := RawSyscall(SYS_SOCKETCALL, netGetPeerName, uintptr(unsafe.Pointer(&args)), 0) 205 if err != 0 { 206 return err 207 } 208 return nil 209} 210 211func socketpair(domain int, typ int, flags int, fd *[2]int32) error { 212 args := [4]uintptr{uintptr(domain), uintptr(typ), uintptr(flags), uintptr(unsafe.Pointer(fd))} 213 _, _, err := RawSyscall(SYS_SOCKETCALL, netSocketPair, uintptr(unsafe.Pointer(&args)), 0) 214 if err != 0 { 215 return err 216 } 217 return nil 218} 219 220func bind(s int, addr unsafe.Pointer, addrlen _Socklen) error { 221 args := [3]uintptr{uintptr(s), uintptr(addr), uintptr(addrlen)} 222 _, _, err := Syscall(SYS_SOCKETCALL, netBind, uintptr(unsafe.Pointer(&args)), 0) 223 if err != 0 { 224 return err 225 } 226 return nil 227} 228 229func connect(s int, addr unsafe.Pointer, addrlen _Socklen) error { 230 args := [3]uintptr{uintptr(s), uintptr(addr), uintptr(addrlen)} 231 _, _, err := Syscall(SYS_SOCKETCALL, netConnect, uintptr(unsafe.Pointer(&args)), 0) 232 if err != 0 { 233 return err 234 } 235 return nil 236} 237 238func socket(domain int, typ int, proto int) (int, error) { 239 args := [3]uintptr{uintptr(domain), uintptr(typ), uintptr(proto)} 240 fd, _, err := RawSyscall(SYS_SOCKETCALL, netSocket, uintptr(unsafe.Pointer(&args)), 0) 241 if err != 0 { 242 return 0, err 243 } 244 return int(fd), nil 245} 246 247func getsockopt(s int, level int, name int, val unsafe.Pointer, vallen *_Socklen) error { 248 args := [5]uintptr{uintptr(s), uintptr(level), uintptr(name), uintptr(val), uintptr(unsafe.Pointer(vallen))} 249 _, _, err := Syscall(SYS_SOCKETCALL, netGetSockOpt, uintptr(unsafe.Pointer(&args)), 0) 250 if err != 0 { 251 return err 252 } 253 return nil 254} 255 256func setsockopt(s int, level int, name int, val unsafe.Pointer, vallen uintptr) error { 257 args := [5]uintptr{uintptr(s), uintptr(level), uintptr(name), uintptr(val), vallen} 258 _, _, err := Syscall(SYS_SOCKETCALL, netSetSockOpt, uintptr(unsafe.Pointer(&args)), 0) 259 if err != 0 { 260 return err 261 } 262 return nil 263} 264 265func recvfrom(s int, p []byte, flags int, from *RawSockaddrAny, fromlen *_Socklen) (int, error) { 266 var base uintptr 267 if len(p) > 0 { 268 base = uintptr(unsafe.Pointer(&p[0])) 269 } 270 args := [6]uintptr{uintptr(s), base, uintptr(len(p)), uintptr(flags), uintptr(unsafe.Pointer(from)), uintptr(unsafe.Pointer(fromlen))} 271 n, _, err := Syscall(SYS_SOCKETCALL, netRecvFrom, uintptr(unsafe.Pointer(&args)), 0) 272 if err != 0 { 273 return 0, err 274 } 275 return int(n), nil 276} 277 278func sendto(s int, p []byte, flags int, to unsafe.Pointer, addrlen _Socklen) error { 279 var base uintptr 280 if len(p) > 0 { 281 base = uintptr(unsafe.Pointer(&p[0])) 282 } 283 args := [6]uintptr{uintptr(s), base, uintptr(len(p)), uintptr(flags), uintptr(to), uintptr(addrlen)} 284 _, _, err := Syscall(SYS_SOCKETCALL, netSendTo, uintptr(unsafe.Pointer(&args)), 0) 285 if err != 0 { 286 return err 287 } 288 return nil 289} 290 291func recvmsg(s int, msg *Msghdr, flags int) (int, error) { 292 args := [3]uintptr{uintptr(s), uintptr(unsafe.Pointer(msg)), uintptr(flags)} 293 n, _, err := Syscall(SYS_SOCKETCALL, netRecvMsg, uintptr(unsafe.Pointer(&args)), 0) 294 if err != 0 { 295 return 0, err 296 } 297 return int(n), nil 298} 299 300func sendmsg(s int, msg *Msghdr, flags int) (int, error) { 301 args := [3]uintptr{uintptr(s), uintptr(unsafe.Pointer(msg)), uintptr(flags)} 302 n, _, err := Syscall(SYS_SOCKETCALL, netSendMsg, uintptr(unsafe.Pointer(&args)), 0) 303 if err != 0 { 304 return 0, err 305 } 306 return int(n), nil 307} 308 309func Listen(s int, n int) error { 310 args := [2]uintptr{uintptr(s), uintptr(n)} 311 _, _, err := Syscall(SYS_SOCKETCALL, netListen, uintptr(unsafe.Pointer(&args)), 0) 312 if err != 0 { 313 return err 314 } 315 return nil 316} 317 318func Shutdown(s, how int) error { 319 args := [2]uintptr{uintptr(s), uintptr(how)} 320 _, _, err := Syscall(SYS_SOCKETCALL, netShutdown, uintptr(unsafe.Pointer(&args)), 0) 321 if err != 0 { 322 return err 323 } 324 return nil 325} 326 327//sys poll(fds *PollFd, nfds int, timeout int) (n int, err error) 328 329func Poll(fds []PollFd, timeout int) (n int, err error) { 330 if len(fds) == 0 { 331 return poll(nil, 0, timeout) 332 } 333 return poll(&fds[0], len(fds), timeout) 334} 335 336//sys kexecFileLoad(kernelFd int, initrdFd int, cmdlineLen int, cmdline string, flags int) (err error) 337 338func KexecFileLoad(kernelFd int, initrdFd int, cmdline string, flags int) error { 339 cmdlineLen := len(cmdline) 340 if cmdlineLen > 0 { 341 // Account for the additional NULL byte added by 342 // BytePtrFromString in kexecFileLoad. The kexec_file_load 343 // syscall expects a NULL-terminated string. 344 cmdlineLen++ 345 } 346 return kexecFileLoad(kernelFd, initrdFd, cmdlineLen, cmdline, flags) 347} 348