- Community Home
- >
- Servers and Operating Systems
- >
- Operating Systems
- >
- Operating System - OpenVMS
- >
- Re: Unwrapping a call stack in Fortran
Categories
Company
Local Language
Forums
Discussions
Forums
- Data Protection and Retention
- Entry Storage Systems
- Legacy
- Midrange and Enterprise Storage
- Storage Networking
- HPE Nimble Storage
Discussions
Discussions
Discussions
Forums
Forums
Discussions
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
- BladeSystem Infrastructure and Application Solutions
- Appliance Servers
- Alpha Servers
- BackOffice Products
- Internet Products
- HPE 9000 and HPE e3000 Servers
- Networking
- Netservers
- Secure OS Software for Linux
- Server Management (Insight Manager 7)
- Windows Server 2003
- Operating System - Tru64 Unix
- ProLiant Deployment and Provisioning
- Linux-Based Community / Regional
- Microsoft System Center Integration
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Discussion Boards
Community
Resources
Forums
Blogs
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
тАО12-13-2006 02:06 AM
тАО12-13-2006 02:06 AM
When an image abend occurs, the call stack is unraveled, displaying a trace of the module names that brought us to the point of the abend. I am looking for a Fortran[-77] routine that would do the same without the abend.
For example,
%SYSTEM-F-ABORT, abort
%TRACE-F-TRACEBACK, symbolic stack dump follows
image module routine line
JOBTOPMEN FALEXIT FALEXIT 1999 JOBTOPMEN MFSERR MFSERRM 5336 JOBTOPMEN DABUSDAY DABUSDAY 140 JOBTOPMEN ISBUSDAY ISBUSDAY 55 JOBTOPMEN JBFNDJPR JBFNDJPR 3270 JOBTOPMEN JBBLDJPR JBBLDJPR 3437 JOBTOPMEN JBSETJPR JBSETJPR 3749 JOBTOPMEN JOBTOPMEN JOBTOPMEN 3603
I believe that I could use a subroutine that executes an internal WRITE with inconsistant variables...as doing so will generate a traceback dump and continue, but that seems a bit 'sloppy'.
I also understand that there are services that may do what I am looking for...
LIB$GET_INVO_CONTEXT and
LIB$GET_PREV_INVO_CONTEXT
but I have not been able to locate any examples on their use, and I believe that they only return the addresses of the routines...not their names.
Any suggestions? Ideas?
Many thanks,
Howard
Solved! Go to Solution.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
тАО12-13-2006 02:16 AM
тАО12-13-2006 02:16 AM
Solutionhttp://groups.google.de/group/comp.os.vms/browse_thread/thread/43a39b78e8a42f1d/562562c7dfbbca2f?hl=de#562562c7dfbbca2f
regards Kalle
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
тАО12-13-2006 02:17 AM
тАО12-13-2006 02:17 AM
Re: Unwrapping a call stack in Fortran
There was a recent discussion in comp.os.vms about this very topic under the subject "Who called me?"
http://groups.google.com/group/comp.os.vms/search?group=comp.os.vms&q=LIB%24GET_CURR_INVO_CONTEXT+&qt_g=1
Basically you can use the undocumented trace-back routine tbk$show_traceback and give it an action routine where your code will be called for every line in the current traceback.
Sample (C) code attached.
Enjoy!
Hein van den Heuvel
HvdH Performance Consulting
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
тАО12-13-2006 02:30 AM
тАО12-13-2006 02:30 AM
Re: Unwrapping a call stack in Fortran
I believe that the directed discussion thread contains the desired information.
Much obliged.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
тАО12-13-2006 04:15 AM
тАО12-13-2006 04:15 AM
Re: Unwrapping a call stack in Fortran
Welcome to the VMS Forum!
>>>
Yes...Thank you to Karl and Hein.
I believe that the directed discussion thread contains the desired information.
Much obliged.
<<<
For the way to express your thanks, see
http://forums1.itrc.hp.com/service/forums/helptips.do?#33
Proost.
Have one on em.
jpe