1 /* Intel 386 target-dependent stuff.
3 Copyright 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996,
4 1997, 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
6 This file is part of GDB.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 59 Temple Place - Suite 330,
21 Boston, MA 02111-1307, USA. */
24 #include "gdb_string.h"
29 #include "floatformat.h"
34 #include "arch-utils.h"
38 #include "gdb_assert.h"
40 #include "i386-tdep.h"
41 #include "i387-tdep.h"
43 /* Names of the registers. The first 10 registers match the register
44 numbering scheme used by GCC for stabs and DWARF. */
45 static char *i386_register_names
[] =
47 "eax", "ecx", "edx", "ebx",
48 "esp", "ebp", "esi", "edi",
49 "eip", "eflags", "cs", "ss",
50 "ds", "es", "fs", "gs",
51 "st0", "st1", "st2", "st3",
52 "st4", "st5", "st6", "st7",
53 "fctrl", "fstat", "ftag", "fiseg",
54 "fioff", "foseg", "fooff", "fop",
55 "xmm0", "xmm1", "xmm2", "xmm3",
56 "xmm4", "xmm5", "xmm6", "xmm7",
62 static char *i386_mmx_names
[] =
64 "mm0", "mm1", "mm2", "mm3",
65 "mm4", "mm5", "mm6", "mm7"
67 static const int mmx_num_regs
= (sizeof (i386_mmx_names
)
68 / sizeof (i386_mmx_names
[0]));
69 #define MM0_REGNUM (NUM_REGS)
72 mmx_regnum_p (int reg
)
74 return (reg
>= MM0_REGNUM
&& reg
< MM0_REGNUM
+ mmx_num_regs
);
77 /* Return the name of register REG. */
80 i386_register_name (int reg
)
84 if (mmx_regnum_p (reg
))
85 return i386_mmx_names
[reg
- MM0_REGNUM
];
86 if (reg
>= sizeof (i386_register_names
) / sizeof (*i386_register_names
))
89 return i386_register_names
[reg
];
92 /* Convert stabs register number REG to the appropriate register
93 number used by GDB. */
96 i386_stab_reg_to_regnum (int reg
)
98 /* This implements what GCC calls the "default" register map. */
99 if (reg
>= 0 && reg
<= 7)
101 /* General registers. */
104 else if (reg
>= 12 && reg
<= 19)
106 /* Floating-point registers. */
107 return reg
- 12 + FP0_REGNUM
;
109 else if (reg
>= 21 && reg
<= 28)
112 return reg
- 21 + XMM0_REGNUM
;
114 else if (reg
>= 29 && reg
<= 36)
117 return reg
- 29 + MM0_REGNUM
;
120 /* This will hopefully provoke a warning. */
121 return NUM_REGS
+ NUM_PSEUDO_REGS
;
124 /* Convert DWARF register number REG to the appropriate register
125 number used by GDB. */
128 i386_dwarf_reg_to_regnum (int reg
)
130 /* The DWARF register numbering includes %eip and %eflags, and
131 numbers the floating point registers differently. */
132 if (reg
>= 0 && reg
<= 9)
134 /* General registers. */
137 else if (reg
>= 11 && reg
<= 18)
139 /* Floating-point registers. */
140 return reg
- 11 + FP0_REGNUM
;
144 /* The SSE and MMX registers have identical numbers as in stabs. */
145 return i386_stab_reg_to_regnum (reg
);
148 /* This will hopefully provoke a warning. */
149 return NUM_REGS
+ NUM_PSEUDO_REGS
;
153 /* This is the variable that is set with "set disassembly-flavor", and
154 its legitimate values. */
155 static const char att_flavor
[] = "att";
156 static const char intel_flavor
[] = "intel";
157 static const char *valid_flavors
[] =
163 static const char *disassembly_flavor
= att_flavor
;
165 /* Stdio style buffering was used to minimize calls to ptrace, but
166 this buffering did not take into account that the code section
167 being accessed may not be an even number of buffers long (even if
168 the buffer is only sizeof(int) long). In cases where the code
169 section size happened to be a non-integral number of buffers long,
170 attempting to read the last buffer would fail. Simply using
171 target_read_memory and ignoring errors, rather than read_memory, is
172 not the correct solution, since legitimate access errors would then
173 be totally ignored. To properly handle this situation and continue
174 to use buffering would require that this code be able to determine
175 the minimum code section size granularity (not the alignment of the
176 section itself, since the actual failing case that pointed out this
177 problem had a section alignment of 4 but was not a multiple of 4
178 bytes long), on a target by target basis, and then adjust it's
179 buffer size accordingly. This is messy, but potentially feasible.
180 It probably needs the bfd library's help and support. For now, the
181 buffer size is set to 1. (FIXME -fnf) */
183 #define CODESTREAM_BUFSIZ 1 /* Was sizeof(int), see note above. */
184 static CORE_ADDR codestream_next_addr
;
185 static CORE_ADDR codestream_addr
;
186 static unsigned char codestream_buf
[CODESTREAM_BUFSIZ
];
187 static int codestream_off
;
188 static int codestream_cnt
;
190 #define codestream_tell() (codestream_addr + codestream_off)
191 #define codestream_peek() \
192 (codestream_cnt == 0 ? \
193 codestream_fill(1) : codestream_buf[codestream_off])
194 #define codestream_get() \
195 (codestream_cnt-- == 0 ? \
196 codestream_fill(0) : codestream_buf[codestream_off++])
199 codestream_fill (int peek_flag
)
201 codestream_addr
= codestream_next_addr
;
202 codestream_next_addr
+= CODESTREAM_BUFSIZ
;
204 codestream_cnt
= CODESTREAM_BUFSIZ
;
205 read_memory (codestream_addr
, (char *) codestream_buf
, CODESTREAM_BUFSIZ
);
208 return (codestream_peek ());
210 return (codestream_get ());
214 codestream_seek (CORE_ADDR place
)
216 codestream_next_addr
= place
/ CODESTREAM_BUFSIZ
;
217 codestream_next_addr
*= CODESTREAM_BUFSIZ
;
220 while (codestream_tell () != place
)
225 codestream_read (unsigned char *buf
, int count
)
230 for (i
= 0; i
< count
; i
++)
231 *p
++ = codestream_get ();
235 /* If the next instruction is a jump, move to its target. */
238 i386_follow_jump (void)
240 unsigned char buf
[4];
246 pos
= codestream_tell ();
249 if (codestream_peek () == 0x66)
255 switch (codestream_get ())
258 /* Relative jump: if data16 == 0, disp32, else disp16. */
261 codestream_read (buf
, 2);
262 delta
= extract_signed_integer (buf
, 2);
264 /* Include the size of the jmp instruction (including the
270 codestream_read (buf
, 4);
271 delta
= extract_signed_integer (buf
, 4);
277 /* Relative jump, disp8 (ignore data16). */
278 codestream_read (buf
, 1);
279 /* Sign-extend it. */
280 delta
= extract_signed_integer (buf
, 1);
285 codestream_seek (pos
);
288 /* Find & return the amount a local space allocated, and advance the
289 codestream to the first register push (if any).
291 If the entry sequence doesn't make sense, return -1, and leave
292 codestream pointer at a random spot. */
295 i386_get_frame_setup (CORE_ADDR pc
)
299 codestream_seek (pc
);
303 op
= codestream_get ();
305 if (op
== 0x58) /* popl %eax */
307 /* This function must start with
310 xchgl %eax, (%esp) 0x87 0x04 0x24
311 or xchgl %eax, 0(%esp) 0x87 0x44 0x24 0x00
313 (the System V compiler puts out the second `xchg'
314 instruction, and the assembler doesn't try to optimize it, so
315 the 'sib' form gets generated). This sequence is used to get
316 the address of the return buffer for a function that returns
319 unsigned char buf
[4];
320 static unsigned char proto1
[3] = { 0x87, 0x04, 0x24 };
321 static unsigned char proto2
[4] = { 0x87, 0x44, 0x24, 0x00 };
323 pos
= codestream_tell ();
324 codestream_read (buf
, 4);
325 if (memcmp (buf
, proto1
, 3) == 0)
327 else if (memcmp (buf
, proto2
, 4) == 0)
330 codestream_seek (pos
);
331 op
= codestream_get (); /* Update next opcode. */
334 if (op
== 0x68 || op
== 0x6a)
336 /* This function may start with
348 unsigned char buf
[8];
350 /* Skip past the `pushl' instruction; it has either a one-byte
351 or a four-byte operand, depending on the opcode. */
352 pos
= codestream_tell ();
357 codestream_seek (pos
);
359 /* Read the following 8 bytes, which should be "call _probe" (6
360 bytes) followed by "addl $4,%esp" (2 bytes). */
361 codestream_read (buf
, sizeof (buf
));
362 if (buf
[0] == 0xe8 && buf
[6] == 0xc4 && buf
[7] == 0x4)
364 codestream_seek (pos
);
365 op
= codestream_get (); /* Update next opcode. */
368 if (op
== 0x55) /* pushl %ebp */
370 /* Check for "movl %esp, %ebp" -- can be written in two ways. */
371 switch (codestream_get ())
374 if (codestream_get () != 0xec)
378 if (codestream_get () != 0xe5)
384 /* Check for stack adjustment
388 NOTE: You can't subtract a 16 bit immediate from a 32 bit
389 reg, so we don't have to worry about a data16 prefix. */
390 op
= codestream_peek ();
393 /* `subl' with 8 bit immediate. */
395 if (codestream_get () != 0xec)
396 /* Some instruction starting with 0x83 other than `subl'. */
398 codestream_seek (codestream_tell () - 2);
401 /* `subl' with signed byte immediate (though it wouldn't
402 make sense to be negative). */
403 return (codestream_get ());
408 /* Maybe it is `subl' with a 32 bit immedediate. */
410 if (codestream_get () != 0xec)
411 /* Some instruction starting with 0x81 other than `subl'. */
413 codestream_seek (codestream_tell () - 2);
416 /* It is `subl' with a 32 bit immediate. */
417 codestream_read ((unsigned char *) buf
, 4);
418 return extract_signed_integer (buf
, 4);
428 /* `enter' with 16 bit unsigned immediate. */
429 codestream_read ((unsigned char *) buf
, 2);
430 codestream_get (); /* Flush final byte of enter instruction. */
431 return extract_unsigned_integer (buf
, 2);
436 /* Signal trampolines don't have a meaningful frame. The frame
437 pointer value we use is actually the frame pointer of the calling
438 frame -- that is, the frame which was in progress when the signal
439 trampoline was entered. GDB mostly treats this frame pointer value
440 as a magic cookie. We detect the case of a signal trampoline by
441 looking at the SIGNAL_HANDLER_CALLER field, which is set based on
444 When a signal trampoline is invoked from a frameless function, we
445 essentially have two frameless functions in a row. In this case,
446 we use the same magic cookie for three frames in a row. We detect
447 this case by seeing whether the next frame has
448 SIGNAL_HANDLER_CALLER set, and, if it does, checking whether the
449 current frame is actually frameless. In this case, we need to get
450 the PC by looking at the SP register value stored in the signal
453 This should work in most cases except in horrible situations where
454 a signal occurs just as we enter a function but before the frame
455 has been set up. Incidentally, that's just what happens when we
456 call a function from GDB with a signal pending (there's a test in
457 the testsuite that makes this happen). Therefore we pretend that
458 we have a frameless function if we're stopped at the start of a
461 /* Return non-zero if we're dealing with a frameless signal, that is,
462 a signal trampoline invoked from a frameless function. */
465 i386_frameless_signal_p (struct frame_info
*frame
)
467 return (frame
->next
&& frame
->next
->signal_handler_caller
468 && (frameless_look_for_prologue (frame
)
469 || frame
->pc
== get_pc_function_start (frame
->pc
)));
472 /* Return the chain-pointer for FRAME. In the case of the i386, the
473 frame's nominal address is the address of a 4-byte word containing
474 the calling frame's address. */
477 i386_frame_chain (struct frame_info
*frame
)
479 if (PC_IN_CALL_DUMMY (frame
->pc
, 0, 0))
482 if (frame
->signal_handler_caller
483 || i386_frameless_signal_p (frame
))
486 if (! inside_entry_file (frame
->pc
))
487 return read_memory_unsigned_integer (frame
->frame
, 4);
492 /* Determine whether the function invocation represented by FRAME does
493 not have a from on the stack associated with it. If it does not,
494 return non-zero, otherwise return zero. */
497 i386_frameless_function_invocation (struct frame_info
*frame
)
499 if (frame
->signal_handler_caller
)
502 return frameless_look_for_prologue (frame
);
505 /* Assuming FRAME is for a sigtramp routine, return the saved program
509 i386_sigtramp_saved_pc (struct frame_info
*frame
)
511 struct gdbarch_tdep
*tdep
= gdbarch_tdep (current_gdbarch
);
514 addr
= tdep
->sigcontext_addr (frame
);
515 return read_memory_unsigned_integer (addr
+ tdep
->sc_pc_offset
, 4);
518 /* Assuming FRAME is for a sigtramp routine, return the saved stack
522 i386_sigtramp_saved_sp (struct frame_info
*frame
)
524 struct gdbarch_tdep
*tdep
= gdbarch_tdep (current_gdbarch
);
527 addr
= tdep
->sigcontext_addr (frame
);
528 return read_memory_unsigned_integer (addr
+ tdep
->sc_sp_offset
, 4);
531 /* Return the saved program counter for FRAME. */
534 i386_frame_saved_pc (struct frame_info
*frame
)
536 if (PC_IN_CALL_DUMMY (frame
->pc
, 0, 0))
537 return generic_read_register_dummy (frame
->pc
, frame
->frame
,
540 if (frame
->signal_handler_caller
)
541 return i386_sigtramp_saved_pc (frame
);
543 if (i386_frameless_signal_p (frame
))
545 CORE_ADDR sp
= i386_sigtramp_saved_sp (frame
->next
);
546 return read_memory_unsigned_integer (sp
, 4);
549 return read_memory_unsigned_integer (frame
->frame
+ 4, 4);
552 /* Immediately after a function call, return the saved pc. */
555 i386_saved_pc_after_call (struct frame_info
*frame
)
557 if (frame
->signal_handler_caller
)
558 return i386_sigtramp_saved_pc (frame
);
560 return read_memory_unsigned_integer (read_register (SP_REGNUM
), 4);
563 /* Return number of args passed to a frame.
564 Can return -1, meaning no way to tell. */
567 i386_frame_num_args (struct frame_info
*fi
)
572 /* This loses because not only might the compiler not be popping the
573 args right after the function call, it might be popping args from
574 both this call and a previous one, and we would say there are
575 more args than there really are. */
579 struct frame_info
*pfi
;
581 /* On the i386, the instruction following the call could be:
583 addl $imm, %esp - imm/4 args; imm may be 8 or 32 bits
584 anything else - zero args. */
588 frameless
= FRAMELESS_FUNCTION_INVOCATION (fi
);
590 /* In the absence of a frame pointer, GDB doesn't get correct
591 values for nameless arguments. Return -1, so it doesn't print
592 any nameless arguments. */
595 pfi
= get_prev_frame (fi
);
598 /* NOTE: This can happen if we are looking at the frame for
599 main, because FRAME_CHAIN_VALID won't let us go into start.
600 If we have debugging symbols, that's not really a big deal;
601 it just means it will only show as many arguments to main as
608 op
= read_memory_integer (retpc
, 1);
609 if (op
== 0x59) /* pop %ecx */
613 op
= read_memory_integer (retpc
+ 1, 1);
615 /* addl $<signed imm 8 bits>, %esp */
616 return (read_memory_integer (retpc
+ 2, 1) & 0xff) / 4;
620 else if (op
== 0x81) /* `add' with 32 bit immediate. */
622 op
= read_memory_integer (retpc
+ 1, 1);
624 /* addl $<imm 32>, %esp */
625 return read_memory_integer (retpc
+ 2, 4) / 4;
637 /* Parse the first few instructions the function to see what registers
640 We handle these cases:
642 The startup sequence can be at the start of the function, or the
643 function can start with a branch to startup code at the end.
645 %ebp can be set up with either the 'enter' instruction, or "pushl
646 %ebp, movl %esp, %ebp" (`enter' is too slow to be useful, but was
647 once used in the System V compiler).
649 Local space is allocated just below the saved %ebp by either the
650 'enter' instruction, or by "subl $<size>, %esp". 'enter' has a 16
651 bit unsigned argument for space to allocate, and the 'addl'
652 instruction could have either a signed byte, or 32 bit immediate.
654 Next, the registers used by this function are pushed. With the
655 System V compiler they will always be in the order: %edi, %esi,
656 %ebx (and sometimes a harmless bug causes it to also save but not
657 restore %eax); however, the code below is willing to see the pushes
658 in any order, and will handle up to 8 of them.
660 If the setup sequence is at the end of the function, then the next
661 instruction will be a branch back to the start. */
664 i386_frame_init_saved_regs (struct frame_info
*fip
)
675 frame_saved_regs_zalloc (fip
);
677 pc
= get_pc_function_start (fip
->pc
);
679 locals
= i386_get_frame_setup (pc
);
683 addr
= fip
->frame
- 4 - locals
;
684 for (i
= 0; i
< 8; i
++)
686 op
= codestream_get ();
687 if (op
< 0x50 || op
> 0x57)
689 #ifdef I386_REGNO_TO_SYMMETRY
690 /* Dynix uses different internal numbering. Ick. */
691 fip
->saved_regs
[I386_REGNO_TO_SYMMETRY (op
- 0x50)] = addr
;
693 fip
->saved_regs
[op
- 0x50] = addr
;
699 fip
->saved_regs
[PC_REGNUM
] = fip
->frame
+ 4;
700 fip
->saved_regs
[FP_REGNUM
] = fip
->frame
;
703 /* Return PC of first real instruction. */
706 i386_skip_prologue (CORE_ADDR pc
)
710 static unsigned char pic_pat
[6] =
711 { 0xe8, 0, 0, 0, 0, /* call 0x0 */
712 0x5b, /* popl %ebx */
716 if (i386_get_frame_setup (pc
) < 0)
719 /* Found valid frame setup -- codestream now points to start of push
720 instructions for saving registers. */
722 /* Skip over register saves. */
723 for (i
= 0; i
< 8; i
++)
725 op
= codestream_peek ();
726 /* Break if not `pushl' instrunction. */
727 if (op
< 0x50 || op
> 0x57)
732 /* The native cc on SVR4 in -K PIC mode inserts the following code
733 to get the address of the global offset table (GOT) into register
738 movl %ebx,x(%ebp) (optional)
741 This code is with the rest of the prologue (at the end of the
742 function), so we have to skip it to get to the first real
743 instruction at the start of the function. */
745 pos
= codestream_tell ();
746 for (i
= 0; i
< 6; i
++)
748 op
= codestream_get ();
749 if (pic_pat
[i
] != op
)
754 unsigned char buf
[4];
757 op
= codestream_get ();
758 if (op
== 0x89) /* movl %ebx, x(%ebp) */
760 op
= codestream_get ();
761 if (op
== 0x5d) /* One byte offset from %ebp. */
764 codestream_read (buf
, 1);
766 else if (op
== 0x9d) /* Four byte offset from %ebp. */
769 codestream_read (buf
, 4);
771 else /* Unexpected instruction. */
773 op
= codestream_get ();
776 if (delta
> 0 && op
== 0x81 && codestream_get () == 0xc3)
781 codestream_seek (pos
);
785 return (codestream_tell ());
788 /* Use the program counter to determine the contents and size of a
789 breakpoint instruction. Return a pointer to a string of bytes that
790 encode a breakpoint instruction, store the length of the string in
791 *LEN and optionally adjust *PC to point to the correct memory
792 location for inserting the breakpoint.
794 On the i386 we have a single breakpoint that fits in a single byte
795 and can be inserted anywhere. */
797 static const unsigned char *
798 i386_breakpoint_from_pc (CORE_ADDR
*pc
, int *len
)
800 static unsigned char break_insn
[] = { 0xcc }; /* int 3 */
802 *len
= sizeof (break_insn
);
806 /* Push the return address (pointing to the call dummy) onto the stack
807 and return the new value for the stack pointer. */
810 i386_push_return_address (CORE_ADDR pc
, CORE_ADDR sp
)
814 store_unsigned_integer (buf
, 4, CALL_DUMMY_ADDRESS ());
815 write_memory (sp
- 4, buf
, 4);
820 i386_do_pop_frame (struct frame_info
*frame
)
824 char regbuf
[I386_MAX_REGISTER_SIZE
];
826 fp
= FRAME_FP (frame
);
827 i386_frame_init_saved_regs (frame
);
829 for (regnum
= 0; regnum
< NUM_REGS
; regnum
++)
832 addr
= frame
->saved_regs
[regnum
];
835 read_memory (addr
, regbuf
, REGISTER_RAW_SIZE (regnum
));
836 write_register_bytes (REGISTER_BYTE (regnum
), regbuf
,
837 REGISTER_RAW_SIZE (regnum
));
840 write_register (FP_REGNUM
, read_memory_integer (fp
, 4));
841 write_register (PC_REGNUM
, read_memory_integer (fp
+ 4, 4));
842 write_register (SP_REGNUM
, fp
+ 8);
843 flush_cached_frames ();
847 i386_pop_frame (void)
849 generic_pop_current_frame (i386_do_pop_frame
);
853 /* Figure out where the longjmp will land. Slurp the args out of the
854 stack. We expect the first arg to be a pointer to the jmp_buf
855 structure from which we extract the address that we will land at.
856 This address is copied into PC. This routine returns true on
860 i386_get_longjmp_target (CORE_ADDR
*pc
)
863 CORE_ADDR sp
, jb_addr
;
864 int jb_pc_offset
= gdbarch_tdep (current_gdbarch
)->jb_pc_offset
;
866 /* If JB_PC_OFFSET is -1, we have no way to find out where the
867 longjmp will land. */
868 if (jb_pc_offset
== -1)
871 sp
= read_register (SP_REGNUM
);
872 if (target_read_memory (sp
+ 4, buf
, 4))
875 jb_addr
= extract_address (buf
, 4);
876 if (target_read_memory (jb_addr
+ jb_pc_offset
, buf
, 4))
879 *pc
= extract_address (buf
, 4);
885 i386_push_arguments (int nargs
, struct value
**args
, CORE_ADDR sp
,
886 int struct_return
, CORE_ADDR struct_addr
)
888 sp
= default_push_arguments (nargs
, args
, sp
, struct_return
, struct_addr
);
895 store_address (buf
, 4, struct_addr
);
896 write_memory (sp
, buf
, 4);
903 i386_store_struct_return (CORE_ADDR addr
, CORE_ADDR sp
)
905 /* Do nothing. Everything was already done by i386_push_arguments. */
908 /* These registers are used for returning integers (and on some
909 targets also for returning `struct' and `union' values when their
910 size and alignment match an integer type). */
911 #define LOW_RETURN_REGNUM 0 /* %eax */
912 #define HIGH_RETURN_REGNUM 2 /* %edx */
914 /* Extract from an array REGBUF containing the (raw) register state, a
915 function return value of TYPE, and copy that, in virtual format,
919 i386_extract_return_value (struct type
*type
, struct regcache
*regcache
,
922 int len
= TYPE_LENGTH (type
);
923 char buf
[I386_MAX_REGISTER_SIZE
];
925 if (TYPE_CODE (type
) == TYPE_CODE_STRUCT
926 && TYPE_NFIELDS (type
) == 1)
928 i386_extract_return_value (TYPE_FIELD_TYPE (type
, 0), regcache
, valbuf
);
932 if (TYPE_CODE (type
) == TYPE_CODE_FLT
)
936 warning ("Cannot find floating-point return value.");
937 memset (valbuf
, 0, len
);
941 /* Floating-point return values can be found in %st(0). Convert
942 its contents to the desired type. This is probably not
943 exactly how it would happen on the target itself, but it is
944 the best we can do. */
945 regcache_raw_read (regcache
, FP0_REGNUM
, buf
);
946 convert_typed_floating (buf
, builtin_type_i387_ext
, valbuf
, type
);
950 int low_size
= REGISTER_RAW_SIZE (LOW_RETURN_REGNUM
);
951 int high_size
= REGISTER_RAW_SIZE (HIGH_RETURN_REGNUM
);
955 regcache_raw_read (regcache
, LOW_RETURN_REGNUM
, buf
);
956 memcpy (valbuf
, buf
, len
);
958 else if (len
<= (low_size
+ high_size
))
960 regcache_raw_read (regcache
, LOW_RETURN_REGNUM
, buf
);
961 memcpy (valbuf
, buf
, low_size
);
962 regcache_raw_read (regcache
, HIGH_RETURN_REGNUM
, buf
);
963 memcpy (valbuf
+ low_size
, buf
, len
- low_size
);
966 internal_error (__FILE__
, __LINE__
,
967 "Cannot extract return value of %d bytes long.", len
);
971 /* Write into the appropriate registers a function return value stored
972 in VALBUF of type TYPE, given in virtual format. */
975 i386_store_return_value (struct type
*type
, char *valbuf
)
977 int len
= TYPE_LENGTH (type
);
979 if (TYPE_CODE (type
) == TYPE_CODE_STRUCT
980 && TYPE_NFIELDS (type
) == 1)
982 i386_store_return_value (TYPE_FIELD_TYPE (type
, 0), valbuf
);
986 if (TYPE_CODE (type
) == TYPE_CODE_FLT
)
989 char buf
[FPU_REG_RAW_SIZE
];
993 warning ("Cannot set floating-point return value.");
997 /* Returning floating-point values is a bit tricky. Apart from
998 storing the return value in %st(0), we have to simulate the
999 state of the FPU at function return point. */
1001 /* Convert the value found in VALBUF to the extended
1002 floating-point format used by the FPU. This is probably
1003 not exactly how it would happen on the target itself, but
1004 it is the best we can do. */
1005 convert_typed_floating (valbuf
, type
, buf
, builtin_type_i387_ext
);
1006 write_register_bytes (REGISTER_BYTE (FP0_REGNUM
), buf
,
1009 /* Set the top of the floating-point register stack to 7. The
1010 actual value doesn't really matter, but 7 is what a normal
1011 function return would end up with if the program started out
1012 with a freshly initialized FPU. */
1013 fstat
= read_register (FSTAT_REGNUM
);
1015 write_register (FSTAT_REGNUM
, fstat
);
1017 /* Mark %st(1) through %st(7) as empty. Since we set the top of
1018 the floating-point register stack to 7, the appropriate value
1019 for the tag word is 0x3fff. */
1020 write_register (FTAG_REGNUM
, 0x3fff);
1024 int low_size
= REGISTER_RAW_SIZE (LOW_RETURN_REGNUM
);
1025 int high_size
= REGISTER_RAW_SIZE (HIGH_RETURN_REGNUM
);
1027 if (len
<= low_size
)
1028 write_register_bytes (REGISTER_BYTE (LOW_RETURN_REGNUM
), valbuf
, len
);
1029 else if (len
<= (low_size
+ high_size
))
1031 write_register_bytes (REGISTER_BYTE (LOW_RETURN_REGNUM
),
1033 write_register_bytes (REGISTER_BYTE (HIGH_RETURN_REGNUM
),
1034 valbuf
+ low_size
, len
- low_size
);
1037 internal_error (__FILE__
, __LINE__
,
1038 "Cannot store return value of %d bytes long.", len
);
1042 /* Extract from an array REGBUF containing the (raw) register state
1043 the address in which a function should return its structure value,
1047 i386_extract_struct_value_address (struct regcache
*regcache
)
1049 /* NOTE: cagney/2002-08-12: Replaced a call to
1050 regcache_raw_read_as_address() with a call to
1051 regcache_cooked_read_unsigned(). The old, ...as_address function
1052 was eventually calling extract_unsigned_integer (via
1053 extract_address) to unpack the registers value. The below is
1054 doing an unsigned extract so that it is functionally equivalent.
1055 The read needs to be cooked as, otherwise, it will never
1056 correctly return the value of a register in the [NUM_REGS
1057 .. NUM_REGS+NUM_PSEUDO_REGS) range. */
1059 regcache_cooked_read_unsigned (regcache
, LOW_RETURN_REGNUM
, &val
);
1064 /* This is the variable that is set with "set struct-convention", and
1065 its legitimate values. */
1066 static const char default_struct_convention
[] = "default";
1067 static const char pcc_struct_convention
[] = "pcc";
1068 static const char reg_struct_convention
[] = "reg";
1069 static const char *valid_conventions
[] =
1071 default_struct_convention
,
1072 pcc_struct_convention
,
1073 reg_struct_convention
,
1076 static const char *struct_convention
= default_struct_convention
;
1079 i386_use_struct_convention (int gcc_p
, struct type
*type
)
1081 enum struct_return struct_return
;
1083 if (struct_convention
== default_struct_convention
)
1084 struct_return
= gdbarch_tdep (current_gdbarch
)->struct_return
;
1085 else if (struct_convention
== pcc_struct_convention
)
1086 struct_return
= pcc_struct_return
;
1088 struct_return
= reg_struct_return
;
1090 return generic_use_struct_convention (struct_return
== reg_struct_return
,
1095 /* Return the GDB type object for the "standard" data type of data in
1096 register REGNUM. Perhaps %esi and %edi should go here, but
1097 potentially they could be used for things other than address. */
1099 static struct type
*
1100 i386_register_virtual_type (int regnum
)
1102 if (regnum
== PC_REGNUM
|| regnum
== FP_REGNUM
|| regnum
== SP_REGNUM
)
1103 return lookup_pointer_type (builtin_type_void
);
1105 if (IS_FP_REGNUM (regnum
))
1106 return builtin_type_i387_ext
;
1108 if (IS_SSE_REGNUM (regnum
))
1109 return builtin_type_vec128i
;
1111 if (mmx_regnum_p (regnum
))
1112 return builtin_type_vec64i
;
1114 return builtin_type_int
;
1117 /* Map a cooked register onto a raw register or memory. For the i386,
1118 the MMX registers need to be mapped onto floating point registers. */
1121 mmx_regnum_to_fp_regnum (struct regcache
*regcache
, int regnum
)
1127 mmxi
= regnum
- MM0_REGNUM
;
1128 regcache_raw_read_unsigned (regcache
, FSTAT_REGNUM
, &fstat
);
1129 tos
= (fstat
>> 11) & 0x7;
1130 fpi
= (mmxi
+ tos
) % 8;
1131 return (FP0_REGNUM
+ fpi
);
1135 i386_pseudo_register_read (struct gdbarch
*gdbarch
, struct regcache
*regcache
,
1136 int regnum
, void *buf
)
1138 if (mmx_regnum_p (regnum
))
1140 char *mmx_buf
= alloca (MAX_REGISTER_RAW_SIZE
);
1141 int fpnum
= mmx_regnum_to_fp_regnum (regcache
, regnum
);
1142 regcache_raw_read (regcache
, fpnum
, mmx_buf
);
1143 /* Extract (always little endian). */
1144 memcpy (buf
, mmx_buf
, REGISTER_RAW_SIZE (regnum
));
1147 regcache_raw_read (regcache
, regnum
, buf
);
1151 i386_pseudo_register_write (struct gdbarch
*gdbarch
, struct regcache
*regcache
,
1152 int regnum
, const void *buf
)
1154 if (mmx_regnum_p (regnum
))
1156 char *mmx_buf
= alloca (MAX_REGISTER_RAW_SIZE
);
1157 int fpnum
= mmx_regnum_to_fp_regnum (regcache
, regnum
);
1159 regcache_raw_read (regcache
, fpnum
, mmx_buf
);
1160 /* ... Modify ... (always little endian). */
1161 memcpy (mmx_buf
, buf
, REGISTER_RAW_SIZE (regnum
));
1163 regcache_raw_write (regcache
, fpnum
, mmx_buf
);
1166 regcache_raw_write (regcache
, regnum
, buf
);
1169 /* Return true iff register REGNUM's virtual format is different from
1170 its raw format. Note that this definition assumes that the host
1171 supports IEEE 32-bit floats, since it doesn't say that SSE
1172 registers need conversion. Even if we can't find a counterexample,
1173 this is still sloppy. */
1176 i386_register_convertible (int regnum
)
1178 return IS_FP_REGNUM (regnum
);
1181 /* Convert data from raw format for register REGNUM in buffer FROM to
1182 virtual format with type TYPE in buffer TO. */
1185 i386_register_convert_to_virtual (int regnum
, struct type
*type
,
1186 char *from
, char *to
)
1188 gdb_assert (IS_FP_REGNUM (regnum
));
1190 /* We only support floating-point values. */
1191 if (TYPE_CODE (type
) != TYPE_CODE_FLT
)
1193 warning ("Cannot convert floating-point register value "
1194 "to non-floating-point type.");
1195 memset (to
, 0, TYPE_LENGTH (type
));
1199 /* Convert to TYPE. This should be a no-op if TYPE is equivalent to
1200 the extended floating-point format used by the FPU. */
1201 convert_typed_floating (from
, builtin_type_i387_ext
, to
, type
);
1204 /* Convert data from virtual format with type TYPE in buffer FROM to
1205 raw format for register REGNUM in buffer TO. */
1208 i386_register_convert_to_raw (struct type
*type
, int regnum
,
1209 char *from
, char *to
)
1211 gdb_assert (IS_FP_REGNUM (regnum
));
1213 /* We only support floating-point values. */
1214 if (TYPE_CODE (type
) != TYPE_CODE_FLT
)
1216 warning ("Cannot convert non-floating-point type "
1217 "to floating-point register value.");
1218 memset (to
, 0, TYPE_LENGTH (type
));
1222 /* Convert from TYPE. This should be a no-op if TYPE is equivalent
1223 to the extended floating-point format used by the FPU. */
1224 convert_typed_floating (from
, type
, to
, builtin_type_i387_ext
);
1228 #ifdef STATIC_TRANSFORM_NAME
1229 /* SunPRO encodes the static variables. This is not related to C++
1230 mangling, it is done for C too. */
1233 sunpro_static_transform_name (char *name
)
1236 if (IS_STATIC_TRANSFORM_NAME (name
))
1238 /* For file-local statics there will be a period, a bunch of
1239 junk (the contents of which match a string given in the
1240 N_OPT), a period and the name. For function-local statics
1241 there will be a bunch of junk (which seems to change the
1242 second character from 'A' to 'B'), a period, the name of the
1243 function, and the name. So just skip everything before the
1245 p
= strrchr (name
, '.');
1251 #endif /* STATIC_TRANSFORM_NAME */
1254 /* Stuff for WIN32 PE style DLL's but is pretty generic really. */
1257 i386_pe_skip_trampoline_code (CORE_ADDR pc
, char *name
)
1259 if (pc
&& read_memory_unsigned_integer (pc
, 2) == 0x25ff) /* jmp *(dest) */
1261 unsigned long indirect
= read_memory_unsigned_integer (pc
+ 2, 4);
1262 struct minimal_symbol
*indsym
=
1263 indirect
? lookup_minimal_symbol_by_pc (indirect
) : 0;
1264 char *symname
= indsym
? SYMBOL_NAME (indsym
) : 0;
1268 if (strncmp (symname
, "__imp_", 6) == 0
1269 || strncmp (symname
, "_imp_", 5) == 0)
1270 return name
? 1 : read_memory_unsigned_integer (indirect
, 4);
1273 return 0; /* Not a trampoline. */
1277 /* Return non-zero if PC and NAME show that we are in a signal
1281 i386_pc_in_sigtramp (CORE_ADDR pc
, char *name
)
1283 return (name
&& strcmp ("_sigtramp", name
) == 0);
1287 /* We have two flavours of disassembly. The machinery on this page
1288 deals with switching between those. */
1291 gdb_print_insn_i386 (bfd_vma memaddr
, disassemble_info
*info
)
1293 if (disassembly_flavor
== att_flavor
)
1294 return print_insn_i386_att (memaddr
, info
);
1295 else if (disassembly_flavor
== intel_flavor
)
1296 return print_insn_i386_intel (memaddr
, info
);
1297 /* Never reached -- disassembly_flavour is always either att_flavor
1299 internal_error (__FILE__
, __LINE__
, "failed internal consistency check");
1303 /* There are a few i386 architecture variants that differ only
1304 slightly from the generic i386 target. For now, we don't give them
1305 their own source file, but include them here. As a consequence,
1306 they'll always be included. */
1308 /* System V Release 4 (SVR4). */
1311 i386_svr4_pc_in_sigtramp (CORE_ADDR pc
, char *name
)
1313 return (name
&& (strcmp ("_sigreturn", name
) == 0
1314 || strcmp ("_sigacthandler", name
) == 0
1315 || strcmp ("sigvechandler", name
) == 0));
1318 /* Get address of the pushed ucontext (sigcontext) on the stack for
1319 all three variants of SVR4 sigtramps. */
1322 i386_svr4_sigcontext_addr (struct frame_info
*frame
)
1324 int sigcontext_offset
= -1;
1327 find_pc_partial_function (frame
->pc
, &name
, NULL
, NULL
);
1330 if (strcmp (name
, "_sigreturn") == 0)
1331 sigcontext_offset
= 132;
1332 else if (strcmp (name
, "_sigacthandler") == 0)
1333 sigcontext_offset
= 80;
1334 else if (strcmp (name
, "sigvechandler") == 0)
1335 sigcontext_offset
= 120;
1338 gdb_assert (sigcontext_offset
!= -1);
1341 return frame
->next
->frame
+ sigcontext_offset
;
1342 return read_register (SP_REGNUM
) + sigcontext_offset
;
1349 i386_go32_pc_in_sigtramp (CORE_ADDR pc
, char *name
)
1351 /* DJGPP doesn't have any special frames for signal handlers. */
1359 i386_elf_init_abi (struct gdbarch_info info
, struct gdbarch
*gdbarch
)
1361 /* We typically use stabs-in-ELF with the DWARF register numbering. */
1362 set_gdbarch_stab_reg_to_regnum (gdbarch
, i386_dwarf_reg_to_regnum
);
1365 /* System V Release 4 (SVR4). */
1368 i386_svr4_init_abi (struct gdbarch_info info
, struct gdbarch
*gdbarch
)
1370 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
1372 /* System V Release 4 uses ELF. */
1373 i386_elf_init_abi (info
, gdbarch
);
1375 /* FIXME: kettenis/20020511: Why do we override this function here? */
1376 set_gdbarch_frame_chain_valid (gdbarch
, generic_func_frame_chain_valid
);
1378 set_gdbarch_pc_in_sigtramp (gdbarch
, i386_svr4_pc_in_sigtramp
);
1379 tdep
->sigcontext_addr
= i386_svr4_sigcontext_addr
;
1380 tdep
->sc_pc_offset
= 14 * 4;
1381 tdep
->sc_sp_offset
= 7 * 4;
1383 tdep
->jb_pc_offset
= 20;
1389 i386_go32_init_abi (struct gdbarch_info info
, struct gdbarch
*gdbarch
)
1391 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
1393 set_gdbarch_pc_in_sigtramp (gdbarch
, i386_go32_pc_in_sigtramp
);
1395 tdep
->jb_pc_offset
= 36;
1401 i386_nw_init_abi (struct gdbarch_info info
, struct gdbarch
*gdbarch
)
1403 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
1405 /* FIXME: kettenis/20020511: Why do we override this function here? */
1406 set_gdbarch_frame_chain_valid (gdbarch
, generic_func_frame_chain_valid
);
1408 tdep
->jb_pc_offset
= 24;
1412 static struct gdbarch
*
1413 i386_gdbarch_init (struct gdbarch_info info
, struct gdbarch_list
*arches
)
1415 struct gdbarch_tdep
*tdep
;
1416 struct gdbarch
*gdbarch
;
1417 enum gdb_osabi osabi
= GDB_OSABI_UNKNOWN
;
1419 /* Try to determine the OS ABI of the object we're loading. */
1420 if (info
.abfd
!= NULL
)
1421 osabi
= gdbarch_lookup_osabi (info
.abfd
);
1423 /* Find a candidate among extant architectures. */
1424 for (arches
= gdbarch_list_lookup_by_info (arches
, &info
);
1426 arches
= gdbarch_list_lookup_by_info (arches
->next
, &info
))
1428 /* Make sure the OS ABI selection matches. */
1429 tdep
= gdbarch_tdep (arches
->gdbarch
);
1430 if (tdep
&& tdep
->osabi
== osabi
)
1431 return arches
->gdbarch
;
1434 /* Allocate space for the new architecture. */
1435 tdep
= XMALLOC (struct gdbarch_tdep
);
1436 gdbarch
= gdbarch_alloc (&info
, tdep
);
1438 tdep
->osabi
= osabi
;
1440 /* The i386 default settings don't include the SSE registers.
1441 FIXME: kettenis/20020614: They do include the FPU registers for
1442 now, which probably is not quite right. */
1443 tdep
->num_xmm_regs
= 0;
1445 tdep
->jb_pc_offset
= -1;
1446 tdep
->struct_return
= pcc_struct_return
;
1447 tdep
->sigtramp_start
= 0;
1448 tdep
->sigtramp_end
= 0;
1449 tdep
->sigcontext_addr
= NULL
;
1450 tdep
->sc_pc_offset
= -1;
1451 tdep
->sc_sp_offset
= -1;
1453 /* The format used for `long double' on almost all i386 targets is
1454 the i387 extended floating-point format. In fact, of all targets
1455 in the GCC 2.95 tree, only OSF/1 does it different, and insists
1456 on having a `long double' that's not `long' at all. */
1457 set_gdbarch_long_double_format (gdbarch
, &floatformat_i387_ext
);
1459 /* Although the i386 extended floating-point has only 80 significant
1460 bits, a `long double' actually takes up 96, probably to enforce
1462 set_gdbarch_long_double_bit (gdbarch
, 96);
1464 /* NOTE: tm-i386aix.h, tm-i386bsd.h, tm-i386os9k.h, tm-ptx.h,
1465 tm-symmetry.h currently override this. Sigh. */
1466 set_gdbarch_num_regs (gdbarch
, I386_NUM_GREGS
+ I386_NUM_FREGS
);
1468 set_gdbarch_sp_regnum (gdbarch
, 4);
1469 set_gdbarch_fp_regnum (gdbarch
, 5);
1470 set_gdbarch_pc_regnum (gdbarch
, 8);
1471 set_gdbarch_ps_regnum (gdbarch
, 9);
1472 set_gdbarch_fp0_regnum (gdbarch
, 16);
1474 /* Use the "default" register numbering scheme for stabs and COFF. */
1475 set_gdbarch_stab_reg_to_regnum (gdbarch
, i386_stab_reg_to_regnum
);
1476 set_gdbarch_sdb_reg_to_regnum (gdbarch
, i386_stab_reg_to_regnum
);
1478 /* Use the DWARF register numbering scheme for DWARF and DWARF 2. */
1479 set_gdbarch_dwarf_reg_to_regnum (gdbarch
, i386_dwarf_reg_to_regnum
);
1480 set_gdbarch_dwarf2_reg_to_regnum (gdbarch
, i386_dwarf_reg_to_regnum
);
1482 /* We don't define ECOFF_REG_TO_REGNUM, since ECOFF doesn't seem to
1483 be in use on any of the supported i386 targets. */
1485 set_gdbarch_register_name (gdbarch
, i386_register_name
);
1486 set_gdbarch_register_size (gdbarch
, 4);
1487 set_gdbarch_register_bytes (gdbarch
, I386_SIZEOF_GREGS
+ I386_SIZEOF_FREGS
);
1488 set_gdbarch_max_register_raw_size (gdbarch
, I386_MAX_REGISTER_SIZE
);
1489 set_gdbarch_max_register_virtual_size (gdbarch
, I386_MAX_REGISTER_SIZE
);
1490 set_gdbarch_register_virtual_type (gdbarch
, i386_register_virtual_type
);
1492 set_gdbarch_print_float_info (gdbarch
, i387_print_float_info
);
1494 set_gdbarch_get_longjmp_target (gdbarch
, i386_get_longjmp_target
);
1496 set_gdbarch_use_generic_dummy_frames (gdbarch
, 1);
1498 /* Call dummy code. */
1499 set_gdbarch_call_dummy_location (gdbarch
, AT_ENTRY_POINT
);
1500 set_gdbarch_call_dummy_address (gdbarch
, entry_point_address
);
1501 set_gdbarch_call_dummy_start_offset (gdbarch
, 0);
1502 set_gdbarch_call_dummy_breakpoint_offset (gdbarch
, 0);
1503 set_gdbarch_call_dummy_breakpoint_offset_p (gdbarch
, 1);
1504 set_gdbarch_call_dummy_length (gdbarch
, 0);
1505 set_gdbarch_call_dummy_p (gdbarch
, 1);
1506 set_gdbarch_call_dummy_words (gdbarch
, NULL
);
1507 set_gdbarch_sizeof_call_dummy_words (gdbarch
, 0);
1508 set_gdbarch_call_dummy_stack_adjust_p (gdbarch
, 0);
1509 set_gdbarch_fix_call_dummy (gdbarch
, generic_fix_call_dummy
);
1511 set_gdbarch_register_convertible (gdbarch
, i386_register_convertible
);
1512 set_gdbarch_register_convert_to_virtual (gdbarch
,
1513 i386_register_convert_to_virtual
);
1514 set_gdbarch_register_convert_to_raw (gdbarch
, i386_register_convert_to_raw
);
1516 set_gdbarch_get_saved_register (gdbarch
, generic_unwind_get_saved_register
);
1517 set_gdbarch_push_arguments (gdbarch
, i386_push_arguments
);
1519 set_gdbarch_pc_in_call_dummy (gdbarch
, pc_in_call_dummy_at_entry_point
);
1521 /* "An argument's size is increased, if necessary, to make it a
1522 multiple of [32-bit] words. This may require tail padding,
1523 depending on the size of the argument" -- from the x86 ABI. */
1524 set_gdbarch_parm_boundary (gdbarch
, 32);
1526 set_gdbarch_extract_return_value (gdbarch
, i386_extract_return_value
);
1527 set_gdbarch_push_arguments (gdbarch
, i386_push_arguments
);
1528 set_gdbarch_push_dummy_frame (gdbarch
, generic_push_dummy_frame
);
1529 set_gdbarch_push_return_address (gdbarch
, i386_push_return_address
);
1530 set_gdbarch_pop_frame (gdbarch
, i386_pop_frame
);
1531 set_gdbarch_store_struct_return (gdbarch
, i386_store_struct_return
);
1532 set_gdbarch_store_return_value (gdbarch
, i386_store_return_value
);
1533 set_gdbarch_extract_struct_value_address (gdbarch
,
1534 i386_extract_struct_value_address
);
1535 set_gdbarch_use_struct_convention (gdbarch
, i386_use_struct_convention
);
1537 set_gdbarch_frame_init_saved_regs (gdbarch
, i386_frame_init_saved_regs
);
1538 set_gdbarch_skip_prologue (gdbarch
, i386_skip_prologue
);
1540 /* Stack grows downward. */
1541 set_gdbarch_inner_than (gdbarch
, core_addr_lessthan
);
1543 set_gdbarch_breakpoint_from_pc (gdbarch
, i386_breakpoint_from_pc
);
1544 set_gdbarch_decr_pc_after_break (gdbarch
, 1);
1545 set_gdbarch_function_start_offset (gdbarch
, 0);
1547 /* The following redefines make backtracing through sigtramp work.
1548 They manufacture a fake sigtramp frame and obtain the saved pc in
1549 sigtramp from the sigcontext structure which is pushed by the
1550 kernel on the user stack, along with a pointer to it. */
1552 set_gdbarch_frame_args_skip (gdbarch
, 8);
1553 set_gdbarch_frameless_function_invocation (gdbarch
,
1554 i386_frameless_function_invocation
);
1555 set_gdbarch_frame_chain (gdbarch
, i386_frame_chain
);
1556 set_gdbarch_frame_chain_valid (gdbarch
, generic_file_frame_chain_valid
);
1557 set_gdbarch_frame_saved_pc (gdbarch
, i386_frame_saved_pc
);
1558 set_gdbarch_frame_args_address (gdbarch
, default_frame_address
);
1559 set_gdbarch_frame_locals_address (gdbarch
, default_frame_address
);
1560 set_gdbarch_saved_pc_after_call (gdbarch
, i386_saved_pc_after_call
);
1561 set_gdbarch_frame_num_args (gdbarch
, i386_frame_num_args
);
1562 set_gdbarch_pc_in_sigtramp (gdbarch
, i386_pc_in_sigtramp
);
1564 /* Wire in the MMX registers. */
1565 set_gdbarch_num_pseudo_regs (gdbarch
, mmx_num_regs
);
1566 set_gdbarch_pseudo_register_read (gdbarch
, i386_pseudo_register_read
);
1567 set_gdbarch_pseudo_register_write (gdbarch
, i386_pseudo_register_write
);
1569 /* Hook in ABI-specific overrides, if they have been registered. */
1570 gdbarch_init_osabi (info
, gdbarch
, osabi
);
1575 static enum gdb_osabi
1576 i386_coff_osabi_sniffer (bfd
*abfd
)
1578 if (strcmp (bfd_get_target (abfd
), "coff-go32-exe") == 0
1579 || strcmp (bfd_get_target (abfd
), "coff-go32") == 0)
1580 return GDB_OSABI_GO32
;
1582 return GDB_OSABI_UNKNOWN
;
1585 static enum gdb_osabi
1586 i386_nlm_osabi_sniffer (bfd
*abfd
)
1588 return GDB_OSABI_NETWARE
;
1592 /* Provide a prototype to silence -Wmissing-prototypes. */
1593 void _initialize_i386_tdep (void);
1596 _initialize_i386_tdep (void)
1598 register_gdbarch_init (bfd_arch_i386
, i386_gdbarch_init
);
1600 tm_print_insn
= gdb_print_insn_i386
;
1601 tm_print_insn_info
.mach
= bfd_lookup_arch (bfd_arch_i386
, 0)->mach
;
1603 /* Add the variable that controls the disassembly flavor. */
1605 struct cmd_list_element
*new_cmd
;
1607 new_cmd
= add_set_enum_cmd ("disassembly-flavor", no_class
,
1609 &disassembly_flavor
,
1611 Set the disassembly flavor, the valid values are \"att\" and \"intel\", \
1612 and the default value is \"att\".",
1614 add_show_from_set (new_cmd
, &showlist
);
1617 /* Add the variable that controls the convention for returning
1620 struct cmd_list_element
*new_cmd
;
1622 new_cmd
= add_set_enum_cmd ("struct-convention", no_class
,
1624 &struct_convention
, "\
1625 Set the convention for returning small structs, valid values \
1626 are \"default\", \"pcc\" and \"reg\", and the default value is \"default\".",
1628 add_show_from_set (new_cmd
, &showlist
);
1631 gdbarch_register_osabi_sniffer (bfd_arch_i386
, bfd_target_coff_flavour
,
1632 i386_coff_osabi_sniffer
);
1633 gdbarch_register_osabi_sniffer (bfd_arch_i386
, bfd_target_nlm_flavour
,
1634 i386_nlm_osabi_sniffer
);
1636 gdbarch_register_osabi (bfd_arch_i386
, GDB_OSABI_SVR4
,
1637 i386_svr4_init_abi
);
1638 gdbarch_register_osabi (bfd_arch_i386
, GDB_OSABI_GO32
,
1639 i386_go32_init_abi
);
1640 gdbarch_register_osabi (bfd_arch_i386
, GDB_OSABI_NETWARE
,