processor.h 8.3 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
/*
 *  include/asm-s390/processor.h
 *
 *  S390 version
 *    Copyright (C) 1999 IBM Deutschland Entwicklung GmbH, IBM Corporation
 *    Author(s): Hartmut Penner (hp@de.ibm.com),
 *               Martin Schwidefsky (schwidefsky@de.ibm.com)
 *
 *  Derived from "include/asm-i386/processor.h"
 *    Copyright (C) 1994, Linus Torvalds
 */

#ifndef __ASM_S390_PROCESSOR_H
#define __ASM_S390_PROCESSOR_H

16
#include <linux/linkage.h>
17
#include <asm/cpu.h>
18
#include <asm/page.h>
L
Linus Torvalds 已提交
19
#include <asm/ptrace.h>
20
#include <asm/setup.h>
L
Linus Torvalds 已提交
21 22 23 24 25 26

#ifdef __KERNEL__
/*
 * Default implementation of macro that returns current
 * instruction pointer ("program counter").
 */
27
#define current_text_addr() ({ void *pc; asm("basr %0,0" : "=a" (pc)); pc; })
L
Linus Torvalds 已提交
28

29
static inline void get_cpu_id(struct cpuid *ptr)
30
{
31
	asm volatile("stidp %0" : "=Q" (*ptr));
32 33
}

34
extern void s390_adjust_jiffies(void);
35
extern int get_cpu_capability(unsigned int *);
L
Linus Torvalds 已提交
36 37

/*
38
 * User space process size: 2GB for 31 bit, 4TB or 8PT for 64 bit.
L
Linus Torvalds 已提交
39 40 41
 */
#ifndef __s390x__

42 43
#define TASK_SIZE		(1UL << 31)
#define TASK_UNMAPPED_BASE	(1UL << 30)
L
Linus Torvalds 已提交
44 45 46

#else /* __s390x__ */

47
#define TASK_SIZE_OF(tsk)	((tsk)->mm->context.asce_limit)
48 49 50
#define TASK_UNMAPPED_BASE	(test_thread_flag(TIF_31BIT) ? \
					(1UL << 30) : (1UL << 41))
#define TASK_SIZE		TASK_SIZE_OF(current)
L
Linus Torvalds 已提交
51 52 53

#endif /* __s390x__ */

54 55
#ifdef __KERNEL__

56 57
#ifndef __s390x__
#define STACK_TOP		(1UL << 31)
M
Martin Schwidefsky 已提交
58
#define STACK_TOP_MAX		(1UL << 31)
59
#else /* __s390x__ */
M
Martin Schwidefsky 已提交
60 61
#define STACK_TOP		(1UL << (test_thread_flag(TIF_31BIT) ? 31:42))
#define STACK_TOP_MAX		(1UL << 42)
62 63
#endif /* __s390x__ */

64 65 66

#endif

L
Linus Torvalds 已提交
67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82
#define HAVE_ARCH_PICK_MMAP_LAYOUT

typedef struct {
        __u32 ar4;
} mm_segment_t;

/*
 * Thread structure
 */
struct thread_struct {
	s390_fp_regs fp_regs;
	unsigned int  acrs[NUM_ACRS];
        unsigned long ksp;              /* kernel stack pointer             */
	mm_segment_t mm_segment;
        unsigned long prot_addr;        /* address of protection-excep.     */
        unsigned int trap_no;
M
Martin Schwidefsky 已提交
83 84
	struct per_regs per_user;	/* User specified PER registers */
	struct per_event per_event;	/* Cause of the last PER trap */
L
Linus Torvalds 已提交
85 86
        /* pfault_wait is used to block the process on a pfault event */
	unsigned long pfault_wait;
87
	struct list_head list;
L
Linus Torvalds 已提交
88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112
};

typedef struct thread_struct thread_struct;

/*
 * Stack layout of a C stack frame.
 */
#ifndef __PACK_STACK
struct stack_frame {
	unsigned long back_chain;
	unsigned long empty1[5];
	unsigned long gprs[10];
	unsigned int  empty2[8];
};
#else
struct stack_frame {
	unsigned long empty1[5];
	unsigned int  empty2[8];
	unsigned long gprs[10];
	unsigned long back_chain;
};
#endif

#define ARCH_MIN_TASKALIGN	8

113 114 115
#define INIT_THREAD {							\
	.ksp = sizeof(init_stack) + (unsigned long) &init_stack,	\
}
L
Linus Torvalds 已提交
116 117 118 119

/*
 * Do necessary setup to start up a new thread.
 */
120
#define start_thread(regs, new_psw, new_stackp) do {		\
121
	set_fs(USER_DS);					\
G
Gerald Schaefer 已提交
122
	regs->psw.mask	= psw_user_bits;			\
