97 lines
2.0 KiB
C
97 lines
2.0 KiB
C
#ident "$Header: /proj/irix6.5.7m/isms/irix/cmd/icrash/cmds/RCS/cmd_func.c,v 1.12 1999/05/25 19:21:38 tjm Exp $"
|
|
|
|
#include <stdio.h>
|
|
#include <sys/types.h>
|
|
#include <klib/klib.h>
|
|
#include "icrash.h"
|
|
|
|
/*
|
|
* func_banner()
|
|
*/
|
|
void
|
|
func_banner(FILE *ofp, int flags)
|
|
{
|
|
if (flags & BANNER) {
|
|
fprintf(ofp, "NAME ADDR SIZE "
|
|
"FRAMESIZE RA_OFFSET\n");
|
|
}
|
|
|
|
if (flags & SMAJOR) {
|
|
fprintf(ofp, "=================================================="
|
|
"====================\n");
|
|
}
|
|
|
|
if (flags & SMINOR) {
|
|
fprintf(ofp, "--------------------------------------------------"
|
|
"--------------------\n");
|
|
}
|
|
}
|
|
|
|
/*
|
|
* func_cmd() -- Run the 'func' command.
|
|
*/
|
|
int
|
|
func_cmd(command_t cmd)
|
|
{
|
|
int i, size, frame_size, ra_offset, func_cnt = 0;
|
|
kaddr_t inst, func_addr;
|
|
char *funcname, *symname;
|
|
|
|
func_banner(cmd.ofp, BANNER|SMAJOR);
|
|
for (i = 0; i < cmd.nargs; i++) {
|
|
GET_VALUE(cmd.args[i], &inst);
|
|
if (KL_ERROR) {
|
|
KL_ERROR |= KLE_BAD_FUNCADDR;
|
|
kl_print_error();
|
|
continue;
|
|
}
|
|
if (funcname = kl_funcname(inst)) {
|
|
func_addr = kl_funcaddr(inst);
|
|
size = kl_funcsize(func_addr);
|
|
frame_size = get_frame_size(func_addr, 1);
|
|
ra_offset = get_ra_offset(func_addr, 1);
|
|
fprintf(cmd.ofp, "%-20s ", funcname);
|
|
fprintf(cmd.ofp, "%16llx ", func_addr);
|
|
fprintf(cmd.ofp, "%8d %9d %9d\n", size, frame_size, ra_offset);
|
|
func_cnt++;
|
|
}
|
|
else {
|
|
KL_SET_ERROR_NVAL(KLE_BAD_FUNCADDR, inst, 2);
|
|
kl_print_error();
|
|
}
|
|
}
|
|
func_banner(cmd.ofp, SMAJOR);
|
|
PLURAL("function", func_cnt, cmd.ofp);
|
|
return(0);
|
|
}
|
|
|
|
#define _FUNC_USAGE "[-w outfile] func_addr"
|
|
|
|
/*
|
|
* func_usage() -- Print the usage string for the 'func' command.
|
|
*/
|
|
void
|
|
func_usage(command_t cmd)
|
|
{
|
|
CMD_USAGE(cmd, _FUNC_USAGE);
|
|
}
|
|
|
|
/*
|
|
* func_help() -- Print the help information for the 'func' command.
|
|
*/
|
|
void
|
|
func_help(command_t cmd)
|
|
{
|
|
CMD_HELP(cmd, _FUNC_USAGE,
|
|
"Print out information about to a function at func_addr.");
|
|
}
|
|
|
|
/*
|
|
* func_parse() -- Parse the command line arguments for 'func'.
|
|
*/
|
|
int
|
|
func_parse(command_t cmd)
|
|
{
|
|
return (C_TRUE|C_WRITE);
|
|
}
|