gdb/bfd/rs6000-core.c

31    compiled on an RS/6000 host.  -- no archive support, no core files.
64 /*	Support for core file stuff..					    */
71 #include <sys/core.h>
76 /* AIX 4.1 changed the names and locations of a few items in the core file.
81    CORE_VERSION_1 is defined (by AIX core.h) as 2 on AIX 4.3+ and as 1 on AIX
106 /* Union of old and new core dump structures.  */
110   struct core_dumpx new;	/* new AIX 4.3+ core dump */
114   struct core_dump old;		/* old AIX 4.2- core dump, still used on
239 /* Magic end-of-stack addresses for old core dumps.  This is _very_ fragile,
248 /* Size of the leading portion that old and new core dump structures have in
253 /* Try to read into CORE the header from the core file associated with ABFD.
257 read_hdr (bfd *abfd, CoreHdr *core)
264   /* Read the leading portion that old and new core dump structures have in
267   if (bfd_bread (core, size, abfd) != size)
271   if (CORE_NEW (*core))
272     size = sizeof (core->new);
274     size = sizeof (core->old);
276   return bfd_bread ((char *) core + CORE_COMMONSZ, size, abfd) == size;
303 /* Decide if a given bfd represents a `core' file or not. There really is no
310   CoreHdr core;
315   /* Values from new and old core structures.  */
323   if (!read_hdr (abfd, &core))
330   /* Copy fields from new or old core structure.  */
331   if (CORE_NEW (core))
333       c_flag = core.new.c_flag;
334       c_stack = (file_ptr) core.new.c_stack;
335       c_size = core.new.c_size;
336       c_stackend = CNEW_STACKORG (core.new) + c_size;
337       c_lsize = CNEW_LSIZE (core.new);
338       c_loader = CNEW_LOADER (core.new);
339       proc64 = CNEW_PROC64 (core.new);
343       c_flag = core.old.c_flag;
344       c_stack = (file_ptr) core.old.c_stack;
345       c_size = core.old.c_size;
348       c_loader = (file_ptr) COLD_LOADER (core.old);
354       c_regsize = sizeof (CNEW_CONTEXT64 (core.new));
355       c_regptr = &CNEW_CONTEXT64 (core.new);
357   else if (CORE_NEW (core))
359       c_regsize = sizeof (CNEW_MSTSAVE (core.new));
360       c_regptr = &CNEW_MSTSAVE (core.new);
364       c_regsize = sizeof (COLD_MSTSAVE (core.old));
365       c_regptr = &COLD_MSTSAVE (core.old);
367   c_regoff = (char *) c_regptr - (char *) &core;
375   /* If the core file ulimit is too small, the system will first
377      dump core altogether (as far as I know UBLOCK_VALID and LE_VALID
386      if it's not there, we refuse to have anything to do with this core
387      file.  The usefulness of a core dump without a stack segment is pretty
403   /* Don't check the core file size for a full core, AIX 4.1 includes
404      additional shared library sections in a full core.  */
416   if (!CORE_NEW (core) && (c_loader < (file_ptr) sizeof core.old ||
424   /* Issue warning if the core file was truncated during writing.  */
426     (*_bfd_error_handler) (_("%s: warning core file truncated"),
429   /* Allocate core file header.  */
430   size = CORE_NEW (core) ? sizeof (core.new) : sizeof (core.old);
435   /* Copy core file header.  */
436   memcpy (tmpptr, &core, size);
440   if (CORE_NEW (core))
445       switch (CNEW_IMPL (core.new))
475      core dump would require going down the whole list of struct ld_info's.
486      AIX 4 sets FULL_CORE even if the core file is truncated, we have
487      to examine core.c_datasize below to find out the actual size of
493 			      (bfd_size_type) core.old.c_u.u_dsize,
495 				CDATA_ADDR (core.old.c_u.u_dsize),
502   /* AIX 4 adds data sections from loaded objects to the core file,
512     /* Fields from new and old core structures.  */
516     if (CORE_NEW (core))
518 	c_datasize = CNEW_DATASIZE (core.new);
519 	c_data = (file_ptr) core.new.c_data;
520 	c_vmregions = core.new.c_vmregions;
521 	c_vmm = (file_ptr) core.new.c_vmm;
525 	c_datasize = core.old.c_datasize;
526 	c_data = (file_ptr) core.old.c_data;
527 	c_vmregions = core.old.c_vmregions;
528 	c_vmm = (file_ptr) core.old.c_vmm;
596 	    size = CORE_NEW (core) ? sizeof (vminfo.new) : sizeof (vminfo.old);
600 	    if (CORE_NEW (core))
633 /* Return `TRUE' if given core is from the given executable.  */
640   CoreHdr core;
648   if (!read_hdr (core_bfd, &core))
651   if (CORE_NEW (core))
652     c_loader = CNEW_LOADER (core.new);
654     c_loader = (file_ptr) COLD_LOADER (core.old);
656   if (CORE_NEW (core) && CNEW_PROC64 (core.new))
717   CoreHdr *core = core_hdr (abfd);
718   char *com = CORE_NEW (*core) ?
719     CNEW_COMM (core->new) : COLD_COMM (core->old);
731   CoreHdr *core = core_hdr (abfd);
732   return CORE_NEW (*core) ? core->new.c_signo : core->old.c_signo;