2005-02-07 Andrew Cagney <cagney@gnu.org>
[external/binutils.git] / gdb / value.h
1 /* Definitions for values of C expressions, for GDB.
2
3    Copyright 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
4    1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005
5    Free Software Foundation, Inc.
6
7    This file is part of GDB.
8
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 2 of the License, or
12    (at your option) any later version.
13
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18
19    You should have received a copy of the GNU General Public License
20    along with this program; if not, write to the Free Software
21    Foundation, Inc., 59 Temple Place - Suite 330,
22    Boston, MA 02111-1307, USA.  */
23
24 #if !defined (VALUE_H)
25 #define VALUE_H 1
26
27 #include "doublest.h"
28 #include "frame.h"              /* For struct frame_id.  */
29
30 struct block;
31 struct expression;
32 struct regcache;
33 struct symbol;
34 struct type;
35 struct ui_file;
36
37 /* The structure which defines the type of a value.  It should never
38    be possible for a program lval value to survive over a call to the
39    inferior (i.e. to be put into the history list or an internal
40    variable).  */
41
42 struct value
43 {
44   /* Type of value; either not an lval, or one of the various
45      different possible kinds of lval.  */
46   enum lval_type lval;
47
48   /* Is it modifiable?  Only relevant if lval != not_lval.  */
49   int modifiable;
50
51   /* Location of value (if lval).  */
52   union
53   {
54     /* If lval == lval_memory, this is the address in the inferior.
55        If lval == lval_register, this is the byte offset into the
56        registers structure.  */
57     CORE_ADDR address;
58
59     /* Pointer to internal variable.  */
60     struct internalvar *internalvar;
61   } location;
62
63   /* Describes offset of a value within lval of a structure in bytes.
64      If lval == lval_memory, this is an offset to the address.  If
65      lval == lval_register, this is a further offset from
66      location.address within the registers structure.  Note also the
67      member embedded_offset below.  */
68   int offset;
69
70   /* Only used for bitfields; number of bits contained in them.  */
71   int bitsize;
72
73   /* Only used for bitfields; position of start of field.  For
74      BITS_BIG_ENDIAN=0 targets, it is the position of the LSB.  For
75      BITS_BIG_ENDIAN=1 targets, it is the position of the MSB. */
76   int bitpos;
77
78   /* Frame register value is relative to.  This will be described in
79      the lval enum above as "lval_register".  */
80   struct frame_id frame_id;
81
82   /* Type of the value.  */
83   struct type *type;
84
85   /* If a value represents a C++ object, then the `type' field gives
86      the object's compile-time type.  If the object actually belongs
87      to some class derived from `type', perhaps with other base
88      classes and additional members, then `type' is just a subobject
89      of the real thing, and the full object is probably larger than
90      `type' would suggest.
91
92      If `type' is a dynamic class (i.e. one with a vtable), then GDB
93      can actually determine the object's run-time type by looking at
94      the run-time type information in the vtable.  When this
95      information is available, we may elect to read in the entire
96      object, for several reasons:
97
98      - When printing the value, the user would probably rather see the
99      full object, not just the limited portion apparent from the
100      compile-time type.
101
102      - If `type' has virtual base classes, then even printing `type'
103      alone may require reaching outside the `type' portion of the
104      object to wherever the virtual base class has been stored.
105
106      When we store the entire object, `enclosing_type' is the run-time
107      type -- the complete object -- and `embedded_offset' is the
108      offset of `type' within that larger type, in bytes.  The
109      value_contents() macro takes `embedded_offset' into account, so
110      most GDB code continues to see the `type' portion of the value,
111      just as the inferior would.
112
113      If `type' is a pointer to an object, then `enclosing_type' is a
114      pointer to the object's run-time type, and `pointed_to_offset' is
115      the offset in bytes from the full object to the pointed-to object
116      -- that is, the value `embedded_offset' would have if we followed
117      the pointer and fetched the complete object.  (I don't really see
118      the point.  Why not just determine the run-time type when you
119      indirect, and avoid the special case?  The contents don't matter
120      until you indirect anyway.)
121
122      If we're not doing anything fancy, `enclosing_type' is equal to
123      `type', and `embedded_offset' is zero, so everything works
124      normally.  */
125   struct type *enclosing_type;
126   int embedded_offset;
127   int pointed_to_offset;
128
129   /* Values are stored in a chain, so that they can be deleted easily
130      over calls to the inferior.  Values assigned to internal
131      variables or put into the value history are taken off this
132      list.  */
133   struct value *next;
134
135   /* Register number if the value is from a register.  */
136   short regnum;
137
138   /* If zero, contents of this value are in the contents field.  If
139      nonzero, contents are in inferior memory at address in the
140      location.address field plus the offset field (and the lval field
141      should be lval_memory).
142
143      WARNING: This field is used by the code which handles watchpoints
144      (see breakpoint.c) to decide whether a particular value can be
145      watched by hardware watchpoints.  If the lazy flag is set for
146      some member of a value chain, it is assumed that this member of
147      the chain doesn't need to be watched as part of watching the
148      value itself.  This is how GDB avoids watching the entire struct
149      or array when the user wants to watch a single struct member or
150      array element.  If you ever change the way lazy flag is set and
151      reset, be sure to consider this use as well!  */
152   char lazy;
153
154   /* If nonzero, this is the value of a variable which does not
155      actually exist in the program.  */
156   char optimized_out;
157
158   /* Actual contents of the value.  For use of this value; setting it
159      uses the stuff above.  Not valid if lazy is nonzero.  Target
160      byte-order.  We force it to be aligned properly for any possible
161      value.  Note that a value therefore extends beyond what is
162      declared here.  */
163   union
164   {
165     bfd_byte contents[1];
166     DOUBLEST force_doublest_align;
167     LONGEST force_longest_align;
168     CORE_ADDR force_core_addr_align;
169     void *force_pointer_align;
170   } aligner;
171   /* Do not add any new members here -- contents above will trash
172      them.  */
173 };
174
175
176 /* Values are stored in a chain, so that they can be deleted easily
177    over calls to the inferior.  Values assigned to internal variables
178    or put into the value history are taken off this list.  */
179 struct value *value_next (struct value *);
180
181 extern struct type *value_type (struct value *);
182 /* This is being used to change the type of an existing value, that
183    code should instead be creating a new value with the changed type
184    (but possibly shared content).  */
185 extern void deprecated_set_value_type (struct value *value,
186                                        struct type *type);
187 extern int value_bitsize (struct value *);
188 extern int value_bitpos (struct value *);
189 extern int value_offset (struct value *);
190
191 /* The comment from "struct value" reads: ``Is it modifiable?  Only
192    relevant if lval != not_lval.''.  Shouldn't the value instead be
193    not_lval and be done with it?  */
194 extern int deprecated_value_modifiable (struct value *value);
195 extern void deprecated_set_value_modifiable (struct value *value,
196                                              int modifiable);
197
198 extern struct type *value_enclosing_type (struct value *);
199 extern int value_lazy (struct value *);
200 extern void set_value_lazy (struct value *value, int val);
201
202 /* value_contents() and value_contents_raw() both return the address
203    of the gdb buffer used to hold a copy of the contents of the lval.
204    value_contents() is used when the contents of the buffer are needed
205    -- it uses value_fetch_lazy() to load the buffer from the process
206    being debugged if it hasn't already been loaded
207    (value_contents_writeable() is used when a writeable but fetched
208    buffer is required)..  value_contents_raw() is used when data is
209    being stored into the buffer, or when it is certain that the
210    contents of the buffer are valid.
211
212    Note: The contents pointer is adjusted by the offset required to
213    get to the real subobject, if the value happens to represent
214    something embedded in a larger run-time object.  */
215
216 extern bfd_byte *value_contents_raw (struct value *);
217 extern const bfd_byte *value_contents (struct value *);
218 extern bfd_byte *value_contents_writeable (struct value *);
219
220 /* The ALL variants of the above two macros do not adjust the returned
221    pointer by the embedded_offset value.  */
222
223 extern bfd_byte *value_contents_all_raw (struct value *);
224 extern const bfd_byte *value_contents_all (struct value *);
225
226 extern int value_fetch_lazy (struct value *val);
227
228 extern int value_optimized_out (struct value *value);
229 extern void set_value_optimized_out (struct value *value, int val);
230 extern int value_embedded_offset (struct value *value);
231 extern void set_value_embedded_offset (struct value *value, int val);
232 extern int value_pointed_to_offset (struct value *value);
233 extern void set_value_pointed_to_offset (struct value *value, int val);
234
235 /* While the following fields are per- VALUE .CONTENT .PIECE (i.e., a
236    single value might have multiple LVALs), this hacked interface is
237    limited to just the first PIECE.  Expect further change.  */
238 extern enum lval_type *deprecated_value_lval_hack (struct value *);
239 #define VALUE_LVAL(val) (*deprecated_value_lval_hack (val))
240 extern CORE_ADDR *deprecated_value_address_hack (struct value *);
241 #define VALUE_ADDRESS(val) (*deprecated_value_address_hack (val))
242 extern struct internalvar **deprecated_value_internalvar_hack (struct value *);
243 #define VALUE_INTERNALVAR(val) (*deprecated_value_internalvar_hack (val))
244 extern struct frame_id *deprecated_value_frame_id_hack (struct value *);
245 #define VALUE_FRAME_ID(val) (*deprecated_value_frame_id_hack (val))
246 extern short *deprecated_value_regnum_hack (struct value *);
247 #define VALUE_REGNUM(val) (*deprecated_value_regnum_hack (val))
248
249 /* Convert a REF to the object referenced.  */
250
251 extern struct value *coerce_ref (struct value *value);
252
253 /* If ARG is an array, convert it to a pointer.
254    If ARG is an enum, convert it to an integer.
255    If ARG is a function, convert it to a function pointer.
256
257    References are dereferenced.  */
258
259 extern struct value *coerce_array (struct value *value);
260 extern struct value *coerce_number (struct value *value);
261
262 /* If ARG is an enum, convert it to an integer.  */
263
264 extern struct value *coerce_enum (struct value *value);
265
266 /* Internal variables (variables for convenience of use of debugger)
267    are recorded as a chain of these structures.  */
268
269 struct internalvar
270 {
271   struct internalvar *next;
272   char *name;
273   struct value *value;
274 };
275
276 /* Pointer to member function.  Depends on compiler implementation.  */
277
278 #define METHOD_PTR_IS_VIRTUAL(ADDR)  ((ADDR) & 0x80000000)
279 #define METHOD_PTR_FROM_VOFFSET(OFFSET) (0x80000000 + (OFFSET))
280 #define METHOD_PTR_TO_VOFFSET(ADDR) (~0x80000000 & (ADDR))
281 \f
282
283 #include "symtab.h"
284 #include "gdbtypes.h"
285 #include "expression.h"
286
287 struct frame_info;
288 struct fn_field;
289
290 extern void print_address_demangle (CORE_ADDR, struct ui_file *, int);
291
292 extern LONGEST value_as_long (struct value *val);
293 extern DOUBLEST value_as_double (struct value *val);
294 extern CORE_ADDR value_as_address (struct value *val);
295
296 extern LONGEST unpack_long (struct type *type, const char *valaddr);
297 extern DOUBLEST unpack_double (struct type *type, const char *valaddr,
298                                int *invp);
299 extern CORE_ADDR unpack_pointer (struct type *type, const char *valaddr);
300 extern LONGEST unpack_field_as_long (struct type *type, const char *valaddr,
301                                      int fieldno);
302
303 extern struct value *value_from_longest (struct type *type, LONGEST num);
304 extern struct value *value_from_pointer (struct type *type, CORE_ADDR addr);
305 extern struct value *value_from_double (struct type *type, DOUBLEST num);
306 extern struct value *value_from_string (char *string);
307
308 extern struct value *value_at (struct type *type, CORE_ADDR addr);
309 extern struct value *value_at_lazy (struct type *type, CORE_ADDR addr);
310
311 extern struct value *value_from_register (struct type *type, int regnum,
312                                           struct frame_info *frame);
313
314 extern struct value *value_of_variable (struct symbol *var, struct block *b);
315
316 extern struct value *value_of_register (int regnum, struct frame_info *frame);
317
318 extern int symbol_read_needs_frame (struct symbol *);
319
320 extern struct value *read_var_value (struct symbol *var,
321                                      struct frame_info *frame);
322
323 extern struct value *locate_var_value (struct symbol *var,
324                                        struct frame_info *frame);
325
326 extern struct value *allocate_value (struct type *type);
327
328 extern struct value *allocate_repeat_value (struct type *type, int count);
329
330 extern struct value *value_change_enclosing_type (struct value *val,
331                                                   struct type *new_type);
332
333 extern struct value *value_mark (void);
334
335 extern void value_free_to_mark (struct value *mark);
336
337 extern struct value *value_string (char *ptr, int len);
338 extern struct value *value_bitstring (char *ptr, int len);
339
340 extern struct value *value_array (int lowbound, int highbound,
341                                   struct value **elemvec);
342
343 extern struct value *value_concat (struct value *arg1, struct value *arg2);
344
345 extern struct value *value_binop (struct value *arg1, struct value *arg2,
346                                   enum exp_opcode op);
347
348 extern struct value *value_add (struct value *arg1, struct value *arg2);
349
350 extern struct value *value_sub (struct value *arg1, struct value *arg2);
351
352 extern struct value *value_coerce_array (struct value *arg1);
353
354 extern struct value *value_coerce_function (struct value *arg1);
355
356 extern struct value *value_ind (struct value *arg1);
357
358 extern struct value *value_addr (struct value *arg1);
359
360 extern struct value *value_assign (struct value *toval,
361                                    struct value *fromval);
362
363 extern struct value *value_neg (struct value *arg1);
364
365 extern struct value *value_complement (struct value *arg1);
366
367 extern struct value *value_struct_elt (struct value **argp,
368                                        struct value **args,
369                                        char *name, int *static_memfuncp,
370                                        char *err);
371
372 extern struct value *value_aggregate_elt (struct type *curtype,
373                                           char *name, enum noside noside);
374
375 extern struct value *value_static_field (struct type *type, int fieldno);
376
377 extern struct fn_field *value_find_oload_method_list (struct value **, char *,
378                                                       int, int *,
379                                                       struct type **, int *);
380
381 extern int find_overload_match (struct type **arg_types, int nargs,
382                                 char *name, int method, int lax,
383                                 struct value **objp, struct symbol *fsym,
384                                 struct value **valp, struct symbol **symp,
385                                 int *staticp);
386
387 extern struct value *value_field (struct value *arg1, int fieldno);
388
389 extern struct value *value_primitive_field (struct value *arg1, int offset,
390                                             int fieldno,
391                                             struct type *arg_type);
392
393
394 extern struct type *value_rtti_target_type (struct value *, int *, int *,
395                                             int *);
396
397 extern struct value *value_full_object (struct value *, struct type *, int,
398                                         int, int);
399
400 extern struct value *value_cast (struct type *type, struct value *arg2);
401
402 extern struct value *value_zero (struct type *type, enum lval_type lv);
403
404 extern struct value *value_repeat (struct value *arg1, int count);
405
406 extern struct value *value_subscript (struct value *array, struct value *idx);
407
408 extern struct value *register_value_being_returned (struct type *valtype,
409                                                     struct regcache *retbuf);
410
411 extern struct value *value_in (struct value *element, struct value *set);
412
413 extern int value_bit_index (struct type *type, const bfd_byte *addr,
414                             int index);
415
416 extern int using_struct_return (struct type *value_type, int gcc_p);
417
418 extern struct value *evaluate_expression (struct expression *exp);
419
420 extern struct value *evaluate_type (struct expression *exp);
421
422 extern struct value *evaluate_subexp_with_coercion (struct expression *,
423                                                     int *, enum noside);
424
425 extern struct value *parse_and_eval (char *exp);
426
427 extern struct value *parse_to_comma_and_eval (char **expp);
428
429 extern struct type *parse_and_eval_type (char *p, int length);
430
431 extern CORE_ADDR parse_and_eval_address (char *exp);
432
433 extern CORE_ADDR parse_and_eval_address_1 (char **expptr);
434
435 extern LONGEST parse_and_eval_long (char *exp);
436
437 extern struct value *access_value_history (int num);
438
439 extern struct value *value_of_internalvar (struct internalvar *var);
440
441 extern void set_internalvar (struct internalvar *var, struct value *val);
442
443 extern void set_internalvar_component (struct internalvar *var,
444                                        int offset,
445                                        int bitpos, int bitsize,
446                                        struct value *newvalue);
447
448 extern struct internalvar *lookup_internalvar (char *name);
449
450 extern int value_equal (struct value *arg1, struct value *arg2);
451
452 extern int value_less (struct value *arg1, struct value *arg2);
453
454 extern int value_logical_not (struct value *arg1);
455
456 /* C++ */
457
458 extern struct value *value_of_this (int complain);
459
460 extern struct value *value_x_binop (struct value *arg1, struct value *arg2,
461                                     enum exp_opcode op,
462                                     enum exp_opcode otherop,
463                                     enum noside noside);
464
465 extern struct value *value_x_unop (struct value *arg1, enum exp_opcode op,
466                                    enum noside noside);
467
468 extern struct value *value_fn_field (struct value **arg1p, struct fn_field *f,
469                                      int j, struct type *type, int offset);
470
471 extern int binop_user_defined_p (enum exp_opcode op, struct value *arg1,
472                                  struct value *arg2);
473
474 extern int unop_user_defined_p (enum exp_opcode op, struct value *arg1);
475
476 extern int destructor_name_p (const char *name, const struct type *type);
477
478 #define value_free(val) xfree (val)
479
480 extern void free_all_values (void);
481
482 extern void release_value (struct value *val);
483
484 extern int record_latest_value (struct value *val);
485
486 extern void modify_field (char *addr, LONGEST fieldval, int bitpos,
487                           int bitsize);
488
489 extern void type_print (struct type *type, char *varstring,
490                         struct ui_file *stream, int show);
491
492 extern char *baseclass_addr (struct type *type, int index, char *valaddr,
493                              struct value **valuep, int *errp);
494
495 extern void print_longest (struct ui_file *stream, int format,
496                            int use_local, LONGEST val);
497
498 extern void print_floating (const bfd_byte *valaddr, struct type *type,
499                             struct ui_file *stream);
500
501 extern int value_print (struct value *val, struct ui_file *stream, int format,
502                         enum val_prettyprint pretty);
503
504 extern void value_print_array_elements (struct value *val,
505                                         struct ui_file *stream, int format,
506                                         enum val_prettyprint pretty);
507
508 extern struct value *value_release_to_mark (struct value *mark);
509
510 extern int val_print (struct type *type, const bfd_byte *valaddr,
511                       int embedded_offset, CORE_ADDR address,
512                       struct ui_file *stream, int format,
513                       int deref_ref, int recurse,
514                       enum val_prettyprint pretty);
515
516 extern int val_print_string (CORE_ADDR addr, int len, int width,
517                              struct ui_file *stream);
518
519 extern void print_variable_value (struct symbol *var,
520                                   struct frame_info *frame,
521                                   struct ui_file *stream);
522
523 extern int check_field (struct value *, const char *);
524
525 extern void typedef_print (struct type *type, struct symbol *news,
526                            struct ui_file *stream);
527
528 extern char *internalvar_name (struct internalvar *var);
529
530 extern void clear_value_history (void);
531
532 extern void clear_internalvars (void);
533
534 /* From values.c */
535
536 extern struct value *value_copy (struct value *);
537
538 /* From valops.c */
539
540 extern struct value *varying_to_slice (struct value *);
541
542 extern struct value *value_slice (struct value *, int, int);
543
544 extern struct value *value_literal_complex (struct value *, struct value *,
545                                             struct type *);
546
547 extern void find_rt_vbase_offset (struct type *, struct type *,
548                                   const bfd_byte *, int, int *, int *);
549
550 extern struct value *find_function_in_inferior (const char *);
551
552 extern struct value *value_allocate_space_in_inferior (int);
553
554 extern struct value *value_of_local (const char *name, int complain);
555
556 #endif /* !defined (VALUE_H) */