This is the mail archive of the
gdb-patches@sources.redhat.com
mailing list for the GDB project.
[patch] Fix -Wformat problems for hpux
- To: gdb-patches at sources dot redhat dot com
- Subject: [patch] Fix -Wformat problems for hpux
- From: Andrew Cagney <ac131313 at cygnus dot com>
- Date: Tue, 23 Oct 2001 22:51:07 -0400
....
Enjoy,
Andrew
Tue Oct 23 18:59:42 2001 Andrew Cagney <cagney@redhat.com>
* hp-psymtab-read.c, hppah-nat.c, hppa-tdep.c: Fix -Wformat
problems.
Index: hp-psymtab-read.c
===================================================================
RCS file: /cvs/src/src/gdb/hp-psymtab-read.c,v
retrieving revision 1.11
diff -p -r1.11 hp-psymtab-read.c
*** hp-psymtab-read.c 2001/10/24 01:19:12 1.11
--- hp-psymtab-read.c 2001/10/24 02:48:48
*************** hpread_quick_traverse (struct objfile *o
*** 865,872 ****
(CURR_MODULE_END == 0) || (CURR_MODULE_END == -1)))
{
TELL_OBJFILE;
! warning ("Module \"%s\" [0x%x] has non-standard addresses. It starts at 0x%x, ends at 0x%x, and will be skipped.",
! mod_name_string, curr_md, start_adr, end_adr);
/* On to next module */
curr_md++;
}
--- 865,872 ----
(CURR_MODULE_END == 0) || (CURR_MODULE_END == -1)))
{
TELL_OBJFILE;
! warning ("Module \"%s\" [0x%s] has non-standard addresses. It starts at 0x%s, ends at 0x%s, and will be skipped.",
! mod_name_string, paddr_nz (curr_md), paddr_nz (start_adr), paddr_nz (end_adr));
/* On to next module */
curr_md++;
}
Index: hppa-tdep.c
===================================================================
RCS file: /cvs/src/src/gdb/hppa-tdep.c,v
retrieving revision 1.16
diff -p -r1.16 hppa-tdep.c
*** hppa-tdep.c 2001/07/15 20:10:02 1.16
--- hppa-tdep.c 2001/10/24 02:48:57
*************** pa_do_registers_info (int regnum, int fp
*** 2498,2512 ****
if (!is_pa_2)
{
! printf_unfiltered ("%s %x\n", REGISTER_NAME (regnum), reg_val[1]);
}
else
{
/* Fancy % formats to prevent leading zeros. */
if (reg_val[0] == 0)
! printf_unfiltered ("%s %x\n", REGISTER_NAME (regnum), reg_val[1]);
else
! printf_unfiltered ("%s %x%8.8x\n", REGISTER_NAME (regnum),
reg_val[0], reg_val[1]);
}
}
--- 2498,2512 ----
if (!is_pa_2)
{
! printf_unfiltered ("%s %lx\n", REGISTER_NAME (regnum), reg_val[1]);
}
else
{
/* Fancy % formats to prevent leading zeros. */
if (reg_val[0] == 0)
! printf_unfiltered ("%s %lx\n", REGISTER_NAME (regnum), reg_val[1]);
else
! printf_unfiltered ("%s %lx%8.8lx\n", REGISTER_NAME (regnum),
reg_val[0], reg_val[1]);
}
}
*************** pa_do_strcat_registers_info (int regnum,
*** 2543,2558 ****
if (!is_pa_2)
{
! fprintf_unfiltered (stream, "%s %x", REGISTER_NAME (regnum), reg_val[1]);
}
else
{
/* Fancy % formats to prevent leading zeros. */
if (reg_val[0] == 0)
! fprintf_unfiltered (stream, "%s %x", REGISTER_NAME (regnum),
reg_val[1]);
else
! fprintf_unfiltered (stream, "%s %x%8.8x", REGISTER_NAME (regnum),
reg_val[0], reg_val[1]);
}
}
--- 2543,2558 ----
if (!is_pa_2)
{
! fprintf_unfiltered (stream, "%s %lx", REGISTER_NAME (regnum), reg_val[1]);
}
else
{
/* Fancy % formats to prevent leading zeros. */
if (reg_val[0] == 0)
! fprintf_unfiltered (stream, "%s %lx", REGISTER_NAME (regnum),
reg_val[1]);
else
! fprintf_unfiltered (stream, "%s %lx%8.8lx", REGISTER_NAME (regnum),
reg_val[0], reg_val[1]);
}
}
*************** pa_print_registers (char *raw_regs, int
*** 2699,2715 ****
/* Being big-endian, on this machine the low bits
(the ones we want to look at) are in the second longword. */
long_val = extract_signed_integer (&raw_val[1], 4);
! printf_filtered ("%10.10s: %8x ",
REGISTER_NAME (regnum), long_val);
}
else
{
/* raw_val = extract_signed_integer(&raw_val, 8); */
if (raw_val[0] == 0)
! printf_filtered ("%10.10s: %8x ",
REGISTER_NAME (regnum), raw_val[1]);
else
! printf_filtered ("%10.10s: %8x%8.8x ",
REGISTER_NAME (regnum),
raw_val[0], raw_val[1]);
}
--- 2699,2715 ----
/* Being big-endian, on this machine the low bits
(the ones we want to look at) are in the second longword. */
long_val = extract_signed_integer (&raw_val[1], 4);
! printf_filtered ("%10.10s: %8lx ",
REGISTER_NAME (regnum), long_val);
}
else
{
/* raw_val = extract_signed_integer(&raw_val, 8); */
if (raw_val[0] == 0)
! printf_filtered ("%10.10s: %8lx ",
REGISTER_NAME (regnum), raw_val[1]);
else
! printf_filtered ("%10.10s: %8lx%8.8lx ",
REGISTER_NAME (regnum),
raw_val[0], raw_val[1]);
}
*************** pa_strcat_registers (char *raw_regs, int
*** 2750,2766 ****
/* Being big-endian, on this machine the low bits
(the ones we want to look at) are in the second longword. */
long_val = extract_signed_integer (&raw_val[1], 4);
! fprintf_filtered (stream, "%8.8s: %8x ", REGISTER_NAME (i + (j * 18)), long_val);
}
else
{
/* raw_val = extract_signed_integer(&raw_val, 8); */
if (raw_val[0] == 0)
! fprintf_filtered (stream, "%8.8s: %8x ", REGISTER_NAME (i + (j * 18)),
! raw_val[1]);
else
! fprintf_filtered (stream, "%8.8s: %8x%8.8x ", REGISTER_NAME (i + (j * 18)),
! raw_val[0], raw_val[1]);
}
}
fprintf_unfiltered (stream, "\n");
--- 2750,2768 ----
/* Being big-endian, on this machine the low bits
(the ones we want to look at) are in the second longword. */
long_val = extract_signed_integer (&raw_val[1], 4);
! fprintf_filtered (stream, "%8.8s: %8lx ",
! REGISTER_NAME (i + (j * 18)), long_val);
}
else
{
/* raw_val = extract_signed_integer(&raw_val, 8); */
if (raw_val[0] == 0)
! fprintf_filtered (stream, "%8.8s: %8lx ",
! REGISTER_NAME (i + (j * 18)), raw_val[1]);
else
! fprintf_filtered (stream, "%8.8s: %8lx%8.8lx ",
! REGISTER_NAME (i + (j * 18)), raw_val[0],
! raw_val[1]);
}
}
fprintf_unfiltered (stream, "\n");
*************** skip_trampoline_code (CORE_ADDR pc, char
*** 3290,3296 ****
stubsym = lookup_minimal_symbol_by_pc (loc);
if (stubsym == NULL)
{
! warning ("Unable to find symbol for 0x%x", loc);
return orig_pc == pc ? 0 : pc & ~0x3;
}
--- 3292,3298 ----
stubsym = lookup_minimal_symbol_by_pc (loc);
if (stubsym == NULL)
{
! warning ("Unable to find symbol for 0x%lx", loc);
return orig_pc == pc ? 0 : pc & ~0x3;
}
*************** unwind_command (char *exp, int from_tty)
*** 4517,4523 ****
return;
}
! printf_unfiltered ("unwind_table_entry (0x%x):\n", u);
printf_unfiltered ("\tregion_start = ");
print_address (u->region_start, gdb_stdout);
--- 4519,4526 ----
return;
}
! printf_unfiltered ("unwind_table_entry (0x%s):\n",
! paddr_nz (host_pointer_to_address (u)));
printf_unfiltered ("\tregion_start = ");
print_address (u->region_start, gdb_stdout);
Index: hppah-nat.c
===================================================================
RCS file: /cvs/src/src/gdb/hppah-nat.c,v
retrieving revision 1.11
diff -p -r1.11 hppah-nat.c
*** hppah-nat.c 2001/05/04 04:15:25 1.11
--- hppah-nat.c 2001/10/24 02:49:11
*************** child_pid_to_str (ptid_t ptid)
*** 443,450 ****
static char buf[30];
pid_t pid = PIDGET (ptid);
! /* Extra NULLs for paranoia's sake */
! sprintf (buf, "process %d\0\0\0\0", pid);
return buf;
}
--- 443,450 ----
static char buf[30];
pid_t pid = PIDGET (ptid);
! /* Extra NUL for paranoia's sake */
! sprintf (buf, "process %d%c", pid, '\0');
return buf;
}
*************** hppa_tid_to_str (ptid_t ptid)
*** 464,470 ****
pid_t tid = PIDGET (ptid);
/* Extra NULLs for paranoia's sake */
! sprintf (buf, "system thread %d\0\0\0\0", tid);
return buf;
}
--- 464,470 ----
pid_t tid = PIDGET (ptid);
/* Extra NULLs for paranoia's sake */
! sprintf (buf, "system thread %d%c", tid, '\0');
return buf;
}