123 124 125 126 127 128 129 130 131 132
	regs->psw.addr	= new_psw | PSW_ADDR_AMODE;		\
	regs->gprs[15]	= new_stackp;				\
} while (0)

#define start_thread31(regs, new_psw, new_stackp) do {		\
	set_fs(USER_DS);					\
	regs->psw.mask	= psw_user32_bits;			\
	regs->psw.addr	= new_psw | PSW_ADDR_AMODE;		\
	regs->gprs[15]	= new_stackp;				\
	crst_table_downgrade(current->mm, 1UL << 31);		\
L
Linus Torvalds 已提交
133 134 135 136 137
} while (0)

/* Forward declaration, a strange C thing */
struct task_struct;
struct mm_struct;
138
struct seq_file;
L
Linus Torvalds 已提交
139 140 141 142 143 144 145 146 147 148 149 150 151

/* Free all resources held by a thread. */
extern void release_thread(struct task_struct *);
extern int kernel_thread(int (*fn)(void *), void * arg, unsigned long flags);

/* Prepare to copy thread state - unlazy all lazy status */
#define prepare_to_copy(tsk)	do { } while (0)

/*
 * Return saved PC of a blocked thread.
 */
extern unsigned long thread_saved_pc(struct task_struct *t);

152
extern void show_code(struct pt_regs *regs);
L
Linus Torvalds 已提交
153 154

unsigned long get_wchan(struct task_struct *p);
A
Al Viro 已提交
155
#define task_pt_regs(tsk) ((struct pt_regs *) \
A
Al Viro 已提交
156
        (task_stack_page(tsk) + THREAD_SIZE) - 1)
A
Al Viro 已提交
157 158
#define KSTK_EIP(tsk)	(task_pt_regs(tsk)->psw.addr)
#define KSTK_ESP(tsk)	(task_pt_regs(tsk)->gprs[15])
L
Linus Torvalds 已提交
159 160 161 162

/*
 * Give up the time slice of the virtual PU.
 */
163 164 165
static inline void cpu_relax(void)
{
	if (MACHINE_HAS_DIAG44)
166 167
		asm volatile("diag 0,0,68");
	barrier();
168
}
L
Linus Torvalds 已提交
169

H
Heiko Carstens 已提交
170 171 172 173 174
static inline void psw_set_key(unsigned int key)
{
	asm volatile("spka 0(%0)" : : "d" (key));
}

175 176 177 178 179 180
/*
 * Set PSW to specified value.
 */
static inline void __load_psw(psw_t psw)
{
#ifndef __s390x__
181
	asm volatile("lpsw  %0" : : "Q" (psw) : "cc");
182
#else
183
	asm volatile("lpswe %0" : : "Q" (psw) : "cc");
184 185 186
#endif
}

L
Linus Torvalds 已提交
187 188 189 190 191 192 193 194 195
/*
 * Set PSW mask to specified value, while leaving the
 * PSW addr pointing to the next instruction.
 */

static inline void __load_psw_mask (unsigned long mask)
{
	unsigned long addr;
	psw_t psw;
196

L
Linus Torvalds 已提交
197 198 199
	psw.mask = mask;

#ifndef __s390x__
200 201 202
	asm volatile(
		"	basr	%0,0\n"
		"0:	ahi	%0,1f-0b\n"
203 204
		"	st	%0,%O1+4(%R1)\n"
		"	lpsw	%1\n"
L
Linus Torvalds 已提交
205
		"1:"
206
		: "=&d" (addr), "=Q" (psw) : "Q" (psw) : "memory", "cc");
L
Linus Torvalds 已提交
207
#else /* __s390x__ */
208 209
	asm volatile(
		"	larl	%0,1f\n"
210 211
		"	stg	%0,%O1+8(%R1)\n"
		"	lpswe	%1\n"
L
Linus Torvalds 已提交
212
		"1:"
213
		: "=&d" (addr), "=Q" (psw) : "Q" (psw) : "memory", "cc");
L
Linus Torvalds 已提交
214 215 216 217 218 219 220 221
#endif /* __s390x__ */
}
 
/*
 * Function to stop a processor until an interruption occurred
 */
static inline void enabled_wait(void)
{
222 223
	__load_psw_mask(PSW_BASE_BITS | PSW_MASK_IO | PSW_MASK_EXT |
			PSW_MASK_MCHECK | PSW_MASK_WAIT | PSW_DEFAULT_KEY);
L
Linus Torvalds 已提交
224 225 226 227 228 229
}

/*
 * Function to drop a processor into disabled wait state
 */

