github.com/4ad/go@v0.0.0-20161219182952-69a12818b605/src/runtime/sys_linux_s390x.s (about) 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 // System calls and other system stuff for Linux s390x; see 6 // /usr/include/asm/unistd.h for the syscall number definitions. 7 8 #include "go_asm.h" 9 #include "go_tls.h" 10 #include "textflag.h" 11 12 #define SYS_exit 1 13 #define SYS_read 3 14 #define SYS_write 4 15 #define SYS_open 5 16 #define SYS_close 6 17 #define SYS_getpid 20 18 #define SYS_kill 37 19 #define SYS_fcntl 55 20 #define SYS_gettimeofday 78 21 #define SYS_mmap 90 22 #define SYS_munmap 91 23 #define SYS_setitimer 104 24 #define SYS_clone 120 25 #define SYS_select 142 26 #define SYS_sched_yield 158 27 #define SYS_rt_sigreturn 173 28 #define SYS_rt_sigaction 174 29 #define SYS_rt_sigprocmask 175 30 #define SYS_sigaltstack 186 31 #define SYS_ugetrlimit 191 32 #define SYS_madvise 219 33 #define SYS_mincore 218 34 #define SYS_gettid 236 35 #define SYS_tkill 237 36 #define SYS_futex 238 37 #define SYS_sched_getaffinity 240 38 #define SYS_exit_group 248 39 #define SYS_epoll_create 249 40 #define SYS_epoll_ctl 250 41 #define SYS_epoll_wait 251 42 #define SYS_clock_gettime 260 43 #define SYS_epoll_create1 327 44 45 TEXT runtime·exit(SB),NOSPLIT|NOFRAME,$0-4 46 MOVW code+0(FP), R2 47 MOVW $SYS_exit_group, R1 48 SYSCALL 49 RET 50 51 TEXT runtime·exit1(SB),NOSPLIT|NOFRAME,$0-4 52 MOVW code+0(FP), R2 53 MOVW $SYS_exit, R1 54 SYSCALL 55 RET 56 57 TEXT runtime·open(SB),NOSPLIT|NOFRAME,$0-20 58 MOVD name+0(FP), R2 59 MOVW mode+8(FP), R3 60 MOVW perm+12(FP), R4 61 MOVW $SYS_open, R1 62 SYSCALL 63 MOVD $-4095, R3 64 CMPUBLT R2, R3, 2(PC) 65 MOVW $-1, R2 66 MOVW R2, ret+16(FP) 67 RET 68 69 TEXT runtime·closefd(SB),NOSPLIT|NOFRAME,$0-12 70 MOVW fd+0(FP), R2 71 MOVW $SYS_close, R1 72 SYSCALL 73 MOVD $-4095, R3 74 CMPUBLT R2, R3, 2(PC) 75 MOVW $-1, R2 76 MOVW R2, ret+8(FP) 77 RET 78 79 TEXT runtime·write(SB),NOSPLIT|NOFRAME,$0-28 80 MOVD fd+0(FP), R2 81 MOVD p+8(FP), R3 82 MOVW n+16(FP), R4 83 MOVW $SYS_write, R1 84 SYSCALL 85 MOVD $-4095, R3 86 CMPUBLT R2, R3, 2(PC) 87 MOVW $-1, R2 88 MOVW R2, ret+24(FP) 89 RET 90 91 TEXT runtime·read(SB),NOSPLIT|NOFRAME,$0-28 92 MOVW fd+0(FP), R2 93 MOVD p+8(FP), R3 94 MOVW n+16(FP), R4 95 MOVW $SYS_read, R1 96 SYSCALL 97 MOVD $-4095, R3 98 CMPUBLT R2, R3, 2(PC) 99 MOVW $-1, R2 100 MOVW R2, ret+24(FP) 101 RET 102 103 TEXT runtime·getrlimit(SB),NOSPLIT|NOFRAME,$0-20 104 MOVW kind+0(FP), R2 105 MOVD limit+8(FP), R3 106 MOVW $SYS_ugetrlimit, R1 107 SYSCALL 108 MOVW R2, ret+16(FP) 109 RET 110 111 TEXT runtime·usleep(SB),NOSPLIT,$16-4 112 MOVW usec+0(FP), R2 113 MOVD R2, R4 114 MOVW $1000000, R3 115 DIVD R3, R2 116 MOVD R2, 8(R15) 117 MULLD R2, R3 118 SUB R3, R4 119 MOVD R4, 16(R15) 120 121 // select(0, 0, 0, 0, &tv) 122 MOVW $0, R2 123 MOVW $0, R3 124 MOVW $0, R4 125 MOVW $0, R5 126 ADD $8, R15, R6 127 MOVW $SYS_select, R1 128 SYSCALL 129 RET 130 131 TEXT runtime·gettid(SB),NOSPLIT,$0-4 132 MOVW $SYS_gettid, R1 133 SYSCALL 134 MOVW R2, ret+0(FP) 135 RET 136 137 TEXT runtime·raise(SB),NOSPLIT|NOFRAME,$0 138 MOVW $SYS_gettid, R1 139 SYSCALL 140 MOVW R2, R2 // arg 1 tid 141 MOVW sig+0(FP), R3 // arg 2 142 MOVW $SYS_tkill, R1 143 SYSCALL 144 RET 145 146 TEXT runtime·raiseproc(SB),NOSPLIT|NOFRAME,$0 147 MOVW $SYS_getpid, R1 148 SYSCALL 149 MOVW R2, R2 // arg 1 pid 150 MOVW sig+0(FP), R3 // arg 2 151 MOVW $SYS_kill, R1 152 SYSCALL 153 RET 154 155 TEXT runtime·setitimer(SB),NOSPLIT|NOFRAME,$0-24 156 MOVW mode+0(FP), R2 157 MOVD new+8(FP), R3 158 MOVD old+16(FP), R4 159 MOVW $SYS_setitimer, R1 160 SYSCALL 161 RET 162 163 TEXT runtime·mincore(SB),NOSPLIT|NOFRAME,$0-28 164 MOVD addr+0(FP), R2 165 MOVD n+8(FP), R3 166 MOVD dst+16(FP), R4 167 MOVW $SYS_mincore, R1 168 SYSCALL 169 MOVW R2, ret+24(FP) 170 RET 171 172 // func now() (sec int64, nsec int32) 173 TEXT time·now(SB),NOSPLIT,$16 174 MOVD $0(R15), R2 175 MOVD $0, R3 176 MOVW $SYS_gettimeofday, R1 177 SYSCALL 178 MOVD 0(R15), R2 // sec 179 MOVD 8(R15), R4 // usec 180 MOVD $1000, R3 181 MULLD R3, R4 182 MOVD R2, sec+0(FP) 183 MOVW R4, nsec+8(FP) 184 RET 185 186 TEXT runtime·nanotime(SB),NOSPLIT,$16 187 MOVW $1, R2 // CLOCK_MONOTONIC 188 MOVD $0(R15), R3 189 MOVW $SYS_clock_gettime, R1 190 SYSCALL 191 MOVD 0(R15), R2 // sec 192 MOVD 8(R15), R4 // nsec 193 // sec is in R2, nsec in R4 194 // return nsec in R2 195 MOVD $1000000000, R3 196 MULLD R3, R2 197 ADD R4, R2 198 MOVD R2, ret+0(FP) 199 RET 200 201 TEXT runtime·rtsigprocmask(SB),NOSPLIT|NOFRAME,$0-28 202 MOVW sig+0(FP), R2 203 MOVD new+8(FP), R3 204 MOVD old+16(FP), R4 205 MOVW size+24(FP), R5 206 MOVW $SYS_rt_sigprocmask, R1 207 SYSCALL 208 MOVD $-4095, R3 209 CMPUBLT R2, R3, 2(PC) 210 MOVD R0, 0(R0) // crash 211 RET 212 213 TEXT runtime·rt_sigaction(SB),NOSPLIT|NOFRAME,$0-36 214 MOVD sig+0(FP), R2 215 MOVD new+8(FP), R3 216 MOVD old+16(FP), R4 217 MOVD size+24(FP), R5 218 MOVW $SYS_rt_sigaction, R1 219 SYSCALL 220 MOVW R2, ret+32(FP) 221 RET 222 223 TEXT runtime·sigfwd(SB),NOSPLIT,$0-32 224 MOVW sig+8(FP), R2 225 MOVD info+16(FP), R3 226 MOVD ctx+24(FP), R4 227 MOVD fn+0(FP), R5 228 BL R5 229 RET 230 231 TEXT runtime·sigtramp(SB),NOSPLIT,$64 232 // initialize essential registers (just in case) 233 XOR R0, R0 234 235 // this might be called in external code context, 236 // where g is not set. 237 MOVB runtime·iscgo(SB), R6 238 CMPBEQ R6, $0, 2(PC) 239 BL runtime·load_g(SB) 240 241 MOVW R2, 8(R15) 242 MOVD R3, 16(R15) 243 MOVD R4, 24(R15) 244 MOVD $runtime·sigtrampgo(SB), R5 245 BL R5 246 RET 247 248 TEXT runtime·cgoSigtramp(SB),NOSPLIT,$0 249 BR runtime·sigtramp(SB) 250 251 // func mmap(addr unsafe.Pointer, n uintptr, prot, flags, fd int32, off uint32) unsafe.Pointer 252 TEXT runtime·mmap(SB),NOSPLIT,$48-40 253 MOVD addr+0(FP), R2 254 MOVD n+8(FP), R3 255 MOVW prot+16(FP), R4 256 MOVW flags+20(FP), R5 257 MOVW fd+24(FP), R6 258 MOVWZ off+28(FP), R7 259 260 // s390x uses old_mmap, so the arguments need to be placed into 261 // a struct and a pointer to the struct passed to mmap. 262 MOVD R2, addr-48(SP) 263 MOVD R3, n-40(SP) 264 MOVD R4, prot-32(SP) 265 MOVD R5, flags-24(SP) 266 MOVD R6, fd-16(SP) 267 MOVD R7, off-8(SP) 268 269 MOVD $addr-48(SP), R2 270 MOVW $SYS_mmap, R1 271 SYSCALL 272 MOVD $-4095, R3 273 CMPUBLT R2, R3, 2(PC) 274 NEG R2 275 MOVD R2, ret+32(FP) 276 RET 277 278 TEXT runtime·munmap(SB),NOSPLIT|NOFRAME,$0 279 MOVD addr+0(FP), R2 280 MOVD n+8(FP), R3 281 MOVW $SYS_munmap, R1 282 SYSCALL 283 MOVD $-4095, R3 284 CMPUBLT R2, R3, 2(PC) 285 MOVD R0, 0(R0) // crash 286 RET 287 288 TEXT runtime·madvise(SB),NOSPLIT|NOFRAME,$0 289 MOVD addr+0(FP), R2 290 MOVD n+8(FP), R3 291 MOVW flags+16(FP), R4 292 MOVW $SYS_madvise, R1 293 SYSCALL 294 // ignore failure - maybe pages are locked 295 RET 296 297 // int64 futex(int32 *uaddr, int32 op, int32 val, 298 // struct timespec *timeout, int32 *uaddr2, int32 val2); 299 TEXT runtime·futex(SB),NOSPLIT|NOFRAME,$0 300 MOVD addr+0(FP), R2 301 MOVW op+8(FP), R3 302 MOVW val+12(FP), R4 303 MOVD ts+16(FP), R5 304 MOVD addr2+24(FP), R6 305 MOVW val3+32(FP), R7 306 MOVW $SYS_futex, R1 307 SYSCALL 308 MOVW R2, ret+40(FP) 309 RET 310 311 // int32 clone(int32 flags, void *stk, M *mp, G *gp, void (*fn)(void)); 312 TEXT runtime·clone(SB),NOSPLIT|NOFRAME,$0 313 MOVW flags+0(FP), R3 314 MOVD stk+8(FP), R2 315 316 // Copy mp, gp, fn off parent stack for use by child. 317 // Careful: Linux system call clobbers ???. 318 MOVD mm+16(FP), R7 319 MOVD gg+24(FP), R8 320 MOVD fn+32(FP), R9 321 322 MOVD R7, -8(R2) 323 MOVD R8, -16(R2) 324 MOVD R9, -24(R2) 325 MOVD $1234, R7 326 MOVD R7, -32(R2) 327 328 SYSCALL $SYS_clone 329 330 // In parent, return. 331 CMPBEQ R2, $0, 3(PC) 332 MOVW R2, ret+40(FP) 333 RET 334 335 // In child, on new stack. 336 // initialize essential registers 337 XOR R0, R0 338 MOVD -32(R15), R7 339 CMP R7, $1234 340 BEQ 2(PC) 341 MOVD R0, 0(R0) 342 343 // Initialize m->procid to Linux tid 344 SYSCALL $SYS_gettid 345 346 MOVD -24(R15), R9 // fn 347 MOVD -16(R15), R8 // g 348 MOVD -8(R15), R7 // m 349 350 CMPBEQ R7, $0, nog 351 CMP R8, $0 352 BEQ nog 353 354 MOVD R2, m_procid(R7) 355 356 // In child, set up new stack 357 MOVD R7, g_m(R8) 358 MOVD R8, g 359 //CALL runtime·stackcheck(SB) 360 361 nog: 362 // Call fn 363 BL R9 364 365 // It shouldn't return. If it does, exit that thread. 366 MOVW $111, R2 367 MOVW $SYS_exit, R1 368 SYSCALL 369 BR -2(PC) // keep exiting 370 371 TEXT runtime·sigaltstack(SB),NOSPLIT|NOFRAME,$0 372 MOVD new+0(FP), R2 373 MOVD old+8(FP), R3 374 MOVW $SYS_sigaltstack, R1 375 SYSCALL 376 MOVD $-4095, R3 377 CMPUBLT R2, R3, 2(PC) 378 MOVD R0, 0(R0) // crash 379 RET 380 381 TEXT runtime·osyield(SB),NOSPLIT|NOFRAME,$0 382 MOVW $SYS_sched_yield, R1 383 SYSCALL 384 RET 385 386 TEXT runtime·sched_getaffinity(SB),NOSPLIT|NOFRAME,$0 387 MOVD pid+0(FP), R2 388 MOVD len+8(FP), R3 389 MOVD buf+16(FP), R4 390 MOVW $SYS_sched_getaffinity, R1 391 SYSCALL 392 MOVW R2, ret+24(FP) 393 RET 394 395 // int32 runtime·epollcreate(int32 size); 396 TEXT runtime·epollcreate(SB),NOSPLIT|NOFRAME,$0 397 MOVW size+0(FP), R2 398 MOVW $SYS_epoll_create, R1 399 SYSCALL 400 MOVW R2, ret+8(FP) 401 RET 402 403 // int32 runtime·epollcreate1(int32 flags); 404 TEXT runtime·epollcreate1(SB),NOSPLIT|NOFRAME,$0 405 MOVW flags+0(FP), R2 406 MOVW $SYS_epoll_create1, R1 407 SYSCALL 408 MOVW R2, ret+8(FP) 409 RET 410 411 // func epollctl(epfd, op, fd int32, ev *epollEvent) int 412 TEXT runtime·epollctl(SB),NOSPLIT|NOFRAME,$0 413 MOVW epfd+0(FP), R2 414 MOVW op+4(FP), R3 415 MOVW fd+8(FP), R4 416 MOVD ev+16(FP), R5 417 MOVW $SYS_epoll_ctl, R1 418 SYSCALL 419 MOVW R2, ret+24(FP) 420 RET 421 422 // int32 runtime·epollwait(int32 epfd, EpollEvent *ev, int32 nev, int32 timeout); 423 TEXT runtime·epollwait(SB),NOSPLIT|NOFRAME,$0 424 MOVW epfd+0(FP), R2 425 MOVD ev+8(FP), R3 426 MOVW nev+16(FP), R4 427 MOVW timeout+20(FP), R5 428 MOVW $SYS_epoll_wait, R1 429 SYSCALL 430 MOVW R2, ret+24(FP) 431 RET 432 433 // void runtime·closeonexec(int32 fd); 434 TEXT runtime·closeonexec(SB),NOSPLIT|NOFRAME,$0 435 MOVW fd+0(FP), R2 // fd 436 MOVD $2, R3 // F_SETFD 437 MOVD $1, R4 // FD_CLOEXEC 438 MOVW $SYS_fcntl, R1 439 SYSCALL 440 RET