/* $NetBSD: shell_shell.c,v 1.5 1996/04/19 20:15:36 mark Exp $ */ /* * Copyright (c) 1994-1996 Mark Brinicombe. * Copyright (c) 1994 Brini. * All rights reserved. * * This code is derived from software written for Brini by Mark Brinicombe * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by Brini. * 4. The name of the company nor the name of the author may be used to * endorse or promote products derived from this software without specific * prior written permission. * * THIS SOFTWARE IS PROVIDED BY BRINI ``AS IS'' AND ANY EXPRESS OR IMPLIED * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. * IN NO EVENT SHALL BRINI OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * RiscBSD kernel project * * shell_shell.c * * Debug / Monitor shell entry and commands * * Created : 09/10/94 */ /* Include standard header files */ #include #include #include #include #include #include #include /* Local header files */ #include #include #include #include /* Declare global variables */ /* Local function prototypes */ char *strchr __P((const char *, int)); void dumpb __P((u_char */*addr*/, int /*count*/)); void dumpw __P((u_char */*addr*/, int /*count*/)); int readstring __P((char *, int, char *, char *)); void debug_show_q_details __P((void)); void shell_disassem __P((int argc, char *argv[])); void shell_devices __P((int argc, char *argv[])); void shell_vmmap __P((int argc, char *argv[])); void shell_flush __P((int argc, char *argv[])); void shell_pextract __P((int argc, char *argv[])); void shell_vnode __P((int argc, char *argv[])); void debug_show_all_procs __P((int argc, char *argv[])); void debug_show_callout __P((int argc, char *argv[])); void debug_show_fs __P((int argc, char *argv[])); void debug_show_vm_map __P((vm_map_t map, char *text)); void debug_show_pmap __P((pmap_t pmap)); void pmap_dump_pvs __P((void)); void bootsync __P((void)); /* Now for the main code */ /* readhex * * This routine interprets the input string as a sequence of hex characters * and returns it as an integer. */ int readhex(buf) char *buf; { int value; int nibble; if (buf == NULL) return(0); /* skip any spaces */ while (*buf == ' ') ++buf; /* return 0 if a zero length string is passed */ if (*buf == 0) return(0); /* Convert the characters */ value = 0; while (*buf != 0 && strchr("0123456789abcdefABCDEF", *buf) != 0) { nibble = (*buf - '0'); if (nibble > 9) nibble -= 7; if (nibble > 15) nibble -= 32; value = (value << 4) | nibble; ++buf; } return(value); } /* poke - writes a byte/word to memory */ void shell_poke(argc, argv) int argc; char *argv[]; { u_int addr; u_int data; if (argc < 3) { printf("Syntax: poke[bw] \n\r"); return; } /* Decode the two arguments */ addr = readhex(argv[1]); data = readhex(argv[2]); if (argv[0][4] == 'b') WriteByte(addr, data); if (argv[0][4] == 'w') WriteWord(addr, data); } /* peek - reads a byte/word from memory*/ void shell_peek(argc, argv) int argc; char *argv[]; { u_int addr; u_int data; if (argc < 2) { printf("Syntax: peek[bw] \n\r"); return; } /* Decode the one argument */ addr = readhex(argv[1]); if (argv[0][4] == 'b') data = ReadByte(addr); if (argv[0][4] == 'w') data = ReadWord(addr); printf("%08x : %08x\n\r", addr, data); } /* dumpb - dumps memory in bytes*/ void shell_dumpb(argc, argv) int argc; char *argv[]; { u_char *addr; int count; if (argc < 2) { printf("Syntax: dumpb []\n\r"); return; } /* Decode the one argument */ addr = (u_char *)readhex(argv[1]); if (argc > 2) count = readhex(argv[2]); else count = 0x80; dumpb(addr, count); } /* dumpw - dumps memory in bytes*/ void shell_dumpw(argc, argv) int argc; char *argv[]; { u_char *addr; int count; if (argc < 2) { printf("Syntax: dumpw []\n\r"); return; } /* Decode the one argument */ addr = (u_char *)readhex(argv[1]); if (argc > 2) count = readhex(argv[2]); else count = 0x80; dumpw(addr, count); } /* vmmap - dumps the vmmap */ void shell_vmmap(argc, argv) int argc; char *argv[]; { u_char *addr; if (argc < 2) { printf("Syntax: vmmap \n\r"); return; } /* Decode the one argument */ addr = (u_char *)readhex(argv[1]); debug_show_vm_map((vm_map_t)addr, argv[1]); } /* pmap - dumps the pmap */ void shell_pmap(argc, argv) int argc; char *argv[]; { u_char *addr; if (argc < 2) { printf("Syntax: pmap \n\r"); return; } /* Decode the one argument */ addr = (u_char *)readhex(argv[1]); debug_show_pmap((pmap_t)addr); } /* * void shell_devices(int argc, char *argv[]) * * Display all the devices */ extern struct cfdata cfdata[]; void shell_devices(argc, argv) int argc; char *argv[]; { struct cfdata *cf; struct cfdriver *cd; struct device *dv; int loop; char *state; printf(" driver unit state name\n"); for (cf = cfdata; cf->cf_driver; ++cf) { cd = cf->cf_driver; if (cf->cf_fstate & FSTATE_FOUND) state = "FOUND "; else state = "NOT FOUND"; printf("%08x %2d %s %s\n", (u_int)cd, (u_int)cf->cf_unit, state, cd->cd_name); if (cf->cf_fstate & FSTATE_FOUND) { for (loop = 0; loop < cd->cd_ndevs; ++loop) { dv = (struct device *)cd->cd_devs[loop]; if (dv != 0) printf(" %s (%08x)\n", dv->dv_xname, (u_int) dv); } } printf("\n"); } } void shell_reboot(argc, argv) int argc; char *argv[]; { printf("Running shutdown hooks ...\n"); doshutdownhooks(); IRQdisable; boot0(); } void forceboot(argc, argv) int argc; char *argv[]; { cmos_write(0x90, cmos_read(0x90) | 0x02); shell_reboot(0, NULL); } void shell_flush(argc, argv) int argc; char *argv[]; { idcflush(); tlbflush(); } void shell_vmstat(argc, argv) int argc; char *argv[]; { struct vmmeter sum; sum = cnt; (void)printf("%9u cpu context switches\n", sum.v_swtch); (void)printf("%9u device interrupts\n", sum.v_intr); (void)printf("%9u software interrupts\n", sum.v_soft); (void)printf("%9u traps\n", sum.v_trap); (void)printf("%9u system calls\n", sum.v_syscall); (void)printf("%9u total faults taken\n", sum.v_faults); (void)printf("%9u swap ins\n", sum.v_swpin); (void)printf("%9u swap outs\n", sum.v_swpout); (void)printf("%9u pages swapped in\n", sum.v_pswpin / CLSIZE); (void)printf("%9u pages swapped out\n", sum.v_pswpout / CLSIZE); (void)printf("%9u page ins\n", sum.v_pageins); (void)printf("%9u page outs\n", sum.v_pageouts); (void)printf("%9u pages paged in\n", sum.v_pgpgin); (void)printf("%9u pages paged out\n", sum.v_pgpgout); (void)printf("%9u pages reactivated\n", sum.v_reactivated); (void)printf("%9u intransit blocking page faults\n", sum.v_intrans); (void)printf("%9u zero fill pages created\n", sum.v_nzfod / CLSIZE); (void)printf("%9u zero fill page faults\n", sum.v_zfod / CLSIZE); (void)printf("%9u pages examined by the clock daemon\n", sum.v_scan); (void)printf("%9u revolutions of the clock hand\n", sum.v_rev); (void)printf("%9u VM object cache lookups\n", sum.v_lookups); (void)printf("%9u VM object hits\n", sum.v_hits); (void)printf("%9u total VM faults taken\n", sum.v_vm_faults); (void)printf("%9u copy-on-write faults\n", sum.v_cow_faults); (void)printf("%9u pages freed by daemon\n", sum.v_dfree); (void)printf("%9u pages freed by exiting processes\n", sum.v_pfree); (void)printf("%9u pages free\n", sum.v_free_count); (void)printf("%9u pages wired down\n", sum.v_wire_count); (void)printf("%9u pages active\n", sum.v_active_count); (void)printf("%9u pages inactive\n", sum.v_inactive_count); (void)printf("%9u bytes per page\n", sum.v_page_size); } void shell_pextract(argc, argv) int argc; char *argv[]; { u_char *addr; vm_offset_t pa; int pind; if (argc < 2) { printf("Syntax: pextract \n\r"); return; } /* Decode the one argument */ addr = (u_char *)readhex(argv[1]); pa = pmap_extract(kernel_pmap, (vm_offset_t)addr); pind = pmap_page_index(pa); printf("va=%08x pa=%08x pind=%d\n", (u_int)addr, (u_int)pa, pind); } void shell_vnode(argc, argv) int argc; char *argv[]; { struct vnode *vp; if (argc < 2) { printf("Syntax: vnode \n\r"); return; } /* Decode the one argument */ vp = (struct vnode *)readhex(argv[1]); printf("vp = %08x\n", (u_int)vp); printf("vp->v_type = %d\n", vp->v_type); printf("vp->v_flag = %ld\n", vp->v_flag); printf("vp->v_usecount = %d\n", vp->v_usecount); printf("vp->v_writecount = %d\n", vp->v_writecount); printf("vp->v_numoutput = %ld\n", vp->v_numoutput); vprint("vnode:", vp); } #if 0 void shell_vndbuf(argc, argv) int argc; char *argv[]; { struct vnode *vp; if (argc < 2) { printf("Syntax: vndbuf \n\r"); return; } /* Decode the one argument */ vp = (struct vnode *)readhex(argv[1]); dumpvndbuf(vp); } void shell_vncbuf(argc, argv) int argc; char *argv[]; { struct vnode *vp; if (argc < 2) { printf("Syntax: vndbuf \n\r"); return; } /* Decode the one argument */ vp = (struct vnode *)readhex(argv[1]); dumpvncbuf(vp); } #endif /* shell - a crude shell */ int shell() { int quit = 0; char buffer[200]; char *ptr; char *ptr1; int args; char *argv[20]; printf("\nRiscBSD debug/monitor shell\n"); printf("CTRL-D, exit or reboot to terminate\n\n"); do { /* print prompt */ printf("kshell> "); /* Read line from keyboard */ if (readstring(buffer, 200, NULL, NULL) == -1) return(0); ptr = buffer; /* Slice leading spaces */ while (*ptr == ' ') ++ptr; /* Loop back if zero length string */ if (*ptr == 0) continue; /* Count the number of space separated args */ args = 0; ptr1 = ptr; while (*ptr1 != 0) { if (*ptr1 == ' ') { ++args; while (*ptr1 == ' ') ++ptr1; } else ++ptr1; } /* * Construct the array of pointers to the args and terminate * each argument with 0x00 */ args = 0; ptr1 = ptr; while (*ptr1 != 0) { argv[args] = ptr1; ++args; while (*ptr1 != ' ' && *ptr1 != 0) ++ptr1; while (*ptr1 == ' ') { *ptr1 = 0; ++ptr1; } } argv[args] = NULL; /* Interpret commands */ if (strcmp(argv[0], "exit") == 0) quit = 1; #ifdef DDB else if (strcmp(argv[0], "deb") == 0) Debugger(); #endif else if (strcmp(argv[0], "peekb") == 0) shell_peek(args, argv); else if (strcmp(argv[0], "pokeb") == 0) shell_poke(args, argv); else if (strcmp(argv[0], "peekw") == 0) shell_peek(args, argv); else if (strcmp(argv[0], "pokew") == 0) shell_poke(args, argv); else if (strcmp(argv[0], "dumpb") == 0) shell_dumpb(args, argv); else if (strcmp(argv[0], "reboot") == 0) shell_reboot(args, argv); else if (strcmp(argv[0], "dumpw") == 0) shell_dumpw(args, argv); else if (strcmp(argv[0], "dump") == 0) shell_dumpw(args, argv); else if (strcmp(argv[0], "dis") == 0) shell_disassem(args, argv); else if (strcmp(argv[0], "qs") == 0) debug_show_q_details(); else if (strcmp(argv[0], "ps") == 0) debug_show_all_procs(args, argv); else if (strcmp(argv[0], "callouts") == 0) debug_show_callout(args, argv); else if (strcmp(argv[0], "devices") == 0) shell_devices(args, argv); else if (strcmp(argv[0], "listfs") == 0) debug_show_fs(args, argv); else if (strcmp(argv[0], "vmmap") == 0) shell_vmmap(args, argv); else if (strcmp(argv[0], "pmap") == 0) shell_pmap(args, argv); else if (strcmp(argv[0], "flush") == 0) shell_flush(args, argv); else if (strcmp(argv[0], "vmstat") == 0) shell_vmstat(args, argv); else if (strcmp(argv[0], "pdstat") == 0) pmap_pagedir_dump(); else if (strcmp(argv[0], "traceback") == 0) traceback(); else if (strcmp(argv[0], "forceboot") == 0) forceboot(args, argv); else if (strcmp(argv[0], "dumppvs") == 0) pmap_dump_pvs(); else if (strcmp(argv[0], "pextract") == 0) shell_pextract(args, argv); else if (strcmp(argv[0], "vnode") == 0) shell_vnode(args, argv); else if (strcmp(argv[0], "ascdump") == 0) asc_dump(); else if (strcmp(argv[0], "help") == 0 || strcmp(argv[0], "?") == 0) { printf("peekb \r\n"); printf("pokeb \r\n"); printf("peekw \r\n"); printf("pokew \r\n"); printf("dis \r\n"); printf("dumpb [length]\r\n"); printf("dumpw [length]\r\n"); printf("dump [length]\r\n"); printf("reboot\r\n"); printf("qs\r\n"); printf("ps [m]\r\n"); printf("vmstat\n"); printf("listfs\n"); printf("devices\n"); printf("callouts\n"); printf("prompt\r\n"); printf("vmmap \r\n"); printf("pmap \r\n"); printf("pdstat\r\n"); printf("flush\r\n"); printf("exit\r\n"); printf("forceboot\r\n"); printf("dumppvs\r\n"); printf("pextract \r\n"); printf("vnode \r\n"); printf("ascdump\r\n"); } } while (!quit); return(0); } /* End of shell_shell.c */