blob: 6ef5e99380f92134ba86a6a693b5ac6d3434e6d4 [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*---------------------------------------------------------------------------+
2 | get_address.c |
3 | |
4 | Get the effective address from an FPU instruction. |
5 | |
6 | Copyright (C) 1992,1993,1994,1997 |
7 | W. Metzenthen, 22 Parker St, Ormond, Vic 3163, |
8 | Australia. E-mail billm@suburbia.net |
9 | |
10 | |
11 +---------------------------------------------------------------------------*/
12
13/*---------------------------------------------------------------------------+
14 | Note: |
15 | The file contains code which accesses user memory. |
16 | Emulator static data may change when user memory is accessed, due to |
17 | other processes using the emulator while swapping is in progress. |
18 +---------------------------------------------------------------------------*/
19
Linus Torvalds1da177e2005-04-16 15:20:36 -070020#include <linux/stddef.h>
21
22#include <asm/uaccess.h>
23#include <asm/desc.h>
24
25#include "fpu_system.h"
26#include "exception.h"
27#include "fpu_emu.h"
28
Linus Torvalds1da177e2005-04-16 15:20:36 -070029#define FPU_WRITE_BIT 0x10
30
31static int reg_offset[] = {
Tejun Heod3157602009-02-09 22:17:39 +090032 offsetof(struct pt_regs, ax),
33 offsetof(struct pt_regs, cx),
34 offsetof(struct pt_regs, dx),
35 offsetof(struct pt_regs, bx),
36 offsetof(struct pt_regs, sp),
37 offsetof(struct pt_regs, bp),
38 offsetof(struct pt_regs, si),
39 offsetof(struct pt_regs, di)
Linus Torvalds1da177e2005-04-16 15:20:36 -070040};
41
Tejun Heod3157602009-02-09 22:17:39 +090042#define REG_(x) (*(long *)(reg_offset[(x)] + (u_char *)FPU_info->regs))
Linus Torvalds1da177e2005-04-16 15:20:36 -070043
44static int reg_offset_vm86[] = {
Tejun Heod3157602009-02-09 22:17:39 +090045 offsetof(struct pt_regs, cs),
46 offsetof(struct kernel_vm86_regs, ds),
47 offsetof(struct kernel_vm86_regs, es),
48 offsetof(struct kernel_vm86_regs, fs),
49 offsetof(struct kernel_vm86_regs, gs),
50 offsetof(struct pt_regs, ss),
51 offsetof(struct kernel_vm86_regs, ds)
Ingo Molnar3d0d14f2008-01-30 13:30:11 +010052};
Linus Torvalds1da177e2005-04-16 15:20:36 -070053
54#define VM86_REG_(x) (*(unsigned short *) \
Tejun Heod3157602009-02-09 22:17:39 +090055 (reg_offset_vm86[((unsigned)x)] + (u_char *)FPU_info->regs))
Linus Torvalds1da177e2005-04-16 15:20:36 -070056
Linus Torvalds1da177e2005-04-16 15:20:36 -070057static int reg_offset_pm[] = {
Tejun Heod3157602009-02-09 22:17:39 +090058 offsetof(struct pt_regs, cs),
59 offsetof(struct pt_regs, ds),
60 offsetof(struct pt_regs, es),
61 offsetof(struct pt_regs, fs),
62 offsetof(struct pt_regs, ds), /* dummy, not saved on stack */
63 offsetof(struct pt_regs, ss),
64 offsetof(struct pt_regs, ds)
Ingo Molnar3d0d14f2008-01-30 13:30:11 +010065};
Linus Torvalds1da177e2005-04-16 15:20:36 -070066
67#define PM_REG_(x) (*(unsigned short *) \
Tejun Heod3157602009-02-09 22:17:39 +090068 (reg_offset_pm[((unsigned)x)] + (u_char *)FPU_info->regs))
Linus Torvalds1da177e2005-04-16 15:20:36 -070069
Linus Torvalds1da177e2005-04-16 15:20:36 -070070/* Decode the SIB byte. This function assumes mod != 0 */
71static int sib(int mod, unsigned long *fpu_eip)
72{
Ingo Molnar3d0d14f2008-01-30 13:30:11 +010073 u_char ss, index, base;
74 long offset;
Linus Torvalds1da177e2005-04-16 15:20:36 -070075
Ingo Molnar3d0d14f2008-01-30 13:30:11 +010076 RE_ENTRANT_CHECK_OFF;
77 FPU_code_access_ok(1);
78 FPU_get_user(base, (u_char __user *) (*fpu_eip)); /* The SIB byte */
79 RE_ENTRANT_CHECK_ON;
80 (*fpu_eip)++;
81 ss = base >> 6;
82 index = (base >> 3) & 7;
83 base &= 7;
Linus Torvalds1da177e2005-04-16 15:20:36 -070084
Ingo Molnar3d0d14f2008-01-30 13:30:11 +010085 if ((mod == 0) && (base == 5))
86 offset = 0; /* No base register */
87 else
88 offset = REG_(base);
Linus Torvalds1da177e2005-04-16 15:20:36 -070089
Ingo Molnar3d0d14f2008-01-30 13:30:11 +010090 if (index == 4) {
91 /* No index register */
92 /* A non-zero ss is illegal */
93 if (ss)
94 EXCEPTION(EX_Invalid);
95 } else {
96 offset += (REG_(index)) << ss;
97 }
Linus Torvalds1da177e2005-04-16 15:20:36 -070098
Ingo Molnar3d0d14f2008-01-30 13:30:11 +010099 if (mod == 1) {
100 /* 8 bit signed displacement */
101 long displacement;
102 RE_ENTRANT_CHECK_OFF;
103 FPU_code_access_ok(1);
104 FPU_get_user(displacement, (signed char __user *)(*fpu_eip));
105 offset += displacement;
106 RE_ENTRANT_CHECK_ON;
107 (*fpu_eip)++;
108 } else if (mod == 2 || base == 5) { /* The second condition also has mod==0 */
109 /* 32 bit displacement */
110 long displacement;
111 RE_ENTRANT_CHECK_OFF;
112 FPU_code_access_ok(4);
113 FPU_get_user(displacement, (long __user *)(*fpu_eip));
114 offset += displacement;
115 RE_ENTRANT_CHECK_ON;
116 (*fpu_eip) += 4;
117 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700118
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100119 return offset;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700120}
121
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100122static unsigned long vm86_segment(u_char segment, struct address *addr)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700123{
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100124 segment--;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700125#ifdef PARANOID
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100126 if (segment > PREFIX_SS_) {
127 EXCEPTION(EX_INTERNAL | 0x130);
128 math_abort(FPU_info, SIGSEGV);
129 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700130#endif /* PARANOID */
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100131 addr->selector = VM86_REG_(segment);
132 return (unsigned long)VM86_REG_(segment) << 4;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700133}
134
Linus Torvalds1da177e2005-04-16 15:20:36 -0700135/* This should work for 16 and 32 bit protected mode. */
136static long pm_address(u_char FPU_modrm, u_char segment,
137 struct address *addr, long offset)
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100138{
139 struct desc_struct descriptor;
140 unsigned long base_address, limit, address, seg_top;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700141
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100142 segment--;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700143
144#ifdef PARANOID
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100145 /* segment is unsigned, so this also detects if segment was 0: */
146 if (segment > PREFIX_SS_) {
147 EXCEPTION(EX_INTERNAL | 0x132);
148 math_abort(FPU_info, SIGSEGV);
149 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700150#endif /* PARANOID */
151
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100152 switch (segment) {
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100153 case PREFIX_GS_ - 1:
Tejun Heod9a89a22009-02-09 22:17:40 +0900154 /* user gs handling can be lazy, use special accessors */
155 addr->selector = get_user_gs(FPU_info->regs);
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100156 break;
157 default:
158 addr->selector = PM_REG_(segment);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700159 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700160
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100161 descriptor = LDT_DESCRIPTOR(PM_REG_(segment));
162 base_address = SEG_BASE_ADDR(descriptor);
163 address = base_address + offset;
164 limit = base_address
165 + (SEG_LIMIT(descriptor) + 1) * SEG_GRANULARITY(descriptor) - 1;
166 if (limit < base_address)
167 limit = 0xffffffff;
168
169 if (SEG_EXPAND_DOWN(descriptor)) {
170 if (SEG_G_BIT(descriptor))
171 seg_top = 0xffffffff;
172 else {
173 seg_top = base_address + (1 << 20);
174 if (seg_top < base_address)
175 seg_top = 0xffffffff;
176 }
177 access_limit =
178 (address <= limit) || (address >= seg_top) ? 0 :
179 ((seg_top - address) >= 255 ? 255 : seg_top - address);
180 } else {
181 access_limit =
182 (address > limit) || (address < base_address) ? 0 :
183 ((limit - address) >= 254 ? 255 : limit - address + 1);
184 }
185 if (SEG_EXECUTE_ONLY(descriptor) ||
186 (!SEG_WRITE_PERM(descriptor) && (FPU_modrm & FPU_WRITE_BIT))) {
187 access_limit = 0;
188 }
189 return address;
190}
Linus Torvalds1da177e2005-04-16 15:20:36 -0700191
192/*
193 MOD R/M byte: MOD == 3 has a special use for the FPU
194 SIB byte used iff R/M = 100b
195
196 7 6 5 4 3 2 1 0
197 ..... ......... .........
198 MOD OPCODE(2) R/M
199
Linus Torvalds1da177e2005-04-16 15:20:36 -0700200 SIB byte
201
202 7 6 5 4 3 2 1 0
203 ..... ......... .........
204 SS INDEX BASE
205
206*/
207
208void __user *FPU_get_address(u_char FPU_modrm, unsigned long *fpu_eip,
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100209 struct address *addr, fpu_addr_modes addr_modes)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700210{
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100211 u_char mod;
212 unsigned rm = FPU_modrm & 7;
213 long *cpu_reg_ptr;
214 int address = 0; /* Initialized just to stop compiler warnings. */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700215
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100216 /* Memory accessed via the cs selector is write protected
217 in `non-segmented' 32 bit protected mode. */
218 if (!addr_modes.default_mode && (FPU_modrm & FPU_WRITE_BIT)
219 && (addr_modes.override.segment == PREFIX_CS_)) {
220 math_abort(FPU_info, SIGSEGV);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700221 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700222
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100223 addr->selector = FPU_DS; /* Default, for 32 bit non-segmented mode. */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700224
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100225 mod = (FPU_modrm >> 6) & 3;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700226
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100227 if (rm == 4 && mod != 3) {
228 address = sib(mod, fpu_eip);
229 } else {
230 cpu_reg_ptr = &REG_(rm);
231 switch (mod) {
232 case 0:
233 if (rm == 5) {
234 /* Special case: disp32 */
235 RE_ENTRANT_CHECK_OFF;
236 FPU_code_access_ok(4);
237 FPU_get_user(address,
238 (unsigned long __user
239 *)(*fpu_eip));
240 (*fpu_eip) += 4;
241 RE_ENTRANT_CHECK_ON;
242 addr->offset = address;
243 return (void __user *)address;
244 } else {
245 address = *cpu_reg_ptr; /* Just return the contents
246 of the cpu register */
247 addr->offset = address;
248 return (void __user *)address;
249 }
250 case 1:
251 /* 8 bit signed displacement */
252 RE_ENTRANT_CHECK_OFF;
253 FPU_code_access_ok(1);
254 FPU_get_user(address, (signed char __user *)(*fpu_eip));
255 RE_ENTRANT_CHECK_ON;
256 (*fpu_eip)++;
257 break;
258 case 2:
259 /* 32 bit displacement */
260 RE_ENTRANT_CHECK_OFF;
261 FPU_code_access_ok(4);
262 FPU_get_user(address, (long __user *)(*fpu_eip));
263 (*fpu_eip) += 4;
264 RE_ENTRANT_CHECK_ON;
265 break;
266 case 3:
267 /* Not legal for the FPU */
268 EXCEPTION(EX_Invalid);
269 }
270 address += *cpu_reg_ptr;
271 }
272
273 addr->offset = address;
274
275 switch (addr_modes.default_mode) {
276 case 0:
277 break;
278 case VM86:
279 address += vm86_segment(addr_modes.override.segment, addr);
280 break;
281 case PM16:
282 case SEG32:
283 address = pm_address(FPU_modrm, addr_modes.override.segment,
284 addr, address);
285 break;
286 default:
287 EXCEPTION(EX_INTERNAL | 0x133);
288 }
289
290 return (void __user *)address;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700291}
292
Linus Torvalds1da177e2005-04-16 15:20:36 -0700293void __user *FPU_get_address_16(u_char FPU_modrm, unsigned long *fpu_eip,
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100294 struct address *addr, fpu_addr_modes addr_modes)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700295{
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100296 u_char mod;
297 unsigned rm = FPU_modrm & 7;
298 int address = 0; /* Default used for mod == 0 */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700299
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100300 /* Memory accessed via the cs selector is write protected
301 in `non-segmented' 32 bit protected mode. */
302 if (!addr_modes.default_mode && (FPU_modrm & FPU_WRITE_BIT)
303 && (addr_modes.override.segment == PREFIX_CS_)) {
304 math_abort(FPU_info, SIGSEGV);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700305 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700306
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100307 addr->selector = FPU_DS; /* Default, for 32 bit non-segmented mode. */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700308
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100309 mod = (FPU_modrm >> 6) & 3;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700310
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100311 switch (mod) {
312 case 0:
313 if (rm == 6) {
314 /* Special case: disp16 */
315 RE_ENTRANT_CHECK_OFF;
316 FPU_code_access_ok(2);
317 FPU_get_user(address,
318 (unsigned short __user *)(*fpu_eip));
319 (*fpu_eip) += 2;
320 RE_ENTRANT_CHECK_ON;
321 goto add_segment;
322 }
323 break;
324 case 1:
325 /* 8 bit signed displacement */
326 RE_ENTRANT_CHECK_OFF;
327 FPU_code_access_ok(1);
328 FPU_get_user(address, (signed char __user *)(*fpu_eip));
329 RE_ENTRANT_CHECK_ON;
330 (*fpu_eip)++;
331 break;
332 case 2:
333 /* 16 bit displacement */
334 RE_ENTRANT_CHECK_OFF;
335 FPU_code_access_ok(2);
336 FPU_get_user(address, (unsigned short __user *)(*fpu_eip));
337 (*fpu_eip) += 2;
338 RE_ENTRANT_CHECK_ON;
339 break;
340 case 3:
341 /* Not legal for the FPU */
342 EXCEPTION(EX_Invalid);
343 break;
344 }
345 switch (rm) {
346 case 0:
Tejun Heod3157602009-02-09 22:17:39 +0900347 address += FPU_info->regs->bx + FPU_info->regs->si;
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100348 break;
349 case 1:
Tejun Heod3157602009-02-09 22:17:39 +0900350 address += FPU_info->regs->bx + FPU_info->regs->di;
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100351 break;
352 case 2:
Tejun Heod3157602009-02-09 22:17:39 +0900353 address += FPU_info->regs->bp + FPU_info->regs->si;
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100354 if (addr_modes.override.segment == PREFIX_DEFAULT)
355 addr_modes.override.segment = PREFIX_SS_;
356 break;
357 case 3:
Tejun Heod3157602009-02-09 22:17:39 +0900358 address += FPU_info->regs->bp + FPU_info->regs->di;
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100359 if (addr_modes.override.segment == PREFIX_DEFAULT)
360 addr_modes.override.segment = PREFIX_SS_;
361 break;
362 case 4:
Tejun Heod3157602009-02-09 22:17:39 +0900363 address += FPU_info->regs->si;
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100364 break;
365 case 5:
Tejun Heod3157602009-02-09 22:17:39 +0900366 address += FPU_info->regs->di;
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100367 break;
368 case 6:
Tejun Heod3157602009-02-09 22:17:39 +0900369 address += FPU_info->regs->bp;
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100370 if (addr_modes.override.segment == PREFIX_DEFAULT)
371 addr_modes.override.segment = PREFIX_SS_;
372 break;
373 case 7:
Tejun Heod3157602009-02-09 22:17:39 +0900374 address += FPU_info->regs->bx;
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100375 break;
376 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700377
Ingo Molnar3d0d14f2008-01-30 13:30:11 +0100378 add_segment:
379 address &= 0xffff;
380
381 addr->offset = address;
382
383 switch (addr_modes.default_mode) {
384 case 0:
385 break;
386 case VM86:
387 address += vm86_segment(addr_modes.override.segment, addr);
388 break;
389 case PM16:
390 case SEG32:
391 address = pm_address(FPU_modrm, addr_modes.override.segment,
392 addr, address);
393 break;
394 default:
395 EXCEPTION(EX_INTERNAL | 0x131);
396 }
397
398 return (void __user *)address;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700399}