darkkirb/old-cross-binutils
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity
old-cross-binutils/gdb/ax-gdb.c

2801 lines
85 KiB
C
Raw Normal View History

2003-01-13 Andrew Cagney <ac131313@redhat.com> * ax-gdb.c, c-valprint.c, charset.c, corefile.c: Update copyright. * demangle.c, disasm.c, dwarf2cfi.c, dwarfread.c: Update copyright. * elfread.c, eval.c, expprint.c, expression.h: Update copyright. * f-typeprint.c, findvar.c, gcore.c, gdb_mbuild.sh: Update copyright. * gdbtypes.h, gnu-v2-abi.c, inferior.h, inftarg.c: Update copyright. * language.c, language.h, m32r-tdep.c: Update copyright. * mn10200-tdep.c, scm-lang.c, scm-lang.h: Update copyright. * somsolib.c, somsolib.h, symfile.c, symtab.h: Update copyright. * thread-db.c, typeprint.c, utils.c, valarith.c: Update copyright. * values.c, win32-nat.c, x86-64-linux-nat.c: Update copyright. * x86-64-linux-tdep.c, z8k-tdep.c: Update copyright. * cli/cli-decode.h, config/h8500/tm-h8500.h: Update copyright. Index: mi/ChangeLog 2003-01-13 Andrew Cagney <ac131313@redhat.com> * mi-cmd-env.c: Update copyright.
2003-01-14 00:49:06 +00:00
/* GDB-specific functions for operating on agent expressions.
Update years in copyright notice for the GDB files. Two modifications: 1. The addition of 2013 to the copyright year range for every file; 2. The use of a single year range, instead of potentially multiple year ranges, as approved by the FSF.
2013-01-01 06:33:28 +00:00
Copyright (C) 1998-2013 Free Software Foundation, Inc.
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
This file is part of GDB.
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
Switch the license of all .c files to GPLv3. Switch the license of all .h files to GPLv3. Switch the license of all .cc files to GPLv3.
2007-08-23 18:08:50 +00:00
the Free Software Foundation; either version 3 of the License, or
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
(at your option) any later version.
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
You should have received a copy of the GNU General Public License
Switch the license of all .c files to GPLv3. Switch the license of all .h files to GPLv3. Switch the license of all .cc files to GPLv3.
2007-08-23 18:08:50 +00:00
along with this program. If not, see <http://www.gnu.org/licenses/>. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
#include "defs.h"
#include "symtab.h"
#include "symfile.h"
#include "gdbtypes.h"
* language.c (pointer_type): Un-comment out. * ax-gdb.c: Include language.h, use pointer_type throughout instead of testing TYPE_CODE_PTR. (gen_fetch): Include TYPE_CODE_REF. (gen_cast): Ditto.
2009-12-29 23:57:59 +00:00
#include "language.h"
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
#include "value.h"
#include "expression.h"
#include "command.h"
#include "gdbcmd.h"
#include "frame.h"
#include "target.h"
#include "ax.h"
#include "ax-gdb.h"
remove gdb_string.h This removes gdb_string.h. This patch is purely mechanical. I created it by running the two commands: git rm common/gdb_string.h perl -pi -e's/"gdb_string.h"/<string.h>/;' *.[chyl] */*.[chyl] 2013-11-18 Tom Tromey <tromey@redhat.com> * common/gdb_string.h: Remove. * aarch64-tdep.c: Use string.h, not gdb_string.h. * ada-exp.y: Use string.h, not gdb_string.h. * ada-lang.c: Use string.h, not gdb_string.h. * ada-lex.l: Use string.h, not gdb_string.h. * ada-typeprint.c: Use string.h, not gdb_string.h. * ada-valprint.c: Use string.h, not gdb_string.h. * aix-thread.c: Use string.h, not gdb_string.h. * alpha-linux-tdep.c: Use string.h, not gdb_string.h. * alpha-mdebug-tdep.c: Use string.h, not gdb_string.h. * alpha-nat.c: Use string.h, not gdb_string.h. * alpha-osf1-tdep.c: Use string.h, not gdb_string.h. * alpha-tdep.c: Use string.h, not gdb_string.h. * alphanbsd-tdep.c: Use string.h, not gdb_string.h. * amd64-dicos-tdep.c: Use string.h, not gdb_string.h. * amd64-linux-nat.c: Use string.h, not gdb_string.h. * amd64-linux-tdep.c: Use string.h, not gdb_string.h. * amd64-nat.c: Use string.h, not gdb_string.h. * amd64-sol2-tdep.c: Use string.h, not gdb_string.h. * amd64fbsd-tdep.c: Use string.h, not gdb_string.h. * amd64obsd-tdep.c: Use string.h, not gdb_string.h. * arch-utils.c: Use string.h, not gdb_string.h. * arm-linux-nat.c: Use string.h, not gdb_string.h. * arm-linux-tdep.c: Use string.h, not gdb_string.h. * arm-tdep.c: Use string.h, not gdb_string.h. * arm-wince-tdep.c: Use string.h, not gdb_string.h. * armbsd-tdep.c: Use string.h, not gdb_string.h. * armnbsd-nat.c: Use string.h, not gdb_string.h. * armnbsd-tdep.c: Use string.h, not gdb_string.h. * armobsd-tdep.c: Use string.h, not gdb_string.h. * avr-tdep.c: Use string.h, not gdb_string.h. * ax-gdb.c: Use string.h, not gdb_string.h. * ax-general.c: Use string.h, not gdb_string.h. * bcache.c: Use string.h, not gdb_string.h. * bfin-tdep.c: Use string.h, not gdb_string.h. * breakpoint.c: Use string.h, not gdb_string.h. * build-id.c: Use string.h, not gdb_string.h. * buildsym.c: Use string.h, not gdb_string.h. * c-exp.y: Use string.h, not gdb_string.h. * c-lang.c: Use string.h, not gdb_string.h. * c-typeprint.c: Use string.h, not gdb_string.h. * c-valprint.c: Use string.h, not gdb_string.h. * charset.c: Use string.h, not gdb_string.h. * cli-out.c: Use string.h, not gdb_string.h. * cli/cli-cmds.c: Use string.h, not gdb_string.h. * cli/cli-decode.c: Use string.h, not gdb_string.h. * cli/cli-dump.c: Use string.h, not gdb_string.h. * cli/cli-interp.c: Use string.h, not gdb_string.h. * cli/cli-logging.c: Use string.h, not gdb_string.h. * cli/cli-script.c: Use string.h, not gdb_string.h. * cli/cli-setshow.c: Use string.h, not gdb_string.h. * cli/cli-utils.c: Use string.h, not gdb_string.h. * coffread.c: Use string.h, not gdb_string.h. * common/common-utils.c: Use string.h, not gdb_string.h. * common/filestuff.c: Use string.h, not gdb_string.h. * common/linux-procfs.c: Use string.h, not gdb_string.h. * common/linux-ptrace.c: Use string.h, not gdb_string.h. * common/signals.c: Use string.h, not gdb_string.h. * common/vec.h: Use string.h, not gdb_string.h. * core-regset.c: Use string.h, not gdb_string.h. * corefile.c: Use string.h, not gdb_string.h. * corelow.c: Use string.h, not gdb_string.h. * cp-abi.c: Use string.h, not gdb_string.h. * cp-support.c: Use string.h, not gdb_string.h. * cp-valprint.c: Use string.h, not gdb_string.h. * cris-tdep.c: Use string.h, not gdb_string.h. * d-lang.c: Use string.h, not gdb_string.h. * dbxread.c: Use string.h, not gdb_string.h. * dcache.c: Use string.h, not gdb_string.h. * demangle.c: Use string.h, not gdb_string.h. * dicos-tdep.c: Use string.h, not gdb_string.h. * disasm.c: Use string.h, not gdb_string.h. * doublest.c: Use string.h, not gdb_string.h. * dsrec.c: Use string.h, not gdb_string.h. * dummy-frame.c: Use string.h, not gdb_string.h. * dwarf2-frame.c: Use string.h, not gdb_string.h. * dwarf2loc.c: Use string.h, not gdb_string.h. * dwarf2read.c: Use string.h, not gdb_string.h. * elfread.c: Use string.h, not gdb_string.h. * environ.c: Use string.h, not gdb_string.h. * eval.c: Use string.h, not gdb_string.h. * event-loop.c: Use string.h, not gdb_string.h. * exceptions.c: Use string.h, not gdb_string.h. * exec.c: Use string.h, not gdb_string.h. * expprint.c: Use string.h, not gdb_string.h. * f-exp.y: Use string.h, not gdb_string.h. * f-lang.c: Use string.h, not gdb_string.h. * f-typeprint.c: Use string.h, not gdb_string.h. * f-valprint.c: Use string.h, not gdb_string.h. * fbsd-nat.c: Use string.h, not gdb_string.h. * findcmd.c: Use string.h, not gdb_string.h. * findvar.c: Use string.h, not gdb_string.h. * fork-child.c: Use string.h, not gdb_string.h. * frame.c: Use string.h, not gdb_string.h. * frv-linux-tdep.c: Use string.h, not gdb_string.h. * frv-tdep.c: Use string.h, not gdb_string.h. * gdb.c: Use string.h, not gdb_string.h. * gdb_bfd.c: Use string.h, not gdb_string.h. * gdbarch.c: Use string.h, not gdb_string.h. * gdbtypes.c: Use string.h, not gdb_string.h. * gnu-nat.c: Use string.h, not gdb_string.h. * gnu-v2-abi.c: Use string.h, not gdb_string.h. * gnu-v3-abi.c: Use string.h, not gdb_string.h. * go-exp.y: Use string.h, not gdb_string.h. * go-lang.c: Use string.h, not gdb_string.h. * go32-nat.c: Use string.h, not gdb_string.h. * hppa-hpux-tdep.c: Use string.h, not gdb_string.h. * hppa-linux-nat.c: Use string.h, not gdb_string.h. * hppanbsd-tdep.c: Use string.h, not gdb_string.h. * hppaobsd-tdep.c: Use string.h, not gdb_string.h. * i386-cygwin-tdep.c: Use string.h, not gdb_string.h. * i386-dicos-tdep.c: Use string.h, not gdb_string.h. * i386-linux-nat.c: Use string.h, not gdb_string.h. * i386-linux-tdep.c: Use string.h, not gdb_string.h. * i386-nto-tdep.c: Use string.h, not gdb_string.h. * i386-sol2-tdep.c: Use string.h, not gdb_string.h. * i386-tdep.c: Use string.h, not gdb_string.h. * i386bsd-tdep.c: Use string.h, not gdb_string.h. * i386gnu-nat.c: Use string.h, not gdb_string.h. * i386nbsd-tdep.c: Use string.h, not gdb_string.h. * i386obsd-tdep.c: Use string.h, not gdb_string.h. * i387-tdep.c: Use string.h, not gdb_string.h. * ia64-libunwind-tdep.c: Use string.h, not gdb_string.h. * ia64-linux-nat.c: Use string.h, not gdb_string.h. * inf-child.c: Use string.h, not gdb_string.h. * inf-ptrace.c: Use string.h, not gdb_string.h. * inf-ttrace.c: Use string.h, not gdb_string.h. * infcall.c: Use string.h, not gdb_string.h. * infcmd.c: Use string.h, not gdb_string.h. * inflow.c: Use string.h, not gdb_string.h. * infrun.c: Use string.h, not gdb_string.h. * interps.c: Use string.h, not gdb_string.h. * iq2000-tdep.c: Use string.h, not gdb_string.h. * irix5-nat.c: Use string.h, not gdb_string.h. * jv-exp.y: Use string.h, not gdb_string.h. * jv-lang.c: Use string.h, not gdb_string.h. * jv-typeprint.c: Use string.h, not gdb_string.h. * jv-valprint.c: Use string.h, not gdb_string.h. * language.c: Use string.h, not gdb_string.h. * linux-fork.c: Use string.h, not gdb_string.h. * linux-nat.c: Use string.h, not gdb_string.h. * lm32-tdep.c: Use string.h, not gdb_string.h. * m2-exp.y: Use string.h, not gdb_string.h. * m2-typeprint.c: Use string.h, not gdb_string.h. * m32c-tdep.c: Use string.h, not gdb_string.h. * m32r-linux-nat.c: Use string.h, not gdb_string.h. * m32r-linux-tdep.c: Use string.h, not gdb_string.h. * m32r-rom.c: Use string.h, not gdb_string.h. * m32r-tdep.c: Use string.h, not gdb_string.h. * m68hc11-tdep.c: Use string.h, not gdb_string.h. * m68k-tdep.c: Use string.h, not gdb_string.h. * m68kbsd-tdep.c: Use string.h, not gdb_string.h. * m68klinux-nat.c: Use string.h, not gdb_string.h. * m68klinux-tdep.c: Use string.h, not gdb_string.h. * m88k-tdep.c: Use string.h, not gdb_string.h. * macrocmd.c: Use string.h, not gdb_string.h. * main.c: Use string.h, not gdb_string.h. * mdebugread.c: Use string.h, not gdb_string.h. * mem-break.c: Use string.h, not gdb_string.h. * memattr.c: Use string.h, not gdb_string.h. * memory-map.c: Use string.h, not gdb_string.h. * mep-tdep.c: Use string.h, not gdb_string.h. * mi/mi-cmd-break.c: Use string.h, not gdb_string.h. * mi/mi-cmd-disas.c: Use string.h, not gdb_string.h. * mi/mi-cmd-env.c: Use string.h, not gdb_string.h. * mi/mi-cmd-stack.c: Use string.h, not gdb_string.h. * mi/mi-cmd-var.c: Use string.h, not gdb_string.h. * mi/mi-cmds.c: Use string.h, not gdb_string.h. * mi/mi-console.c: Use string.h, not gdb_string.h. * mi/mi-getopt.c: Use string.h, not gdb_string.h. * mi/mi-interp.c: Use string.h, not gdb_string.h. * mi/mi-main.c: Use string.h, not gdb_string.h. * mi/mi-parse.c: Use string.h, not gdb_string.h. * microblaze-rom.c: Use string.h, not gdb_string.h. * microblaze-tdep.c: Use string.h, not gdb_string.h. * mingw-hdep.c: Use string.h, not gdb_string.h. * minidebug.c: Use string.h, not gdb_string.h. * minsyms.c: Use string.h, not gdb_string.h. * mips-irix-tdep.c: Use string.h, not gdb_string.h. * mips-linux-tdep.c: Use string.h, not gdb_string.h. * mips-tdep.c: Use string.h, not gdb_string.h. * mips64obsd-tdep.c: Use string.h, not gdb_string.h. * mipsnbsd-tdep.c: Use string.h, not gdb_string.h. * mipsread.c: Use string.h, not gdb_string.h. * mn10300-linux-tdep.c: Use string.h, not gdb_string.h. * mn10300-tdep.c: Use string.h, not gdb_string.h. * monitor.c: Use string.h, not gdb_string.h. * moxie-tdep.c: Use string.h, not gdb_string.h. * mt-tdep.c: Use string.h, not gdb_string.h. * nbsd-tdep.c: Use string.h, not gdb_string.h. * nios2-linux-tdep.c: Use string.h, not gdb_string.h. * nto-procfs.c: Use string.h, not gdb_string.h. * nto-tdep.c: Use string.h, not gdb_string.h. * objc-lang.c: Use string.h, not gdb_string.h. * objfiles.c: Use string.h, not gdb_string.h. * opencl-lang.c: Use string.h, not gdb_string.h. * osabi.c: Use string.h, not gdb_string.h. * osdata.c: Use string.h, not gdb_string.h. * p-exp.y: Use string.h, not gdb_string.h. * p-lang.c: Use string.h, not gdb_string.h. * p-typeprint.c: Use string.h, not gdb_string.h. * parse.c: Use string.h, not gdb_string.h. * posix-hdep.c: Use string.h, not gdb_string.h. * ppc-linux-nat.c: Use string.h, not gdb_string.h. * ppc-sysv-tdep.c: Use string.h, not gdb_string.h. * ppcfbsd-tdep.c: Use string.h, not gdb_string.h. * ppcnbsd-tdep.c: Use string.h, not gdb_string.h. * ppcobsd-tdep.c: Use string.h, not gdb_string.h. * printcmd.c: Use string.h, not gdb_string.h. * procfs.c: Use string.h, not gdb_string.h. * prologue-value.c: Use string.h, not gdb_string.h. * python/py-auto-load.c: Use string.h, not gdb_string.h. * python/py-gdb-readline.c: Use string.h, not gdb_string.h. * ravenscar-thread.c: Use string.h, not gdb_string.h. * regcache.c: Use string.h, not gdb_string.h. * registry.c: Use string.h, not gdb_string.h. * remote-fileio.c: Use string.h, not gdb_string.h. * remote-m32r-sdi.c: Use string.h, not gdb_string.h. * remote-mips.c: Use string.h, not gdb_string.h. * remote-sim.c: Use string.h, not gdb_string.h. * remote.c: Use string.h, not gdb_string.h. * reverse.c: Use string.h, not gdb_string.h. * rs6000-aix-tdep.c: Use string.h, not gdb_string.h. * ser-base.c: Use string.h, not gdb_string.h. * ser-go32.c: Use string.h, not gdb_string.h. * ser-mingw.c: Use string.h, not gdb_string.h. * ser-pipe.c: Use string.h, not gdb_string.h. * ser-tcp.c: Use string.h, not gdb_string.h. * ser-unix.c: Use string.h, not gdb_string.h. * serial.c: Use string.h, not gdb_string.h. * sh-tdep.c: Use string.h, not gdb_string.h. * sh64-tdep.c: Use string.h, not gdb_string.h. * shnbsd-tdep.c: Use string.h, not gdb_string.h. * skip.c: Use string.h, not gdb_string.h. * sol-thread.c: Use string.h, not gdb_string.h. * solib-dsbt.c: Use string.h, not gdb_string.h. * solib-frv.c: Use string.h, not gdb_string.h. * solib-osf.c: Use string.h, not gdb_string.h. * solib-spu.c: Use string.h, not gdb_string.h. * solib-target.c: Use string.h, not gdb_string.h. * solib.c: Use string.h, not gdb_string.h. * somread.c: Use string.h, not gdb_string.h. * source.c: Use string.h, not gdb_string.h. * sparc-nat.c: Use string.h, not gdb_string.h. * sparc-sol2-tdep.c: Use string.h, not gdb_string.h. * sparc-tdep.c: Use string.h, not gdb_string.h. * sparc64-tdep.c: Use string.h, not gdb_string.h. * sparc64fbsd-tdep.c: Use string.h, not gdb_string.h. * sparc64nbsd-tdep.c: Use string.h, not gdb_string.h. * sparcnbsd-tdep.c: Use string.h, not gdb_string.h. * spu-linux-nat.c: Use string.h, not gdb_string.h. * spu-multiarch.c: Use string.h, not gdb_string.h. * spu-tdep.c: Use string.h, not gdb_string.h. * stabsread.c: Use string.h, not gdb_string.h. * stack.c: Use string.h, not gdb_string.h. * std-regs.c: Use string.h, not gdb_string.h. * symfile.c: Use string.h, not gdb_string.h. * symmisc.c: Use string.h, not gdb_string.h. * symtab.c: Use string.h, not gdb_string.h. * target.c: Use string.h, not gdb_string.h. * thread.c: Use string.h, not gdb_string.h. * tilegx-linux-nat.c: Use string.h, not gdb_string.h. * tilegx-tdep.c: Use string.h, not gdb_string.h. * top.c: Use string.h, not gdb_string.h. * tracepoint.c: Use string.h, not gdb_string.h. * tui/tui-command.c: Use string.h, not gdb_string.h. * tui/tui-data.c: Use string.h, not gdb_string.h. * tui/tui-disasm.c: Use string.h, not gdb_string.h. * tui/tui-file.c: Use string.h, not gdb_string.h. * tui/tui-layout.c: Use string.h, not gdb_string.h. * tui/tui-out.c: Use string.h, not gdb_string.h. * tui/tui-regs.c: Use string.h, not gdb_string.h. * tui/tui-source.c: Use string.h, not gdb_string.h. * tui/tui-stack.c: Use string.h, not gdb_string.h. * tui/tui-win.c: Use string.h, not gdb_string.h. * tui/tui-windata.c: Use string.h, not gdb_string.h. * tui/tui-winsource.c: Use string.h, not gdb_string.h. * typeprint.c: Use string.h, not gdb_string.h. * ui-file.c: Use string.h, not gdb_string.h. * ui-out.c: Use string.h, not gdb_string.h. * user-regs.c: Use string.h, not gdb_string.h. * utils.c: Use string.h, not gdb_string.h. * v850-tdep.c: Use string.h, not gdb_string.h. * valarith.c: Use string.h, not gdb_string.h. * valops.c: Use string.h, not gdb_string.h. * valprint.c: Use string.h, not gdb_string.h. * value.c: Use string.h, not gdb_string.h. * varobj.c: Use string.h, not gdb_string.h. * vax-tdep.c: Use string.h, not gdb_string.h. * vaxnbsd-tdep.c: Use string.h, not gdb_string.h. * vaxobsd-tdep.c: Use string.h, not gdb_string.h. * windows-nat.c: Use string.h, not gdb_string.h. * xcoffread.c: Use string.h, not gdb_string.h. * xml-support.c: Use string.h, not gdb_string.h. * xstormy16-tdep.c: Use string.h, not gdb_string.h. * xtensa-linux-nat.c: Use string.h, not gdb_string.h.
2013-11-06 14:14:23 +00:00
#include <string.h>
2003-02-19 David Carlton <carlton@math.stanford.edu> * Makefile.in (SFILES): Add block.c. (block_h): New. (COMMON_OBS): Add block.o. (block.o): New. (x86-64-tdep.o): Add $(block_h). (values.o, valops.o, tracepoint.o, symtab.o, symmisc.o, symfile.o) (stack.o, printcmd.o, p-exp.tab.o, parse.o, objfiles.o) (objc-exp.tab.o, objc-lang.o, nlmread.o, mips-tdep.o, mdebugread.o) (m2-exp.tab.o, linespec.o, jv-lang.o, jv-exp.tab.o, infcmd.o) (f-valprint.o, findvar.o, f-exp.tab.o, expprint.o, coffread.o) (c-exp.tab.o, buildsym.o, breakpoint.o, blockframe.o, ax-gdb.o) (alpha-tdep.o, ada-lang.o, ada-exp.tab.o, mi-cmd-stack.o): Ditto. * value.h: Add opaque declaration for struct block. * parser-defs.h, objc-lang.h, buildsym.h, breakpoint.h: Ditto. * ada-lang.h: Ditto. * x86-64-tdep.c: #include "block.h" * values.c, valops.c, tracepoint.c, symtab.c, symmisc.c: Ditto. * symfile.c, stack.c, printcmd.c, p-exp.y, parse.c: Ditto. * objfiles.c, objc-exp.y, objc-lang.c, nlmread.c: Ditto. * mips-tdep.c, mdebugread.c, m2-exp.y, linespec.c: Ditto. * jv-lang.c, jv-exp.y, infcmd.c, f-valprint.c: Ditto. * findvar.c, f-exp.y, expprint.c, coffread.c, c-exp.y: Ditto. * buildsym.c, breakpoint.c, blockframe.c, ax-gdb.c: Ditto. * alpha-tdep.c, ada-lang.c, ada-exp.y: Ditto. * blockframe.c (blockvector_for_pc_sect): Move to "block.c". (blockvector_for_pc, block_for_pc_sect, block_for_pc): Ditto. * symtab.c (block_function): Ditto. (contained_in): Ditto. * frame.h: Move block_for_pc and block_for_pc_sect declarations to block.h. Add opaque declaration for struct block. * symtab.h: Move block_function and contained_in declarations to block.h. Add opaque declarations for struct block, struct blockvector. (struct block): Move to block.h. (struct blockvector): Ditto. (BLOCK_START, BLOCK_END, BLOCK_FUNCTION, BLOCK_SUPERBLOCK) (BLOCK_GCC_COMPILED, BLOCK_HASHTABLE, BLOCK_NSYMS, BLOCK_SYM) (BLOCK_BUCKETS, BLOCK_BUCKET, BLOCK_HASHTABLE_SIZE) (ALL_BLOCK_SYMBOLS, BLOCK_SHOULD_SORT, BLOCKVECTOR_NBLOCKS) (BLOCKVECTOR_BLOCK, GLOBAL_BLOCK, STATIC_BLOCK, FIRST_LOCAL_BLOCK): Ditto. * block.c: New file. * block.h: New file. 2003-02-19 David Carlton <carlton@math.stanford.edu> * mi-cmd-stack.c: #include "block.h"
2003-02-20 00:01:07 +00:00
#include "block.h"
2003-03-01 Andrew Cagney <cagney@redhat.com> * Makefile.in (ax-gdb.o): Update dependencies. * ax-gdb.c: Include "regcache.h". (gen_expr): Use register_type instead of REGISTER_VIRTUAL_TYPE. * findvar.c (value_of_register): Ditto. * infcmd.c (default_print_registers_info): Ditto. Index: mi/ChangeLog 2003-03-01 Andrew Cagney <cagney@redhat.com> * mi-main.c (get_register): Use register_type instead of REGISTER_VIRTUAL_TYPE.
2003-03-01 17:03:19 +00:00
#include "regcache.h"
* frame.h (frame_map_regnum_to_name): Remove prototype. (frame_map_name_to_regnum): Remove prototype. * frame.c (frame_map_regnum_to_name): Remove. (frame_map_name_to_regnum): Remove. (frame_unwind_register_value): Use user_reg_map_regnum_to_name instead of frame_map_regnum_to_name. * ax-gdb.c: Include "user-regs.h". (gen_expr): Use user_reg_map_name_to_regnum instead of frame_map_name_to_regnum. * eval.c: Include "user-regs.h". (evaluate_subexp_standard): Use user_reg_map_name_to_regnum instead of frame_map_name_to_regnum. * infcmd.c (registers_info): Likewise. * parse.c: Include "user-regs.h". (write_dollar_variable): Use user_reg_map_name_to_regnum instead of frame_map_name_to_regnum. * tracepoint.c: Include "user-regs.h". (encode_actions): Use user_reg_map_name_to_regnum instead of frame_map_name_to_regnum. * valops.c: Include "user-regs.h". (value_fetch_lazy): Use user_reg_map_regnum_to_name instead of frame_map_regnum_to_name.
2008-08-21 20:13:08 +00:00
#include "user-regs.h"
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
#include "language.h"
2009-12-23 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_expr): Handle OP_THIS.
2009-12-24 01:42:03 +00:00
#include "dictionary.h"
Add trace file support. * tracepoint.h (enum trace_stop_reason): New enum. (struct trace_status): New struct. (parse_trace_status): Declare. (struct uploaded_tp): Move here from remote.c, add fields for actions. (struct uploaded_tsv): New struct. * tracepoint.c (tfile_ops): New target vector. (trace_fd): New global. (tfile_open): New function. (tfile_close): New function. (tfile_files_info): New function. (tfile_get_trace_status): New function. (tfile_get_traceframe_address): New function. (tfile_trace_find): New function. (tfile_fetch_registers): New function. (tfile_xfer_partial): New function. (tfile_get_trace_state_variable_value): New function. (init_tfile_ops): New function. (_initialize_tracepoint): Call it, add tfile target. (trace_status): New global. (current_trace_status): New function. (trace_running_p): Remove, change all users to get from current_trace_status()->running. (get_trace_status): Remove. (trace_status_command): Call target_get_trace_status directly, report more detail including tracing stop reasons. (trace_find_command): Always allow tfind on a file. (trace_find_pc_command): Ditto. (trace_find_tracepoint_command): Ditto. (trace_find_line_command): Ditto. (trace_find_range_command): Ditto. (trace_find_outside_command): Ditto. (trace_frames_offset, cur_offset): Declare as off_t. (trace_regblock_size): Rename from reg_size, update users. (parse_trace_status): New function. (tfile_interp_line): New function. (disconnect_or_stop_tracing): Ensure current trace status before asking what to do. (stop_reason_names): New global. (trace_save_command): New command. (get_uploaded_tp): Move here from remote.c. (find_matching_tracepoint): Ditto. (merge_uploaded_tracepoints): New function. (parse_trace_status): Use stop_reason_names. (_initialize_tracepoint): Define tsave command. * target.h (target_ops): New fields to_save_trace_data, to_upload_tracepoints, to_upload_trace_state_variables, to_get_raw_trace_data, change to_get_trace_status to take a pointer to a status struct. (target_save_trace_data): New macro. (target_upload_tracepoints): New macro. (target_upload_trace_state_variables): New macro. (target_get_raw_trace_data): New macro. * target.c (update_current_target): Add new methods, change signature of to_get_trace_status. * remote.c (hex2bin): Make globally visible. (bin2hex): Ditto. (remote_download_trace_state_variable): Download name also. (remote_get_trace_status): Update parameter, use parse_trace_status. (remote_save_trace_data): New function. (remote_upload_tracepoints): New function. (remote_upload_trace_state_variables): New function. (remote_get_raw_trace_data): New function. (remote_start_remote): Use them. (_initialize_remote_ops): Add operations. * ax-gdb.c: Include breakpoint.h. * breakpoint.c (create_tracepoint_from_upload): Use break_command_really, return tracepoint, warn about unimplemented parts. * NEWS: Mention trace file addition. * gdb.texinfo (Trace Files): New section. (Tracepoint Packets): Document QTSave and qTBuffer. (Trace File Format): New appendix. * generic/gdbtk-bp.c (gdb_trace_status): Use current_trace_status. * gdb.trace/tfile.c: New file. * gdb.trace/tfile.exp: New file.
2010-01-15 22:37:20 +00:00
#include "breakpoint.h"
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
#include "tracepoint.h"
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
#include "cp-support.h"
Add return address collection for tracepoints. * tracepoint.c (encode_actions_1): Add case for $_ret. (validate_actionline): Check for $_ret. (trace_dump_actions): Ditto. * ax-gdb.h (gen_trace_for_return_address): Declare. * ax-gdb.c: Include arch-utils.h. (gen_trace_for_return_address): New function. (agent_command): Add return address special case. * amd64-tdep.c: Include ax.h and ax-gdb.h. (amd64_gen_return_address): New function. (amd64_init_abi): Call it. * i386-tdep.c: Include ax.h and ax-gdb.h. (i386_gen_return_address): New function. (i386_init_abi): Call it. * arch-utils.h (default_gen_return_address): Declare. * arch-utils.c (default_gen_return_address): New function. * gdbarch.sh (gen_return_address): New method. * gdbarch.h, gdbarch.c: Regenerate. * gdb.texinfo (Tracepoint Action Lists): Document $_ret. * gdb.trace/collection.exp: Test collection of $_ret.
2011-09-27 13:09:37 +00:00
#include "arch-utils.h"
Add target-side support for dynamic printf. * NEWS: Mention the additional style. * breakpoint.h (struct bp_target_info): New fields tcommands, persist. (struct bp_location): New field cmd_bytecode. * breakpoint.c: Include format.h. (disconnected_dprintf): New global. (parse_cmd_to_aexpr): New function. (build_target_command_list): New function. (insert_bp_location): Call it. (remove_breakpoints_pid): Skip dprintf breakpoints. (print_one_breakpoint_location): Ditto. (dprintf_style_agent): New global. (dprintf_style_enums): Add dprintf_style_agent. (update_dprintf_command_list): Add agent case. (agent_printf_command): New function. (_initialize_breakpoint): Add new commands. * common/ax.def (printf): New bytecode. * ax.h (ax_string): Declare. * ax-gdb.h (gen_printf): Declare. * ax-gdb.c: Include cli-utils.h, format.h. (gen_printf): New function. (maint_agent_print_command): New function. (_initialize_ax_gdb): Add maint agent-printf command. * ax-general.c (ax_string): New function. (ax_print): Add printf disassembly. * Makefile.in (SFILES): Add format.c (COMMON_OBS): Add format.o. * common/format.h: New file. * common/format.c: New file. * printcmd.c: Include format.h. (ui_printf): Call parse_format_string. * remote.c (remote_state): New field breakpoint_commands. (PACKET_BreakpointCommands): New enum. (remote_breakpoint_commands_feature): New function. (remote_protocol_features): Add new BreakpointCommands entry. (remote_can_run_breakpoint_commands): New function. (remote_add_target_side_commands): New function. (remote_insert_breakpoint): Call it. (remote_insert_hw_breakpoint): Ditto. (_initialize_remote): Add new packet configuration for target-side breakpoint commands. * target.h (struct target_ops): New field to_can_run_breakpoint_commands. (target_can_run_breakpoint_commands): New macro. * target.c (update_current_target): Handle to_can_run_breakpoint_commands. [gdbserver] * Makefile.in (WARN_CFLAGS_NO_FORMAT): Define. (ax.o): Add it to build rule. (ax-ipa.o): Ditto. (OBS): Add format.o. (IPA_OBS): Add format.o. * server.c (handle_query): Claim support for breakpoint commands. (process_point_options): Add command case. (process_serial_event): Leave running if there are printfs in effect. * mem-break.h (any_persistent_commands): Declare. (add_breakpoint_commands): Declare. (gdb_no_commands_at_breakpoint): Declare. (run_breakpoint_commands): Declare. * mem-break.c (struct point_command_list): New struct. (struct breakpoint): New field command_list. (any_persistent_commands): New function. (add_commands_to_breakpoint): New function. (add_breakpoint_commands): New function. (gdb_no_commands_at_breakpoint): New function. (run_breakpoint_commands): New function. * linux-low.c (linux_wait_1): Test for and run breakpoint commands locally. * ax.c: Include format.h. (ax_printf): New function. (gdb_eval_agent_expr): Add printf opcode. [doc] * gdb.texinfo (Dynamic Printf): Mention agent style and disconnected dprintf. (Maintenance Commands): Describe maint agent-printf. (General Query Packets): Mention BreakpointCommands feature. (Packets): Document commands extension to Z0 packet. * agentexpr.texi (Bytecode Descriptions): Document printf bytecode. [testsuite] * gdb.base/dprintf.exp: Add agent style tests.
2012-07-02 15:29:39 +00:00
#include "cli/cli-utils.h"
2012-07-05 Hui Zhu <hui_zhu@mentor.com> * ax-gdb.c (cli/cli-utils.h): New include. (linespec.h): Ditto. (agent_eval_command_one): New function. (agent_command_1): Ditto. (agent_command): Call function agent_command_1. (agent_eval_command): Ditto. (_initialize_ax_gdb): Change help for "maint agent" and "maint agent-eval".
2012-07-05 01:03:01 +00:00
#include "linespec.h"
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
2011-11-02 Stan Shebs <stan@codesourcery.com> String collection for tracepoints. * NEWS: Mention string collection. * common/ax.def (tracenz): New bytecode. * ax-gdb.h (trace_string_kludge): Declare. * ax-gdb.c: Include valprint.h and c-lang.h. (trace_string_kludge): New global. (gen_traced_pop): Add string case. (agent_command): Add string case. * tracepoint.h (decode_agent_options): Declare. * tracepoint.c: Include cli-utils.h. (decode_agent_options): New function. (validate_actionline): Call it. (encode_actions_1): Ditto. * target.h (struct target_ops): New method to_supports_string_tracing. (target_supports_string_tracing): New macro. * target.c (update_current_target): Add to_supports_string_tracing. * remote.c (struct remote_state): New field string_tracing. (remote_string_tracing_feature): New function. (remote_protocol_features): New feature tracenz. (remote_supports_string_tracing): New function. (init_remote_ops): Set to_supports_string_tracing. * tracepoint.c (agent_mem_read_string): New function. (eval_agent_expr): Call it for tracenz. * server.c (handle_query): Report support for tracenz. * gdb.texinfo (Tracepoint Action Lists): Document collect/s. (General Query Packets): Describe tracenz feature. * agentexpr.texi (Bytecode Descriptions): Describe tracenz. * gdb.trace/collection.c: Add code using strings. * gdb.trace/collection.exp: Add tests of string collection.
2011-11-02 23:44:21 +00:00
#include "valprint.h"
#include "c-lang.h"
Add target-side support for dynamic printf. * NEWS: Mention the additional style. * breakpoint.h (struct bp_target_info): New fields tcommands, persist. (struct bp_location): New field cmd_bytecode. * breakpoint.c: Include format.h. (disconnected_dprintf): New global. (parse_cmd_to_aexpr): New function. (build_target_command_list): New function. (insert_bp_location): Call it. (remove_breakpoints_pid): Skip dprintf breakpoints. (print_one_breakpoint_location): Ditto. (dprintf_style_agent): New global. (dprintf_style_enums): Add dprintf_style_agent. (update_dprintf_command_list): Add agent case. (agent_printf_command): New function. (_initialize_breakpoint): Add new commands. * common/ax.def (printf): New bytecode. * ax.h (ax_string): Declare. * ax-gdb.h (gen_printf): Declare. * ax-gdb.c: Include cli-utils.h, format.h. (gen_printf): New function. (maint_agent_print_command): New function. (_initialize_ax_gdb): Add maint agent-printf command. * ax-general.c (ax_string): New function. (ax_print): Add printf disassembly. * Makefile.in (SFILES): Add format.c (COMMON_OBS): Add format.o. * common/format.h: New file. * common/format.c: New file. * printcmd.c: Include format.h. (ui_printf): Call parse_format_string. * remote.c (remote_state): New field breakpoint_commands. (PACKET_BreakpointCommands): New enum. (remote_breakpoint_commands_feature): New function. (remote_protocol_features): Add new BreakpointCommands entry. (remote_can_run_breakpoint_commands): New function. (remote_add_target_side_commands): New function. (remote_insert_breakpoint): Call it. (remote_insert_hw_breakpoint): Ditto. (_initialize_remote): Add new packet configuration for target-side breakpoint commands. * target.h (struct target_ops): New field to_can_run_breakpoint_commands. (target_can_run_breakpoint_commands): New macro. * target.c (update_current_target): Handle to_can_run_breakpoint_commands. [gdbserver] * Makefile.in (WARN_CFLAGS_NO_FORMAT): Define. (ax.o): Add it to build rule. (ax-ipa.o): Ditto. (OBS): Add format.o. (IPA_OBS): Add format.o. * server.c (handle_query): Claim support for breakpoint commands. (process_point_options): Add command case. (process_serial_event): Leave running if there are printfs in effect. * mem-break.h (any_persistent_commands): Declare. (add_breakpoint_commands): Declare. (gdb_no_commands_at_breakpoint): Declare. (run_breakpoint_commands): Declare. * mem-break.c (struct point_command_list): New struct. (struct breakpoint): New field command_list. (any_persistent_commands): New function. (add_commands_to_breakpoint): New function. (add_breakpoint_commands): New function. (gdb_no_commands_at_breakpoint): New function. (run_breakpoint_commands): New function. * linux-low.c (linux_wait_1): Test for and run breakpoint commands locally. * ax.c: Include format.h. (ax_printf): New function. (gdb_eval_agent_expr): Add printf opcode. [doc] * gdb.texinfo (Dynamic Printf): Mention agent style and disconnected dprintf. (Maintenance Commands): Describe maint agent-printf. (General Query Packets): Mention BreakpointCommands feature. (Packets): Document commands extension to Z0 packet. * agentexpr.texi (Bytecode Descriptions): Document printf bytecode. [testsuite] * gdb.base/dprintf.exp: Add agent style tests.
2012-07-02 15:29:39 +00:00
#include "format.h"
import gdb-1999-09-28 snapshot
1999-09-28 21:55:21 +00:00
/* To make sense of this file, you should read doc/agentexpr.texi.
Then look at the types and enums in ax-gdb.h. For the code itself,
look at gen_expr, towards the bottom; that's the main function that
looks at the GDB expressions and calls everything else to generate
code.
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
I'm beginning to wonder whether it wouldn't be nicer to internally
generate trees, with types, and then spit out the bytecode in
linear form afterwards; we could generate fewer `swap', `ext', and
`zero_ext' bytecodes that way; it would make good constant folding
easier, too. But at the moment, I think we should be willing to
pay for the simplicity of this code with less-than-optimal bytecode
strings.
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Remember, "GBD" stands for "Great Britain, Dammit!" So be careful. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
2010-12-31 Michael Snyder <msnyder@vmware.com> * annotate.c: Comment cleanup, shorten long lines. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * auxv.c: Ditto. * auxv.h: Ditto. * ax-gdb.c: Ditto. * ax-gdb.h: Ditto. * ax-general.c: Ditto. * breakpoint.h: Ditto. * buildsym.h: Ditto.
2010-12-31 19:16:37 +00:00
/* Prototypes for local functions. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* There's a standard order to the arguments of these functions:
union exp_element ** --- pointer into expression
struct agent_expr * --- agent expression buffer to generate code into
struct axs_value * --- describes value left on top of stack */
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
PARAMS removal.
2000-05-28 01:12:42 +00:00
static struct value *const_var_ref (struct symbol *var);
static struct value *const_expr (union exp_element **pc);
static struct value *maybe_const_expr (union exp_element **pc);
2011-01-05 Michael Snyder <msnyder@vmware.com> * addrmap.c: Shorten lines of >= 80 columns. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * ax-gdb.c: Ditto. * ax-general.c: Ditto. * bcache.c: Ditto. * blockframe.c: Ditto. * breakpoint.c: Ditto. * buildsym.c: Ditto. * c-lang.c: Ditto. * c-typeprint.c: Ditto. * charset.c: Ditto. * coffread.c: Ditto. * command.h: Ditto. * corelow.c: Ditto. * cp-abi.c: Ditto. * cp-namespace.c: Ditto. * cp-support.c: Ditto. * dbug-rom.c: Ditto. * dbxread.c: Ditto. * defs.h: Ditto. * dfp.c: Ditto. * dfp.h: Ditto. * dictionary.c: Ditto. * disasm.c: Ditto. * doublest.c: Ditto. * dwarf2-frame.c: Ditto. * dwarf2expr.c: Ditto. * dwarf2loc.c: Ditto. * dwarf2read.c: Ditto. * elfread.c: Ditto. * eval.c: Ditto. * event-loop.c: Ditto. * event-loop.h: Ditto. * exceptions.h: Ditto. * exec.c: Ditto. * expprint.c: Ditto. * expression.h: Ditto. * f-lang.c: Ditto. * f-valprint.c: Ditto. * findcmd.c: Ditto. * frame-base.c: Ditto. * frame-unwind.c: Ditto. * frame-unwind.h: Ditto. * frame.c: Ditto. * frame.h: Ditto. * gcore.c: Ditto. * gdb-stabs.h: Ditto. * gdb_assert.h: Ditto. * gdb_dirent.h: Ditto. * gdb_obstack.h: Ditto. * gdbcore.h: Ditto. * gdbtypes.c: Ditto. * gdbtypes.h: Ditto. * inf-ttrace.c: Ditto. * infcall.c: Ditto. * infcmd.c: Ditto. * inflow.c: Ditto. * infrun.c: Ditto. * inline-frame.h: Ditto. * language.c: Ditto. * language.h: Ditto. * libunwind-frame.c: Ditto. * libunwind-frame.h: Ditto. * linespec.c: Ditto. * linux-nat.c: Ditto. * linux-nat.h: Ditto. * linux-thread-db.c: Ditto. * machoread.c: Ditto. * macroexp.c: Ditto. * macrotab.c: Ditto. * main.c: Ditto. * maint.c: Ditto. * mdebugread.c: Ditto. * memattr.c: Ditto. * minsyms.c: Ditto. * monitor.c: Ditto. * monitor.h: Ditto. * objfiles.c: Ditto. * objfiles.h: Ditto. * osabi.c: Ditto. * p-typeprint.c: Ditto. * p-valprint.c: Ditto. * parse.c: Ditto. * printcmd.c: Ditto. * proc-events.c: Ditto. * procfs.c: Ditto. * progspace.c: Ditto. * progspace.h: Ditto. * psympriv.h: Ditto. * psymtab.c: Ditto. * record.c: Ditto. * regcache.c: Ditto. * regcache.h: Ditto. * remote-fileio.c: Ditto. * remote.c: Ditto. * ser-mingw.c: Ditto. * ser-tcp.c: Ditto. * ser-unix.c: Ditto. * serial.c: Ditto. * serial.h: Ditto. * solib-frv.c: Ditto. * solib-irix.c: Ditto. * solib-osf.c: Ditto. * solib-pa64.c: Ditto. * solib-som.c: Ditto. * solib-sunos.c: Ditto. * solib-svr4.c: Ditto. * solib-target.c: Ditto. * solib.c: Ditto. * somread.c: Ditto. * source.c: Ditto. * stabsread.c: Ditto. * stabsread.c: Ditto. * stack.c: Ditto. * stack.h: Ditto. * symfile-mem.c: Ditto. * symfile.c: Ditto. * symfile.h: Ditto. * symmisc.c: Ditto. * symtab.c: Ditto. * symtab.h: Ditto. * target-descriptions.c: Ditto. * target-memory.c: Ditto. * target.c: Ditto. * target.h: Ditto. * terminal.h: Ditto. * thread.c: Ditto. * top.c: Ditto. * tracepoint.c: Ditto. * tracepoint.h: Ditto. * ui-file.c: Ditto. * ui-file.h: Ditto. * ui-out.h: Ditto. * user-regs.c: Ditto. * user-regs.h: Ditto. * utils.c: Ditto. * valarith.c: Ditto. * valops.c: Ditto. * valprint.c: Ditto. * valprint.h: Ditto. * value.c: Ditto. * varobj.c: Ditto. * varobj.h: Ditto. * vec.h: Ditto. * xcoffread.c: Ditto. * xcoffsolib.c: Ditto. * xcoffsolib.h: Ditto. * xml-syscall.c: Ditto. * xml-tdesc.c: Ditto.
2011-01-05 22:22:53 +00:00
static void gen_traced_pop (struct gdbarch *, struct agent_expr *,
struct axs_value *);
PARAMS removal.
2000-05-28 01:12:42 +00:00
static void gen_sign_extend (struct agent_expr *, struct type *);
static void gen_extend (struct agent_expr *, struct type *);
static void gen_fetch (struct agent_expr *, struct type *);
static void gen_left_shift (struct agent_expr *, int);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
static void gen_frame_args_address (struct gdbarch *, struct agent_expr *);
static void gen_frame_locals_address (struct gdbarch *, struct agent_expr *);
PARAMS removal.
2000-05-28 01:12:42 +00:00
static void gen_offset (struct agent_expr *ax, int offset);
static void gen_sym_offset (struct agent_expr *, struct symbol *);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
static void gen_var_ref (struct gdbarch *, struct agent_expr *ax,
PARAMS removal.
2000-05-28 01:12:42 +00:00
struct axs_value *value, struct symbol *var);
static void gen_int_literal (struct agent_expr *ax,
struct axs_value *value,
LONGEST k, struct type *type);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
static void gen_usual_unary (struct expression *exp, struct agent_expr *ax,
struct axs_value *value);
PARAMS removal.
2000-05-28 01:12:42 +00:00
static int type_wider_than (struct type *type1, struct type *type2);
static struct type *max_type (struct type *type1, struct type *type2);
static void gen_conversion (struct agent_expr *ax,
struct type *from, struct type *to);
static int is_nontrivial_conversion (struct type *from, struct type *to);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
static void gen_usual_arithmetic (struct expression *exp,
struct agent_expr *ax,
PARAMS removal.
2000-05-28 01:12:42 +00:00
struct axs_value *value1,
struct axs_value *value2);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
static void gen_integral_promotions (struct expression *exp,
struct agent_expr *ax,
PARAMS removal.
2000-05-28 01:12:42 +00:00
struct axs_value *value);
static void gen_cast (struct agent_expr *ax,
struct axs_value *value, struct type *type);
static void gen_scale (struct agent_expr *ax,
enum agent_op op, struct type *type);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
static void gen_ptradd (struct agent_expr *ax, struct axs_value *value,
struct axs_value *value1, struct axs_value *value2);
static void gen_ptrsub (struct agent_expr *ax, struct axs_value *value,
struct axs_value *value1, struct axs_value *value2);
static void gen_ptrdiff (struct agent_expr *ax, struct axs_value *value,
struct axs_value *value1, struct axs_value *value2,
struct type *result_type);
PARAMS removal.
2000-05-28 01:12:42 +00:00
static void gen_binop (struct agent_expr *ax,
struct axs_value *value,
struct axs_value *value1,
struct axs_value *value2,
enum agent_op op,
enum agent_op op_unsigned, int may_carry, char *name);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
static void gen_logical_not (struct agent_expr *ax, struct axs_value *value,
struct type *result_type);
PARAMS removal.
2000-05-28 01:12:42 +00:00
static void gen_complement (struct agent_expr *ax, struct axs_value *value);
static void gen_deref (struct agent_expr *, struct axs_value *);
static void gen_address_of (struct agent_expr *, struct axs_value *);
* ax-gdb.c (gen_bitfield_ref): Add EXP argument, use expression architecture instead of current_gdbarch. (gen_struct_ref): Add EXP argument, pass to get_bitfield_ref. (gen_expr): Pass expression to get_struct_ref. * symtab.h (struct symbol_ops): Add GDBARCH parameter to tracepoint_var_ref callback. * ax-gdb.c (gen_var_ref): Pass architecture to tracepoint_var_ref symbol operation callback. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Add GDBARCH parameter. Use it instead of current_gdbarch. (locexpr_tracepoint_var_ref): Add GDBARCH parameter. Pass it to dwarf2_tracepoint_var_ref. (loclist_tracepoint_var_ref): Likewise.
2009-06-17 18:40:53 +00:00
static void gen_bitfield_ref (struct expression *exp, struct agent_expr *ax,
PARAMS removal.
2000-05-28 01:12:42 +00:00
struct axs_value *value,
struct type *type, int start, int end);
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
static void gen_primitive_field (struct expression *exp,
struct agent_expr *ax,
struct axs_value *value,
int offset, int fieldno, struct type *type);
static int gen_struct_ref_recursive (struct expression *exp,
struct agent_expr *ax,
struct axs_value *value,
char *field, int offset,
struct type *type);
* ax-gdb.c (gen_bitfield_ref): Add EXP argument, use expression architecture instead of current_gdbarch. (gen_struct_ref): Add EXP argument, pass to get_bitfield_ref. (gen_expr): Pass expression to get_struct_ref. * symtab.h (struct symbol_ops): Add GDBARCH parameter to tracepoint_var_ref callback. * ax-gdb.c (gen_var_ref): Pass architecture to tracepoint_var_ref symbol operation callback. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Add GDBARCH parameter. Use it instead of current_gdbarch. (locexpr_tracepoint_var_ref): Add GDBARCH parameter. Pass it to dwarf2_tracepoint_var_ref. (loclist_tracepoint_var_ref): Likewise.
2009-06-17 18:40:53 +00:00
static void gen_struct_ref (struct expression *exp, struct agent_expr *ax,
PARAMS removal.
2000-05-28 01:12:42 +00:00
struct axs_value *value,
char *field,
char *operator_name, char *operand_name);
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
static void gen_static_field (struct gdbarch *gdbarch,
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
struct agent_expr *ax, struct axs_value *value,
struct type *type, int fieldno);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
static void gen_repeat (struct expression *exp, union exp_element **pc,
PARAMS removal.
2000-05-28 01:12:42 +00:00
struct agent_expr *ax, struct axs_value *value);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
static void gen_sizeof (struct expression *exp, union exp_element **pc,
struct agent_expr *ax, struct axs_value *value,
struct type *size_type);
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
static void gen_expr_binop_rest (struct expression *exp,
enum exp_opcode op, union exp_element **pc,
struct agent_expr *ax,
struct axs_value *value,
struct axs_value *value1,
struct axs_value *value2);
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
PARAMS removal.
2000-05-28 01:12:42 +00:00
static void agent_command (char *exp, int from_tty);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Detecting constant expressions. */
/* If the variable reference at *PC is a constant, return its value.
Otherwise, return zero.
Hey, Wally! How can a variable reference be a constant?
Well, Beav, this function really handles the OP_VAR_VALUE operator,
not specifically variable references. GDB uses OP_VAR_VALUE to
refer to any kind of symbolic reference: function names, enum
elements, and goto labels are all handled through the OP_VAR_VALUE
operator, even though they're constants. It makes sense given the
situation.
Gee, Wally, don'cha wonder sometimes if data representations that
subvert commonly accepted definitions of terms in favor of heavily
context-specific interpretations are really just a tool of the
programming hegemony to preserve their power and exclude the
proletariat? */
static struct value *
Protoization.
2000-07-30 01:48:28 +00:00
const_var_ref (struct symbol *var)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
struct type *type = SYMBOL_TYPE (var);
switch (SYMBOL_CLASS (var))
{
case LOC_CONST:
return value_from_longest (type, (LONGEST) SYMBOL_VALUE (var));
case LOC_LABEL:
* gdbarch.sh (POINTER_TO_ADDRESS, ADDRESS_TO_POINTER): Two new functions which architectures can redefine, defaulting to generic_pointer_to_address and generic_address_to_pointer. * findvar.c (extract_typed_address, store_typed_address, generic_pointer_to_address, generic_address_to_pointer): New functions. (POINTER_TO_ADDRESS, ADDRESS_TO_POINTER): Provide default definitions. (extract_address, store_address): Doc fixes. * values.c (value_as_pointer): Doc fix. (value_from_pointer): New function. * defs.h (extract_typed_address, store_typed_address): New declarations. * inferior.h (generic_address_to_pointer, generic_pointer_to_address): New declarations. * value.h (value_from_pointer): New declaration. * ax-gdb.c (const_var_ref): Use value_from_pointer, not value_from_longest. * blockframe.c (generic_push_dummy_frame): Use read_pc and read_sp, not read_register. * c-valprint.c (c_val_print): Use extract_typed_address instead of extract_address to extract vtable entries and references. * cp-valprint.c (cp_print_value_fields): Use value_from_pointer instead of value_from_longest to extract the vtable's address. * eval.c (evaluate_subexp_standard): Use value_from_pointer instead of value_from_longest to compute `this', and for doing pointer-to-member dereferencing. * findvar.c (read_register): Use extract_unsigned_integer, not extract_address. (read_var_value): Use store_typed_address instead of store_address for building label values. (locate_var_value): Use value_from_pointer instead of value_from_longest. * hppa-tdep.c (find_stub_with_shl_get): Use value_from_pointer, instead of value_from_longest, to build arguments to __d_shl_get. * printcmd.c (set_next_address): Use value_from_pointer, not value_from_longest. (x_command): Use value_from_pointer, not value_from_longest. * tracepoint.c (set_traceframe_context): Use value_from_pointer, not value_from_longest. * valarith.c (value_add, value_sub): Use value_from_pointer, not value_from_longest. * valops.c (find_function_in_inferior, value_coerce_array, value_coerce_function, value_addr, hand_function_call): Same. * value.h (COERCE_REF): Use unpack_pointer, not unpack_long. * values.c (unpack_long): Use extract_typed_address to produce addresses from pointers and references, not extract_address. (value_from_longest): Use store_typed_address instead of store_address to produce pointer and reference values.
2000-04-14 18:43:41 +00:00
return value_from_pointer (type, (CORE_ADDR) SYMBOL_VALUE_ADDRESS (var));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
default:
return 0;
}
}
/* If the expression starting at *PC has a constant value, return it.
Otherwise, return zero. If we return a value, then *PC will be
advanced to the end of it. If we return zero, *PC could be
anywhere. */
static struct value *
Protoization.
2000-07-30 01:48:28 +00:00
const_expr (union exp_element **pc)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
enum exp_opcode op = (*pc)->opcode;
struct value *v1;
switch (op)
{
case OP_LONG:
{
struct type *type = (*pc)[1].type;
LONGEST k = (*pc)[2].longconst;
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
(*pc) += 4;
return value_from_longest (type, k);
}
case OP_VAR_VALUE:
{
struct value *v = const_var_ref ((*pc)[2].symbol);
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
(*pc) += 4;
return v;
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
/* We could add more operators in here. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case UNOP_NEG:
(*pc)++;
v1 = const_expr (pc);
if (v1)
return value_neg (v1);
else
return 0;
default:
return 0;
}
}
/* Like const_expr, but guarantee also that *PC is undisturbed if the
expression is not constant. */
static struct value *
Protoization.
2000-07-30 01:48:28 +00:00
maybe_const_expr (union exp_element **pc)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
union exp_element *tentative_pc = *pc;
struct value *v = const_expr (&tentative_pc);
/* If we got a value, then update the real PC. */
if (v)
*pc = tentative_pc;
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
return v;
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Generating bytecode from GDB expressions: general assumptions */
/* Here are a few general assumptions made throughout the code; if you
want to make a change that contradicts one of these, then you'd
better scan things pretty thoroughly.
- We assume that all values occupy one stack element. For example,
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
sometimes we'll swap to get at the left argument to a binary
operator. If we decide that void values should occupy no stack
elements, or that synthetic arrays (whose size is determined at
run time, created by the `@' operator) should occupy two stack
elements (address and length), then this will cause trouble.
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
- We assume the stack elements are infinitely wide, and that we
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
don't have to worry what happens if the user requests an
operation that is wider than the actual interpreter's stack.
That is, it's up to the interpreter to handle directly all the
integer widths the user has access to. (Woe betide the language
with bignums!)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
- We don't support side effects. Thus, we don't have to worry about
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
GCC's generalized lvalues, function calls, etc.
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
- We don't support floating point. Many places where we switch on
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
some type don't bother to include cases for floating point; there
may be even more subtle ways this assumption exists. For
example, the arguments to % must be integers.
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
- We assume all subexpressions have a static, unchanging type. If
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
we tried to support convenience variables, this would be a
problem.
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
- All values on the stack should always be fully zero- or
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
sign-extended.
(I wasn't sure whether to choose this or its opposite --- that
only addresses are assumed extended --- but it turns out that
neither convention completely eliminates spurious extend
operations (if everything is always extended, then you have to
extend after add, because it could overflow; if nothing is
extended, then you end up producing extends whenever you change
sizes), and this is simpler.) */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
/* Scan for all static fields in the given class, including any base
classes, and generate tracing bytecodes for each. */
static void
gen_trace_static_fields (struct gdbarch *gdbarch,
struct agent_expr *ax,
struct type *type)
{
int i, nbases = TYPE_N_BASECLASSES (type);
struct axs_value value;
CHECK_TYPEDEF (type);
for (i = TYPE_NFIELDS (type) - 1; i >= nbases; i--)
{
if (field_is_static (&TYPE_FIELD (type, i)))
{
gen_static_field (gdbarch, ax, &value, type, i);
if (value.optimized_out)
continue;
switch (value.kind)
{
case axs_lvalue_memory:
{
* ada-valprint.c (ada_val_print_1): Eliminate single-use variable LEN. * alpha-tdep.c (alpha_extract_return_value): Use TYPE_LENGTH directly. (alpha_store_return_value): Likewise. * amd64-tdep.c (amd64_classify_aggregate): Likewise. (amd64_push_arguments): Likewise. * ax-gdb.c (gen_trace_static_fields): Likewise. (gen_traced_pop): Likewise. * bfin-tdep.c (bfin_push_dummy_call): Likewise. * breakpoint.c (update_watchpoint): Likewise. * findcmd.c (parse_find_args): Use local variable for type instead of length. * findvar.c (default_read_var_value): Use TYPE_LENGTH directly. * h8300-tdep.c (h8300h_extract_return_value): Likewise. (h8300_store_return_value): Likewise. * i386-darwin-tdep.c (i386_darwin_push_dummy_call): Likewise. Use i386_darwin_arg_type_alignment directly. * infcall.c (call_function_by_hand): Use TYPE_LENGTH directly. * lm32-tdep.c (lm32_push_dummy_call): Likewise. * m68hc11-tdep.c (m68hc11_push_dummy_call): Likewise. (m68hc11_extract_return_value): Likewise. * mep-tdep.c (mep_push_dummy_call): Likewise. * printcmd.c (float_type_from_length): Likewise. * s390-tdep.c (s390_value_from_register): Likewise. * stack.c (read_frame_arg): Likewise. * tracepoint.c (encode_actions_1): Likewise. * valops.c (value_fetch_lazy): Use local variable for type instead of length. Use TYPE_LENGTH directly. * value.c (value_contents_equal): Use TYPE_LENGTH directly.
2012-09-25 12:48:53 +00:00
/* Initialize the TYPE_LENGTH if it is a typedef. */
check_typedef (value.type);
ax_const_l (ax, TYPE_LENGTH (value.type));
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
ax_simple (ax, aop_trace);
}
break;
case axs_lvalue_register:
2010-04-23 Stan Shebs <stan@codesourcery.com> * ax.h (struct agent_expr): Merge in agent_reqs fields, add some comments. (struct agent_reqs): Remove. (ax_reg_mask): Declare. * ax-general.c (new_agent_expr): Add gdbarch argument, set new fields. (free_agent_expr): Free reg_mask. (ax_print): Add scope and register mask info. (ax_reqs): Remove agent_reqs argument, use agent expression fields, and move part of register mask computation to... (ax_reg_mask): New function. * ax-gdb.c (gen_trace_static_fields): Call it. (gen_traced_pop): Ditto. (is_nontrivial_conversion): Add dummy gdbarch to new_agent_expr. (gen_trace_for_var): Pass gdbarch to new_agent_expr. (gen_trace_for_expr): Ditto, and clear optimized_out flag. (gen_eval_for_expr): Ditto, and require an rvalue. (agent_command): Call ax_reqs. (agent_eval_command): Ditto. * tracepoint.c (report_agent_reqs_errors): Use agent expression fields. (validate_action_line): Ditto. (collect_symbol): Ditto. (encode_actions_1): Ditto.
2010-04-23 23:51:05 +00:00
/* We don't actually need the register's value to be pushed,
just note that we need it to be collected. */
ax_reg_mask (ax, value.u.reg);
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
default:
break;
}
}
}
/* Now scan through base classes recursively. */
for (i = 0; i < nbases; i++)
{
struct type *basetype = check_typedef (TYPE_BASECLASS (type, i));
gen_trace_static_fields (gdbarch, ax, basetype);
}
}
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Trace the lvalue on the stack, if it needs it. In either case, pop
the value. Useful on the left side of a comma, and at the end of
an expression being used for tracing. */
static void
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
gen_traced_pop (struct gdbarch *gdbarch,
struct agent_expr *ax, struct axs_value *value)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
2011-11-02 Stan Shebs <stan@codesourcery.com> String collection for tracepoints. * NEWS: Mention string collection. * common/ax.def (tracenz): New bytecode. * ax-gdb.h (trace_string_kludge): Declare. * ax-gdb.c: Include valprint.h and c-lang.h. (trace_string_kludge): New global. (gen_traced_pop): Add string case. (agent_command): Add string case. * tracepoint.h (decode_agent_options): Declare. * tracepoint.c: Include cli-utils.h. (decode_agent_options): New function. (validate_actionline): Call it. (encode_actions_1): Ditto. * target.h (struct target_ops): New method to_supports_string_tracing. (target_supports_string_tracing): New macro. * target.c (update_current_target): Add to_supports_string_tracing. * remote.c (struct remote_state): New field string_tracing. (remote_string_tracing_feature): New function. (remote_protocol_features): New feature tracenz. (remote_supports_string_tracing): New function. (init_remote_ops): Set to_supports_string_tracing. * tracepoint.c (agent_mem_read_string): New function. (eval_agent_expr): Call it for tracenz. * server.c (handle_query): Report support for tracenz. * gdb.texinfo (Tracepoint Action Lists): Document collect/s. (General Query Packets): Describe tracenz feature. * agentexpr.texi (Bytecode Descriptions): Describe tracenz. * gdb.trace/collection.c: Add code using strings. * gdb.trace/collection.exp: Add tests of string collection.
2011-11-02 23:44:21 +00:00
int string_trace = 0;
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
if (ax->trace_string
2011-11-02 Stan Shebs <stan@codesourcery.com> String collection for tracepoints. * NEWS: Mention string collection. * common/ax.def (tracenz): New bytecode. * ax-gdb.h (trace_string_kludge): Declare. * ax-gdb.c: Include valprint.h and c-lang.h. (trace_string_kludge): New global. (gen_traced_pop): Add string case. (agent_command): Add string case. * tracepoint.h (decode_agent_options): Declare. * tracepoint.c: Include cli-utils.h. (decode_agent_options): New function. (validate_actionline): Call it. (encode_actions_1): Ditto. * target.h (struct target_ops): New method to_supports_string_tracing. (target_supports_string_tracing): New macro. * target.c (update_current_target): Add to_supports_string_tracing. * remote.c (struct remote_state): New field string_tracing. (remote_string_tracing_feature): New function. (remote_protocol_features): New feature tracenz. (remote_supports_string_tracing): New function. (init_remote_ops): Set to_supports_string_tracing. * tracepoint.c (agent_mem_read_string): New function. (eval_agent_expr): Call it for tracenz. * server.c (handle_query): Report support for tracenz. * gdb.texinfo (Tracepoint Action Lists): Document collect/s. (General Query Packets): Describe tracenz feature. * agentexpr.texi (Bytecode Descriptions): Describe tracenz. * gdb.trace/collection.c: Add code using strings. * gdb.trace/collection.exp: Add tests of string collection.
2011-11-02 23:44:21 +00:00
&& TYPE_CODE (value->type) == TYPE_CODE_PTR
&& c_textual_element_type (check_typedef (TYPE_TARGET_TYPE (value->type)),
's'))
string_trace = 1;
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
if (ax->tracing)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
switch (value->kind)
{
case axs_rvalue:
2011-11-02 Stan Shebs <stan@codesourcery.com> String collection for tracepoints. * NEWS: Mention string collection. * common/ax.def (tracenz): New bytecode. * ax-gdb.h (trace_string_kludge): Declare. * ax-gdb.c: Include valprint.h and c-lang.h. (trace_string_kludge): New global. (gen_traced_pop): Add string case. (agent_command): Add string case. * tracepoint.h (decode_agent_options): Declare. * tracepoint.c: Include cli-utils.h. (decode_agent_options): New function. (validate_actionline): Call it. (encode_actions_1): Ditto. * target.h (struct target_ops): New method to_supports_string_tracing. (target_supports_string_tracing): New macro. * target.c (update_current_target): Add to_supports_string_tracing. * remote.c (struct remote_state): New field string_tracing. (remote_string_tracing_feature): New function. (remote_protocol_features): New feature tracenz. (remote_supports_string_tracing): New function. (init_remote_ops): Set to_supports_string_tracing. * tracepoint.c (agent_mem_read_string): New function. (eval_agent_expr): Call it for tracenz. * server.c (handle_query): Report support for tracenz. * gdb.texinfo (Tracepoint Action Lists): Document collect/s. (General Query Packets): Describe tracenz feature. * agentexpr.texi (Bytecode Descriptions): Describe tracenz. * gdb.trace/collection.c: Add code using strings. * gdb.trace/collection.exp: Add tests of string collection.
2011-11-02 23:44:21 +00:00
if (string_trace)
{
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
ax_const_l (ax, ax->trace_string);
2011-11-02 Stan Shebs <stan@codesourcery.com> String collection for tracepoints. * NEWS: Mention string collection. * common/ax.def (tracenz): New bytecode. * ax-gdb.h (trace_string_kludge): Declare. * ax-gdb.c: Include valprint.h and c-lang.h. (trace_string_kludge): New global. (gen_traced_pop): Add string case. (agent_command): Add string case. * tracepoint.h (decode_agent_options): Declare. * tracepoint.c: Include cli-utils.h. (decode_agent_options): New function. (validate_actionline): Call it. (encode_actions_1): Ditto. * target.h (struct target_ops): New method to_supports_string_tracing. (target_supports_string_tracing): New macro. * target.c (update_current_target): Add to_supports_string_tracing. * remote.c (struct remote_state): New field string_tracing. (remote_string_tracing_feature): New function. (remote_protocol_features): New feature tracenz. (remote_supports_string_tracing): New function. (init_remote_ops): Set to_supports_string_tracing. * tracepoint.c (agent_mem_read_string): New function. (eval_agent_expr): Call it for tracenz. * server.c (handle_query): Report support for tracenz. * gdb.texinfo (Tracepoint Action Lists): Document collect/s. (General Query Packets): Describe tracenz feature. * agentexpr.texi (Bytecode Descriptions): Describe tracenz. * gdb.trace/collection.c: Add code using strings. * gdb.trace/collection.exp: Add tests of string collection.
2011-11-02 23:44:21 +00:00
ax_simple (ax, aop_tracenz);
}
else
/* We don't trace rvalues, just the lvalues necessary to
produce them. So just dispose of this value. */
ax_simple (ax, aop_pop);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
break;
case axs_lvalue_memory:
{
2011-11-02 Stan Shebs <stan@codesourcery.com> String collection for tracepoints. * NEWS: Mention string collection. * common/ax.def (tracenz): New bytecode. * ax-gdb.h (trace_string_kludge): Declare. * ax-gdb.c: Include valprint.h and c-lang.h. (trace_string_kludge): New global. (gen_traced_pop): Add string case. (agent_command): Add string case. * tracepoint.h (decode_agent_options): Declare. * tracepoint.c: Include cli-utils.h. (decode_agent_options): New function. (validate_actionline): Call it. (encode_actions_1): Ditto. * target.h (struct target_ops): New method to_supports_string_tracing. (target_supports_string_tracing): New macro. * target.c (update_current_target): Add to_supports_string_tracing. * remote.c (struct remote_state): New field string_tracing. (remote_string_tracing_feature): New function. (remote_protocol_features): New feature tracenz. (remote_supports_string_tracing): New function. (init_remote_ops): Set to_supports_string_tracing. * tracepoint.c (agent_mem_read_string): New function. (eval_agent_expr): Call it for tracenz. * server.c (handle_query): Report support for tracenz. * gdb.texinfo (Tracepoint Action Lists): Document collect/s. (General Query Packets): Describe tracenz feature. * agentexpr.texi (Bytecode Descriptions): Describe tracenz. * gdb.trace/collection.c: Add code using strings. * gdb.trace/collection.exp: Add tests of string collection.
2011-11-02 23:44:21 +00:00
if (string_trace)
ax_simple (ax, aop_dup);
* ada-valprint.c (ada_val_print_1): Eliminate single-use variable LEN. * alpha-tdep.c (alpha_extract_return_value): Use TYPE_LENGTH directly. (alpha_store_return_value): Likewise. * amd64-tdep.c (amd64_classify_aggregate): Likewise. (amd64_push_arguments): Likewise. * ax-gdb.c (gen_trace_static_fields): Likewise. (gen_traced_pop): Likewise. * bfin-tdep.c (bfin_push_dummy_call): Likewise. * breakpoint.c (update_watchpoint): Likewise. * findcmd.c (parse_find_args): Use local variable for type instead of length. * findvar.c (default_read_var_value): Use TYPE_LENGTH directly. * h8300-tdep.c (h8300h_extract_return_value): Likewise. (h8300_store_return_value): Likewise. * i386-darwin-tdep.c (i386_darwin_push_dummy_call): Likewise. Use i386_darwin_arg_type_alignment directly. * infcall.c (call_function_by_hand): Use TYPE_LENGTH directly. * lm32-tdep.c (lm32_push_dummy_call): Likewise. * m68hc11-tdep.c (m68hc11_push_dummy_call): Likewise. (m68hc11_extract_return_value): Likewise. * mep-tdep.c (mep_push_dummy_call): Likewise. * printcmd.c (float_type_from_length): Likewise. * s390-tdep.c (s390_value_from_register): Likewise. * stack.c (read_frame_arg): Likewise. * tracepoint.c (encode_actions_1): Likewise. * valops.c (value_fetch_lazy): Use local variable for type instead of length. Use TYPE_LENGTH directly. * value.c (value_contents_equal): Use TYPE_LENGTH directly.
2012-09-25 12:48:53 +00:00
/* Initialize the TYPE_LENGTH if it is a typedef. */
check_typedef (value->type);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* There's no point in trying to use a trace_quick bytecode
here, since "trace_quick SIZE pop" is three bytes, whereas
"const8 SIZE trace" is also three bytes, does the same
thing, and the simplest code which generates that will also
work correctly for objects with large sizes. */
* ada-valprint.c (ada_val_print_1): Eliminate single-use variable LEN. * alpha-tdep.c (alpha_extract_return_value): Use TYPE_LENGTH directly. (alpha_store_return_value): Likewise. * amd64-tdep.c (amd64_classify_aggregate): Likewise. (amd64_push_arguments): Likewise. * ax-gdb.c (gen_trace_static_fields): Likewise. (gen_traced_pop): Likewise. * bfin-tdep.c (bfin_push_dummy_call): Likewise. * breakpoint.c (update_watchpoint): Likewise. * findcmd.c (parse_find_args): Use local variable for type instead of length. * findvar.c (default_read_var_value): Use TYPE_LENGTH directly. * h8300-tdep.c (h8300h_extract_return_value): Likewise. (h8300_store_return_value): Likewise. * i386-darwin-tdep.c (i386_darwin_push_dummy_call): Likewise. Use i386_darwin_arg_type_alignment directly. * infcall.c (call_function_by_hand): Use TYPE_LENGTH directly. * lm32-tdep.c (lm32_push_dummy_call): Likewise. * m68hc11-tdep.c (m68hc11_push_dummy_call): Likewise. (m68hc11_extract_return_value): Likewise. * mep-tdep.c (mep_push_dummy_call): Likewise. * printcmd.c (float_type_from_length): Likewise. * s390-tdep.c (s390_value_from_register): Likewise. * stack.c (read_frame_arg): Likewise. * tracepoint.c (encode_actions_1): Likewise. * valops.c (value_fetch_lazy): Use local variable for type instead of length. Use TYPE_LENGTH directly. * value.c (value_contents_equal): Use TYPE_LENGTH directly.
2012-09-25 12:48:53 +00:00
ax_const_l (ax, TYPE_LENGTH (value->type));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
ax_simple (ax, aop_trace);
2011-11-02 Stan Shebs <stan@codesourcery.com> String collection for tracepoints. * NEWS: Mention string collection. * common/ax.def (tracenz): New bytecode. * ax-gdb.h (trace_string_kludge): Declare. * ax-gdb.c: Include valprint.h and c-lang.h. (trace_string_kludge): New global. (gen_traced_pop): Add string case. (agent_command): Add string case. * tracepoint.h (decode_agent_options): Declare. * tracepoint.c: Include cli-utils.h. (decode_agent_options): New function. (validate_actionline): Call it. (encode_actions_1): Ditto. * target.h (struct target_ops): New method to_supports_string_tracing. (target_supports_string_tracing): New macro. * target.c (update_current_target): Add to_supports_string_tracing. * remote.c (struct remote_state): New field string_tracing. (remote_string_tracing_feature): New function. (remote_protocol_features): New feature tracenz. (remote_supports_string_tracing): New function. (init_remote_ops): Set to_supports_string_tracing. * tracepoint.c (agent_mem_read_string): New function. (eval_agent_expr): Call it for tracenz. * server.c (handle_query): Report support for tracenz. * gdb.texinfo (Tracepoint Action Lists): Document collect/s. (General Query Packets): Describe tracenz feature. * agentexpr.texi (Bytecode Descriptions): Describe tracenz. * gdb.trace/collection.c: Add code using strings. * gdb.trace/collection.exp: Add tests of string collection.
2011-11-02 23:44:21 +00:00
if (string_trace)
{
ax_simple (ax, aop_ref32);
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
ax_const_l (ax, ax->trace_string);
2011-11-02 Stan Shebs <stan@codesourcery.com> String collection for tracepoints. * NEWS: Mention string collection. * common/ax.def (tracenz): New bytecode. * ax-gdb.h (trace_string_kludge): Declare. * ax-gdb.c: Include valprint.h and c-lang.h. (trace_string_kludge): New global. (gen_traced_pop): Add string case. (agent_command): Add string case. * tracepoint.h (decode_agent_options): Declare. * tracepoint.c: Include cli-utils.h. (decode_agent_options): New function. (validate_actionline): Call it. (encode_actions_1): Ditto. * target.h (struct target_ops): New method to_supports_string_tracing. (target_supports_string_tracing): New macro. * target.c (update_current_target): Add to_supports_string_tracing. * remote.c (struct remote_state): New field string_tracing. (remote_string_tracing_feature): New function. (remote_protocol_features): New feature tracenz. (remote_supports_string_tracing): New function. (init_remote_ops): Set to_supports_string_tracing. * tracepoint.c (agent_mem_read_string): New function. (eval_agent_expr): Call it for tracenz. * server.c (handle_query): Report support for tracenz. * gdb.texinfo (Tracepoint Action Lists): Document collect/s. (General Query Packets): Describe tracenz feature. * agentexpr.texi (Bytecode Descriptions): Describe tracenz. * gdb.trace/collection.c: Add code using strings. * gdb.trace/collection.exp: Add tests of string collection.
2011-11-02 23:44:21 +00:00
ax_simple (ax, aop_tracenz);
}
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
break;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case axs_lvalue_register:
2010-04-23 Stan Shebs <stan@codesourcery.com> * ax.h (struct agent_expr): Merge in agent_reqs fields, add some comments. (struct agent_reqs): Remove. (ax_reg_mask): Declare. * ax-general.c (new_agent_expr): Add gdbarch argument, set new fields. (free_agent_expr): Free reg_mask. (ax_print): Add scope and register mask info. (ax_reqs): Remove agent_reqs argument, use agent expression fields, and move part of register mask computation to... (ax_reg_mask): New function. * ax-gdb.c (gen_trace_static_fields): Call it. (gen_traced_pop): Ditto. (is_nontrivial_conversion): Add dummy gdbarch to new_agent_expr. (gen_trace_for_var): Pass gdbarch to new_agent_expr. (gen_trace_for_expr): Ditto, and clear optimized_out flag. (gen_eval_for_expr): Ditto, and require an rvalue. (agent_command): Call ax_reqs. (agent_eval_command): Ditto. * tracepoint.c (report_agent_reqs_errors): Use agent expression fields. (validate_action_line): Ditto. (collect_symbol): Ditto. (encode_actions_1): Ditto.
2010-04-23 23:51:05 +00:00
/* We don't actually need the register's value to be on the
stack, and the target will get heartburn if the register is
larger than will fit in a stack, so just mark it for
collection and be done with it. */
ax_reg_mask (ax, value->u.reg);
2011-11-02 Stan Shebs <stan@codesourcery.com> String collection for tracepoints. * NEWS: Mention string collection. * common/ax.def (tracenz): New bytecode. * ax-gdb.h (trace_string_kludge): Declare. * ax-gdb.c: Include valprint.h and c-lang.h. (trace_string_kludge): New global. (gen_traced_pop): Add string case. (agent_command): Add string case. * tracepoint.h (decode_agent_options): Declare. * tracepoint.c: Include cli-utils.h. (decode_agent_options): New function. (validate_actionline): Call it. (encode_actions_1): Ditto. * target.h (struct target_ops): New method to_supports_string_tracing. (target_supports_string_tracing): New macro. * target.c (update_current_target): Add to_supports_string_tracing. * remote.c (struct remote_state): New field string_tracing. (remote_string_tracing_feature): New function. (remote_protocol_features): New feature tracenz. (remote_supports_string_tracing): New function. (init_remote_ops): Set to_supports_string_tracing. * tracepoint.c (agent_mem_read_string): New function. (eval_agent_expr): Call it for tracenz. * server.c (handle_query): Report support for tracenz. * gdb.texinfo (Tracepoint Action Lists): Document collect/s. (General Query Packets): Describe tracenz feature. * agentexpr.texi (Bytecode Descriptions): Describe tracenz. * gdb.trace/collection.c: Add code using strings. * gdb.trace/collection.exp: Add tests of string collection.
2011-11-02 23:44:21 +00:00
/* But if the register points to a string, assume the value
will fit on the stack and push it anyway. */
if (string_trace)
{
ax_reg (ax, value->u.reg);
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
ax_const_l (ax, ax->trace_string);
2011-11-02 Stan Shebs <stan@codesourcery.com> String collection for tracepoints. * NEWS: Mention string collection. * common/ax.def (tracenz): New bytecode. * ax-gdb.h (trace_string_kludge): Declare. * ax-gdb.c: Include valprint.h and c-lang.h. (trace_string_kludge): New global. (gen_traced_pop): Add string case. (agent_command): Add string case. * tracepoint.h (decode_agent_options): Declare. * tracepoint.c: Include cli-utils.h. (decode_agent_options): New function. (validate_actionline): Call it. (encode_actions_1): Ditto. * target.h (struct target_ops): New method to_supports_string_tracing. (target_supports_string_tracing): New macro. * target.c (update_current_target): Add to_supports_string_tracing. * remote.c (struct remote_state): New field string_tracing. (remote_string_tracing_feature): New function. (remote_protocol_features): New feature tracenz. (remote_supports_string_tracing): New function. (init_remote_ops): Set to_supports_string_tracing. * tracepoint.c (agent_mem_read_string): New function. (eval_agent_expr): Call it for tracenz. * server.c (handle_query): Report support for tracenz. * gdb.texinfo (Tracepoint Action Lists): Document collect/s. (General Query Packets): Describe tracenz feature. * agentexpr.texi (Bytecode Descriptions): Describe tracenz. * gdb.trace/collection.c: Add code using strings. * gdb.trace/collection.exp: Add tests of string collection.
2011-11-02 23:44:21 +00:00
ax_simple (ax, aop_tracenz);
}
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
break;
}
else
/* If we're not tracing, just pop the value. */
ax_simple (ax, aop_pop);
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
/* To trace C++ classes with static fields stored elsewhere. */
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
if (ax->tracing
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
&& (TYPE_CODE (value->type) == TYPE_CODE_STRUCT
|| TYPE_CODE (value->type) == TYPE_CODE_UNION))
gen_trace_static_fields (gdbarch, ax, value->type);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Generating bytecode from GDB expressions: helper functions */
/* Assume that the lower bits of the top of the stack is a value of
type TYPE, and the upper bits are zero. Sign-extend if necessary. */
static void
Protoization.
2000-07-30 01:48:28 +00:00
gen_sign_extend (struct agent_expr *ax, struct type *type)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* Do we need to sign-extend this? */
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
if (!TYPE_UNSIGNED (type))
2002-05-13 Daniel Jacobowitz <drow@mvista.com> * ax-gdb.c (gen_sign_extend, gen_fetch, gen_usual_unary) (gen_cast, gen_scale, gen_add, gen_sub, gen_binop, gen_deref) (gen_address_of, gen_struct_ref, gen_repeat): Use type access macros. * c-typeprint.c (cp_type_print_method_args): Likewise. (c_type_print_args): Likewise. * d10v-tdep.c (d10v_push_arguments): Likewise. (d10v_extract_return_value): Likewise. * expprint.c (print_subexp): Likewise. * gdbtypes.c (lookup_primitive_typename): Likewise. (lookup_template_type, add_mangled_type, print_arg_types): Likewise. * gdbtypes.h (TYPE_UNSIGNED, TYPE_NOSIGN, TYPE_STUB) (TYPE_TARGET_STUB, TYPE_STATIC, TYPE_CONST, TYPE_VOLATILE) (TYPE_PROTOTYPED, TYPE_INCOMPLETE, TYPE_CODE_SPACE, TYPE_VARARGS) (TYPE_VECTOR): Likewise. * hpread.c (hpread_read_struct_type) (fix_static_member_physnames, fixup_class_method_type) (hpread_type_lookup): Likewise. * mdebugread.c (parse_symbol, parse_type): Likewise. * p-lang.c (is_pascal_string_type): Likewise. * valops.c (hand_function_call): Likewise. * x86-64-tdep.c (classify_argument): Likewise. * hpread.c (hpread_read_function_type) (hpread_read_doc_function_type): Call replace_type. * dstread.c (create_new_type): Delete. (decode_dst_structure, process_dst_function): Call alloc_type. Use type access macros.
2002-05-13 14:00:36 +00:00
ax_ext (ax, TYPE_LENGTH (type) * TARGET_CHAR_BIT);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
/* Assume the lower bits of the top of the stack hold a value of type
TYPE, and the upper bits are garbage. Sign-extend or truncate as
needed. */
static void
Protoization.
2000-07-30 01:48:28 +00:00
gen_extend (struct agent_expr *ax, struct type *type)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
2002-05-13 Daniel Jacobowitz <drow@mvista.com> * ax-gdb.c (gen_sign_extend, gen_fetch, gen_usual_unary) (gen_cast, gen_scale, gen_add, gen_sub, gen_binop, gen_deref) (gen_address_of, gen_struct_ref, gen_repeat): Use type access macros. * c-typeprint.c (cp_type_print_method_args): Likewise. (c_type_print_args): Likewise. * d10v-tdep.c (d10v_push_arguments): Likewise. (d10v_extract_return_value): Likewise. * expprint.c (print_subexp): Likewise. * gdbtypes.c (lookup_primitive_typename): Likewise. (lookup_template_type, add_mangled_type, print_arg_types): Likewise. * gdbtypes.h (TYPE_UNSIGNED, TYPE_NOSIGN, TYPE_STUB) (TYPE_TARGET_STUB, TYPE_STATIC, TYPE_CONST, TYPE_VOLATILE) (TYPE_PROTOTYPED, TYPE_INCOMPLETE, TYPE_CODE_SPACE, TYPE_VARARGS) (TYPE_VECTOR): Likewise. * hpread.c (hpread_read_struct_type) (fix_static_member_physnames, fixup_class_method_type) (hpread_type_lookup): Likewise. * mdebugread.c (parse_symbol, parse_type): Likewise. * p-lang.c (is_pascal_string_type): Likewise. * valops.c (hand_function_call): Likewise. * x86-64-tdep.c (classify_argument): Likewise. * hpread.c (hpread_read_function_type) (hpread_read_doc_function_type): Call replace_type. * dstread.c (create_new_type): Delete. (decode_dst_structure, process_dst_function): Call alloc_type. Use type access macros.
2002-05-13 14:00:36 +00:00
int bits = TYPE_LENGTH (type) * TARGET_CHAR_BIT;
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* I just had to. */
((TYPE_UNSIGNED (type) ? ax_zero_ext : ax_ext) (ax, bits));
}
/* Assume that the top of the stack contains a value of type "pointer
to TYPE"; generate code to fetch its value. Note that TYPE is the
target type, not the pointer type. */
static void
Protoization.
2000-07-30 01:48:28 +00:00
gen_fetch (struct agent_expr *ax, struct type *type)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
if (ax->tracing)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* Record the area of memory we're about to fetch. */
ax_trace_quick (ax, TYPE_LENGTH (type));
}
ax-gdb.c: Add handling of TYPE_CODE_RANGE types. This patch fixes an error that occurs with GDB + GDBserver when trying to insert a breakpoint with a condition that involves a range type. For instance: type INT_T is range 0 .. 1000; INT_VAR : INT_T := 12; And then trying to insert the breakpoint: (gdb) break foo.adb:18 if int_var > 15 Breakpoint 1 at 0x4021eb: file foo.adb, line 18. (gdb) cont Continuing. /[...]/ax-gdb.c:560: internal-error: gen_fetch: bad type code A problem internal to GDB has been detected, further debugging may prove unreliable. Quit this debugging session? (y or n) This patch fixes the problem by adding handling for range types in gen_fetch. gdb/ChangeLog: * ax-gdb.c (gen_fetch): Add handling for TYPE_CODE_RANGE types.
2012-03-14 01:38:30 +00:00
if (TYPE_CODE (type) == TYPE_CODE_RANGE)
type = TYPE_TARGET_TYPE (type);
2002-05-13 Daniel Jacobowitz <drow@mvista.com> * ax-gdb.c (gen_sign_extend, gen_fetch, gen_usual_unary) (gen_cast, gen_scale, gen_add, gen_sub, gen_binop, gen_deref) (gen_address_of, gen_struct_ref, gen_repeat): Use type access macros. * c-typeprint.c (cp_type_print_method_args): Likewise. (c_type_print_args): Likewise. * d10v-tdep.c (d10v_push_arguments): Likewise. (d10v_extract_return_value): Likewise. * expprint.c (print_subexp): Likewise. * gdbtypes.c (lookup_primitive_typename): Likewise. (lookup_template_type, add_mangled_type, print_arg_types): Likewise. * gdbtypes.h (TYPE_UNSIGNED, TYPE_NOSIGN, TYPE_STUB) (TYPE_TARGET_STUB, TYPE_STATIC, TYPE_CONST, TYPE_VOLATILE) (TYPE_PROTOTYPED, TYPE_INCOMPLETE, TYPE_CODE_SPACE, TYPE_VARARGS) (TYPE_VECTOR): Likewise. * hpread.c (hpread_read_struct_type) (fix_static_member_physnames, fixup_class_method_type) (hpread_type_lookup): Likewise. * mdebugread.c (parse_symbol, parse_type): Likewise. * p-lang.c (is_pascal_string_type): Likewise. * valops.c (hand_function_call): Likewise. * x86-64-tdep.c (classify_argument): Likewise. * hpread.c (hpread_read_function_type) (hpread_read_doc_function_type): Call replace_type. * dstread.c (create_new_type): Delete. (decode_dst_structure, process_dst_function): Call alloc_type. Use type access macros.
2002-05-13 14:00:36 +00:00
switch (TYPE_CODE (type))
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
case TYPE_CODE_PTR:
* language.c (pointer_type): Un-comment out. * ax-gdb.c: Include language.h, use pointer_type throughout instead of testing TYPE_CODE_PTR. (gen_fetch): Include TYPE_CODE_REF. (gen_cast): Ditto.
2009-12-29 23:57:59 +00:00
case TYPE_CODE_REF:
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case TYPE_CODE_ENUM:
case TYPE_CODE_INT:
case TYPE_CODE_CHAR:
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
case TYPE_CODE_BOOL:
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* It's a scalar value, so we know how to dereference it. How
many bytes long is it? */
2002-05-13 Daniel Jacobowitz <drow@mvista.com> * ax-gdb.c (gen_sign_extend, gen_fetch, gen_usual_unary) (gen_cast, gen_scale, gen_add, gen_sub, gen_binop, gen_deref) (gen_address_of, gen_struct_ref, gen_repeat): Use type access macros. * c-typeprint.c (cp_type_print_method_args): Likewise. (c_type_print_args): Likewise. * d10v-tdep.c (d10v_push_arguments): Likewise. (d10v_extract_return_value): Likewise. * expprint.c (print_subexp): Likewise. * gdbtypes.c (lookup_primitive_typename): Likewise. (lookup_template_type, add_mangled_type, print_arg_types): Likewise. * gdbtypes.h (TYPE_UNSIGNED, TYPE_NOSIGN, TYPE_STUB) (TYPE_TARGET_STUB, TYPE_STATIC, TYPE_CONST, TYPE_VOLATILE) (TYPE_PROTOTYPED, TYPE_INCOMPLETE, TYPE_CODE_SPACE, TYPE_VARARGS) (TYPE_VECTOR): Likewise. * hpread.c (hpread_read_struct_type) (fix_static_member_physnames, fixup_class_method_type) (hpread_type_lookup): Likewise. * mdebugread.c (parse_symbol, parse_type): Likewise. * p-lang.c (is_pascal_string_type): Likewise. * valops.c (hand_function_call): Likewise. * x86-64-tdep.c (classify_argument): Likewise. * hpread.c (hpread_read_function_type) (hpread_read_doc_function_type): Call replace_type. * dstread.c (create_new_type): Delete. (decode_dst_structure, process_dst_function): Call alloc_type. Use type access macros.
2002-05-13 14:00:36 +00:00
switch (TYPE_LENGTH (type))
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
case 8 / TARGET_CHAR_BIT:
ax_simple (ax, aop_ref8);
break;
case 16 / TARGET_CHAR_BIT:
ax_simple (ax, aop_ref16);
break;
case 32 / TARGET_CHAR_BIT:
ax_simple (ax, aop_ref32);
break;
case 64 / TARGET_CHAR_BIT:
ax_simple (ax, aop_ref64);
break;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Either our caller shouldn't have asked us to dereference
that pointer (other code's fault), or we're not
implementing something we should be (this code's fault).
In any case, it's a bug the user shouldn't see. */
default:
Add __FILE__ and __LINE__ parameter to internal_error() / internal_verror().
2001-02-08 06:03:54 +00:00
internal_error (__FILE__, __LINE__,
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
_("gen_fetch: strange size"));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
gen_sign_extend (ax, type);
break;
default:
2012-03-08 Luis Machado <lgustavo@codesourcery.com> * ax-gdb.c (gen_fetch): Fail gracefully and use error instead of internal error for unknown/unsupported types.
2012-03-08 21:07:25 +00:00
/* Our caller requested us to dereference a pointer from an unsupported
type. Error out and give callers a chance to handle the failure
gracefully. */
error (_("gen_fetch: Unsupported type code `%s'."),
TYPE_NAME (type));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
}
/* Generate code to left shift the top of the stack by DISTANCE bits, or
right shift it by -DISTANCE bits if DISTANCE < 0. This generates
unsigned (logical) right shifts. */
static void
Protoization.
2000-07-30 01:48:28 +00:00
gen_left_shift (struct agent_expr *ax, int distance)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
if (distance > 0)
{
ax_const_l (ax, distance);
ax_simple (ax, aop_lsh);
}
else if (distance < 0)
{
ax_const_l (ax, -distance);
ax_simple (ax, aop_rsh_unsigned);
}
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Generating bytecode from GDB expressions: symbol references */
/* Generate code to push the base address of the argument portion of
the top stack frame. */
static void
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_frame_args_address (struct gdbarch *gdbarch, struct agent_expr *ax)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
* target.h (TARGET_VIRTUAL_FRAME_POINTER): Delete, multi-arched. * gdbarch.sh (TARGET_VIRTUAL_FRAME_POINTER): Add. * gdbarch.h, gdbarch.c: Regenerate. * arch-utils.h (legacy_virtual_frame_pointer): Declare. * arch-utils.c: Include "gdb_assert.h". (legacy_virtual_frame_pointer): Define. * Makefile.in (arch-utils.o): Depends on gdb_assert.h. * tracepoint.c (encode_actions): Make frame_reg an int. Make frame_offset a LONGEST. * ax-gdb.c (gen_frame_args_address): Ditto. (gen_frame_locals_address): Ditto. * mn10300-tdep.c (mn10300_gdbarch_init): Initialize virtual_frame_pointer. (mn10300_virtual_frame_pointer): Make static. Update parameter list to match function signature. * config/mn10300/tm-mn10300.h (TARGET_VIRTUAL_FRAME_POINTER): Delete.
2001-08-11 00:59:29 +00:00
int frame_reg;
LONGEST frame_offset;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gdbarch_virtual_frame_pointer (gdbarch,
2007-06-12 Markus Deuling <deuling@de.ibm.com> * gdbarch.sh (TARGET_VIRTUAL_FRAME_POINTER): Replace by gdbarch_virtual_frame_pointer. * tracepoint.c (encode_actions): Likewise. * dwarf2loc.c (dwarf2_loc_desc_needs_frame): Likewise. * ax-gdb.c (gen_frame_args_address, gen_frame_locals_address): Likewise. * gdbarch.c, gdbarch.h: Regenerate.
2007-06-12 16:43:39 +00:00
ax->scope, &frame_reg, &frame_offset);
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
ax_reg (ax, frame_reg);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
gen_offset (ax, frame_offset);
}
/* Generate code to push the base address of the locals portion of the
top stack frame. */
static void
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_frame_locals_address (struct gdbarch *gdbarch, struct agent_expr *ax)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
* target.h (TARGET_VIRTUAL_FRAME_POINTER): Delete, multi-arched. * gdbarch.sh (TARGET_VIRTUAL_FRAME_POINTER): Add. * gdbarch.h, gdbarch.c: Regenerate. * arch-utils.h (legacy_virtual_frame_pointer): Declare. * arch-utils.c: Include "gdb_assert.h". (legacy_virtual_frame_pointer): Define. * Makefile.in (arch-utils.o): Depends on gdb_assert.h. * tracepoint.c (encode_actions): Make frame_reg an int. Make frame_offset a LONGEST. * ax-gdb.c (gen_frame_args_address): Ditto. (gen_frame_locals_address): Ditto. * mn10300-tdep.c (mn10300_gdbarch_init): Initialize virtual_frame_pointer. (mn10300_virtual_frame_pointer): Make static. Update parameter list to match function signature. * config/mn10300/tm-mn10300.h (TARGET_VIRTUAL_FRAME_POINTER): Delete.
2001-08-11 00:59:29 +00:00
int frame_reg;
LONGEST frame_offset;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gdbarch_virtual_frame_pointer (gdbarch,
2007-06-12 Markus Deuling <deuling@de.ibm.com> * gdbarch.sh (TARGET_VIRTUAL_FRAME_POINTER): Replace by gdbarch_virtual_frame_pointer. * tracepoint.c (encode_actions): Likewise. * dwarf2loc.c (dwarf2_loc_desc_needs_frame): Likewise. * ax-gdb.c (gen_frame_args_address, gen_frame_locals_address): Likewise. * gdbarch.c, gdbarch.h: Regenerate.
2007-06-12 16:43:39 +00:00
ax->scope, &frame_reg, &frame_offset);
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
ax_reg (ax, frame_reg);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
gen_offset (ax, frame_offset);
}
/* Generate code to add OFFSET to the top of the stack. Try to
generate short and readable code. We use this for getting to
variables on the stack, and structure members. If we were
programming in ML, it would be clearer why these are the same
thing. */
static void
Protoization.
2000-07-30 01:48:28 +00:00
gen_offset (struct agent_expr *ax, int offset)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* It would suffice to simply push the offset and add it, but this
makes it easier to read positive and negative offsets in the
bytecode. */
if (offset > 0)
{
ax_const_l (ax, offset);
ax_simple (ax, aop_add);
}
else if (offset < 0)
{
ax_const_l (ax, -offset);
ax_simple (ax, aop_sub);
}
}
/* In many cases, a symbol's value is the offset from some other
address (stack frame, base register, etc.) Generate code to add
VAR's value to the top of the stack. */
static void
Protoization.
2000-07-30 01:48:28 +00:00
gen_sym_offset (struct agent_expr *ax, struct symbol *var)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
gen_offset (ax, SYMBOL_VALUE (var));
}
/* Generate code for a variable reference to AX. The variable is the
symbol VAR. Set VALUE to describe the result. */
static void
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_var_ref (struct gdbarch *gdbarch, struct agent_expr *ax,
struct axs_value *value, struct symbol *var)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
2010-12-31 Michael Snyder <msnyder@vmware.com> * annotate.c: Comment cleanup, shorten long lines. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * auxv.c: Ditto. * auxv.h: Ditto. * ax-gdb.c: Ditto. * ax-gdb.h: Ditto. * ax-general.c: Ditto. * breakpoint.h: Ditto. * buildsym.h: Ditto.
2010-12-31 19:16:37 +00:00
/* Dereference any typedefs. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
value->type = check_typedef (SYMBOL_TYPE (var));
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
value->optimized_out = 0;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
* ax-gdb.c (gen_var_ref): Unconditionally call via computed ops, if possible. * dwarf2read.c (read_func_scope): Remove old FIXME. * eval.c (evaluate_subexp_standard): Check SYMBOL_COMPUTED_OPS, not LOC_COMPUTED. * findvar.c (symbol_read_needs_frame, default_read_var_value): Unconditionally call via computed ops, if possible. * printcmd.c (address_info): Unconditionally call via computed ops, if possible. * stack.c (read_frame_arg): Unconditionally call via computed ops, if possible. * symtab.c (register_symbol_computed_impl): Sanity check 'ops'. * tracepoint.c (scope_info): Unconditionally call via computed ops, if possible.
2013-03-20 18:35:22 +00:00
if (SYMBOL_COMPUTED_OPS (var) != NULL)
{
SYMBOL_COMPUTED_OPS (var)->tracepoint_var_ref (var, gdbarch, ax, value);
return;
}
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* I'm imitating the code in read_var_value. */
switch (SYMBOL_CLASS (var))
{
case LOC_CONST: /* A constant, like an enum value. */
ax_const_l (ax, (LONGEST) SYMBOL_VALUE (var));
value->kind = axs_rvalue;
break;
case LOC_LABEL: /* A goto label, being used as a value. */
ax_const_l (ax, (LONGEST) SYMBOL_VALUE_ADDRESS (var));
value->kind = axs_rvalue;
break;
case LOC_CONST_BYTES:
Add __FILE__ and __LINE__ parameter to internal_error() / internal_verror().
2001-02-08 06:03:54 +00:00
internal_error (__FILE__, __LINE__,
2011-01-05 Michael Snyder <msnyder@vmware.com> * addrmap.c: Shorten lines of >= 80 columns. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * ax-gdb.c: Ditto. * ax-general.c: Ditto. * bcache.c: Ditto. * blockframe.c: Ditto. * breakpoint.c: Ditto. * buildsym.c: Ditto. * c-lang.c: Ditto. * c-typeprint.c: Ditto. * charset.c: Ditto. * coffread.c: Ditto. * command.h: Ditto. * corelow.c: Ditto. * cp-abi.c: Ditto. * cp-namespace.c: Ditto. * cp-support.c: Ditto. * dbug-rom.c: Ditto. * dbxread.c: Ditto. * defs.h: Ditto. * dfp.c: Ditto. * dfp.h: Ditto. * dictionary.c: Ditto. * disasm.c: Ditto. * doublest.c: Ditto. * dwarf2-frame.c: Ditto. * dwarf2expr.c: Ditto. * dwarf2loc.c: Ditto. * dwarf2read.c: Ditto. * elfread.c: Ditto. * eval.c: Ditto. * event-loop.c: Ditto. * event-loop.h: Ditto. * exceptions.h: Ditto. * exec.c: Ditto. * expprint.c: Ditto. * expression.h: Ditto. * f-lang.c: Ditto. * f-valprint.c: Ditto. * findcmd.c: Ditto. * frame-base.c: Ditto. * frame-unwind.c: Ditto. * frame-unwind.h: Ditto. * frame.c: Ditto. * frame.h: Ditto. * gcore.c: Ditto. * gdb-stabs.h: Ditto. * gdb_assert.h: Ditto. * gdb_dirent.h: Ditto. * gdb_obstack.h: Ditto. * gdbcore.h: Ditto. * gdbtypes.c: Ditto. * gdbtypes.h: Ditto. * inf-ttrace.c: Ditto. * infcall.c: Ditto. * infcmd.c: Ditto. * inflow.c: Ditto. * infrun.c: Ditto. * inline-frame.h: Ditto. * language.c: Ditto. * language.h: Ditto. * libunwind-frame.c: Ditto. * libunwind-frame.h: Ditto. * linespec.c: Ditto. * linux-nat.c: Ditto. * linux-nat.h: Ditto. * linux-thread-db.c: Ditto. * machoread.c: Ditto. * macroexp.c: Ditto. * macrotab.c: Ditto. * main.c: Ditto. * maint.c: Ditto. * mdebugread.c: Ditto. * memattr.c: Ditto. * minsyms.c: Ditto. * monitor.c: Ditto. * monitor.h: Ditto. * objfiles.c: Ditto. * objfiles.h: Ditto. * osabi.c: Ditto. * p-typeprint.c: Ditto. * p-valprint.c: Ditto. * parse.c: Ditto. * printcmd.c: Ditto. * proc-events.c: Ditto. * procfs.c: Ditto. * progspace.c: Ditto. * progspace.h: Ditto. * psympriv.h: Ditto. * psymtab.c: Ditto. * record.c: Ditto. * regcache.c: Ditto. * regcache.h: Ditto. * remote-fileio.c: Ditto. * remote.c: Ditto. * ser-mingw.c: Ditto. * ser-tcp.c: Ditto. * ser-unix.c: Ditto. * serial.c: Ditto. * serial.h: Ditto. * solib-frv.c: Ditto. * solib-irix.c: Ditto. * solib-osf.c: Ditto. * solib-pa64.c: Ditto. * solib-som.c: Ditto. * solib-sunos.c: Ditto. * solib-svr4.c: Ditto. * solib-target.c: Ditto. * solib.c: Ditto. * somread.c: Ditto. * source.c: Ditto. * stabsread.c: Ditto. * stabsread.c: Ditto. * stack.c: Ditto. * stack.h: Ditto. * symfile-mem.c: Ditto. * symfile.c: Ditto. * symfile.h: Ditto. * symmisc.c: Ditto. * symtab.c: Ditto. * symtab.h: Ditto. * target-descriptions.c: Ditto. * target-memory.c: Ditto. * target.c: Ditto. * target.h: Ditto. * terminal.h: Ditto. * thread.c: Ditto. * top.c: Ditto. * tracepoint.c: Ditto. * tracepoint.h: Ditto. * ui-file.c: Ditto. * ui-file.h: Ditto. * ui-out.h: Ditto. * user-regs.c: Ditto. * user-regs.h: Ditto. * utils.c: Ditto. * valarith.c: Ditto. * valops.c: Ditto. * valprint.c: Ditto. * valprint.h: Ditto. * value.c: Ditto. * varobj.c: Ditto. * varobj.h: Ditto. * vec.h: Ditto. * xcoffread.c: Ditto. * xcoffsolib.c: Ditto. * xcoffsolib.h: Ditto. * xml-syscall.c: Ditto. * xml-tdesc.c: Ditto.
2011-01-05 22:22:53 +00:00
_("gen_var_ref: LOC_CONST_BYTES "
"symbols are not supported"));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Variable at a fixed location in memory. Easy. */
case LOC_STATIC:
/* Push the address of the variable. */
ax_const_l (ax, SYMBOL_VALUE_ADDRESS (var));
value->kind = axs_lvalue_memory;
break;
case LOC_ARG: /* var lives in argument area of frame */
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_frame_args_address (gdbarch, ax);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
gen_sym_offset (ax, var);
value->kind = axs_lvalue_memory;
break;
case LOC_REF_ARG: /* As above, but the frame slot really
holds the address of the variable. */
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_frame_args_address (gdbarch, ax);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
gen_sym_offset (ax, var);
/* Don't assume any particular pointer size. */
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_fetch (ax, builtin_type (gdbarch)->builtin_data_ptr);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
value->kind = axs_lvalue_memory;
break;
case LOC_LOCAL: /* var lives in locals area of frame */
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_frame_locals_address (gdbarch, ax);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
gen_sym_offset (ax, var);
value->kind = axs_lvalue_memory;
break;
case LOC_TYPEDEF:
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Cannot compute value of typedef `%s'."),
2003-02-20 David Carlton <carlton@math.stanford.edu> * symtab.h (SYMBOL_PRINT_NAME): Rename from SYMBOL_SOURCE_NAME; expand comment. * ada-lang.c (user_select_syms, ada_finish_decode_line_1): Replace SYMBOL_PRINT_NAME with SYMBOL_SOURCE_NAME. * ada-typeprint.c (ada_typedef_print): Ditto. * ax-gdb.c (gen_var_ref): Ditto. * breakpoint.c (print_one_breakpoint): Ditto. * buildsym.c (finish_block): Ditto. * c-valprint.c (c_val_print): Ditto. * expprint.c (print_subexp): Ditto. * findvar.c (locate_var_value): Ditto. * infcmd.c (jump_command): Ditto. * linespec.c (decode_line_2, decode_compound): Ditto. * maint.c (maintenance_translate_address): Ditto. * objc-lang.c (compare_selectors, compare_classes): Ditto. * printcmd.c (build_address_symbolic, sym_info, print_frame_args): Ditto. * p-valprint.c (pascal_val_print): Ditto. * stabsread.c (define_symbol): Ditto. * stack.c (print_frame, frame_info, print_block_frame_locals) (print_frame_arg_vars, return_command): Ditto. * symfile.c (compare_symbols, compare_psymbols): Ditto. * symmisc.c (print_symbol): Ditto. * symtab.c (lookup_partial_symbol, lookup_block_symbol) (compare_search_syms, print_symbol_info, print_msymbol_info) (rbreak_command): Ditto. * tracepoint.c (tracepoints_info): Ditto. * typeprint.c (typedef_print): Ditto. * valops.c (value_of_variable, hand_function_call): Ditto. * cli/cli-cmds.c (edit_command, list_command): Ditto. * ada-typeprint.c: Update Copyright. * infcmd.c, objc-lang.c, p-valprint.c, symmisc.c: Ditto. * tracepoint.c, cli/cli-cmds.c: Ditto.
2003-02-20 17:17:25 +00:00
SYMBOL_PRINT_NAME (var));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
break;
case LOC_BLOCK:
ax_const_l (ax, BLOCK_START (SYMBOL_BLOCK_VALUE (var)));
value->kind = axs_rvalue;
break;
case LOC_REGISTER:
/* Don't generate any code at all; in the process of treating
this as an lvalue or rvalue, the caller will generate the
right code. */
value->kind = axs_lvalue_register;
* symtab.h: Rename SYMBOL_OPS to SYMBOL_COMPUTED_OPS. * ax-gdb.c (gen_var_ref): Likewise. * findvar.c (read_var_value, symbol_read_needs_frame): Likewise. * printcmd.c (address_info): Likewise. * dwarf2loc.c (dwarf_expr_frame_base): Likewise. * dwarf2read.c (dwarf2_symbol_mark_computed): Likewise. * symtab.h: Rename struct symbol_ops to struct symbol_computed_ops. * dwarf2loc.h: Likewise. * dwarf2loc.c (dwarf2_locexpr_funcs, dwarf2_loclist_funcs): Likewise. * symtab.h: (struct symbol_register_ops): New struct definition. (struct symbol): Make "ops" member a union of symbol_computed_ops and symbol_register_ops callback pointers. (SYMBOL_REGISTER_OPS): New macro. * tracepoint.c: Include "objfiles.h". (scope_info, collect_symbol): Use SYMBOL_REGISTER_OPS register_number callback to retrieve register numbers. * ax-gdb.c (gen_var_ref): Likewise. * findvar.c (read_var_value): Likewise. * printcmd.c (address_info): Likewise. * coffread.c (coff_reg_to_regnum): New function. (coff_register_funcs): New static variable. (process_coff_symbol): Do not call gdbarch_sdb_reg_to_regnum. Install SYMBOL_REGISTER_OPS callbacks. * mdebugread.c (mdebug_reg_to_regnum): New function. (mdebug_register_funcs): New static variable. (parse_symbol): Do not call gdbarch_ecoff_reg_to_regnum. Install SYMBOL_REGISTER_OPS callbacks. * stabsread.c (stab_reg_to_regnum): New function. (stab_register_funcs): New static variable. (define_symbol): Do not call gdbarch_stab_reg_to_regnum. Install SYMBOL_REGISTER_OPS callbacks.
2009-06-04 12:28:39 +00:00
value->u.reg = SYMBOL_REGISTER_OPS (var)->register_number (var, gdbarch);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
break;
/* A lot like LOC_REF_ARG, but the pointer lives directly in a
* symtab.h (enum address_class): Remove LOC_REGPARM and LOC_COMPUTED_ARG. (struct symbol): Add is_argument. (SYMBOL_IS_ARGUMENT): Define. * ada-lang.c (ada_add_block_symbols): Use SYMBOL_IS_ARGUMENT. * buildsym.c (finish_block): Likewise. * stack.c (print_frame_args, print_block_frame_locals) (print_frame_arg_vars): Likewise. * symtab.c (lookup_block_symbol): Likewise. * tracepoint.c (add_local_symbols): Likewise. * mi/mi-cmd-stack.c (list_args_or_locals): Likewise. * coffread.c (process_coff_symbol): Set SYMBOL_IS_ARGUMENT. * dwarf2read.c (new_symbol): Likewise. * mdebugread.c (parse_symbol): Likewise. * stabsread.c (define_symbol): Likewise. * ada-exp.y (select_possible_type_sym): Don't handle LOC_REGPARM and LOC_COMPUTED_ARG. * ada-lang.c (resolve_subexp, symtab_for_sym): Likewise. * ax-gdb.c (gen_var_ref): Likewise. * eval.c (evaluate_subexp_for_address): Likewise. * findvar.c (symbol_read_needs_frame, read_var_value): Likewise. * m2-exp.y (yylex): Likewise. * printcmd.c (address_info): Likewise. * symmisc.c (print_symbol, print_partial_symbols): Likewise. * tracepoint.c (collect_symbol, scope_info): Likewise. testsuite/: * gdb.base/frame-args.exp: Handle arguments that are optimized out.
2008-05-27 19:29:52 +00:00
register, not on the stack. Simpler than LOC_REGISTER
because it's just like any other case where the thing
has a real address. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case LOC_REGPARM_ADDR:
* symtab.h: Rename SYMBOL_OPS to SYMBOL_COMPUTED_OPS. * ax-gdb.c (gen_var_ref): Likewise. * findvar.c (read_var_value, symbol_read_needs_frame): Likewise. * printcmd.c (address_info): Likewise. * dwarf2loc.c (dwarf_expr_frame_base): Likewise. * dwarf2read.c (dwarf2_symbol_mark_computed): Likewise. * symtab.h: Rename struct symbol_ops to struct symbol_computed_ops. * dwarf2loc.h: Likewise. * dwarf2loc.c (dwarf2_locexpr_funcs, dwarf2_loclist_funcs): Likewise. * symtab.h: (struct symbol_register_ops): New struct definition. (struct symbol): Make "ops" member a union of symbol_computed_ops and symbol_register_ops callback pointers. (SYMBOL_REGISTER_OPS): New macro. * tracepoint.c: Include "objfiles.h". (scope_info, collect_symbol): Use SYMBOL_REGISTER_OPS register_number callback to retrieve register numbers. * ax-gdb.c (gen_var_ref): Likewise. * findvar.c (read_var_value): Likewise. * printcmd.c (address_info): Likewise. * coffread.c (coff_reg_to_regnum): New function. (coff_register_funcs): New static variable. (process_coff_symbol): Do not call gdbarch_sdb_reg_to_regnum. Install SYMBOL_REGISTER_OPS callbacks. * mdebugread.c (mdebug_reg_to_regnum): New function. (mdebug_register_funcs): New static variable. (parse_symbol): Do not call gdbarch_ecoff_reg_to_regnum. Install SYMBOL_REGISTER_OPS callbacks. * stabsread.c (stab_reg_to_regnum): New function. (stab_register_funcs): New static variable. (define_symbol): Do not call gdbarch_stab_reg_to_regnum. Install SYMBOL_REGISTER_OPS callbacks.
2009-06-04 12:28:39 +00:00
ax_reg (ax, SYMBOL_REGISTER_OPS (var)->register_number (var, gdbarch));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
value->kind = axs_lvalue_memory;
break;
case LOC_UNRESOLVED:
{
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
struct minimal_symbol *msym
* ax-gdb.c (gen_var_ref): Use SYMBOL_LINKAGE_NAME. * blockframe.c (find_pc_partial_function): Likewise. * buildsym.c (find_symbol_in_list): Likewise. * c-valprint.c (c_val_print): Likewise. * coffread.c (patch_opaque_types, process_coff_symbol): Likewise. (coff_read_enum_type): Likewise. Use SYMBOL_SET_LINKAGE_NAME. * cp-support.c (cp_remove_params): Renamed from remove_params and made global. (overload_list_add_symbol): Update call to remove_params. * cp-support.h (cp_remove_params): Declare. * dwarf2read.c (process_enumeration_scope): Use SYMBOL_LINKAGE_NAME. (dwarf2_const_value): Use SYMBOL_PRINT_NAME. * expprint.c (dump_subexp_body_standard): Likewise. * f-valprint.c (info_common_command, there_is_a_visible_common_named): Use SYMBOL_LINKAGE_NAME to find symbols and SYMBOL_PRINT_NAME for messages. * findvar.c (read_var_value): Use SYMBOL_LINKAGE_NAME. * gnu-v2-abi.c (gnuv2_value_rtti_type): Likewise. * hppa-hpux-tdep.c (hppa32_hpux_in_solib_call_trampoline) (hppa_hpux_skip_trampoline_code): Use SYMBOL_LINKAGE_NAME to find symbols and SYMBOL_PRINT_NAME for messages. * jv-lang.c (add_class_symbol): Use SYMBOL_SET_LINKAGE_NAME. * linespec.c (decode_line_2): Use SYMBOL_LINKAGE_NAME. * mdebugread.c (parse_symbol): Use SYMBOL_LINKAGE_NAME and SYMBOL_SET_LINKAGE_NAME. (mylookup_symbol): Use SYMBOL_LINKAGE_NAME. * minsyms.c (add_minsym_to_demangled_hash_table): Use SYMBOL_SEARCH_NAME. (lookup_minimal_symbol): Use SYMBOL_LINKAGE_NAME or SYMBOL_MATCHES_SEARCH_NAME, depending on the pass. * objfiles.h (ALL_OBJFILE_MSYMBOLS): Use SYMBOL_LINKAGE_NAME. * printcmd.c (build_address_symbolic): Use SYMBOL_LINKAGE_NAME. (address_info): Use SYMBOL_PRINT_NAME for messages and SYMBOL_LINKAGE_NAME for lookups. * sol-thread.c (info_cb): Use SYMBOL_PRINT_NAME for messages. * stabsread.c (patch_block_stabs, define_symbol) (read_type, read_enum_type, common_block_end) (cleanup_undefined_types_1, scan_file_globals): Use SYMBOL_LINKAGE_NAME, SYMBOL_SET_LINKAGE_NAME, ALL_OBJFILE_MSYMBOLS, and SYMBOL_PRINT_NAME. * stack.c (print_frame_args): Use SYMBOL_LINKAGE_NAME. (print_frame, frame_info): Use SYMBOL_PRINT_NAME for output. Use cp_remove_params instead of cplus_demangle. (print_block_frame_labels, print_frame_arg_vars): Use SYMBOL_LINKAGE_NAME. * symmisc.c (dump_msymbols): Use ALL_OBJFILE_MSYMBOLS and SYMBOL_LINKAGE_NAME. (dump_symtab_1, print_symbol, print_partial_symbols) (maintenance_check_symtabs): Use SYMBOL_LINKAGE_NAME. * symtab.h (DEPRECATED_SYMBOL_NAME): Delete. (SYMBOL_SET_LINKAGE_NAME): New. (SYMBOL_SET_NAMES): Add a comment. * tracepoint.c (set_traceframe_context, validate_actionline) (collect_symbol, scope_info): Use SYMBOL_LINKAGE_NAME for lookups and SYMBOL_PRINT_NAME for output. * typeprint.c (typedef_print): Use SYMBOL_LINKAGE_NAME. * xcoffread.c (process_xcoff_symbol): Use SYMBOL_SET_LINKAGE_NAME.
2008-08-21 18:14:39 +00:00
= lookup_minimal_symbol (SYMBOL_LINKAGE_NAME (var), NULL, NULL);
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
if (!msym)
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Couldn't resolve symbol `%s'."), SYMBOL_PRINT_NAME (var));
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Push the address of the variable. */
ax_const_l (ax, SYMBOL_VALUE_ADDRESS (msym));
value->kind = axs_lvalue_memory;
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
break;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
* Makefile.in (dwarf2loc.o): Update dependencies. * ax-gdb.c (gen_var_ref): Handle LOC_COMPUTED and LOC_COMPUTED_ARG. * dwarf2expr.c (read_uleb128, read_sleb128): Make non-static. * dwarf2expr.h (read_uleb128, read_sleb128): Add prototypes. * dwarf2loc.c: Include "ax.h" and "ax-gdb.h". (locexpr_tracepoint_var_ref): New function. (dwarf2_locexpr_funcs): Add locexpr_tracepoint_var_ref.
2003-02-28 20:03:18 +00:00
case LOC_COMPUTED:
* ax-gdb.c (gen_var_ref): Unconditionally call via computed ops, if possible. * dwarf2read.c (read_func_scope): Remove old FIXME. * eval.c (evaluate_subexp_standard): Check SYMBOL_COMPUTED_OPS, not LOC_COMPUTED. * findvar.c (symbol_read_needs_frame, default_read_var_value): Unconditionally call via computed ops, if possible. * printcmd.c (address_info): Unconditionally call via computed ops, if possible. * stack.c (read_frame_arg): Unconditionally call via computed ops, if possible. * symtab.c (register_symbol_computed_impl): Sanity check 'ops'. * tracepoint.c (scope_info): Unconditionally call via computed ops, if possible.
2013-03-20 18:35:22 +00:00
gdb_assert_not_reached (_("LOC_COMPUTED variable missing a method"));
* Makefile.in (dwarf2loc.o): Update dependencies. * ax-gdb.c (gen_var_ref): Handle LOC_COMPUTED and LOC_COMPUTED_ARG. * dwarf2expr.c (read_uleb128, read_sleb128): Make non-static. * dwarf2expr.h (read_uleb128, read_sleb128): Add prototypes. * dwarf2loc.c: Include "ax.h" and "ax-gdb.h". (locexpr_tracepoint_var_ref): New function. (dwarf2_locexpr_funcs): Add locexpr_tracepoint_var_ref.
2003-02-28 20:03:18 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case LOC_OPTIMIZED_OUT:
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
/* Flag this, but don't say anything; leave it up to callers to
warn the user. */
value->optimized_out = 1;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
break;
default:
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Cannot find value of botched symbol `%s'."),
2003-02-20 David Carlton <carlton@math.stanford.edu> * symtab.h (SYMBOL_PRINT_NAME): Rename from SYMBOL_SOURCE_NAME; expand comment. * ada-lang.c (user_select_syms, ada_finish_decode_line_1): Replace SYMBOL_PRINT_NAME with SYMBOL_SOURCE_NAME. * ada-typeprint.c (ada_typedef_print): Ditto. * ax-gdb.c (gen_var_ref): Ditto. * breakpoint.c (print_one_breakpoint): Ditto. * buildsym.c (finish_block): Ditto. * c-valprint.c (c_val_print): Ditto. * expprint.c (print_subexp): Ditto. * findvar.c (locate_var_value): Ditto. * infcmd.c (jump_command): Ditto. * linespec.c (decode_line_2, decode_compound): Ditto. * maint.c (maintenance_translate_address): Ditto. * objc-lang.c (compare_selectors, compare_classes): Ditto. * printcmd.c (build_address_symbolic, sym_info, print_frame_args): Ditto. * p-valprint.c (pascal_val_print): Ditto. * stabsread.c (define_symbol): Ditto. * stack.c (print_frame, frame_info, print_block_frame_locals) (print_frame_arg_vars, return_command): Ditto. * symfile.c (compare_symbols, compare_psymbols): Ditto. * symmisc.c (print_symbol): Ditto. * symtab.c (lookup_partial_symbol, lookup_block_symbol) (compare_search_syms, print_symbol_info, print_msymbol_info) (rbreak_command): Ditto. * tracepoint.c (tracepoints_info): Ditto. * typeprint.c (typedef_print): Ditto. * valops.c (value_of_variable, hand_function_call): Ditto. * cli/cli-cmds.c (edit_command, list_command): Ditto. * ada-typeprint.c: Update Copyright. * infcmd.c, objc-lang.c, p-valprint.c, symmisc.c: Ditto. * tracepoint.c, cli/cli-cmds.c: Ditto.
2003-02-20 17:17:25 +00:00
SYMBOL_PRINT_NAME (var));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
break;
}
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Generating bytecode from GDB expressions: literals */
static void
Protoization.
2000-07-30 01:48:28 +00:00
gen_int_literal (struct agent_expr *ax, struct axs_value *value, LONGEST k,
struct type *type)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
ax_const_l (ax, k);
value->kind = axs_rvalue;
* ax-general.c (gen_traced_pop, gen_int_literal) (gen_usual_arithmetic): Check for typedefs.
2007-10-26 23:04:57 +00:00
value->type = check_typedef (type);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Generating bytecode from GDB expressions: unary conversions, casts */
/* Take what's on the top of the stack (as described by VALUE), and
try to make an rvalue out of it. Signal an error if we can't do
that. */
2012-04-27 Sergio Durigan Junior <sergiodj@redhat.com> Tom Tromey <tromey@redhat.com> Jan Kratochvil <jan.kratochvil@redhat.com> * Makefile.in (SFILES): Add `probe' and `stap-probe'. (COMMON_OBS): Likewise. (HFILES_NO_SRCDIR): Add `probe'. * NEWS: Mention support for static and SystemTap probes. * amd64-tdep.c (amd64_init_abi): Initializing proper fields used by SystemTap probes' arguments parser. * arm-linux-tdep.c: Including headers needed to perform the parsing of SystemTap probes' arguments. (arm_stap_is_single_operand): New function. (arm_stap_parse_special_token): Likewise. (arm_linux_init_abi): Initializing proper fields used by SystemTap probes' arguments parser. * ax-gdb.c (require_rvalue): Removing static declaration. (gen_expr): Likewise. * ax-gdb.h (gen_expr): Declaring function. (require_rvalue): Likewise. * breakpoint.c: Include `gdb_regex.h' and `probe.h'. (bkpt_probe_breakpoint_ops): New variable. (momentary_breakpoint_from_master): Set the `probe' value. (add_location_to_breakpoint): Likewise. (break_command_1): Using proper breakpoint_ops according to the argument passed by the user in the command line. (bkpt_probe_insert_location): New function. (bkpt_probe_remove_location): Likewise. (bkpt_probe_create_sals_from_address): Likewise. (bkpt_probe_decode_linespec): Likewise. (tracepoint_probe_create_sals_from_address): Likewise. (tracepoint_probe_decode_linespec): Likewise. (tracepoint_probe_breakpoint_ops): New variable. (trace_command): Using proper breakpoint_ops according to the argument passed by the user in the command line. (initialize_breakpoint_ops): Initializing breakpoint_ops for static probes on breakpoints and tracepoints. * breakpoint.h (struct bp_location) <probe>: New field. * cli-utils.c (skip_spaces_const): New function. (extract_arg): Likewise. * cli-utils.h (skip_spaces_const): Likewise. (extract_arg): Likewise. * coffread.c (coff_sym_fns): Add `sym_probe_fns' value. * configure.ac: Append `stap-probe.o' to be generated when ELF support is present. * configure: Regenerate. * dbxread.c (aout_sym_fns): Add `sym_probe_fns' value. * elfread.c: Include `probe.h' and `arch-utils.h'. (probe_key): New variable. (elf_get_probes): New function. (elf_get_probe_argument_count): Likewise. (elf_evaluate_probe_argument): Likewise. (elf_compile_to_ax): Likewise. (elf_symfile_relocate_probe): Likewise. (stap_probe_key_free): Likewise. (elf_probe_fns): New variable. (elf_sym_fns): Add `sym_probe_fns' value. (elf_sym_fns_lazy_psyms): Likewise. (elf_sym_fns_gdb_index): Likewise. (_initialize_elfread): Initialize objfile cache for static probes. * gdb_vecs.h (struct probe): New forward declaration. (probe_p): New VEC declaration. * gdbarch.c: Regenerate. * gdbarch.h: Regenerate. * gdbarch.sh (stap_integer_prefix): New variable. (stap_integer_suffix): Likewise. (stap_register_prefix): Likewise. (stap_register_suffix): Likewise. (stap_register_indirection_prefix): Likewise. (stap_register_indirection_suffix): Likewise. (stap_gdb_register_prefix): Likewise. (stap_gdb_register_suffix): Likewise. (stap_is_single_operand): New function. (stap_parse_special_token): Likewise. (struct stap_parse_info): Forward declaration. * i386-tdep.c: Including headers needed to perform the parsing of SystemTap probes' arguments. (i386_stap_is_single_operand): New function. (i386_stap_parse_special_token): Likewise. (i386_elf_init_abi): Initializing proper fields used by SystemTap probes' arguments parser. * i386-tdep.h (i386_stap_is_single_operand): New function. (i386_stap_parse_special_token): Likewise. * machoread.c (macho_sym_fns): Add `sym_probe_fns' value. * mipsread.c (ecoff_sym_fns): Likewise. * objfiles.c (objfile_relocate1): Support relocation for static probes. * parse.c (prefixify_expression): Remove static declaration. (initialize_expout): Likewise. (reallocate_expout): Likewise. * parser-defs.h (initialize_expout): Declare function. (reallocate_expout): Likewise. (prefixify_expression): Likewise. * ppc-linux-tdep.c: Including headers needed to perform the parsing of SystemTap probes' arguments. (ppc_stap_is_single_operand): New function. (ppc_stap_parse_special_token): Likewise. (ppc_linux_init_abi): Initializing proper fields used by SystemTap probes' arguments parser. * probe.c: New file, for generic statically defined probe support. * probe.h: Likewise. * s390-tdep.c: Including headers needed to perform the parsing of SystemTap probes' arguments. (s390_stap_is_single_operand): New function. (s390_gdbarch_init): Initializing proper fields used by SystemTap probes' arguments parser. * somread.c (som_sym_fns): Add `sym_probe_fns' value. * stap-probe.c: New file, for SystemTap probe support. * stap-probe.h: Likewise. * symfile.h: Include `gdb_vecs.h'. (struct sym_probe_fns): New struct. (struct sym_fns) <sym_probe_fns>: New field. * symtab.c (init_sal): Initialize `probe' field. * symtab.h (struct probe): Forward declaration. (struct symtab_and_line) <probe>: New field. * tracepoint.c (start_tracing): Adjust semaphore on breakpoints locations. (stop_tracing): Likewise. * xcoffread.c (xcoff_sym_fns): Add `sym_probe_fns' value.
2012-04-27 20:47:57 +00:00
void
Protoization.
2000-07-30 01:48:28 +00:00
require_rvalue (struct agent_expr *ax, struct axs_value *value)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (require_rvalue): Disallow non-scalars.
2010-03-18 01:47:33 +00:00
/* Only deal with scalars, structs and such may be too large
to fit in a stack entry. */
value->type = check_typedef (value->type);
if (TYPE_CODE (value->type) == TYPE_CODE_ARRAY
|| TYPE_CODE (value->type) == TYPE_CODE_STRUCT
|| TYPE_CODE (value->type) == TYPE_CODE_UNION
|| TYPE_CODE (value->type) == TYPE_CODE_FUNC)
Fix last checkin
2010-03-18 16:01:29 +00:00
error (_("Value not scalar: cannot be an rvalue."));
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (require_rvalue): Disallow non-scalars.
2010-03-18 01:47:33 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
switch (value->kind)
{
case axs_rvalue:
/* It's already an rvalue. */
break;
case axs_lvalue_memory:
/* The top of stack is the address of the object. Dereference. */
gen_fetch (ax, value->type);
break;
case axs_lvalue_register:
/* There's nothing on the stack, but value->u.reg is the
register number containing the value.
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
When we add floating-point support, this is going to have to
change. What about SPARC register pairs, for example? */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
ax_reg (ax, value->u.reg);
gen_extend (ax, value->type);
break;
}
value->kind = axs_rvalue;
}
/* Assume the top of the stack is described by VALUE, and perform the
usual unary conversions. This is motivated by ANSI 6.2.2, but of
course GDB expressions are not ANSI; they're the mishmash union of
a bunch of languages. Rah.
NOTE! This function promises to produce an rvalue only when the
incoming value is of an appropriate type. In other words, the
consumer of the value this function produces may assume the value
is an rvalue only after checking its type.
The immediate issue is that if the user tries to use a structure or
union as an operand of, say, the `+' operator, we don't want to try
to convert that structure to an rvalue; require_rvalue will bomb on
structs and unions. Rather, we want to simply pass the struct
lvalue through unchanged, and let `+' raise an error. */
static void
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_usual_unary (struct expression *exp, struct agent_expr *ax,
struct axs_value *value)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* We don't have to generate any code for the usual integral
conversions, since values are always represented as full-width on
the stack. Should we tweak the type? */
/* Some types require special handling. */
2002-05-13 Daniel Jacobowitz <drow@mvista.com> * ax-gdb.c (gen_sign_extend, gen_fetch, gen_usual_unary) (gen_cast, gen_scale, gen_add, gen_sub, gen_binop, gen_deref) (gen_address_of, gen_struct_ref, gen_repeat): Use type access macros. * c-typeprint.c (cp_type_print_method_args): Likewise. (c_type_print_args): Likewise. * d10v-tdep.c (d10v_push_arguments): Likewise. (d10v_extract_return_value): Likewise. * expprint.c (print_subexp): Likewise. * gdbtypes.c (lookup_primitive_typename): Likewise. (lookup_template_type, add_mangled_type, print_arg_types): Likewise. * gdbtypes.h (TYPE_UNSIGNED, TYPE_NOSIGN, TYPE_STUB) (TYPE_TARGET_STUB, TYPE_STATIC, TYPE_CONST, TYPE_VOLATILE) (TYPE_PROTOTYPED, TYPE_INCOMPLETE, TYPE_CODE_SPACE, TYPE_VARARGS) (TYPE_VECTOR): Likewise. * hpread.c (hpread_read_struct_type) (fix_static_member_physnames, fixup_class_method_type) (hpread_type_lookup): Likewise. * mdebugread.c (parse_symbol, parse_type): Likewise. * p-lang.c (is_pascal_string_type): Likewise. * valops.c (hand_function_call): Likewise. * x86-64-tdep.c (classify_argument): Likewise. * hpread.c (hpread_read_function_type) (hpread_read_doc_function_type): Call replace_type. * dstread.c (create_new_type): Delete. (decode_dst_structure, process_dst_function): Call alloc_type. Use type access macros.
2002-05-13 14:00:36 +00:00
switch (TYPE_CODE (value->type))
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* Functions get converted to a pointer to the function. */
case TYPE_CODE_FUNC:
value->type = lookup_pointer_type (value->type);
value->kind = axs_rvalue; /* Should always be true, but just in case. */
break;
/* Arrays get converted to a pointer to their first element, and
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
are no longer an lvalue. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case TYPE_CODE_ARRAY:
{
struct type *elements = TYPE_TARGET_TYPE (value->type);
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
value->type = lookup_pointer_type (elements);
value->kind = axs_rvalue;
/* We don't need to generate any code; the address of the array
is also the address of its first element. */
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
break;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
/* Don't try to convert structures and unions to rvalues. Let the
consumer signal an error. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case TYPE_CODE_STRUCT:
case TYPE_CODE_UNION:
return;
}
/* If the value is an lvalue, dereference it. */
require_rvalue (ax, value);
}
/* Return non-zero iff the type TYPE1 is considered "wider" than the
type TYPE2, according to the rules described in gen_usual_arithmetic. */
static int
Protoization.
2000-07-30 01:48:28 +00:00
type_wider_than (struct type *type1, struct type *type2)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
return (TYPE_LENGTH (type1) > TYPE_LENGTH (type2)
|| (TYPE_LENGTH (type1) == TYPE_LENGTH (type2)
&& TYPE_UNSIGNED (type1)
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
&& !TYPE_UNSIGNED (type2)));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
/* Return the "wider" of the two types TYPE1 and TYPE2. */
static struct type *
Protoization.
2000-07-30 01:48:28 +00:00
max_type (struct type *type1, struct type *type2)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
return type_wider_than (type1, type2) ? type1 : type2;
}
/* Generate code to convert a scalar value of type FROM to type TO. */
static void
Protoization.
2000-07-30 01:48:28 +00:00
gen_conversion (struct agent_expr *ax, struct type *from, struct type *to)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* Perhaps there is a more graceful way to state these rules. */
/* If we're converting to a narrower type, then we need to clear out
the upper bits. */
if (TYPE_LENGTH (to) < TYPE_LENGTH (from))
gen_extend (ax, from);
/* If the two values have equal width, but different signednesses,
then we need to extend. */
else if (TYPE_LENGTH (to) == TYPE_LENGTH (from))
{
if (TYPE_UNSIGNED (from) != TYPE_UNSIGNED (to))
gen_extend (ax, to);
}
/* If we're converting to a wider type, and becoming unsigned, then
we need to zero out any possible sign bits. */
else if (TYPE_LENGTH (to) > TYPE_LENGTH (from))
{
if (TYPE_UNSIGNED (to))
gen_extend (ax, to);
}
}
/* Return non-zero iff the type FROM will require any bytecodes to be
emitted to be converted to the type TO. */
static int
Protoization.
2000-07-30 01:48:28 +00:00
is_nontrivial_conversion (struct type *from, struct type *to)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
2010-04-23 Stan Shebs <stan@codesourcery.com> * ax.h (struct agent_expr): Merge in agent_reqs fields, add some comments. (struct agent_reqs): Remove. (ax_reg_mask): Declare. * ax-general.c (new_agent_expr): Add gdbarch argument, set new fields. (free_agent_expr): Free reg_mask. (ax_print): Add scope and register mask info. (ax_reqs): Remove agent_reqs argument, use agent expression fields, and move part of register mask computation to... (ax_reg_mask): New function. * ax-gdb.c (gen_trace_static_fields): Call it. (gen_traced_pop): Ditto. (is_nontrivial_conversion): Add dummy gdbarch to new_agent_expr. (gen_trace_for_var): Pass gdbarch to new_agent_expr. (gen_trace_for_expr): Ditto, and clear optimized_out flag. (gen_eval_for_expr): Ditto, and require an rvalue. (agent_command): Call ax_reqs. (agent_eval_command): Ditto. * tracepoint.c (report_agent_reqs_errors): Use agent expression fields. (validate_action_line): Ditto. (collect_symbol): Ditto. (encode_actions_1): Ditto.
2010-04-23 23:51:05 +00:00
struct agent_expr *ax = new_agent_expr (NULL, 0);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
int nontrivial;
/* Actually generate the code, and see if anything came out. At the
moment, it would be trivial to replicate the code in
gen_conversion here, but in the future, when we're supporting
floating point and the like, it may not be. Doing things this
way allows this function to be independent of the logic in
gen_conversion. */
gen_conversion (ax, from, to);
nontrivial = ax->len > 0;
free_agent_expr (ax);
return nontrivial;
}
/* Generate code to perform the "usual arithmetic conversions" (ANSI C
6.2.1.5) for the two operands of an arithmetic operator. This
effectively finds a "least upper bound" type for the two arguments,
and promotes each argument to that type. *VALUE1 and *VALUE2
describe the values as they are passed in, and as they are left. */
static void
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_usual_arithmetic (struct expression *exp, struct agent_expr *ax,
struct axs_value *value1, struct axs_value *value2)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* Do the usual binary conversions. */
if (TYPE_CODE (value1->type) == TYPE_CODE_INT
&& TYPE_CODE (value2->type) == TYPE_CODE_INT)
{
/* The ANSI integral promotions seem to work this way: Order the
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
integer types by size, and then by signedness: an n-bit
unsigned type is considered "wider" than an n-bit signed
type. Promote to the "wider" of the two types, and always
promote at least to int. */
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
struct type *target = max_type (builtin_type (exp->gdbarch)->builtin_int,
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
max_type (value1->type, value2->type));
/* Deal with value2, on the top of the stack. */
gen_conversion (ax, value2->type, target);
/* Deal with value1, not on the top of the stack. Don't
generate the `swap' instructions if we're not actually going
to do anything. */
if (is_nontrivial_conversion (value1->type, target))
{
ax_simple (ax, aop_swap);
gen_conversion (ax, value1->type, target);
ax_simple (ax, aop_swap);
}
* ax-general.c (gen_traced_pop, gen_int_literal) (gen_usual_arithmetic): Check for typedefs.
2007-10-26 23:04:57 +00:00
value1->type = value2->type = check_typedef (target);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
}
/* Generate code to perform the integral promotions (ANSI 6.2.1.1) on
the value on the top of the stack, as described by VALUE. Assume
the value has integral type. */
static void
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_integral_promotions (struct expression *exp, struct agent_expr *ax,
struct axs_value *value)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
const struct builtin_type *builtin = builtin_type (exp->gdbarch);
if (!type_wider_than (value->type, builtin->builtin_int))
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_conversion (ax, value->type, builtin->builtin_int);
value->type = builtin->builtin_int;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
else if (!type_wider_than (value->type, builtin->builtin_unsigned_int))
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_conversion (ax, value->type, builtin->builtin_unsigned_int);
value->type = builtin->builtin_unsigned_int;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
}
/* Generate code for a cast to TYPE. */
static void
Protoization.
2000-07-30 01:48:28 +00:00
gen_cast (struct agent_expr *ax, struct axs_value *value, struct type *type)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* GCC does allow casts to yield lvalues, so this should be fixed
before merging these changes into the trunk. */
require_rvalue (ax, value);
2010-12-31 Michael Snyder <msnyder@vmware.com> * annotate.c: Comment cleanup, shorten long lines. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * auxv.c: Ditto. * auxv.h: Ditto. * ax-gdb.c: Ditto. * ax-gdb.h: Ditto. * ax-general.c: Ditto. * breakpoint.h: Ditto. * buildsym.h: Ditto.
2010-12-31 19:16:37 +00:00
/* Dereference typedefs. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
type = check_typedef (type);
2002-05-13 Daniel Jacobowitz <drow@mvista.com> * ax-gdb.c (gen_sign_extend, gen_fetch, gen_usual_unary) (gen_cast, gen_scale, gen_add, gen_sub, gen_binop, gen_deref) (gen_address_of, gen_struct_ref, gen_repeat): Use type access macros. * c-typeprint.c (cp_type_print_method_args): Likewise. (c_type_print_args): Likewise. * d10v-tdep.c (d10v_push_arguments): Likewise. (d10v_extract_return_value): Likewise. * expprint.c (print_subexp): Likewise. * gdbtypes.c (lookup_primitive_typename): Likewise. (lookup_template_type, add_mangled_type, print_arg_types): Likewise. * gdbtypes.h (TYPE_UNSIGNED, TYPE_NOSIGN, TYPE_STUB) (TYPE_TARGET_STUB, TYPE_STATIC, TYPE_CONST, TYPE_VOLATILE) (TYPE_PROTOTYPED, TYPE_INCOMPLETE, TYPE_CODE_SPACE, TYPE_VARARGS) (TYPE_VECTOR): Likewise. * hpread.c (hpread_read_struct_type) (fix_static_member_physnames, fixup_class_method_type) (hpread_type_lookup): Likewise. * mdebugread.c (parse_symbol, parse_type): Likewise. * p-lang.c (is_pascal_string_type): Likewise. * valops.c (hand_function_call): Likewise. * x86-64-tdep.c (classify_argument): Likewise. * hpread.c (hpread_read_function_type) (hpread_read_doc_function_type): Call replace_type. * dstread.c (create_new_type): Delete. (decode_dst_structure, process_dst_function): Call alloc_type. Use type access macros.
2002-05-13 14:00:36 +00:00
switch (TYPE_CODE (type))
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
case TYPE_CODE_PTR:
* language.c (pointer_type): Un-comment out. * ax-gdb.c: Include language.h, use pointer_type throughout instead of testing TYPE_CODE_PTR. (gen_fetch): Include TYPE_CODE_REF. (gen_cast): Ditto.
2009-12-29 23:57:59 +00:00
case TYPE_CODE_REF:
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* It's implementation-defined, and I'll bet this is what GCC
does. */
break;
case TYPE_CODE_ARRAY:
case TYPE_CODE_STRUCT:
case TYPE_CODE_UNION:
case TYPE_CODE_FUNC:
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Invalid type cast: intended type must be scalar."));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case TYPE_CODE_ENUM:
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
case TYPE_CODE_BOOL:
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* We don't have to worry about the size of the value, because
all our integral values are fully sign-extended, and when
casting pointers we can do anything we like. Is there any
* ax-gdb.c (gen_cast): Remove redundant assignment to value->type. Doc fix.
2007-10-26 23:07:26 +00:00
way for us to know what GCC actually does with a cast like
this? */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
break;
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case TYPE_CODE_INT:
gen_conversion (ax, value->type, type);
break;
case TYPE_CODE_VOID:
/* We could pop the value, and rely on everyone else to check
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
the type and notice that this value doesn't occupy a stack
slot. But for now, leave the value on the stack, and
preserve the "value == stack element" assumption. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
break;
default:
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Casts to requested type are not yet implemented."));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
value->type = type;
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Generating bytecode from GDB expressions: arithmetic */
/* Scale the integer on the top of the stack by the size of the target
of the pointer type TYPE. */
static void
Protoization.
2000-07-30 01:48:28 +00:00
gen_scale (struct agent_expr *ax, enum agent_op op, struct type *type)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
struct type *element = TYPE_TARGET_TYPE (type);
2002-05-13 Daniel Jacobowitz <drow@mvista.com> * ax-gdb.c (gen_sign_extend, gen_fetch, gen_usual_unary) (gen_cast, gen_scale, gen_add, gen_sub, gen_binop, gen_deref) (gen_address_of, gen_struct_ref, gen_repeat): Use type access macros. * c-typeprint.c (cp_type_print_method_args): Likewise. (c_type_print_args): Likewise. * d10v-tdep.c (d10v_push_arguments): Likewise. (d10v_extract_return_value): Likewise. * expprint.c (print_subexp): Likewise. * gdbtypes.c (lookup_primitive_typename): Likewise. (lookup_template_type, add_mangled_type, print_arg_types): Likewise. * gdbtypes.h (TYPE_UNSIGNED, TYPE_NOSIGN, TYPE_STUB) (TYPE_TARGET_STUB, TYPE_STATIC, TYPE_CONST, TYPE_VOLATILE) (TYPE_PROTOTYPED, TYPE_INCOMPLETE, TYPE_CODE_SPACE, TYPE_VARARGS) (TYPE_VECTOR): Likewise. * hpread.c (hpread_read_struct_type) (fix_static_member_physnames, fixup_class_method_type) (hpread_type_lookup): Likewise. * mdebugread.c (parse_symbol, parse_type): Likewise. * p-lang.c (is_pascal_string_type): Likewise. * valops.c (hand_function_call): Likewise. * x86-64-tdep.c (classify_argument): Likewise. * hpread.c (hpread_read_function_type) (hpread_read_doc_function_type): Call replace_type. * dstread.c (create_new_type): Delete. (decode_dst_structure, process_dst_function): Call alloc_type. Use type access macros.
2002-05-13 14:00:36 +00:00
if (TYPE_LENGTH (element) != 1)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
2002-05-13 Daniel Jacobowitz <drow@mvista.com> * ax-gdb.c (gen_sign_extend, gen_fetch, gen_usual_unary) (gen_cast, gen_scale, gen_add, gen_sub, gen_binop, gen_deref) (gen_address_of, gen_struct_ref, gen_repeat): Use type access macros. * c-typeprint.c (cp_type_print_method_args): Likewise. (c_type_print_args): Likewise. * d10v-tdep.c (d10v_push_arguments): Likewise. (d10v_extract_return_value): Likewise. * expprint.c (print_subexp): Likewise. * gdbtypes.c (lookup_primitive_typename): Likewise. (lookup_template_type, add_mangled_type, print_arg_types): Likewise. * gdbtypes.h (TYPE_UNSIGNED, TYPE_NOSIGN, TYPE_STUB) (TYPE_TARGET_STUB, TYPE_STATIC, TYPE_CONST, TYPE_VOLATILE) (TYPE_PROTOTYPED, TYPE_INCOMPLETE, TYPE_CODE_SPACE, TYPE_VARARGS) (TYPE_VECTOR): Likewise. * hpread.c (hpread_read_struct_type) (fix_static_member_physnames, fixup_class_method_type) (hpread_type_lookup): Likewise. * mdebugread.c (parse_symbol, parse_type): Likewise. * p-lang.c (is_pascal_string_type): Likewise. * valops.c (hand_function_call): Likewise. * x86-64-tdep.c (classify_argument): Likewise. * hpread.c (hpread_read_function_type) (hpread_read_doc_function_type): Call replace_type. * dstread.c (create_new_type): Delete. (decode_dst_structure, process_dst_function): Call alloc_type. Use type access macros.
2002-05-13 14:00:36 +00:00
ax_const_l (ax, TYPE_LENGTH (element));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
ax_simple (ax, op);
}
}
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
/* Generate code for pointer arithmetic PTR + INT. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
static void
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_ptradd (struct agent_expr *ax, struct axs_value *value,
struct axs_value *value1, struct axs_value *value2)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
* language.c (pointer_type): Un-comment out. * ax-gdb.c: Include language.h, use pointer_type throughout instead of testing TYPE_CODE_PTR. (gen_fetch): Include TYPE_CODE_REF. (gen_cast): Ditto.
2009-12-29 23:57:59 +00:00
gdb_assert (pointer_type (value1->type));
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gdb_assert (TYPE_CODE (value2->type) == TYPE_CODE_INT);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_scale (ax, aop_mul, value1->type);
ax_simple (ax, aop_add);
gen_extend (ax, value1->type); /* Catch overflow. */
value->type = value1->type;
value->kind = axs_rvalue;
}
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
/* Generate code for pointer arithmetic PTR - INT. */
static void
gen_ptrsub (struct agent_expr *ax, struct axs_value *value,
struct axs_value *value1, struct axs_value *value2)
{
* language.c (pointer_type): Un-comment out. * ax-gdb.c: Include language.h, use pointer_type throughout instead of testing TYPE_CODE_PTR. (gen_fetch): Include TYPE_CODE_REF. (gen_cast): Ditto.
2009-12-29 23:57:59 +00:00
gdb_assert (pointer_type (value1->type));
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gdb_assert (TYPE_CODE (value2->type) == TYPE_CODE_INT);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_scale (ax, aop_mul, value1->type);
ax_simple (ax, aop_sub);
gen_extend (ax, value1->type); /* Catch overflow. */
value->type = value1->type;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
value->kind = axs_rvalue;
}
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
/* Generate code for pointer arithmetic PTR - PTR. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
static void
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_ptrdiff (struct agent_expr *ax, struct axs_value *value,
struct axs_value *value1, struct axs_value *value2,
struct type *result_type)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
* language.c (pointer_type): Un-comment out. * ax-gdb.c: Include language.h, use pointer_type throughout instead of testing TYPE_CODE_PTR. (gen_fetch): Include TYPE_CODE_REF. (gen_cast): Ditto.
2009-12-29 23:57:59 +00:00
gdb_assert (pointer_type (value1->type));
gdb_assert (pointer_type (value2->type));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
if (TYPE_LENGTH (TYPE_TARGET_TYPE (value1->type))
!= TYPE_LENGTH (TYPE_TARGET_TYPE (value2->type)))
2011-01-07 Michael Snyder <msnyder@vmware.com> * ax-gdb.c: Adjust some long output strings. * breakpoint.c: Ditto. * charset.c: Ditto. * cp-abi.c: Ditto. * infcall.c: Ditto. * infrun.c: Ditto. * linux-nat.c: Ditto. * solib-pa64.c: Ditto. * solib-som.c: Ditto.
2011-01-07 17:35:27 +00:00
error (_("\
First argument of `-' is a pointer, but second argument is neither\n\
an integer nor a pointer of the same type."));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
ax_simple (ax, aop_sub);
gen_scale (ax, aop_div_unsigned, value1->type);
value->type = result_type;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
value->kind = axs_rvalue;
}
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
static void
gen_equal (struct agent_expr *ax, struct axs_value *value,
struct axs_value *value1, struct axs_value *value2,
struct type *result_type)
{
if (pointer_type (value1->type) || pointer_type (value2->type))
ax_simple (ax, aop_equal);
else
gen_binop (ax, value, value1, value2,
aop_equal, aop_equal, 0, "equal");
value->type = result_type;
value->kind = axs_rvalue;
}
static void
gen_less (struct agent_expr *ax, struct axs_value *value,
struct axs_value *value1, struct axs_value *value2,
struct type *result_type)
{
if (pointer_type (value1->type) || pointer_type (value2->type))
ax_simple (ax, aop_less_unsigned);
else
gen_binop (ax, value, value1, value2,
aop_less_signed, aop_less_unsigned, 0, "less than");
value->type = result_type;
value->kind = axs_rvalue;
}
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Generate code for a binary operator that doesn't do pointer magic.
We set VALUE to describe the result value; we assume VALUE1 and
VALUE2 describe the two operands, and that they've undergone the
usual binary conversions. MAY_CARRY should be non-zero iff the
result needs to be extended. NAME is the English name of the
operator, used in error messages */
static void
Protoization.
2000-07-30 01:48:28 +00:00
gen_binop (struct agent_expr *ax, struct axs_value *value,
2011-01-05 Michael Snyder <msnyder@vmware.com> * addrmap.c: Shorten lines of >= 80 columns. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * ax-gdb.c: Ditto. * ax-general.c: Ditto. * bcache.c: Ditto. * blockframe.c: Ditto. * breakpoint.c: Ditto. * buildsym.c: Ditto. * c-lang.c: Ditto. * c-typeprint.c: Ditto. * charset.c: Ditto. * coffread.c: Ditto. * command.h: Ditto. * corelow.c: Ditto. * cp-abi.c: Ditto. * cp-namespace.c: Ditto. * cp-support.c: Ditto. * dbug-rom.c: Ditto. * dbxread.c: Ditto. * defs.h: Ditto. * dfp.c: Ditto. * dfp.h: Ditto. * dictionary.c: Ditto. * disasm.c: Ditto. * doublest.c: Ditto. * dwarf2-frame.c: Ditto. * dwarf2expr.c: Ditto. * dwarf2loc.c: Ditto. * dwarf2read.c: Ditto. * elfread.c: Ditto. * eval.c: Ditto. * event-loop.c: Ditto. * event-loop.h: Ditto. * exceptions.h: Ditto. * exec.c: Ditto. * expprint.c: Ditto. * expression.h: Ditto. * f-lang.c: Ditto. * f-valprint.c: Ditto. * findcmd.c: Ditto. * frame-base.c: Ditto. * frame-unwind.c: Ditto. * frame-unwind.h: Ditto. * frame.c: Ditto. * frame.h: Ditto. * gcore.c: Ditto. * gdb-stabs.h: Ditto. * gdb_assert.h: Ditto. * gdb_dirent.h: Ditto. * gdb_obstack.h: Ditto. * gdbcore.h: Ditto. * gdbtypes.c: Ditto. * gdbtypes.h: Ditto. * inf-ttrace.c: Ditto. * infcall.c: Ditto. * infcmd.c: Ditto. * inflow.c: Ditto. * infrun.c: Ditto. * inline-frame.h: Ditto. * language.c: Ditto. * language.h: Ditto. * libunwind-frame.c: Ditto. * libunwind-frame.h: Ditto. * linespec.c: Ditto. * linux-nat.c: Ditto. * linux-nat.h: Ditto. * linux-thread-db.c: Ditto. * machoread.c: Ditto. * macroexp.c: Ditto. * macrotab.c: Ditto. * main.c: Ditto. * maint.c: Ditto. * mdebugread.c: Ditto. * memattr.c: Ditto. * minsyms.c: Ditto. * monitor.c: Ditto. * monitor.h: Ditto. * objfiles.c: Ditto. * objfiles.h: Ditto. * osabi.c: Ditto. * p-typeprint.c: Ditto. * p-valprint.c: Ditto. * parse.c: Ditto. * printcmd.c: Ditto. * proc-events.c: Ditto. * procfs.c: Ditto. * progspace.c: Ditto. * progspace.h: Ditto. * psympriv.h: Ditto. * psymtab.c: Ditto. * record.c: Ditto. * regcache.c: Ditto. * regcache.h: Ditto. * remote-fileio.c: Ditto. * remote.c: Ditto. * ser-mingw.c: Ditto. * ser-tcp.c: Ditto. * ser-unix.c: Ditto. * serial.c: Ditto. * serial.h: Ditto. * solib-frv.c: Ditto. * solib-irix.c: Ditto. * solib-osf.c: Ditto. * solib-pa64.c: Ditto. * solib-som.c: Ditto. * solib-sunos.c: Ditto. * solib-svr4.c: Ditto. * solib-target.c: Ditto. * solib.c: Ditto. * somread.c: Ditto. * source.c: Ditto. * stabsread.c: Ditto. * stabsread.c: Ditto. * stack.c: Ditto. * stack.h: Ditto. * symfile-mem.c: Ditto. * symfile.c: Ditto. * symfile.h: Ditto. * symmisc.c: Ditto. * symtab.c: Ditto. * symtab.h: Ditto. * target-descriptions.c: Ditto. * target-memory.c: Ditto. * target.c: Ditto. * target.h: Ditto. * terminal.h: Ditto. * thread.c: Ditto. * top.c: Ditto. * tracepoint.c: Ditto. * tracepoint.h: Ditto. * ui-file.c: Ditto. * ui-file.h: Ditto. * ui-out.h: Ditto. * user-regs.c: Ditto. * user-regs.h: Ditto. * utils.c: Ditto. * valarith.c: Ditto. * valops.c: Ditto. * valprint.c: Ditto. * valprint.h: Ditto. * value.c: Ditto. * varobj.c: Ditto. * varobj.h: Ditto. * vec.h: Ditto. * xcoffread.c: Ditto. * xcoffsolib.c: Ditto. * xcoffsolib.h: Ditto. * xml-syscall.c: Ditto. * xml-tdesc.c: Ditto.
2011-01-05 22:22:53 +00:00
struct axs_value *value1, struct axs_value *value2,
enum agent_op op, enum agent_op op_unsigned,
int may_carry, char *name)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* We only handle INT op INT. */
2002-05-13 Daniel Jacobowitz <drow@mvista.com> * ax-gdb.c (gen_sign_extend, gen_fetch, gen_usual_unary) (gen_cast, gen_scale, gen_add, gen_sub, gen_binop, gen_deref) (gen_address_of, gen_struct_ref, gen_repeat): Use type access macros. * c-typeprint.c (cp_type_print_method_args): Likewise. (c_type_print_args): Likewise. * d10v-tdep.c (d10v_push_arguments): Likewise. (d10v_extract_return_value): Likewise. * expprint.c (print_subexp): Likewise. * gdbtypes.c (lookup_primitive_typename): Likewise. (lookup_template_type, add_mangled_type, print_arg_types): Likewise. * gdbtypes.h (TYPE_UNSIGNED, TYPE_NOSIGN, TYPE_STUB) (TYPE_TARGET_STUB, TYPE_STATIC, TYPE_CONST, TYPE_VOLATILE) (TYPE_PROTOTYPED, TYPE_INCOMPLETE, TYPE_CODE_SPACE, TYPE_VARARGS) (TYPE_VECTOR): Likewise. * hpread.c (hpread_read_struct_type) (fix_static_member_physnames, fixup_class_method_type) (hpread_type_lookup): Likewise. * mdebugread.c (parse_symbol, parse_type): Likewise. * p-lang.c (is_pascal_string_type): Likewise. * valops.c (hand_function_call): Likewise. * x86-64-tdep.c (classify_argument): Likewise. * hpread.c (hpread_read_function_type) (hpread_read_doc_function_type): Call replace_type. * dstread.c (create_new_type): Delete. (decode_dst_structure, process_dst_function): Call alloc_type. Use type access macros.
2002-05-13 14:00:36 +00:00
if ((TYPE_CODE (value1->type) != TYPE_CODE_INT)
|| (TYPE_CODE (value2->type) != TYPE_CODE_INT))
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Invalid combination of types in %s."), name);
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
ax_simple (ax,
TYPE_UNSIGNED (value1->type) ? op_unsigned : op);
if (may_carry)
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
gen_extend (ax, value1->type); /* catch overflow */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
value->type = value1->type;
value->kind = axs_rvalue;
}
static void
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_logical_not (struct agent_expr *ax, struct axs_value *value,
struct type *result_type)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
if (TYPE_CODE (value->type) != TYPE_CODE_INT
&& TYPE_CODE (value->type) != TYPE_CODE_PTR)
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Invalid type of operand to `!'."));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
ax_simple (ax, aop_log_not);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
value->type = result_type;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
static void
Protoization.
2000-07-30 01:48:28 +00:00
gen_complement (struct agent_expr *ax, struct axs_value *value)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
if (TYPE_CODE (value->type) != TYPE_CODE_INT)
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Invalid type of operand to `~'."));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
ax_simple (ax, aop_bit_not);
gen_extend (ax, value->type);
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Generating bytecode from GDB expressions: * & . -> @ sizeof */
/* Dereference the value on the top of the stack. */
static void
Protoization.
2000-07-30 01:48:28 +00:00
gen_deref (struct agent_expr *ax, struct axs_value *value)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* The caller should check the type, because several operators use
this, and we don't know what error message to generate. */
* language.c (pointer_type): Un-comment out. * ax-gdb.c: Include language.h, use pointer_type throughout instead of testing TYPE_CODE_PTR. (gen_fetch): Include TYPE_CODE_REF. (gen_cast): Ditto.
2009-12-29 23:57:59 +00:00
if (!pointer_type (value->type))
Add __FILE__ and __LINE__ parameter to internal_error() / internal_verror().
2001-02-08 06:03:54 +00:00
internal_error (__FILE__, __LINE__,
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
_("gen_deref: expected a pointer"));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* We've got an rvalue now, which is a pointer. We want to yield an
lvalue, whose address is exactly that pointer. So we don't
actually emit any code; we just change the type from "Pointer to
T" to "T", and mark the value as an lvalue in memory. Leave it
to the consumer to actually dereference it. */
value->type = check_typedef (TYPE_TARGET_TYPE (value->type));
* ax-gdb.c (gen_deref): Don't allow dereferencing void pointers.
2010-02-11 18:24:57 +00:00
if (TYPE_CODE (value->type) == TYPE_CODE_VOID)
error (_("Attempt to dereference a generic pointer."));
2002-05-13 Daniel Jacobowitz <drow@mvista.com> * ax-gdb.c (gen_sign_extend, gen_fetch, gen_usual_unary) (gen_cast, gen_scale, gen_add, gen_sub, gen_binop, gen_deref) (gen_address_of, gen_struct_ref, gen_repeat): Use type access macros. * c-typeprint.c (cp_type_print_method_args): Likewise. (c_type_print_args): Likewise. * d10v-tdep.c (d10v_push_arguments): Likewise. (d10v_extract_return_value): Likewise. * expprint.c (print_subexp): Likewise. * gdbtypes.c (lookup_primitive_typename): Likewise. (lookup_template_type, add_mangled_type, print_arg_types): Likewise. * gdbtypes.h (TYPE_UNSIGNED, TYPE_NOSIGN, TYPE_STUB) (TYPE_TARGET_STUB, TYPE_STATIC, TYPE_CONST, TYPE_VOLATILE) (TYPE_PROTOTYPED, TYPE_INCOMPLETE, TYPE_CODE_SPACE, TYPE_VARARGS) (TYPE_VECTOR): Likewise. * hpread.c (hpread_read_struct_type) (fix_static_member_physnames, fixup_class_method_type) (hpread_type_lookup): Likewise. * mdebugread.c (parse_symbol, parse_type): Likewise. * p-lang.c (is_pascal_string_type): Likewise. * valops.c (hand_function_call): Likewise. * x86-64-tdep.c (classify_argument): Likewise. * hpread.c (hpread_read_function_type) (hpread_read_doc_function_type): Call replace_type. * dstread.c (create_new_type): Delete. (decode_dst_structure, process_dst_function): Call alloc_type. Use type access macros.
2002-05-13 14:00:36 +00:00
value->kind = ((TYPE_CODE (value->type) == TYPE_CODE_FUNC)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
? axs_rvalue : axs_lvalue_memory);
}
/* Produce the address of the lvalue on the top of the stack. */
static void
Protoization.
2000-07-30 01:48:28 +00:00
gen_address_of (struct agent_expr *ax, struct axs_value *value)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* Special case for taking the address of a function. The ANSI
standard describes this as a special case, too, so this
arrangement is not without motivation. */
2002-05-13 Daniel Jacobowitz <drow@mvista.com> * ax-gdb.c (gen_sign_extend, gen_fetch, gen_usual_unary) (gen_cast, gen_scale, gen_add, gen_sub, gen_binop, gen_deref) (gen_address_of, gen_struct_ref, gen_repeat): Use type access macros. * c-typeprint.c (cp_type_print_method_args): Likewise. (c_type_print_args): Likewise. * d10v-tdep.c (d10v_push_arguments): Likewise. (d10v_extract_return_value): Likewise. * expprint.c (print_subexp): Likewise. * gdbtypes.c (lookup_primitive_typename): Likewise. (lookup_template_type, add_mangled_type, print_arg_types): Likewise. * gdbtypes.h (TYPE_UNSIGNED, TYPE_NOSIGN, TYPE_STUB) (TYPE_TARGET_STUB, TYPE_STATIC, TYPE_CONST, TYPE_VOLATILE) (TYPE_PROTOTYPED, TYPE_INCOMPLETE, TYPE_CODE_SPACE, TYPE_VARARGS) (TYPE_VECTOR): Likewise. * hpread.c (hpread_read_struct_type) (fix_static_member_physnames, fixup_class_method_type) (hpread_type_lookup): Likewise. * mdebugread.c (parse_symbol, parse_type): Likewise. * p-lang.c (is_pascal_string_type): Likewise. * valops.c (hand_function_call): Likewise. * x86-64-tdep.c (classify_argument): Likewise. * hpread.c (hpread_read_function_type) (hpread_read_doc_function_type): Call replace_type. * dstread.c (create_new_type): Delete. (decode_dst_structure, process_dst_function): Call alloc_type. Use type access macros.
2002-05-13 14:00:36 +00:00
if (TYPE_CODE (value->type) == TYPE_CODE_FUNC)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* The value's already an rvalue on the stack, so we just need to
change the type. */
value->type = lookup_pointer_type (value->type);
else
switch (value->kind)
{
case axs_rvalue:
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Operand of `&' is an rvalue, which has no address."));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case axs_lvalue_register:
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Operand of `&' is in a register, and has no address."));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case axs_lvalue_memory:
value->kind = axs_rvalue;
value->type = lookup_pointer_type (value->type);
break;
}
}
/* Generate code to push the value of a bitfield of a structure whose
address is on the top of the stack. START and END give the
starting and one-past-ending *bit* numbers of the field within the
structure. */
static void
* ax-gdb.c (gen_bitfield_ref): Add EXP argument, use expression architecture instead of current_gdbarch. (gen_struct_ref): Add EXP argument, pass to get_bitfield_ref. (gen_expr): Pass expression to get_struct_ref. * symtab.h (struct symbol_ops): Add GDBARCH parameter to tracepoint_var_ref callback. * ax-gdb.c (gen_var_ref): Pass architecture to tracepoint_var_ref symbol operation callback. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Add GDBARCH parameter. Use it instead of current_gdbarch. (locexpr_tracepoint_var_ref): Add GDBARCH parameter. Pass it to dwarf2_tracepoint_var_ref. (loclist_tracepoint_var_ref): Likewise.
2009-06-17 18:40:53 +00:00
gen_bitfield_ref (struct expression *exp, struct agent_expr *ax,
struct axs_value *value, struct type *type,
int start, int end)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* Note that ops[i] fetches 8 << i bits. */
static enum agent_op ops[]
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
= {aop_ref8, aop_ref16, aop_ref32, aop_ref64};
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
static int num_ops = (sizeof (ops) / sizeof (ops[0]));
/* We don't want to touch any byte that the bitfield doesn't
actually occupy; we shouldn't make any accesses we're not
explicitly permitted to. We rely here on the fact that the
bytecode `ref' operators work on unaligned addresses.
It takes some fancy footwork to get the stack to work the way
we'd like. Say we're retrieving a bitfield that requires three
fetches. Initially, the stack just contains the address:
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
addr
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
For the first fetch, we duplicate the address
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
addr addr
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
then add the byte offset, do the fetch, and shift and mask as
needed, yielding a fragment of the value, properly aligned for
the final bitwise or:
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
addr frag1
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
then we swap, and repeat the process:
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
frag1 addr --- address on top
frag1 addr addr --- duplicate it
frag1 addr frag2 --- get second fragment
frag1 frag2 addr --- swap again
frag1 frag2 frag3 --- get third fragment
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
Notice that, since the third fragment is the last one, we don't
bother duplicating the address this time. Now we have all the
fragments on the stack, and we can simply `or' them together,
yielding the final value of the bitfield. */
/* The first and one-after-last bits in the field, but rounded down
and up to byte boundaries. */
int bound_start = (start / TARGET_CHAR_BIT) * TARGET_CHAR_BIT;
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
int bound_end = (((end + TARGET_CHAR_BIT - 1)
/ TARGET_CHAR_BIT)
* TARGET_CHAR_BIT);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* current bit offset within the structure */
int offset;
/* The index in ops of the opcode we're considering. */
int op;
/* The number of fragments we generated in the process. Probably
equal to the number of `one' bits in bytesize, but who cares? */
int fragment_count;
2010-12-31 Michael Snyder <msnyder@vmware.com> * annotate.c: Comment cleanup, shorten long lines. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * auxv.c: Ditto. * auxv.h: Ditto. * ax-gdb.c: Ditto. * ax-gdb.h: Ditto. * ax-general.c: Ditto. * breakpoint.h: Ditto. * buildsym.h: Ditto.
2010-12-31 19:16:37 +00:00
/* Dereference any typedefs. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
type = check_typedef (type);
/* Can we fetch the number of bits requested at all? */
if ((end - start) > ((1 << num_ops) * 8))
Add __FILE__ and __LINE__ parameter to internal_error() / internal_verror().
2001-02-08 06:03:54 +00:00
internal_error (__FILE__, __LINE__,
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
_("gen_bitfield_ref: bitfield too wide"));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Note that we know here that we only need to try each opcode once.
That may not be true on machines with weird byte sizes. */
offset = bound_start;
fragment_count = 0;
for (op = num_ops - 1; op >= 0; op--)
{
/* number of bits that ops[op] would fetch */
int op_size = 8 << op;
/* The stack at this point, from bottom to top, contains zero or
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
more fragments, then the address. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Does this fetch fit within the bitfield? */
if (offset + op_size <= bound_end)
{
/* Is this the last fragment? */
int last_frag = (offset + op_size == bound_end);
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
if (!last_frag)
ax_simple (ax, aop_dup); /* keep a copy of the address */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Add the offset. */
gen_offset (ax, offset / TARGET_CHAR_BIT);
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
if (ax->tracing)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* Record the area of memory we're about to fetch. */
ax_trace_quick (ax, op_size / TARGET_CHAR_BIT);
}
/* Perform the fetch. */
ax_simple (ax, ops[op]);
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
/* Shift the bits we have to their proper position.
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
gen_left_shift will generate right shifts when the operand
is negative.
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
A big-endian field diagram to ponder:
byte 0 byte 1 byte 2 byte 3 byte 4 byte 5 byte 6 byte 7
+------++------++------++------++------++------++------++------+
xxxxAAAAAAAAAAAAAAAAAAAAAAAAAAAABBBBBBBBBBBBBBBBCCCCCxxxxxxxxxxx
^ ^ ^ ^
bit number 16 32 48 53
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
These are bit numbers as supplied by GDB. Note that the
bit numbers run from right to left once you've fetched the
value!
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
A little-endian field diagram to ponder:
byte 7 byte 6 byte 5 byte 4 byte 3 byte 2 byte 1 byte 0
+------++------++------++------++------++------++------++------+
xxxxxxxxxxxAAAAABBBBBBBBBBBBBBBBCCCCCCCCCCCCCCCCCCCCCCCCCCCCxxxx
^ ^ ^ ^ ^
bit number 48 32 16 4 0
In both cases, the most significant end is on the left
(i.e. normal numeric writing order), which means that you
don't go crazy thinking about `left' and `right' shifts.
We don't have to worry about masking yet:
- If they contain garbage off the least significant end, then we
must be looking at the low end of the field, and the right
shift will wipe them out.
- If they contain garbage off the most significant end, then we
must be looking at the most significant end of the word, and
the sign/zero extension will wipe them out.
- If we're in the interior of the word, then there is no garbage
on either end, because the ref operators zero-extend. */
* ax-gdb.c (gen_bitfield_ref): Add EXP argument, use expression architecture instead of current_gdbarch. (gen_struct_ref): Add EXP argument, pass to get_bitfield_ref. (gen_expr): Pass expression to get_struct_ref. * symtab.h (struct symbol_ops): Add GDBARCH parameter to tracepoint_var_ref callback. * ax-gdb.c (gen_var_ref): Pass architecture to tracepoint_var_ref symbol operation callback. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Add GDBARCH parameter. Use it instead of current_gdbarch. (locexpr_tracepoint_var_ref): Add GDBARCH parameter. Pass it to dwarf2_tracepoint_var_ref. (loclist_tracepoint_var_ref): Likewise.
2009-06-17 18:40:53 +00:00
if (gdbarch_byte_order (exp->gdbarch) == BFD_ENDIAN_BIG)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
gen_left_shift (ax, end - (offset + op_size));
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
else
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
gen_left_shift (ax, offset - start);
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
if (!last_frag)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Bring the copy of the address up to the top. */
ax_simple (ax, aop_swap);
offset += op_size;
fragment_count++;
}
}
/* Generate enough bitwise `or' operations to combine all the
fragments we left on the stack. */
while (fragment_count-- > 1)
ax_simple (ax, aop_bit_or);
/* Sign- or zero-extend the value as appropriate. */
((TYPE_UNSIGNED (type) ? ax_zero_ext : ax_ext) (ax, end - start));
/* This is *not* an lvalue. Ugh. */
value->kind = axs_rvalue;
value->type = type;
}
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
/* Generate bytecodes for field number FIELDNO of type TYPE. OFFSET
is an accumulated offset (in bytes), will be nonzero for objects
embedded in other objects, like C++ base classes. Behavior should
generally follow value_primitive_field. */
static void
gen_primitive_field (struct expression *exp,
struct agent_expr *ax, struct axs_value *value,
int offset, int fieldno, struct type *type)
{
/* Is this a bitfield? */
if (TYPE_FIELD_PACKED (type, fieldno))
gen_bitfield_ref (exp, ax, value, TYPE_FIELD_TYPE (type, fieldno),
(offset * TARGET_CHAR_BIT
+ TYPE_FIELD_BITPOS (type, fieldno)),
(offset * TARGET_CHAR_BIT
+ TYPE_FIELD_BITPOS (type, fieldno)
+ TYPE_FIELD_BITSIZE (type, fieldno)));
else
{
gen_offset (ax, offset
+ TYPE_FIELD_BITPOS (type, fieldno) / TARGET_CHAR_BIT);
value->kind = axs_lvalue_memory;
value->type = TYPE_FIELD_TYPE (type, fieldno);
}
}
/* Search for the given field in either the given type or one of its
base classes. Return 1 if found, 0 if not. */
static int
gen_struct_ref_recursive (struct expression *exp, struct agent_expr *ax,
struct axs_value *value,
char *field, int offset, struct type *type)
{
int i, rslt;
int nbases = TYPE_N_BASECLASSES (type);
CHECK_TYPEDEF (type);
for (i = TYPE_NFIELDS (type) - 1; i >= nbases; i--)
{
* gdbtypes.h (struct main_type): Change type of name,tag_name, and fields.name members from char * to const char *. All uses updated. (struct cplus_struct_type): Change type of fn_fieldlists.name member from char * to const char *. All uses updated. (type_name_no_tag): Update. (lookup_unsigned_typename, lookup_signed_typename): Update. * gdbtypes.c (type_name_no_tag): Change result type from char * to const char *. All callers updated. (lookup_unsigned_typename, lookup_signed_typename): Change type of name parameter from char * to const char *. * symtab.h (struct cplus_specific): Change type of demangled_name member from char * to const char *. All uses updated. (struct general_symbol_info): Change type of name and mangled_lang.demangled_name members from char * to const char *. All uses updated. (symbol_get_demangled_name, symbol_natural_name): Update. (symbol_demangled_name, symbol_search_name): Update. * symtab.c (symbol_get_demangled_name): Change result type from char * to const char *. All callers updated. (symbol_natural_name, symbol_demangled_name): Ditto. (symbol_search_name): Ditto. (completion_list_add_name): Change type of symname,sym_text, text,word parameters from char * to const char *. (completion_list_objc_symbol): Change type of sym_text, text,word parameters from char * to const char *. * ada-lang.c (find_struct_field): Change type of name parameter from char * to const char *. (encoded_ordered_before): Similarly for N0,N1 parameters. (old_renaming_is_invisible): Similarly for function_name parameter. (ada_type_name): Change result type from char * to const char *. All callers updated. * ada-lang.h (ada_type_name): Update. * buildsym.c (hashname): Change type of name parameter from char * to const char *. * buildsym.h (hashname): Update. * dbxread.c (end_psymtab): Change type of include_list parameter from char ** to const char **. * dwarf2read.c (determine_prefix): Change result type from char * to const char *. All callers updated. * f-lang.c (find_common_for_function): Change type of name, funcname parameters from char * to const char *. * f-lang.c (find_common_for_function): Update. * f-valprint.c (list_all_visible_commons): Change type of funcname parameters from char * to const char *. * gdbarch.sh (static_transform_name): Change type of name parameter and result from char * to const char *. * gdbarch.c: Regenerate. * gdbarch.h: Regenerate. * i386-sol2-tdep.c (i386_sol2_static_transform_name): Change type of name parameter from char * to const char *. * jv-lang.c (java_primitive_type_from_name): Ditto. (java_demangled_signature_length): Similarly for signature parameter. (java_demangled_signature_copy): Ditto. (java_demangle_type_signature): Ditto. * jv-lang.h (java_primitive_type_from_name): Update. (java_demangle_type_signature): Update. * objc-lang.c (specialcmp): Change type of a,b parameters from char * to const char *. * p-lang.c (is_pascal_string_type): Change type of arrayname parameter from char * to const char *. All callers updated. * p-lang.h (is_pascal_string_type): Update. * solib-frv.c (find_canonical_descriptor_in_load_object): Change type of name parameter from char * to const char *. * sparc-sol2-tdep.c (sparc_sol2_static_transform_name): Ditto. * utils.c (fprintf_symbol_filtered): Ditto. * defs.h (fprintf_symbol_filtered): Update. * sparc-tdep.h (sparc_sol2_static_transform_name): Update. * stabsread.h (end_psymtab): Update. * stack.c (find_frame_funname): Change type of funname parameter from char ** to const char **. * stack.h (find_frame_funname): Update. * typeprint.c (type_print): Change type of varstring parameter from char * to const char *. * value.h (type_print): Update. * xcoffread.c (xcoff_start_psymtab): Change type of filename parameter from char * to const char *. All callers updated. (xcoff_end_psymtab): Change type of include_list parameter from char ** to const char **. All callers updated. (swap_sym): Similarly for name parameter. All callers updated. * coffread.c (patch_type): Add (char*) cast to xfree parameter. Use xstrdup. (process_coff_symbol): Use xstrdup. * stabsread.c (stabs_method_name_from_physname): Renamed from update_method_name_from_physname. Change result type from void to char *. All callers updated. (read_member_functions): In has_destructor case, store name in objfile obstack instead of malloc space. In !has_stub case, fix mem leak.
2012-02-07 04:48:23 +00:00
const char *this_name = TYPE_FIELD_NAME (type, i);
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
if (this_name)
{
if (strcmp (field, this_name) == 0)
{
/* Note that bytecodes for the struct's base (aka
"this") will have been generated already, which will
be unnecessary but not harmful if the static field is
being handled as a global. */
if (field_is_static (&TYPE_FIELD (type, i)))
{
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
gen_static_field (exp->gdbarch, ax, value, type, i);
if (value->optimized_out)
2011-01-05 Michael Snyder <msnyder@vmware.com> * addrmap.c: Shorten lines of >= 80 columns. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * ax-gdb.c: Ditto. * ax-general.c: Ditto. * bcache.c: Ditto. * blockframe.c: Ditto. * breakpoint.c: Ditto. * buildsym.c: Ditto. * c-lang.c: Ditto. * c-typeprint.c: Ditto. * charset.c: Ditto. * coffread.c: Ditto. * command.h: Ditto. * corelow.c: Ditto. * cp-abi.c: Ditto. * cp-namespace.c: Ditto. * cp-support.c: Ditto. * dbug-rom.c: Ditto. * dbxread.c: Ditto. * defs.h: Ditto. * dfp.c: Ditto. * dfp.h: Ditto. * dictionary.c: Ditto. * disasm.c: Ditto. * doublest.c: Ditto. * dwarf2-frame.c: Ditto. * dwarf2expr.c: Ditto. * dwarf2loc.c: Ditto. * dwarf2read.c: Ditto. * elfread.c: Ditto. * eval.c: Ditto. * event-loop.c: Ditto. * event-loop.h: Ditto. * exceptions.h: Ditto. * exec.c: Ditto. * expprint.c: Ditto. * expression.h: Ditto. * f-lang.c: Ditto. * f-valprint.c: Ditto. * findcmd.c: Ditto. * frame-base.c: Ditto. * frame-unwind.c: Ditto. * frame-unwind.h: Ditto. * frame.c: Ditto. * frame.h: Ditto. * gcore.c: Ditto. * gdb-stabs.h: Ditto. * gdb_assert.h: Ditto. * gdb_dirent.h: Ditto. * gdb_obstack.h: Ditto. * gdbcore.h: Ditto. * gdbtypes.c: Ditto. * gdbtypes.h: Ditto. * inf-ttrace.c: Ditto. * infcall.c: Ditto. * infcmd.c: Ditto. * inflow.c: Ditto. * infrun.c: Ditto. * inline-frame.h: Ditto. * language.c: Ditto. * language.h: Ditto. * libunwind-frame.c: Ditto. * libunwind-frame.h: Ditto. * linespec.c: Ditto. * linux-nat.c: Ditto. * linux-nat.h: Ditto. * linux-thread-db.c: Ditto. * machoread.c: Ditto. * macroexp.c: Ditto. * macrotab.c: Ditto. * main.c: Ditto. * maint.c: Ditto. * mdebugread.c: Ditto. * memattr.c: Ditto. * minsyms.c: Ditto. * monitor.c: Ditto. * monitor.h: Ditto. * objfiles.c: Ditto. * objfiles.h: Ditto. * osabi.c: Ditto. * p-typeprint.c: Ditto. * p-valprint.c: Ditto. * parse.c: Ditto. * printcmd.c: Ditto. * proc-events.c: Ditto. * procfs.c: Ditto. * progspace.c: Ditto. * progspace.h: Ditto. * psympriv.h: Ditto. * psymtab.c: Ditto. * record.c: Ditto. * regcache.c: Ditto. * regcache.h: Ditto. * remote-fileio.c: Ditto. * remote.c: Ditto. * ser-mingw.c: Ditto. * ser-tcp.c: Ditto. * ser-unix.c: Ditto. * serial.c: Ditto. * serial.h: Ditto. * solib-frv.c: Ditto. * solib-irix.c: Ditto. * solib-osf.c: Ditto. * solib-pa64.c: Ditto. * solib-som.c: Ditto. * solib-sunos.c: Ditto. * solib-svr4.c: Ditto. * solib-target.c: Ditto. * solib.c: Ditto. * somread.c: Ditto. * source.c: Ditto. * stabsread.c: Ditto. * stabsread.c: Ditto. * stack.c: Ditto. * stack.h: Ditto. * symfile-mem.c: Ditto. * symfile.c: Ditto. * symfile.h: Ditto. * symmisc.c: Ditto. * symtab.c: Ditto. * symtab.h: Ditto. * target-descriptions.c: Ditto. * target-memory.c: Ditto. * target.c: Ditto. * target.h: Ditto. * terminal.h: Ditto. * thread.c: Ditto. * top.c: Ditto. * tracepoint.c: Ditto. * tracepoint.h: Ditto. * ui-file.c: Ditto. * ui-file.h: Ditto. * ui-out.h: Ditto. * user-regs.c: Ditto. * user-regs.h: Ditto. * utils.c: Ditto. * valarith.c: Ditto. * valops.c: Ditto. * valprint.c: Ditto. * valprint.h: Ditto. * value.c: Ditto. * varobj.c: Ditto. * varobj.h: Ditto. * vec.h: Ditto. * xcoffread.c: Ditto. * xcoffsolib.c: Ditto. * xcoffsolib.h: Ditto. * xml-syscall.c: Ditto. * xml-tdesc.c: Ditto.
2011-01-05 22:22:53 +00:00
error (_("static field `%s' has been "
"optimized out, cannot use"),
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
field);
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
return 1;
}
gen_primitive_field (exp, ax, value, offset, i, type);
return 1;
}
#if 0 /* is this right? */
if (this_name[0] == '\0')
internal_error (__FILE__, __LINE__,
_("find_field: anonymous unions not supported"));
#endif
}
}
/* Now scan through base classes recursively. */
for (i = 0; i < nbases; i++)
{
struct type *basetype = check_typedef (TYPE_BASECLASS (type, i));
rslt = gen_struct_ref_recursive (exp, ax, value, field,
2011-01-05 Michael Snyder <msnyder@vmware.com> * addrmap.c: Shorten lines of >= 80 columns. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * ax-gdb.c: Ditto. * ax-general.c: Ditto. * bcache.c: Ditto. * blockframe.c: Ditto. * breakpoint.c: Ditto. * buildsym.c: Ditto. * c-lang.c: Ditto. * c-typeprint.c: Ditto. * charset.c: Ditto. * coffread.c: Ditto. * command.h: Ditto. * corelow.c: Ditto. * cp-abi.c: Ditto. * cp-namespace.c: Ditto. * cp-support.c: Ditto. * dbug-rom.c: Ditto. * dbxread.c: Ditto. * defs.h: Ditto. * dfp.c: Ditto. * dfp.h: Ditto. * dictionary.c: Ditto. * disasm.c: Ditto. * doublest.c: Ditto. * dwarf2-frame.c: Ditto. * dwarf2expr.c: Ditto. * dwarf2loc.c: Ditto. * dwarf2read.c: Ditto. * elfread.c: Ditto. * eval.c: Ditto. * event-loop.c: Ditto. * event-loop.h: Ditto. * exceptions.h: Ditto. * exec.c: Ditto. * expprint.c: Ditto. * expression.h: Ditto. * f-lang.c: Ditto. * f-valprint.c: Ditto. * findcmd.c: Ditto. * frame-base.c: Ditto. * frame-unwind.c: Ditto. * frame-unwind.h: Ditto. * frame.c: Ditto. * frame.h: Ditto. * gcore.c: Ditto. * gdb-stabs.h: Ditto. * gdb_assert.h: Ditto. * gdb_dirent.h: Ditto. * gdb_obstack.h: Ditto. * gdbcore.h: Ditto. * gdbtypes.c: Ditto. * gdbtypes.h: Ditto. * inf-ttrace.c: Ditto. * infcall.c: Ditto. * infcmd.c: Ditto. * inflow.c: Ditto. * infrun.c: Ditto. * inline-frame.h: Ditto. * language.c: Ditto. * language.h: Ditto. * libunwind-frame.c: Ditto. * libunwind-frame.h: Ditto. * linespec.c: Ditto. * linux-nat.c: Ditto. * linux-nat.h: Ditto. * linux-thread-db.c: Ditto. * machoread.c: Ditto. * macroexp.c: Ditto. * macrotab.c: Ditto. * main.c: Ditto. * maint.c: Ditto. * mdebugread.c: Ditto. * memattr.c: Ditto. * minsyms.c: Ditto. * monitor.c: Ditto. * monitor.h: Ditto. * objfiles.c: Ditto. * objfiles.h: Ditto. * osabi.c: Ditto. * p-typeprint.c: Ditto. * p-valprint.c: Ditto. * parse.c: Ditto. * printcmd.c: Ditto. * proc-events.c: Ditto. * procfs.c: Ditto. * progspace.c: Ditto. * progspace.h: Ditto. * psympriv.h: Ditto. * psymtab.c: Ditto. * record.c: Ditto. * regcache.c: Ditto. * regcache.h: Ditto. * remote-fileio.c: Ditto. * remote.c: Ditto. * ser-mingw.c: Ditto. * ser-tcp.c: Ditto. * ser-unix.c: Ditto. * serial.c: Ditto. * serial.h: Ditto. * solib-frv.c: Ditto. * solib-irix.c: Ditto. * solib-osf.c: Ditto. * solib-pa64.c: Ditto. * solib-som.c: Ditto. * solib-sunos.c: Ditto. * solib-svr4.c: Ditto. * solib-target.c: Ditto. * solib.c: Ditto. * somread.c: Ditto. * source.c: Ditto. * stabsread.c: Ditto. * stabsread.c: Ditto. * stack.c: Ditto. * stack.h: Ditto. * symfile-mem.c: Ditto. * symfile.c: Ditto. * symfile.h: Ditto. * symmisc.c: Ditto. * symtab.c: Ditto. * symtab.h: Ditto. * target-descriptions.c: Ditto. * target-memory.c: Ditto. * target.c: Ditto. * target.h: Ditto. * terminal.h: Ditto. * thread.c: Ditto. * top.c: Ditto. * tracepoint.c: Ditto. * tracepoint.h: Ditto. * ui-file.c: Ditto. * ui-file.h: Ditto. * ui-out.h: Ditto. * user-regs.c: Ditto. * user-regs.h: Ditto. * utils.c: Ditto. * valarith.c: Ditto. * valops.c: Ditto. * valprint.c: Ditto. * valprint.h: Ditto. * value.c: Ditto. * varobj.c: Ditto. * varobj.h: Ditto. * vec.h: Ditto. * xcoffread.c: Ditto. * xcoffsolib.c: Ditto. * xcoffsolib.h: Ditto. * xml-syscall.c: Ditto. * xml-tdesc.c: Ditto.
2011-01-05 22:22:53 +00:00
offset + TYPE_BASECLASS_BITPOS (type, i)
/ TARGET_CHAR_BIT,
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
basetype);
if (rslt)
return 1;
}
/* Not found anywhere, flag so caller can complain. */
return 0;
}
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Generate code to reference the member named FIELD of a structure or
union. The top of the stack, as described by VALUE, should have
type (pointer to a)* struct/union. OPERATOR_NAME is the name of
the operator being compiled, and OPERAND_NAME is the kind of thing
it operates on; we use them in error messages. */
static void
* ax-gdb.c (gen_bitfield_ref): Add EXP argument, use expression architecture instead of current_gdbarch. (gen_struct_ref): Add EXP argument, pass to get_bitfield_ref. (gen_expr): Pass expression to get_struct_ref. * symtab.h (struct symbol_ops): Add GDBARCH parameter to tracepoint_var_ref callback. * ax-gdb.c (gen_var_ref): Pass architecture to tracepoint_var_ref symbol operation callback. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Add GDBARCH parameter. Use it instead of current_gdbarch. (locexpr_tracepoint_var_ref): Add GDBARCH parameter. Pass it to dwarf2_tracepoint_var_ref. (loclist_tracepoint_var_ref): Likewise.
2009-06-17 18:40:53 +00:00
gen_struct_ref (struct expression *exp, struct agent_expr *ax,
struct axs_value *value, char *field,
Protoization.
2000-07-30 01:48:28 +00:00
char *operator_name, char *operand_name)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
struct type *type;
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
int found;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Follow pointers until we reach a non-pointer. These aren't the C
semantics, but they're what the normal GDB evaluator does, so we
should at least be consistent. */
* language.c (pointer_type): Un-comment out. * ax-gdb.c: Include language.h, use pointer_type throughout instead of testing TYPE_CODE_PTR. (gen_fetch): Include TYPE_CODE_REF. (gen_cast): Ditto.
2009-12-29 23:57:59 +00:00
while (pointer_type (value->type))
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
require_rvalue (ax, value);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
gen_deref (ax, value);
}
2000-10-19 Josef Ezra <jezra@emc.com> * ax-gdb.c (gen_struct_ref): while generating data code, cases of "collect p1->p2->data" where not covered if p2 is a 'typedefed' type. this simple fix should forward the type pointer to the real type.
2000-10-30 21:15:56 +00:00
type = check_typedef (value->type);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* This must yield a structure or a union. */
if (TYPE_CODE (type) != TYPE_CODE_STRUCT
&& TYPE_CODE (type) != TYPE_CODE_UNION)
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("The left operand of `%s' is not a %s."),
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
operator_name, operand_name);
/* And it must be in memory; we don't deal with structure rvalues,
or structures living in registers. */
if (value->kind != axs_lvalue_memory)
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Structure does not live in memory."));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
/* Search through fields and base classes recursively. */
found = gen_struct_ref_recursive (exp, ax, value, field, 0, type);
if (!found)
error (_("Couldn't find member named `%s' in struct/union/class `%s'"),
field, TYPE_TAG_NAME (type));
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
static int
gen_namespace_elt (struct expression *exp,
struct agent_expr *ax, struct axs_value *value,
const struct type *curtype, char *name);
static int
gen_maybe_namespace_elt (struct expression *exp,
struct agent_expr *ax, struct axs_value *value,
const struct type *curtype, char *name);
static void
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
gen_static_field (struct gdbarch *gdbarch,
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
struct agent_expr *ax, struct axs_value *value,
struct type *type, int fieldno)
{
if (TYPE_FIELD_LOC_KIND (type, fieldno) == FIELD_LOC_KIND_PHYSADDR)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
ax_const_l (ax, TYPE_FIELD_STATIC_PHYSADDR (type, fieldno));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
value->kind = axs_lvalue_memory;
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
value->type = TYPE_FIELD_TYPE (type, fieldno);
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
value->optimized_out = 0;
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
}
else
{
* dwarf2read.c (dwarf2_add_field): Constify. * value.c (value_static_field): Constify. * gdbtypes.h (struct main_type) <field.field_location.physname>: Now const. * ax-gdb.c (gen_static_field): Constify
2011-05-18 20:19:52 +00:00
const char *phys_name = TYPE_FIELD_STATIC_PHYSNAME (type, fieldno);
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
struct symbol *sym = lookup_symbol (phys_name, 0, VAR_DOMAIN, 0);
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
if (sym)
{
gen_var_ref (gdbarch, ax, value, sym);
/* Don't error if the value was optimized out, we may be
scanning all static fields and just want to pass over this
and continue with the rest. */
}
else
{
/* Silently assume this was optimized out; class printing
will let the user know why the data is missing. */
value->optimized_out = 1;
}
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
}
}
static int
gen_struct_elt_for_reference (struct expression *exp,
struct agent_expr *ax, struct axs_value *value,
struct type *type, char *fieldname)
{
struct type *t = type;
int i;
if (TYPE_CODE (t) != TYPE_CODE_STRUCT
&& TYPE_CODE (t) != TYPE_CODE_UNION)
internal_error (__FILE__, __LINE__,
_("non-aggregate type to gen_struct_elt_for_reference"));
for (i = TYPE_NFIELDS (t) - 1; i >= TYPE_N_BASECLASSES (t); i--)
{
* gdbtypes.h (struct main_type): Change type of name,tag_name, and fields.name members from char * to const char *. All uses updated. (struct cplus_struct_type): Change type of fn_fieldlists.name member from char * to const char *. All uses updated. (type_name_no_tag): Update. (lookup_unsigned_typename, lookup_signed_typename): Update. * gdbtypes.c (type_name_no_tag): Change result type from char * to const char *. All callers updated. (lookup_unsigned_typename, lookup_signed_typename): Change type of name parameter from char * to const char *. * symtab.h (struct cplus_specific): Change type of demangled_name member from char * to const char *. All uses updated. (struct general_symbol_info): Change type of name and mangled_lang.demangled_name members from char * to const char *. All uses updated. (symbol_get_demangled_name, symbol_natural_name): Update. (symbol_demangled_name, symbol_search_name): Update. * symtab.c (symbol_get_demangled_name): Change result type from char * to const char *. All callers updated. (symbol_natural_name, symbol_demangled_name): Ditto. (symbol_search_name): Ditto. (completion_list_add_name): Change type of symname,sym_text, text,word parameters from char * to const char *. (completion_list_objc_symbol): Change type of sym_text, text,word parameters from char * to const char *. * ada-lang.c (find_struct_field): Change type of name parameter from char * to const char *. (encoded_ordered_before): Similarly for N0,N1 parameters. (old_renaming_is_invisible): Similarly for function_name parameter. (ada_type_name): Change result type from char * to const char *. All callers updated. * ada-lang.h (ada_type_name): Update. * buildsym.c (hashname): Change type of name parameter from char * to const char *. * buildsym.h (hashname): Update. * dbxread.c (end_psymtab): Change type of include_list parameter from char ** to const char **. * dwarf2read.c (determine_prefix): Change result type from char * to const char *. All callers updated. * f-lang.c (find_common_for_function): Change type of name, funcname parameters from char * to const char *. * f-lang.c (find_common_for_function): Update. * f-valprint.c (list_all_visible_commons): Change type of funcname parameters from char * to const char *. * gdbarch.sh (static_transform_name): Change type of name parameter and result from char * to const char *. * gdbarch.c: Regenerate. * gdbarch.h: Regenerate. * i386-sol2-tdep.c (i386_sol2_static_transform_name): Change type of name parameter from char * to const char *. * jv-lang.c (java_primitive_type_from_name): Ditto. (java_demangled_signature_length): Similarly for signature parameter. (java_demangled_signature_copy): Ditto. (java_demangle_type_signature): Ditto. * jv-lang.h (java_primitive_type_from_name): Update. (java_demangle_type_signature): Update. * objc-lang.c (specialcmp): Change type of a,b parameters from char * to const char *. * p-lang.c (is_pascal_string_type): Change type of arrayname parameter from char * to const char *. All callers updated. * p-lang.h (is_pascal_string_type): Update. * solib-frv.c (find_canonical_descriptor_in_load_object): Change type of name parameter from char * to const char *. * sparc-sol2-tdep.c (sparc_sol2_static_transform_name): Ditto. * utils.c (fprintf_symbol_filtered): Ditto. * defs.h (fprintf_symbol_filtered): Update. * sparc-tdep.h (sparc_sol2_static_transform_name): Update. * stabsread.h (end_psymtab): Update. * stack.c (find_frame_funname): Change type of funname parameter from char ** to const char **. * stack.h (find_frame_funname): Update. * typeprint.c (type_print): Change type of varstring parameter from char * to const char *. * value.h (type_print): Update. * xcoffread.c (xcoff_start_psymtab): Change type of filename parameter from char * to const char *. All callers updated. (xcoff_end_psymtab): Change type of include_list parameter from char ** to const char **. All callers updated. (swap_sym): Similarly for name parameter. All callers updated. * coffread.c (patch_type): Add (char*) cast to xfree parameter. Use xstrdup. (process_coff_symbol): Use xstrdup. * stabsread.c (stabs_method_name_from_physname): Renamed from update_method_name_from_physname. Change result type from void to char *. All callers updated. (read_member_functions): In has_destructor case, store name in objfile obstack instead of malloc space. In !has_stub case, fix mem leak.
2012-02-07 04:48:23 +00:00
const char *t_field_name = TYPE_FIELD_NAME (t, i);
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
if (t_field_name && strcmp (t_field_name, fieldname) == 0)
{
if (field_is_static (&TYPE_FIELD (t, i)))
{
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
gen_static_field (exp->gdbarch, ax, value, t, i);
if (value->optimized_out)
2011-01-05 Michael Snyder <msnyder@vmware.com> * addrmap.c: Shorten lines of >= 80 columns. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * ax-gdb.c: Ditto. * ax-general.c: Ditto. * bcache.c: Ditto. * blockframe.c: Ditto. * breakpoint.c: Ditto. * buildsym.c: Ditto. * c-lang.c: Ditto. * c-typeprint.c: Ditto. * charset.c: Ditto. * coffread.c: Ditto. * command.h: Ditto. * corelow.c: Ditto. * cp-abi.c: Ditto. * cp-namespace.c: Ditto. * cp-support.c: Ditto. * dbug-rom.c: Ditto. * dbxread.c: Ditto. * defs.h: Ditto. * dfp.c: Ditto. * dfp.h: Ditto. * dictionary.c: Ditto. * disasm.c: Ditto. * doublest.c: Ditto. * dwarf2-frame.c: Ditto. * dwarf2expr.c: Ditto. * dwarf2loc.c: Ditto. * dwarf2read.c: Ditto. * elfread.c: Ditto. * eval.c: Ditto. * event-loop.c: Ditto. * event-loop.h: Ditto. * exceptions.h: Ditto. * exec.c: Ditto. * expprint.c: Ditto. * expression.h: Ditto. * f-lang.c: Ditto. * f-valprint.c: Ditto. * findcmd.c: Ditto. * frame-base.c: Ditto. * frame-unwind.c: Ditto. * frame-unwind.h: Ditto. * frame.c: Ditto. * frame.h: Ditto. * gcore.c: Ditto. * gdb-stabs.h: Ditto. * gdb_assert.h: Ditto. * gdb_dirent.h: Ditto. * gdb_obstack.h: Ditto. * gdbcore.h: Ditto. * gdbtypes.c: Ditto. * gdbtypes.h: Ditto. * inf-ttrace.c: Ditto. * infcall.c: Ditto. * infcmd.c: Ditto. * inflow.c: Ditto. * infrun.c: Ditto. * inline-frame.h: Ditto. * language.c: Ditto. * language.h: Ditto. * libunwind-frame.c: Ditto. * libunwind-frame.h: Ditto. * linespec.c: Ditto. * linux-nat.c: Ditto. * linux-nat.h: Ditto. * linux-thread-db.c: Ditto. * machoread.c: Ditto. * macroexp.c: Ditto. * macrotab.c: Ditto. * main.c: Ditto. * maint.c: Ditto. * mdebugread.c: Ditto. * memattr.c: Ditto. * minsyms.c: Ditto. * monitor.c: Ditto. * monitor.h: Ditto. * objfiles.c: Ditto. * objfiles.h: Ditto. * osabi.c: Ditto. * p-typeprint.c: Ditto. * p-valprint.c: Ditto. * parse.c: Ditto. * printcmd.c: Ditto. * proc-events.c: Ditto. * procfs.c: Ditto. * progspace.c: Ditto. * progspace.h: Ditto. * psympriv.h: Ditto. * psymtab.c: Ditto. * record.c: Ditto. * regcache.c: Ditto. * regcache.h: Ditto. * remote-fileio.c: Ditto. * remote.c: Ditto. * ser-mingw.c: Ditto. * ser-tcp.c: Ditto. * ser-unix.c: Ditto. * serial.c: Ditto. * serial.h: Ditto. * solib-frv.c: Ditto. * solib-irix.c: Ditto. * solib-osf.c: Ditto. * solib-pa64.c: Ditto. * solib-som.c: Ditto. * solib-sunos.c: Ditto. * solib-svr4.c: Ditto. * solib-target.c: Ditto. * solib.c: Ditto. * somread.c: Ditto. * source.c: Ditto. * stabsread.c: Ditto. * stabsread.c: Ditto. * stack.c: Ditto. * stack.h: Ditto. * symfile-mem.c: Ditto. * symfile.c: Ditto. * symfile.h: Ditto. * symmisc.c: Ditto. * symtab.c: Ditto. * symtab.h: Ditto. * target-descriptions.c: Ditto. * target-memory.c: Ditto. * target.c: Ditto. * target.h: Ditto. * terminal.h: Ditto. * thread.c: Ditto. * top.c: Ditto. * tracepoint.c: Ditto. * tracepoint.h: Ditto. * ui-file.c: Ditto. * ui-file.h: Ditto. * ui-out.h: Ditto. * user-regs.c: Ditto. * user-regs.h: Ditto. * utils.c: Ditto. * valarith.c: Ditto. * valops.c: Ditto. * valprint.c: Ditto. * valprint.h: Ditto. * value.c: Ditto. * varobj.c: Ditto. * varobj.h: Ditto. * vec.h: Ditto. * xcoffread.c: Ditto. * xcoffsolib.c: Ditto. * xcoffsolib.h: Ditto. * xml-syscall.c: Ditto. * xml-tdesc.c: Ditto.
2011-01-05 22:22:53 +00:00
error (_("static field `%s' has been "
"optimized out, cannot use"),
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
fieldname);
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
return 1;
}
if (TYPE_FIELD_PACKED (t, i))
error (_("pointers to bitfield members not allowed"));
/* FIXME we need a way to do "want_address" equivalent */
error (_("Cannot reference non-static field \"%s\""), fieldname);
}
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
/* FIXME add other scoped-reference cases here */
/* Do a last-ditch lookup. */
return gen_maybe_namespace_elt (exp, ax, value, type, fieldname);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
/* C++: Return the member NAME of the namespace given by the type
CURTYPE. */
static int
gen_namespace_elt (struct expression *exp,
struct agent_expr *ax, struct axs_value *value,
const struct type *curtype, char *name)
{
int found = gen_maybe_namespace_elt (exp, ax, value, curtype, name);
if (!found)
error (_("No symbol \"%s\" in namespace \"%s\"."),
name, TYPE_TAG_NAME (curtype));
return found;
}
/* A helper function used by value_namespace_elt and
value_struct_elt_for_reference. It looks up NAME inside the
context CURTYPE; this works if CURTYPE is a namespace or if CURTYPE
is a class and NAME refers to a type in CURTYPE itself (as opposed
to, say, some base class of CURTYPE). */
static int
gen_maybe_namespace_elt (struct expression *exp,
struct agent_expr *ax, struct axs_value *value,
const struct type *curtype, char *name)
{
const char *namespace_name = TYPE_TAG_NAME (curtype);
struct symbol *sym;
sym = cp_lookup_symbol_namespace (namespace_name, name,
block_for_pc (ax->scope),
Fix a commit snafu
2010-03-16 00:52:54 +00:00
VAR_DOMAIN);
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
if (sym == NULL)
return 0;
gen_var_ref (exp->gdbarch, ax, value, sym);
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
if (value->optimized_out)
error (_("`%s' has been optimized out, cannot use"),
SYMBOL_PRINT_NAME (sym));
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
return 1;
}
static int
gen_aggregate_elt_ref (struct expression *exp,
struct agent_expr *ax, struct axs_value *value,
struct type *type, char *field,
char *operator_name, char *operand_name)
{
switch (TYPE_CODE (type))
{
case TYPE_CODE_STRUCT:
case TYPE_CODE_UNION:
return gen_struct_elt_for_reference (exp, ax, value, type, field);
break;
case TYPE_CODE_NAMESPACE:
return gen_namespace_elt (exp, ax, value, type, field);
break;
default:
internal_error (__FILE__, __LINE__,
_("non-aggregate type in gen_aggregate_elt_ref"));
}
return 0;
}
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
2010-12-31 Michael Snyder <msnyder@vmware.com> * annotate.c: Comment cleanup, shorten long lines. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * auxv.c: Ditto. * auxv.h: Ditto. * ax-gdb.c: Ditto. * ax-gdb.h: Ditto. * ax-general.c: Ditto. * breakpoint.h: Ditto. * buildsym.h: Ditto.
2010-12-31 19:16:37 +00:00
/* Generate code for GDB's magical `repeat' operator.
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
LVALUE @ INT creates an array INT elements long, and whose elements
have the same type as LVALUE, located in memory so that LVALUE is
its first element. For example, argv[0]@argc gives you the array
of command-line arguments.
Unfortunately, because we have to know the types before we actually
have a value for the expression, we can't implement this perfectly
without changing the type system, having values that occupy two
stack slots, doing weird things with sizeof, etc. So we require
the right operand to be a constant expression. */
static void
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_repeat (struct expression *exp, union exp_element **pc,
struct agent_expr *ax, struct axs_value *value)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
struct axs_value value1;
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* We don't want to turn this into an rvalue, so no conversions
here. */
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (exp, pc, ax, &value1);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
if (value1.kind != axs_lvalue_memory)
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Left operand of `@' must be an object in memory."));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Evaluate the length; it had better be a constant. */
{
struct value *v = const_expr (pc);
int length;
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
if (!v)
2011-01-05 Michael Snyder <msnyder@vmware.com> * addrmap.c: Shorten lines of >= 80 columns. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * ax-gdb.c: Ditto. * ax-general.c: Ditto. * bcache.c: Ditto. * blockframe.c: Ditto. * breakpoint.c: Ditto. * buildsym.c: Ditto. * c-lang.c: Ditto. * c-typeprint.c: Ditto. * charset.c: Ditto. * coffread.c: Ditto. * command.h: Ditto. * corelow.c: Ditto. * cp-abi.c: Ditto. * cp-namespace.c: Ditto. * cp-support.c: Ditto. * dbug-rom.c: Ditto. * dbxread.c: Ditto. * defs.h: Ditto. * dfp.c: Ditto. * dfp.h: Ditto. * dictionary.c: Ditto. * disasm.c: Ditto. * doublest.c: Ditto. * dwarf2-frame.c: Ditto. * dwarf2expr.c: Ditto. * dwarf2loc.c: Ditto. * dwarf2read.c: Ditto. * elfread.c: Ditto. * eval.c: Ditto. * event-loop.c: Ditto. * event-loop.h: Ditto. * exceptions.h: Ditto. * exec.c: Ditto. * expprint.c: Ditto. * expression.h: Ditto. * f-lang.c: Ditto. * f-valprint.c: Ditto. * findcmd.c: Ditto. * frame-base.c: Ditto. * frame-unwind.c: Ditto. * frame-unwind.h: Ditto. * frame.c: Ditto. * frame.h: Ditto. * gcore.c: Ditto. * gdb-stabs.h: Ditto. * gdb_assert.h: Ditto. * gdb_dirent.h: Ditto. * gdb_obstack.h: Ditto. * gdbcore.h: Ditto. * gdbtypes.c: Ditto. * gdbtypes.h: Ditto. * inf-ttrace.c: Ditto. * infcall.c: Ditto. * infcmd.c: Ditto. * inflow.c: Ditto. * infrun.c: Ditto. * inline-frame.h: Ditto. * language.c: Ditto. * language.h: Ditto. * libunwind-frame.c: Ditto. * libunwind-frame.h: Ditto. * linespec.c: Ditto. * linux-nat.c: Ditto. * linux-nat.h: Ditto. * linux-thread-db.c: Ditto. * machoread.c: Ditto. * macroexp.c: Ditto. * macrotab.c: Ditto. * main.c: Ditto. * maint.c: Ditto. * mdebugread.c: Ditto. * memattr.c: Ditto. * minsyms.c: Ditto. * monitor.c: Ditto. * monitor.h: Ditto. * objfiles.c: Ditto. * objfiles.h: Ditto. * osabi.c: Ditto. * p-typeprint.c: Ditto. * p-valprint.c: Ditto. * parse.c: Ditto. * printcmd.c: Ditto. * proc-events.c: Ditto. * procfs.c: Ditto. * progspace.c: Ditto. * progspace.h: Ditto. * psympriv.h: Ditto. * psymtab.c: Ditto. * record.c: Ditto. * regcache.c: Ditto. * regcache.h: Ditto. * remote-fileio.c: Ditto. * remote.c: Ditto. * ser-mingw.c: Ditto. * ser-tcp.c: Ditto. * ser-unix.c: Ditto. * serial.c: Ditto. * serial.h: Ditto. * solib-frv.c: Ditto. * solib-irix.c: Ditto. * solib-osf.c: Ditto. * solib-pa64.c: Ditto. * solib-som.c: Ditto. * solib-sunos.c: Ditto. * solib-svr4.c: Ditto. * solib-target.c: Ditto. * solib.c: Ditto. * somread.c: Ditto. * source.c: Ditto. * stabsread.c: Ditto. * stabsread.c: Ditto. * stack.c: Ditto. * stack.h: Ditto. * symfile-mem.c: Ditto. * symfile.c: Ditto. * symfile.h: Ditto. * symmisc.c: Ditto. * symtab.c: Ditto. * symtab.h: Ditto. * target-descriptions.c: Ditto. * target-memory.c: Ditto. * target.c: Ditto. * target.h: Ditto. * terminal.h: Ditto. * thread.c: Ditto. * top.c: Ditto. * tracepoint.c: Ditto. * tracepoint.h: Ditto. * ui-file.c: Ditto. * ui-file.h: Ditto. * ui-out.h: Ditto. * user-regs.c: Ditto. * user-regs.h: Ditto. * utils.c: Ditto. * valarith.c: Ditto. * valops.c: Ditto. * valprint.c: Ditto. * valprint.h: Ditto. * value.c: Ditto. * varobj.c: Ditto. * varobj.h: Ditto. * vec.h: Ditto. * xcoffread.c: Ditto. * xcoffsolib.c: Ditto. * xcoffsolib.h: Ditto. * xml-syscall.c: Ditto. * xml-tdesc.c: Ditto.
2011-01-05 22:22:53 +00:00
error (_("Right operand of `@' must be a "
"constant, in agent expressions."));
2005-02-07 Andrew Cagney <cagney@gnu.org> * value.h (deprecated_set_value_type): Declare. * value.c (deprecated_set_value_type): Define. * hpacc-abi.c, gnu-v2-abi.c, cp-valprint.c: Update. * c-valprint.c, jv-lang.c, objc-lang.c, ada-lang.c: Update. * infcall.c, printcmd.c, valops.c, eval.c, p-exp.y: Update. * ax-gdb.c, tracepoint.c: Update.
2005-02-07 23:51:03 +00:00
if (TYPE_CODE (value_type (v)) != TYPE_CODE_INT)
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Right operand of `@' must be an integer."));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
length = value_as_long (v);
if (length <= 0)
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Right operand of `@' must be positive."));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* The top of the stack is already the address of the object, so
all we need to do is frob the type of the lvalue. */
{
/* FIXME-type-allocation: need a way to free this type when we are
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
done with it. */
* gdbtypes.c (lookup_array_range_type): Add prototype. (lookup_string_range_type): Likewise. * gdbtypes.c (lookup_array_range_type): New function. (lookup_string_range_type): Likewise. * ax-gdb.c (gen_repeat): Use lookup_array_range_type. * parse.c (follow_types): Likewise. * jv-lang.c (java_array_type): Likewise. * gnu-v3-abi.c (build_gdb_vtable_type): Likewise. * mt-tdep.c (mt_register_type): Likewise. * sh-tdep.c (sh_sh4_build_float_register_type): Likewise. * sh64-tdep.c (sh64_build_float_register_type): Likewise. * value.c (allocate_repeat_value): Likewise. * valops.c (value_array, value_cstring): Likewise. * valops.c (value_string): Use lookup_string_range_type.
2009-07-02 12:18:46 +00:00
struct type *array
= lookup_array_range_type (value1.type, 0, length - 1);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
value->kind = axs_lvalue_memory;
value->type = array;
}
}
}
/* Emit code for the `sizeof' operator.
*PC should point at the start of the operand expression; we advance it
to the first instruction after the operand. */
static void
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_sizeof (struct expression *exp, union exp_element **pc,
struct agent_expr *ax, struct axs_value *value,
struct type *size_type)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* We don't care about the value of the operand expression; we only
care about its type. However, in the current arrangement, the
only way to find an expression's type is to generate code for it.
So we generate code for the operand, and then throw it away,
replacing it with code that simply pushes its size. */
int start = ax->len;
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (exp, pc, ax, value);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Throw away the code we just generated. */
ax->len = start;
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
ax_const_l (ax, TYPE_LENGTH (value->type));
value->kind = axs_rvalue;
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
value->type = size_type;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Generating bytecode from GDB expressions: general recursive thingy */
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
/* XXX: i18n */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* A gen_expr function written by a Gen-X'er guy.
Append code for the subexpression of EXPR starting at *POS_P to AX. */
2012-04-27 Sergio Durigan Junior <sergiodj@redhat.com> Tom Tromey <tromey@redhat.com> Jan Kratochvil <jan.kratochvil@redhat.com> * Makefile.in (SFILES): Add `probe' and `stap-probe'. (COMMON_OBS): Likewise. (HFILES_NO_SRCDIR): Add `probe'. * NEWS: Mention support for static and SystemTap probes. * amd64-tdep.c (amd64_init_abi): Initializing proper fields used by SystemTap probes' arguments parser. * arm-linux-tdep.c: Including headers needed to perform the parsing of SystemTap probes' arguments. (arm_stap_is_single_operand): New function. (arm_stap_parse_special_token): Likewise. (arm_linux_init_abi): Initializing proper fields used by SystemTap probes' arguments parser. * ax-gdb.c (require_rvalue): Removing static declaration. (gen_expr): Likewise. * ax-gdb.h (gen_expr): Declaring function. (require_rvalue): Likewise. * breakpoint.c: Include `gdb_regex.h' and `probe.h'. (bkpt_probe_breakpoint_ops): New variable. (momentary_breakpoint_from_master): Set the `probe' value. (add_location_to_breakpoint): Likewise. (break_command_1): Using proper breakpoint_ops according to the argument passed by the user in the command line. (bkpt_probe_insert_location): New function. (bkpt_probe_remove_location): Likewise. (bkpt_probe_create_sals_from_address): Likewise. (bkpt_probe_decode_linespec): Likewise. (tracepoint_probe_create_sals_from_address): Likewise. (tracepoint_probe_decode_linespec): Likewise. (tracepoint_probe_breakpoint_ops): New variable. (trace_command): Using proper breakpoint_ops according to the argument passed by the user in the command line. (initialize_breakpoint_ops): Initializing breakpoint_ops for static probes on breakpoints and tracepoints. * breakpoint.h (struct bp_location) <probe>: New field. * cli-utils.c (skip_spaces_const): New function. (extract_arg): Likewise. * cli-utils.h (skip_spaces_const): Likewise. (extract_arg): Likewise. * coffread.c (coff_sym_fns): Add `sym_probe_fns' value. * configure.ac: Append `stap-probe.o' to be generated when ELF support is present. * configure: Regenerate. * dbxread.c (aout_sym_fns): Add `sym_probe_fns' value. * elfread.c: Include `probe.h' and `arch-utils.h'. (probe_key): New variable. (elf_get_probes): New function. (elf_get_probe_argument_count): Likewise. (elf_evaluate_probe_argument): Likewise. (elf_compile_to_ax): Likewise. (elf_symfile_relocate_probe): Likewise. (stap_probe_key_free): Likewise. (elf_probe_fns): New variable. (elf_sym_fns): Add `sym_probe_fns' value. (elf_sym_fns_lazy_psyms): Likewise. (elf_sym_fns_gdb_index): Likewise. (_initialize_elfread): Initialize objfile cache for static probes. * gdb_vecs.h (struct probe): New forward declaration. (probe_p): New VEC declaration. * gdbarch.c: Regenerate. * gdbarch.h: Regenerate. * gdbarch.sh (stap_integer_prefix): New variable. (stap_integer_suffix): Likewise. (stap_register_prefix): Likewise. (stap_register_suffix): Likewise. (stap_register_indirection_prefix): Likewise. (stap_register_indirection_suffix): Likewise. (stap_gdb_register_prefix): Likewise. (stap_gdb_register_suffix): Likewise. (stap_is_single_operand): New function. (stap_parse_special_token): Likewise. (struct stap_parse_info): Forward declaration. * i386-tdep.c: Including headers needed to perform the parsing of SystemTap probes' arguments. (i386_stap_is_single_operand): New function. (i386_stap_parse_special_token): Likewise. (i386_elf_init_abi): Initializing proper fields used by SystemTap probes' arguments parser. * i386-tdep.h (i386_stap_is_single_operand): New function. (i386_stap_parse_special_token): Likewise. * machoread.c (macho_sym_fns): Add `sym_probe_fns' value. * mipsread.c (ecoff_sym_fns): Likewise. * objfiles.c (objfile_relocate1): Support relocation for static probes. * parse.c (prefixify_expression): Remove static declaration. (initialize_expout): Likewise. (reallocate_expout): Likewise. * parser-defs.h (initialize_expout): Declare function. (reallocate_expout): Likewise. (prefixify_expression): Likewise. * ppc-linux-tdep.c: Including headers needed to perform the parsing of SystemTap probes' arguments. (ppc_stap_is_single_operand): New function. (ppc_stap_parse_special_token): Likewise. (ppc_linux_init_abi): Initializing proper fields used by SystemTap probes' arguments parser. * probe.c: New file, for generic statically defined probe support. * probe.h: Likewise. * s390-tdep.c: Including headers needed to perform the parsing of SystemTap probes' arguments. (s390_stap_is_single_operand): New function. (s390_gdbarch_init): Initializing proper fields used by SystemTap probes' arguments parser. * somread.c (som_sym_fns): Add `sym_probe_fns' value. * stap-probe.c: New file, for SystemTap probe support. * stap-probe.h: Likewise. * symfile.h: Include `gdb_vecs.h'. (struct sym_probe_fns): New struct. (struct sym_fns) <sym_probe_fns>: New field. * symtab.c (init_sal): Initialize `probe' field. * symtab.h (struct probe): Forward declaration. (struct symtab_and_line) <probe>: New field. * tracepoint.c (start_tracing): Adjust semaphore on breakpoints locations. (stop_tracing): Likewise. * xcoffread.c (xcoff_sym_fns): Add `sym_probe_fns' value.
2012-04-27 20:47:57 +00:00
void
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (struct expression *exp, union exp_element **pc,
struct agent_expr *ax, struct axs_value *value)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
/* Used to hold the descriptions of operand expressions. */
* ax-gdb.c (gen_expr): Handle logical and, logical or, and conditional expressions.
2009-12-29 23:21:38 +00:00
struct axs_value value1, value2, value3;
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
enum exp_opcode op = (*pc)[0].opcode, op2;
* ax-gdb.c (gen_expr): Handle logical and, logical or, and conditional expressions.
2009-12-29 23:21:38 +00:00
int if1, go1, if2, go2, end;
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
struct type *int_type = builtin_type (exp->gdbarch)->builtin_int;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* If we're looking at a constant expression, just push its value. */
{
struct value *v = maybe_const_expr (pc);
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
if (v)
{
ax_const_l (ax, value_as_long (v));
value->kind = axs_rvalue;
2004-11-12 Andrew Cagney <cagney@gnu.org> * value.h (VALUE_TYPE, VALUE_NEXT, VALUE_OFFSET, VALUE_BITSIZE) (VALUE_BITPOS): Delete. (value_type, value_offset, value_bitsize, value_bitpos): Declare. * value.c (value_type, value_offset, value_bitpos) (value_bitsize): New functions. Update references. * arm-tdep.c, gnu-v3-abi.c, hpacc-abi.c, gnu-v2-abi.c: Update. * f-valprint.c, cp-valprint.c, c-valprint.c: Update. * ada-valprint.c, typeprint.c, scm-valprint.c, scm-exp.c: Update. * p-valprint.c, jv-valprint.c, jv-lang.c, varobj.c: Update. * objc-lang.c, ada-lang.c, std-regs.c, stack.c: Update. * infcall.c, linespec.c, printcmd.c, valarith.c: Update. * valops.c, eval.c, findvar.c, breakpoint.c: Update. * tracepoint.c, ax-gdb.c, mi/mi-main.c, cli/cli-dump.c: * rs6000-tdep.c, ppc-sysv-tdep.c: Update.
2004-11-12 21:45:08 +00:00
value->type = check_typedef (value_type (v));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
return;
}
}
/* Otherwise, go ahead and generate code for it. */
switch (op)
{
/* Binary arithmetic operators. */
case BINOP_ADD:
case BINOP_SUB:
case BINOP_MUL:
case BINOP_DIV:
case BINOP_REM:
2010-03-12 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_expr): Add shift expressions. (gen_expr_binop_rest): Ditto.
2010-03-12 23:13:19 +00:00
case BINOP_LSH:
case BINOP_RSH:
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case BINOP_SUBSCRIPT:
case BINOP_BITWISE_AND:
case BINOP_BITWISE_IOR:
case BINOP_BITWISE_XOR:
gdb/ Conditional tracepoints. * ax-gdb.h (gen_eval_for_expr): Declare. * ax-gdb.c (gen_expr): Generate bytecodes for BINOP_EQUAL and other comparisons. (gen_eval_for_expr): New function. (agent_eval_command): New maintenance command. (_initialize_ax_gdb): Define the command. * remote.c (struct remote_state): New field cond_tracepoints. (PACKET_ConditionalTracepoints): New packet config type. (remote_cond_tracepoint_feature): New function. (remote_protocol_features): Add ConditionalTracepoints. (remote_supports_cond_tracepoints): New function. (_initialize_remote): Add ConditionalTracepoints. * tracepoint.c (download_tracepoint): Add conditional. * NEWS: Mention conditional tracepoints. gdb/doc/ * gdb.texinfo (Tracepoint Conditions): New section. (General Query Packets): Describe ConditionalTracepoints. (Tracepoint Packets): Describe condition field. (Maintenance Commands): Describe maint agent-eval. * agentexpr.texi (Using Agent Expressions): Mention eval usage. gdb/testsuite/ * gdb.trace/tracecmd.exp: Add basic test of tracepoint conditions.
2009-07-14 21:40:34 +00:00
case BINOP_EQUAL:
case BINOP_NOTEQUAL:
case BINOP_LESS:
case BINOP_GTR:
case BINOP_LEQ:
case BINOP_GEQ:
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
(*pc)++;
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (exp, pc, ax, &value1);
gen_usual_unary (exp, ax, &value1);
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
gen_expr_binop_rest (exp, op, pc, ax, value, &value1, &value2);
break;
* ax-gdb.c (gen_expr): Handle logical and, logical or, and conditional expressions.
2009-12-29 23:21:38 +00:00
case BINOP_LOGICAL_AND:
(*pc)++;
/* Generate the obvious sequence of tests and jumps. */
gen_expr (exp, pc, ax, &value1);
gen_usual_unary (exp, ax, &value1);
if1 = ax_goto (ax, aop_if_goto);
go1 = ax_goto (ax, aop_goto);
ax_label (ax, if1, ax->len);
gen_expr (exp, pc, ax, &value2);
gen_usual_unary (exp, ax, &value2);
if2 = ax_goto (ax, aop_if_goto);
go2 = ax_goto (ax, aop_goto);
ax_label (ax, if2, ax->len);
ax_const_l (ax, 1);
end = ax_goto (ax, aop_goto);
ax_label (ax, go1, ax->len);
ax_label (ax, go2, ax->len);
ax_const_l (ax, 0);
ax_label (ax, end, ax->len);
value->kind = axs_rvalue;
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
value->type = int_type;
* ax-gdb.c (gen_expr): Handle logical and, logical or, and conditional expressions.
2009-12-29 23:21:38 +00:00
break;
case BINOP_LOGICAL_OR:
(*pc)++;
/* Generate the obvious sequence of tests and jumps. */
gen_expr (exp, pc, ax, &value1);
gen_usual_unary (exp, ax, &value1);
if1 = ax_goto (ax, aop_if_goto);
gen_expr (exp, pc, ax, &value2);
gen_usual_unary (exp, ax, &value2);
if2 = ax_goto (ax, aop_if_goto);
ax_const_l (ax, 0);
end = ax_goto (ax, aop_goto);
ax_label (ax, if1, ax->len);
ax_label (ax, if2, ax->len);
ax_const_l (ax, 1);
ax_label (ax, end, ax->len);
value->kind = axs_rvalue;
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
value->type = int_type;
* ax-gdb.c (gen_expr): Handle logical and, logical or, and conditional expressions.
2009-12-29 23:21:38 +00:00
break;
case TERNOP_COND:
(*pc)++;
gen_expr (exp, pc, ax, &value1);
gen_usual_unary (exp, ax, &value1);
/* For (A ? B : C), it's easiest to generate subexpression
bytecodes in order, but if_goto jumps on true, so we invert
the sense of A. Then we can do B by dropping through, and
jump to do C. */
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
gen_logical_not (ax, &value1, int_type);
* ax-gdb.c (gen_expr): Handle logical and, logical or, and conditional expressions.
2009-12-29 23:21:38 +00:00
if1 = ax_goto (ax, aop_if_goto);
gen_expr (exp, pc, ax, &value2);
gen_usual_unary (exp, ax, &value2);
end = ax_goto (ax, aop_goto);
ax_label (ax, if1, ax->len);
gen_expr (exp, pc, ax, &value3);
gen_usual_unary (exp, ax, &value3);
ax_label (ax, end, ax->len);
/* This is arbitary - what if B and C are incompatible types? */
value->type = value2.type;
value->kind = value2.kind;
break;
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
case BINOP_ASSIGN:
(*pc)++;
if ((*pc)[0].opcode == OP_INTERNALVAR)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
char *name = internalvar_name ((*pc)[1].internalvar);
struct trace_state_variable *tsv;
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
(*pc) += 3;
gen_expr (exp, pc, ax, value);
tsv = find_trace_state_variable (name);
if (tsv)
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
{
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
ax_tsv (ax, aop_setv, tsv->number);
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
if (ax->tracing)
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
ax_tsv (ax, aop_tracev, tsv->number);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
}
else
2011-01-05 Michael Snyder <msnyder@vmware.com> * addrmap.c: Shorten lines of >= 80 columns. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * ax-gdb.c: Ditto. * ax-general.c: Ditto. * bcache.c: Ditto. * blockframe.c: Ditto. * breakpoint.c: Ditto. * buildsym.c: Ditto. * c-lang.c: Ditto. * c-typeprint.c: Ditto. * charset.c: Ditto. * coffread.c: Ditto. * command.h: Ditto. * corelow.c: Ditto. * cp-abi.c: Ditto. * cp-namespace.c: Ditto. * cp-support.c: Ditto. * dbug-rom.c: Ditto. * dbxread.c: Ditto. * defs.h: Ditto. * dfp.c: Ditto. * dfp.h: Ditto. * dictionary.c: Ditto. * disasm.c: Ditto. * doublest.c: Ditto. * dwarf2-frame.c: Ditto. * dwarf2expr.c: Ditto. * dwarf2loc.c: Ditto. * dwarf2read.c: Ditto. * elfread.c: Ditto. * eval.c: Ditto. * event-loop.c: Ditto. * event-loop.h: Ditto. * exceptions.h: Ditto. * exec.c: Ditto. * expprint.c: Ditto. * expression.h: Ditto. * f-lang.c: Ditto. * f-valprint.c: Ditto. * findcmd.c: Ditto. * frame-base.c: Ditto. * frame-unwind.c: Ditto. * frame-unwind.h: Ditto. * frame.c: Ditto. * frame.h: Ditto. * gcore.c: Ditto. * gdb-stabs.h: Ditto. * gdb_assert.h: Ditto. * gdb_dirent.h: Ditto. * gdb_obstack.h: Ditto. * gdbcore.h: Ditto. * gdbtypes.c: Ditto. * gdbtypes.h: Ditto. * inf-ttrace.c: Ditto. * infcall.c: Ditto. * infcmd.c: Ditto. * inflow.c: Ditto. * infrun.c: Ditto. * inline-frame.h: Ditto. * language.c: Ditto. * language.h: Ditto. * libunwind-frame.c: Ditto. * libunwind-frame.h: Ditto. * linespec.c: Ditto. * linux-nat.c: Ditto. * linux-nat.h: Ditto. * linux-thread-db.c: Ditto. * machoread.c: Ditto. * macroexp.c: Ditto. * macrotab.c: Ditto. * main.c: Ditto. * maint.c: Ditto. * mdebugread.c: Ditto. * memattr.c: Ditto. * minsyms.c: Ditto. * monitor.c: Ditto. * monitor.h: Ditto. * objfiles.c: Ditto. * objfiles.h: Ditto. * osabi.c: Ditto. * p-typeprint.c: Ditto. * p-valprint.c: Ditto. * parse.c: Ditto. * printcmd.c: Ditto. * proc-events.c: Ditto. * procfs.c: Ditto. * progspace.c: Ditto. * progspace.h: Ditto. * psympriv.h: Ditto. * psymtab.c: Ditto. * record.c: Ditto. * regcache.c: Ditto. * regcache.h: Ditto. * remote-fileio.c: Ditto. * remote.c: Ditto. * ser-mingw.c: Ditto. * ser-tcp.c: Ditto. * ser-unix.c: Ditto. * serial.c: Ditto. * serial.h: Ditto. * solib-frv.c: Ditto. * solib-irix.c: Ditto. * solib-osf.c: Ditto. * solib-pa64.c: Ditto. * solib-som.c: Ditto. * solib-sunos.c: Ditto. * solib-svr4.c: Ditto. * solib-target.c: Ditto. * solib.c: Ditto. * somread.c: Ditto. * source.c: Ditto. * stabsread.c: Ditto. * stabsread.c: Ditto. * stack.c: Ditto. * stack.h: Ditto. * symfile-mem.c: Ditto. * symfile.c: Ditto. * symfile.h: Ditto. * symmisc.c: Ditto. * symtab.c: Ditto. * symtab.h: Ditto. * target-descriptions.c: Ditto. * target-memory.c: Ditto. * target.c: Ditto. * target.h: Ditto. * terminal.h: Ditto. * thread.c: Ditto. * top.c: Ditto. * tracepoint.c: Ditto. * tracepoint.h: Ditto. * ui-file.c: Ditto. * ui-file.h: Ditto. * ui-out.h: Ditto. * user-regs.c: Ditto. * user-regs.h: Ditto. * utils.c: Ditto. * valarith.c: Ditto. * valops.c: Ditto. * valprint.c: Ditto. * valprint.h: Ditto. * value.c: Ditto. * varobj.c: Ditto. * varobj.h: Ditto. * vec.h: Ditto. * xcoffread.c: Ditto. * xcoffsolib.c: Ditto. * xcoffsolib.h: Ditto. * xml-syscall.c: Ditto. * xml-tdesc.c: Ditto.
2011-01-05 22:22:53 +00:00
error (_("$%s is not a trace state variable, "
"may not assign to it"), name);
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
}
else
error (_("May only assign to trace state variables"));
break;
gdb/ Conditional tracepoints. * ax-gdb.h (gen_eval_for_expr): Declare. * ax-gdb.c (gen_expr): Generate bytecodes for BINOP_EQUAL and other comparisons. (gen_eval_for_expr): New function. (agent_eval_command): New maintenance command. (_initialize_ax_gdb): Define the command. * remote.c (struct remote_state): New field cond_tracepoints. (PACKET_ConditionalTracepoints): New packet config type. (remote_cond_tracepoint_feature): New function. (remote_protocol_features): Add ConditionalTracepoints. (remote_supports_cond_tracepoints): New function. (_initialize_remote): Add ConditionalTracepoints. * tracepoint.c (download_tracepoint): Add conditional. * NEWS: Mention conditional tracepoints. gdb/doc/ * gdb.texinfo (Tracepoint Conditions): New section. (General Query Packets): Describe ConditionalTracepoints. (Tracepoint Packets): Describe condition field. (Maintenance Commands): Describe maint agent-eval. * agentexpr.texi (Using Agent Expressions): Mention eval usage. gdb/testsuite/ * gdb.trace/tracecmd.exp: Add basic test of tracepoint conditions.
2009-07-14 21:40:34 +00:00
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
case BINOP_ASSIGN_MODIFY:
(*pc)++;
op2 = (*pc)[0].opcode;
(*pc)++;
(*pc)++;
if ((*pc)[0].opcode == OP_INTERNALVAR)
{
char *name = internalvar_name ((*pc)[1].internalvar);
struct trace_state_variable *tsv;
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
(*pc) += 3;
tsv = find_trace_state_variable (name);
if (tsv)
{
/* The tsv will be the left half of the binary operation. */
ax_tsv (ax, aop_getv, tsv->number);
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
if (ax->tracing)
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
ax_tsv (ax, aop_tracev, tsv->number);
/* Trace state variables are always 64-bit integers. */
value1.kind = axs_rvalue;
value1.type = builtin_type (exp->gdbarch)->builtin_long_long;
/* Now do right half of expression. */
gen_expr_binop_rest (exp, op2, pc, ax, value, &value1, &value2);
/* We have a result of the binary op, set the tsv. */
ax_tsv (ax, aop_setv, tsv->number);
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
if (ax->tracing)
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
ax_tsv (ax, aop_tracev, tsv->number);
}
else
2011-01-05 Michael Snyder <msnyder@vmware.com> * addrmap.c: Shorten lines of >= 80 columns. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * ax-gdb.c: Ditto. * ax-general.c: Ditto. * bcache.c: Ditto. * blockframe.c: Ditto. * breakpoint.c: Ditto. * buildsym.c: Ditto. * c-lang.c: Ditto. * c-typeprint.c: Ditto. * charset.c: Ditto. * coffread.c: Ditto. * command.h: Ditto. * corelow.c: Ditto. * cp-abi.c: Ditto. * cp-namespace.c: Ditto. * cp-support.c: Ditto. * dbug-rom.c: Ditto. * dbxread.c: Ditto. * defs.h: Ditto. * dfp.c: Ditto. * dfp.h: Ditto. * dictionary.c: Ditto. * disasm.c: Ditto. * doublest.c: Ditto. * dwarf2-frame.c: Ditto. * dwarf2expr.c: Ditto. * dwarf2loc.c: Ditto. * dwarf2read.c: Ditto. * elfread.c: Ditto. * eval.c: Ditto. * event-loop.c: Ditto. * event-loop.h: Ditto. * exceptions.h: Ditto. * exec.c: Ditto. * expprint.c: Ditto. * expression.h: Ditto. * f-lang.c: Ditto. * f-valprint.c: Ditto. * findcmd.c: Ditto. * frame-base.c: Ditto. * frame-unwind.c: Ditto. * frame-unwind.h: Ditto. * frame.c: Ditto. * frame.h: Ditto. * gcore.c: Ditto. * gdb-stabs.h: Ditto. * gdb_assert.h: Ditto. * gdb_dirent.h: Ditto. * gdb_obstack.h: Ditto. * gdbcore.h: Ditto. * gdbtypes.c: Ditto. * gdbtypes.h: Ditto. * inf-ttrace.c: Ditto. * infcall.c: Ditto. * infcmd.c: Ditto. * inflow.c: Ditto. * infrun.c: Ditto. * inline-frame.h: Ditto. * language.c: Ditto. * language.h: Ditto. * libunwind-frame.c: Ditto. * libunwind-frame.h: Ditto. * linespec.c: Ditto. * linux-nat.c: Ditto. * linux-nat.h: Ditto. * linux-thread-db.c: Ditto. * machoread.c: Ditto. * macroexp.c: Ditto. * macrotab.c: Ditto. * main.c: Ditto. * maint.c: Ditto. * mdebugread.c: Ditto. * memattr.c: Ditto. * minsyms.c: Ditto. * monitor.c: Ditto. * monitor.h: Ditto. * objfiles.c: Ditto. * objfiles.h: Ditto. * osabi.c: Ditto. * p-typeprint.c: Ditto. * p-valprint.c: Ditto. * parse.c: Ditto. * printcmd.c: Ditto. * proc-events.c: Ditto. * procfs.c: Ditto. * progspace.c: Ditto. * progspace.h: Ditto. * psympriv.h: Ditto. * psymtab.c: Ditto. * record.c: Ditto. * regcache.c: Ditto. * regcache.h: Ditto. * remote-fileio.c: Ditto. * remote.c: Ditto. * ser-mingw.c: Ditto. * ser-tcp.c: Ditto. * ser-unix.c: Ditto. * serial.c: Ditto. * serial.h: Ditto. * solib-frv.c: Ditto. * solib-irix.c: Ditto. * solib-osf.c: Ditto. * solib-pa64.c: Ditto. * solib-som.c: Ditto. * solib-sunos.c: Ditto. * solib-svr4.c: Ditto. * solib-target.c: Ditto. * solib.c: Ditto. * somread.c: Ditto. * source.c: Ditto. * stabsread.c: Ditto. * stabsread.c: Ditto. * stack.c: Ditto. * stack.h: Ditto. * symfile-mem.c: Ditto. * symfile.c: Ditto. * symfile.h: Ditto. * symmisc.c: Ditto. * symtab.c: Ditto. * symtab.h: Ditto. * target-descriptions.c: Ditto. * target-memory.c: Ditto. * target.c: Ditto. * target.h: Ditto. * terminal.h: Ditto. * thread.c: Ditto. * top.c: Ditto. * tracepoint.c: Ditto. * tracepoint.h: Ditto. * ui-file.c: Ditto. * ui-file.h: Ditto. * ui-out.h: Ditto. * user-regs.c: Ditto. * user-regs.h: Ditto. * utils.c: Ditto. * valarith.c: Ditto. * valops.c: Ditto. * valprint.c: Ditto. * valprint.h: Ditto. * value.c: Ditto. * varobj.c: Ditto. * varobj.h: Ditto. * vec.h: Ditto. * xcoffread.c: Ditto. * xcoffsolib.c: Ditto. * xcoffsolib.h: Ditto. * xml-syscall.c: Ditto. * xml-tdesc.c: Ditto.
2011-01-05 22:22:53 +00:00
error (_("$%s is not a trace state variable, "
"may not assign to it"), name);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
else
error (_("May only assign to trace state variables"));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
break;
/* Note that we need to be a little subtle about generating code
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
for comma. In C, we can do some optimizations here because
we know the left operand is only being evaluated for effect.
However, if the tracing kludge is in effect, then we always
need to evaluate the left hand side fully, so that all the
variables it mentions get traced. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case BINOP_COMMA:
(*pc)++;
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (exp, pc, ax, &value1);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Don't just dispose of the left operand. We might be tracing,
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
in which case we want to emit code to trace it if it's an
lvalue. */
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
gen_traced_pop (exp->gdbarch, ax, &value1);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (exp, pc, ax, value);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* It's the consumer's responsibility to trace the right operand. */
break;
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case OP_LONG: /* some integer constant */
{
struct type *type = (*pc)[1].type;
LONGEST k = (*pc)[2].longconst;
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
(*pc) += 4;
gen_int_literal (ax, value, k, type);
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
break;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case OP_VAR_VALUE:
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_var_ref (exp->gdbarch, ax, value, (*pc)[2].symbol);
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
if (value->optimized_out)
error (_("`%s' has been optimized out, cannot use"),
SYMBOL_PRINT_NAME ((*pc)[2].symbol));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
(*pc) += 4;
break;
case OP_REGISTER:
{
* expression.h (enum exp_opcode): Document a register name for OP_REGISTER. * parse.c (write_dollar_variable): Write the register name for OP_REGISTER. (operator_length_standard): Expect the register name following OP_REGISTER. * ada-lang.c (resolve_subexp): Likewise. * ax-gdb.c (gen_expr): Likewise. * eval.c (evaluate_subexp_standard): Likewise. * expprint.c (print_subexp_standard, dump_subexp_body_standard): Likewise. * tracepoint.c (encode_actions): Likewise.
2007-06-13 17:11:09 +00:00
const char *name = &(*pc)[2].string;
int reg;
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
* expression.h (enum exp_opcode): Document a register name for OP_REGISTER. * parse.c (write_dollar_variable): Write the register name for OP_REGISTER. (operator_length_standard): Expect the register name following OP_REGISTER. * ada-lang.c (resolve_subexp): Likewise. * ax-gdb.c (gen_expr): Likewise. * eval.c (evaluate_subexp_standard): Likewise. * expprint.c (print_subexp_standard, dump_subexp_body_standard): Likewise. * tracepoint.c (encode_actions): Likewise.
2007-06-13 17:11:09 +00:00
(*pc) += 4 + BYTES_TO_EXP_ELEM ((*pc)[1].longconst + 1);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
reg = user_reg_map_name_to_regnum (exp->gdbarch, name, strlen (name));
* expression.h (enum exp_opcode): Document a register name for OP_REGISTER. * parse.c (write_dollar_variable): Write the register name for OP_REGISTER. (operator_length_standard): Expect the register name following OP_REGISTER. * ada-lang.c (resolve_subexp): Likewise. * ax-gdb.c (gen_expr): Likewise. * eval.c (evaluate_subexp_standard): Likewise. * expprint.c (print_subexp_standard, dump_subexp_body_standard): Likewise. * tracepoint.c (encode_actions): Likewise.
2007-06-13 17:11:09 +00:00
if (reg == -1)
internal_error (__FILE__, __LINE__,
_("Register $%s not available"), name);
* ax-gdb.c (gen_expr) <OP_REGISTER>: Error out if trying to collect a user register.
2010-12-28 17:59:58 +00:00
/* No support for tracing user registers yet. */
if (reg >= gdbarch_num_regs (exp->gdbarch)
+ gdbarch_num_pseudo_regs (exp->gdbarch))
2010-12-29 Hui Zhu <teawater@gmail.com> * ax-gdb.c (gen_expr): Change error message.
2010-12-29 12:47:19 +00:00
error (_("'%s' is a user-register; "
"GDB cannot yet trace user-register contents."),
* ax-gdb.c (gen_expr) <OP_REGISTER>: Error out if trying to collect a user register.
2010-12-28 17:59:58 +00:00
name);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
value->kind = axs_lvalue_register;
value->u.reg = reg;
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
value->type = register_type (exp->gdbarch, reg);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
break;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case OP_INTERNALVAR:
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
{
2012-04-27 Sergio Durigan Junior <sergiodj@redhat.com> Tom Tromey <tromey@redhat.com> * ax-gdb.c (gen_expr): Clean up code to handle internal variables and to compile agent expressions. * infrun.c (siginfo_make_value): New argument `ignore'. (siginfo_funcs): New struct. (_initialize_infrun): New argument when calling `create_internalvar_type_lazy'. * thread.c (thread_id_make_value): New argument `ignore'. (thread_funcs): New struct. (_initialize_thread): New argument when calling `create_internalvar_type_lazy'. * tracepoint.c (sdata_make_value): New argument `ignore'. (sdata_funcs): New struct. (_initialize_tracepoint): New argument when calling `create_internalvar_type_lazy'. * value.c (make_value): New struct. (create_internalvar_type_lazy): New argument `data'. (compile_internalvar_to_ax): New function. (value_of_internalvar): Properly handling `make_value' case. (clear_internalvar): Likewise. (show_convenience): Adding `TRY_CATCH' block. * value.h (internalvar_make_value): Delete, replace by... (struct internalvar_funcs): ... this. (create_internalvar_type_lazy) <fun>: Delete argument. (create_internalvar_type_lazy) <funcs>, <data>: New arguments. (compile_internalvar_to_ax): New function. * windows-tdep.c (tlb_make_value): New argument `ignore'. (tlb_funcs): New struct. (_initialize_windows_tdep): New argument when calling `create_internalvar_type_lazy'.
2012-04-27 20:38:39 +00:00
struct internalvar *var = (*pc)[1].internalvar;
const char *name = internalvar_name (var);
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
struct trace_state_variable *tsv;
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
(*pc) += 3;
tsv = find_trace_state_variable (name);
if (tsv)
{
ax_tsv (ax, aop_getv, tsv->number);
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
if (ax->tracing)
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
ax_tsv (ax, aop_tracev, tsv->number);
/* Trace state variables are always 64-bit integers. */
value->kind = axs_rvalue;
value->type = builtin_type (exp->gdbarch)->builtin_long_long;
}
2012-04-27 Sergio Durigan Junior <sergiodj@redhat.com> Tom Tromey <tromey@redhat.com> * ax-gdb.c (gen_expr): Clean up code to handle internal variables and to compile agent expressions. * infrun.c (siginfo_make_value): New argument `ignore'. (siginfo_funcs): New struct. (_initialize_infrun): New argument when calling `create_internalvar_type_lazy'. * thread.c (thread_id_make_value): New argument `ignore'. (thread_funcs): New struct. (_initialize_thread): New argument when calling `create_internalvar_type_lazy'. * tracepoint.c (sdata_make_value): New argument `ignore'. (sdata_funcs): New struct. (_initialize_tracepoint): New argument when calling `create_internalvar_type_lazy'. * value.c (make_value): New struct. (create_internalvar_type_lazy): New argument `data'. (compile_internalvar_to_ax): New function. (value_of_internalvar): Properly handling `make_value' case. (clear_internalvar): Likewise. (show_convenience): Adding `TRY_CATCH' block. * value.h (internalvar_make_value): Delete, replace by... (struct internalvar_funcs): ... this. (create_internalvar_type_lazy) <fun>: Delete argument. (create_internalvar_type_lazy) <funcs>, <data>: New arguments. (compile_internalvar_to_ax): New function. * windows-tdep.c (tlb_make_value): New argument `ignore'. (tlb_funcs): New struct. (_initialize_windows_tdep): New argument when calling `create_internalvar_type_lazy'.
2012-04-27 20:38:39 +00:00
else if (! compile_internalvar_to_ax (var, ax, value))
2011-01-05 Michael Snyder <msnyder@vmware.com> * addrmap.c: Shorten lines of >= 80 columns. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * ax-gdb.c: Ditto. * ax-general.c: Ditto. * bcache.c: Ditto. * blockframe.c: Ditto. * breakpoint.c: Ditto. * buildsym.c: Ditto. * c-lang.c: Ditto. * c-typeprint.c: Ditto. * charset.c: Ditto. * coffread.c: Ditto. * command.h: Ditto. * corelow.c: Ditto. * cp-abi.c: Ditto. * cp-namespace.c: Ditto. * cp-support.c: Ditto. * dbug-rom.c: Ditto. * dbxread.c: Ditto. * defs.h: Ditto. * dfp.c: Ditto. * dfp.h: Ditto. * dictionary.c: Ditto. * disasm.c: Ditto. * doublest.c: Ditto. * dwarf2-frame.c: Ditto. * dwarf2expr.c: Ditto. * dwarf2loc.c: Ditto. * dwarf2read.c: Ditto. * elfread.c: Ditto. * eval.c: Ditto. * event-loop.c: Ditto. * event-loop.h: Ditto. * exceptions.h: Ditto. * exec.c: Ditto. * expprint.c: Ditto. * expression.h: Ditto. * f-lang.c: Ditto. * f-valprint.c: Ditto. * findcmd.c: Ditto. * frame-base.c: Ditto. * frame-unwind.c: Ditto. * frame-unwind.h: Ditto. * frame.c: Ditto. * frame.h: Ditto. * gcore.c: Ditto. * gdb-stabs.h: Ditto. * gdb_assert.h: Ditto. * gdb_dirent.h: Ditto. * gdb_obstack.h: Ditto. * gdbcore.h: Ditto. * gdbtypes.c: Ditto. * gdbtypes.h: Ditto. * inf-ttrace.c: Ditto. * infcall.c: Ditto. * infcmd.c: Ditto. * inflow.c: Ditto. * infrun.c: Ditto. * inline-frame.h: Ditto. * language.c: Ditto. * language.h: Ditto. * libunwind-frame.c: Ditto. * libunwind-frame.h: Ditto. * linespec.c: Ditto. * linux-nat.c: Ditto. * linux-nat.h: Ditto. * linux-thread-db.c: Ditto. * machoread.c: Ditto. * macroexp.c: Ditto. * macrotab.c: Ditto. * main.c: Ditto. * maint.c: Ditto. * mdebugread.c: Ditto. * memattr.c: Ditto. * minsyms.c: Ditto. * monitor.c: Ditto. * monitor.h: Ditto. * objfiles.c: Ditto. * objfiles.h: Ditto. * osabi.c: Ditto. * p-typeprint.c: Ditto. * p-valprint.c: Ditto. * parse.c: Ditto. * printcmd.c: Ditto. * proc-events.c: Ditto. * procfs.c: Ditto. * progspace.c: Ditto. * progspace.h: Ditto. * psympriv.h: Ditto. * psymtab.c: Ditto. * record.c: Ditto. * regcache.c: Ditto. * regcache.h: Ditto. * remote-fileio.c: Ditto. * remote.c: Ditto. * ser-mingw.c: Ditto. * ser-tcp.c: Ditto. * ser-unix.c: Ditto. * serial.c: Ditto. * serial.h: Ditto. * solib-frv.c: Ditto. * solib-irix.c: Ditto. * solib-osf.c: Ditto. * solib-pa64.c: Ditto. * solib-som.c: Ditto. * solib-sunos.c: Ditto. * solib-svr4.c: Ditto. * solib-target.c: Ditto. * solib.c: Ditto. * somread.c: Ditto. * source.c: Ditto. * stabsread.c: Ditto. * stabsread.c: Ditto. * stack.c: Ditto. * stack.h: Ditto. * symfile-mem.c: Ditto. * symfile.c: Ditto. * symfile.h: Ditto. * symmisc.c: Ditto. * symtab.c: Ditto. * symtab.h: Ditto. * target-descriptions.c: Ditto. * target-memory.c: Ditto. * target.c: Ditto. * target.h: Ditto. * terminal.h: Ditto. * thread.c: Ditto. * top.c: Ditto. * tracepoint.c: Ditto. * tracepoint.h: Ditto. * ui-file.c: Ditto. * ui-file.h: Ditto. * ui-out.h: Ditto. * user-regs.c: Ditto. * user-regs.h: Ditto. * utils.c: Ditto. * valarith.c: Ditto. * valops.c: Ditto. * valprint.c: Ditto. * valprint.h: Ditto. * value.c: Ditto. * varobj.c: Ditto. * varobj.h: Ditto. * vec.h: Ditto. * xcoffread.c: Ditto. * xcoffsolib.c: Ditto. * xcoffsolib.h: Ditto. * xml-syscall.c: Ditto. * xml-tdesc.c: Ditto.
2011-01-05 22:22:53 +00:00
error (_("$%s is not a trace state variable; GDB agent "
"expressions cannot use convenience variables."), name);
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
}
break;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
/* Weirdo operator: see comments for gen_repeat for details. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case BINOP_REPEAT:
/* Note that gen_repeat handles its own argument evaluation. */
(*pc)++;
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_repeat (exp, pc, ax, value);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
break;
case UNOP_CAST:
{
struct type *type = (*pc)[1].type;
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
(*pc) += 3;
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (exp, pc, ax, value);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
gen_cast (ax, value, type);
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
break;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
* ax-gdb.c (gen_expr): Handle UNOP_CAST_TYPE, UNOP_MEMVAL_TYPE. * breakpoint.c (watchpoint_exp_is_const): Handle UNOP_CAST_TYPE, UNOP_REINTERPRET_CAST, UNOP_DYNAMIC_CAST. * c-exp.y (exp): Emit UNOP_MEMVAL_TYPE, UNOP_CAST_TYPE. Update for changes to UNOP_REINTERPRET_CAST, UNOP_DYNAMIC_CAST. Use type_exp production where appropriate. * eval.c (evaluate_subexp_standard) <UNOP_CAST_TYPE>: New case. <UNOP_DYNAMIC_CAST, UNOP_REINTERPRET_CAST>: Update. <UNOP_MEMVAL_TYPE>: New case. (evaluate_subexp_for_address) <UNOP_MEMVAL_TYPE>: New case. (evaluate_subexp_for_sizeof) <UNOP_MEMVAL_TYPE>: New case. * expprint.c (print_subexp_standard) <UNOP_CAST_TYPE>: New case. <UNOP_MEMVAL_TYPE>: New case. (dump_subexp_body_standard) <UNOP_DYNAMIC_CAST, UNOP_REINTERPRET_CAST>: Update. <UNOP_CAST_TYPE, UNOP_MEMVAL_TYPE>: New cases. * parse.c (operator_length_standard) <UNOP_DYNAMIC_CAST, UNOP_REINTERPRET_CAST>: Update. <UNOP_CAST_TYPE, UNOP_MEMVAL_TYPE>: New cases. * stack.c (return_command): Also check for UNOP_CAST_TYPE. * std-operator.def (UNOP_CAST_TYPE, UNOP_MEMVAL_TYPE): New constants.
2012-07-19 15:33:25 +00:00
case UNOP_CAST_TYPE:
{
int offset;
struct value *val;
struct type *type;
++*pc;
offset = *pc - exp->elts;
val = evaluate_subexp (NULL, exp, &offset, EVAL_AVOID_SIDE_EFFECTS);
type = value_type (val);
*pc = &exp->elts[offset];
gen_expr (exp, pc, ax, value);
gen_cast (ax, value, type);
}
break;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case UNOP_MEMVAL:
{
struct type *type = check_typedef ((*pc)[1].type);
2010-05-18 Michael Snyder <msnyder@vmware.com> * ada-lang.c: White space. * ada-typeprint.c: White space. * ada-valprint.c: White space. * addrmap.c: White space. * auxv.c: White space. * ax-gdb.c: White space.
2010-05-18 19:23:37 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
(*pc) += 3;
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (exp, pc, ax, value);
2011-02-16 Tom Tromey <tromey@redhat.com> gdb/ * ax-gdb.c.c (gen_expr) <UNOP_MEMVAL>: Handle value kinds other than axs_rvalue. 2011-02-16 Pedro Alves <pedro@codesourcery.com> gdb/testsuite/ * collection.c (globalarr3): New global. (main): Initialize it before collecting, and and clear it afterwards. * collection.exp (gdb_collect_globals_test): Test collecting with '{type} addr', where the addr expression is not an rvalue.
2011-02-16 18:07:58 +00:00
/* If we have an axs_rvalue or an axs_lvalue_memory, then we
already have the right value on the stack. For
axs_lvalue_register, we must convert. */
if (value->kind == axs_lvalue_register)
require_rvalue (ax, value);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
value->type = type;
value->kind = axs_lvalue_memory;
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
break;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
* ax-gdb.c (gen_expr): Handle UNOP_CAST_TYPE, UNOP_MEMVAL_TYPE. * breakpoint.c (watchpoint_exp_is_const): Handle UNOP_CAST_TYPE, UNOP_REINTERPRET_CAST, UNOP_DYNAMIC_CAST. * c-exp.y (exp): Emit UNOP_MEMVAL_TYPE, UNOP_CAST_TYPE. Update for changes to UNOP_REINTERPRET_CAST, UNOP_DYNAMIC_CAST. Use type_exp production where appropriate. * eval.c (evaluate_subexp_standard) <UNOP_CAST_TYPE>: New case. <UNOP_DYNAMIC_CAST, UNOP_REINTERPRET_CAST>: Update. <UNOP_MEMVAL_TYPE>: New case. (evaluate_subexp_for_address) <UNOP_MEMVAL_TYPE>: New case. (evaluate_subexp_for_sizeof) <UNOP_MEMVAL_TYPE>: New case. * expprint.c (print_subexp_standard) <UNOP_CAST_TYPE>: New case. <UNOP_MEMVAL_TYPE>: New case. (dump_subexp_body_standard) <UNOP_DYNAMIC_CAST, UNOP_REINTERPRET_CAST>: Update. <UNOP_CAST_TYPE, UNOP_MEMVAL_TYPE>: New cases. * parse.c (operator_length_standard) <UNOP_DYNAMIC_CAST, UNOP_REINTERPRET_CAST>: Update. <UNOP_CAST_TYPE, UNOP_MEMVAL_TYPE>: New cases. * stack.c (return_command): Also check for UNOP_CAST_TYPE. * std-operator.def (UNOP_CAST_TYPE, UNOP_MEMVAL_TYPE): New constants.
2012-07-19 15:33:25 +00:00
case UNOP_MEMVAL_TYPE:
{
int offset;
struct value *val;
struct type *type;
++*pc;
offset = *pc - exp->elts;
val = evaluate_subexp (NULL, exp, &offset, EVAL_AVOID_SIDE_EFFECTS);
type = value_type (val);
*pc = &exp->elts[offset];
gen_expr (exp, pc, ax, value);
/* If we have an axs_rvalue or an axs_lvalue_memory, then we
already have the right value on the stack. For
axs_lvalue_register, we must convert. */
if (value->kind == axs_lvalue_register)
require_rvalue (ax, value);
value->type = type;
value->kind = axs_lvalue_memory;
}
break;
* ax-gdb.c (gen_expr): Add UNOP_PLUS case. * c-exp.y (exp): Add unary plus. * eval.c (evaluate_subexp_standard): Add UNOP_PLUS case. * valarith.c (value_x_unop): Add UNOP_PLUS case. (value_pos): New. * value.h (value_pos): Declare. * gdb.cp/userdef.cc (A1::operator+): New unary plus. (A2): New class. (main): Test operator+. * gdb.cp/userdef.exp: Test unary plus. Use A2::operator+ for breakpoint test.
2005-03-08 14:35:20 +00:00
case UNOP_PLUS:
(*pc)++;
2010-12-31 Michael Snyder <msnyder@vmware.com> * annotate.c: Comment cleanup, shorten long lines. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * auxv.c: Ditto. * auxv.h: Ditto. * ax-gdb.c: Ditto. * ax-gdb.h: Ditto. * ax-general.c: Ditto. * breakpoint.h: Ditto. * buildsym.h: Ditto.
2010-12-31 19:16:37 +00:00
/* + FOO is equivalent to 0 + FOO, which can be optimized. */
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (exp, pc, ax, value);
gen_usual_unary (exp, ax, value);
* ax-gdb.c (gen_expr): Add UNOP_PLUS case. * c-exp.y (exp): Add unary plus. * eval.c (evaluate_subexp_standard): Add UNOP_PLUS case. * valarith.c (value_x_unop): Add UNOP_PLUS case. (value_pos): New. * value.h (value_pos): Declare. * gdb.cp/userdef.cc (A1::operator+): New unary plus. (A2): New class. (main): Test operator+. * gdb.cp/userdef.exp: Test unary plus. Use A2::operator+ for breakpoint test.
2005-03-08 14:35:20 +00:00
break;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case UNOP_NEG:
(*pc)++;
/* -FOO is equivalent to 0 - FOO. */
* ada-lang.c (assign_component): Use platform-specific integer type instead of builtin_type_int32 type. (ada_evaluate_subexp) [OP_ATR_SIZE]: Likewise. * ax-gdb.c (gen_expr) [UNOP_NEG]: Use platform-specific integer type instead of builtin_type_int8 type. * valarith.c (value_x_unop): Likewise. * python/python-value.c (valpy_absolute): Avoid reference to builtin_type_int8 type. * eval.c (evaluate_subexp_standard): Use platform-specific integer type instead of builtin_type_int8 as EVAL_SKIP return value type. * ada-lang.c (ada_evaluate_subexp): Likewise. * jv-lang.c (evaluate_subexp_java): Likewise. * m2-lang.c (evaluate_subexp_modula2): Likewise. * scm-lang.c (evaluate_exp): Likewise. * value.h (value_bitstring): Add INDEX_TYPE argument. * valops.c (value_bitstring): Add INDEX_TYPE argument, use it instead of builtin_type_int32 as base range type. * eval.c (evaluate_subexp_standard): Update value_bitstring call.
2009-07-02 12:20:18 +00:00
gen_int_literal (ax, &value1, 0,
builtin_type (exp->gdbarch)->builtin_int);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_usual_unary (exp, ax, &value1); /* shouldn't do much */
gen_expr (exp, pc, ax, &value2);
gen_usual_unary (exp, ax, &value2);
gen_usual_arithmetic (exp, ax, &value1, &value2);
gen_binop (ax, value, &value1, &value2, aop_sub, aop_sub, 1, "negation");
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
break;
case UNOP_LOGICAL_NOT:
(*pc)++;
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (exp, pc, ax, value);
gen_usual_unary (exp, ax, value);
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
gen_logical_not (ax, value, int_type);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
break;
case UNOP_COMPLEMENT:
(*pc)++;
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (exp, pc, ax, value);
gen_usual_unary (exp, ax, value);
gen_integral_promotions (exp, ax, value);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
gen_complement (ax, value);
break;
case UNOP_IND:
(*pc)++;
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (exp, pc, ax, value);
gen_usual_unary (exp, ax, value);
* language.c (pointer_type): Un-comment out. * ax-gdb.c: Include language.h, use pointer_type throughout instead of testing TYPE_CODE_PTR. (gen_fetch): Include TYPE_CODE_REF. (gen_cast): Ditto.
2009-12-29 23:57:59 +00:00
if (!pointer_type (value->type))
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Argument of unary `*' is not a pointer."));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
gen_deref (ax, value);
break;
case UNOP_ADDR:
(*pc)++;
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (exp, pc, ax, value);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
gen_address_of (ax, value);
break;
case UNOP_SIZEOF:
(*pc)++;
/* Notice that gen_sizeof handles its own operand, unlike most
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
of the other unary operator functions. This is because we
have to throw away the code we generate. */
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_sizeof (exp, pc, ax, value,
builtin_type (exp->gdbarch)->builtin_int);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
break;
case STRUCTOP_STRUCT:
case STRUCTOP_PTR:
{
int length = (*pc)[1].longconst;
char *name = &(*pc)[2].string;
(*pc) += 4 + BYTES_TO_EXP_ELEM (length + 1);
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (exp, pc, ax, value);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
if (op == STRUCTOP_STRUCT)
* ax-gdb.c (gen_bitfield_ref): Add EXP argument, use expression architecture instead of current_gdbarch. (gen_struct_ref): Add EXP argument, pass to get_bitfield_ref. (gen_expr): Pass expression to get_struct_ref. * symtab.h (struct symbol_ops): Add GDBARCH parameter to tracepoint_var_ref callback. * ax-gdb.c (gen_var_ref): Pass architecture to tracepoint_var_ref symbol operation callback. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Add GDBARCH parameter. Use it instead of current_gdbarch. (locexpr_tracepoint_var_ref): Add GDBARCH parameter. Pass it to dwarf2_tracepoint_var_ref. (loclist_tracepoint_var_ref): Likewise.
2009-06-17 18:40:53 +00:00
gen_struct_ref (exp, ax, value, name, ".", "structure or union");
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
else if (op == STRUCTOP_PTR)
* ax-gdb.c (gen_bitfield_ref): Add EXP argument, use expression architecture instead of current_gdbarch. (gen_struct_ref): Add EXP argument, pass to get_bitfield_ref. (gen_expr): Pass expression to get_struct_ref. * symtab.h (struct symbol_ops): Add GDBARCH parameter to tracepoint_var_ref callback. * ax-gdb.c (gen_var_ref): Pass architecture to tracepoint_var_ref symbol operation callback. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Add GDBARCH parameter. Use it instead of current_gdbarch. (locexpr_tracepoint_var_ref): Add GDBARCH parameter. Pass it to dwarf2_tracepoint_var_ref. (loclist_tracepoint_var_ref): Likewise.
2009-06-17 18:40:53 +00:00
gen_struct_ref (exp, ax, value, name, "->",
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
"pointer to a structure or union");
else
/* If this `if' chain doesn't handle it, then the case list
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
shouldn't mention it, and we shouldn't be here. */
Add __FILE__ and __LINE__ parameter to internal_error() / internal_verror().
2001-02-08 06:03:54 +00:00
internal_error (__FILE__, __LINE__,
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
_("gen_expr: unhandled struct case"));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
break;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
2009-12-23 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_expr): Handle OP_THIS.
2009-12-24 01:42:03 +00:00
case OP_THIS:
{
* valops.c (value_of_this): Use lookup_language_this. * symtab.h (lookup_language_this): Declare. * symtab.c (lookup_language_this): New function. (lookup_symbol_aux): Use lookup_language_this. * ax-gdb.c (gen_expr) <OP_THIS>: Use lookup_language_this.
2011-06-17 20:46:47 +00:00
struct symbol *sym, *func;
2009-12-23 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_expr): Handle OP_THIS.
2009-12-24 01:42:03 +00:00
struct block *b;
* valops.c (value_of_this): Use lookup_language_this. * symtab.h (lookup_language_this): Declare. * symtab.c (lookup_language_this): New function. (lookup_symbol_aux): Use lookup_language_this. * ax-gdb.c (gen_expr) <OP_THIS>: Use lookup_language_this.
2011-06-17 20:46:47 +00:00
const struct language_defn *lang;
2009-12-23 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_expr): Handle OP_THIS.
2009-12-24 01:42:03 +00:00
* valops.c (value_of_this): Use lookup_language_this. * symtab.h (lookup_language_this): Declare. * symtab.c (lookup_language_this): New function. (lookup_symbol_aux): Use lookup_language_this. * ax-gdb.c (gen_expr) <OP_THIS>: Use lookup_language_this.
2011-06-17 20:46:47 +00:00
b = block_for_pc (ax->scope);
func = block_linkage_function (b);
lang = language_def (SYMBOL_LANGUAGE (func));
2009-12-23 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_expr): Handle OP_THIS.
2009-12-24 01:42:03 +00:00
* valops.c (value_of_this): Use lookup_language_this. * symtab.h (lookup_language_this): Declare. * symtab.c (lookup_language_this): New function. (lookup_symbol_aux): Use lookup_language_this. * ax-gdb.c (gen_expr) <OP_THIS>: Use lookup_language_this.
2011-06-17 20:46:47 +00:00
sym = lookup_language_this (lang, b);
2009-12-23 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_expr): Handle OP_THIS.
2009-12-24 01:42:03 +00:00
if (!sym)
* valops.c (value_of_this): Use lookup_language_this. * symtab.h (lookup_language_this): Declare. * symtab.c (lookup_language_this): New function. (lookup_symbol_aux): Use lookup_language_this. * ax-gdb.c (gen_expr) <OP_THIS>: Use lookup_language_this.
2011-06-17 20:46:47 +00:00
error (_("no `%s' found"), lang->la_name_of_this);
2009-12-23 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_expr): Handle OP_THIS.
2009-12-24 01:42:03 +00:00
gen_var_ref (exp->gdbarch, ax, value, sym);
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
if (value->optimized_out)
error (_("`%s' has been optimized out, cannot use"),
SYMBOL_PRINT_NAME (sym));
2009-12-23 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_expr): Handle OP_THIS.
2009-12-24 01:42:03 +00:00
(*pc) += 2;
}
break;
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
case OP_SCOPE:
{
struct type *type = (*pc)[1].type;
int length = longest_to_int ((*pc)[2].longconst);
char *name = &(*pc)[3].string;
int found;
found = gen_aggregate_elt_ref (exp, ax, value, type, name,
"?", "??");
if (!found)
error (_("There is no field named %s"), name);
(*pc) += 5 + BYTES_TO_EXP_ELEM (length + 1);
}
break;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
case OP_TYPE:
PR exp/13206: * ax-gdb.c (gen_expr) <OP_TYPEOF, OP_DECLTYPE>: New cases. * breakpoint.c (watchpoint_exp_is_const) <OP_TYPEOF, OP_DECLTYPE>: New cases. * c-exp.y (TYPEOF, DECLTYPE): New tokens. (type_exp): Add new productions. (ident_tokens): Add __typeof__, typeof, __typeof, __decltype, and decltype. * eval.c (evaluate_subexp_standard) <OP_TYPEOF, OP_DECLTYPE>: New case. * expprint.c (dump_subexp_body_standard) <OP_TYPEOF, OP_DECLTYPE>: New case. * parse.c (operator_length_standard) <OP_TYPEOF, OP_DECLTYPE>: New case. * std-operator.def (OP_TYPEOF, OP_DECLTYPE): New constants. * varobj.c (varobj_create): Handle OP_TYPEOF, OP_DECLTYPE. gdb/testsuite * gdb.cp/casts.exp: Add tests for typeof and decltype. * gdb.cp/casts.cc (decltype): New function. (main): Use it.
2012-07-19 15:38:18 +00:00
case OP_TYPEOF:
case OP_DECLTYPE:
2005-01-29 Baurzhan Ismagulov <ibr@radix50.net> * ax-gdb.c, ax-general.c, bcache.c, bfd-target.c, bsd-kvm.c, * buildsym.c, c-lang.c, c-typeprint.c, c-valprint.c, charset.c, * coff-pe-read.c, coffread.c, complaints.c, copying.c: I18n markup.
2005-01-29 17:53:26 +00:00
error (_("Attempt to use a type name as an expression."));
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
default:
2010-03-15 Stan Shebs <stan@codesourcery.com> * ax-gdb.c: Include cp-support.h. (find_field): Remove. (gen_primitive_field): New function. (gen_struct_ref_recursive): New function. (gen_struct_ref): Rewrite to call gen_struct_ref_recursive instead of find_field. (gen_static_field): New function. (gen_struct_elt_for_reference): New. (gen_namespace_elt): New. (gen_maybe_namespace_elt): New. (gen_aggregate_elt_ref): New. (gen_expr): Add OP_SCOPE, display opcode name in error message.
2010-03-15 23:53:21 +00:00
error (_("Unsupported operator %s (%d) in expression."),
SEGV during AX eval of OP_DOUBLE (unsupported) To reproduce the problem, simply try the following with any program: (gdb) maintenance agent-eval 1.0 Critical error handler: process [...] terminated due to access violation (this is on Windows; on GNU/Linux, the libc copes better) The problem is quite simple: gen_expr is given an expression that contains an unrecognized operator (OP_DOUBLE in this case). When that happens, it tries to report an error with a string image of the operator in the error message. Conversion of the opcode into a string is done using op_string which, despite its name, probably is not what the author was looking for. This function returns NULL for a lot of the opcodes, thus triggering the crash. There is a function that corresponds to what we are looking for: expprint.c:op_name. It was static, though, so I made it non-static, and used it from ax-gdb.c:gen_expr. gdb/ChangeLog: * expression.h (op_name): Add declaration. * expprint.c (op_name): Remove declaration. Make non-static. * ax-gdb.c (gen_expr): Use op_name instead of op_string.
2012-03-21 15:16:24 +00:00
op_name (exp, op), op);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
}
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
/* This handles the middle-to-right-side of code generation for binary
expressions, which is shared between regular binary operations and
assign-modify (+= and friends) expressions. */
static void
gen_expr_binop_rest (struct expression *exp,
enum exp_opcode op, union exp_element **pc,
struct agent_expr *ax, struct axs_value *value,
struct axs_value *value1, struct axs_value *value2)
{
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
struct type *int_type = builtin_type (exp->gdbarch)->builtin_int;
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
gen_expr (exp, pc, ax, value2);
gen_usual_unary (exp, ax, value2);
gen_usual_arithmetic (exp, ax, value1, value2);
switch (op)
{
case BINOP_ADD:
if (TYPE_CODE (value1->type) == TYPE_CODE_INT
* language.c (pointer_type): Un-comment out. * ax-gdb.c: Include language.h, use pointer_type throughout instead of testing TYPE_CODE_PTR. (gen_fetch): Include TYPE_CODE_REF. (gen_cast): Ditto.
2009-12-29 23:57:59 +00:00
&& pointer_type (value2->type))
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
{
/* Swap the values and proceed normally. */
ax_simple (ax, aop_swap);
gen_ptradd (ax, value, value2, value1);
}
* language.c (pointer_type): Un-comment out. * ax-gdb.c: Include language.h, use pointer_type throughout instead of testing TYPE_CODE_PTR. (gen_fetch): Include TYPE_CODE_REF. (gen_cast): Ditto.
2009-12-29 23:57:59 +00:00
else if (pointer_type (value1->type)
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
&& TYPE_CODE (value2->type) == TYPE_CODE_INT)
gen_ptradd (ax, value, value1, value2);
else
gen_binop (ax, value, value1, value2,
aop_add, aop_add, 1, "addition");
break;
case BINOP_SUB:
* language.c (pointer_type): Un-comment out. * ax-gdb.c: Include language.h, use pointer_type throughout instead of testing TYPE_CODE_PTR. (gen_fetch): Include TYPE_CODE_REF. (gen_cast): Ditto.
2009-12-29 23:57:59 +00:00
if (pointer_type (value1->type)
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
&& TYPE_CODE (value2->type) == TYPE_CODE_INT)
gen_ptrsub (ax,value, value1, value2);
* language.c (pointer_type): Un-comment out. * ax-gdb.c: Include language.h, use pointer_type throughout instead of testing TYPE_CODE_PTR. (gen_fetch): Include TYPE_CODE_REF. (gen_cast): Ditto.
2009-12-29 23:57:59 +00:00
else if (pointer_type (value1->type)
&& pointer_type (value2->type))
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
/* FIXME --- result type should be ptrdiff_t */
gen_ptrdiff (ax, value, value1, value2,
builtin_type (exp->gdbarch)->builtin_long);
else
gen_binop (ax, value, value1, value2,
aop_sub, aop_sub, 1, "subtraction");
break;
case BINOP_MUL:
gen_binop (ax, value, value1, value2,
aop_mul, aop_mul, 1, "multiplication");
break;
case BINOP_DIV:
gen_binop (ax, value, value1, value2,
aop_div_signed, aop_div_unsigned, 1, "division");
break;
case BINOP_REM:
gen_binop (ax, value, value1, value2,
aop_rem_signed, aop_rem_unsigned, 1, "remainder");
break;
2010-03-12 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_expr): Add shift expressions. (gen_expr_binop_rest): Ditto.
2010-03-12 23:13:19 +00:00
case BINOP_LSH:
gen_binop (ax, value, value1, value2,
aop_lsh, aop_lsh, 1, "left shift");
break;
case BINOP_RSH:
gen_binop (ax, value, value1, value2,
aop_rsh_signed, aop_rsh_unsigned, 1, "right shift");
break;
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
case BINOP_SUBSCRIPT:
* ax-gdb.c (gen_exp_binop_rest) [BINOP_SUBSCRIPT]: Error out on non-subscriptable types. * valarith.c (binop_types_user_defined_p): New, abstracted out from ... (binop_user_defined_p): ... this. * value.h (binop_types_user_defined_p): Declare.
2010-02-11 21:45:25 +00:00
{
struct type *type;
if (binop_types_user_defined_p (op, value1->type, value2->type))
{
2011-01-05 Michael Snyder <msnyder@vmware.com> * addrmap.c: Shorten lines of >= 80 columns. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * ax-gdb.c: Ditto. * ax-general.c: Ditto. * bcache.c: Ditto. * blockframe.c: Ditto. * breakpoint.c: Ditto. * buildsym.c: Ditto. * c-lang.c: Ditto. * c-typeprint.c: Ditto. * charset.c: Ditto. * coffread.c: Ditto. * command.h: Ditto. * corelow.c: Ditto. * cp-abi.c: Ditto. * cp-namespace.c: Ditto. * cp-support.c: Ditto. * dbug-rom.c: Ditto. * dbxread.c: Ditto. * defs.h: Ditto. * dfp.c: Ditto. * dfp.h: Ditto. * dictionary.c: Ditto. * disasm.c: Ditto. * doublest.c: Ditto. * dwarf2-frame.c: Ditto. * dwarf2expr.c: Ditto. * dwarf2loc.c: Ditto. * dwarf2read.c: Ditto. * elfread.c: Ditto. * eval.c: Ditto. * event-loop.c: Ditto. * event-loop.h: Ditto. * exceptions.h: Ditto. * exec.c: Ditto. * expprint.c: Ditto. * expression.h: Ditto. * f-lang.c: Ditto. * f-valprint.c: Ditto. * findcmd.c: Ditto. * frame-base.c: Ditto. * frame-unwind.c: Ditto. * frame-unwind.h: Ditto. * frame.c: Ditto. * frame.h: Ditto. * gcore.c: Ditto. * gdb-stabs.h: Ditto. * gdb_assert.h: Ditto. * gdb_dirent.h: Ditto. * gdb_obstack.h: Ditto. * gdbcore.h: Ditto. * gdbtypes.c: Ditto. * gdbtypes.h: Ditto. * inf-ttrace.c: Ditto. * infcall.c: Ditto. * infcmd.c: Ditto. * inflow.c: Ditto. * infrun.c: Ditto. * inline-frame.h: Ditto. * language.c: Ditto. * language.h: Ditto. * libunwind-frame.c: Ditto. * libunwind-frame.h: Ditto. * linespec.c: Ditto. * linux-nat.c: Ditto. * linux-nat.h: Ditto. * linux-thread-db.c: Ditto. * machoread.c: Ditto. * macroexp.c: Ditto. * macrotab.c: Ditto. * main.c: Ditto. * maint.c: Ditto. * mdebugread.c: Ditto. * memattr.c: Ditto. * minsyms.c: Ditto. * monitor.c: Ditto. * monitor.h: Ditto. * objfiles.c: Ditto. * objfiles.h: Ditto. * osabi.c: Ditto. * p-typeprint.c: Ditto. * p-valprint.c: Ditto. * parse.c: Ditto. * printcmd.c: Ditto. * proc-events.c: Ditto. * procfs.c: Ditto. * progspace.c: Ditto. * progspace.h: Ditto. * psympriv.h: Ditto. * psymtab.c: Ditto. * record.c: Ditto. * regcache.c: Ditto. * regcache.h: Ditto. * remote-fileio.c: Ditto. * remote.c: Ditto. * ser-mingw.c: Ditto. * ser-tcp.c: Ditto. * ser-unix.c: Ditto. * serial.c: Ditto. * serial.h: Ditto. * solib-frv.c: Ditto. * solib-irix.c: Ditto. * solib-osf.c: Ditto. * solib-pa64.c: Ditto. * solib-som.c: Ditto. * solib-sunos.c: Ditto. * solib-svr4.c: Ditto. * solib-target.c: Ditto. * solib.c: Ditto. * somread.c: Ditto. * source.c: Ditto. * stabsread.c: Ditto. * stabsread.c: Ditto. * stack.c: Ditto. * stack.h: Ditto. * symfile-mem.c: Ditto. * symfile.c: Ditto. * symfile.h: Ditto. * symmisc.c: Ditto. * symtab.c: Ditto. * symtab.h: Ditto. * target-descriptions.c: Ditto. * target-memory.c: Ditto. * target.c: Ditto. * target.h: Ditto. * terminal.h: Ditto. * thread.c: Ditto. * top.c: Ditto. * tracepoint.c: Ditto. * tracepoint.h: Ditto. * ui-file.c: Ditto. * ui-file.h: Ditto. * ui-out.h: Ditto. * user-regs.c: Ditto. * user-regs.h: Ditto. * utils.c: Ditto. * valarith.c: Ditto. * valops.c: Ditto. * valprint.c: Ditto. * valprint.h: Ditto. * value.c: Ditto. * varobj.c: Ditto. * varobj.h: Ditto. * vec.h: Ditto. * xcoffread.c: Ditto. * xcoffsolib.c: Ditto. * xcoffsolib.h: Ditto. * xml-syscall.c: Ditto. * xml-tdesc.c: Ditto.
2011-01-05 22:22:53 +00:00
error (_("cannot subscript requested type: "
"cannot call user defined functions"));
* ax-gdb.c (gen_exp_binop_rest) [BINOP_SUBSCRIPT]: Error out on non-subscriptable types. * valarith.c (binop_types_user_defined_p): New, abstracted out from ... (binop_user_defined_p): ... this. * value.h (binop_types_user_defined_p): Declare.
2010-02-11 21:45:25 +00:00
}
else
{
/* If the user attempts to subscript something that is not
an array or pointer type (like a plain int variable for
example), then report this as an error. */
type = check_typedef (value1->type);
if (TYPE_CODE (type) != TYPE_CODE_ARRAY
&& TYPE_CODE (type) != TYPE_CODE_PTR)
{
if (TYPE_NAME (type))
error (_("cannot subscript something of type `%s'"),
TYPE_NAME (type));
else
error (_("cannot subscript requested type"));
}
}
* ax-gdb.c (gen_exp_binop_rest) [BINOP_SUBSCRIPT]: Error out if the offset value isn't of integral type.
2010-02-11 23:03:22 +00:00
if (!is_integral_type (value2->type))
2011-01-05 Michael Snyder <msnyder@vmware.com> * addrmap.c: Shorten lines of >= 80 columns. * arch-utils.c: Ditto. * arch-utils.h: Ditto. * ax-gdb.c: Ditto. * ax-general.c: Ditto. * bcache.c: Ditto. * blockframe.c: Ditto. * breakpoint.c: Ditto. * buildsym.c: Ditto. * c-lang.c: Ditto. * c-typeprint.c: Ditto. * charset.c: Ditto. * coffread.c: Ditto. * command.h: Ditto. * corelow.c: Ditto. * cp-abi.c: Ditto. * cp-namespace.c: Ditto. * cp-support.c: Ditto. * dbug-rom.c: Ditto. * dbxread.c: Ditto. * defs.h: Ditto. * dfp.c: Ditto. * dfp.h: Ditto. * dictionary.c: Ditto. * disasm.c: Ditto. * doublest.c: Ditto. * dwarf2-frame.c: Ditto. * dwarf2expr.c: Ditto. * dwarf2loc.c: Ditto. * dwarf2read.c: Ditto. * elfread.c: Ditto. * eval.c: Ditto. * event-loop.c: Ditto. * event-loop.h: Ditto. * exceptions.h: Ditto. * exec.c: Ditto. * expprint.c: Ditto. * expression.h: Ditto. * f-lang.c: Ditto. * f-valprint.c: Ditto. * findcmd.c: Ditto. * frame-base.c: Ditto. * frame-unwind.c: Ditto. * frame-unwind.h: Ditto. * frame.c: Ditto. * frame.h: Ditto. * gcore.c: Ditto. * gdb-stabs.h: Ditto. * gdb_assert.h: Ditto. * gdb_dirent.h: Ditto. * gdb_obstack.h: Ditto. * gdbcore.h: Ditto. * gdbtypes.c: Ditto. * gdbtypes.h: Ditto. * inf-ttrace.c: Ditto. * infcall.c: Ditto. * infcmd.c: Ditto. * inflow.c: Ditto. * infrun.c: Ditto. * inline-frame.h: Ditto. * language.c: Ditto. * language.h: Ditto. * libunwind-frame.c: Ditto. * libunwind-frame.h: Ditto. * linespec.c: Ditto. * linux-nat.c: Ditto. * linux-nat.h: Ditto. * linux-thread-db.c: Ditto. * machoread.c: Ditto. * macroexp.c: Ditto. * macrotab.c: Ditto. * main.c: Ditto. * maint.c: Ditto. * mdebugread.c: Ditto. * memattr.c: Ditto. * minsyms.c: Ditto. * monitor.c: Ditto. * monitor.h: Ditto. * objfiles.c: Ditto. * objfiles.h: Ditto. * osabi.c: Ditto. * p-typeprint.c: Ditto. * p-valprint.c: Ditto. * parse.c: Ditto. * printcmd.c: Ditto. * proc-events.c: Ditto. * procfs.c: Ditto. * progspace.c: Ditto. * progspace.h: Ditto. * psympriv.h: Ditto. * psymtab.c: Ditto. * record.c: Ditto. * regcache.c: Ditto. * regcache.h: Ditto. * remote-fileio.c: Ditto. * remote.c: Ditto. * ser-mingw.c: Ditto. * ser-tcp.c: Ditto. * ser-unix.c: Ditto. * serial.c: Ditto. * serial.h: Ditto. * solib-frv.c: Ditto. * solib-irix.c: Ditto. * solib-osf.c: Ditto. * solib-pa64.c: Ditto. * solib-som.c: Ditto. * solib-sunos.c: Ditto. * solib-svr4.c: Ditto. * solib-target.c: Ditto. * solib.c: Ditto. * somread.c: Ditto. * source.c: Ditto. * stabsread.c: Ditto. * stabsread.c: Ditto. * stack.c: Ditto. * stack.h: Ditto. * symfile-mem.c: Ditto. * symfile.c: Ditto. * symfile.h: Ditto. * symmisc.c: Ditto. * symtab.c: Ditto. * symtab.h: Ditto. * target-descriptions.c: Ditto. * target-memory.c: Ditto. * target.c: Ditto. * target.h: Ditto. * terminal.h: Ditto. * thread.c: Ditto. * top.c: Ditto. * tracepoint.c: Ditto. * tracepoint.h: Ditto. * ui-file.c: Ditto. * ui-file.h: Ditto. * ui-out.h: Ditto. * user-regs.c: Ditto. * user-regs.h: Ditto. * utils.c: Ditto. * valarith.c: Ditto. * valops.c: Ditto. * valprint.c: Ditto. * valprint.h: Ditto. * value.c: Ditto. * varobj.c: Ditto. * varobj.h: Ditto. * vec.h: Ditto. * xcoffread.c: Ditto. * xcoffsolib.c: Ditto. * xcoffsolib.h: Ditto. * xml-syscall.c: Ditto. * xml-tdesc.c: Ditto.
2011-01-05 22:22:53 +00:00
error (_("Argument to arithmetic operation "
"not a number or boolean."));
* ax-gdb.c (gen_exp_binop_rest) [BINOP_SUBSCRIPT]: Error out if the offset value isn't of integral type.
2010-02-11 23:03:22 +00:00
* ax-gdb.c (gen_exp_binop_rest) [BINOP_SUBSCRIPT]: Error out on non-subscriptable types. * valarith.c (binop_types_user_defined_p): New, abstracted out from ... (binop_user_defined_p): ... this. * value.h (binop_types_user_defined_p): Declare.
2010-02-11 21:45:25 +00:00
gen_ptradd (ax, value, value1, value2);
gen_deref (ax, value);
break;
}
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
case BINOP_BITWISE_AND:
gen_binop (ax, value, value1, value2,
aop_bit_and, aop_bit_and, 0, "bitwise and");
break;
case BINOP_BITWISE_IOR:
gen_binop (ax, value, value1, value2,
aop_bit_or, aop_bit_or, 0, "bitwise or");
break;
case BINOP_BITWISE_XOR:
gen_binop (ax, value, value1, value2,
aop_bit_xor, aop_bit_xor, 0, "bitwise exclusive-or");
break;
case BINOP_EQUAL:
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
gen_equal (ax, value, value1, value2, int_type);
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
break;
case BINOP_NOTEQUAL:
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
gen_equal (ax, value, value1, value2, int_type);
gen_logical_not (ax, value, int_type);
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
break;
case BINOP_LESS:
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
gen_less (ax, value, value1, value2, int_type);
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
break;
case BINOP_GTR:
ax_simple (ax, aop_swap);
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
gen_less (ax, value, value1, value2, int_type);
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
break;
case BINOP_LEQ:
ax_simple (ax, aop_swap);
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
gen_less (ax, value, value1, value2, int_type);
gen_logical_not (ax, value, int_type);
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
break;
case BINOP_GEQ:
2010-03-19 Stan Shebs <stan@codesourcery.com> * ax-gdb.c (gen_fetch): Handle bool. (gen_usual_unary): Ditto. (gen_cast): Ditto. (gen_equal): New function. (gen_less): New function. (gen_expr_binop_rest): Call them, also return integer type from logical operations. (gen_expr): Ditto. * gdb.trace/ax.exp: New file.
2010-03-19 22:00:17 +00:00
gen_less (ax, value, value1, value2, int_type);
gen_logical_not (ax, value, int_type);
2009-12-28 Stan Shebs <stan@codesourcery.com> Add trace state variables. * ax.h (enum agent_op): Add getv, setv, and tracev. (ax_tsv): Declare. * ax-gdb.c: Include tracepoint.h. (gen_expr): Handle BINOP_ASSIGN, BINOP_ASSIGN_MODIFY, and OP_INTERNALVAR. (gen_expr_binop_rest): New function, split from gen_expr. * ax-general.c (ax_tsv): New function. (aop_map): Add new bytecodes. * tracepoint.h (struct trace_state_variable): New struct. (tsv_s): New typedef. (find_trace_state_variable): Declare. * tracepoint.c (tvariables): New global. (next_tsv_number): New global. (create_trace_state_variable): New function. (find_trace_state_variable): New function. (delete_trace_state_variable): New function. (trace_variable_command): New function. (delete_trace_variable_command): New function. (tvariables_info): New function. (trace_start_command): Download tsvs with initial values. (_initialize_tracepoint): Add new commands. * NEWS: Mention the addition of trace state variables. ==> doc/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.texinfo (Trace State Variables): New section. (Tracepoint Packets): Describe trace state variable packets. * agentexpr.texi (Bytecode Descriptions): Describe trace state variable bytecodes. ==> testsuite/ChangeLog <== 2009-12-28 Stan Shebs <stan@codesourcery.com> * gdb.trace/tsv.exp: New file. * gdb.base/completion.exp: Update ambiguous info output.
2009-12-28 23:39:10 +00:00
break;
default:
/* We should only list operators in the outer case statement
that we actually handle in the inner case statement. */
internal_error (__FILE__, __LINE__,
_("gen_expr: op case sets don't match"));
}
}
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
2009-12-23 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (gen_trace_for_var): Declare. * ax-gdb.c (gen_trace_for_var): New function. * dwarf2loc.c (dwarf_expr_frame_base_1): New function, split from... (dwarf_expr_frame_base): ...here. (dwarf2_tracepoint_var_ref): Add computed location case. * tracepoint.c (collect_symbol): Add scope arg and LOC_COMPUTED case. (add_local_symbols): Update call to collect_symbol. (encode_actions): Ditto.
2009-12-24 00:40:49 +00:00
/* Given a single variable and a scope, generate bytecodes to trace
its value. This is for use in situations where we have only a
variable's name, and no parsed expression; for instance, when the
name comes from a list of local variables of a function. */
struct agent_expr *
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
gen_trace_for_var (CORE_ADDR scope, struct gdbarch *gdbarch,
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
struct symbol *var, int trace_string)
2009-12-23 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (gen_trace_for_var): Declare. * ax-gdb.c (gen_trace_for_var): New function. * dwarf2loc.c (dwarf_expr_frame_base_1): New function, split from... (dwarf_expr_frame_base): ...here. (dwarf2_tracepoint_var_ref): Add computed location case. * tracepoint.c (collect_symbol): Add scope arg and LOC_COMPUTED case. (add_local_symbols): Update call to collect_symbol. (encode_actions): Ditto.
2009-12-24 00:40:49 +00:00
{
struct cleanup *old_chain = 0;
2010-04-23 Stan Shebs <stan@codesourcery.com> * ax.h (struct agent_expr): Merge in agent_reqs fields, add some comments. (struct agent_reqs): Remove. (ax_reg_mask): Declare. * ax-general.c (new_agent_expr): Add gdbarch argument, set new fields. (free_agent_expr): Free reg_mask. (ax_print): Add scope and register mask info. (ax_reqs): Remove agent_reqs argument, use agent expression fields, and move part of register mask computation to... (ax_reg_mask): New function. * ax-gdb.c (gen_trace_static_fields): Call it. (gen_traced_pop): Ditto. (is_nontrivial_conversion): Add dummy gdbarch to new_agent_expr. (gen_trace_for_var): Pass gdbarch to new_agent_expr. (gen_trace_for_expr): Ditto, and clear optimized_out flag. (gen_eval_for_expr): Ditto, and require an rvalue. (agent_command): Call ax_reqs. (agent_eval_command): Ditto. * tracepoint.c (report_agent_reqs_errors): Use agent expression fields. (validate_action_line): Ditto. (collect_symbol): Ditto. (encode_actions_1): Ditto.
2010-04-23 23:51:05 +00:00
struct agent_expr *ax = new_agent_expr (gdbarch, scope);
2009-12-23 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (gen_trace_for_var): Declare. * ax-gdb.c (gen_trace_for_var): New function. * dwarf2loc.c (dwarf_expr_frame_base_1): New function, split from... (dwarf_expr_frame_base): ...here. (dwarf2_tracepoint_var_ref): Add computed location case. * tracepoint.c (collect_symbol): Add scope arg and LOC_COMPUTED case. (add_local_symbols): Update call to collect_symbol. (encode_actions): Ditto.
2009-12-24 00:40:49 +00:00
struct axs_value value;
old_chain = make_cleanup_free_agent_expr (ax);
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
ax->tracing = 1;
ax->trace_string = trace_string;
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
gen_var_ref (gdbarch, ax, &value, var);
/* If there is no actual variable to trace, flag it by returning
an empty agent expression. */
if (value.optimized_out)
{
do_cleanups (old_chain);
return NULL;
}
2009-12-23 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (gen_trace_for_var): Declare. * ax-gdb.c (gen_trace_for_var): New function. * dwarf2loc.c (dwarf_expr_frame_base_1): New function, split from... (dwarf_expr_frame_base): ...here. (dwarf2_tracepoint_var_ref): Add computed location case. * tracepoint.c (collect_symbol): Add scope arg and LOC_COMPUTED case. (add_local_symbols): Update call to collect_symbol. (encode_actions): Ditto.
2009-12-24 00:40:49 +00:00
/* Make sure we record the final object, and get rid of it. */
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
gen_traced_pop (gdbarch, ax, &value);
2009-12-23 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (gen_trace_for_var): Declare. * ax-gdb.c (gen_trace_for_var): New function. * dwarf2loc.c (dwarf_expr_frame_base_1): New function, split from... (dwarf_expr_frame_base): ...here. (dwarf2_tracepoint_var_ref): Add computed location case. * tracepoint.c (collect_symbol): Add scope arg and LOC_COMPUTED case. (add_local_symbols): Update call to collect_symbol. (encode_actions): Ditto.
2009-12-24 00:40:49 +00:00
/* Oh, and terminate. */
ax_simple (ax, aop_end);
/* We have successfully built the agent expr, so cancel the cleanup
request. If we add more cleanups that we always want done, this
will have to get more complicated. */
discard_cleanups (old_chain);
return ax;
}
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Generating bytecode from GDB expressions: driver */
/* Given a GDB expression EXPR, return bytecode to trace its value.
The result will use the `trace' and `trace_quick' bytecodes to
record the value of all memory touched by the expression. The
caller can then use the ax_reqs function to discover which
registers it relies upon. */
struct agent_expr *
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
gen_trace_for_expr (CORE_ADDR scope, struct expression *expr,
int trace_string)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
struct cleanup *old_chain = 0;
2010-04-23 Stan Shebs <stan@codesourcery.com> * ax.h (struct agent_expr): Merge in agent_reqs fields, add some comments. (struct agent_reqs): Remove. (ax_reg_mask): Declare. * ax-general.c (new_agent_expr): Add gdbarch argument, set new fields. (free_agent_expr): Free reg_mask. (ax_print): Add scope and register mask info. (ax_reqs): Remove agent_reqs argument, use agent expression fields, and move part of register mask computation to... (ax_reg_mask): New function. * ax-gdb.c (gen_trace_static_fields): Call it. (gen_traced_pop): Ditto. (is_nontrivial_conversion): Add dummy gdbarch to new_agent_expr. (gen_trace_for_var): Pass gdbarch to new_agent_expr. (gen_trace_for_expr): Ditto, and clear optimized_out flag. (gen_eval_for_expr): Ditto, and require an rvalue. (agent_command): Call ax_reqs. (agent_eval_command): Ditto. * tracepoint.c (report_agent_reqs_errors): Use agent expression fields. (validate_action_line): Ditto. (collect_symbol): Ditto. (encode_actions_1): Ditto.
2010-04-23 23:51:05 +00:00
struct agent_expr *ax = new_agent_expr (expr->gdbarch, scope);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
union exp_element *pc;
struct axs_value value;
Cleanup free_agent_expr cleanups.
2000-05-15 06:15:27 +00:00
old_chain = make_cleanup_free_agent_expr (ax);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
pc = expr->elts;
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
ax->tracing = 1;
ax->trace_string = trace_string;
2010-04-23 Stan Shebs <stan@codesourcery.com> * ax.h (struct agent_expr): Merge in agent_reqs fields, add some comments. (struct agent_reqs): Remove. (ax_reg_mask): Declare. * ax-general.c (new_agent_expr): Add gdbarch argument, set new fields. (free_agent_expr): Free reg_mask. (ax_print): Add scope and register mask info. (ax_reqs): Remove agent_reqs argument, use agent expression fields, and move part of register mask computation to... (ax_reg_mask): New function. * ax-gdb.c (gen_trace_static_fields): Call it. (gen_traced_pop): Ditto. (is_nontrivial_conversion): Add dummy gdbarch to new_agent_expr. (gen_trace_for_var): Pass gdbarch to new_agent_expr. (gen_trace_for_expr): Ditto, and clear optimized_out flag. (gen_eval_for_expr): Ditto, and require an rvalue. (agent_command): Call ax_reqs. (agent_eval_command): Ditto. * tracepoint.c (report_agent_reqs_errors): Use agent expression fields. (validate_action_line): Ditto. (collect_symbol): Ditto. (encode_actions_1): Ditto.
2010-04-23 23:51:05 +00:00
value.optimized_out = 0;
* ax-gdb.c: Include "language.h". (gen_frame_args_address): Add GDBARCH parameter; use it instead of current_gdbarch. (gen_frame_locals_address): Likewise. (gen_var_ref): Add GDBARCH parameter. Update calls to gen_frame_args_address and gen_frame_locals_address. Use pointer type from gdbarch. (gen_usual_unary): Add EXP parameter. Use integer type from exp->gdbarch. (gen_usual_arithmetic): Likewise. (gen_integral_promotions): Likewise. (gen_add, gen_sub): Remove. (gen_ptradd, gen_ptrsub, gen_ptrdiff): New functions. (gen_logical_not): Use passed-in boolean result type instead of builtin_type_int. (gen_complement): Do not call gen_usual_unary or gen_integral_promotions. (gen_struct_ref): Call require_rvalue instead of gen_usual_unary. (gen_repeat): Add EXP parameter. Update call to gen_expr. Use builtin_type_int32 as internal range type. (gen_sizeof): Add EXP and SIZE_TYPE parameters. Use SIZE_TYPE as result type. Update call to gen_expr. (gen_expr): Add EXP parameter. Update calls to gen_expr, gen_repeat, gen_var_ref, gen_usual_unary, gen_usual_arithmetic, and gen_integral_promotions. Call gen_ptradd, gen_ptrsub, gen_ptrdiff, or gen_binop instead of gen_add or gen_sub. Use exp->gdbarch instead of current_gdbarch. Call language_bool_type to determine result type of UNOP_LOGICAL_NOT.
2008-09-11 14:15:39 +00:00
gen_expr (expr, &pc, ax, &value);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Make sure we record the final object, and get rid of it. */
2010-03-17 Stan Shebs <stan@codesourcery.com> * ax-gdb.h (struct axs_value): New field optimized_out. (gen_trace_for_var): Add gdbarch argument. * ax-gdb.c (gen_trace_static_fields): New function. (gen_traced_pop): Call it, add gdbarch argument. (gen_trace_for_expr): Update call to it. (gen_trace_for_var): Ditto, and report optimized-out variables. (gen_struct_ref_recursive): Check for optimized-out value. (gen_struct_elt_for_reference): Ditto. (gen_static_field): Pass gdbarch instead of expression, assume optimization if field not found. (gen_var_ref): Set the optimized_out flag. (gen_expr): Error on optimized-out variable. * tracepoint.c (collect_symbol): Handle struct-valued vars as expressions, skip optimized-out variables with computed locations. * dwarf2loc.c (dwarf2_tracepoint_var_ref): Flag instead of erroring out if location expression missing. (loclist_tracepoint_var_ref): Don't error out here.
2010-03-17 22:04:43 +00:00
gen_traced_pop (expr->gdbarch, ax, &value);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Oh, and terminate. */
ax_simple (ax, aop_end);
/* We have successfully built the agent expr, so cancel the cleanup
request. If we add more cleanups that we always want done, this
will have to get more complicated. */
discard_cleanups (old_chain);
return ax;
}
gdb/ Conditional tracepoints. * ax-gdb.h (gen_eval_for_expr): Declare. * ax-gdb.c (gen_expr): Generate bytecodes for BINOP_EQUAL and other comparisons. (gen_eval_for_expr): New function. (agent_eval_command): New maintenance command. (_initialize_ax_gdb): Define the command. * remote.c (struct remote_state): New field cond_tracepoints. (PACKET_ConditionalTracepoints): New packet config type. (remote_cond_tracepoint_feature): New function. (remote_protocol_features): Add ConditionalTracepoints. (remote_supports_cond_tracepoints): New function. (_initialize_remote): Add ConditionalTracepoints. * tracepoint.c (download_tracepoint): Add conditional. * NEWS: Mention conditional tracepoints. gdb/doc/ * gdb.texinfo (Tracepoint Conditions): New section. (General Query Packets): Describe ConditionalTracepoints. (Tracepoint Packets): Describe condition field. (Maintenance Commands): Describe maint agent-eval. * agentexpr.texi (Using Agent Expressions): Mention eval usage. gdb/testsuite/ * gdb.trace/tracecmd.exp: Add basic test of tracepoint conditions.
2009-07-14 21:40:34 +00:00
/* Given a GDB expression EXPR, return a bytecode sequence that will
evaluate and return a result. The bytecodes will do a direct
evaluation, using the current data on the target, rather than
recording blocks of memory and registers for later use, as
gen_trace_for_expr does. The generated bytecode sequence leaves
the result of expression evaluation on the top of the stack. */
struct agent_expr *
gen_eval_for_expr (CORE_ADDR scope, struct expression *expr)
{
struct cleanup *old_chain = 0;
2010-04-23 Stan Shebs <stan@codesourcery.com> * ax.h (struct agent_expr): Merge in agent_reqs fields, add some comments. (struct agent_reqs): Remove. (ax_reg_mask): Declare. * ax-general.c (new_agent_expr): Add gdbarch argument, set new fields. (free_agent_expr): Free reg_mask. (ax_print): Add scope and register mask info. (ax_reqs): Remove agent_reqs argument, use agent expression fields, and move part of register mask computation to... (ax_reg_mask): New function. * ax-gdb.c (gen_trace_static_fields): Call it. (gen_traced_pop): Ditto. (is_nontrivial_conversion): Add dummy gdbarch to new_agent_expr. (gen_trace_for_var): Pass gdbarch to new_agent_expr. (gen_trace_for_expr): Ditto, and clear optimized_out flag. (gen_eval_for_expr): Ditto, and require an rvalue. (agent_command): Call ax_reqs. (agent_eval_command): Ditto. * tracepoint.c (report_agent_reqs_errors): Use agent expression fields. (validate_action_line): Ditto. (collect_symbol): Ditto. (encode_actions_1): Ditto.
2010-04-23 23:51:05 +00:00
struct agent_expr *ax = new_agent_expr (expr->gdbarch, scope);
gdb/ Conditional tracepoints. * ax-gdb.h (gen_eval_for_expr): Declare. * ax-gdb.c (gen_expr): Generate bytecodes for BINOP_EQUAL and other comparisons. (gen_eval_for_expr): New function. (agent_eval_command): New maintenance command. (_initialize_ax_gdb): Define the command. * remote.c (struct remote_state): New field cond_tracepoints. (PACKET_ConditionalTracepoints): New packet config type. (remote_cond_tracepoint_feature): New function. (remote_protocol_features): Add ConditionalTracepoints. (remote_supports_cond_tracepoints): New function. (_initialize_remote): Add ConditionalTracepoints. * tracepoint.c (download_tracepoint): Add conditional. * NEWS: Mention conditional tracepoints. gdb/doc/ * gdb.texinfo (Tracepoint Conditions): New section. (General Query Packets): Describe ConditionalTracepoints. (Tracepoint Packets): Describe condition field. (Maintenance Commands): Describe maint agent-eval. * agentexpr.texi (Using Agent Expressions): Mention eval usage. gdb/testsuite/ * gdb.trace/tracecmd.exp: Add basic test of tracepoint conditions.
2009-07-14 21:40:34 +00:00
union exp_element *pc;
struct axs_value value;
old_chain = make_cleanup_free_agent_expr (ax);
pc = expr->elts;
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
ax->tracing = 0;
2010-04-23 Stan Shebs <stan@codesourcery.com> * ax.h (struct agent_expr): Merge in agent_reqs fields, add some comments. (struct agent_reqs): Remove. (ax_reg_mask): Declare. * ax-general.c (new_agent_expr): Add gdbarch argument, set new fields. (free_agent_expr): Free reg_mask. (ax_print): Add scope and register mask info. (ax_reqs): Remove agent_reqs argument, use agent expression fields, and move part of register mask computation to... (ax_reg_mask): New function. * ax-gdb.c (gen_trace_static_fields): Call it. (gen_traced_pop): Ditto. (is_nontrivial_conversion): Add dummy gdbarch to new_agent_expr. (gen_trace_for_var): Pass gdbarch to new_agent_expr. (gen_trace_for_expr): Ditto, and clear optimized_out flag. (gen_eval_for_expr): Ditto, and require an rvalue. (agent_command): Call ax_reqs. (agent_eval_command): Ditto. * tracepoint.c (report_agent_reqs_errors): Use agent expression fields. (validate_action_line): Ditto. (collect_symbol): Ditto. (encode_actions_1): Ditto.
2010-04-23 23:51:05 +00:00
value.optimized_out = 0;
gdb/ Conditional tracepoints. * ax-gdb.h (gen_eval_for_expr): Declare. * ax-gdb.c (gen_expr): Generate bytecodes for BINOP_EQUAL and other comparisons. (gen_eval_for_expr): New function. (agent_eval_command): New maintenance command. (_initialize_ax_gdb): Define the command. * remote.c (struct remote_state): New field cond_tracepoints. (PACKET_ConditionalTracepoints): New packet config type. (remote_cond_tracepoint_feature): New function. (remote_protocol_features): Add ConditionalTracepoints. (remote_supports_cond_tracepoints): New function. (_initialize_remote): Add ConditionalTracepoints. * tracepoint.c (download_tracepoint): Add conditional. * NEWS: Mention conditional tracepoints. gdb/doc/ * gdb.texinfo (Tracepoint Conditions): New section. (General Query Packets): Describe ConditionalTracepoints. (Tracepoint Packets): Describe condition field. (Maintenance Commands): Describe maint agent-eval. * agentexpr.texi (Using Agent Expressions): Mention eval usage. gdb/testsuite/ * gdb.trace/tracecmd.exp: Add basic test of tracepoint conditions.
2009-07-14 21:40:34 +00:00
gen_expr (expr, &pc, ax, &value);
2010-04-23 Stan Shebs <stan@codesourcery.com> * ax.h (struct agent_expr): Merge in agent_reqs fields, add some comments. (struct agent_reqs): Remove. (ax_reg_mask): Declare. * ax-general.c (new_agent_expr): Add gdbarch argument, set new fields. (free_agent_expr): Free reg_mask. (ax_print): Add scope and register mask info. (ax_reqs): Remove agent_reqs argument, use agent expression fields, and move part of register mask computation to... (ax_reg_mask): New function. * ax-gdb.c (gen_trace_static_fields): Call it. (gen_traced_pop): Ditto. (is_nontrivial_conversion): Add dummy gdbarch to new_agent_expr. (gen_trace_for_var): Pass gdbarch to new_agent_expr. (gen_trace_for_expr): Ditto, and clear optimized_out flag. (gen_eval_for_expr): Ditto, and require an rvalue. (agent_command): Call ax_reqs. (agent_eval_command): Ditto. * tracepoint.c (report_agent_reqs_errors): Use agent expression fields. (validate_action_line): Ditto. (collect_symbol): Ditto. (encode_actions_1): Ditto.
2010-04-23 23:51:05 +00:00
require_rvalue (ax, &value);
gdb/ Conditional tracepoints. * ax-gdb.h (gen_eval_for_expr): Declare. * ax-gdb.c (gen_expr): Generate bytecodes for BINOP_EQUAL and other comparisons. (gen_eval_for_expr): New function. (agent_eval_command): New maintenance command. (_initialize_ax_gdb): Define the command. * remote.c (struct remote_state): New field cond_tracepoints. (PACKET_ConditionalTracepoints): New packet config type. (remote_cond_tracepoint_feature): New function. (remote_protocol_features): Add ConditionalTracepoints. (remote_supports_cond_tracepoints): New function. (_initialize_remote): Add ConditionalTracepoints. * tracepoint.c (download_tracepoint): Add conditional. * NEWS: Mention conditional tracepoints. gdb/doc/ * gdb.texinfo (Tracepoint Conditions): New section. (General Query Packets): Describe ConditionalTracepoints. (Tracepoint Packets): Describe condition field. (Maintenance Commands): Describe maint agent-eval. * agentexpr.texi (Using Agent Expressions): Mention eval usage. gdb/testsuite/ * gdb.trace/tracecmd.exp: Add basic test of tracepoint conditions.
2009-07-14 21:40:34 +00:00
/* Oh, and terminate. */
ax_simple (ax, aop_end);
/* We have successfully built the agent expr, so cancel the cleanup
request. If we add more cleanups that we always want done, this
will have to get more complicated. */
discard_cleanups (old_chain);
return ax;
}
Add return address collection for tracepoints. * tracepoint.c (encode_actions_1): Add case for $_ret. (validate_actionline): Check for $_ret. (trace_dump_actions): Ditto. * ax-gdb.h (gen_trace_for_return_address): Declare. * ax-gdb.c: Include arch-utils.h. (gen_trace_for_return_address): New function. (agent_command): Add return address special case. * amd64-tdep.c: Include ax.h and ax-gdb.h. (amd64_gen_return_address): New function. (amd64_init_abi): Call it. * i386-tdep.c: Include ax.h and ax-gdb.h. (i386_gen_return_address): New function. (i386_init_abi): Call it. * arch-utils.h (default_gen_return_address): Declare. * arch-utils.c (default_gen_return_address): New function. * gdbarch.sh (gen_return_address): New method. * gdbarch.h, gdbarch.c: Regenerate. * gdb.texinfo (Tracepoint Action Lists): Document $_ret. * gdb.trace/collection.exp: Test collection of $_ret.
2011-09-27 13:09:37 +00:00
struct agent_expr *
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
gen_trace_for_return_address (CORE_ADDR scope, struct gdbarch *gdbarch,
int trace_string)
Add return address collection for tracepoints. * tracepoint.c (encode_actions_1): Add case for $_ret. (validate_actionline): Check for $_ret. (trace_dump_actions): Ditto. * ax-gdb.h (gen_trace_for_return_address): Declare. * ax-gdb.c: Include arch-utils.h. (gen_trace_for_return_address): New function. (agent_command): Add return address special case. * amd64-tdep.c: Include ax.h and ax-gdb.h. (amd64_gen_return_address): New function. (amd64_init_abi): Call it. * i386-tdep.c: Include ax.h and ax-gdb.h. (i386_gen_return_address): New function. (i386_init_abi): Call it. * arch-utils.h (default_gen_return_address): Declare. * arch-utils.c (default_gen_return_address): New function. * gdbarch.sh (gen_return_address): New method. * gdbarch.h, gdbarch.c: Regenerate. * gdb.texinfo (Tracepoint Action Lists): Document $_ret. * gdb.trace/collection.exp: Test collection of $_ret.
2011-09-27 13:09:37 +00:00
{
struct cleanup *old_chain = 0;
struct agent_expr *ax = new_agent_expr (gdbarch, scope);
struct axs_value value;
old_chain = make_cleanup_free_agent_expr (ax);
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
ax->tracing = 1;
ax->trace_string = trace_string;
Add return address collection for tracepoints. * tracepoint.c (encode_actions_1): Add case for $_ret. (validate_actionline): Check for $_ret. (trace_dump_actions): Ditto. * ax-gdb.h (gen_trace_for_return_address): Declare. * ax-gdb.c: Include arch-utils.h. (gen_trace_for_return_address): New function. (agent_command): Add return address special case. * amd64-tdep.c: Include ax.h and ax-gdb.h. (amd64_gen_return_address): New function. (amd64_init_abi): Call it. * i386-tdep.c: Include ax.h and ax-gdb.h. (i386_gen_return_address): New function. (i386_init_abi): Call it. * arch-utils.h (default_gen_return_address): Declare. * arch-utils.c (default_gen_return_address): New function. * gdbarch.sh (gen_return_address): New method. * gdbarch.h, gdbarch.c: Regenerate. * gdb.texinfo (Tracepoint Action Lists): Document $_ret. * gdb.trace/collection.exp: Test collection of $_ret.
2011-09-27 13:09:37 +00:00
gdbarch_gen_return_address (gdbarch, ax, &value, scope);
/* Make sure we record the final object, and get rid of it. */
gen_traced_pop (gdbarch, ax, &value);
/* Oh, and terminate. */
ax_simple (ax, aop_end);
/* We have successfully built the agent expr, so cancel the cleanup
request. If we add more cleanups that we always want done, this
will have to get more complicated. */
discard_cleanups (old_chain);
return ax;
}
Add target-side support for dynamic printf. * NEWS: Mention the additional style. * breakpoint.h (struct bp_target_info): New fields tcommands, persist. (struct bp_location): New field cmd_bytecode. * breakpoint.c: Include format.h. (disconnected_dprintf): New global. (parse_cmd_to_aexpr): New function. (build_target_command_list): New function. (insert_bp_location): Call it. (remove_breakpoints_pid): Skip dprintf breakpoints. (print_one_breakpoint_location): Ditto. (dprintf_style_agent): New global. (dprintf_style_enums): Add dprintf_style_agent. (update_dprintf_command_list): Add agent case. (agent_printf_command): New function. (_initialize_breakpoint): Add new commands. * common/ax.def (printf): New bytecode. * ax.h (ax_string): Declare. * ax-gdb.h (gen_printf): Declare. * ax-gdb.c: Include cli-utils.h, format.h. (gen_printf): New function. (maint_agent_print_command): New function. (_initialize_ax_gdb): Add maint agent-printf command. * ax-general.c (ax_string): New function. (ax_print): Add printf disassembly. * Makefile.in (SFILES): Add format.c (COMMON_OBS): Add format.o. * common/format.h: New file. * common/format.c: New file. * printcmd.c: Include format.h. (ui_printf): Call parse_format_string. * remote.c (remote_state): New field breakpoint_commands. (PACKET_BreakpointCommands): New enum. (remote_breakpoint_commands_feature): New function. (remote_protocol_features): Add new BreakpointCommands entry. (remote_can_run_breakpoint_commands): New function. (remote_add_target_side_commands): New function. (remote_insert_breakpoint): Call it. (remote_insert_hw_breakpoint): Ditto. (_initialize_remote): Add new packet configuration for target-side breakpoint commands. * target.h (struct target_ops): New field to_can_run_breakpoint_commands. (target_can_run_breakpoint_commands): New macro. * target.c (update_current_target): Handle to_can_run_breakpoint_commands. [gdbserver] * Makefile.in (WARN_CFLAGS_NO_FORMAT): Define. (ax.o): Add it to build rule. (ax-ipa.o): Ditto. (OBS): Add format.o. (IPA_OBS): Add format.o. * server.c (handle_query): Claim support for breakpoint commands. (process_point_options): Add command case. (process_serial_event): Leave running if there are printfs in effect. * mem-break.h (any_persistent_commands): Declare. (add_breakpoint_commands): Declare. (gdb_no_commands_at_breakpoint): Declare. (run_breakpoint_commands): Declare. * mem-break.c (struct point_command_list): New struct. (struct breakpoint): New field command_list. (any_persistent_commands): New function. (add_commands_to_breakpoint): New function. (add_breakpoint_commands): New function. (gdb_no_commands_at_breakpoint): New function. (run_breakpoint_commands): New function. * linux-low.c (linux_wait_1): Test for and run breakpoint commands locally. * ax.c: Include format.h. (ax_printf): New function. (gdb_eval_agent_expr): Add printf opcode. [doc] * gdb.texinfo (Dynamic Printf): Mention agent style and disconnected dprintf. (Maintenance Commands): Describe maint agent-printf. (General Query Packets): Mention BreakpointCommands feature. (Packets): Document commands extension to Z0 packet. * agentexpr.texi (Bytecode Descriptions): Document printf bytecode. [testsuite] * gdb.base/dprintf.exp: Add agent style tests.
2012-07-02 15:29:39 +00:00
/* Given a collection of printf-style arguments, generate code to
evaluate the arguments and pass everything to a special
bytecode. */
struct agent_expr *
gen_printf (CORE_ADDR scope, struct gdbarch *gdbarch,
CORE_ADDR function, LONGEST channel,
* ax-gdb.c (gen_printf): Make FORMAT const. * ax-gdb.h (gen_printf): Likewise. * ax-general.c (ax_string): Make STR const. * ax.h (ax_string): Likewise.
2013-03-07 00:48:25 +00:00
const char *format, int fmtlen,
Add target-side support for dynamic printf. * NEWS: Mention the additional style. * breakpoint.h (struct bp_target_info): New fields tcommands, persist. (struct bp_location): New field cmd_bytecode. * breakpoint.c: Include format.h. (disconnected_dprintf): New global. (parse_cmd_to_aexpr): New function. (build_target_command_list): New function. (insert_bp_location): Call it. (remove_breakpoints_pid): Skip dprintf breakpoints. (print_one_breakpoint_location): Ditto. (dprintf_style_agent): New global. (dprintf_style_enums): Add dprintf_style_agent. (update_dprintf_command_list): Add agent case. (agent_printf_command): New function. (_initialize_breakpoint): Add new commands. * common/ax.def (printf): New bytecode. * ax.h (ax_string): Declare. * ax-gdb.h (gen_printf): Declare. * ax-gdb.c: Include cli-utils.h, format.h. (gen_printf): New function. (maint_agent_print_command): New function. (_initialize_ax_gdb): Add maint agent-printf command. * ax-general.c (ax_string): New function. (ax_print): Add printf disassembly. * Makefile.in (SFILES): Add format.c (COMMON_OBS): Add format.o. * common/format.h: New file. * common/format.c: New file. * printcmd.c: Include format.h. (ui_printf): Call parse_format_string. * remote.c (remote_state): New field breakpoint_commands. (PACKET_BreakpointCommands): New enum. (remote_breakpoint_commands_feature): New function. (remote_protocol_features): Add new BreakpointCommands entry. (remote_can_run_breakpoint_commands): New function. (remote_add_target_side_commands): New function. (remote_insert_breakpoint): Call it. (remote_insert_hw_breakpoint): Ditto. (_initialize_remote): Add new packet configuration for target-side breakpoint commands. * target.h (struct target_ops): New field to_can_run_breakpoint_commands. (target_can_run_breakpoint_commands): New macro. * target.c (update_current_target): Handle to_can_run_breakpoint_commands. [gdbserver] * Makefile.in (WARN_CFLAGS_NO_FORMAT): Define. (ax.o): Add it to build rule. (ax-ipa.o): Ditto. (OBS): Add format.o. (IPA_OBS): Add format.o. * server.c (handle_query): Claim support for breakpoint commands. (process_point_options): Add command case. (process_serial_event): Leave running if there are printfs in effect. * mem-break.h (any_persistent_commands): Declare. (add_breakpoint_commands): Declare. (gdb_no_commands_at_breakpoint): Declare. (run_breakpoint_commands): Declare. * mem-break.c (struct point_command_list): New struct. (struct breakpoint): New field command_list. (any_persistent_commands): New function. (add_commands_to_breakpoint): New function. (add_breakpoint_commands): New function. (gdb_no_commands_at_breakpoint): New function. (run_breakpoint_commands): New function. * linux-low.c (linux_wait_1): Test for and run breakpoint commands locally. * ax.c: Include format.h. (ax_printf): New function. (gdb_eval_agent_expr): Add printf opcode. [doc] * gdb.texinfo (Dynamic Printf): Mention agent style and disconnected dprintf. (Maintenance Commands): Describe maint agent-printf. (General Query Packets): Mention BreakpointCommands feature. (Packets): Document commands extension to Z0 packet. * agentexpr.texi (Bytecode Descriptions): Document printf bytecode. [testsuite] * gdb.base/dprintf.exp: Add agent style tests.
2012-07-02 15:29:39 +00:00
struct format_piece *frags,
int nargs, struct expression **exprs)
{
struct cleanup *old_chain = 0;
struct agent_expr *ax = new_agent_expr (gdbarch, scope);
union exp_element *pc;
struct axs_value value;
2013-01-31 Aleksandar Ristovski <aristovski@qnx.com> * auto-load.c (auto_load_expand_dir_vars): Remove unused dir_vec. * ax-gdb.c (gen_printf): Remove unused expr, i, bot, fr, flen, fmt. * ax-general.c (ax_print): Remove unused is_float. * blockframe.c (block_innermost_frame): Remove unused start, end. * break-catch-sig.c (catch_signal_command): Remove unused gdbarch. Reference: http://sourceware.org/ml/gdb-patches/2013-01/msg00752.html
2013-01-31 16:27:50 +00:00
int tem;
Add target-side support for dynamic printf. * NEWS: Mention the additional style. * breakpoint.h (struct bp_target_info): New fields tcommands, persist. (struct bp_location): New field cmd_bytecode. * breakpoint.c: Include format.h. (disconnected_dprintf): New global. (parse_cmd_to_aexpr): New function. (build_target_command_list): New function. (insert_bp_location): Call it. (remove_breakpoints_pid): Skip dprintf breakpoints. (print_one_breakpoint_location): Ditto. (dprintf_style_agent): New global. (dprintf_style_enums): Add dprintf_style_agent. (update_dprintf_command_list): Add agent case. (agent_printf_command): New function. (_initialize_breakpoint): Add new commands. * common/ax.def (printf): New bytecode. * ax.h (ax_string): Declare. * ax-gdb.h (gen_printf): Declare. * ax-gdb.c: Include cli-utils.h, format.h. (gen_printf): New function. (maint_agent_print_command): New function. (_initialize_ax_gdb): Add maint agent-printf command. * ax-general.c (ax_string): New function. (ax_print): Add printf disassembly. * Makefile.in (SFILES): Add format.c (COMMON_OBS): Add format.o. * common/format.h: New file. * common/format.c: New file. * printcmd.c: Include format.h. (ui_printf): Call parse_format_string. * remote.c (remote_state): New field breakpoint_commands. (PACKET_BreakpointCommands): New enum. (remote_breakpoint_commands_feature): New function. (remote_protocol_features): Add new BreakpointCommands entry. (remote_can_run_breakpoint_commands): New function. (remote_add_target_side_commands): New function. (remote_insert_breakpoint): Call it. (remote_insert_hw_breakpoint): Ditto. (_initialize_remote): Add new packet configuration for target-side breakpoint commands. * target.h (struct target_ops): New field to_can_run_breakpoint_commands. (target_can_run_breakpoint_commands): New macro. * target.c (update_current_target): Handle to_can_run_breakpoint_commands. [gdbserver] * Makefile.in (WARN_CFLAGS_NO_FORMAT): Define. (ax.o): Add it to build rule. (ax-ipa.o): Ditto. (OBS): Add format.o. (IPA_OBS): Add format.o. * server.c (handle_query): Claim support for breakpoint commands. (process_point_options): Add command case. (process_serial_event): Leave running if there are printfs in effect. * mem-break.h (any_persistent_commands): Declare. (add_breakpoint_commands): Declare. (gdb_no_commands_at_breakpoint): Declare. (run_breakpoint_commands): Declare. * mem-break.c (struct point_command_list): New struct. (struct breakpoint): New field command_list. (any_persistent_commands): New function. (add_commands_to_breakpoint): New function. (add_breakpoint_commands): New function. (gdb_no_commands_at_breakpoint): New function. (run_breakpoint_commands): New function. * linux-low.c (linux_wait_1): Test for and run breakpoint commands locally. * ax.c: Include format.h. (ax_printf): New function. (gdb_eval_agent_expr): Add printf opcode. [doc] * gdb.texinfo (Dynamic Printf): Mention agent style and disconnected dprintf. (Maintenance Commands): Describe maint agent-printf. (General Query Packets): Mention BreakpointCommands feature. (Packets): Document commands extension to Z0 packet. * agentexpr.texi (Bytecode Descriptions): Document printf bytecode. [testsuite] * gdb.base/dprintf.exp: Add agent style tests.
2012-07-02 15:29:39 +00:00
old_chain = make_cleanup_free_agent_expr (ax);
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
/* We're computing values, not doing side effects. */
ax->tracing = 0;
Add target-side support for dynamic printf. * NEWS: Mention the additional style. * breakpoint.h (struct bp_target_info): New fields tcommands, persist. (struct bp_location): New field cmd_bytecode. * breakpoint.c: Include format.h. (disconnected_dprintf): New global. (parse_cmd_to_aexpr): New function. (build_target_command_list): New function. (insert_bp_location): Call it. (remove_breakpoints_pid): Skip dprintf breakpoints. (print_one_breakpoint_location): Ditto. (dprintf_style_agent): New global. (dprintf_style_enums): Add dprintf_style_agent. (update_dprintf_command_list): Add agent case. (agent_printf_command): New function. (_initialize_breakpoint): Add new commands. * common/ax.def (printf): New bytecode. * ax.h (ax_string): Declare. * ax-gdb.h (gen_printf): Declare. * ax-gdb.c: Include cli-utils.h, format.h. (gen_printf): New function. (maint_agent_print_command): New function. (_initialize_ax_gdb): Add maint agent-printf command. * ax-general.c (ax_string): New function. (ax_print): Add printf disassembly. * Makefile.in (SFILES): Add format.c (COMMON_OBS): Add format.o. * common/format.h: New file. * common/format.c: New file. * printcmd.c: Include format.h. (ui_printf): Call parse_format_string. * remote.c (remote_state): New field breakpoint_commands. (PACKET_BreakpointCommands): New enum. (remote_breakpoint_commands_feature): New function. (remote_protocol_features): Add new BreakpointCommands entry. (remote_can_run_breakpoint_commands): New function. (remote_add_target_side_commands): New function. (remote_insert_breakpoint): Call it. (remote_insert_hw_breakpoint): Ditto. (_initialize_remote): Add new packet configuration for target-side breakpoint commands. * target.h (struct target_ops): New field to_can_run_breakpoint_commands. (target_can_run_breakpoint_commands): New macro. * target.c (update_current_target): Handle to_can_run_breakpoint_commands. [gdbserver] * Makefile.in (WARN_CFLAGS_NO_FORMAT): Define. (ax.o): Add it to build rule. (ax-ipa.o): Ditto. (OBS): Add format.o. (IPA_OBS): Add format.o. * server.c (handle_query): Claim support for breakpoint commands. (process_point_options): Add command case. (process_serial_event): Leave running if there are printfs in effect. * mem-break.h (any_persistent_commands): Declare. (add_breakpoint_commands): Declare. (gdb_no_commands_at_breakpoint): Declare. (run_breakpoint_commands): Declare. * mem-break.c (struct point_command_list): New struct. (struct breakpoint): New field command_list. (any_persistent_commands): New function. (add_commands_to_breakpoint): New function. (add_breakpoint_commands): New function. (gdb_no_commands_at_breakpoint): New function. (run_breakpoint_commands): New function. * linux-low.c (linux_wait_1): Test for and run breakpoint commands locally. * ax.c: Include format.h. (ax_printf): New function. (gdb_eval_agent_expr): Add printf opcode. [doc] * gdb.texinfo (Dynamic Printf): Mention agent style and disconnected dprintf. (Maintenance Commands): Describe maint agent-printf. (General Query Packets): Mention BreakpointCommands feature. (Packets): Document commands extension to Z0 packet. * agentexpr.texi (Bytecode Descriptions): Document printf bytecode. [testsuite] * gdb.base/dprintf.exp: Add agent style tests.
2012-07-02 15:29:39 +00:00
/* Evaluate and push the args on the stack in reverse order,
for simplicity of collecting them on the target side. */
for (tem = nargs - 1; tem >= 0; --tem)
{
pc = exprs[tem]->elts;
value.optimized_out = 0;
gen_expr (exprs[tem], &pc, ax, &value);
require_rvalue (ax, &value);
}
/* Push function and channel. */
ax_const_l (ax, channel);
ax_const_l (ax, function);
/* Issue the printf bytecode proper. */
ax_simple (ax, aop_printf);
ax_simple (ax, nargs);
ax_string (ax, format, fmtlen);
/* And terminate. */
ax_simple (ax, aop_end);
/* We have successfully built the agent expr, so cancel the cleanup
request. If we add more cleanups that we always want done, this
will have to get more complicated. */
discard_cleanups (old_chain);
return ax;
}
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
static void
Constify strings in tracepoint.c, lookup_cmd and the completers. This is sort of a continuation of Keith's parse_exp_1 constification patch. It started out by undoing these bits: @@ -754,9 +754,12 @@ validate_actionline (char **line, struct tmp_p = p; for (loc = t->base.loc; loc; loc = loc->next) { - p = tmp_p; - exp = parse_exp_1 (&p, loc->address, + const char *q; + + q = tmp_p; + exp = parse_exp_1 (&q, loc->address, block_for_pc (loc->address), 1); + p = (char *) q; and progressively making more things const upwards, fixing fallout, rinse repeat, until GDB built again (--enable-targets=all). That ended up constifying lookup_cmd/add_cmd and (lots of) friends, and the completers. I didn't try to constify the command hooks themselves, because I know upfront there are commands that write to the command string argument, and I think I managed to stop at a nice non-hacky split point already. I think the only non-really-super-obvious changes are tracepoint.c:validate_actionline, and tracepoint.c:trace_dump_actions. The rest is just mostly about 'char *' => 'const char *', 'char **'=> 'const char **', and the occasional (e.g., deprecated_cmd_warning) case of 'char **'=> 'const char *', where/when I noticed that nothing actually cares about the pointer to pointer output. Tested on x86_64 Fedora 17, native and gdbserver. gdb/ 2013-03-13 Pedro Alves <palves@redhat.com> * ada-lang.c (struct add_partial_datum) <text, text0, word>: Make fields const. (ada_make_symbol_completion_list): Make "text0" parameter const. * ax-gdb.c (agent_eval_command_one): Make "exp" parameter const. * breakpoint.c (condition_completer): Make "text" and "word" parameters const. Adjust. (check_tracepoint_command): Adjust to validate_actionline prototype change. (catch_syscall_completer): Make "text" and "word" parameters const. * cli/cli-cmds.c (show_user): Make "comname" local const. (valid_command_p): Make "command" parameter const. (alias_command): Make "alias_prefix" and "command_prefix" locals const. * cli/cli-decode.c (add_cmd): Make "name" parameter const. (add_alias_cmd): Make "name" and "oldname" parameters const. Adjust. No longer make copy of OLDNAME. (add_prefix_cmd, add_abbrev_prefix_cmd, add_set_or_show_cmd) (add_setshow_cmd_full, add_setshow_enum_cmd) (add_setshow_auto_boolean_cmd, add_setshow_boolean_cmd) (add_setshow_filename_cmd, add_setshow_string_cmd) (add_setshow_string_noescape_cmd) (add_setshow_optional_filename_cmd, add_setshow_integer_cmd) (add_setshow_uinteger_cmd, add_setshow_zinteger_cmd) (add_setshow_zuinteger_unlimited_cmd, add_setshow_zuinteger_cmd) (delete_cmd, add_info, add_info_alias, add_com, add_com_alias): Make "name" parameter const. (help_cmd): Rename "command" parameter to "arg". New const local "command". (find_cmd): Make "command" parameter const. (lookup_cmd_1): Make "text" parameter pointer to const. Adjust to deprecated_cmd_warning prototype change. (undef_cmd_error): Make "cmdtype" parameter const. (lookup_cmd): Make "line" parameter const. (deprecated_cmd_warning): Change type of "text" parameter to pointer to const char, from pointer to pointer to char. Adjust. (lookup_cmd_composition): Make "text" parameter const. (complete_on_cmdlist, complete_on_enum): Make "text" and "word" parameters const. * cli/cli-decode.h (struct cmd_list_element) <name>: Make field const. * cli/cli-script.c (validate_comname): Make "tem" local const. (define_command): New const local "tem_c". Use it in calls to lookup_cmd. (document_command): Make "tem" and "comfull" locals const. (show_user_1): Make "prefix" and "name" parameters const. * cli-script.h (show_user_1): Make "prefix" and "name" parameters const. * command.h (add_cmd, add_alias_cmd, add_prefix_cmd) (add_abbrev_prefix_cmd, completer_ftype, lookup_cmd, lookup_cmd_1) (deprecated_cmd_warning, lookup_cmd_composition, add_com) (add_com_alias, add_info, add_info_alias, complete_on_cmdlist) (complete_on_enum, add_setshow_enum_cmd) (add_setshow_auto_boolean_cmd, add_setshow_boolean_cmd) (add_setshow_filename_cmd, add_setshow_string_cmd) (add_setshow_string_noescape_cmd) (add_setshow_optional_filename_cmd, add_setshow_integer_cmd) (add_setshow_uinteger_cmd, add_setshow_zinteger_cmd) (add_setshow_zuinteger_cmd, add_setshow_zuinteger_unlimited_cmd): Change prototypes, constifying strings. * completer.c (noop_completer, filename_completer): Make "text" and "prefix" parameters const. (location_completer, expression_completer) (complete_line_internal): Make "text" and "prefix" parameters const and adjust. (command_completer, signal_completer): Make "text" and "prefix" parameters const. * completer.h (noop_completer, filename_completer) (expression_completer, location_completer, command_completer) (signal_completer): Change prototypes. * corefile.c (complete_set_gnutarget): Make "text" and "word" parameters const. * cp-abi.c (cp_abi_completer): Likewise. * expression.h (parse_expression_for_completion): Change prototype. * f-lang.c (f_make_symbol_completion_list): Make "text" and "word" parameters const. * infcmd.c (_initialize_infcmd): Make "cmd_name" local const. * infrun.c (handle_completer): Make "text" and "word" parameters const. * interps.c (interpreter_completer): Make "text" and "word" parameters const. * language.h (struct language_defn) <la_make_symbol_completion_list>: Make "text" and "word" parameters const. * parse.c (parse_exp_1): Move const hack to parse_exp_in_context. (parse_exp_in_context): Rename to ... (parse_exp_in_context_1): ... this. (parse_exp_in_context): Reimplement, with const hack from parse_exp_1. (parse_expression_for_completion): Make "string" parameter const. * printcmd.c (decode_format): Make "string_ptr" parameter pointer to pointer to const char. Adjust. (print_command_1): Make "exp" parameter const. (output_command): Rename to ... (output_command_const): ... this. Make "exp" parameter const. (output_command): Reimplement. (x_command): Adjust. (display_command): Rename "exp" parameter to "arg". New "exp" local, const version of "arg". * python/py-auto-load.c (gdbpy_initialize_auto_load): Make "cmd_name" local const. * python/py-cmd.c (cmdpy_destroyer): Cast const away in xfree call. (cmdpy_completer): Make "text" and "word" parameters const. (gdbpy_parse_command_name): Make "prefix_text2" local const. * python/py-param.c (add_setshow_generic): Make "tmp_name" local const. * remote.c (_initialize_remote): Make "cmd_name" local const. * symtab.c (language_search_unquoted_string): Make "text" and "p" parameters const. Adjust. (completion_list_add_fields): Make "sym_text", "text" and "word" parameters const. (struct add_name_data) <sym_text, text, word>: Make fields const. (default_make_symbol_completion_list_break_on): Make "text" and "word" parameters const. Adjust locals. (default_make_symbol_completion_list) (make_symbol_completion_list, make_symbol_completion_type) (make_symbol_completion_list_fn): Make "text" and "word" parameters const. (make_file_symbol_completion_list): Make "text", "word" and "srcfile" parameters const. Adjust locals. (add_filename_to_list): Make "text" and "word" parameters const. (struct add_partial_filename_data) <text, word>: Make fields const. (make_source_files_completion_list): Make "text" and "word" parameters const. * symtab.h (default_make_symbol_completion_list_break_on) (default_make_symbol_completion_list, make_symbol_completion_list) (make_symbol_completion_type enum type_code) (make_symbol_completion_list_fn make_file_symbol_completion_list) (make_source_files_completion_list): Change prototype. * top.c (execute_command): Adjust to pass pointer to pointer to const char to lookup_cmd, and to deprecated_cmd_warning prototype change. (set_verbose): Make "cmdname" local const. * tracepoint.c (decode_agent_options): Make "exp" parameter const, and adjust. (validate_actionline): Make "line" parameter a pointer to const char, and adjust. (encode_actions_1): Make "action_exp" local const, and adjust. (encode_actions): Adjust. (replace_comma): Delete. (trace_dump_actions): Make "action_exp" and "next_comma" locals const, and adjust. Don't frob the action string while splitting it at commas. Instead, make a copy of each split substring in turn. (trace_dump_command): Adjust to validate_actionline prototype change. * tracepoint.h (decode_agent_options, decode_agent_options) (encode_actions, validate_actionline): Change prototypes. * valprint.h (output_command): Delete declaration. (output_command_const): Declare. * value.c (function_destroyer): Cast const away in xfree call.
2013-03-13 18:34:55 +00:00
agent_eval_command_one (const char *exp, int eval, CORE_ADDR pc)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
struct cleanup *old_chain = 0;
struct expression *expr;
struct agent_expr *agent;
* ada-lang.c (ada_read_renaming_var_value): Pass const pointer to expression string to parse_exp_1. (create_excep_cond_exprs): Likewise. * ax-gdb.c (agent_eval_command_one): Likewise. (maint_agent_printf_command): Likewise. Constify much of the string handling/parsing. * breakpoint.c (set_breakpoint_condition): Pass const pointer to expression string to parse_exp_1. (update_watchpoint): Likewise. (parse_cmd_to_aexpr): Constify string handling. Pass const pointer to parse_exp_1. (init_breakpoint_sal): Pass const pointer to parse_exp_1. (find_condition_and_thread): Likewise. Make TOK const. (watch_command_1): Make "arg" const. Constify string handling. Copy the expression string instead of changing the input string. (update_breakpoint_location): Pass const pointer to parse_exp_1. * eval.c (parse_and_eval_address): Make "exp" const. (parse_to_comma_and_eval): Make "expp" const. (parse_and_eval): Make "exp" const. * expression.h (parse_expression): Make argument const. (parse_exp_1): Make first argument const. * findcmd.c (parse_find_args): Treat "args" as const. * linespec.c (parse_linespec): Pass const pointer to linespec_expression_to_pc. (linespec_expression_to_pc): Make "exp_ptr" const. * parse.c (parse_exp_1): Make "stringptr" const. Make a copy of the expression to pass to parse_exp_in_context until this whole interface can be constified. (parse_expression): Make "string" const. * printcmd.c (ui_printf): Treat "arg" as const. Handle const strings. * tracepoint.c (validate_actionline): Pass const pointer to all calls to parse_exp_1. (encode_actions_1): Likewise. * value.h (parse_to_comma_and_eval): Make argument const. (parse_and_eval_address): Likewise. (parse_and_eval): Likewise. * varobj.c (varobj_create): Pass const pointer to parse_exp_1. (varobj_set_value): Likewise. * cli/cli-cmds.c (disassemble_command): Treat "arg" as const and constify string handling. Pass const pointers to parse_and_eval_address and parse_to_comman_and_eval. * cli/cli-utils.c (skip_to_space): Rename to ... (skip_to_space_const): ... this. Handle const strings. * cli/cli-utils.h (skip_to_space): Turn into macro which invokes skip_to_space_const. (skip_to_space_const): Declare. * common/format.c (parse_format_string): Make "arg" const. Handle const strings. * common/format.h (parse_format_string): Make "arg" const. * gdbserver/ax.c (ax_printf): Make "format" const. * python/python.c (gdbpy_parse_and_eval): Do not make a copy of the expression string.
2013-03-12 17:39:45 +00:00
const char *arg;
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
int trace_string = 0;
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
2012-07-05 Hui Zhu <hui_zhu@mentor.com> * ax-gdb.c (cli/cli-utils.h): New include. (linespec.h): Ditto. (agent_eval_command_one): New function. (agent_command_1): Ditto. (agent_command): Call function agent_command_1. (agent_eval_command): Ditto. (_initialize_ax_gdb): Change help for "maint agent" and "maint agent-eval".
2012-07-05 01:03:01 +00:00
if (!eval)
{
if (*exp == '/')
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
exp = decode_agent_options (exp, &trace_string);
2012-07-05 Hui Zhu <hui_zhu@mentor.com> * ax-gdb.c (cli/cli-utils.h): New include. (linespec.h): Ditto. (agent_eval_command_one): New function. (agent_command_1): Ditto. (agent_command): Call function agent_command_1. (agent_eval_command): Ditto. (_initialize_ax_gdb): Change help for "maint agent" and "maint agent-eval".
2012-07-05 01:03:01 +00:00
}
2011-11-02 Stan Shebs <stan@codesourcery.com> String collection for tracepoints. * NEWS: Mention string collection. * common/ax.def (tracenz): New bytecode. * ax-gdb.h (trace_string_kludge): Declare. * ax-gdb.c: Include valprint.h and c-lang.h. (trace_string_kludge): New global. (gen_traced_pop): Add string case. (agent_command): Add string case. * tracepoint.h (decode_agent_options): Declare. * tracepoint.c: Include cli-utils.h. (decode_agent_options): New function. (validate_actionline): Call it. (encode_actions_1): Ditto. * target.h (struct target_ops): New method to_supports_string_tracing. (target_supports_string_tracing): New macro. * target.c (update_current_target): Add to_supports_string_tracing. * remote.c (struct remote_state): New field string_tracing. (remote_string_tracing_feature): New function. (remote_protocol_features): New feature tracenz. (remote_supports_string_tracing): New function. (init_remote_ops): Set to_supports_string_tracing. * tracepoint.c (agent_mem_read_string): New function. (eval_agent_expr): Call it for tracenz. * server.c (handle_query): Report support for tracenz. * gdb.texinfo (Tracepoint Action Lists): Document collect/s. (General Query Packets): Describe tracenz feature. * agentexpr.texi (Bytecode Descriptions): Describe tracenz. * gdb.trace/collection.c: Add code using strings. * gdb.trace/collection.exp: Add tests of string collection.
2011-11-02 23:44:21 +00:00
* ada-lang.c (ada_read_renaming_var_value): Pass const pointer to expression string to parse_exp_1. (create_excep_cond_exprs): Likewise. * ax-gdb.c (agent_eval_command_one): Likewise. (maint_agent_printf_command): Likewise. Constify much of the string handling/parsing. * breakpoint.c (set_breakpoint_condition): Pass const pointer to expression string to parse_exp_1. (update_watchpoint): Likewise. (parse_cmd_to_aexpr): Constify string handling. Pass const pointer to parse_exp_1. (init_breakpoint_sal): Pass const pointer to parse_exp_1. (find_condition_and_thread): Likewise. Make TOK const. (watch_command_1): Make "arg" const. Constify string handling. Copy the expression string instead of changing the input string. (update_breakpoint_location): Pass const pointer to parse_exp_1. * eval.c (parse_and_eval_address): Make "exp" const. (parse_to_comma_and_eval): Make "expp" const. (parse_and_eval): Make "exp" const. * expression.h (parse_expression): Make argument const. (parse_exp_1): Make first argument const. * findcmd.c (parse_find_args): Treat "args" as const. * linespec.c (parse_linespec): Pass const pointer to linespec_expression_to_pc. (linespec_expression_to_pc): Make "exp_ptr" const. * parse.c (parse_exp_1): Make "stringptr" const. Make a copy of the expression to pass to parse_exp_in_context until this whole interface can be constified. (parse_expression): Make "string" const. * printcmd.c (ui_printf): Treat "arg" as const. Handle const strings. * tracepoint.c (validate_actionline): Pass const pointer to all calls to parse_exp_1. (encode_actions_1): Likewise. * value.h (parse_to_comma_and_eval): Make argument const. (parse_and_eval_address): Likewise. (parse_and_eval): Likewise. * varobj.c (varobj_create): Pass const pointer to parse_exp_1. (varobj_set_value): Likewise. * cli/cli-cmds.c (disassemble_command): Treat "arg" as const and constify string handling. Pass const pointers to parse_and_eval_address and parse_to_comman_and_eval. * cli/cli-utils.c (skip_to_space): Rename to ... (skip_to_space_const): ... this. Handle const strings. * cli/cli-utils.h (skip_to_space): Turn into macro which invokes skip_to_space_const. (skip_to_space_const): Declare. * common/format.c (parse_format_string): Make "arg" const. Handle const strings. * common/format.h (parse_format_string): Make "arg" const. * gdbserver/ax.c (ax_printf): Make "format" const. * python/python.c (gdbpy_parse_and_eval): Do not make a copy of the expression string.
2013-03-12 17:39:45 +00:00
arg = exp;
if (!eval && strcmp (arg, "$_ret") == 0)
Add return address collection for tracepoints. * tracepoint.c (encode_actions_1): Add case for $_ret. (validate_actionline): Check for $_ret. (trace_dump_actions): Ditto. * ax-gdb.h (gen_trace_for_return_address): Declare. * ax-gdb.c: Include arch-utils.h. (gen_trace_for_return_address): New function. (agent_command): Add return address special case. * amd64-tdep.c: Include ax.h and ax-gdb.h. (amd64_gen_return_address): New function. (amd64_init_abi): Call it. * i386-tdep.c: Include ax.h and ax-gdb.h. (i386_gen_return_address): New function. (i386_init_abi): Call it. * arch-utils.h (default_gen_return_address): Declare. * arch-utils.c (default_gen_return_address): New function. * gdbarch.sh (gen_return_address): New method. * gdbarch.h, gdbarch.c: Regenerate. * gdb.texinfo (Tracepoint Action Lists): Document $_ret. * gdb.trace/collection.exp: Test collection of $_ret.
2011-09-27 13:09:37 +00:00
{
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
agent = gen_trace_for_return_address (pc, get_current_arch (),
trace_string);
Add return address collection for tracepoints. * tracepoint.c (encode_actions_1): Add case for $_ret. (validate_actionline): Check for $_ret. (trace_dump_actions): Ditto. * ax-gdb.h (gen_trace_for_return_address): Declare. * ax-gdb.c: Include arch-utils.h. (gen_trace_for_return_address): New function. (agent_command): Add return address special case. * amd64-tdep.c: Include ax.h and ax-gdb.h. (amd64_gen_return_address): New function. (amd64_init_abi): Call it. * i386-tdep.c: Include ax.h and ax-gdb.h. (i386_gen_return_address): New function. (i386_init_abi): Call it. * arch-utils.h (default_gen_return_address): Declare. * arch-utils.c (default_gen_return_address): New function. * gdbarch.sh (gen_return_address): New method. * gdbarch.h, gdbarch.c: Regenerate. * gdb.texinfo (Tracepoint Action Lists): Document $_ret. * gdb.trace/collection.exp: Test collection of $_ret.
2011-09-27 13:09:37 +00:00
old_chain = make_cleanup_free_agent_expr (agent);
}
else
{
* ada-lang.c (ada_read_renaming_var_value): Pass const pointer to expression string to parse_exp_1. (create_excep_cond_exprs): Likewise. * ax-gdb.c (agent_eval_command_one): Likewise. (maint_agent_printf_command): Likewise. Constify much of the string handling/parsing. * breakpoint.c (set_breakpoint_condition): Pass const pointer to expression string to parse_exp_1. (update_watchpoint): Likewise. (parse_cmd_to_aexpr): Constify string handling. Pass const pointer to parse_exp_1. (init_breakpoint_sal): Pass const pointer to parse_exp_1. (find_condition_and_thread): Likewise. Make TOK const. (watch_command_1): Make "arg" const. Constify string handling. Copy the expression string instead of changing the input string. (update_breakpoint_location): Pass const pointer to parse_exp_1. * eval.c (parse_and_eval_address): Make "exp" const. (parse_to_comma_and_eval): Make "expp" const. (parse_and_eval): Make "exp" const. * expression.h (parse_expression): Make argument const. (parse_exp_1): Make first argument const. * findcmd.c (parse_find_args): Treat "args" as const. * linespec.c (parse_linespec): Pass const pointer to linespec_expression_to_pc. (linespec_expression_to_pc): Make "exp_ptr" const. * parse.c (parse_exp_1): Make "stringptr" const. Make a copy of the expression to pass to parse_exp_in_context until this whole interface can be constified. (parse_expression): Make "string" const. * printcmd.c (ui_printf): Treat "arg" as const. Handle const strings. * tracepoint.c (validate_actionline): Pass const pointer to all calls to parse_exp_1. (encode_actions_1): Likewise. * value.h (parse_to_comma_and_eval): Make argument const. (parse_and_eval_address): Likewise. (parse_and_eval): Likewise. * varobj.c (varobj_create): Pass const pointer to parse_exp_1. (varobj_set_value): Likewise. * cli/cli-cmds.c (disassemble_command): Treat "arg" as const and constify string handling. Pass const pointers to parse_and_eval_address and parse_to_comman_and_eval. * cli/cli-utils.c (skip_to_space): Rename to ... (skip_to_space_const): ... this. Handle const strings. * cli/cli-utils.h (skip_to_space): Turn into macro which invokes skip_to_space_const. (skip_to_space_const): Declare. * common/format.c (parse_format_string): Make "arg" const. Handle const strings. * common/format.h (parse_format_string): Make "arg" const. * gdbserver/ax.c (ax_printf): Make "format" const. * python/python.c (gdbpy_parse_and_eval): Do not make a copy of the expression string.
2013-03-12 17:39:45 +00:00
expr = parse_exp_1 (&arg, pc, block_for_pc (pc), 0);
Add return address collection for tracepoints. * tracepoint.c (encode_actions_1): Add case for $_ret. (validate_actionline): Check for $_ret. (trace_dump_actions): Ditto. * ax-gdb.h (gen_trace_for_return_address): Declare. * ax-gdb.c: Include arch-utils.h. (gen_trace_for_return_address): New function. (agent_command): Add return address special case. * amd64-tdep.c: Include ax.h and ax-gdb.h. (amd64_gen_return_address): New function. (amd64_init_abi): Call it. * i386-tdep.c: Include ax.h and ax-gdb.h. (i386_gen_return_address): New function. (i386_init_abi): Call it. * arch-utils.h (default_gen_return_address): Declare. * arch-utils.c (default_gen_return_address): New function. * gdbarch.sh (gen_return_address): New method. * gdbarch.h, gdbarch.c: Regenerate. * gdb.texinfo (Tracepoint Action Lists): Document $_ret. * gdb.trace/collection.exp: Test collection of $_ret.
2011-09-27 13:09:37 +00:00
old_chain = make_cleanup (free_current_contents, &expr);
2012-07-05 Hui Zhu <hui_zhu@mentor.com> * ax-gdb.c (cli/cli-utils.h): New include. (linespec.h): Ditto. (agent_eval_command_one): New function. (agent_command_1): Ditto. (agent_command): Call function agent_command_1. (agent_eval_command): Ditto. (_initialize_ax_gdb): Change help for "maint agent" and "maint agent-eval".
2012-07-05 01:03:01 +00:00
if (eval)
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
{
gdb_assert (trace_string == 0);
agent = gen_eval_for_expr (pc, expr);
}
2012-07-05 Hui Zhu <hui_zhu@mentor.com> * ax-gdb.c (cli/cli-utils.h): New include. (linespec.h): Ditto. (agent_eval_command_one): New function. (agent_command_1): Ditto. (agent_command): Call function agent_command_1. (agent_eval_command): Ditto. (_initialize_ax_gdb): Change help for "maint agent" and "maint agent-eval".
2012-07-05 01:03:01 +00:00
else
* tracepoint.h (decode_agent_options): Add 'trace_string' argument. * tracepoint.c (decode_agent_options): Add 'trace_string' argument. (validate_actionline): Update. (collect_symbol): Add 'trace_string' argument. (struct add_local_symbols_data) <trace_string>: New field. (do_collect_symbol): Update. (add_local_symbols): Add 'trace_string' argument. (encode_actions_1): Update. (trace_dump_actions): Update. * dwarf2loc.c (access_memory): Update. * ax.h (struct agent_expr) <tracing, trace_string>: New fields. * ax-general.c (new_agent_expr): Update. * ax-gdb.h (gen_trace_for_expr, gen_trace_for_var) (gen_trace_for_return_address): Add argument. (trace_kludge, trace_string_kludge): Remove. * ax-gdb.c (trace_kludge, trace_string_kludge): Remove. (gen_traced_pop, gen_fetch, gen_bitfield_ref, gen_expr): Update. (gen_trace_for_var): Add 'trace_string' argument. (gen_trace_for_expr, gen_trace_for_return_address): Likewise. (gen_printf, agent_eval_command_one): Update.
2013-03-21 16:09:27 +00:00
agent = gen_trace_for_expr (pc, expr, trace_string);
Add return address collection for tracepoints. * tracepoint.c (encode_actions_1): Add case for $_ret. (validate_actionline): Check for $_ret. (trace_dump_actions): Ditto. * ax-gdb.h (gen_trace_for_return_address): Declare. * ax-gdb.c: Include arch-utils.h. (gen_trace_for_return_address): New function. (agent_command): Add return address special case. * amd64-tdep.c: Include ax.h and ax-gdb.h. (amd64_gen_return_address): New function. (amd64_init_abi): Call it. * i386-tdep.c: Include ax.h and ax-gdb.h. (i386_gen_return_address): New function. (i386_init_abi): Call it. * arch-utils.h (default_gen_return_address): Declare. * arch-utils.c (default_gen_return_address): New function. * gdbarch.sh (gen_return_address): New method. * gdbarch.h, gdbarch.c: Regenerate. * gdb.texinfo (Tracepoint Action Lists): Document $_ret. * gdb.trace/collection.exp: Test collection of $_ret.
2011-09-27 13:09:37 +00:00
make_cleanup_free_agent_expr (agent);
}
2010-04-23 Stan Shebs <stan@codesourcery.com> * ax.h (struct agent_expr): Merge in agent_reqs fields, add some comments. (struct agent_reqs): Remove. (ax_reg_mask): Declare. * ax-general.c (new_agent_expr): Add gdbarch argument, set new fields. (free_agent_expr): Free reg_mask. (ax_print): Add scope and register mask info. (ax_reqs): Remove agent_reqs argument, use agent expression fields, and move part of register mask computation to... (ax_reg_mask): New function. * ax-gdb.c (gen_trace_static_fields): Call it. (gen_traced_pop): Ditto. (is_nontrivial_conversion): Add dummy gdbarch to new_agent_expr. (gen_trace_for_var): Pass gdbarch to new_agent_expr. (gen_trace_for_expr): Ditto, and clear optimized_out flag. (gen_eval_for_expr): Ditto, and require an rvalue. (agent_command): Call ax_reqs. (agent_eval_command): Ditto. * tracepoint.c (report_agent_reqs_errors): Use agent expression fields. (validate_action_line): Ditto. (collect_symbol): Ditto. (encode_actions_1): Ditto.
2010-04-23 23:51:05 +00:00
ax_reqs (agent);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
ax_print (gdb_stdout, agent);
import gdb-1999-06-28 snapshot
1999-06-28 16:06:02 +00:00
/* It would be nice to call ax_reqs here to gather some general info
about the expression, and then print out the result. */
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
do_cleanups (old_chain);
dont_repeat ();
}
gdb/ Conditional tracepoints. * ax-gdb.h (gen_eval_for_expr): Declare. * ax-gdb.c (gen_expr): Generate bytecodes for BINOP_EQUAL and other comparisons. (gen_eval_for_expr): New function. (agent_eval_command): New maintenance command. (_initialize_ax_gdb): Define the command. * remote.c (struct remote_state): New field cond_tracepoints. (PACKET_ConditionalTracepoints): New packet config type. (remote_cond_tracepoint_feature): New function. (remote_protocol_features): Add ConditionalTracepoints. (remote_supports_cond_tracepoints): New function. (_initialize_remote): Add ConditionalTracepoints. * tracepoint.c (download_tracepoint): Add conditional. * NEWS: Mention conditional tracepoints. gdb/doc/ * gdb.texinfo (Tracepoint Conditions): New section. (General Query Packets): Describe ConditionalTracepoints. (Tracepoint Packets): Describe condition field. (Maintenance Commands): Describe maint agent-eval. * agentexpr.texi (Using Agent Expressions): Mention eval usage. gdb/testsuite/ * gdb.trace/tracecmd.exp: Add basic test of tracepoint conditions.
2009-07-14 21:40:34 +00:00
static void
2012-07-05 Hui Zhu <hui_zhu@mentor.com> * ax-gdb.c (cli/cli-utils.h): New include. (linespec.h): Ditto. (agent_eval_command_one): New function. (agent_command_1): Ditto. (agent_command): Call function agent_command_1. (agent_eval_command): Ditto. (_initialize_ax_gdb): Change help for "maint agent" and "maint agent-eval".
2012-07-05 01:03:01 +00:00
agent_command_1 (char *exp, int eval)
gdb/ Conditional tracepoints. * ax-gdb.h (gen_eval_for_expr): Declare. * ax-gdb.c (gen_expr): Generate bytecodes for BINOP_EQUAL and other comparisons. (gen_eval_for_expr): New function. (agent_eval_command): New maintenance command. (_initialize_ax_gdb): Define the command. * remote.c (struct remote_state): New field cond_tracepoints. (PACKET_ConditionalTracepoints): New packet config type. (remote_cond_tracepoint_feature): New function. (remote_protocol_features): Add ConditionalTracepoints. (remote_supports_cond_tracepoints): New function. (_initialize_remote): Add ConditionalTracepoints. * tracepoint.c (download_tracepoint): Add conditional. * NEWS: Mention conditional tracepoints. gdb/doc/ * gdb.texinfo (Tracepoint Conditions): New section. (General Query Packets): Describe ConditionalTracepoints. (Tracepoint Packets): Describe condition field. (Maintenance Commands): Describe maint agent-eval. * agentexpr.texi (Using Agent Expressions): Mention eval usage. gdb/testsuite/ * gdb.trace/tracecmd.exp: Add basic test of tracepoint conditions.
2009-07-14 21:40:34 +00:00
{
/* We don't deal with overlay debugging at the moment. We need to
think more carefully about this. If you copy this code into
another command, change the error message; the user shouldn't
have to know anything about agent expressions. */
if (overlay_debugging)
error (_("GDB can't do agent expression translation with overlays."));
if (exp == 0)
error_no_arg (_("expression to translate"));
2012-07-05 Hui Zhu <hui_zhu@mentor.com> * ax-gdb.c (cli/cli-utils.h): New include. (linespec.h): Ditto. (agent_eval_command_one): New function. (agent_command_1): Ditto. (agent_command): Call function agent_command_1. (agent_eval_command): Ditto. (_initialize_ax_gdb): Change help for "maint agent" and "maint agent-eval".
2012-07-05 01:03:01 +00:00
if (check_for_argument (&exp, "-at", sizeof ("-at") - 1))
{
struct linespec_result canonical;
int ix;
struct linespec_sals *iter;
struct cleanup *old_chain;
exp = skip_spaces (exp);
init_linespec_result (&canonical);
decode_line_full (&exp, DECODE_LINE_FUNFIRSTLINE,
(struct symtab *) NULL, 0, &canonical,
NULL, NULL);
old_chain = make_cleanup_destroy_linespec_result (&canonical);
exp = skip_spaces (exp);
if (exp[0] == ',')
{
exp++;
exp = skip_spaces (exp);
}
for (ix = 0; VEC_iterate (linespec_sals, canonical.sals, ix, iter); ++ix)
{
int i;
gdb/ Conditional tracepoints. * ax-gdb.h (gen_eval_for_expr): Declare. * ax-gdb.c (gen_expr): Generate bytecodes for BINOP_EQUAL and other comparisons. (gen_eval_for_expr): New function. (agent_eval_command): New maintenance command. (_initialize_ax_gdb): Define the command. * remote.c (struct remote_state): New field cond_tracepoints. (PACKET_ConditionalTracepoints): New packet config type. (remote_cond_tracepoint_feature): New function. (remote_protocol_features): Add ConditionalTracepoints. (remote_supports_cond_tracepoints): New function. (_initialize_remote): Add ConditionalTracepoints. * tracepoint.c (download_tracepoint): Add conditional. * NEWS: Mention conditional tracepoints. gdb/doc/ * gdb.texinfo (Tracepoint Conditions): New section. (General Query Packets): Describe ConditionalTracepoints. (Tracepoint Packets): Describe condition field. (Maintenance Commands): Describe maint agent-eval. * agentexpr.texi (Using Agent Expressions): Mention eval usage. gdb/testsuite/ * gdb.trace/tracecmd.exp: Add basic test of tracepoint conditions.
2009-07-14 21:40:34 +00:00
2012-07-05 Hui Zhu <hui_zhu@mentor.com> * ax-gdb.c (cli/cli-utils.h): New include. (linespec.h): Ditto. (agent_eval_command_one): New function. (agent_command_1): Ditto. (agent_command): Call function agent_command_1. (agent_eval_command): Ditto. (_initialize_ax_gdb): Change help for "maint agent" and "maint agent-eval".
2012-07-05 01:03:01 +00:00
for (i = 0; i < iter->sals.nelts; i++)
agent_eval_command_one (exp, eval, iter->sals.sals[i].pc);
}
do_cleanups (old_chain);
}
else
agent_eval_command_one (exp, eval, get_frame_pc (get_current_frame ()));
gdb/ Conditional tracepoints. * ax-gdb.h (gen_eval_for_expr): Declare. * ax-gdb.c (gen_expr): Generate bytecodes for BINOP_EQUAL and other comparisons. (gen_eval_for_expr): New function. (agent_eval_command): New maintenance command. (_initialize_ax_gdb): Define the command. * remote.c (struct remote_state): New field cond_tracepoints. (PACKET_ConditionalTracepoints): New packet config type. (remote_cond_tracepoint_feature): New function. (remote_protocol_features): Add ConditionalTracepoints. (remote_supports_cond_tracepoints): New function. (_initialize_remote): Add ConditionalTracepoints. * tracepoint.c (download_tracepoint): Add conditional. * NEWS: Mention conditional tracepoints. gdb/doc/ * gdb.texinfo (Tracepoint Conditions): New section. (General Query Packets): Describe ConditionalTracepoints. (Tracepoint Packets): Describe condition field. (Maintenance Commands): Describe maint agent-eval. * agentexpr.texi (Using Agent Expressions): Mention eval usage. gdb/testsuite/ * gdb.trace/tracecmd.exp: Add basic test of tracepoint conditions.
2009-07-14 21:40:34 +00:00
dont_repeat ();
}
2012-07-05 Hui Zhu <hui_zhu@mentor.com> * ax-gdb.c (cli/cli-utils.h): New include. (linespec.h): Ditto. (agent_eval_command_one): New function. (agent_command_1): Ditto. (agent_command): Call function agent_command_1. (agent_eval_command): Ditto. (_initialize_ax_gdb): Change help for "maint agent" and "maint agent-eval".
2012-07-05 01:03:01 +00:00
static void
agent_command (char *exp, int from_tty)
{
agent_command_1 (exp, 0);
}
/* Parse the given expression, compile it into an agent expression
that does direct evaluation, and display the resulting
expression. */
static void
agent_eval_command (char *exp, int from_tty)
{
agent_command_1 (exp, 1);
}
Add target-side support for dynamic printf. * NEWS: Mention the additional style. * breakpoint.h (struct bp_target_info): New fields tcommands, persist. (struct bp_location): New field cmd_bytecode. * breakpoint.c: Include format.h. (disconnected_dprintf): New global. (parse_cmd_to_aexpr): New function. (build_target_command_list): New function. (insert_bp_location): Call it. (remove_breakpoints_pid): Skip dprintf breakpoints. (print_one_breakpoint_location): Ditto. (dprintf_style_agent): New global. (dprintf_style_enums): Add dprintf_style_agent. (update_dprintf_command_list): Add agent case. (agent_printf_command): New function. (_initialize_breakpoint): Add new commands. * common/ax.def (printf): New bytecode. * ax.h (ax_string): Declare. * ax-gdb.h (gen_printf): Declare. * ax-gdb.c: Include cli-utils.h, format.h. (gen_printf): New function. (maint_agent_print_command): New function. (_initialize_ax_gdb): Add maint agent-printf command. * ax-general.c (ax_string): New function. (ax_print): Add printf disassembly. * Makefile.in (SFILES): Add format.c (COMMON_OBS): Add format.o. * common/format.h: New file. * common/format.c: New file. * printcmd.c: Include format.h. (ui_printf): Call parse_format_string. * remote.c (remote_state): New field breakpoint_commands. (PACKET_BreakpointCommands): New enum. (remote_breakpoint_commands_feature): New function. (remote_protocol_features): Add new BreakpointCommands entry. (remote_can_run_breakpoint_commands): New function. (remote_add_target_side_commands): New function. (remote_insert_breakpoint): Call it. (remote_insert_hw_breakpoint): Ditto. (_initialize_remote): Add new packet configuration for target-side breakpoint commands. * target.h (struct target_ops): New field to_can_run_breakpoint_commands. (target_can_run_breakpoint_commands): New macro. * target.c (update_current_target): Handle to_can_run_breakpoint_commands. [gdbserver] * Makefile.in (WARN_CFLAGS_NO_FORMAT): Define. (ax.o): Add it to build rule. (ax-ipa.o): Ditto. (OBS): Add format.o. (IPA_OBS): Add format.o. * server.c (handle_query): Claim support for breakpoint commands. (process_point_options): Add command case. (process_serial_event): Leave running if there are printfs in effect. * mem-break.h (any_persistent_commands): Declare. (add_breakpoint_commands): Declare. (gdb_no_commands_at_breakpoint): Declare. (run_breakpoint_commands): Declare. * mem-break.c (struct point_command_list): New struct. (struct breakpoint): New field command_list. (any_persistent_commands): New function. (add_commands_to_breakpoint): New function. (add_breakpoint_commands): New function. (gdb_no_commands_at_breakpoint): New function. (run_breakpoint_commands): New function. * linux-low.c (linux_wait_1): Test for and run breakpoint commands locally. * ax.c: Include format.h. (ax_printf): New function. (gdb_eval_agent_expr): Add printf opcode. [doc] * gdb.texinfo (Dynamic Printf): Mention agent style and disconnected dprintf. (Maintenance Commands): Describe maint agent-printf. (General Query Packets): Mention BreakpointCommands feature. (Packets): Document commands extension to Z0 packet. * agentexpr.texi (Bytecode Descriptions): Document printf bytecode. [testsuite] * gdb.base/dprintf.exp: Add agent style tests.
2012-07-02 15:29:39 +00:00
/* Parse the given expression, compile it into an agent expression
that does a printf, and display the resulting expression. */
static void
maint_agent_printf_command (char *exp, int from_tty)
{
struct cleanup *old_chain = 0;
struct expression *expr;
struct expression *argvec[100];
struct agent_expr *agent;
struct frame_info *fi = get_current_frame (); /* need current scope */
* ada-lang.c (ada_read_renaming_var_value): Pass const pointer to expression string to parse_exp_1. (create_excep_cond_exprs): Likewise. * ax-gdb.c (agent_eval_command_one): Likewise. (maint_agent_printf_command): Likewise. Constify much of the string handling/parsing. * breakpoint.c (set_breakpoint_condition): Pass const pointer to expression string to parse_exp_1. (update_watchpoint): Likewise. (parse_cmd_to_aexpr): Constify string handling. Pass const pointer to parse_exp_1. (init_breakpoint_sal): Pass const pointer to parse_exp_1. (find_condition_and_thread): Likewise. Make TOK const. (watch_command_1): Make "arg" const. Constify string handling. Copy the expression string instead of changing the input string. (update_breakpoint_location): Pass const pointer to parse_exp_1. * eval.c (parse_and_eval_address): Make "exp" const. (parse_to_comma_and_eval): Make "expp" const. (parse_and_eval): Make "exp" const. * expression.h (parse_expression): Make argument const. (parse_exp_1): Make first argument const. * findcmd.c (parse_find_args): Treat "args" as const. * linespec.c (parse_linespec): Pass const pointer to linespec_expression_to_pc. (linespec_expression_to_pc): Make "exp_ptr" const. * parse.c (parse_exp_1): Make "stringptr" const. Make a copy of the expression to pass to parse_exp_in_context until this whole interface can be constified. (parse_expression): Make "string" const. * printcmd.c (ui_printf): Treat "arg" as const. Handle const strings. * tracepoint.c (validate_actionline): Pass const pointer to all calls to parse_exp_1. (encode_actions_1): Likewise. * value.h (parse_to_comma_and_eval): Make argument const. (parse_and_eval_address): Likewise. (parse_and_eval): Likewise. * varobj.c (varobj_create): Pass const pointer to parse_exp_1. (varobj_set_value): Likewise. * cli/cli-cmds.c (disassemble_command): Treat "arg" as const and constify string handling. Pass const pointers to parse_and_eval_address and parse_to_comman_and_eval. * cli/cli-utils.c (skip_to_space): Rename to ... (skip_to_space_const): ... this. Handle const strings. * cli/cli-utils.h (skip_to_space): Turn into macro which invokes skip_to_space_const. (skip_to_space_const): Declare. * common/format.c (parse_format_string): Make "arg" const. Handle const strings. * common/format.h (parse_format_string): Make "arg" const. * gdbserver/ax.c (ax_printf): Make "format" const. * python/python.c (gdbpy_parse_and_eval): Do not make a copy of the expression string.
2013-03-12 17:39:45 +00:00
const char *cmdrest;
const char *format_start, *format_end;
Add target-side support for dynamic printf. * NEWS: Mention the additional style. * breakpoint.h (struct bp_target_info): New fields tcommands, persist. (struct bp_location): New field cmd_bytecode. * breakpoint.c: Include format.h. (disconnected_dprintf): New global. (parse_cmd_to_aexpr): New function. (build_target_command_list): New function. (insert_bp_location): Call it. (remove_breakpoints_pid): Skip dprintf breakpoints. (print_one_breakpoint_location): Ditto. (dprintf_style_agent): New global. (dprintf_style_enums): Add dprintf_style_agent. (update_dprintf_command_list): Add agent case. (agent_printf_command): New function. (_initialize_breakpoint): Add new commands. * common/ax.def (printf): New bytecode. * ax.h (ax_string): Declare. * ax-gdb.h (gen_printf): Declare. * ax-gdb.c: Include cli-utils.h, format.h. (gen_printf): New function. (maint_agent_print_command): New function. (_initialize_ax_gdb): Add maint agent-printf command. * ax-general.c (ax_string): New function. (ax_print): Add printf disassembly. * Makefile.in (SFILES): Add format.c (COMMON_OBS): Add format.o. * common/format.h: New file. * common/format.c: New file. * printcmd.c: Include format.h. (ui_printf): Call parse_format_string. * remote.c (remote_state): New field breakpoint_commands. (PACKET_BreakpointCommands): New enum. (remote_breakpoint_commands_feature): New function. (remote_protocol_features): Add new BreakpointCommands entry. (remote_can_run_breakpoint_commands): New function. (remote_add_target_side_commands): New function. (remote_insert_breakpoint): Call it. (remote_insert_hw_breakpoint): Ditto. (_initialize_remote): Add new packet configuration for target-side breakpoint commands. * target.h (struct target_ops): New field to_can_run_breakpoint_commands. (target_can_run_breakpoint_commands): New macro. * target.c (update_current_target): Handle to_can_run_breakpoint_commands. [gdbserver] * Makefile.in (WARN_CFLAGS_NO_FORMAT): Define. (ax.o): Add it to build rule. (ax-ipa.o): Ditto. (OBS): Add format.o. (IPA_OBS): Add format.o. * server.c (handle_query): Claim support for breakpoint commands. (process_point_options): Add command case. (process_serial_event): Leave running if there are printfs in effect. * mem-break.h (any_persistent_commands): Declare. (add_breakpoint_commands): Declare. (gdb_no_commands_at_breakpoint): Declare. (run_breakpoint_commands): Declare. * mem-break.c (struct point_command_list): New struct. (struct breakpoint): New field command_list. (any_persistent_commands): New function. (add_commands_to_breakpoint): New function. (add_breakpoint_commands): New function. (gdb_no_commands_at_breakpoint): New function. (run_breakpoint_commands): New function. * linux-low.c (linux_wait_1): Test for and run breakpoint commands locally. * ax.c: Include format.h. (ax_printf): New function. (gdb_eval_agent_expr): Add printf opcode. [doc] * gdb.texinfo (Dynamic Printf): Mention agent style and disconnected dprintf. (Maintenance Commands): Describe maint agent-printf. (General Query Packets): Mention BreakpointCommands feature. (Packets): Document commands extension to Z0 packet. * agentexpr.texi (Bytecode Descriptions): Document printf bytecode. [testsuite] * gdb.base/dprintf.exp: Add agent style tests.
2012-07-02 15:29:39 +00:00
struct format_piece *fpieces;
int nargs;
/* We don't deal with overlay debugging at the moment. We need to
think more carefully about this. If you copy this code into
another command, change the error message; the user shouldn't
have to know anything about agent expressions. */
if (overlay_debugging)
error (_("GDB can't do agent expression translation with overlays."));
if (exp == 0)
error_no_arg (_("expression to translate"));
cmdrest = exp;
* ada-lang.c (ada_read_renaming_var_value): Pass const pointer to expression string to parse_exp_1. (create_excep_cond_exprs): Likewise. * ax-gdb.c (agent_eval_command_one): Likewise. (maint_agent_printf_command): Likewise. Constify much of the string handling/parsing. * breakpoint.c (set_breakpoint_condition): Pass const pointer to expression string to parse_exp_1. (update_watchpoint): Likewise. (parse_cmd_to_aexpr): Constify string handling. Pass const pointer to parse_exp_1. (init_breakpoint_sal): Pass const pointer to parse_exp_1. (find_condition_and_thread): Likewise. Make TOK const. (watch_command_1): Make "arg" const. Constify string handling. Copy the expression string instead of changing the input string. (update_breakpoint_location): Pass const pointer to parse_exp_1. * eval.c (parse_and_eval_address): Make "exp" const. (parse_to_comma_and_eval): Make "expp" const. (parse_and_eval): Make "exp" const. * expression.h (parse_expression): Make argument const. (parse_exp_1): Make first argument const. * findcmd.c (parse_find_args): Treat "args" as const. * linespec.c (parse_linespec): Pass const pointer to linespec_expression_to_pc. (linespec_expression_to_pc): Make "exp_ptr" const. * parse.c (parse_exp_1): Make "stringptr" const. Make a copy of the expression to pass to parse_exp_in_context until this whole interface can be constified. (parse_expression): Make "string" const. * printcmd.c (ui_printf): Treat "arg" as const. Handle const strings. * tracepoint.c (validate_actionline): Pass const pointer to all calls to parse_exp_1. (encode_actions_1): Likewise. * value.h (parse_to_comma_and_eval): Make argument const. (parse_and_eval_address): Likewise. (parse_and_eval): Likewise. * varobj.c (varobj_create): Pass const pointer to parse_exp_1. (varobj_set_value): Likewise. * cli/cli-cmds.c (disassemble_command): Treat "arg" as const and constify string handling. Pass const pointers to parse_and_eval_address and parse_to_comman_and_eval. * cli/cli-utils.c (skip_to_space): Rename to ... (skip_to_space_const): ... this. Handle const strings. * cli/cli-utils.h (skip_to_space): Turn into macro which invokes skip_to_space_const. (skip_to_space_const): Declare. * common/format.c (parse_format_string): Make "arg" const. Handle const strings. * common/format.h (parse_format_string): Make "arg" const. * gdbserver/ax.c (ax_printf): Make "format" const. * python/python.c (gdbpy_parse_and_eval): Do not make a copy of the expression string.
2013-03-12 17:39:45 +00:00
cmdrest = skip_spaces_const (cmdrest);
Add target-side support for dynamic printf. * NEWS: Mention the additional style. * breakpoint.h (struct bp_target_info): New fields tcommands, persist. (struct bp_location): New field cmd_bytecode. * breakpoint.c: Include format.h. (disconnected_dprintf): New global. (parse_cmd_to_aexpr): New function. (build_target_command_list): New function. (insert_bp_location): Call it. (remove_breakpoints_pid): Skip dprintf breakpoints. (print_one_breakpoint_location): Ditto. (dprintf_style_agent): New global. (dprintf_style_enums): Add dprintf_style_agent. (update_dprintf_command_list): Add agent case. (agent_printf_command): New function. (_initialize_breakpoint): Add new commands. * common/ax.def (printf): New bytecode. * ax.h (ax_string): Declare. * ax-gdb.h (gen_printf): Declare. * ax-gdb.c: Include cli-utils.h, format.h. (gen_printf): New function. (maint_agent_print_command): New function. (_initialize_ax_gdb): Add maint agent-printf command. * ax-general.c (ax_string): New function. (ax_print): Add printf disassembly. * Makefile.in (SFILES): Add format.c (COMMON_OBS): Add format.o. * common/format.h: New file. * common/format.c: New file. * printcmd.c: Include format.h. (ui_printf): Call parse_format_string. * remote.c (remote_state): New field breakpoint_commands. (PACKET_BreakpointCommands): New enum. (remote_breakpoint_commands_feature): New function. (remote_protocol_features): Add new BreakpointCommands entry. (remote_can_run_breakpoint_commands): New function. (remote_add_target_side_commands): New function. (remote_insert_breakpoint): Call it. (remote_insert_hw_breakpoint): Ditto. (_initialize_remote): Add new packet configuration for target-side breakpoint commands. * target.h (struct target_ops): New field to_can_run_breakpoint_commands. (target_can_run_breakpoint_commands): New macro. * target.c (update_current_target): Handle to_can_run_breakpoint_commands. [gdbserver] * Makefile.in (WARN_CFLAGS_NO_FORMAT): Define. (ax.o): Add it to build rule. (ax-ipa.o): Ditto. (OBS): Add format.o. (IPA_OBS): Add format.o. * server.c (handle_query): Claim support for breakpoint commands. (process_point_options): Add command case. (process_serial_event): Leave running if there are printfs in effect. * mem-break.h (any_persistent_commands): Declare. (add_breakpoint_commands): Declare. (gdb_no_commands_at_breakpoint): Declare. (run_breakpoint_commands): Declare. * mem-break.c (struct point_command_list): New struct. (struct breakpoint): New field command_list. (any_persistent_commands): New function. (add_commands_to_breakpoint): New function. (add_breakpoint_commands): New function. (gdb_no_commands_at_breakpoint): New function. (run_breakpoint_commands): New function. * linux-low.c (linux_wait_1): Test for and run breakpoint commands locally. * ax.c: Include format.h. (ax_printf): New function. (gdb_eval_agent_expr): Add printf opcode. [doc] * gdb.texinfo (Dynamic Printf): Mention agent style and disconnected dprintf. (Maintenance Commands): Describe maint agent-printf. (General Query Packets): Mention BreakpointCommands feature. (Packets): Document commands extension to Z0 packet. * agentexpr.texi (Bytecode Descriptions): Document printf bytecode. [testsuite] * gdb.base/dprintf.exp: Add agent style tests.
2012-07-02 15:29:39 +00:00
if (*cmdrest++ != '"')
error (_("Must start with a format string."));
format_start = cmdrest;
fpieces = parse_format_string (&cmdrest);
old_chain = make_cleanup (free_format_pieces_cleanup, &fpieces);
format_end = cmdrest;
if (*cmdrest++ != '"')
error (_("Bad format string, non-terminated '\"'."));
* ada-lang.c (ada_read_renaming_var_value): Pass const pointer to expression string to parse_exp_1. (create_excep_cond_exprs): Likewise. * ax-gdb.c (agent_eval_command_one): Likewise. (maint_agent_printf_command): Likewise. Constify much of the string handling/parsing. * breakpoint.c (set_breakpoint_condition): Pass const pointer to expression string to parse_exp_1. (update_watchpoint): Likewise. (parse_cmd_to_aexpr): Constify string handling. Pass const pointer to parse_exp_1. (init_breakpoint_sal): Pass const pointer to parse_exp_1. (find_condition_and_thread): Likewise. Make TOK const. (watch_command_1): Make "arg" const. Constify string handling. Copy the expression string instead of changing the input string. (update_breakpoint_location): Pass const pointer to parse_exp_1. * eval.c (parse_and_eval_address): Make "exp" const. (parse_to_comma_and_eval): Make "expp" const. (parse_and_eval): Make "exp" const. * expression.h (parse_expression): Make argument const. (parse_exp_1): Make first argument const. * findcmd.c (parse_find_args): Treat "args" as const. * linespec.c (parse_linespec): Pass const pointer to linespec_expression_to_pc. (linespec_expression_to_pc): Make "exp_ptr" const. * parse.c (parse_exp_1): Make "stringptr" const. Make a copy of the expression to pass to parse_exp_in_context until this whole interface can be constified. (parse_expression): Make "string" const. * printcmd.c (ui_printf): Treat "arg" as const. Handle const strings. * tracepoint.c (validate_actionline): Pass const pointer to all calls to parse_exp_1. (encode_actions_1): Likewise. * value.h (parse_to_comma_and_eval): Make argument const. (parse_and_eval_address): Likewise. (parse_and_eval): Likewise. * varobj.c (varobj_create): Pass const pointer to parse_exp_1. (varobj_set_value): Likewise. * cli/cli-cmds.c (disassemble_command): Treat "arg" as const and constify string handling. Pass const pointers to parse_and_eval_address and parse_to_comman_and_eval. * cli/cli-utils.c (skip_to_space): Rename to ... (skip_to_space_const): ... this. Handle const strings. * cli/cli-utils.h (skip_to_space): Turn into macro which invokes skip_to_space_const. (skip_to_space_const): Declare. * common/format.c (parse_format_string): Make "arg" const. Handle const strings. * common/format.h (parse_format_string): Make "arg" const. * gdbserver/ax.c (ax_printf): Make "format" const. * python/python.c (gdbpy_parse_and_eval): Do not make a copy of the expression string.
2013-03-12 17:39:45 +00:00
cmdrest = skip_spaces_const (cmdrest);
Add target-side support for dynamic printf. * NEWS: Mention the additional style. * breakpoint.h (struct bp_target_info): New fields tcommands, persist. (struct bp_location): New field cmd_bytecode. * breakpoint.c: Include format.h. (disconnected_dprintf): New global. (parse_cmd_to_aexpr): New function. (build_target_command_list): New function. (insert_bp_location): Call it. (remove_breakpoints_pid): Skip dprintf breakpoints. (print_one_breakpoint_location): Ditto. (dprintf_style_agent): New global. (dprintf_style_enums): Add dprintf_style_agent. (update_dprintf_command_list): Add agent case. (agent_printf_command): New function. (_initialize_breakpoint): Add new commands. * common/ax.def (printf): New bytecode. * ax.h (ax_string): Declare. * ax-gdb.h (gen_printf): Declare. * ax-gdb.c: Include cli-utils.h, format.h. (gen_printf): New function. (maint_agent_print_command): New function. (_initialize_ax_gdb): Add maint agent-printf command. * ax-general.c (ax_string): New function. (ax_print): Add printf disassembly. * Makefile.in (SFILES): Add format.c (COMMON_OBS): Add format.o. * common/format.h: New file. * common/format.c: New file. * printcmd.c: Include format.h. (ui_printf): Call parse_format_string. * remote.c (remote_state): New field breakpoint_commands. (PACKET_BreakpointCommands): New enum. (remote_breakpoint_commands_feature): New function. (remote_protocol_features): Add new BreakpointCommands entry. (remote_can_run_breakpoint_commands): New function. (remote_add_target_side_commands): New function. (remote_insert_breakpoint): Call it. (remote_insert_hw_breakpoint): Ditto. (_initialize_remote): Add new packet configuration for target-side breakpoint commands. * target.h (struct target_ops): New field to_can_run_breakpoint_commands. (target_can_run_breakpoint_commands): New macro. * target.c (update_current_target): Handle to_can_run_breakpoint_commands. [gdbserver] * Makefile.in (WARN_CFLAGS_NO_FORMAT): Define. (ax.o): Add it to build rule. (ax-ipa.o): Ditto. (OBS): Add format.o. (IPA_OBS): Add format.o. * server.c (handle_query): Claim support for breakpoint commands. (process_point_options): Add command case. (process_serial_event): Leave running if there are printfs in effect. * mem-break.h (any_persistent_commands): Declare. (add_breakpoint_commands): Declare. (gdb_no_commands_at_breakpoint): Declare. (run_breakpoint_commands): Declare. * mem-break.c (struct point_command_list): New struct. (struct breakpoint): New field command_list. (any_persistent_commands): New function. (add_commands_to_breakpoint): New function. (add_breakpoint_commands): New function. (gdb_no_commands_at_breakpoint): New function. (run_breakpoint_commands): New function. * linux-low.c (linux_wait_1): Test for and run breakpoint commands locally. * ax.c: Include format.h. (ax_printf): New function. (gdb_eval_agent_expr): Add printf opcode. [doc] * gdb.texinfo (Dynamic Printf): Mention agent style and disconnected dprintf. (Maintenance Commands): Describe maint agent-printf. (General Query Packets): Mention BreakpointCommands feature. (Packets): Document commands extension to Z0 packet. * agentexpr.texi (Bytecode Descriptions): Document printf bytecode. [testsuite] * gdb.base/dprintf.exp: Add agent style tests.
2012-07-02 15:29:39 +00:00
if (*cmdrest != ',' && *cmdrest != 0)
error (_("Invalid argument syntax"));
if (*cmdrest == ',')
cmdrest++;
* ada-lang.c (ada_read_renaming_var_value): Pass const pointer to expression string to parse_exp_1. (create_excep_cond_exprs): Likewise. * ax-gdb.c (agent_eval_command_one): Likewise. (maint_agent_printf_command): Likewise. Constify much of the string handling/parsing. * breakpoint.c (set_breakpoint_condition): Pass const pointer to expression string to parse_exp_1. (update_watchpoint): Likewise. (parse_cmd_to_aexpr): Constify string handling. Pass const pointer to parse_exp_1. (init_breakpoint_sal): Pass const pointer to parse_exp_1. (find_condition_and_thread): Likewise. Make TOK const. (watch_command_1): Make "arg" const. Constify string handling. Copy the expression string instead of changing the input string. (update_breakpoint_location): Pass const pointer to parse_exp_1. * eval.c (parse_and_eval_address): Make "exp" const. (parse_to_comma_and_eval): Make "expp" const. (parse_and_eval): Make "exp" const. * expression.h (parse_expression): Make argument const. (parse_exp_1): Make first argument const. * findcmd.c (parse_find_args): Treat "args" as const. * linespec.c (parse_linespec): Pass const pointer to linespec_expression_to_pc. (linespec_expression_to_pc): Make "exp_ptr" const. * parse.c (parse_exp_1): Make "stringptr" const. Make a copy of the expression to pass to parse_exp_in_context until this whole interface can be constified. (parse_expression): Make "string" const. * printcmd.c (ui_printf): Treat "arg" as const. Handle const strings. * tracepoint.c (validate_actionline): Pass const pointer to all calls to parse_exp_1. (encode_actions_1): Likewise. * value.h (parse_to_comma_and_eval): Make argument const. (parse_and_eval_address): Likewise. (parse_and_eval): Likewise. * varobj.c (varobj_create): Pass const pointer to parse_exp_1. (varobj_set_value): Likewise. * cli/cli-cmds.c (disassemble_command): Treat "arg" as const and constify string handling. Pass const pointers to parse_and_eval_address and parse_to_comman_and_eval. * cli/cli-utils.c (skip_to_space): Rename to ... (skip_to_space_const): ... this. Handle const strings. * cli/cli-utils.h (skip_to_space): Turn into macro which invokes skip_to_space_const. (skip_to_space_const): Declare. * common/format.c (parse_format_string): Make "arg" const. Handle const strings. * common/format.h (parse_format_string): Make "arg" const. * gdbserver/ax.c (ax_printf): Make "format" const. * python/python.c (gdbpy_parse_and_eval): Do not make a copy of the expression string.
2013-03-12 17:39:45 +00:00
cmdrest = skip_spaces_const (cmdrest);
Add target-side support for dynamic printf. * NEWS: Mention the additional style. * breakpoint.h (struct bp_target_info): New fields tcommands, persist. (struct bp_location): New field cmd_bytecode. * breakpoint.c: Include format.h. (disconnected_dprintf): New global. (parse_cmd_to_aexpr): New function. (build_target_command_list): New function. (insert_bp_location): Call it. (remove_breakpoints_pid): Skip dprintf breakpoints. (print_one_breakpoint_location): Ditto. (dprintf_style_agent): New global. (dprintf_style_enums): Add dprintf_style_agent. (update_dprintf_command_list): Add agent case. (agent_printf_command): New function. (_initialize_breakpoint): Add new commands. * common/ax.def (printf): New bytecode. * ax.h (ax_string): Declare. * ax-gdb.h (gen_printf): Declare. * ax-gdb.c: Include cli-utils.h, format.h. (gen_printf): New function. (maint_agent_print_command): New function. (_initialize_ax_gdb): Add maint agent-printf command. * ax-general.c (ax_string): New function. (ax_print): Add printf disassembly. * Makefile.in (SFILES): Add format.c (COMMON_OBS): Add format.o. * common/format.h: New file. * common/format.c: New file. * printcmd.c: Include format.h. (ui_printf): Call parse_format_string. * remote.c (remote_state): New field breakpoint_commands. (PACKET_BreakpointCommands): New enum. (remote_breakpoint_commands_feature): New function. (remote_protocol_features): Add new BreakpointCommands entry. (remote_can_run_breakpoint_commands): New function. (remote_add_target_side_commands): New function. (remote_insert_breakpoint): Call it. (remote_insert_hw_breakpoint): Ditto. (_initialize_remote): Add new packet configuration for target-side breakpoint commands. * target.h (struct target_ops): New field to_can_run_breakpoint_commands. (target_can_run_breakpoint_commands): New macro. * target.c (update_current_target): Handle to_can_run_breakpoint_commands. [gdbserver] * Makefile.in (WARN_CFLAGS_NO_FORMAT): Define. (ax.o): Add it to build rule. (ax-ipa.o): Ditto. (OBS): Add format.o. (IPA_OBS): Add format.o. * server.c (handle_query): Claim support for breakpoint commands. (process_point_options): Add command case. (process_serial_event): Leave running if there are printfs in effect. * mem-break.h (any_persistent_commands): Declare. (add_breakpoint_commands): Declare. (gdb_no_commands_at_breakpoint): Declare. (run_breakpoint_commands): Declare. * mem-break.c (struct point_command_list): New struct. (struct breakpoint): New field command_list. (any_persistent_commands): New function. (add_commands_to_breakpoint): New function. (add_breakpoint_commands): New function. (gdb_no_commands_at_breakpoint): New function. (run_breakpoint_commands): New function. * linux-low.c (linux_wait_1): Test for and run breakpoint commands locally. * ax.c: Include format.h. (ax_printf): New function. (gdb_eval_agent_expr): Add printf opcode. [doc] * gdb.texinfo (Dynamic Printf): Mention agent style and disconnected dprintf. (Maintenance Commands): Describe maint agent-printf. (General Query Packets): Mention BreakpointCommands feature. (Packets): Document commands extension to Z0 packet. * agentexpr.texi (Bytecode Descriptions): Document printf bytecode. [testsuite] * gdb.base/dprintf.exp: Add agent style tests.
2012-07-02 15:29:39 +00:00
nargs = 0;
while (*cmdrest != '\0')
{
* ada-lang.c (ada_read_renaming_var_value): Pass const pointer to expression string to parse_exp_1. (create_excep_cond_exprs): Likewise. * ax-gdb.c (agent_eval_command_one): Likewise. (maint_agent_printf_command): Likewise. Constify much of the string handling/parsing. * breakpoint.c (set_breakpoint_condition): Pass const pointer to expression string to parse_exp_1. (update_watchpoint): Likewise. (parse_cmd_to_aexpr): Constify string handling. Pass const pointer to parse_exp_1. (init_breakpoint_sal): Pass const pointer to parse_exp_1. (find_condition_and_thread): Likewise. Make TOK const. (watch_command_1): Make "arg" const. Constify string handling. Copy the expression string instead of changing the input string. (update_breakpoint_location): Pass const pointer to parse_exp_1. * eval.c (parse_and_eval_address): Make "exp" const. (parse_to_comma_and_eval): Make "expp" const. (parse_and_eval): Make "exp" const. * expression.h (parse_expression): Make argument const. (parse_exp_1): Make first argument const. * findcmd.c (parse_find_args): Treat "args" as const. * linespec.c (parse_linespec): Pass const pointer to linespec_expression_to_pc. (linespec_expression_to_pc): Make "exp_ptr" const. * parse.c (parse_exp_1): Make "stringptr" const. Make a copy of the expression to pass to parse_exp_in_context until this whole interface can be constified. (parse_expression): Make "string" const. * printcmd.c (ui_printf): Treat "arg" as const. Handle const strings. * tracepoint.c (validate_actionline): Pass const pointer to all calls to parse_exp_1. (encode_actions_1): Likewise. * value.h (parse_to_comma_and_eval): Make argument const. (parse_and_eval_address): Likewise. (parse_and_eval): Likewise. * varobj.c (varobj_create): Pass const pointer to parse_exp_1. (varobj_set_value): Likewise. * cli/cli-cmds.c (disassemble_command): Treat "arg" as const and constify string handling. Pass const pointers to parse_and_eval_address and parse_to_comman_and_eval. * cli/cli-utils.c (skip_to_space): Rename to ... (skip_to_space_const): ... this. Handle const strings. * cli/cli-utils.h (skip_to_space): Turn into macro which invokes skip_to_space_const. (skip_to_space_const): Declare. * common/format.c (parse_format_string): Make "arg" const. Handle const strings. * common/format.h (parse_format_string): Make "arg" const. * gdbserver/ax.c (ax_printf): Make "format" const. * python/python.c (gdbpy_parse_and_eval): Do not make a copy of the expression string.
2013-03-12 17:39:45 +00:00
const char *cmd1;
Add target-side support for dynamic printf. * NEWS: Mention the additional style. * breakpoint.h (struct bp_target_info): New fields tcommands, persist. (struct bp_location): New field cmd_bytecode. * breakpoint.c: Include format.h. (disconnected_dprintf): New global. (parse_cmd_to_aexpr): New function. (build_target_command_list): New function. (insert_bp_location): Call it. (remove_breakpoints_pid): Skip dprintf breakpoints. (print_one_breakpoint_location): Ditto. (dprintf_style_agent): New global. (dprintf_style_enums): Add dprintf_style_agent. (update_dprintf_command_list): Add agent case. (agent_printf_command): New function. (_initialize_breakpoint): Add new commands. * common/ax.def (printf): New bytecode. * ax.h (ax_string): Declare. * ax-gdb.h (gen_printf): Declare. * ax-gdb.c: Include cli-utils.h, format.h. (gen_printf): New function. (maint_agent_print_command): New function. (_initialize_ax_gdb): Add maint agent-printf command. * ax-general.c (ax_string): New function. (ax_print): Add printf disassembly. * Makefile.in (SFILES): Add format.c (COMMON_OBS): Add format.o. * common/format.h: New file. * common/format.c: New file. * printcmd.c: Include format.h. (ui_printf): Call parse_format_string. * remote.c (remote_state): New field breakpoint_commands. (PACKET_BreakpointCommands): New enum. (remote_breakpoint_commands_feature): New function. (remote_protocol_features): Add new BreakpointCommands entry. (remote_can_run_breakpoint_commands): New function. (remote_add_target_side_commands): New function. (remote_insert_breakpoint): Call it. (remote_insert_hw_breakpoint): Ditto. (_initialize_remote): Add new packet configuration for target-side breakpoint commands. * target.h (struct target_ops): New field to_can_run_breakpoint_commands. (target_can_run_breakpoint_commands): New macro. * target.c (update_current_target): Handle to_can_run_breakpoint_commands. [gdbserver] * Makefile.in (WARN_CFLAGS_NO_FORMAT): Define. (ax.o): Add it to build rule. (ax-ipa.o): Ditto. (OBS): Add format.o. (IPA_OBS): Add format.o. * server.c (handle_query): Claim support for breakpoint commands. (process_point_options): Add command case. (process_serial_event): Leave running if there are printfs in effect. * mem-break.h (any_persistent_commands): Declare. (add_breakpoint_commands): Declare. (gdb_no_commands_at_breakpoint): Declare. (run_breakpoint_commands): Declare. * mem-break.c (struct point_command_list): New struct. (struct breakpoint): New field command_list. (any_persistent_commands): New function. (add_commands_to_breakpoint): New function. (add_breakpoint_commands): New function. (gdb_no_commands_at_breakpoint): New function. (run_breakpoint_commands): New function. * linux-low.c (linux_wait_1): Test for and run breakpoint commands locally. * ax.c: Include format.h. (ax_printf): New function. (gdb_eval_agent_expr): Add printf opcode. [doc] * gdb.texinfo (Dynamic Printf): Mention agent style and disconnected dprintf. (Maintenance Commands): Describe maint agent-printf. (General Query Packets): Mention BreakpointCommands feature. (Packets): Document commands extension to Z0 packet. * agentexpr.texi (Bytecode Descriptions): Document printf bytecode. [testsuite] * gdb.base/dprintf.exp: Add agent style tests.
2012-07-02 15:29:39 +00:00
cmd1 = cmdrest;
expr = parse_exp_1 (&cmd1, 0, (struct block *) 0, 1);
argvec[nargs] = expr;
++nargs;
cmdrest = cmd1;
if (*cmdrest == ',')
++cmdrest;
/* else complain? */
}
agent = gen_printf (get_frame_pc (fi), get_current_arch (), 0, 0,
format_start, format_end - format_start,
fpieces, nargs, argvec);
make_cleanup_free_agent_expr (agent);
ax_reqs (agent);
ax_print (gdb_stdout, agent);
/* It would be nice to call ax_reqs here to gather some general info
about the expression, and then print out the result. */
do_cleanups (old_chain);
dont_repeat ();
}
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
import gdb-1999-07-07 post reformat
1999-07-07 20:19:36 +00:00
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
/* Initialization code. */
PARAMS removal.
2000-05-28 01:12:42 +00:00
void _initialize_ax_gdb (void);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
void
Protoization.
2000-07-30 01:48:28 +00:00
_initialize_ax_gdb (void)
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
{
add_cmd ("agent", class_maintenance, agent_command,
2012-07-05 Hui Zhu <hui_zhu@mentor.com> * ax-gdb.c (cli/cli-utils.h): New include. (linespec.h): Ditto. (agent_eval_command_one): New function. (agent_command_1): Ditto. (agent_command): Call function agent_command_1. (agent_eval_command): Ditto. (_initialize_ax_gdb): Change help for "maint agent" and "maint agent-eval".
2012-07-05 01:03:01 +00:00
_("\
Translate an expression into remote agent bytecode for tracing.\n\
Usage: maint agent [-at location,] EXPRESSION\n\
If -at is given, generate remote agent bytecode for this location.\n\
If not, generate remote agent bytecode for current frame pc address."),
gdb/ Conditional tracepoints. * ax-gdb.h (gen_eval_for_expr): Declare. * ax-gdb.c (gen_expr): Generate bytecodes for BINOP_EQUAL and other comparisons. (gen_eval_for_expr): New function. (agent_eval_command): New maintenance command. (_initialize_ax_gdb): Define the command. * remote.c (struct remote_state): New field cond_tracepoints. (PACKET_ConditionalTracepoints): New packet config type. (remote_cond_tracepoint_feature): New function. (remote_protocol_features): Add ConditionalTracepoints. (remote_supports_cond_tracepoints): New function. (_initialize_remote): Add ConditionalTracepoints. * tracepoint.c (download_tracepoint): Add conditional. * NEWS: Mention conditional tracepoints. gdb/doc/ * gdb.texinfo (Tracepoint Conditions): New section. (General Query Packets): Describe ConditionalTracepoints. (Tracepoint Packets): Describe condition field. (Maintenance Commands): Describe maint agent-eval. * agentexpr.texi (Using Agent Expressions): Mention eval usage. gdb/testsuite/ * gdb.trace/tracecmd.exp: Add basic test of tracepoint conditions.
2009-07-14 21:40:34 +00:00
&maintenancelist);
add_cmd ("agent-eval", class_maintenance, agent_eval_command,
2012-07-05 Hui Zhu <hui_zhu@mentor.com> * ax-gdb.c (cli/cli-utils.h): New include. (linespec.h): Ditto. (agent_eval_command_one): New function. (agent_command_1): Ditto. (agent_command): Call function agent_command_1. (agent_eval_command): Ditto. (_initialize_ax_gdb): Change help for "maint agent" and "maint agent-eval".
2012-07-05 01:03:01 +00:00
_("\
Translate an expression into remote agent bytecode for evaluation.\n\
Usage: maint agent-eval [-at location,] EXPRESSION\n\
If -at is given, generate remote agent bytecode for this location.\n\
If not, generate remote agent bytecode for current frame pc address."),
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
&maintenancelist);
Add target-side support for dynamic printf. * NEWS: Mention the additional style. * breakpoint.h (struct bp_target_info): New fields tcommands, persist. (struct bp_location): New field cmd_bytecode. * breakpoint.c: Include format.h. (disconnected_dprintf): New global. (parse_cmd_to_aexpr): New function. (build_target_command_list): New function. (insert_bp_location): Call it. (remove_breakpoints_pid): Skip dprintf breakpoints. (print_one_breakpoint_location): Ditto. (dprintf_style_agent): New global. (dprintf_style_enums): Add dprintf_style_agent. (update_dprintf_command_list): Add agent case. (agent_printf_command): New function. (_initialize_breakpoint): Add new commands. * common/ax.def (printf): New bytecode. * ax.h (ax_string): Declare. * ax-gdb.h (gen_printf): Declare. * ax-gdb.c: Include cli-utils.h, format.h. (gen_printf): New function. (maint_agent_print_command): New function. (_initialize_ax_gdb): Add maint agent-printf command. * ax-general.c (ax_string): New function. (ax_print): Add printf disassembly. * Makefile.in (SFILES): Add format.c (COMMON_OBS): Add format.o. * common/format.h: New file. * common/format.c: New file. * printcmd.c: Include format.h. (ui_printf): Call parse_format_string. * remote.c (remote_state): New field breakpoint_commands. (PACKET_BreakpointCommands): New enum. (remote_breakpoint_commands_feature): New function. (remote_protocol_features): Add new BreakpointCommands entry. (remote_can_run_breakpoint_commands): New function. (remote_add_target_side_commands): New function. (remote_insert_breakpoint): Call it. (remote_insert_hw_breakpoint): Ditto. (_initialize_remote): Add new packet configuration for target-side breakpoint commands. * target.h (struct target_ops): New field to_can_run_breakpoint_commands. (target_can_run_breakpoint_commands): New macro. * target.c (update_current_target): Handle to_can_run_breakpoint_commands. [gdbserver] * Makefile.in (WARN_CFLAGS_NO_FORMAT): Define. (ax.o): Add it to build rule. (ax-ipa.o): Ditto. (OBS): Add format.o. (IPA_OBS): Add format.o. * server.c (handle_query): Claim support for breakpoint commands. (process_point_options): Add command case. (process_serial_event): Leave running if there are printfs in effect. * mem-break.h (any_persistent_commands): Declare. (add_breakpoint_commands): Declare. (gdb_no_commands_at_breakpoint): Declare. (run_breakpoint_commands): Declare. * mem-break.c (struct point_command_list): New struct. (struct breakpoint): New field command_list. (any_persistent_commands): New function. (add_commands_to_breakpoint): New function. (add_breakpoint_commands): New function. (gdb_no_commands_at_breakpoint): New function. (run_breakpoint_commands): New function. * linux-low.c (linux_wait_1): Test for and run breakpoint commands locally. * ax.c: Include format.h. (ax_printf): New function. (gdb_eval_agent_expr): Add printf opcode. [doc] * gdb.texinfo (Dynamic Printf): Mention agent style and disconnected dprintf. (Maintenance Commands): Describe maint agent-printf. (General Query Packets): Mention BreakpointCommands feature. (Packets): Document commands extension to Z0 packet. * agentexpr.texi (Bytecode Descriptions): Document printf bytecode. [testsuite] * gdb.base/dprintf.exp: Add agent style tests.
2012-07-02 15:29:39 +00:00
add_cmd ("agent-printf", class_maintenance, maint_agent_printf_command,
_("Translate an expression into remote "
"agent bytecode for evaluation and display the bytecodes."),
&maintenancelist);
Initial creation of sourceware repository
1999-04-16 01:35:26 +00:00
}
Reference in a new issue Copy permalink