# Apply these patches to GDB to produce an Energize GDB. # To apply these patches, first cd to gdb-XX/gdb, run "patch -p0 cond_string = NULL; if (from_tty) printf_filtered ("Breakpoint %d now unconditional.\n", bnum); + energize_condition_breakpoint(b); } else { *************** *** 281,286 **** --- 282,288 ---- typed in or the decompiled expression. */ b->cond_string = savestring (arg, strlen (arg)); b->cond = parse_exp_1 (&arg, block_for_pc (b->address), 0); + energize_condition_breakpoint(b); if (*arg) error ("Junk at end of expression"); } *************** *** 322,327 **** --- 324,330 ---- l = read_command_lines (); free_command_lines (&b->commands); b->commands = l; + energize_commands_breakpoint(b); return; } error ("No breakpoint number %d.", bnum); *************** *** 445,452 **** b->enable = disabled; if (!disabled_breaks) { ! fprintf (stderr, ! "Cannot insert breakpoint %d:\n", b->number); printf_filtered ("Disabling shared library breakpoints:\n"); } disabled_breaks = 1; --- 448,455 ---- b->enable = disabled; if (!disabled_breaks) { ! fprintf_filtered (stderr, "Cannot insert breakpoint %d:\n", ! b->number); printf_filtered ("Disabling shared library breakpoints:\n"); } disabled_breaks = 1; *************** *** 455,464 **** else #endif { ! fprintf (stderr, "Cannot insert breakpoint %d:\n", b->number); #ifdef ONE_PROCESS_WRITETEXT ! fprintf (stderr, ! "The same program may be running in another process.\n"); #endif memory_error (val, b->address); /* which bombs us out */ } --- 458,468 ---- else #endif { ! fprintf_filtered (stderr, "Cannot insert breakpoint %d:\n", ! b->number); #ifdef ONE_PROCESS_WRITETEXT ! fprintf_filtered (stderr, ! "The same program may be running in another process.\n"); #endif memory_error (val, b->address); /* which bombs us out */ } *************** *** 478,484 **** int val; #ifdef BREAKPOINT_DEBUG ! printf ("Removing breakpoints.\n"); #endif /* BREAKPOINT_DEBUG */ ALL_BREAKPOINTS (b) --- 482,488 ---- int val; #ifdef BREAKPOINT_DEBUG ! printf_filtered ("Removing breakpoints.\n"); #endif /* BREAKPOINT_DEBUG */ ALL_BREAKPOINTS (b) *************** *** 489,500 **** return val; b->inserted = 0; #ifdef BREAKPOINT_DEBUG ! printf ("Removed breakpoint at %s", ! local_hex_string(b->address)); ! printf (", shadow %s", ! local_hex_string(b->shadow_contents[0])); ! printf (", %s.\n", ! local_hex_string(b->shadow_contents[1])); #endif /* BREAKPOINT_DEBUG */ } --- 493,504 ---- return val; b->inserted = 0; #ifdef BREAKPOINT_DEBUG ! printf_filtered ("Removed breakpoint at %s", ! local_hex_string(b->address)); ! printf_filtered (", shadow %s", ! local_hex_string(b->shadow_contents[0])); ! printf_filtered (", %s.\n", ! local_hex_string(b->shadow_contents[1])); #endif /* BREAKPOINT_DEBUG */ } *************** *** 922,927 **** --- 926,932 ---- { b->ignore_count--; this_bp_stop = 0; + energize_ignore_breakpoint(b); } else { *************** *** 1141,1157 **** others++; if (others > 0) { ! printf ("Note: breakpoint%s ", (others > 1) ? "s" : ""); ALL_BREAKPOINTS (b) if (b->address == pc) { others--; ! printf ("%d%s%s ", ! b->number, ! (b->enable == disabled) ? " (disabled)" : "", ! (others > 1) ? "," : ((others == 1) ? " and" : "")); } ! printf ("also set at pc %s.\n", local_hex_string(pc)); } } --- 1146,1163 ---- others++; if (others > 0) { ! printf_filtered ("Note: breakpoint%s ", (others > 1) ? "s" : ""); ALL_BREAKPOINTS (b) if (b->address == pc) { others--; ! printf_filtered ("%d%s%s ", ! b->number, ! (b->enable == disabled) ? " (disabled)" : "", ! (others > 1) ? "," : ! ((others == 1) ? " and" : "")); } ! printf_filtered ("also set at pc %s.\n", local_hex_string(pc)); } } *************** *** 1373,1378 **** --- 1379,1386 ---- mention (b) struct breakpoint *b; { + energize_create_breakpoint(b); + switch (b->type) { case bp_watchpoint: *************** *** 1550,1557 **** if (sals.nelts > 1) { ! printf ("Multiple breakpoints were set.\n"); ! printf ("Use the \"delete\" command to delete unwanted breakpoints.\n"); } free ((PTR)sals.sals); } --- 1558,1565 ---- if (sals.nelts > 1) { ! printf_filtered ("Multiple breakpoints were set.\n"); ! printf_filtered ("Use the \"delete\" command to delete unwanted breakpoints.\n"); } free ((PTR)sals.sals); } *************** *** 1769,1775 **** goto win; } #endif ! printf ("No catch clause for exception %s.\n", p); #if 0 win: #endif --- 1777,1783 ---- goto win; } #endif ! printf_filtered ("No catch clause for exception %s.\n", p); #if 0 win: #endif *************** *** 1970,1985 **** b->enable = enabled; b->disposition = tempflag ? delete : donttouch; ! printf ("Breakpoint %d at %s", b->number, local_hex_string(b->address)); if (b->symtab) ! printf (": file %s, line %d.", b->symtab->filename, b->line_number); ! printf ("\n"); } if (sals.nelts > 1) { ! printf ("Multiple breakpoints were set.\n"); ! printf ("Use the \"delete\" command to delete unwanted breakpoints.\n"); } free ((PTR)sals.sals); } --- 1978,1995 ---- b->enable = enabled; b->disposition = tempflag ? delete : donttouch; ! printf_filtered ("Breakpoint %d at %s", b->number, ! local_hex_string(b->address)); if (b->symtab) ! printf_filtered (": file %s, line %d.", ! b->symtab->filename, b->line_number); ! printf_filtered ("\n"); } if (sals.nelts > 1) { ! printf_filtered ("Multiple breakpoints were set.\n"); ! printf_filtered ("Use the \"delete\" command to delete unwanted breakpoints.\n"); } free ((PTR)sals.sals); } *************** *** 2086,2095 **** } if (found->next) from_tty = 1; /* Always report if deleted more than one */ ! if (from_tty) printf ("Deleted breakpoint%s ", found->next ? "s" : ""); while (found) { ! if (from_tty) printf ("%d ", found->number); b1 = found->next; delete_breakpoint (found); found = b1; --- 2096,2106 ---- } if (found->next) from_tty = 1; /* Always report if deleted more than one */ ! if (from_tty) printf_filtered ("Deleted breakpoint%s ", ! found->next ? "s" : ""); while (found) { ! if (from_tty) printf_filtered ("%d ", found->number); b1 = found->next; delete_breakpoint (found); found = b1; *************** *** 2120,2125 **** --- 2131,2138 ---- register struct breakpoint *b; register bpstat bs; + energize_delete_breakpoint(bpt); + if (bpt->inserted) target_remove_breakpoint(bpt->address, bpt->shadow_contents); *************** *** 2144,2150 **** free ((PTR)bpt->addr_string); if (xgdb_verbose && bpt->type == bp_breakpoint) ! printf ("breakpoint #%d deleted\n", bpt->number); /* Be sure no bpstat's are pointing at it after it's been freed. */ /* FIXME, how can we find all bpstat's? We just check stop_bpstat for now. */ --- 2157,2163 ---- free ((PTR)bpt->addr_string); if (xgdb_verbose && bpt->type == bp_breakpoint) ! printf_filtered ("breakpoint #%d deleted\n", bpt->number); /* Be sure no bpstat's are pointing at it after it's been freed. */ /* FIXME, how can we find all bpstat's? We just check stop_bpstat for now. */ *************** *** 2264,2270 **** ALL_BREAKPOINTS_SAFE (b, temp) { ! sprintf (message, message1, b->number); /* Format possible error msg */ catch_errors (breakpoint_re_set_one, (char *) b, message); } --- 2277,2283 ---- ALL_BREAKPOINTS_SAFE (b, temp) { ! printf_filtered (message, message1, b->number); /* Format possible error msg */ catch_errors (breakpoint_re_set_one, (char *) b, message); } *************** *** 2298,2303 **** --- 2311,2317 ---- if (b->number == bptnum) { b->ignore_count = count; + energize_ignore_breakpoint(b); if (!from_tty) return; else if (count == 0) *************** *** 2322,2328 **** struct breakpoint *b; ALL_BREAKPOINTS (b) ! b->ignore_count = 0; } /* Command to set ignore-count of breakpoint N to COUNT. */ --- 2336,2345 ---- struct breakpoint *b; ALL_BREAKPOINTS (b) ! { ! b->ignore_count = 0; ! energize_ignore_breakpoint(b); ! } } /* Command to set ignore-count of breakpoint N to COUNT. */ *************** *** 2377,2383 **** function (b); goto win; } ! printf ("No breakpoint number %d.\n", num); win: p = p1; } --- 2394,2400 ---- function (b); goto win; } ! printf_filtered ("No breakpoint number %d.\n", num); win: p = p1; } *************** *** 2389,2396 **** { bpt->enable = enabled; if (xgdb_verbose && bpt->type == bp_breakpoint) ! printf ("breakpoint #%d enabled\n", bpt->number); check_duplicates (bpt->address); if (bpt->type == bp_watchpoint) --- 2406,2415 ---- { bpt->enable = enabled; + energize_enable_breakpoint(bpt); + if (xgdb_verbose && bpt->type == bp_breakpoint) ! printf_filtered ("breakpoint #%d enabled\n", bpt->number); check_duplicates (bpt->address); if (bpt->type == bp_watchpoint) *************** *** 2436,2441 **** --- 2455,2462 ---- disable_breakpoint (bpt) struct breakpoint *bpt; { + energize_disable_breakpoint(bpt); + bpt->enable = disabled; if (xgdb_verbose && bpt->type == bp_breakpoint) =================================================================== *** 1.18 1992/07/10 17:22:30 --- command.c 1992/09/28 21:34:09 *************** *** 1093,1098 **** --- 1093,1100 ---- else error ("gdb internal error: bad cmd_type in do_setshow_command"); (*c->function.sfunc) (NULL, from_tty, c); + if (energize) + print_prompt(); } /* Show all the settings in a list of show commands. */ *************** *** 1148,1154 **** } if (pid != -1) ! while ((rc = wait (&status)) != pid && rc != -1) ; else error ("Fork failed"); --- 1150,1156 ---- } if (pid != -1) ! while ((rc = energize_shell_wait (&status)) != pid && rc != -1) ; else error ("Fork failed"); =================================================================== *** 1.67 1992/09/21 20:01:00 --- configure.in 1992/09/28 21:34:10 *************** *** 1,4 **** ! configdirs="doc" srcname="GDB" srctrigger=main.c --- 1,4 ---- ! configdirs="energize doc" srcname="GDB" srctrigger=main.c =================================================================== *** 1.48 1992/09/15 08:55:59 --- defs.h 1992/09/28 21:34:10 *************** *** 811,814 **** --- 811,816 ---- #define MAINTENANCE_CMDS 1 #endif + #include "energize.h" + #endif /* !defined (DEFS_H) */ =================================================================== *** 2.5 1992/09/03 16:26:03 --- demangle.c 1992/09/28 21:34:10 *************** *** 37,43 **** the appropriate target configuration file. */ #ifndef DEFAULT_DEMANGLING_STYLE ! # define DEFAULT_DEMANGLING_STYLE AUTO_DEMANGLING_STYLE_STRING #endif /* String name for the current demangling style. Set by the "set demangling" --- 37,43 ---- the appropriate target configuration file. */ #ifndef DEFAULT_DEMANGLING_STYLE ! # define DEFAULT_DEMANGLING_STYLE LUCID_DEMANGLING_STYLE_STRING #endif /* String name for the current demangling style. Set by the "set demangling" =================================================================== *** 1.34 1992/09/26 05:20:04 --- infcmd.c 1992/09/28 21:34:11 *************** *** 242,247 **** --- 242,248 ---- target_create_inferior (exec_file, inferior_args, environ_vector (inferior_environ)); + energize_new_process(); } static void =================================================================== *** 1.29 1992/09/25 19:19:00 --- inflow.c 1992/09/28 21:34:11 *************** *** 87,93 **** static short pgrp_inferior; static short pgrp_ours; # else /* not def SHORT_PGRP */ ! static int pgrp_inferior; static int pgrp_ours; # endif /* not def SHORT_PGRP */ #else /* not def TIOCGPGRP */ --- 87,93 ---- static short pgrp_inferior; static short pgrp_ours; # else /* not def SHORT_PGRP */ ! int pgrp_inferior; static int pgrp_ours; # endif /* not def SHORT_PGRP */ #else /* not def TIOCGPGRP */ =================================================================== *** 1.59 1992/09/26 01:49:01 --- infrun.c 1992/09/28 21:34:12 *************** *** 519,525 **** flush_cached_frames (); registers_changed (); ! target_wait (&w); #ifdef SIGTRAP_STOP_AFTER_LOAD --- 519,525 ---- flush_cached_frames (); registers_changed (); ! energize_wait (&w); #ifdef SIGTRAP_STOP_AFTER_LOAD =================================================================== *** 1.17 1992/09/26 09:06:10 --- inftarg.c 1992/09/28 21:34:12 *************** *** 123,128 **** --- 123,129 ---- attach (pid); inferior_pid = pid; + energize_new_process(); push_target (&child_ops); #endif /* ATTACH_DETACH */ } =================================================================== *** 1.57 1992/09/29 05:07:14 --- main.c 1992/09/28 21:34:13 *************** *** 441,446 **** --- 441,447 ---- char *corearg = NULL; char *cdarg = NULL; char *ttyarg = NULL; + char *energize_id = NULL; /* Pointers to all arguments of +command option. */ char **cmdarg; *************** *** 539,544 **** --- 540,546 ---- {"tty", required_argument, 0, 't'}, {"baud", required_argument, 0, 'b'}, {"b", required_argument, 0, 'b'}, + {"context", required_argument, 0, 12}, /* Allow machine descriptions to add more options... */ #ifdef ADDITIONAL_OPTIONS ADDITIONAL_OPTIONS *************** *** 571,576 **** --- 573,581 ---- case 11: cdarg = optarg; break; + case 12: + energize_id = optarg; + break; case 's': symarg = optarg; break; *************** *** 611,617 **** ADDITIONAL_OPTION_CASES #endif case '?': ! fprintf (stderr, "Use `%s +help' for a complete list of options.\n", argv[0]); exit (1); --- 616,622 ---- ADDITIONAL_OPTION_CASES #endif case '?': ! fprintf_filtered (stderr, "Use `%s +help' for a complete list of options.\n", argv[0]); exit (1); *************** *** 668,674 **** corearg = argv[optind]; break; case 3: ! fprintf (stderr, "Excess command line arguments ignored. (%s%s)\n", argv[optind], (optind == argc - 1) ? "" : " ..."); break; --- 673,679 ---- corearg = argv[optind]; break; case 3: ! fprintf_filtered (stderr, "Excess command line arguments ignored. (%s%s)\n", argv[optind], (optind == argc - 1) ? "" : " ..."); break; *************** *** 679,684 **** --- 684,692 ---- /* Run the init function of each source file */ + /* Must call this first to setup tty */ + energize_initialize (energize_id, execarg); + initialize_cmd_lists (); /* This needs to be done first */ initialize_all_files (); initialize_main (); /* But that omits this file! Do it now */ *************** *** 853,859 **** if (!setjmp (to_top_level)) { do_cleanups (ALL_CLEANUPS); /* Do complete cleanup */ ! command_loop (); quit_command ((char *)0, instream == stdin); } } --- 861,870 ---- if (!setjmp (to_top_level)) { do_cleanups (ALL_CLEANUPS); /* Do complete cleanup */ ! if (energize) ! energize_main_loop(); ! else ! command_loop (); quit_command ((char *)0, instream == stdin); } } *************** *** 915,921 **** else if (c->function.cfunc == NO_FUNCTION) error ("That is not a command, just a help topic."); else ! (*c->function.cfunc) (arg, from_tty & caution); } /* Tell the user if the language has changed (except first time). */ --- 926,932 ---- else if (c->function.cfunc == NO_FUNCTION) error ("That is not a command, just a help topic."); else ! energize_call_command (c, arg, from_tty & caution); } /* Tell the user if the language has changed (except first time). */ *************** *** 1317,1323 **** #else signal (STOP_SIGNAL, stop_sig); #endif ! printf ("%s", prompt); fflush (stdout); /* Forget about any previous command -- null line now will do nothing. */ --- 1328,1334 ---- #else signal (STOP_SIGNAL, stop_sig); #endif ! printf_filtered ("%s", prompt); fflush (stdout); /* Forget about any previous command -- null line now will do nothing. */ *************** *** 1463,1469 **** if (expanded) { /* Print the changes. */ ! printf ("%s\n", history_value); /* If there was an error, call this function again. */ if (expanded < 0) --- 1474,1480 ---- if (expanded) { /* Print the changes. */ ! printf_filtered ("%s\n", history_value); /* If there was an error, call this function again. */ if (expanded < 0) *************** *** 1570,1576 **** while (1) { dont_repeat (); ! p = command_line_input ((char *) NULL, instream == stdin); if (p == NULL) /* Treat end of file like "end". */ break; --- 1581,1587 ---- while (1) { dont_repeat (); ! p = energize_command_line_input ((char *) NULL, instream == stdin); if (p == NULL) /* Treat end of file like "end". */ break; *************** *** 1661,1667 **** char *arg; int from_tty; { ! printf ("\"info\" must be followed by the name of an info command.\n"); help_list (infolist, "info ", -1, stdout); } --- 1672,1678 ---- char *arg; int from_tty; { ! printf_filtered ("\"info\" must be followed by the name of an info command.\n"); help_list (infolist, "info ", -1, stdout); } *************** *** 1777,1783 **** if (from_tty) { ! printf ("Type commands for definition of \"%s\".\n\ End with a line saying just \"end\".\n", comname); fflush (stdout); } --- 1788,1794 ---- if (from_tty) { ! printf_filtered ("Type commands for definition of \"%s\".\n\ End with a line saying just \"end\".\n", comname); fflush (stdout); } *************** *** 1810,1816 **** error ("Command \"%s\" is built-in.", comname); if (from_tty) ! printf ("Type documentation for \"%s\".\n\ End with a line saying just \"end\".\n", comname); doclines = read_command_lines (); --- 1821,1827 ---- error ("Command \"%s\" is built-in.", comname); if (from_tty) ! printf_filtered ("Type documentation for \"%s\".\n\ End with a line saying just \"end\".\n", comname); doclines = read_command_lines (); *************** *** 1841,1847 **** static void print_gnu_advertisement() { ! printf ("\ GDB is free software and you are welcome to distribute copies of it\n\ under certain conditions; type \"show copying\" to see the conditions.\n\ There is absolutely no warranty for GDB; type \"show warranty\" for details.\n\ --- 1852,1858 ---- static void print_gnu_advertisement() { ! printf_filtered ("\ GDB is free software and you are welcome to distribute copies of it\n\ under certain conditions; type \"show copying\" to see the conditions.\n\ There is absolutely no warranty for GDB; type \"show warranty\" for details.\n\ *************** *** 1874,1880 **** void print_prompt () { ! printf ("%s", prompt); fflush (stdout); } --- 1885,1891 ---- void print_prompt () { ! printf_filtered ("%s", prompt); fflush (stdout); } *************** *** 1920,1929 **** getcwd (dirbuf, sizeof (dirbuf)); if (strcmp (dirbuf, current_directory)) ! printf ("Working directory %s\n (canonically %s).\n", current_directory, dirbuf); else ! printf ("Working directory %s.\n", current_directory); } static void --- 1931,1940 ---- getcwd (dirbuf, sizeof (dirbuf)); if (strcmp (dirbuf, current_directory)) ! printf_filtered ("Working directory %s\n (canonically %s).\n", current_directory, dirbuf); else ! printf_filtered ("Working directory %s.\n", current_directory); } static void *************** *** 2160,2166 **** char *args; int from_tty; { ! printf ("\"set history\" must be followed by the name of a history subcommand.\n"); help_list (sethistlist, "set history ", -1, stdout); } --- 2171,2177 ---- char *args; int from_tty; { ! printf_filtered ("\"set history\" must be followed by the name of a history subcommand.\n"); help_list (sethistlist, "set history ", -1, stdout); } =================================================================== *** 1.33 1992/09/29 05:07:19 --- printcmd.c 1992/09/28 21:34:13 *************** *** 778,792 **** { int histindex = record_latest_value (val); if (inspect) ! printf ("\031(gdb-makebuffer \"%s\" %d '(\"", exp, histindex); else if (histindex >= 0) printf_filtered ("$%d = ", histindex); print_formatted (val, format, fmt.size); printf_filtered ("\n"); if (inspect) ! printf("\") )\030"); } if (cleanup) --- 778,802 ---- { int histindex = record_latest_value (val); + if (energize) + { + char buf[20]; + + sprintf(buf, "$%d", histindex); + energize_start_variable_annotation(buf, NULL, VALUE_TYPE(val), + VALUE_ADDRESS(val), ""); + } + if (inspect) ! printf_filtered ("\031(gdb-makebuffer \"%s\" %d '(\"", exp, histindex); else if (histindex >= 0) printf_filtered ("$%d = ", histindex); print_formatted (val, format, fmt.size); + energize_end_variable_annotation(); printf_filtered ("\n"); if (inspect) ! printf_filtered("\") )\030"); } if (cleanup) *************** *** 890,896 **** { if (is_a_field_of_this) { ! printf ("Symbol \"%s\" is a field of the local class variable `this'\n", exp); return; } --- 900,906 ---- { if (is_a_field_of_this) { ! printf_filtered ("Symbol \"%s\" is a field of the local class variable `this'\n", exp); return; } *************** *** 897,903 **** msymbol = lookup_minimal_symbol (exp, (struct objfile *) NULL); if (msymbol != NULL) ! printf ("Symbol \"%s\" is at %s in a file compiled without debugging.\n", exp, local_hex_string(msymbol -> address)); else error ("No symbol \"%s\" in current context.", exp); --- 907,913 ---- msymbol = lookup_minimal_symbol (exp, (struct objfile *) NULL); if (msymbol != NULL) ! printf_filtered ("Symbol \"%s\" is at %s in a file compiled without debugging.\n", exp, local_hex_string(msymbol -> address)); else error ("No symbol \"%s\" in current context.", exp); *************** *** 904,910 **** return; } ! printf ("Symbol \"%s\" is ", SYMBOL_NAME (sym)); val = SYMBOL_VALUE (sym); basereg = SYMBOL_BASEREG (sym); --- 914,920 ---- return; } ! printf_filtered ("Symbol \"%s\" is ", SYMBOL_NAME (sym)); val = SYMBOL_VALUE (sym); basereg = SYMBOL_BASEREG (sym); *************** *** 912,945 **** { case LOC_CONST: case LOC_CONST_BYTES: ! printf ("constant"); break; case LOC_LABEL: ! printf ("a label at address %s", local_hex_string(SYMBOL_VALUE_ADDRESS (sym))); break; case LOC_REGISTER: ! printf ("a variable in register %s", reg_names[val]); break; case LOC_STATIC: ! printf ("static storage at address %s", local_hex_string(SYMBOL_VALUE_ADDRESS (sym))); break; case LOC_REGPARM: ! printf ("an argument in register %s", reg_names[val]); break; case LOC_ARG: if (SYMBOL_BASEREG_VALID (sym)) { ! printf ("an argument at offset %ld from register %s", val, reg_names[basereg]); } else { ! printf ("an argument at offset %ld", val); } break; --- 922,955 ---- { case LOC_CONST: case LOC_CONST_BYTES: ! printf_filtered ("constant"); break; case LOC_LABEL: ! printf_filtered ("a label at address %s", local_hex_string(SYMBOL_VALUE_ADDRESS (sym))); break; case LOC_REGISTER: ! printf_filtered ("a variable in register %s", reg_names[val]); break; case LOC_STATIC: ! printf_filtered ("static storage at address %s", local_hex_string(SYMBOL_VALUE_ADDRESS (sym))); break; case LOC_REGPARM: ! printf_filtered ("an argument in register %s", reg_names[val]); break; case LOC_ARG: if (SYMBOL_BASEREG_VALID (sym)) { ! printf_filtered ("an argument at offset %ld from register %s", val, reg_names[basereg]); } else { ! printf_filtered ("an argument at offset %ld", val); } break; *************** *** 946,957 **** case LOC_LOCAL_ARG: if (SYMBOL_BASEREG_VALID (sym)) { ! printf ("an argument at offset %ld from register %s", val, reg_names[basereg]); } else { ! printf ("an argument at frame offset %ld", val); } break; --- 956,967 ---- case LOC_LOCAL_ARG: if (SYMBOL_BASEREG_VALID (sym)) { ! printf_filtered ("an argument at offset %ld from register %s", val, reg_names[basereg]); } else { ! printf_filtered ("an argument at frame offset %ld", val); } break; *************** *** 958,990 **** case LOC_LOCAL: if (SYMBOL_BASEREG_VALID (sym)) { ! printf ("a local variable at offset %ld from register %s", val, reg_names[basereg]); } else { ! printf ("a local variable at frame offset %ld", val); } break; case LOC_REF_ARG: ! printf ("a reference argument at offset %ld", val); break; case LOC_TYPEDEF: ! printf ("a typedef"); break; case LOC_BLOCK: ! printf ("a function at address %s", local_hex_string(BLOCK_START (SYMBOL_BLOCK_VALUE (sym)))); break; default: ! printf ("of unknown (botched) type"); break; } ! printf (".\n"); } static void --- 968,1000 ---- case LOC_LOCAL: if (SYMBOL_BASEREG_VALID (sym)) { ! printf_filtered ("a local variable at offset %ld from register %s", val, reg_names[basereg]); } else { ! printf_filtered ("a local variable at frame offset %ld", val); } break; case LOC_REF_ARG: ! printf_filtered ("a reference argument at offset %ld", val); break; case LOC_TYPEDEF: ! printf_filtered ("a typedef"); break; case LOC_BLOCK: ! printf_filtered ("a function at address %s", local_hex_string(BLOCK_START (SYMBOL_BLOCK_VALUE (sym)))); break; default: ! printf_filtered ("of unknown (botched) type"); break; } ! printf_filtered (".\n"); } static void *************** *** 1419,1425 **** d->status = disabled; return; } ! printf ("No display number %d.\n", num); } void --- 1429,1435 ---- d->status = disabled; return; } ! printf_filtered ("No display number %d.\n", num); } void *************** *** 1428,1434 **** if (current_display_number >= 0) { disable_display (current_display_number); ! fprintf (stderr, "Disabling display %d to avoid infinite recursion.\n", current_display_number); } current_display_number = -1; --- 1438,1444 ---- if (current_display_number >= 0) { disable_display (current_display_number); ! fprintf_filtered (stderr, "Disabling display %d to avoid infinite recursion.\n", current_display_number); } current_display_number = -1; *************** *** 1442,1448 **** register struct display *d; if (!display_chain) ! printf ("There are no auto-display expressions now.\n"); else printf_filtered ("Auto-display expressions now in effect:\n\ Num Enb Expression\n"); --- 1452,1458 ---- register struct display *d; if (!display_chain) ! printf_filtered ("There are no auto-display expressions now.\n"); else printf_filtered ("Auto-display expressions now in effect:\n\ Num Enb Expression\n"); *************** *** 1495,1501 **** d->status = enabled; goto win; } ! printf ("No display number %d.\n", num); win: p = p1; while (*p == ' ' || *p == '\t') --- 1505,1511 ---- d->status = enabled; goto win; } ! printf_filtered ("No display number %d.\n", num); win: p = p1; while (*p == ' ' || *p == '\t') *************** *** 1652,1662 **** --- 1662,1680 ---- standard indentation here is 4 spaces, and val_print indents 2 for each recurse. */ val = read_var_value (sym, FRAME_INFO_ID (fi)); + + energize_start_variable_annotation(SYMBOL_NAME(sym), sym, + VALUE_TYPE(val), + VALUE_ADDRESS(val), ""); + if (val) val_print (VALUE_TYPE (val), VALUE_CONTENTS (val), VALUE_ADDRESS (val), stream, 0, 0, 2, Val_no_prettyprint); else fputs_filtered ("???", stream); + + energize_end_variable_annotation(); + first = 0; } =================================================================== *** 1.35 1992/09/18 09:20:00 --- stack.c 1992/09/28 21:34:14 *************** *** 159,165 **** if (addressprint) printf_filtered ("%s in ", local_hex_string(fi->pc)); ! fputs_demangled (fname, stdout, 0); fputs_filtered (" (...)\n", stdout); return; --- 159,168 ---- if (addressprint) printf_filtered ("%s in ", local_hex_string(fi->pc)); ! if (energize) ! energize_annotate_function(fname, 0, level); ! else ! fputs_demangled (fname, stdout, 0); fputs_filtered (" (...)\n", stdout); return; *************** *** 218,224 **** if (addressprint) if (fi->pc != sal.pc || !sal.symtab) printf_filtered ("%s in ", local_hex_string(fi->pc)); ! fputs_demangled (funname ? funname : "??", stdout, 0); wrap_here (" "); fputs_filtered (" (", stdout); if (args) --- 221,230 ---- if (addressprint) if (fi->pc != sal.pc || !sal.symtab) printf_filtered ("%s in ", local_hex_string(fi->pc)); ! if (energize) ! energize_annotate_function(funname ? funname : "??", 0, level); ! else ! fputs_demangled (funname ? funname : "??", stdout, 0); wrap_here (" "); fputs_filtered (" (", stdout); if (args) *************** *** 255,261 **** { if (addressprint && mid_statement) printf_filtered ("%s\t", local_hex_string(fi->pc)); ! print_source_lines (sal.symtab, sal.line, sal.line + 1, 0); } current_source_line = max (sal.line - lines_to_list/2, 1); } --- 261,268 ---- { if (addressprint && mid_statement) printf_filtered ("%s\t", local_hex_string(fi->pc)); ! if (!energize) ! print_source_lines (sal.symtab, sal.line, sal.line + 1, 0); } current_source_line = max (sal.line - lines_to_list/2, 1); } *************** *** 429,435 **** if (funname) { printf_filtered (" in "); ! fputs_demangled (funname, stdout, DMGL_ANSI | DMGL_PARAMS); } wrap_here (" "); if (sal.symtab) --- 436,446 ---- if (funname) { printf_filtered (" in "); ! if (energize) ! energize_annotate_function(funname, DMGL_ANSI | DMGL_PARAMS, ! selected_frame_level); ! else ! fputs_demangled (funname, stdout, DMGL_ANSI | DMGL_PARAMS); } wrap_here (" "); if (sal.symtab) =================================================================== *** 1.59 1992/09/29 05:07:26 --- symfile.c 1992/09/28 21:34:14 *************** *** 614,619 **** --- 614,621 ---- fflush (stdout); } + energize_symbol_file(objfile); + return (objfile); } *************** *** 646,652 **** current_source_line = 0; if (from_tty) { ! printf ("No symbol file now.\n"); } } else --- 648,654 ---- current_source_line = 0; if (from_tty) { ! printf_filtered ("No symbol file now.\n"); } } else *************** *** 1164,1170 **** return; clear_symtab_users_done = clear_symtab_users_queued; ! printf ("Resetting debugger state after updating old symbol tables\n"); /* Someday, we should do better than this, by only blowing away the things that really need to be blown. */ --- 1166,1172 ---- return; clear_symtab_users_done = clear_symtab_users_queued; ! printf_filtered ("Resetting debugger state after updating old symbol tables\n"); /* Someday, we should do better than this, by only blowing away the things that really need to be blown. */ =================================================================== *** 1.63 1992/09/26 05:34:06 --- utils.c 1992/09/28 21:34:15 *************** *** 700,720 **** fflush (stdout); va_start (args); ctlstr = va_arg (args, char *); vfprintf_filtered (stdout, ctlstr, args); - va_end (args); printf_filtered ("(y or n) "); ! fflush (stdout); ! answer = fgetc (stdin); ! clearerr (stdin); /* in case of C-d */ ! if (answer == EOF) /* C-d */ ! return 1; ! if (answer != '\n') /* Eat rest of input line, to EOF or newline */ ! do ! { ! ans2 = fgetc (stdin); ! clearerr (stdin); ! } ! while (ans2 != EOF && ans2 != '\n'); if (answer >= 'a') answer -= 040; if (answer == 'Y') --- 700,731 ---- fflush (stdout); va_start (args); ctlstr = va_arg (args, char *); + energize_query (ctlstr, args); vfprintf_filtered (stdout, ctlstr, args); printf_filtered ("(y or n) "); ! if (energize) ! { ! char *buf; ! ! buf = energize_command_line_input(0, 0); ! answer = buf ? *buf : 'Y'; ! energize_acknowledge_query(buf); ! } ! else ! { ! fflush (stdout); ! answer = fgetc (stdin); ! clearerr (stdin); /* in case of C-d */ ! if (answer == EOF) /* C-d */ ! return 1; ! if (answer != '\n') /* Eat rest of input line, to EOF or newline */ ! do ! { ! ans2 = fgetc (stdin); ! clearerr (stdin); ! } ! while (ans2 != EOF && ans2 != '\n'); ! } if (answer >= 'a') answer -= 040; if (answer == 'Y') *************** *** 722,727 **** --- 733,739 ---- if (answer == 'N') return 0; printf_filtered ("Please answer y or n.\n"); + va_end (args); } } *************** *** 1000,1005 **** --- 1012,1023 ---- if (linebuffer == 0) return; + if (energize) + { + energize_fputs(linebuffer); + return; + } + /* Don't do any filtering if it is disabled. */ if (stream != stdout || (lines_per_page == UINT_MAX && chars_per_line == UINT_MAX)) =================================================================== *** 1.55 1992/09/29 05:07:34 --- valprint.c 1992/09/28 21:34:15 *************** *** 384,390 **** VALUE_CONTENTS (val) + typelen * i, VALUE_ADDRESS (val) + typelen * i, stream, format, 1, 0, pretty); ! fprintf (stream, " ", reps); i = rep1 - 1; things_printed += REPEAT_COUNT_THRESHOLD; } --- 384,390 ---- VALUE_CONTENTS (val) + typelen * i, VALUE_ADDRESS (val) + typelen * i, stream, format, 1, 0, pretty); ! fprintf_filtered (stream, " ", reps); i = rep1 - 1; things_printed += REPEAT_COUNT_THRESHOLD; } *************** *** 488,493 **** --- 488,494 ---- struct type **dont_print; { int i, len, n_baseclasses; + char expr_tag[100]; /* Energize */ check_stub_type (type); *************** *** 552,557 **** --- 553,565 ---- fprint_symbol (stream, TYPE_FIELD_NAME (type, i)); fputs_filtered (" = ", stream); } + + sprintf(expr_tag, ".%s", TYPE_FIELD_NAME(type, i)); + + energize_start_variable_annotation(expr_tag, NULL, + TYPE_FIELD_TYPE(type, i), + (CORE_ADDR) (valaddr + TYPE_FIELD_BITPOS(type, i) / 8), + ""); if (TYPE_FIELD_PACKED (type, i)) { value v; *************** *** 570,575 **** --- 578,584 ---- valaddr + TYPE_FIELD_BITPOS (type, i) / 8, 0, stream, format, 0, recurse + 1, pretty); } + energize_end_variable_annotation(); } if (pretty) { *************** *** 804,809 **** --- 813,819 ---- unsigned int rep1; /* Number of repetitions we have detected so far. */ unsigned int reps; + char expr_tag[100]; /* Energize */ if (i != 0) if (arrayprint) *************** *** 825,830 **** --- 835,845 ---- ++rep1; } + sprintf(expr_tag, "[%d]", i); + energize_start_variable_annotation(expr_tag, NULL, + elttype, + (CORE_ADDR) (valaddr + i * eltlen), + ""); if (reps > REPEAT_COUNT_THRESHOLD) { val_print (elttype, valaddr + i * eltlen, *************** Sun Oct 24 23:48:55 1993*** 841,846 **** --- 856,862 ---- recurse + 1, pretty); things_printed++; } + energize_end_variable_annotation(); } if (i < len) fprintf_filtered (stream, "..."); *************** *** 910,916 **** { fprintf_filtered (stream, "&"); type_print_varspec_prefix (TYPE_FN_FIELD_TYPE (f, j), stream, 0, 0); ! fprintf (stream, kind); if (TYPE_FN_FIELD_PHYSNAME (f, j)[0] == '_' && TYPE_FN_FIELD_PHYSNAME (f, j)[1] == CPLUS_MARKER) type_print_method_args --- 926,932 ---- { fprintf_filtered (stream, "&"); type_print_varspec_prefix (TYPE_FN_FIELD_TYPE (f, j), stream, 0, 0); ! fprintf_filtered (stream, kind); if (TYPE_FN_FIELD_PHYSNAME (f, j)[0] == '_' && TYPE_FN_FIELD_PHYSNAME (f, j)[1] == CPLUS_MARKER) type_print_method_args *************** *** 1528,1534 **** case TYPE_CODE_METHOD: if (passed_a_ptr) ! fprintf (stream, "("); type_print_varspec_prefix (TYPE_TARGET_TYPE (type), stream, 0, 0); if (passed_a_ptr) --- 1544,1550 ---- case TYPE_CODE_METHOD: if (passed_a_ptr) ! fprintf_filtered (stream, "("); type_print_varspec_prefix (TYPE_TARGET_TYPE (type), stream, 0, 0); if (passed_a_ptr) *************** *** 1907,1913 **** if (TYPE_TARGET_TYPE (TYPE_FN_FIELD_TYPE (f, j)) == 0) { /* Keep GDB from crashing here. */ ! fprintf (stream, " %s;\n", TYPE_FN_FIELD_PHYSNAME (f, j)); break; } --- 1923,1929 ---- if (TYPE_TARGET_TYPE (TYPE_FN_FIELD_TYPE (f, j)) == 0) { /* Keep GDB from crashing here. */ ! fprintf_filtered (stream, " %s;\n", TYPE_FN_FIELD_PHYSNAME (f, j)); break; } *************** *** 2098,2104 **** char *arg; int from_tty; { ! printf ( "\"set print\" must be followed by the name of a print subcommand.\n"); help_list (setprintlist, "set print ", -1, stdout); } --- 2114,2120 ---- char *arg; int from_tty; { ! printf_filtered ( "\"set print\" must be followed by the name of a print subcommand.\n"); help_list (setprintlist, "set print ", -1, stdout); } =================================================================== *** 1.5 1992/09/26 08:07:45 --- amix.mh 1992/09/28 21:34:15 *************** *** 22,24 **** --- 22,38 ---- # SVR4 puts the BSD compatible install in /usr/ucb. INSTALL = /usr/ucb/install -c + + # These are the libs that are needed for the Energize version of gdb on + # SVR4. Note that we MUST include the standard C library before libucb.a, + # otherwise we get lots of broken stuff we don't want. + ENERGIZE_LIB = energize/libconn.a + ENERGIZE_LIBS = ${ENERGIZE_LIB} -L/usr/lib -lm -lnet -lresolv -lform \ + -lsocket -lc /usr/ucblib/libucb.a -lnsl + + # These are the libs that are needed for the Energize version of gdb on + # SVR4. Note that we MUST include the standard C library before libucb.a, + # otherwise we get lots of broken stuff we don't want. + ENERGIZE_LIB = energize/libconn.a + ENERGIZE_LIBS = ${ENERGIZE_LIB} -L/usr/lib -lm -lnet -lresolv -lform \ + -lsocket -lc /usr/ucblib/libucb.a -lnsl =================================================================== *** 1.5 1992/09/26 08:08:14 --- ncr3000.mh 1992/09/28 21:34:16 *************** *** 38,40 **** --- 38,59 ---- # The /usr/ucb/install program is incompatible (complains about unknown # group staff). Use good old cp... INSTALL = cp + + # These are the libs that are needed for the Energize version of gdb on + # SVR4. Note that we MUST include the standard C library before libucb.a, + # otherwise we get lots of broken stuff we don't want. + XM_CLIBS = -L/usr/lib -lm -lnet -lresolv -lform -lsocket -lnsl -lc + + # These are the libs that are needed for the Energize version of gdb on + # SVR4. Note that we MUST include the standard C library before libucb.a, + # otherwise we get lots of broken stuff we don't want. + ENERGIZE_LIB = energize/libconn.a + ENERGIZE_LIBS = ${ENERGIZE_LIB} -L/usr/lib -lm -lnet -lresolv -lform \ + -lsocket -lc /usr/ucblib/libucb.a -lnsl + + # These are the libs that are needed for the Energize version of gdb on + # SVR4. Note that we MUST include the standard C library before libucb.a, + # otherwise we get lots of broken stuff we don't want. + ENERGIZE_LIB = energize/libconn.a + ENERGIZE_LIBS = ${ENERGIZE_LIB} -L/usr/lib -lm -lnet -lresolv -lform \ + -lsocket -lc /usr/ucblib/libucb.a -lnsl