2013-06-28 15:22:32 +02:00
|
|
|
/*
|
|
|
|
* Alpha specific CPU ABI and functions for linux-user
|
|
|
|
*
|
|
|
|
* Copyright (c) 2007 Jocelyn Mayer
|
|
|
|
*
|
|
|
|
* This library is free software; you can redistribute it and/or
|
|
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
|
|
* License as published by the Free Software Foundation; either
|
|
|
|
* version 2 of the License, or (at your option) any later version.
|
|
|
|
*
|
|
|
|
* This library is distributed in the hope that it will be useful,
|
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
|
|
* Lesser General Public License for more details.
|
|
|
|
*
|
|
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
|
|
* License along with this library; if not, see <http://www.gnu.org/licenses/>.
|
|
|
|
*/
|
2016-06-29 16:05:18 +02:00
|
|
|
#ifndef ALPHA_TARGET_CPU_H
|
|
|
|
#define ALPHA_TARGET_CPU_H
|
2013-06-28 15:22:32 +02:00
|
|
|
|
2019-11-06 12:33:15 +01:00
|
|
|
static inline void cpu_clone_regs_child(CPUAlphaState *env, target_ulong newsp,
|
|
|
|
unsigned flags)
|
2013-06-28 15:22:32 +02:00
|
|
|
{
|
|
|
|
if (newsp) {
|
|
|
|
env->ir[IR_SP] = newsp;
|
|
|
|
}
|
|
|
|
env->ir[IR_V0] = 0;
|
|
|
|
env->ir[IR_A3] = 0;
|
2019-11-06 12:33:18 +01:00
|
|
|
env->ir[IR_A4] = 1; /* OSF/1 secondary return: child */
|
2013-06-28 15:22:32 +02:00
|
|
|
}
|
|
|
|
|
2019-11-06 12:33:16 +01:00
|
|
|
static inline void cpu_clone_regs_parent(CPUAlphaState *env, unsigned flags)
|
|
|
|
{
|
2019-11-06 12:33:18 +01:00
|
|
|
/*
|
|
|
|
* OSF/1 secondary return: parent
|
|
|
|
* Note that the kernel does not do this if SETTLS, because the
|
|
|
|
* settls argument register is still live after copy_thread.
|
|
|
|
*/
|
|
|
|
if (!(flags & CLONE_SETTLS)) {
|
|
|
|
env->ir[IR_A4] = 0;
|
|
|
|
}
|
2019-11-06 12:33:16 +01:00
|
|
|
}
|
|
|
|
|
2013-06-28 15:22:32 +02:00
|
|
|
static inline void cpu_set_tls(CPUAlphaState *env, target_ulong newtls)
|
|
|
|
{
|
|
|
|
env->unique = newtls;
|
|
|
|
}
|
|
|
|
|
2018-05-29 21:42:00 +02:00
|
|
|
static inline abi_ulong get_sp_from_cpustate(CPUAlphaState *state)
|
|
|
|
{
|
|
|
|
return state->ir[IR_SP];
|
|
|
|
}
|
2013-06-28 15:22:32 +02:00
|
|
|
#endif
|