230
static inline void ATTRIB_NORET disabled_wait(unsigned long code)
L
Linus Torvalds 已提交
231 232
{
        unsigned long ctl_buf;
233
        psw_t dw_psw;
L
Linus Torvalds 已提交
234

235 236
        dw_psw.mask = PSW_BASE_BITS | PSW_MASK_WAIT;
        dw_psw.addr = code;
L
Linus Torvalds 已提交
237 238 239 240 241
        /* 
         * Store status and then load disabled wait psw,
         * the processor is dead afterwards
         */
#ifndef __s390x__
242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259
	asm volatile(
		"	stctl	0,0,0(%2)\n"
		"	ni	0(%2),0xef\n"	/* switch off protection */
		"	lctl	0,0,0(%2)\n"
		"	stpt	0xd8\n"		/* store timer */
		"	stckc	0xe0\n"		/* store clock comparator */
		"	stpx	0x108\n"	/* store prefix register */
		"	stam	0,15,0x120\n"	/* store access registers */
		"	std	0,0x160\n"	/* store f0 */
		"	std	2,0x168\n"	/* store f2 */
		"	std	4,0x170\n"	/* store f4 */
		"	std	6,0x178\n"	/* store f6 */
		"	stm	0,15,0x180\n"	/* store general registers */
		"	stctl	0,15,0x1c0\n"	/* store control registers */
		"	oi	0x1c0,0x10\n"	/* fake protection bit */
		"	lpsw	0(%1)"
		: "=m" (ctl_buf)
		: "a" (&dw_psw), "a" (&ctl_buf), "m" (dw_psw) : "cc");
L
Linus Torvalds 已提交
260
#else /* __s390x__ */
261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291
	asm volatile(
		"	stctg	0,0,0(%2)\n"
		"	ni	4(%2),0xef\n"	/* switch off protection */
		"	lctlg	0,0,0(%2)\n"
		"	lghi	1,0x1000\n"
		"	stpt	0x328(1)\n"	/* store timer */
		"	stckc	0x330(1)\n"	/* store clock comparator */
		"	stpx	0x318(1)\n"	/* store prefix register */
		"	stam	0,15,0x340(1)\n"/* store access registers */
		"	stfpc	0x31c(1)\n"	/* store fpu control */
		"	std	0,0x200(1)\n"	/* store f0 */
		"	std	1,0x208(1)\n"	/* store f1 */
		"	std	2,0x210(1)\n"	/* store f2 */
		"	std	3,0x218(1)\n"	/* store f3 */
		"	std	4,0x220(1)\n"	/* store f4 */
		"	std	5,0x228(1)\n"	/* store f5 */
		"	std	6,0x230(1)\n"	/* store f6 */
		"	std	7,0x238(1)\n"	/* store f7 */
		"	std	8,0x240(1)\n"	/* store f8 */
		"	std	9,0x248(1)\n"	/* store f9 */
		"	std	10,0x250(1)\n"	/* store f10 */
		"	std	11,0x258(1)\n"	/* store f11 */
		"	std	12,0x260(1)\n"	/* store f12 */
		"	std	13,0x268(1)\n"	/* store f13 */
		"	std	14,0x270(1)\n"	/* store f14 */
		"	std	15,0x278(1)\n"	/* store f15 */
		"	stmg	0,15,0x280(1)\n"/* store general registers */
		"	stctg	0,15,0x380(1)\n"/* store control registers */
		"	oi	0x384(1),0x10\n"/* fake protection bit */
		"	lpswe	0(%1)"
		: "=m" (ctl_buf)
292
		: "a" (&dw_psw), "a" (&ctl_buf), "m" (dw_psw) : "cc", "0", "1");
L
Linus Torvalds 已提交
293
#endif /* __s390x__ */
294
	while (1);
L
Linus Torvalds 已提交
295 296
}

297 298 299 300 301 302 303 304 305 306 307 308
/*
 * Basic Machine Check/Program Check Handler.
 */

extern void s390_base_mcck_handler(void);
extern void s390_base_pgm_handler(void);
extern void s390_base_ext_handler(void);

extern void (*s390_base_mcck_handler_fn)(void);
extern void (*s390_base_pgm_handler_fn)(void);
extern void (*s390_base_ext_handler_fn)(void);

309 310
#define ARCH_LOW_ADDRESS_LIMIT	0x7fffffffUL

L
Linus Torvalds 已提交
311 312
#endif

M
Martin Schwidefsky 已提交
313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329
/*
 * Helper macro for exception table entries
 */
#ifndef __s390x__
#define EX_TABLE(_fault,_target)			\
	".section __ex_table,\"a\"\n"			\
	"	.align 4\n"				\
	"	.long  " #_fault "," #_target "\n"	\
	".previous\n"
#else
#define EX_TABLE(_fault,_target)			\
	".section __ex_table,\"a\"\n"			\
	"	.align 8\n"				\
	"	.quad  " #_fault "," #_target "\n"	\
	".previous\n"
#endif

L
Linus Torvalds 已提交
330
#endif                                 /* __ASM_S390_PROCESSOR_H           */