2018-02-15 05:54:17 +00:00
|
|
|
/*
|
2020-03-27 09:23:49 +00:00
|
|
|
* Copyright (c) 2018 Ariadne Conill <ariadne@dereferenced.org>
|
2018-02-15 05:54:17 +00:00
|
|
|
*
|
|
|
|
|
* Permission to use, copy, modify, and/or distribute this software for any
|
|
|
|
|
* purpose with or without fee is hereby granted, provided that the above
|
|
|
|
|
* copyright notice and this permission notice appear in all copies.
|
|
|
|
|
*
|
|
|
|
|
* This software is provided 'as is' and without any warranty, express or
|
|
|
|
|
* implied. In no event shall the authors be liable for any damages arising
|
|
|
|
|
* from the use of this software.
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
#include "defs.h"
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.globl __swapcontext;
|
|
|
|
|
__swapcontext:
|
|
|
|
|
lgr %r1, %r2 /* use %r1 to save current context to */
|
|
|
|
|
lgr %r0, %r3 /* use %r0 for source context */
|
|
|
|
|
|
|
|
|
|
stam %a0, %a15, OFFSET_AREGS(%r1) /* store access registers */
|
|
|
|
|
stmg %r0, %r15, OFFSET_GREGS(%r1) /* store general-purpose registers */
|
|
|
|
|
|
|
|
|
|
lgr %r2, %r0 /* swap %r0 to %r2 (XXX: figure out why it hates loading from %r0) */
|
|
|
|
|
lam %a2, %a15, OFFSET_AREGS+8(%r2) /* load access registers, but skip %a0 and %a1 which are for TLS */
|
|
|
|
|
lmg %r0, %r15, OFFSET_GREGS(%r2) /* load general-purpose registers */
|
|
|
|
|
|
|
|
|
|
br %r14 /* return to new link register address */
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
.weak swapcontext;
|
|
|
|
|
swapcontext = __swapcontext;
|
