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